ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/libev/ev.c
(Generate patch)

Comparing libev/ev.c (file contents):
Revision 1.503 by root, Wed Jul 3 21:52:04 2019 UTC vs.
Revision 1.530 by root, Wed Mar 18 12:30:35 2020 UTC

… …
117# define EV_USE_EPOLL 0 117# define EV_USE_EPOLL 0
118# endif 118# endif
119 119
120# if HAVE_LINUX_AIO_ABI_H 120# if HAVE_LINUX_AIO_ABI_H
121# ifndef EV_USE_LINUXAIO 121# ifndef EV_USE_LINUXAIO
122# define EV_USE_LINUXAIO EV_FEATURE_BACKENDS 122# define EV_USE_LINUXAIO 0 /* was: EV_FEATURE_BACKENDS, always off by default */
123# endif 123# endif
124# else 124# else
125# undef EV_USE_LINUXAIO 125# undef EV_USE_LINUXAIO
126# define EV_USE_LINUXAIO 0 126# define EV_USE_LINUXAIO 0
127# endif 127# endif
128 128
129# if HAVE_LINUX_FS_H && HAVE_SYS_TIMERFD_H && HAVE_KERNEL_RWF_T
130# ifndef EV_USE_IOURING
131# define EV_USE_IOURING EV_FEATURE_BACKENDS
132# endif
133# else
134# undef EV_USE_IOURING
135# define EV_USE_IOURING 0
136# endif
137
129# if HAVE_KQUEUE && HAVE_SYS_EVENT_H 138# if HAVE_KQUEUE && HAVE_SYS_EVENT_H
130# ifndef EV_USE_KQUEUE 139# ifndef EV_USE_KQUEUE
131# define EV_USE_KQUEUE EV_FEATURE_BACKENDS 140# define EV_USE_KQUEUE EV_FEATURE_BACKENDS
132# endif 141# endif
133# else 142# else
… …
168# endif 177# endif
169# else 178# else
170# undef EV_USE_EVENTFD 179# undef EV_USE_EVENTFD
171# define EV_USE_EVENTFD 0 180# define EV_USE_EVENTFD 0
172# endif 181# endif
173 182
183# if HAVE_SYS_TIMERFD_H
184# ifndef EV_USE_TIMERFD
185# define EV_USE_TIMERFD EV_FEATURE_OS
186# endif
187# else
188# undef EV_USE_TIMERFD
189# define EV_USE_TIMERFD 0
190# endif
191
174#endif 192#endif
175 193
176/* OS X, in its infinite idiocy, actually HARDCODES 194/* OS X, in its infinite idiocy, actually HARDCODES
177 * a limit of 1024 into their select. Where people have brains, 195 * a limit of 1024 into their select. Where people have brains,
178 * OS X engineers apparently have a vacuum. Or maybe they were 196 * OS X engineers apparently have a vacuum. Or maybe they were
… …
326# define EV_USE_PORT 0 344# define EV_USE_PORT 0
327#endif 345#endif
328 346
329#ifndef EV_USE_LINUXAIO 347#ifndef EV_USE_LINUXAIO
330# if __linux /* libev currently assumes linux/aio_abi.h is always available on linux */ 348# if __linux /* libev currently assumes linux/aio_abi.h is always available on linux */
331# define EV_USE_LINUXAIO 1 349# define EV_USE_LINUXAIO 0 /* was: 1, always off by default */
332# else 350# else
333# define EV_USE_LINUXAIO 0 351# define EV_USE_LINUXAIO 0
334# endif 352# endif
335#endif 353#endif
336 354
337#ifndef EV_USE_IOURING 355#ifndef EV_USE_IOURING
338# if __linux 356# if __linux /* later checks might disable again */
339# define EV_USE_IOURING 0 357# define EV_USE_IOURING 1
340# else 358# else
341# define EV_USE_IOURING 0 359# define EV_USE_IOURING 0
342# endif 360# endif
343#endif 361#endif
344 362
… …
369#ifndef EV_USE_SIGNALFD 387#ifndef EV_USE_SIGNALFD
370# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7)) 388# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
371# define EV_USE_SIGNALFD EV_FEATURE_OS 389# define EV_USE_SIGNALFD EV_FEATURE_OS
372# else 390# else
373# define EV_USE_SIGNALFD 0 391# define EV_USE_SIGNALFD 0
392# endif
393#endif
394
395#ifndef EV_USE_TIMERFD
396# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 8))
397# define EV_USE_TIMERFD EV_FEATURE_OS
398# else
399# define EV_USE_TIMERFD 0
374# endif 400# endif
375#endif 401#endif
376 402
377#if 0 /* debugging */ 403#if 0 /* debugging */
378# define EV_VERIFY 3 404# define EV_VERIFY 3
… …
438#if !EV_STAT_ENABLE 464#if !EV_STAT_ENABLE
439# undef EV_USE_INOTIFY 465# undef EV_USE_INOTIFY
440# define EV_USE_INOTIFY 0 466# define EV_USE_INOTIFY 0
441#endif 467#endif
442 468
469#if __linux && EV_USE_IOURING
470# include <linux/version.h>
471# if LINUX_VERSION_CODE < KERNEL_VERSION(4,14,0)
472# undef EV_USE_IOURING
473# define EV_USE_IOURING 0
474# endif
475#endif
476
443#if !EV_USE_NANOSLEEP 477#if !EV_USE_NANOSLEEP
444/* hp-ux has it in sys/time.h, which we unconditionally include above */ 478/* hp-ux has it in sys/time.h, which we unconditionally include above */
445# if !defined _WIN32 && !defined __hpux 479# if !defined _WIN32 && !defined __hpux
446# include <sys/select.h> 480# include <sys/select.h>
447# endif 481# endif
… …
481# define EV_USE_INOTIFY 0 515# define EV_USE_INOTIFY 0
482# endif 516# endif
483#endif 517#endif
484 518
485#if EV_USE_EVENTFD 519#if EV_USE_EVENTFD
486/* our minimum requirement is glibc 2.7 which has the stub, but not the header */ 520/* our minimum requirement is glibc 2.7 which has the stub, but not the full header */
487# include <stdint.h> 521# include <stdint.h>
488# ifndef EFD_NONBLOCK 522# ifndef EFD_NONBLOCK
489# define EFD_NONBLOCK O_NONBLOCK 523# define EFD_NONBLOCK O_NONBLOCK
490# endif 524# endif
491# ifndef EFD_CLOEXEC 525# ifndef EFD_CLOEXEC
… …
497# endif 531# endif
498EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags); 532EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags);
499#endif 533#endif
500 534
501#if EV_USE_SIGNALFD 535#if EV_USE_SIGNALFD
502/* our minimum requirement is glibc 2.7 which has the stub, but not the header */ 536/* our minimum requirement is glibc 2.7 which has the stub, but not the full header */
503# include <stdint.h> 537# include <stdint.h>
504# ifndef SFD_NONBLOCK 538# ifndef SFD_NONBLOCK
505# define SFD_NONBLOCK O_NONBLOCK 539# define SFD_NONBLOCK O_NONBLOCK
506# endif 540# endif
507# ifndef SFD_CLOEXEC 541# ifndef SFD_CLOEXEC
… …
509# define SFD_CLOEXEC O_CLOEXEC 543# define SFD_CLOEXEC O_CLOEXEC
510# else 544# else
511# define SFD_CLOEXEC 02000000 545# define SFD_CLOEXEC 02000000
512# endif 546# endif
513# endif 547# endif
514EV_CPP (extern "C") int signalfd (int fd, const sigset_t *mask, int flags); 548EV_CPP (extern "C") int (signalfd) (int fd, const sigset_t *mask, int flags);
515 549
516struct signalfd_siginfo 550struct signalfd_siginfo
517{ 551{
518 uint32_t ssi_signo; 552 uint32_t ssi_signo;
519 char pad[128 - sizeof (uint32_t)]; 553 char pad[128 - sizeof (uint32_t)];
520}; 554};
555#endif
556
557/* for timerfd, libev core requires TFD_TIMER_CANCEL_ON_SET &c */
558#if EV_USE_TIMERFD
559# include <sys/timerfd.h>
560/* timerfd is only used for periodics */
561# if !(defined (TFD_TIMER_CANCEL_ON_SET) && defined (TFD_CLOEXEC) && defined (TFD_NONBLOCK)) || !EV_PERIODIC_ENABLE
562# undef EV_USE_TIMERFD
563# define EV_USE_TIMERFD 0
564# endif
521#endif 565#endif
522 566
523/*****************************************************************************/ 567/*****************************************************************************/
524 568
525#if EV_VERIFY >= 3 569#if EV_VERIFY >= 3
… …
535#define MIN_INTERVAL 0.0001220703125 /* 1/2**13, good till 4000 */ 579#define MIN_INTERVAL 0.0001220703125 /* 1/2**13, good till 4000 */
536/*#define MIN_INTERVAL 0.00000095367431640625 /* 1/2**20, good till 2200 */ 580/*#define MIN_INTERVAL 0.00000095367431640625 /* 1/2**20, good till 2200 */
537 581
538#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */ 582#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
539#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */ 583#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
584#define MAX_BLOCKTIME2 1500001.07 /* same, but when timerfd is used to detect jumps, also safe delay to not overflow */
540 585
541/* find a portable timestamp that is "alawys" in the future but fits into time_t. 586/* find a portable timestamp that is "always" in the future but fits into time_t.
542 * this is quite hard, and we are mostly guessing - we handle 32 bit signed/unsigned time_t, 587 * this is quite hard, and we are mostly guessing - we handle 32 bit signed/unsigned time_t,
543 * and sizes large than 32 bit, but and maybe the unlikely loating point time_t */ 588 * and sizes larger than 32 bit, and maybe the unlikely floating point time_t */
544#define EV_TSTAMP_HUGE \ 589#define EV_TSTAMP_HUGE \
545 (sizeof (time_t) >= 8 ? 10000000000000. \ 590 (sizeof (time_t) >= 8 ? 10000000000000. \
546 : 0 < (time_t)4294967295 ? 4294967295. \ 591 : 0 < (time_t)4294967295 ? 4294967295. \
547 : 2147483647.) \ 592 : 2147483647.) \
548 593
594#ifndef EV_TS_CONST
595# define EV_TS_CONST(nv) nv
596# define EV_TS_TO_MSEC(a) a * 1e3 + 0.9999
597# define EV_TS_FROM_USEC(us) us * 1e-6
549#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0) 598# define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0)
550#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0) 599# define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0)
600# define EV_TV_GET(tv) ((tv).tv_sec + (tv).tv_usec * 1e-6)
601# define EV_TS_GET(ts) ((ts).tv_sec + (ts).tv_nsec * 1e-9)
602#endif
551 603
552/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */ 604/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */
553/* ECB.H BEGIN */ 605/* ECB.H BEGIN */
554/* 606/*
555 * libecb - http://software.schmorp.de/pkg/libecb 607 * libecb - http://software.schmorp.de/pkg/libecb
556 * 608 *
557 * Copyright (©) 2009-2015 Marc Alexander Lehmann <libecb@schmorp.de> 609 * Copyright (©) 2009-2015,2018-2020 Marc Alexander Lehmann <libecb@schmorp.de>
558 * Copyright (©) 2011 Emanuele Giaquinta 610 * Copyright (©) 2011 Emanuele Giaquinta
559 * All rights reserved. 611 * All rights reserved.
560 * 612 *
561 * Redistribution and use in source and binary forms, with or without modifica- 613 * Redistribution and use in source and binary forms, with or without modifica-
562 * tion, are permitted provided that the following conditions are met: 614 * tion, are permitted provided that the following conditions are met:
… …
593 645
594#ifndef ECB_H 646#ifndef ECB_H
595#define ECB_H 647#define ECB_H
596 648
597/* 16 bits major, 16 bits minor */ 649/* 16 bits major, 16 bits minor */
598#define ECB_VERSION 0x00010006 650#define ECB_VERSION 0x00010008
599 651
600#ifdef _WIN32 652#include <string.h> /* for memcpy */
653
654#if defined (_WIN32) && !defined (__MINGW32__)
601 typedef signed char int8_t; 655 typedef signed char int8_t;
602 typedef unsigned char uint8_t; 656 typedef unsigned char uint8_t;
657 typedef signed char int_fast8_t;
658 typedef unsigned char uint_fast8_t;
603 typedef signed short int16_t; 659 typedef signed short int16_t;
604 typedef unsigned short uint16_t; 660 typedef unsigned short uint16_t;
661 typedef signed int int_fast16_t;
662 typedef unsigned int uint_fast16_t;
605 typedef signed int int32_t; 663 typedef signed int int32_t;
606 typedef unsigned int uint32_t; 664 typedef unsigned int uint32_t;
665 typedef signed int int_fast32_t;
666 typedef unsigned int uint_fast32_t;
607 #if __GNUC__ 667 #if __GNUC__
608 typedef signed long long int64_t; 668 typedef signed long long int64_t;
609 typedef unsigned long long uint64_t; 669 typedef unsigned long long uint64_t;
610 #else /* _MSC_VER || __BORLANDC__ */ 670 #else /* _MSC_VER || __BORLANDC__ */
611 typedef signed __int64 int64_t; 671 typedef signed __int64 int64_t;
612 typedef unsigned __int64 uint64_t; 672 typedef unsigned __int64 uint64_t;
613 #endif 673 #endif
674 typedef int64_t int_fast64_t;
675 typedef uint64_t uint_fast64_t;
614 #ifdef _WIN64 676 #ifdef _WIN64
615 #define ECB_PTRSIZE 8 677 #define ECB_PTRSIZE 8
616 typedef uint64_t uintptr_t; 678 typedef uint64_t uintptr_t;
617 typedef int64_t intptr_t; 679 typedef int64_t intptr_t;
618 #else 680 #else
… …
629 #endif 691 #endif
630#endif 692#endif
631 693
632#define ECB_GCC_AMD64 (__amd64 || __amd64__ || __x86_64 || __x86_64__) 694#define ECB_GCC_AMD64 (__amd64 || __amd64__ || __x86_64 || __x86_64__)
633#define ECB_MSVC_AMD64 (_M_AMD64 || _M_X64) 695#define ECB_MSVC_AMD64 (_M_AMD64 || _M_X64)
696
697#ifndef ECB_OPTIMIZE_SIZE
698 #if __OPTIMIZE_SIZE__
699 #define ECB_OPTIMIZE_SIZE 1
700 #else
701 #define ECB_OPTIMIZE_SIZE 0
702 #endif
703#endif
634 704
635/* work around x32 idiocy by defining proper macros */ 705/* work around x32 idiocy by defining proper macros */
636#if ECB_GCC_AMD64 || ECB_MSVC_AMD64 706#if ECB_GCC_AMD64 || ECB_MSVC_AMD64
637 #if _ILP32 707 #if _ILP32
638 #define ECB_AMD64_X32 1 708 #define ECB_AMD64_X32 1
… …
1145ecb_inline ecb_const uint32_t ecb_rotl32 (uint32_t x, unsigned int count) { return (x >> (32 - count)) | (x << count); } 1215ecb_inline ecb_const uint32_t ecb_rotl32 (uint32_t x, unsigned int count) { return (x >> (32 - count)) | (x << count); }
1146ecb_inline ecb_const uint32_t ecb_rotr32 (uint32_t x, unsigned int count) { return (x << (32 - count)) | (x >> count); } 1216ecb_inline ecb_const uint32_t ecb_rotr32 (uint32_t x, unsigned int count) { return (x << (32 - count)) | (x >> count); }
1147ecb_inline ecb_const uint64_t ecb_rotl64 (uint64_t x, unsigned int count) { return (x >> (64 - count)) | (x << count); } 1217ecb_inline ecb_const uint64_t ecb_rotl64 (uint64_t x, unsigned int count) { return (x >> (64 - count)) | (x << count); }
1148ecb_inline ecb_const uint64_t ecb_rotr64 (uint64_t x, unsigned int count) { return (x << (64 - count)) | (x >> count); } 1218ecb_inline ecb_const uint64_t ecb_rotr64 (uint64_t x, unsigned int count) { return (x << (64 - count)) | (x >> count); }
1149 1219
1220#if ECB_CPP
1221
1222inline uint8_t ecb_ctz (uint8_t v) { return ecb_ctz32 (v); }
1223inline uint16_t ecb_ctz (uint16_t v) { return ecb_ctz32 (v); }
1224inline uint32_t ecb_ctz (uint32_t v) { return ecb_ctz32 (v); }
1225inline uint64_t ecb_ctz (uint64_t v) { return ecb_ctz64 (v); }
1226
1227inline bool ecb_is_pot (uint8_t v) { return ecb_is_pot32 (v); }
1228inline bool ecb_is_pot (uint16_t v) { return ecb_is_pot32 (v); }
1229inline bool ecb_is_pot (uint32_t v) { return ecb_is_pot32 (v); }
1230inline bool ecb_is_pot (uint64_t v) { return ecb_is_pot64 (v); }
1231
1232inline int ecb_ld (uint8_t v) { return ecb_ld32 (v); }
1233inline int ecb_ld (uint16_t v) { return ecb_ld32 (v); }
1234inline int ecb_ld (uint32_t v) { return ecb_ld32 (v); }
1235inline int ecb_ld (uint64_t v) { return ecb_ld64 (v); }
1236
1237inline int ecb_popcount (uint8_t v) { return ecb_popcount32 (v); }
1238inline int ecb_popcount (uint16_t v) { return ecb_popcount32 (v); }
1239inline int ecb_popcount (uint32_t v) { return ecb_popcount32 (v); }
1240inline int ecb_popcount (uint64_t v) { return ecb_popcount64 (v); }
1241
1242inline uint8_t ecb_bitrev (uint8_t v) { return ecb_bitrev8 (v); }
1243inline uint16_t ecb_bitrev (uint16_t v) { return ecb_bitrev16 (v); }
1244inline uint32_t ecb_bitrev (uint32_t v) { return ecb_bitrev32 (v); }
1245
1246inline uint8_t ecb_rotl (uint8_t v, unsigned int count) { return ecb_rotl8 (v, count); }
1247inline uint16_t ecb_rotl (uint16_t v, unsigned int count) { return ecb_rotl16 (v, count); }
1248inline uint32_t ecb_rotl (uint32_t v, unsigned int count) { return ecb_rotl32 (v, count); }
1249inline uint64_t ecb_rotl (uint64_t v, unsigned int count) { return ecb_rotl64 (v, count); }
1250
1251inline uint8_t ecb_rotr (uint8_t v, unsigned int count) { return ecb_rotr8 (v, count); }
1252inline uint16_t ecb_rotr (uint16_t v, unsigned int count) { return ecb_rotr16 (v, count); }
1253inline uint32_t ecb_rotr (uint32_t v, unsigned int count) { return ecb_rotr32 (v, count); }
1254inline uint64_t ecb_rotr (uint64_t v, unsigned int count) { return ecb_rotr64 (v, count); }
1255
1256#endif
1257
1150#if ECB_GCC_VERSION(4,3) || (ECB_CLANG_BUILTIN(__builtin_bswap32) && ECB_CLANG_BUILTIN(__builtin_bswap64)) 1258#if ECB_GCC_VERSION(4,3) || (ECB_CLANG_BUILTIN(__builtin_bswap32) && ECB_CLANG_BUILTIN(__builtin_bswap64))
1151 #if ECB_GCC_VERSION(4,8) || ECB_CLANG_BUILTIN(__builtin_bswap16) 1259 #if ECB_GCC_VERSION(4,8) || ECB_CLANG_BUILTIN(__builtin_bswap16)
1152 #define ecb_bswap16(x) __builtin_bswap16 (x) 1260 #define ecb_bswap16(x) __builtin_bswap16 (x)
1153 #else 1261 #else
1154 #define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16) 1262 #define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)
… …
1225ecb_inline ecb_const ecb_bool ecb_big_endian (void); 1333ecb_inline ecb_const ecb_bool ecb_big_endian (void);
1226ecb_inline ecb_const ecb_bool ecb_big_endian (void) { return ecb_byteorder_helper () == 0x11223344; } 1334ecb_inline ecb_const ecb_bool ecb_big_endian (void) { return ecb_byteorder_helper () == 0x11223344; }
1227ecb_inline ecb_const ecb_bool ecb_little_endian (void); 1335ecb_inline ecb_const ecb_bool ecb_little_endian (void);
1228ecb_inline ecb_const ecb_bool ecb_little_endian (void) { return ecb_byteorder_helper () == 0x44332211; } 1336ecb_inline ecb_const ecb_bool ecb_little_endian (void) { return ecb_byteorder_helper () == 0x44332211; }
1229 1337
1338/*****************************************************************************/
1339/* unaligned load/store */
1340
1341ecb_inline uint_fast16_t ecb_be_u16_to_host (uint_fast16_t v) { return ecb_little_endian () ? ecb_bswap16 (v) : v; }
1342ecb_inline uint_fast32_t ecb_be_u32_to_host (uint_fast32_t v) { return ecb_little_endian () ? ecb_bswap32 (v) : v; }
1343ecb_inline uint_fast64_t ecb_be_u64_to_host (uint_fast64_t v) { return ecb_little_endian () ? ecb_bswap64 (v) : v; }
1344
1345ecb_inline uint_fast16_t ecb_le_u16_to_host (uint_fast16_t v) { return ecb_big_endian () ? ecb_bswap16 (v) : v; }
1346ecb_inline uint_fast32_t ecb_le_u32_to_host (uint_fast32_t v) { return ecb_big_endian () ? ecb_bswap32 (v) : v; }
1347ecb_inline uint_fast64_t ecb_le_u64_to_host (uint_fast64_t v) { return ecb_big_endian () ? ecb_bswap64 (v) : v; }
1348
1349ecb_inline uint_fast16_t ecb_peek_u16_u (const void *ptr) { uint16_t v; memcpy (&v, ptr, sizeof (v)); return v; }
1350ecb_inline uint_fast32_t ecb_peek_u32_u (const void *ptr) { uint32_t v; memcpy (&v, ptr, sizeof (v)); return v; }
1351ecb_inline uint_fast64_t ecb_peek_u64_u (const void *ptr) { uint64_t v; memcpy (&v, ptr, sizeof (v)); return v; }
1352
1353ecb_inline uint_fast16_t ecb_peek_be_u16_u (const void *ptr) { return ecb_be_u16_to_host (ecb_peek_u16_u (ptr)); }
1354ecb_inline uint_fast32_t ecb_peek_be_u32_u (const void *ptr) { return ecb_be_u32_to_host (ecb_peek_u32_u (ptr)); }
1355ecb_inline uint_fast64_t ecb_peek_be_u64_u (const void *ptr) { return ecb_be_u64_to_host (ecb_peek_u64_u (ptr)); }
1356
1357ecb_inline uint_fast16_t ecb_peek_le_u16_u (const void *ptr) { return ecb_le_u16_to_host (ecb_peek_u16_u (ptr)); }
1358ecb_inline uint_fast32_t ecb_peek_le_u32_u (const void *ptr) { return ecb_le_u32_to_host (ecb_peek_u32_u (ptr)); }
1359ecb_inline uint_fast64_t ecb_peek_le_u64_u (const void *ptr) { return ecb_le_u64_to_host (ecb_peek_u64_u (ptr)); }
1360
1361ecb_inline uint_fast16_t ecb_host_to_be_u16 (uint_fast16_t v) { return ecb_little_endian () ? ecb_bswap16 (v) : v; }
1362ecb_inline uint_fast32_t ecb_host_to_be_u32 (uint_fast32_t v) { return ecb_little_endian () ? ecb_bswap32 (v) : v; }
1363ecb_inline uint_fast64_t ecb_host_to_be_u64 (uint_fast64_t v) { return ecb_little_endian () ? ecb_bswap64 (v) : v; }
1364
1365ecb_inline uint_fast16_t ecb_host_to_le_u16 (uint_fast16_t v) { return ecb_big_endian () ? ecb_bswap16 (v) : v; }
1366ecb_inline uint_fast32_t ecb_host_to_le_u32 (uint_fast32_t v) { return ecb_big_endian () ? ecb_bswap32 (v) : v; }
1367ecb_inline uint_fast64_t ecb_host_to_le_u64 (uint_fast64_t v) { return ecb_big_endian () ? ecb_bswap64 (v) : v; }
1368
1369ecb_inline void ecb_poke_u16_u (void *ptr, uint16_t v) { memcpy (ptr, &v, sizeof (v)); }
1370ecb_inline void ecb_poke_u32_u (void *ptr, uint32_t v) { memcpy (ptr, &v, sizeof (v)); }
1371ecb_inline void ecb_poke_u64_u (void *ptr, uint64_t v) { memcpy (ptr, &v, sizeof (v)); }
1372
1373ecb_inline void ecb_poke_be_u16_u (void *ptr, uint_fast16_t v) { ecb_poke_u16_u (ptr, ecb_host_to_be_u16 (v)); }
1374ecb_inline void ecb_poke_be_u32_u (void *ptr, uint_fast32_t v) { ecb_poke_u32_u (ptr, ecb_host_to_be_u32 (v)); }
1375ecb_inline void ecb_poke_be_u64_u (void *ptr, uint_fast64_t v) { ecb_poke_u64_u (ptr, ecb_host_to_be_u64 (v)); }
1376
1377ecb_inline void ecb_poke_le_u16_u (void *ptr, uint_fast16_t v) { ecb_poke_u16_u (ptr, ecb_host_to_le_u16 (v)); }
1378ecb_inline void ecb_poke_le_u32_u (void *ptr, uint_fast32_t v) { ecb_poke_u32_u (ptr, ecb_host_to_le_u32 (v)); }
1379ecb_inline void ecb_poke_le_u64_u (void *ptr, uint_fast64_t v) { ecb_poke_u64_u (ptr, ecb_host_to_le_u64 (v)); }
1380
1381#if ECB_CPP
1382
1383inline uint8_t ecb_bswap (uint8_t v) { return v; }
1384inline uint16_t ecb_bswap (uint16_t v) { return ecb_bswap16 (v); }
1385inline uint32_t ecb_bswap (uint32_t v) { return ecb_bswap32 (v); }
1386inline uint64_t ecb_bswap (uint64_t v) { return ecb_bswap64 (v); }
1387
1388template<typename T> inline T ecb_be_to_host (T v) { return ecb_little_endian () ? ecb_bswap (v) : v; }
1389template<typename T> inline T ecb_le_to_host (T v) { return ecb_big_endian () ? ecb_bswap (v) : v; }
1390template<typename T> inline T ecb_peek (const void *ptr) { return *(const T *)ptr; }
1391template<typename T> inline T ecb_peek_be (const void *ptr) { return ecb_be_to_host (ecb_peek <T> (ptr)); }
1392template<typename T> inline T ecb_peek_le (const void *ptr) { return ecb_le_to_host (ecb_peek <T> (ptr)); }
1393template<typename T> inline T ecb_peek_u (const void *ptr) { T v; memcpy (&v, ptr, sizeof (v)); return v; }
1394template<typename T> inline T ecb_peek_be_u (const void *ptr) { return ecb_be_to_host (ecb_peek_u<T> (ptr)); }
1395template<typename T> inline T ecb_peek_le_u (const void *ptr) { return ecb_le_to_host (ecb_peek_u<T> (ptr)); }
1396
1397template<typename T> inline T ecb_host_to_be (T v) { return ecb_little_endian () ? ecb_bswap (v) : v; }
1398template<typename T> inline T ecb_host_to_le (T v) { return ecb_big_endian () ? ecb_bswap (v) : v; }
1399template<typename T> inline void ecb_poke (void *ptr, T v) { *(T *)ptr = v; }
1400template<typename T> inline void ecb_poke_be (void *ptr, T v) { return ecb_poke <T> (ptr, ecb_host_to_be (v)); }
1401template<typename T> inline void ecb_poke_le (void *ptr, T v) { return ecb_poke <T> (ptr, ecb_host_to_le (v)); }
1402template<typename T> inline void ecb_poke_u (void *ptr, T v) { memcpy (ptr, &v, sizeof (v)); }
1403template<typename T> inline void ecb_poke_be_u (void *ptr, T v) { return ecb_poke_u<T> (ptr, ecb_host_to_be (v)); }
1404template<typename T> inline void ecb_poke_le_u (void *ptr, T v) { return ecb_poke_u<T> (ptr, ecb_host_to_le (v)); }
1405
1406#endif
1407
1408/*****************************************************************************/
1409
1230#if ECB_GCC_VERSION(3,0) || ECB_C99 1410#if ECB_GCC_VERSION(3,0) || ECB_C99
1231 #define ecb_mod(m,n) ((m) % (n) + ((m) % (n) < 0 ? (n) : 0)) 1411 #define ecb_mod(m,n) ((m) % (n) + ((m) % (n) < 0 ? (n) : 0))
1232#else 1412#else
1233 #define ecb_mod(m,n) ((m) < 0 ? ((n) - 1 - ((-1 - (m)) % (n))) : ((m) % (n))) 1413 #define ecb_mod(m,n) ((m) < 0 ? ((n) - 1 - ((-1 - (m)) % (n))) : ((m) % (n)))
1234#endif 1414#endif
… …
1257 return N; 1437 return N;
1258 } 1438 }
1259#else 1439#else
1260 #define ecb_array_length(name) (sizeof (name) / sizeof (name [0])) 1440 #define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))
1261#endif 1441#endif
1442
1443/*****************************************************************************/
1262 1444
1263ecb_function_ ecb_const uint32_t ecb_binary16_to_binary32 (uint32_t x); 1445ecb_function_ ecb_const uint32_t ecb_binary16_to_binary32 (uint32_t x);
1264ecb_function_ ecb_const uint32_t 1446ecb_function_ ecb_const uint32_t
1265ecb_binary16_to_binary32 (uint32_t x) 1447ecb_binary16_to_binary32 (uint32_t x)
1266{ 1448{
… …
1375 || defined __sh__ \ 1557 || defined __sh__ \
1376 || defined _M_IX86 || defined ECB_MSVC_AMD64 || defined _M_IA64 \ 1558 || defined _M_IX86 || defined ECB_MSVC_AMD64 || defined _M_IA64 \
1377 || (defined __arm__ && (defined __ARM_EABI__ || defined __EABI__ || defined __VFP_FP__ || defined _WIN32_WCE || defined __ANDROID__)) \ 1559 || (defined __arm__ && (defined __ARM_EABI__ || defined __EABI__ || defined __VFP_FP__ || defined _WIN32_WCE || defined __ANDROID__)) \
1378 || defined __aarch64__ 1560 || defined __aarch64__
1379 #define ECB_STDFP 1 1561 #define ECB_STDFP 1
1380 #include <string.h> /* for memcpy */
1381#else 1562#else
1382 #define ECB_STDFP 0 1563 #define ECB_STDFP 0
1383#endif 1564#endif
1384 1565
1385#ifndef ECB_NO_LIBM 1566#ifndef ECB_NO_LIBM
… …
1607 * our syscalls return < 0, not == -1, on error. which is good 1788 * our syscalls return < 0, not == -1, on error. which is good
1608 * enough for linux aio. 1789 * enough for linux aio.
1609 * TODO: arm is also common nowadays, maybe even mips and x86 1790 * TODO: arm is also common nowadays, maybe even mips and x86
1610 * TODO: after implementing this, it suddenly looks like overkill, but its hard to remove... 1791 * TODO: after implementing this, it suddenly looks like overkill, but its hard to remove...
1611 */ 1792 */
1612#if __GNUC__ && __linux && ECB_AMD64 && !defined __OPTIMIZE_SIZE__ 1793#if __GNUC__ && __linux && ECB_AMD64 && !EV_FEATURE_CODE
1613 /* the costly errno access probably kills this for size optimisation */ 1794 /* the costly errno access probably kills this for size optimisation */
1614 1795
1615 #define ev_syscall(nr,narg,arg1,arg2,arg3,arg4,arg5,arg6) \ 1796 #define ev_syscall(nr,narg,arg1,arg2,arg3,arg4,arg5,arg6) \
1616 ({ \ 1797 ({ \
1617 long res; \ 1798 long res; \
… …
1726 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 10000000000000000000. : 1000000000.; 1907 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 10000000000000000000. : 1000000000.;
1727#else 1908#else
1728 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 18446744073709551616. : 4294967296.; 1909 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 18446744073709551616. : 4294967296.;
1729#endif 1910#endif
1730 1911
1912 /* special treatment for negative arguments */
1913 if (ecb_expect_false (v < 0.))
1914 {
1915 ev_tstamp f = -ev_floor (-v);
1916
1917 return f - (f == v ? 0 : 1);
1918 }
1919
1731 /* argument too large for an unsigned long? */ 1920 /* argument too large for an unsigned long? then reduce it */
1732 if (ecb_expect_false (v >= shift)) 1921 if (ecb_expect_false (v >= shift))
1733 { 1922 {
1734 ev_tstamp f; 1923 ev_tstamp f;
1735 1924
1736 if (v == v - 1.) 1925 if (v == v - 1.)
1737 return v; /* very large number */ 1926 return v; /* very large numbers are assumed to be integer */
1738 1927
1739 f = shift * ev_floor (v * (1. / shift)); 1928 f = shift * ev_floor (v * (1. / shift));
1740 return f + ev_floor (v - f); 1929 return f + ev_floor (v - f);
1741 }
1742
1743 /* special treatment for negative args? */
1744 if (ecb_expect_false (v < 0.))
1745 {
1746 ev_tstamp f = -ev_floor (-v);
1747
1748 return f - (f == v ? 0 : 1);
1749 } 1930 }
1750 1931
1751 /* fits into an unsigned long */ 1932 /* fits into an unsigned long */
1752 return (unsigned long)v; 1933 return (unsigned long)v;
1753} 1934}
… …
1961 static struct ev_loop default_loop_struct; 2142 static struct ev_loop default_loop_struct;
1962 EV_API_DECL struct ev_loop *ev_default_loop_ptr = 0; /* needs to be initialised to make it a definition despite extern */ 2143 EV_API_DECL struct ev_loop *ev_default_loop_ptr = 0; /* needs to be initialised to make it a definition despite extern */
1963 2144
1964#else 2145#else
1965 2146
1966 EV_API_DECL ev_tstamp ev_rt_now = 0; /* needs to be initialised to make it a definition despite extern */ 2147 EV_API_DECL ev_tstamp ev_rt_now = EV_TS_CONST (0.); /* needs to be initialised to make it a definition despite extern */
1967 #define VAR(name,decl) static decl; 2148 #define VAR(name,decl) static decl;
1968 #include "ev_vars.h" 2149 #include "ev_vars.h"
1969 #undef VAR 2150 #undef VAR
1970 2151
1971 static int ev_default_loop_ptr; 2152 static int ev_default_loop_ptr;
… …
1993#if EV_USE_REALTIME 2174#if EV_USE_REALTIME
1994 if (ecb_expect_true (have_realtime)) 2175 if (ecb_expect_true (have_realtime))
1995 { 2176 {
1996 struct timespec ts; 2177 struct timespec ts;
1997 clock_gettime (CLOCK_REALTIME, &ts); 2178 clock_gettime (CLOCK_REALTIME, &ts);
1998 return ts.tv_sec + ts.tv_nsec * 1e-9; 2179 return EV_TS_GET (ts);
1999 } 2180 }
2000#endif 2181#endif
2001 2182
2183 {
2002 struct timeval tv; 2184 struct timeval tv;
2003 gettimeofday (&tv, 0); 2185 gettimeofday (&tv, 0);
2004 return tv.tv_sec + tv.tv_usec * 1e-6; 2186 return EV_TV_GET (tv);
2187 }
2005} 2188}
2006#endif 2189#endif
2007 2190
2008inline_size ev_tstamp 2191inline_size ev_tstamp
2009get_clock (void) 2192get_clock (void)
… …
2011#if EV_USE_MONOTONIC 2194#if EV_USE_MONOTONIC
2012 if (ecb_expect_true (have_monotonic)) 2195 if (ecb_expect_true (have_monotonic))
2013 { 2196 {
2014 struct timespec ts; 2197 struct timespec ts;
2015 clock_gettime (CLOCK_MONOTONIC, &ts); 2198 clock_gettime (CLOCK_MONOTONIC, &ts);
2016 return ts.tv_sec + ts.tv_nsec * 1e-9; 2199 return EV_TS_GET (ts);
2017 } 2200 }
2018#endif 2201#endif
2019 2202
2020 return ev_time (); 2203 return ev_time ();
2021} 2204}
… …
2029#endif 2212#endif
2030 2213
2031void 2214void
2032ev_sleep (ev_tstamp delay) EV_NOEXCEPT 2215ev_sleep (ev_tstamp delay) EV_NOEXCEPT
2033{ 2216{
2034 if (delay > 0.) 2217 if (delay > EV_TS_CONST (0.))
2035 { 2218 {
2036#if EV_USE_NANOSLEEP 2219#if EV_USE_NANOSLEEP
2037 struct timespec ts; 2220 struct timespec ts;
2038 2221
2039 EV_TS_SET (ts, delay); 2222 EV_TS_SET (ts, delay);
2040 nanosleep (&ts, 0); 2223 nanosleep (&ts, 0);
2041#elif defined _WIN32 2224#elif defined _WIN32
2042 /* maybe this should round up, as ms is very low resolution */ 2225 /* maybe this should round up, as ms is very low resolution */
2043 /* compared to select (µs) or nanosleep (ns) */ 2226 /* compared to select (µs) or nanosleep (ns) */
2044 Sleep ((unsigned long)(delay * 1e3)); 2227 Sleep ((unsigned long)(EV_TS_TO_MSEC (delay)));
2045#else 2228#else
2046 struct timeval tv; 2229 struct timeval tv;
2047 2230
2048 /* here we rely on sys/time.h + sys/types.h + unistd.h providing select */ 2231 /* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
2049 /* something not guaranteed by newer posix versions, but guaranteed */ 2232 /* something not guaranteed by newer posix versions, but guaranteed */
… …
2209inline_size void 2392inline_size void
2210fd_reify (EV_P) 2393fd_reify (EV_P)
2211{ 2394{
2212 int i; 2395 int i;
2213 2396
2397 /* most backends do not modify the fdchanges list in backend_modfiy.
2398 * except io_uring, which has fixed-size buffers which might force us
2399 * to handle events in backend_modify, causing fdchanges to be amended,
2400 * which could result in an endless loop.
2401 * to avoid this, we do not dynamically handle fds that were added
2402 * during fd_reify. that means that for those backends, fdchangecnt
2403 * might be non-zero during poll, which must cause them to not block.
2404 * to not put too much of a burden on other backends, this detail
2405 * needs to be handled in the backend.
2406 */
2407 int changecnt = fdchangecnt;
2408
2214#if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP 2409#if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP
2215 for (i = 0; i < fdchangecnt; ++i) 2410 for (i = 0; i < changecnt; ++i)
2216 { 2411 {
2217 int fd = fdchanges [i]; 2412 int fd = fdchanges [i];
2218 ANFD *anfd = anfds + fd; 2413 ANFD *anfd = anfds + fd;
2219 2414
2220 if (anfd->reify & EV__IOFDSET && anfd->head) 2415 if (anfd->reify & EV__IOFDSET && anfd->head)
… …
2234 } 2429 }
2235 } 2430 }
2236 } 2431 }
2237#endif 2432#endif
2238 2433
2239 for (i = 0; i < fdchangecnt; ++i) 2434 for (i = 0; i < changecnt; ++i)
2240 { 2435 {
2241 int fd = fdchanges [i]; 2436 int fd = fdchanges [i];
2242 ANFD *anfd = anfds + fd; 2437 ANFD *anfd = anfds + fd;
2243 ev_io *w; 2438 ev_io *w;
2244 2439
… …
2260 2455
2261 if (o_reify & EV__IOFDSET) 2456 if (o_reify & EV__IOFDSET)
2262 backend_modify (EV_A_ fd, o_events, anfd->events); 2457 backend_modify (EV_A_ fd, o_events, anfd->events);
2263 } 2458 }
2264 2459
2460 /* normally, fdchangecnt hasn't changed. if it has, then new fds have been added.
2461 * this is a rare case (see beginning comment in this function), so we copy them to the
2462 * front and hope the backend handles this case.
2463 */
2464 if (ecb_expect_false (fdchangecnt != changecnt))
2465 memmove (fdchanges, fdchanges + changecnt, (fdchangecnt - changecnt) * sizeof (*fdchanges));
2466
2265 fdchangecnt = 0; 2467 fdchangecnt -= changecnt;
2266} 2468}
2267 2469
2268/* something about the given fd changed */ 2470/* something about the given fd changed */
2269inline_size 2471inline_size
2270void 2472void
2271fd_change (EV_P_ int fd, int flags) 2473fd_change (EV_P_ int fd, int flags)
2272{ 2474{
2273 unsigned char reify = anfds [fd].reify; 2475 unsigned char reify = anfds [fd].reify;
2274 anfds [fd].reify |= flags; 2476 anfds [fd].reify = reify | flags;
2275 2477
2276 if (ecb_expect_true (!reify)) 2478 if (ecb_expect_true (!reify))
2277 { 2479 {
2278 ++fdchangecnt; 2480 ++fdchangecnt;
2279 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, array_needsize_noinit); 2481 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, array_needsize_noinit);
… …
2399 2601
2400 /* find minimum child */ 2602 /* find minimum child */
2401 if (ecb_expect_true (pos + DHEAP - 1 < E)) 2603 if (ecb_expect_true (pos + DHEAP - 1 < E))
2402 { 2604 {
2403 /* fast path */ (minpos = pos + 0), (minat = ANHE_at (*minpos)); 2605 /* fast path */ (minpos = pos + 0), (minat = ANHE_at (*minpos));
2404 if ( ANHE_at (pos [1]) < minat) (minpos = pos + 1), (minat = ANHE_at (*minpos)); 2606 if ( minat > ANHE_at (pos [1])) (minpos = pos + 1), (minat = ANHE_at (*minpos));
2405 if ( ANHE_at (pos [2]) < minat) (minpos = pos + 2), (minat = ANHE_at (*minpos)); 2607 if ( minat > ANHE_at (pos [2])) (minpos = pos + 2), (minat = ANHE_at (*minpos));
2406 if ( ANHE_at (pos [3]) < minat) (minpos = pos + 3), (minat = ANHE_at (*minpos)); 2608 if ( minat > ANHE_at (pos [3])) (minpos = pos + 3), (minat = ANHE_at (*minpos));
2407 } 2609 }
2408 else if (pos < E) 2610 else if (pos < E)
2409 { 2611 {
2410 /* slow path */ (minpos = pos + 0), (minat = ANHE_at (*minpos)); 2612 /* slow path */ (minpos = pos + 0), (minat = ANHE_at (*minpos));
2411 if (pos + 1 < E && ANHE_at (pos [1]) < minat) (minpos = pos + 1), (minat = ANHE_at (*minpos)); 2613 if (pos + 1 < E && minat > ANHE_at (pos [1])) (minpos = pos + 1), (minat = ANHE_at (*minpos));
2412 if (pos + 2 < E && ANHE_at (pos [2]) < minat) (minpos = pos + 2), (minat = ANHE_at (*minpos)); 2614 if (pos + 2 < E && minat > ANHE_at (pos [2])) (minpos = pos + 2), (minat = ANHE_at (*minpos));
2413 if (pos + 3 < E && ANHE_at (pos [3]) < minat) (minpos = pos + 3), (minat = ANHE_at (*minpos)); 2615 if (pos + 3 < E && minat > ANHE_at (pos [3])) (minpos = pos + 3), (minat = ANHE_at (*minpos));
2414 } 2616 }
2415 else 2617 else
2416 break; 2618 break;
2417 2619
2418 if (ANHE_at (he) <= minat) 2620 if (ANHE_at (he) <= minat)
… …
2426 2628
2427 heap [k] = he; 2629 heap [k] = he;
2428 ev_active (ANHE_w (he)) = k; 2630 ev_active (ANHE_w (he)) = k;
2429} 2631}
2430 2632
2431#else /* 4HEAP */ 2633#else /* not 4HEAP */
2432 2634
2433#define HEAP0 1 2635#define HEAP0 1
2434#define HPARENT(k) ((k) >> 1) 2636#define HPARENT(k) ((k) >> 1)
2435#define UPHEAP_DONE(p,k) (!(p)) 2637#define UPHEAP_DONE(p,k) (!(p))
2436 2638
… …
2508 upheap (heap, i + HEAP0); 2710 upheap (heap, i + HEAP0);
2509} 2711}
2510 2712
2511/*****************************************************************************/ 2713/*****************************************************************************/
2512 2714
2513/* associate signal watchers to a signal signal */ 2715/* associate signal watchers to a signal */
2514typedef struct 2716typedef struct
2515{ 2717{
2516 EV_ATOMIC_T pending; 2718 EV_ATOMIC_T pending;
2517#if EV_MULTIPLICITY 2719#if EV_MULTIPLICITY
2518 EV_P; 2720 EV_P;
… …
2822 3024
2823#endif 3025#endif
2824 3026
2825/*****************************************************************************/ 3027/*****************************************************************************/
2826 3028
3029#if EV_USE_TIMERFD
3030
3031static void periodics_reschedule (EV_P);
3032
3033static void
3034timerfdcb (EV_P_ ev_io *iow, int revents)
3035{
3036 struct itimerspec its = { 0 };
3037
3038 its.it_value.tv_sec = ev_rt_now + (int)MAX_BLOCKTIME2;
3039 timerfd_settime (timerfd, TFD_TIMER_ABSTIME | TFD_TIMER_CANCEL_ON_SET, &its, 0);
3040
3041 ev_rt_now = ev_time ();
3042 /* periodics_reschedule only needs ev_rt_now */
3043 /* but maybe in the future we want the full treatment. */
3044 /*
3045 now_floor = EV_TS_CONST (0.);
3046 time_update (EV_A_ EV_TSTAMP_HUGE);
3047 */
3048#if EV_PERIODIC_ENABLE
3049 periodics_reschedule (EV_A);
3050#endif
3051}
3052
3053ecb_noinline ecb_cold
3054static void
3055evtimerfd_init (EV_P)
3056{
3057 if (!ev_is_active (&timerfd_w))
3058 {
3059 timerfd = timerfd_create (CLOCK_REALTIME, TFD_NONBLOCK | TFD_CLOEXEC);
3060
3061 if (timerfd >= 0)
3062 {
3063 fd_intern (timerfd); /* just to be sure */
3064
3065 ev_io_init (&timerfd_w, timerfdcb, timerfd, EV_READ);
3066 ev_set_priority (&timerfd_w, EV_MINPRI);
3067 ev_io_start (EV_A_ &timerfd_w);
3068 ev_unref (EV_A); /* watcher should not keep loop alive */
3069
3070 /* (re-) arm timer */
3071 timerfdcb (EV_A_ 0, 0);
3072 }
3073 }
3074}
3075
3076#endif
3077
3078/*****************************************************************************/
3079
2827#if EV_USE_IOCP 3080#if EV_USE_IOCP
2828# include "ev_iocp.c" 3081# include "ev_iocp.c"
2829#endif 3082#endif
2830#if EV_USE_PORT 3083#if EV_USE_PORT
2831# include "ev_port.c" 3084# include "ev_port.c"
… …
2877unsigned int 3130unsigned int
2878ev_supported_backends (void) EV_NOEXCEPT 3131ev_supported_backends (void) EV_NOEXCEPT
2879{ 3132{
2880 unsigned int flags = 0; 3133 unsigned int flags = 0;
2881 3134
2882 if (EV_USE_PORT ) flags |= EVBACKEND_PORT; 3135 if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
2883 if (EV_USE_KQUEUE ) flags |= EVBACKEND_KQUEUE; 3136 if (EV_USE_KQUEUE ) flags |= EVBACKEND_KQUEUE;
2884 if (EV_USE_EPOLL ) flags |= EVBACKEND_EPOLL; 3137 if (EV_USE_EPOLL ) flags |= EVBACKEND_EPOLL;
2885 if (EV_USE_LINUXAIO) flags |= EVBACKEND_LINUXAIO; 3138 if (EV_USE_LINUXAIO ) flags |= EVBACKEND_LINUXAIO;
2886 if (EV_USE_IOURING ) flags |= EVBACKEND_IOURING; 3139 if (EV_USE_IOURING && ev_linux_version () >= 0x050601) flags |= EVBACKEND_IOURING; /* 5.6.1+ */
2887 if (EV_USE_POLL ) flags |= EVBACKEND_POLL; 3140 if (EV_USE_POLL ) flags |= EVBACKEND_POLL;
2888 if (EV_USE_SELECT ) flags |= EVBACKEND_SELECT; 3141 if (EV_USE_SELECT ) flags |= EVBACKEND_SELECT;
2889 3142
2890 return flags; 3143 return flags;
2891} 3144}
2892 3145
2893ecb_cold 3146ecb_cold
2894unsigned int 3147unsigned int
… …
2924 3177
2925ecb_cold 3178ecb_cold
2926unsigned int 3179unsigned int
2927ev_embeddable_backends (void) EV_NOEXCEPT 3180ev_embeddable_backends (void) EV_NOEXCEPT
2928{ 3181{
2929 int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT; 3182 int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT | EVBACKEND_IOURING;
2930 3183
2931 /* epoll embeddability broken on all linux versions up to at least 2.6.23 */ 3184 /* epoll embeddability broken on all linux versions up to at least 2.6.23 */
2932 if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */ 3185 if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */
2933 flags &= ~EVBACKEND_EPOLL; 3186 flags &= ~EVBACKEND_EPOLL;
2934 3187
2935 /* EVBACKEND_LINUXAIO is theoretically embeddable, but suffers from a performance overhead */ 3188 /* EVBACKEND_LINUXAIO is theoretically embeddable, but suffers from a performance overhead */
2936
2937 /* EVBACKEND_IOURING is practically embeddable, but the current implementation is not
2938 * because our backend_fd is the epoll fd we need as fallback.
2939 * if the kernel ever is fixed, this might change...
2940 */
2941 3189
2942 return flags; 3190 return flags;
2943} 3191}
2944 3192
2945unsigned int 3193unsigned int
… …
3063 fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2; 3311 fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
3064#endif 3312#endif
3065#if EV_USE_SIGNALFD 3313#if EV_USE_SIGNALFD
3066 sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1; 3314 sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
3067#endif 3315#endif
3316#if EV_USE_TIMERFD
3317 timerfd = flags & EVFLAG_NOTIMERFD ? -1 : -2;
3318#endif
3068 3319
3069 if (!(flags & EVBACKEND_MASK)) 3320 if (!(flags & EVBACKEND_MASK))
3070 flags |= ev_recommended_backends (); 3321 flags |= ev_recommended_backends ();
3071 3322
3072#if EV_USE_IOCP 3323#if EV_USE_IOCP
… …
3143 } 3394 }
3144 3395
3145#if EV_USE_SIGNALFD 3396#if EV_USE_SIGNALFD
3146 if (ev_is_active (&sigfd_w)) 3397 if (ev_is_active (&sigfd_w))
3147 close (sigfd); 3398 close (sigfd);
3399#endif
3400
3401#if EV_USE_TIMERFD
3402 if (ev_is_active (&timerfd_w))
3403 close (timerfd);
3148#endif 3404#endif
3149 3405
3150#if EV_USE_INOTIFY 3406#if EV_USE_INOTIFY
3151 if (fs_fd >= 0) 3407 if (fs_fd >= 0)
3152 close (fs_fd); 3408 close (fs_fd);
… …
3245#endif 3501#endif
3246#if EV_USE_INOTIFY 3502#if EV_USE_INOTIFY
3247 infy_fork (EV_A); 3503 infy_fork (EV_A);
3248#endif 3504#endif
3249 3505
3506 if (postfork != 2)
3507 {
3508 #if EV_USE_SIGNALFD
3509 /* surprisingly, nothing needs to be done for signalfd, accoridng to docs, it does the right thing on fork */
3510 #endif
3511
3512 #if EV_USE_TIMERFD
3513 if (ev_is_active (&timerfd_w))
3514 {
3515 ev_ref (EV_A);
3516 ev_io_stop (EV_A_ &timerfd_w);
3517
3518 close (timerfd);
3519 timerfd = -2;
3520
3521 evtimerfd_init (EV_A);
3522 /* reschedule periodics, in case we missed something */
3523 ev_feed_event (EV_A_ &timerfd_w, EV_CUSTOM);
3524 }
3525 #endif
3526
3250#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE 3527 #if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
3251 if (ev_is_active (&pipe_w) && postfork != 2) 3528 if (ev_is_active (&pipe_w))
3252 { 3529 {
3253 /* pipe_write_wanted must be false now, so modifying fd vars should be safe */ 3530 /* pipe_write_wanted must be false now, so modifying fd vars should be safe */
3254 3531
3255 ev_ref (EV_A); 3532 ev_ref (EV_A);
3256 ev_io_stop (EV_A_ &pipe_w); 3533 ev_io_stop (EV_A_ &pipe_w);
3257 3534
3258 if (evpipe [0] >= 0) 3535 if (evpipe [0] >= 0)
3259 EV_WIN32_CLOSE_FD (evpipe [0]); 3536 EV_WIN32_CLOSE_FD (evpipe [0]);
3260 3537
3261 evpipe_init (EV_A); 3538 evpipe_init (EV_A);
3262 /* iterate over everything, in case we missed something before */ 3539 /* iterate over everything, in case we missed something before */
3263 ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM); 3540 ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
3541 }
3542 #endif
3264 } 3543 }
3265#endif
3266 3544
3267 postfork = 0; 3545 postfork = 0;
3268} 3546}
3269 3547
3270#if EV_MULTIPLICITY 3548#if EV_MULTIPLICITY
… …
3540 { 3818 {
3541 ev_at (w) += w->repeat; 3819 ev_at (w) += w->repeat;
3542 if (ev_at (w) < mn_now) 3820 if (ev_at (w) < mn_now)
3543 ev_at (w) = mn_now; 3821 ev_at (w) = mn_now;
3544 3822
3545 assert (("libev: negative ev_timer repeat value found while processing timers", w->repeat > 0.)); 3823 assert (("libev: negative ev_timer repeat value found while processing timers", w->repeat > EV_TS_CONST (0.)));
3546 3824
3547 ANHE_at_cache (timers [HEAP0]); 3825 ANHE_at_cache (timers [HEAP0]);
3548 downheap (timers, timercnt, HEAP0); 3826 downheap (timers, timercnt, HEAP0);
3549 } 3827 }
3550 else 3828 else
… …
3681 3959
3682 mn_now = get_clock (); 3960 mn_now = get_clock ();
3683 3961
3684 /* only fetch the realtime clock every 0.5*MIN_TIMEJUMP seconds */ 3962 /* only fetch the realtime clock every 0.5*MIN_TIMEJUMP seconds */
3685 /* interpolate in the meantime */ 3963 /* interpolate in the meantime */
3686 if (ecb_expect_true (mn_now - now_floor < MIN_TIMEJUMP * .5)) 3964 if (ecb_expect_true (mn_now - now_floor < EV_TS_CONST (MIN_TIMEJUMP * .5)))
3687 { 3965 {
3688 ev_rt_now = rtmn_diff + mn_now; 3966 ev_rt_now = rtmn_diff + mn_now;
3689 return; 3967 return;
3690 } 3968 }
3691 3969
… …
3705 ev_tstamp diff; 3983 ev_tstamp diff;
3706 rtmn_diff = ev_rt_now - mn_now; 3984 rtmn_diff = ev_rt_now - mn_now;
3707 3985
3708 diff = odiff - rtmn_diff; 3986 diff = odiff - rtmn_diff;
3709 3987
3710 if (ecb_expect_true ((diff < 0. ? -diff : diff) < MIN_TIMEJUMP)) 3988 if (ecb_expect_true ((diff < EV_TS_CONST (0.) ? -diff : diff) < EV_TS_CONST (MIN_TIMEJUMP)))
3711 return; /* all is well */ 3989 return; /* all is well */
3712 3990
3713 ev_rt_now = ev_time (); 3991 ev_rt_now = ev_time ();
3714 mn_now = get_clock (); 3992 mn_now = get_clock ();
3715 now_floor = mn_now; 3993 now_floor = mn_now;
… …
3724 else 4002 else
3725#endif 4003#endif
3726 { 4004 {
3727 ev_rt_now = ev_time (); 4005 ev_rt_now = ev_time ();
3728 4006
3729 if (ecb_expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + MIN_TIMEJUMP)) 4007 if (ecb_expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + EV_TS_CONST (MIN_TIMEJUMP)))
3730 { 4008 {
3731 /* adjust timers. this is easy, as the offset is the same for all of them */ 4009 /* adjust timers. this is easy, as the offset is the same for all of them */
3732 timers_reschedule (EV_A_ ev_rt_now - mn_now); 4010 timers_reschedule (EV_A_ ev_rt_now - mn_now);
3733#if EV_PERIODIC_ENABLE 4011#if EV_PERIODIC_ENABLE
3734 periodics_reschedule (EV_A); 4012 periodics_reschedule (EV_A);
… …
3803 4081
3804 /* remember old timestamp for io_blocktime calculation */ 4082 /* remember old timestamp for io_blocktime calculation */
3805 ev_tstamp prev_mn_now = mn_now; 4083 ev_tstamp prev_mn_now = mn_now;
3806 4084
3807 /* update time to cancel out callback processing overhead */ 4085 /* update time to cancel out callback processing overhead */
3808 time_update (EV_A_ 1e100); 4086 time_update (EV_A_ EV_TS_CONST (EV_TSTAMP_HUGE));
3809 4087
3810 /* from now on, we want a pipe-wake-up */ 4088 /* from now on, we want a pipe-wake-up */
3811 pipe_write_wanted = 1; 4089 pipe_write_wanted = 1;
3812 4090
3813 ECB_MEMORY_FENCE; /* make sure pipe_write_wanted is visible before we check for potential skips */ 4091 ECB_MEMORY_FENCE; /* make sure pipe_write_wanted is visible before we check for potential skips */
3814 4092
3815 if (ecb_expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt || pipe_write_skipped))) 4093 if (ecb_expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt || pipe_write_skipped)))
3816 { 4094 {
3817 waittime = MAX_BLOCKTIME; 4095 waittime = EV_TS_CONST (MAX_BLOCKTIME);
4096
4097#if EV_USE_TIMERFD
4098 /* sleep a lot longer when we can reliably detect timejumps */
4099 if (ecb_expect_true (timerfd >= 0))
4100 waittime = EV_TS_CONST (MAX_BLOCKTIME2);
4101#endif
4102#if !EV_PERIODIC_ENABLE
4103 /* without periodics but with monotonic clock there is no need */
4104 /* for any time jump detection, so sleep longer */
4105 if (ecb_expect_true (have_monotonic))
4106 waittime = EV_TS_CONST (MAX_BLOCKTIME2);
4107#endif
3818 4108
3819 if (timercnt) 4109 if (timercnt)
3820 { 4110 {
3821 ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now; 4111 ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now;
3822 if (waittime > to) waittime = to; 4112 if (waittime > to) waittime = to;
… …
3832 4122
3833 /* don't let timeouts decrease the waittime below timeout_blocktime */ 4123 /* don't let timeouts decrease the waittime below timeout_blocktime */
3834 if (ecb_expect_false (waittime < timeout_blocktime)) 4124 if (ecb_expect_false (waittime < timeout_blocktime))
3835 waittime = timeout_blocktime; 4125 waittime = timeout_blocktime;
3836 4126
3837 /* at this point, we NEED to wait, so we have to ensure */ 4127 /* now there are two more special cases left, either we have
3838 /* to pass a minimum nonzero value to the backend */ 4128 * already-expired timers, so we should not sleep, or we have timers
4129 * that expire very soon, in which case we need to wait for a minimum
4130 * amount of time for some event loop backends.
4131 */
3839 if (ecb_expect_false (waittime < backend_mintime)) 4132 if (ecb_expect_false (waittime < backend_mintime))
4133 waittime = waittime <= EV_TS_CONST (0.)
4134 ? EV_TS_CONST (0.)
3840 waittime = backend_mintime; 4135 : backend_mintime;
3841 4136
3842 /* extra check because io_blocktime is commonly 0 */ 4137 /* extra check because io_blocktime is commonly 0 */
3843 if (ecb_expect_false (io_blocktime)) 4138 if (ecb_expect_false (io_blocktime))
3844 { 4139 {
3845 sleeptime = io_blocktime - (mn_now - prev_mn_now); 4140 sleeptime = io_blocktime - (mn_now - prev_mn_now);
3846 4141
3847 if (sleeptime > waittime - backend_mintime) 4142 if (sleeptime > waittime - backend_mintime)
3848 sleeptime = waittime - backend_mintime; 4143 sleeptime = waittime - backend_mintime;
3849 4144
3850 if (ecb_expect_true (sleeptime > 0.)) 4145 if (ecb_expect_true (sleeptime > EV_TS_CONST (0.)))
3851 { 4146 {
3852 ev_sleep (sleeptime); 4147 ev_sleep (sleeptime);
3853 waittime -= sleeptime; 4148 waittime -= sleeptime;
3854 } 4149 }
3855 } 4150 }
… …
3929} 4224}
3930 4225
3931void 4226void
3932ev_now_update (EV_P) EV_NOEXCEPT 4227ev_now_update (EV_P) EV_NOEXCEPT
3933{ 4228{
3934 time_update (EV_A_ 1e100); 4229 time_update (EV_A_ EV_TSTAMP_HUGE);
3935} 4230}
3936 4231
3937void 4232void
3938ev_suspend (EV_P) EV_NOEXCEPT 4233ev_suspend (EV_P) EV_NOEXCEPT
3939{ 4234{
… …
4170} 4465}
4171 4466
4172ev_tstamp 4467ev_tstamp
4173ev_timer_remaining (EV_P_ ev_timer *w) EV_NOEXCEPT 4468ev_timer_remaining (EV_P_ ev_timer *w) EV_NOEXCEPT
4174{ 4469{
4175 return ev_at (w) - (ev_is_active (w) ? mn_now : 0.); 4470 return ev_at (w) - (ev_is_active (w) ? mn_now : EV_TS_CONST (0.));
4176} 4471}
4177 4472
4178#if EV_PERIODIC_ENABLE 4473#if EV_PERIODIC_ENABLE
4179ecb_noinline 4474ecb_noinline
4180void 4475void
4181ev_periodic_start (EV_P_ ev_periodic *w) EV_NOEXCEPT 4476ev_periodic_start (EV_P_ ev_periodic *w) EV_NOEXCEPT
4182{ 4477{
4183 if (ecb_expect_false (ev_is_active (w))) 4478 if (ecb_expect_false (ev_is_active (w)))
4184 return; 4479 return;
4480
4481#if EV_USE_TIMERFD
4482 if (timerfd == -2)
4483 evtimerfd_init (EV_A);
4484#endif
4185 4485
4186 if (w->reschedule_cb) 4486 if (w->reschedule_cb)
4187 ev_at (w) = w->reschedule_cb (w, ev_rt_now); 4487 ev_at (w) = w->reschedule_cb (w, ev_rt_now);
4188 else if (w->interval) 4488 else if (w->interval)
4189 { 4489 {
… …
4931 ev_run (EV_A_ EVRUN_NOWAIT); 5231 ev_run (EV_A_ EVRUN_NOWAIT);
4932 } 5232 }
4933 } 5233 }
4934} 5234}
4935 5235
5236#if EV_FORK_ENABLE
4936static void 5237static void
4937embed_fork_cb (EV_P_ ev_fork *fork_w, int revents) 5238embed_fork_cb (EV_P_ ev_fork *fork_w, int revents)
4938{ 5239{
4939 ev_embed *w = (ev_embed *)(((char *)fork_w) - offsetof (ev_embed, fork)); 5240 ev_embed *w = (ev_embed *)(((char *)fork_w) - offsetof (ev_embed, fork));
4940 5241
… …
4947 ev_run (EV_A_ EVRUN_NOWAIT); 5248 ev_run (EV_A_ EVRUN_NOWAIT);
4948 } 5249 }
4949 5250
4950 ev_embed_start (EV_A_ w); 5251 ev_embed_start (EV_A_ w);
4951} 5252}
5253#endif
4952 5254
4953#if 0 5255#if 0
4954static void 5256static void
4955embed_idle_cb (EV_P_ ev_idle *idle, int revents) 5257embed_idle_cb (EV_P_ ev_idle *idle, int revents)
4956{ 5258{
… …
4977 5279
4978 ev_prepare_init (&w->prepare, embed_prepare_cb); 5280 ev_prepare_init (&w->prepare, embed_prepare_cb);
4979 ev_set_priority (&w->prepare, EV_MINPRI); 5281 ev_set_priority (&w->prepare, EV_MINPRI);
4980 ev_prepare_start (EV_A_ &w->prepare); 5282 ev_prepare_start (EV_A_ &w->prepare);
4981 5283
5284#if EV_FORK_ENABLE
4982 ev_fork_init (&w->fork, embed_fork_cb); 5285 ev_fork_init (&w->fork, embed_fork_cb);
4983 ev_fork_start (EV_A_ &w->fork); 5286 ev_fork_start (EV_A_ &w->fork);
5287#endif
4984 5288
4985 /*ev_idle_init (&w->idle, e,bed_idle_cb);*/ 5289 /*ev_idle_init (&w->idle, e,bed_idle_cb);*/
4986 5290
4987 ev_start (EV_A_ (W)w, 1); 5291 ev_start (EV_A_ (W)w, 1);
4988 5292
… …
4998 5302
4999 EV_FREQUENT_CHECK; 5303 EV_FREQUENT_CHECK;
5000 5304
5001 ev_io_stop (EV_A_ &w->io); 5305 ev_io_stop (EV_A_ &w->io);
5002 ev_prepare_stop (EV_A_ &w->prepare); 5306 ev_prepare_stop (EV_A_ &w->prepare);
5307#if EV_FORK_ENABLE
5003 ev_fork_stop (EV_A_ &w->fork); 5308 ev_fork_stop (EV_A_ &w->fork);
5309#endif
5004 5310
5005 ev_stop (EV_A_ (W)w); 5311 ev_stop (EV_A_ (W)w);
5006 5312
5007 EV_FREQUENT_CHECK; 5313 EV_FREQUENT_CHECK;
5008} 5314}

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines