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

Comparing libev/ev.c (file contents):
Revision 1.492 by root, Sat Jun 22 16:25:53 2019 UTC vs.
Revision 1.501 by root, Mon Jul 1 21:47:42 2019 UTC

332# else 332# else
333# define EV_USE_LINUXAIO 0 333# define EV_USE_LINUXAIO 0
334# endif 334# endif
335#endif 335#endif
336 336
337#ifndef EV_USE_IOURING
338# if __linux
339# define EV_USE_IOURING 0
340# else
341# define EV_USE_IOURING 0
342# endif
343#endif
344
337#ifndef EV_USE_INOTIFY 345#ifndef EV_USE_INOTIFY
338# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4)) 346# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
339# define EV_USE_INOTIFY EV_FEATURE_OS 347# define EV_USE_INOTIFY EV_FEATURE_OS
340# else 348# else
341# define EV_USE_INOTIFY 0 349# define EV_USE_INOTIFY 0
396/* aix's poll.h seems to cause lots of trouble */ 404/* aix's poll.h seems to cause lots of trouble */
397#ifdef _AIX 405#ifdef _AIX
398/* AIX has a completely broken poll.h header */ 406/* AIX has a completely broken poll.h header */
399# undef EV_USE_POLL 407# undef EV_USE_POLL
400# define EV_USE_POLL 0 408# define EV_USE_POLL 0
401#endif
402
403#if EV_USE_LINUXAIO
404# include <linux/aio_abi.h> /* probably only needed for aio_context_t */
405#endif 409#endif
406 410
407/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */ 411/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */
408/* which makes programs even slower. might work on other unices, too. */ 412/* which makes programs even slower. might work on other unices, too. */
409#if EV_USE_CLOCK_SYSCALL 413#if EV_USE_CLOCK_SYSCALL
410# include <sys/syscall.h> 414# include <sys/syscall.h>
411# ifdef SYS_clock_gettime 415# ifdef SYS_clock_gettime
412# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts)) 416# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))
413# undef EV_USE_MONOTONIC 417# undef EV_USE_MONOTONIC
414# define EV_USE_MONOTONIC 1 418# define EV_USE_MONOTONIC 1
419# define EV_NEED_SYSCALL 1
415# else 420# else
416# undef EV_USE_CLOCK_SYSCALL 421# undef EV_USE_CLOCK_SYSCALL
417# define EV_USE_CLOCK_SYSCALL 0 422# define EV_USE_CLOCK_SYSCALL 0
418# endif 423# endif
419#endif 424#endif
442# endif 447# endif
443#endif 448#endif
444 449
445#if EV_USE_LINUXAIO 450#if EV_USE_LINUXAIO
446# include <sys/syscall.h> 451# include <sys/syscall.h>
447# if !SYS_io_getevents 452# if !SYS_io_getevents || !EV_USE_EPOLL /* ev_linxaio uses ev_poll.c:ev_epoll_create */
448# undef EV_USE_LINUXAIO 453# undef EV_USE_LINUXAIO
449# define EV_USE_LINUXAIO 0 454# define EV_USE_LINUXAIO 0
455# else
456# define EV_NEED_SYSCALL 1
457# endif
458#endif
459
460#if EV_USE_IOURING
461# include <sys/syscall.h>
462# if !__alpha && !SYS_io_uring_setup
463# define SYS_io_uring_setup 425
464# define SYS_io_uring_enter 426
465# define SYS_io_uring_wregister 427
466# endif
467# if SYS_io_uring_setup
468# define EV_NEED_SYSCALL 1
469# else
470# undef EV_USE_IOURING
471# define EV_USE_IOURING 0
450# endif 472# endif
451#endif 473#endif
452 474
453#if EV_USE_INOTIFY 475#if EV_USE_INOTIFY
454# include <sys/statfs.h> 476# include <sys/statfs.h>
496 uint32_t ssi_signo; 518 uint32_t ssi_signo;
497 char pad[128 - sizeof (uint32_t)]; 519 char pad[128 - sizeof (uint32_t)];
498}; 520};
499#endif 521#endif
500 522
501/**/ 523/*****************************************************************************/
524
525#if EV_NEED_SYSCALL
526
527#include <sys/syscall.h>
528
529/*
530 * define some syscall wrappers for common architectures
531 * this is mostly for nice looks during debugging, not performance.
532 * our syscalls return < 0, not == -1, on error. which is good
533 * enough for linux aio.
534 * TODO: arm is also common nowadays, maybe even mips and x86
535 * TODO: after implementing this, it suddenly looks like overkill, but its hard to remove...
536 */
537#if __GNUC__ && __linux && ECB_AMD64 && !defined __OPTIMIZE_SIZE__
538 /* the costly errno access probably kills this for size optimisation */
539
540 #define ev_syscall(nr,narg,arg1,arg2,arg3,arg4,arg5) \
541 ({ \
542 long res; \
543 register unsigned long r5 __asm__ ("r8" ); \
544 register unsigned long r4 __asm__ ("r10"); \
545 register unsigned long r3 __asm__ ("rdx"); \
546 register unsigned long r2 __asm__ ("rsi"); \
547 register unsigned long r1 __asm__ ("rdi"); \
548 if (narg >= 5) r5 = (unsigned long)(arg5); \
549 if (narg >= 4) r4 = (unsigned long)(arg4); \
550 if (narg >= 3) r3 = (unsigned long)(arg3); \
551 if (narg >= 2) r2 = (unsigned long)(arg2); \
552 if (narg >= 1) r1 = (unsigned long)(arg1); \
553 __asm__ __volatile__ ( \
554 "syscall\n\t" \
555 : "=a" (res) \
556 : "0" (nr), "r" (r1), "r" (r2), "r" (r3), "r" (r4), "r" (r5) \
557 : "cc", "r11", "cx", "memory"); \
558 errno = -res; \
559 res; \
560 })
561
562#endif
563
564#ifdef ev_syscall
565 #define ev_syscall0(nr) ev_syscall (nr, 0, 0, 0, 0, 0, 0
566 #define ev_syscall1(nr,arg1) ev_syscall (nr, 1, arg1, 0, 0, 0, 0)
567 #define ev_syscall2(nr,arg1,arg2) ev_syscall (nr, 2, arg1, arg2, 0, 0, 0)
568 #define ev_syscall3(nr,arg1,arg2,arg3) ev_syscall (nr, 3, arg1, arg2, arg3, 0, 0)
569 #define ev_syscall4(nr,arg1,arg2,arg3,arg4) ev_syscall (nr, 3, arg1, arg2, arg3, arg4, 0)
570 #define ev_syscall5(nr,arg1,arg2,arg3,arg4,arg5) ev_syscall (nr, 5, arg1, arg2, arg3, arg4, arg5)
571#else
572 #define ev_syscall0(nr) syscall (nr)
573 #define ev_syscall1(nr,arg1) syscall (nr, arg1)
574 #define ev_syscall2(nr,arg1,arg2) syscall (nr, arg1, arg2)
575 #define ev_syscall3(nr,arg1,arg2,arg3) syscall (nr, arg1, arg2, arg3)
576 #define ev_syscall4(nr,arg1,arg2,arg3,arg4) syscall (nr, arg1, arg2, arg3, arg4)
577 #define ev_syscall5(nr,arg1,arg2,arg3,arg4,arg5) syscall (nr, arg1, arg2, arg3, arg4, arg5)
578#endif
579
580#endif
581
582/*****************************************************************************/
502 583
503#if EV_VERIFY >= 3 584#if EV_VERIFY >= 3
504# define EV_FREQUENT_CHECK ev_verify (EV_A) 585# define EV_FREQUENT_CHECK ev_verify (EV_A)
505#else 586#else
506# define EV_FREQUENT_CHECK do { } while (0) 587# define EV_FREQUENT_CHECK do { } while (0)
563 644
564#ifndef ECB_H 645#ifndef ECB_H
565#define ECB_H 646#define ECB_H
566 647
567/* 16 bits major, 16 bits minor */ 648/* 16 bits major, 16 bits minor */
568#define ECB_VERSION 0x00010005 649#define ECB_VERSION 0x00010006
569 650
570#ifdef _WIN32 651#ifdef _WIN32
571 typedef signed char int8_t; 652 typedef signed char int8_t;
572 typedef unsigned char uint8_t; 653 typedef unsigned char uint8_t;
573 typedef signed short int16_t; 654 typedef signed short int16_t;
687 #include <intrin.h> /* fence functions _ReadBarrier, also bit search functions _BitScanReverse */ 768 #include <intrin.h> /* fence functions _ReadBarrier, also bit search functions _BitScanReverse */
688#endif 769#endif
689 770
690#ifndef ECB_MEMORY_FENCE 771#ifndef ECB_MEMORY_FENCE
691 #if ECB_GCC_VERSION(2,5) || defined __INTEL_COMPILER || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110 772 #if ECB_GCC_VERSION(2,5) || defined __INTEL_COMPILER || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
773 #define ECB_MEMORY_FENCE_RELAXED __asm__ __volatile__ ("" : : : "memory")
692 #if __i386 || __i386__ 774 #if __i386 || __i386__
693 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory") 775 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory")
694 #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory") 776 #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
695 #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("" : : : "memory") 777 #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("" : : : "memory")
696 #elif ECB_GCC_AMD64 778 #elif ECB_GCC_AMD64
746 #if ECB_GCC_VERSION(4,7) 828 #if ECB_GCC_VERSION(4,7)
747 /* see comment below (stdatomic.h) about the C11 memory model. */ 829 /* see comment below (stdatomic.h) about the C11 memory model. */
748 #define ECB_MEMORY_FENCE __atomic_thread_fence (__ATOMIC_SEQ_CST) 830 #define ECB_MEMORY_FENCE __atomic_thread_fence (__ATOMIC_SEQ_CST)
749 #define ECB_MEMORY_FENCE_ACQUIRE __atomic_thread_fence (__ATOMIC_ACQUIRE) 831 #define ECB_MEMORY_FENCE_ACQUIRE __atomic_thread_fence (__ATOMIC_ACQUIRE)
750 #define ECB_MEMORY_FENCE_RELEASE __atomic_thread_fence (__ATOMIC_RELEASE) 832 #define ECB_MEMORY_FENCE_RELEASE __atomic_thread_fence (__ATOMIC_RELEASE)
833 #define ECB_MEMORY_FENCE_RELAXED __atomic_thread_fence (__ATOMIC_RELAXED)
751 834
752 #elif ECB_CLANG_EXTENSION(c_atomic) 835 #elif ECB_CLANG_EXTENSION(c_atomic)
753 /* see comment below (stdatomic.h) about the C11 memory model. */ 836 /* see comment below (stdatomic.h) about the C11 memory model. */
754 #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST) 837 #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST)
755 #define ECB_MEMORY_FENCE_ACQUIRE __c11_atomic_thread_fence (__ATOMIC_ACQUIRE) 838 #define ECB_MEMORY_FENCE_ACQUIRE __c11_atomic_thread_fence (__ATOMIC_ACQUIRE)
756 #define ECB_MEMORY_FENCE_RELEASE __c11_atomic_thread_fence (__ATOMIC_RELEASE) 839 #define ECB_MEMORY_FENCE_RELEASE __c11_atomic_thread_fence (__ATOMIC_RELEASE)
840 #define ECB_MEMORY_FENCE_RELAXED __c11_atomic_thread_fence (__ATOMIC_RELAXED)
757 841
758 #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__ 842 #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__
759 #define ECB_MEMORY_FENCE __sync_synchronize () 843 #define ECB_MEMORY_FENCE __sync_synchronize ()
760 #elif _MSC_VER >= 1500 /* VC++ 2008 */ 844 #elif _MSC_VER >= 1500 /* VC++ 2008 */
761 /* apparently, microsoft broke all the memory barrier stuff in Visual Studio 2008... */ 845 /* apparently, microsoft broke all the memory barrier stuff in Visual Studio 2008... */
771 #elif defined _WIN32 855 #elif defined _WIN32
772 #include <WinNT.h> 856 #include <WinNT.h>
773 #define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */ 857 #define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */
774 #elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110 858 #elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
775 #include <mbarrier.h> 859 #include <mbarrier.h>
776 #define ECB_MEMORY_FENCE __machine_rw_barrier () 860 #define ECB_MEMORY_FENCE __machine_rw_barrier ()
777 #define ECB_MEMORY_FENCE_ACQUIRE __machine_r_barrier () 861 #define ECB_MEMORY_FENCE_ACQUIRE __machine_acq_barrier ()
778 #define ECB_MEMORY_FENCE_RELEASE __machine_w_barrier () 862 #define ECB_MEMORY_FENCE_RELEASE __machine_rel_barrier ()
863 #define ECB_MEMORY_FENCE_RELAXED __compiler_barrier ()
779 #elif __xlC__ 864 #elif __xlC__
780 #define ECB_MEMORY_FENCE __sync () 865 #define ECB_MEMORY_FENCE __sync ()
781 #endif 866 #endif
782#endif 867#endif
783 868
784#ifndef ECB_MEMORY_FENCE 869#ifndef ECB_MEMORY_FENCE
785 #if ECB_C11 && !defined __STDC_NO_ATOMICS__ 870 #if ECB_C11 && !defined __STDC_NO_ATOMICS__
786 /* we assume that these memory fences work on all variables/all memory accesses, */ 871 /* we assume that these memory fences work on all variables/all memory accesses, */
787 /* not just C11 atomics and atomic accesses */ 872 /* not just C11 atomics and atomic accesses */
788 #include <stdatomic.h> 873 #include <stdatomic.h>
789 /* Unfortunately, neither gcc 4.7 nor clang 3.1 generate any instructions for */
790 /* any fence other than seq_cst, which isn't very efficient for us. */
791 /* Why that is, we don't know - either the C11 memory model is quite useless */
792 /* for most usages, or gcc and clang have a bug */
793 /* I *currently* lean towards the latter, and inefficiently implement */
794 /* all three of ecb's fences as a seq_cst fence */
795 /* Update, gcc-4.8 generates mfence for all c++ fences, but nothing */
796 /* for all __atomic_thread_fence's except seq_cst */
797 #define ECB_MEMORY_FENCE atomic_thread_fence (memory_order_seq_cst) 874 #define ECB_MEMORY_FENCE atomic_thread_fence (memory_order_seq_cst)
875 #define ECB_MEMORY_FENCE_ACQUIRE atomic_thread_fence (memory_order_acquire)
876 #define ECB_MEMORY_FENCE_RELEASE atomic_thread_fence (memory_order_release)
798 #endif 877 #endif
799#endif 878#endif
800 879
801#ifndef ECB_MEMORY_FENCE 880#ifndef ECB_MEMORY_FENCE
802 #if !ECB_AVOID_PTHREADS 881 #if !ECB_AVOID_PTHREADS
820 #define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE 899 #define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE
821#endif 900#endif
822 901
823#if !defined ECB_MEMORY_FENCE_RELEASE && defined ECB_MEMORY_FENCE 902#if !defined ECB_MEMORY_FENCE_RELEASE && defined ECB_MEMORY_FENCE
824 #define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE 903 #define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE
904#endif
905
906#if !defined ECB_MEMORY_FENCE_RELAXED && defined ECB_MEMORY_FENCE
907 #define ECB_MEMORY_FENCE_RELAXED ECB_MEMORY_FENCE /* very heavy-handed */
825#endif 908#endif
826 909
827/*****************************************************************************/ 910/*****************************************************************************/
828 911
829#if ECB_CPP 912#if ECB_CPP
1538/* ECB.H END */ 1621/* ECB.H END */
1539 1622
1540#if ECB_MEMORY_FENCE_NEEDS_PTHREADS 1623#if ECB_MEMORY_FENCE_NEEDS_PTHREADS
1541/* if your architecture doesn't need memory fences, e.g. because it is 1624/* if your architecture doesn't need memory fences, e.g. because it is
1542 * single-cpu/core, or if you use libev in a project that doesn't use libev 1625 * single-cpu/core, or if you use libev in a project that doesn't use libev
1543 * from multiple threads, then you can define ECB_AVOID_PTHREADS when compiling 1626 * from multiple threads, then you can define ECB_NO_THREADS when compiling
1544 * libev, in which cases the memory fences become nops. 1627 * libev, in which cases the memory fences become nops.
1545 * alternatively, you can remove this #error and link against libpthread, 1628 * alternatively, you can remove this #error and link against libpthread,
1546 * which will then provide the memory fences. 1629 * which will then provide the memory fences.
1547 */ 1630 */
1548# error "memory fences not defined for your architecture, please report" 1631# error "memory fences not defined for your architecture, please report"
1552# define ECB_MEMORY_FENCE do { } while (0) 1635# define ECB_MEMORY_FENCE do { } while (0)
1553# define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE 1636# define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE
1554# define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE 1637# define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE
1555#endif 1638#endif
1556 1639
1557#define expect_false(cond) ecb_expect_false (cond)
1558#define expect_true(cond) ecb_expect_true (cond)
1559#define noinline ecb_noinline
1560
1561#define inline_size ecb_inline 1640#define inline_size ecb_inline
1562 1641
1563#if EV_FEATURE_CODE 1642#if EV_FEATURE_CODE
1564# define inline_speed ecb_inline 1643# define inline_speed ecb_inline
1565#else 1644#else
1566# define inline_speed noinline static 1645# define inline_speed ecb_noinline static
1567#endif 1646#endif
1568 1647
1569#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1) 1648#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
1570 1649
1571#if EV_MINPRI == EV_MAXPRI 1650#if EV_MINPRI == EV_MAXPRI
1607# include "ev_win32.c" 1686# include "ev_win32.c"
1608#endif 1687#endif
1609 1688
1610/*****************************************************************************/ 1689/*****************************************************************************/
1611 1690
1691#if EV_USE_LINUXAIO
1692# include <linux/aio_abi.h> /* probably only needed for aio_context_t */
1693#endif
1694
1612/* define a suitable floor function (only used by periodics atm) */ 1695/* define a suitable floor function (only used by periodics atm) */
1613 1696
1614#if EV_USE_FLOOR 1697#if EV_USE_FLOOR
1615# include <math.h> 1698# include <math.h>
1616# define ev_floor(v) floor (v) 1699# define ev_floor(v) floor (v)
1617#else 1700#else
1618 1701
1619#include <float.h> 1702#include <float.h>
1620 1703
1621/* a floor() replacement function, should be independent of ev_tstamp type */ 1704/* a floor() replacement function, should be independent of ev_tstamp type */
1622noinline 1705ecb_noinline
1623static ev_tstamp 1706static ev_tstamp
1624ev_floor (ev_tstamp v) 1707ev_floor (ev_tstamp v)
1625{ 1708{
1626 /* the choice of shift factor is not terribly important */ 1709 /* the choice of shift factor is not terribly important */
1627#if FLT_RADIX != 2 /* assume FLT_RADIX == 10 */ 1710#if FLT_RADIX != 2 /* assume FLT_RADIX == 10 */
1629#else 1712#else
1630 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 18446744073709551616. : 4294967296.; 1713 const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 18446744073709551616. : 4294967296.;
1631#endif 1714#endif
1632 1715
1633 /* argument too large for an unsigned long? */ 1716 /* argument too large for an unsigned long? */
1634 if (expect_false (v >= shift)) 1717 if (ecb_expect_false (v >= shift))
1635 { 1718 {
1636 ev_tstamp f; 1719 ev_tstamp f;
1637 1720
1638 if (v == v - 1.) 1721 if (v == v - 1.)
1639 return v; /* very large number */ 1722 return v; /* very large number */
1641 f = shift * ev_floor (v * (1. / shift)); 1724 f = shift * ev_floor (v * (1. / shift));
1642 return f + ev_floor (v - f); 1725 return f + ev_floor (v - f);
1643 } 1726 }
1644 1727
1645 /* special treatment for negative args? */ 1728 /* special treatment for negative args? */
1646 if (expect_false (v < 0.)) 1729 if (ecb_expect_false (v < 0.))
1647 { 1730 {
1648 ev_tstamp f = -ev_floor (-v); 1731 ev_tstamp f = -ev_floor (-v);
1649 1732
1650 return f - (f == v ? 0 : 1); 1733 return f - (f == v ? 0 : 1);
1651 } 1734 }
1660 1743
1661#ifdef __linux 1744#ifdef __linux
1662# include <sys/utsname.h> 1745# include <sys/utsname.h>
1663#endif 1746#endif
1664 1747
1665noinline ecb_cold 1748ecb_noinline ecb_cold
1666static unsigned int 1749static unsigned int
1667ev_linux_version (void) 1750ev_linux_version (void)
1668{ 1751{
1669#ifdef __linux 1752#ifdef __linux
1670 unsigned int v = 0; 1753 unsigned int v = 0;
1700} 1783}
1701 1784
1702/*****************************************************************************/ 1785/*****************************************************************************/
1703 1786
1704#if EV_AVOID_STDIO 1787#if EV_AVOID_STDIO
1705noinline ecb_cold 1788ecb_noinline ecb_cold
1706static void 1789static void
1707ev_printerr (const char *msg) 1790ev_printerr (const char *msg)
1708{ 1791{
1709 write (STDERR_FILENO, msg, strlen (msg)); 1792 write (STDERR_FILENO, msg, strlen (msg));
1710} 1793}
1717ev_set_syserr_cb (void (*cb)(const char *msg) EV_NOEXCEPT) EV_NOEXCEPT 1800ev_set_syserr_cb (void (*cb)(const char *msg) EV_NOEXCEPT) EV_NOEXCEPT
1718{ 1801{
1719 syserr_cb = cb; 1802 syserr_cb = cb;
1720} 1803}
1721 1804
1722noinline ecb_cold 1805ecb_noinline ecb_cold
1723static void 1806static void
1724ev_syserr (const char *msg) 1807ev_syserr (const char *msg)
1725{ 1808{
1726 if (!msg) 1809 if (!msg)
1727 msg = "(libev) system error"; 1810 msg = "(libev) system error";
1873 static int ev_default_loop_ptr; 1956 static int ev_default_loop_ptr;
1874 1957
1875#endif 1958#endif
1876 1959
1877#if EV_FEATURE_API 1960#if EV_FEATURE_API
1878# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A) 1961# define EV_RELEASE_CB if (ecb_expect_false (release_cb)) release_cb (EV_A)
1879# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A) 1962# define EV_ACQUIRE_CB if (ecb_expect_false (acquire_cb)) acquire_cb (EV_A)
1880# define EV_INVOKE_PENDING invoke_cb (EV_A) 1963# define EV_INVOKE_PENDING invoke_cb (EV_A)
1881#else 1964#else
1882# define EV_RELEASE_CB (void)0 1965# define EV_RELEASE_CB (void)0
1883# define EV_ACQUIRE_CB (void)0 1966# define EV_ACQUIRE_CB (void)0
1884# define EV_INVOKE_PENDING ev_invoke_pending (EV_A) 1967# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)
1891#ifndef EV_HAVE_EV_TIME 1974#ifndef EV_HAVE_EV_TIME
1892ev_tstamp 1975ev_tstamp
1893ev_time (void) EV_NOEXCEPT 1976ev_time (void) EV_NOEXCEPT
1894{ 1977{
1895#if EV_USE_REALTIME 1978#if EV_USE_REALTIME
1896 if (expect_true (have_realtime)) 1979 if (ecb_expect_true (have_realtime))
1897 { 1980 {
1898 struct timespec ts; 1981 struct timespec ts;
1899 clock_gettime (CLOCK_REALTIME, &ts); 1982 clock_gettime (CLOCK_REALTIME, &ts);
1900 return ts.tv_sec + ts.tv_nsec * 1e-9; 1983 return ts.tv_sec + ts.tv_nsec * 1e-9;
1901 } 1984 }
1909 1992
1910inline_size ev_tstamp 1993inline_size ev_tstamp
1911get_clock (void) 1994get_clock (void)
1912{ 1995{
1913#if EV_USE_MONOTONIC 1996#if EV_USE_MONOTONIC
1914 if (expect_true (have_monotonic)) 1997 if (ecb_expect_true (have_monotonic))
1915 { 1998 {
1916 struct timespec ts; 1999 struct timespec ts;
1917 clock_gettime (CLOCK_MONOTONIC, &ts); 2000 clock_gettime (CLOCK_MONOTONIC, &ts);
1918 return ts.tv_sec + ts.tv_nsec * 1e-9; 2001 return ts.tv_sec + ts.tv_nsec * 1e-9;
1919 } 2002 }
1981 } 2064 }
1982 2065
1983 return ncur; 2066 return ncur;
1984} 2067}
1985 2068
1986noinline ecb_cold 2069ecb_noinline ecb_cold
1987static void * 2070static void *
1988array_realloc (int elem, void *base, int *cur, int cnt) 2071array_realloc (int elem, void *base, int *cur, int cnt)
1989{ 2072{
1990 *cur = array_nextsize (elem, *cur, cnt); 2073 *cur = array_nextsize (elem, *cur, cnt);
1991 return ev_realloc (base, elem * *cur); 2074 return ev_realloc (base, elem * *cur);
1992} 2075}
1993 2076
1994#define array_needsize_noinit(base,count) 2077#define array_needsize_noinit(base,offset,count)
1995 2078
1996#define array_needsize_zerofill(base,count) \ 2079#define array_needsize_zerofill(base,offset,count) \
1997 memset ((void *)(base), 0, sizeof (*(base)) * (count)) 2080 memset ((void *)(base + offset), 0, sizeof (*(base)) * (count))
1998 2081
1999#define array_needsize(type,base,cur,cnt,init) \ 2082#define array_needsize(type,base,cur,cnt,init) \
2000 if (expect_false ((cnt) > (cur))) \ 2083 if (ecb_expect_false ((cnt) > (cur))) \
2001 { \ 2084 { \
2002 ecb_unused int ocur_ = (cur); \ 2085 ecb_unused int ocur_ = (cur); \
2003 (base) = (type *)array_realloc \ 2086 (base) = (type *)array_realloc \
2004 (sizeof (type), (base), &(cur), (cnt)); \ 2087 (sizeof (type), (base), &(cur), (cnt)); \
2005 init ((base) + (ocur_), (cur) - ocur_); \ 2088 init ((base), ocur_, ((cur) - ocur_)); \
2006 } 2089 }
2007 2090
2008#if 0 2091#if 0
2009#define array_slim(type,stem) \ 2092#define array_slim(type,stem) \
2010 if (stem ## max < array_roundsize (stem ## cnt >> 2)) \ 2093 if (stem ## max < array_roundsize (stem ## cnt >> 2)) \
2019 ev_free (stem ## s idx); stem ## cnt idx = stem ## max idx = 0; stem ## s idx = 0 2102 ev_free (stem ## s idx); stem ## cnt idx = stem ## max idx = 0; stem ## s idx = 0
2020 2103
2021/*****************************************************************************/ 2104/*****************************************************************************/
2022 2105
2023/* dummy callback for pending events */ 2106/* dummy callback for pending events */
2024noinline 2107ecb_noinline
2025static void 2108static void
2026pendingcb (EV_P_ ev_prepare *w, int revents) 2109pendingcb (EV_P_ ev_prepare *w, int revents)
2027{ 2110{
2028} 2111}
2029 2112
2030noinline 2113ecb_noinline
2031void 2114void
2032ev_feed_event (EV_P_ void *w, int revents) EV_NOEXCEPT 2115ev_feed_event (EV_P_ void *w, int revents) EV_NOEXCEPT
2033{ 2116{
2034 W w_ = (W)w; 2117 W w_ = (W)w;
2035 int pri = ABSPRI (w_); 2118 int pri = ABSPRI (w_);
2036 2119
2037 if (expect_false (w_->pending)) 2120 if (ecb_expect_false (w_->pending))
2038 pendings [pri][w_->pending - 1].events |= revents; 2121 pendings [pri][w_->pending - 1].events |= revents;
2039 else 2122 else
2040 { 2123 {
2041 w_->pending = ++pendingcnt [pri]; 2124 w_->pending = ++pendingcnt [pri];
2042 array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, array_needsize_noinit); 2125 array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, array_needsize_noinit);
2093inline_speed void 2176inline_speed void
2094fd_event (EV_P_ int fd, int revents) 2177fd_event (EV_P_ int fd, int revents)
2095{ 2178{
2096 ANFD *anfd = anfds + fd; 2179 ANFD *anfd = anfds + fd;
2097 2180
2098 if (expect_true (!anfd->reify)) 2181 if (ecb_expect_true (!anfd->reify))
2099 fd_event_nocheck (EV_A_ fd, revents); 2182 fd_event_nocheck (EV_A_ fd, revents);
2100} 2183}
2101 2184
2102void 2185void
2103ev_feed_fd_event (EV_P_ int fd, int revents) EV_NOEXCEPT 2186ev_feed_fd_event (EV_P_ int fd, int revents) EV_NOEXCEPT
2145 ev_io *w; 2228 ev_io *w;
2146 2229
2147 unsigned char o_events = anfd->events; 2230 unsigned char o_events = anfd->events;
2148 unsigned char o_reify = anfd->reify; 2231 unsigned char o_reify = anfd->reify;
2149 2232
2150 anfd->reify = 0; 2233 anfd->reify = 0;
2151 2234
2152 /*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */ 2235 /*if (ecb_expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */
2153 { 2236 {
2154 anfd->events = 0; 2237 anfd->events = 0;
2155 2238
2156 for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next) 2239 for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
2157 anfd->events |= (unsigned char)w->events; 2240 anfd->events |= (unsigned char)w->events;
2173fd_change (EV_P_ int fd, int flags) 2256fd_change (EV_P_ int fd, int flags)
2174{ 2257{
2175 unsigned char reify = anfds [fd].reify; 2258 unsigned char reify = anfds [fd].reify;
2176 anfds [fd].reify |= flags; 2259 anfds [fd].reify |= flags;
2177 2260
2178 if (expect_true (!reify)) 2261 if (ecb_expect_true (!reify))
2179 { 2262 {
2180 ++fdchangecnt; 2263 ++fdchangecnt;
2181 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, array_needsize_noinit); 2264 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, array_needsize_noinit);
2182 fdchanges [fdchangecnt - 1] = fd; 2265 fdchanges [fdchangecnt - 1] = fd;
2183 } 2266 }
2206 return fcntl (fd, F_GETFD) != -1; 2289 return fcntl (fd, F_GETFD) != -1;
2207#endif 2290#endif
2208} 2291}
2209 2292
2210/* called on EBADF to verify fds */ 2293/* called on EBADF to verify fds */
2211noinline ecb_cold 2294ecb_noinline ecb_cold
2212static void 2295static void
2213fd_ebadf (EV_P) 2296fd_ebadf (EV_P)
2214{ 2297{
2215 int fd; 2298 int fd;
2216 2299
2219 if (!fd_valid (fd) && errno == EBADF) 2302 if (!fd_valid (fd) && errno == EBADF)
2220 fd_kill (EV_A_ fd); 2303 fd_kill (EV_A_ fd);
2221} 2304}
2222 2305
2223/* called on ENOMEM in select/poll to kill some fds and retry */ 2306/* called on ENOMEM in select/poll to kill some fds and retry */
2224noinline ecb_cold 2307ecb_noinline ecb_cold
2225static void 2308static void
2226fd_enomem (EV_P) 2309fd_enomem (EV_P)
2227{ 2310{
2228 int fd; 2311 int fd;
2229 2312
2234 break; 2317 break;
2235 } 2318 }
2236} 2319}
2237 2320
2238/* usually called after fork if backend needs to re-arm all fds from scratch */ 2321/* usually called after fork if backend needs to re-arm all fds from scratch */
2239noinline 2322ecb_noinline
2240static void 2323static void
2241fd_rearm_all (EV_P) 2324fd_rearm_all (EV_P)
2242{ 2325{
2243 int fd; 2326 int fd;
2244 2327
2298 ev_tstamp minat; 2381 ev_tstamp minat;
2299 ANHE *minpos; 2382 ANHE *minpos;
2300 ANHE *pos = heap + DHEAP * (k - HEAP0) + HEAP0 + 1; 2383 ANHE *pos = heap + DHEAP * (k - HEAP0) + HEAP0 + 1;
2301 2384
2302 /* find minimum child */ 2385 /* find minimum child */
2303 if (expect_true (pos + DHEAP - 1 < E)) 2386 if (ecb_expect_true (pos + DHEAP - 1 < E))
2304 { 2387 {
2305 /* fast path */ (minpos = pos + 0), (minat = ANHE_at (*minpos)); 2388 /* fast path */ (minpos = pos + 0), (minat = ANHE_at (*minpos));
2306 if ( ANHE_at (pos [1]) < minat) (minpos = pos + 1), (minat = ANHE_at (*minpos)); 2389 if ( ANHE_at (pos [1]) < minat) (minpos = pos + 1), (minat = ANHE_at (*minpos));
2307 if ( ANHE_at (pos [2]) < minat) (minpos = pos + 2), (minat = ANHE_at (*minpos)); 2390 if ( ANHE_at (pos [2]) < minat) (minpos = pos + 2), (minat = ANHE_at (*minpos));
2308 if ( ANHE_at (pos [3]) < minat) (minpos = pos + 3), (minat = ANHE_at (*minpos)); 2391 if ( ANHE_at (pos [3]) < minat) (minpos = pos + 3), (minat = ANHE_at (*minpos));
2426 2509
2427/*****************************************************************************/ 2510/*****************************************************************************/
2428 2511
2429#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE 2512#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2430 2513
2431noinline ecb_cold 2514ecb_noinline ecb_cold
2432static void 2515static void
2433evpipe_init (EV_P) 2516evpipe_init (EV_P)
2434{ 2517{
2435 if (!ev_is_active (&pipe_w)) 2518 if (!ev_is_active (&pipe_w))
2436 { 2519 {
2477inline_speed void 2560inline_speed void
2478evpipe_write (EV_P_ EV_ATOMIC_T *flag) 2561evpipe_write (EV_P_ EV_ATOMIC_T *flag)
2479{ 2562{
2480 ECB_MEMORY_FENCE; /* push out the write before this function was called, acquire flag */ 2563 ECB_MEMORY_FENCE; /* push out the write before this function was called, acquire flag */
2481 2564
2482 if (expect_true (*flag)) 2565 if (ecb_expect_true (*flag))
2483 return; 2566 return;
2484 2567
2485 *flag = 1; 2568 *flag = 1;
2486 ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */ 2569 ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */
2487 2570
2564 sig_pending = 0; 2647 sig_pending = 0;
2565 2648
2566 ECB_MEMORY_FENCE; 2649 ECB_MEMORY_FENCE;
2567 2650
2568 for (i = EV_NSIG - 1; i--; ) 2651 for (i = EV_NSIG - 1; i--; )
2569 if (expect_false (signals [i].pending)) 2652 if (ecb_expect_false (signals [i].pending))
2570 ev_feed_signal_event (EV_A_ i + 1); 2653 ev_feed_signal_event (EV_A_ i + 1);
2571 } 2654 }
2572#endif 2655#endif
2573 2656
2574#if EV_ASYNC_ENABLE 2657#if EV_ASYNC_ENABLE
2615#endif 2698#endif
2616 2699
2617 ev_feed_signal (signum); 2700 ev_feed_signal (signum);
2618} 2701}
2619 2702
2620noinline 2703ecb_noinline
2621void 2704void
2622ev_feed_signal_event (EV_P_ int signum) EV_NOEXCEPT 2705ev_feed_signal_event (EV_P_ int signum) EV_NOEXCEPT
2623{ 2706{
2624 WL w; 2707 WL w;
2625 2708
2626 if (expect_false (signum <= 0 || signum >= EV_NSIG)) 2709 if (ecb_expect_false (signum <= 0 || signum >= EV_NSIG))
2627 return; 2710 return;
2628 2711
2629 --signum; 2712 --signum;
2630 2713
2631#if EV_MULTIPLICITY 2714#if EV_MULTIPLICITY
2632 /* it is permissible to try to feed a signal to the wrong loop */ 2715 /* it is permissible to try to feed a signal to the wrong loop */
2633 /* or, likely more useful, feeding a signal nobody is waiting for */ 2716 /* or, likely more useful, feeding a signal nobody is waiting for */
2634 2717
2635 if (expect_false (signals [signum].loop != EV_A)) 2718 if (ecb_expect_false (signals [signum].loop != EV_A))
2636 return; 2719 return;
2637#endif 2720#endif
2638 2721
2639 signals [signum].pending = 0; 2722 signals [signum].pending = 0;
2640 ECB_MEMORY_FENCE_RELEASE; 2723 ECB_MEMORY_FENCE_RELEASE;
2733# include "ev_port.c" 2816# include "ev_port.c"
2734#endif 2817#endif
2735#if EV_USE_KQUEUE 2818#if EV_USE_KQUEUE
2736# include "ev_kqueue.c" 2819# include "ev_kqueue.c"
2737#endif 2820#endif
2821#if EV_USE_EPOLL
2822# include "ev_epoll.c"
2823#endif
2738#if EV_USE_LINUXAIO 2824#if EV_USE_LINUXAIO
2739# include "ev_linuxaio.c" 2825# include "ev_linuxaio.c"
2740#endif 2826#endif
2741#if EV_USE_EPOLL 2827#if EV_USE_IOURING
2742# include "ev_epoll.c" 2828# include "ev_iouring.c"
2743#endif 2829#endif
2744#if EV_USE_POLL 2830#if EV_USE_POLL
2745# include "ev_poll.c" 2831# include "ev_poll.c"
2746#endif 2832#endif
2747#if EV_USE_SELECT 2833#if EV_USE_SELECT
2780 2866
2781 if (EV_USE_PORT ) flags |= EVBACKEND_PORT; 2867 if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
2782 if (EV_USE_KQUEUE ) flags |= EVBACKEND_KQUEUE; 2868 if (EV_USE_KQUEUE ) flags |= EVBACKEND_KQUEUE;
2783 if (EV_USE_EPOLL ) flags |= EVBACKEND_EPOLL; 2869 if (EV_USE_EPOLL ) flags |= EVBACKEND_EPOLL;
2784 if (EV_USE_LINUXAIO) flags |= EVBACKEND_LINUXAIO; 2870 if (EV_USE_LINUXAIO) flags |= EVBACKEND_LINUXAIO;
2871 if (EV_USE_IOURING ) flags |= EVBACKEND_IOURING;
2785 if (EV_USE_POLL ) flags |= EVBACKEND_POLL; 2872 if (EV_USE_POLL ) flags |= EVBACKEND_POLL;
2786 if (EV_USE_SELECT ) flags |= EVBACKEND_SELECT; 2873 if (EV_USE_SELECT ) flags |= EVBACKEND_SELECT;
2787 2874
2788 return flags; 2875 return flags;
2789} 2876}
2807#ifdef __FreeBSD__ 2894#ifdef __FreeBSD__
2808 flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */ 2895 flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
2809#endif 2896#endif
2810 2897
2811 /* TODO: linuxaio is very experimental */ 2898 /* TODO: linuxaio is very experimental */
2899#if !EV_RECOMMEND_LINUXAIO
2812 flags &= ~EVBACKEND_LINUXAIO; 2900 flags &= ~EVBACKEND_LINUXAIO;
2901#endif
2902 /* TODO: linuxaio is super experimental */
2903#if !EV_RECOMMEND_IOURING
2904 flags &= ~EVBACKEND_IOURING;
2905#endif
2813 2906
2814 return flags; 2907 return flags;
2815} 2908}
2816 2909
2817ecb_cold 2910ecb_cold
2883 acquire_cb = acquire; 2976 acquire_cb = acquire;
2884} 2977}
2885#endif 2978#endif
2886 2979
2887/* initialise a loop structure, must be zero-initialised */ 2980/* initialise a loop structure, must be zero-initialised */
2888noinline ecb_cold 2981ecb_noinline ecb_cold
2889static void 2982static void
2890loop_init (EV_P_ unsigned int flags) EV_NOEXCEPT 2983loop_init (EV_P_ unsigned int flags) EV_NOEXCEPT
2891{ 2984{
2892 if (!backend) 2985 if (!backend)
2893 { 2986 {
2961 if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags); 3054 if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags);
2962#endif 3055#endif
2963#if EV_USE_KQUEUE 3056#if EV_USE_KQUEUE
2964 if (!backend && (flags & EVBACKEND_KQUEUE )) backend = kqueue_init (EV_A_ flags); 3057 if (!backend && (flags & EVBACKEND_KQUEUE )) backend = kqueue_init (EV_A_ flags);
2965#endif 3058#endif
3059#if EV_USE_IOURING
3060 if (!backend && (flags & EVBACKEND_IOURING )) backend = iouring_init (EV_A_ flags);
3061#endif
2966#if EV_USE_LINUXAIO 3062#if EV_USE_LINUXAIO
2967 if (!backend && (flags & EVBACKEND_LINUXAIO)) backend = linuxaio_init (EV_A_ flags); 3063 if (!backend && (flags & EVBACKEND_LINUXAIO)) backend = linuxaio_init (EV_A_ flags);
2968#endif 3064#endif
2969#if EV_USE_EPOLL 3065#if EV_USE_EPOLL
2970 if (!backend && (flags & EVBACKEND_EPOLL )) backend = epoll_init (EV_A_ flags); 3066 if (!backend && (flags & EVBACKEND_EPOLL )) backend = epoll_init (EV_A_ flags);
2998 return; 3094 return;
2999#endif 3095#endif
3000 3096
3001#if EV_CLEANUP_ENABLE 3097#if EV_CLEANUP_ENABLE
3002 /* queue cleanup watchers (and execute them) */ 3098 /* queue cleanup watchers (and execute them) */
3003 if (expect_false (cleanupcnt)) 3099 if (ecb_expect_false (cleanupcnt))
3004 { 3100 {
3005 queue_events (EV_A_ (W *)cleanups, cleanupcnt, EV_CLEANUP); 3101 queue_events (EV_A_ (W *)cleanups, cleanupcnt, EV_CLEANUP);
3006 EV_INVOKE_PENDING; 3102 EV_INVOKE_PENDING;
3007 } 3103 }
3008#endif 3104#endif
3043#if EV_USE_PORT 3139#if EV_USE_PORT
3044 if (backend == EVBACKEND_PORT ) port_destroy (EV_A); 3140 if (backend == EVBACKEND_PORT ) port_destroy (EV_A);
3045#endif 3141#endif
3046#if EV_USE_KQUEUE 3142#if EV_USE_KQUEUE
3047 if (backend == EVBACKEND_KQUEUE ) kqueue_destroy (EV_A); 3143 if (backend == EVBACKEND_KQUEUE ) kqueue_destroy (EV_A);
3144#endif
3145#if EV_USE_IOURING
3146 if (backend == EVBACKEND_IOURING ) iouring_destroy (EV_A);
3048#endif 3147#endif
3049#if EV_USE_LINUXAIO 3148#if EV_USE_LINUXAIO
3050 if (backend == EVBACKEND_LINUXAIO) linuxaio_destroy (EV_A); 3149 if (backend == EVBACKEND_LINUXAIO) linuxaio_destroy (EV_A);
3051#endif 3150#endif
3052#if EV_USE_EPOLL 3151#if EV_USE_EPOLL
3111 if (backend == EVBACKEND_PORT ) port_fork (EV_A); 3210 if (backend == EVBACKEND_PORT ) port_fork (EV_A);
3112#endif 3211#endif
3113#if EV_USE_KQUEUE 3212#if EV_USE_KQUEUE
3114 if (backend == EVBACKEND_KQUEUE ) kqueue_fork (EV_A); 3213 if (backend == EVBACKEND_KQUEUE ) kqueue_fork (EV_A);
3115#endif 3214#endif
3215#if EV_USE_IOURING
3216 if (backend == EVBACKEND_IOURING ) iouring_fork (EV_A);
3217#endif
3116#if EV_USE_LINUXAIO 3218#if EV_USE_LINUXAIO
3117 if (backend == EVBACKEND_LINUXAIO) linuxaio_fork (EV_A); 3219 if (backend == EVBACKEND_LINUXAIO) linuxaio_fork (EV_A);
3118#endif 3220#endif
3119#if EV_USE_EPOLL 3221#if EV_USE_EPOLL
3120 if (backend == EVBACKEND_EPOLL ) epoll_fork (EV_A); 3222 if (backend == EVBACKEND_EPOLL ) epoll_fork (EV_A);
3162} 3264}
3163 3265
3164#endif /* multiplicity */ 3266#endif /* multiplicity */
3165 3267
3166#if EV_VERIFY 3268#if EV_VERIFY
3167noinline ecb_cold 3269ecb_noinline ecb_cold
3168static void 3270static void
3169verify_watcher (EV_P_ W w) 3271verify_watcher (EV_P_ W w)
3170{ 3272{
3171 assert (("libev: watcher has invalid priority", ABSPRI (w) >= 0 && ABSPRI (w) < NUMPRI)); 3273 assert (("libev: watcher has invalid priority", ABSPRI (w) >= 0 && ABSPRI (w) < NUMPRI));
3172 3274
3173 if (w->pending) 3275 if (w->pending)
3174 assert (("libev: pending watcher not on pending queue", pendings [ABSPRI (w)][w->pending - 1].w == w)); 3276 assert (("libev: pending watcher not on pending queue", pendings [ABSPRI (w)][w->pending - 1].w == w));
3175} 3277}
3176 3278
3177noinline ecb_cold 3279ecb_noinline ecb_cold
3178static void 3280static void
3179verify_heap (EV_P_ ANHE *heap, int N) 3281verify_heap (EV_P_ ANHE *heap, int N)
3180{ 3282{
3181 int i; 3283 int i;
3182 3284
3188 3290
3189 verify_watcher (EV_A_ (W)ANHE_w (heap [i])); 3291 verify_watcher (EV_A_ (W)ANHE_w (heap [i]));
3190 } 3292 }
3191} 3293}
3192 3294
3193noinline ecb_cold 3295ecb_noinline ecb_cold
3194static void 3296static void
3195array_verify (EV_P_ W *ws, int cnt) 3297array_verify (EV_P_ W *ws, int cnt)
3196{ 3298{
3197 while (cnt--) 3299 while (cnt--)
3198 { 3300 {
3347 count += pendingcnt [pri]; 3449 count += pendingcnt [pri];
3348 3450
3349 return count; 3451 return count;
3350} 3452}
3351 3453
3352noinline 3454ecb_noinline
3353void 3455void
3354ev_invoke_pending (EV_P) 3456ev_invoke_pending (EV_P)
3355{ 3457{
3356 pendingpri = NUMPRI; 3458 pendingpri = NUMPRI;
3357 3459
3376/* make idle watchers pending. this handles the "call-idle */ 3478/* make idle watchers pending. this handles the "call-idle */
3377/* only when higher priorities are idle" logic */ 3479/* only when higher priorities are idle" logic */
3378inline_size void 3480inline_size void
3379idle_reify (EV_P) 3481idle_reify (EV_P)
3380{ 3482{
3381 if (expect_false (idleall)) 3483 if (ecb_expect_false (idleall))
3382 { 3484 {
3383 int pri; 3485 int pri;
3384 3486
3385 for (pri = NUMPRI; pri--; ) 3487 for (pri = NUMPRI; pri--; )
3386 { 3488 {
3435 } 3537 }
3436} 3538}
3437 3539
3438#if EV_PERIODIC_ENABLE 3540#if EV_PERIODIC_ENABLE
3439 3541
3440noinline 3542ecb_noinline
3441static void 3543static void
3442periodic_recalc (EV_P_ ev_periodic *w) 3544periodic_recalc (EV_P_ ev_periodic *w)
3443{ 3545{
3444 ev_tstamp interval = w->interval > MIN_INTERVAL ? w->interval : MIN_INTERVAL; 3546 ev_tstamp interval = w->interval > MIN_INTERVAL ? w->interval : MIN_INTERVAL;
3445 ev_tstamp at = w->offset + interval * ev_floor ((ev_rt_now - w->offset) / interval); 3547 ev_tstamp at = w->offset + interval * ev_floor ((ev_rt_now - w->offset) / interval);
3448 while (at <= ev_rt_now) 3550 while (at <= ev_rt_now)
3449 { 3551 {
3450 ev_tstamp nat = at + w->interval; 3552 ev_tstamp nat = at + w->interval;
3451 3553
3452 /* when resolution fails us, we use ev_rt_now */ 3554 /* when resolution fails us, we use ev_rt_now */
3453 if (expect_false (nat == at)) 3555 if (ecb_expect_false (nat == at))
3454 { 3556 {
3455 at = ev_rt_now; 3557 at = ev_rt_now;
3456 break; 3558 break;
3457 } 3559 }
3458 3560
3504 } 3606 }
3505} 3607}
3506 3608
3507/* simply recalculate all periodics */ 3609/* simply recalculate all periodics */
3508/* TODO: maybe ensure that at least one event happens when jumping forward? */ 3610/* TODO: maybe ensure that at least one event happens when jumping forward? */
3509noinline ecb_cold 3611ecb_noinline ecb_cold
3510static void 3612static void
3511periodics_reschedule (EV_P) 3613periodics_reschedule (EV_P)
3512{ 3614{
3513 int i; 3615 int i;
3514 3616
3528 reheap (periodics, periodiccnt); 3630 reheap (periodics, periodiccnt);
3529} 3631}
3530#endif 3632#endif
3531 3633
3532/* adjust all timers by a given offset */ 3634/* adjust all timers by a given offset */
3533noinline ecb_cold 3635ecb_noinline ecb_cold
3534static void 3636static void
3535timers_reschedule (EV_P_ ev_tstamp adjust) 3637timers_reschedule (EV_P_ ev_tstamp adjust)
3536{ 3638{
3537 int i; 3639 int i;
3538 3640
3548/* also detect if there was a timejump, and act accordingly */ 3650/* also detect if there was a timejump, and act accordingly */
3549inline_speed void 3651inline_speed void
3550time_update (EV_P_ ev_tstamp max_block) 3652time_update (EV_P_ ev_tstamp max_block)
3551{ 3653{
3552#if EV_USE_MONOTONIC 3654#if EV_USE_MONOTONIC
3553 if (expect_true (have_monotonic)) 3655 if (ecb_expect_true (have_monotonic))
3554 { 3656 {
3555 int i; 3657 int i;
3556 ev_tstamp odiff = rtmn_diff; 3658 ev_tstamp odiff = rtmn_diff;
3557 3659
3558 mn_now = get_clock (); 3660 mn_now = get_clock ();
3559 3661
3560 /* only fetch the realtime clock every 0.5*MIN_TIMEJUMP seconds */ 3662 /* only fetch the realtime clock every 0.5*MIN_TIMEJUMP seconds */
3561 /* interpolate in the meantime */ 3663 /* interpolate in the meantime */
3562 if (expect_true (mn_now - now_floor < MIN_TIMEJUMP * .5)) 3664 if (ecb_expect_true (mn_now - now_floor < MIN_TIMEJUMP * .5))
3563 { 3665 {
3564 ev_rt_now = rtmn_diff + mn_now; 3666 ev_rt_now = rtmn_diff + mn_now;
3565 return; 3667 return;
3566 } 3668 }
3567 3669
3581 ev_tstamp diff; 3683 ev_tstamp diff;
3582 rtmn_diff = ev_rt_now - mn_now; 3684 rtmn_diff = ev_rt_now - mn_now;
3583 3685
3584 diff = odiff - rtmn_diff; 3686 diff = odiff - rtmn_diff;
3585 3687
3586 if (expect_true ((diff < 0. ? -diff : diff) < MIN_TIMEJUMP)) 3688 if (ecb_expect_true ((diff < 0. ? -diff : diff) < MIN_TIMEJUMP))
3587 return; /* all is well */ 3689 return; /* all is well */
3588 3690
3589 ev_rt_now = ev_time (); 3691 ev_rt_now = ev_time ();
3590 mn_now = get_clock (); 3692 mn_now = get_clock ();
3591 now_floor = mn_now; 3693 now_floor = mn_now;
3600 else 3702 else
3601#endif 3703#endif
3602 { 3704 {
3603 ev_rt_now = ev_time (); 3705 ev_rt_now = ev_time ();
3604 3706
3605 if (expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + MIN_TIMEJUMP)) 3707 if (ecb_expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + MIN_TIMEJUMP))
3606 { 3708 {
3607 /* adjust timers. this is easy, as the offset is the same for all of them */ 3709 /* adjust timers. this is easy, as the offset is the same for all of them */
3608 timers_reschedule (EV_A_ ev_rt_now - mn_now); 3710 timers_reschedule (EV_A_ ev_rt_now - mn_now);
3609#if EV_PERIODIC_ENABLE 3711#if EV_PERIODIC_ENABLE
3610 periodics_reschedule (EV_A); 3712 periodics_reschedule (EV_A);
3633#if EV_VERIFY >= 2 3735#if EV_VERIFY >= 2
3634 ev_verify (EV_A); 3736 ev_verify (EV_A);
3635#endif 3737#endif
3636 3738
3637#ifndef _WIN32 3739#ifndef _WIN32
3638 if (expect_false (curpid)) /* penalise the forking check even more */ 3740 if (ecb_expect_false (curpid)) /* penalise the forking check even more */
3639 if (expect_false (getpid () != curpid)) 3741 if (ecb_expect_false (getpid () != curpid))
3640 { 3742 {
3641 curpid = getpid (); 3743 curpid = getpid ();
3642 postfork = 1; 3744 postfork = 1;
3643 } 3745 }
3644#endif 3746#endif
3645 3747
3646#if EV_FORK_ENABLE 3748#if EV_FORK_ENABLE
3647 /* we might have forked, so queue fork handlers */ 3749 /* we might have forked, so queue fork handlers */
3648 if (expect_false (postfork)) 3750 if (ecb_expect_false (postfork))
3649 if (forkcnt) 3751 if (forkcnt)
3650 { 3752 {
3651 queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK); 3753 queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
3652 EV_INVOKE_PENDING; 3754 EV_INVOKE_PENDING;
3653 } 3755 }
3654#endif 3756#endif
3655 3757
3656#if EV_PREPARE_ENABLE 3758#if EV_PREPARE_ENABLE
3657 /* queue prepare watchers (and execute them) */ 3759 /* queue prepare watchers (and execute them) */
3658 if (expect_false (preparecnt)) 3760 if (ecb_expect_false (preparecnt))
3659 { 3761 {
3660 queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE); 3762 queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
3661 EV_INVOKE_PENDING; 3763 EV_INVOKE_PENDING;
3662 } 3764 }
3663#endif 3765#endif
3664 3766
3665 if (expect_false (loop_done)) 3767 if (ecb_expect_false (loop_done))
3666 break; 3768 break;
3667 3769
3668 /* we might have forked, so reify kernel state if necessary */ 3770 /* we might have forked, so reify kernel state if necessary */
3669 if (expect_false (postfork)) 3771 if (ecb_expect_false (postfork))
3670 loop_fork (EV_A); 3772 loop_fork (EV_A);
3671 3773
3672 /* update fd-related kernel structures */ 3774 /* update fd-related kernel structures */
3673 fd_reify (EV_A); 3775 fd_reify (EV_A);
3674 3776
3686 /* from now on, we want a pipe-wake-up */ 3788 /* from now on, we want a pipe-wake-up */
3687 pipe_write_wanted = 1; 3789 pipe_write_wanted = 1;
3688 3790
3689 ECB_MEMORY_FENCE; /* make sure pipe_write_wanted is visible before we check for potential skips */ 3791 ECB_MEMORY_FENCE; /* make sure pipe_write_wanted is visible before we check for potential skips */
3690 3792
3691 if (expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt || pipe_write_skipped))) 3793 if (ecb_expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt || pipe_write_skipped)))
3692 { 3794 {
3693 waittime = MAX_BLOCKTIME; 3795 waittime = MAX_BLOCKTIME;
3694 3796
3695 if (timercnt) 3797 if (timercnt)
3696 { 3798 {
3705 if (waittime > to) waittime = to; 3807 if (waittime > to) waittime = to;
3706 } 3808 }
3707#endif 3809#endif
3708 3810
3709 /* don't let timeouts decrease the waittime below timeout_blocktime */ 3811 /* don't let timeouts decrease the waittime below timeout_blocktime */
3710 if (expect_false (waittime < timeout_blocktime)) 3812 if (ecb_expect_false (waittime < timeout_blocktime))
3711 waittime = timeout_blocktime; 3813 waittime = timeout_blocktime;
3712 3814
3713 /* at this point, we NEED to wait, so we have to ensure */ 3815 /* at this point, we NEED to wait, so we have to ensure */
3714 /* to pass a minimum nonzero value to the backend */ 3816 /* to pass a minimum nonzero value to the backend */
3715 if (expect_false (waittime < backend_mintime)) 3817 if (ecb_expect_false (waittime < backend_mintime))
3716 waittime = backend_mintime; 3818 waittime = backend_mintime;
3717 3819
3718 /* extra check because io_blocktime is commonly 0 */ 3820 /* extra check because io_blocktime is commonly 0 */
3719 if (expect_false (io_blocktime)) 3821 if (ecb_expect_false (io_blocktime))
3720 { 3822 {
3721 sleeptime = io_blocktime - (mn_now - prev_mn_now); 3823 sleeptime = io_blocktime - (mn_now - prev_mn_now);
3722 3824
3723 if (sleeptime > waittime - backend_mintime) 3825 if (sleeptime > waittime - backend_mintime)
3724 sleeptime = waittime - backend_mintime; 3826 sleeptime = waittime - backend_mintime;
3725 3827
3726 if (expect_true (sleeptime > 0.)) 3828 if (ecb_expect_true (sleeptime > 0.))
3727 { 3829 {
3728 ev_sleep (sleeptime); 3830 ev_sleep (sleeptime);
3729 waittime -= sleeptime; 3831 waittime -= sleeptime;
3730 } 3832 }
3731 } 3833 }
3745 { 3847 {
3746 assert (("libev: pipe_w not active, but pipe not written", ev_is_active (&pipe_w))); 3848 assert (("libev: pipe_w not active, but pipe not written", ev_is_active (&pipe_w)));
3747 ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM); 3849 ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
3748 } 3850 }
3749 3851
3750
3751 /* update ev_rt_now, do magic */ 3852 /* update ev_rt_now, do magic */
3752 time_update (EV_A_ waittime + sleeptime); 3853 time_update (EV_A_ waittime + sleeptime);
3753 } 3854 }
3754 3855
3755 /* queue pending timers and reschedule them */ 3856 /* queue pending timers and reschedule them */
3763 idle_reify (EV_A); 3864 idle_reify (EV_A);
3764#endif 3865#endif
3765 3866
3766#if EV_CHECK_ENABLE 3867#if EV_CHECK_ENABLE
3767 /* queue check watchers, to be executed first */ 3868 /* queue check watchers, to be executed first */
3768 if (expect_false (checkcnt)) 3869 if (ecb_expect_false (checkcnt))
3769 queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK); 3870 queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
3770#endif 3871#endif
3771 3872
3772 EV_INVOKE_PENDING; 3873 EV_INVOKE_PENDING;
3773 } 3874 }
3774 while (expect_true ( 3875 while (ecb_expect_true (
3775 activecnt 3876 activecnt
3776 && !loop_done 3877 && !loop_done
3777 && !(flags & (EVRUN_ONCE | EVRUN_NOWAIT)) 3878 && !(flags & (EVRUN_ONCE | EVRUN_NOWAIT))
3778 )); 3879 ));
3779 3880
3843inline_size void 3944inline_size void
3844wlist_del (WL *head, WL elem) 3945wlist_del (WL *head, WL elem)
3845{ 3946{
3846 while (*head) 3947 while (*head)
3847 { 3948 {
3848 if (expect_true (*head == elem)) 3949 if (ecb_expect_true (*head == elem))
3849 { 3950 {
3850 *head = elem->next; 3951 *head = elem->next;
3851 break; 3952 break;
3852 } 3953 }
3853 3954
3870ev_clear_pending (EV_P_ void *w) EV_NOEXCEPT 3971ev_clear_pending (EV_P_ void *w) EV_NOEXCEPT
3871{ 3972{
3872 W w_ = (W)w; 3973 W w_ = (W)w;
3873 int pending = w_->pending; 3974 int pending = w_->pending;
3874 3975
3875 if (expect_true (pending)) 3976 if (ecb_expect_true (pending))
3876 { 3977 {
3877 ANPENDING *p = pendings [ABSPRI (w_)] + pending - 1; 3978 ANPENDING *p = pendings [ABSPRI (w_)] + pending - 1;
3878 p->w = (W)&pending_w; 3979 p->w = (W)&pending_w;
3879 w_->pending = 0; 3980 w_->pending = 0;
3880 return p->events; 3981 return p->events;
3907 w->active = 0; 4008 w->active = 0;
3908} 4009}
3909 4010
3910/*****************************************************************************/ 4011/*****************************************************************************/
3911 4012
3912noinline 4013ecb_noinline
3913void 4014void
3914ev_io_start (EV_P_ ev_io *w) EV_NOEXCEPT 4015ev_io_start (EV_P_ ev_io *w) EV_NOEXCEPT
3915{ 4016{
3916 int fd = w->fd; 4017 int fd = w->fd;
3917 4018
3918 if (expect_false (ev_is_active (w))) 4019 if (ecb_expect_false (ev_is_active (w)))
3919 return; 4020 return;
3920 4021
3921 assert (("libev: ev_io_start called with negative fd", fd >= 0)); 4022 assert (("libev: ev_io_start called with negative fd", fd >= 0));
3922 assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE)))); 4023 assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
3923 4024
4025#if EV_VERIFY >= 2
4026 assert (("libev: ev_io_start called on watcher with invalid fd", fd_valid (fd)));
4027#endif
3924 EV_FREQUENT_CHECK; 4028 EV_FREQUENT_CHECK;
3925 4029
3926 ev_start (EV_A_ (W)w, 1); 4030 ev_start (EV_A_ (W)w, 1);
3927 array_needsize (ANFD, anfds, anfdmax, fd + 1, array_needsize_zerofill); 4031 array_needsize (ANFD, anfds, anfdmax, fd + 1, array_needsize_zerofill);
3928 wlist_add (&anfds[fd].head, (WL)w); 4032 wlist_add (&anfds[fd].head, (WL)w);
3934 w->events &= ~EV__IOFDSET; 4038 w->events &= ~EV__IOFDSET;
3935 4039
3936 EV_FREQUENT_CHECK; 4040 EV_FREQUENT_CHECK;
3937} 4041}
3938 4042
3939noinline 4043ecb_noinline
3940void 4044void
3941ev_io_stop (EV_P_ ev_io *w) EV_NOEXCEPT 4045ev_io_stop (EV_P_ ev_io *w) EV_NOEXCEPT
3942{ 4046{
3943 clear_pending (EV_A_ (W)w); 4047 clear_pending (EV_A_ (W)w);
3944 if (expect_false (!ev_is_active (w))) 4048 if (ecb_expect_false (!ev_is_active (w)))
3945 return; 4049 return;
3946 4050
3947 assert (("libev: ev_io_stop called with illegal fd (must stay constant after start!)", w->fd >= 0 && w->fd < anfdmax)); 4051 assert (("libev: ev_io_stop called with illegal fd (must stay constant after start!)", w->fd >= 0 && w->fd < anfdmax));
3948 4052
4053#if EV_VERIFY >= 2
4054 assert (("libev: ev_io_stop called on watcher with invalid fd", fd_valid (w->fd)));
4055#endif
3949 EV_FREQUENT_CHECK; 4056 EV_FREQUENT_CHECK;
3950 4057
3951 wlist_del (&anfds[w->fd].head, (WL)w); 4058 wlist_del (&anfds[w->fd].head, (WL)w);
3952 ev_stop (EV_A_ (W)w); 4059 ev_stop (EV_A_ (W)w);
3953 4060
3954 fd_change (EV_A_ w->fd, EV_ANFD_REIFY); 4061 fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
3955 4062
3956 EV_FREQUENT_CHECK; 4063 EV_FREQUENT_CHECK;
3957} 4064}
3958 4065
3959noinline 4066ecb_noinline
3960void 4067void
3961ev_timer_start (EV_P_ ev_timer *w) EV_NOEXCEPT 4068ev_timer_start (EV_P_ ev_timer *w) EV_NOEXCEPT
3962{ 4069{
3963 if (expect_false (ev_is_active (w))) 4070 if (ecb_expect_false (ev_is_active (w)))
3964 return; 4071 return;
3965 4072
3966 ev_at (w) += mn_now; 4073 ev_at (w) += mn_now;
3967 4074
3968 assert (("libev: ev_timer_start called with negative timer repeat value", w->repeat >= 0.)); 4075 assert (("libev: ev_timer_start called with negative timer repeat value", w->repeat >= 0.));
3979 EV_FREQUENT_CHECK; 4086 EV_FREQUENT_CHECK;
3980 4087
3981 /*assert (("libev: internal timer heap corruption", timers [ev_active (w)] == (WT)w));*/ 4088 /*assert (("libev: internal timer heap corruption", timers [ev_active (w)] == (WT)w));*/
3982} 4089}
3983 4090
3984noinline 4091ecb_noinline
3985void 4092void
3986ev_timer_stop (EV_P_ ev_timer *w) EV_NOEXCEPT 4093ev_timer_stop (EV_P_ ev_timer *w) EV_NOEXCEPT
3987{ 4094{
3988 clear_pending (EV_A_ (W)w); 4095 clear_pending (EV_A_ (W)w);
3989 if (expect_false (!ev_is_active (w))) 4096 if (ecb_expect_false (!ev_is_active (w)))
3990 return; 4097 return;
3991 4098
3992 EV_FREQUENT_CHECK; 4099 EV_FREQUENT_CHECK;
3993 4100
3994 { 4101 {
3996 4103
3997 assert (("libev: internal timer heap corruption", ANHE_w (timers [active]) == (WT)w)); 4104 assert (("libev: internal timer heap corruption", ANHE_w (timers [active]) == (WT)w));
3998 4105
3999 --timercnt; 4106 --timercnt;
4000 4107
4001 if (expect_true (active < timercnt + HEAP0)) 4108 if (ecb_expect_true (active < timercnt + HEAP0))
4002 { 4109 {
4003 timers [active] = timers [timercnt + HEAP0]; 4110 timers [active] = timers [timercnt + HEAP0];
4004 adjustheap (timers, timercnt, active); 4111 adjustheap (timers, timercnt, active);
4005 } 4112 }
4006 } 4113 }
4010 ev_stop (EV_A_ (W)w); 4117 ev_stop (EV_A_ (W)w);
4011 4118
4012 EV_FREQUENT_CHECK; 4119 EV_FREQUENT_CHECK;
4013} 4120}
4014 4121
4015noinline 4122ecb_noinline
4016void 4123void
4017ev_timer_again (EV_P_ ev_timer *w) EV_NOEXCEPT 4124ev_timer_again (EV_P_ ev_timer *w) EV_NOEXCEPT
4018{ 4125{
4019 EV_FREQUENT_CHECK; 4126 EV_FREQUENT_CHECK;
4020 4127
4045{ 4152{
4046 return ev_at (w) - (ev_is_active (w) ? mn_now : 0.); 4153 return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);
4047} 4154}
4048 4155
4049#if EV_PERIODIC_ENABLE 4156#if EV_PERIODIC_ENABLE
4050noinline 4157ecb_noinline
4051void 4158void
4052ev_periodic_start (EV_P_ ev_periodic *w) EV_NOEXCEPT 4159ev_periodic_start (EV_P_ ev_periodic *w) EV_NOEXCEPT
4053{ 4160{
4054 if (expect_false (ev_is_active (w))) 4161 if (ecb_expect_false (ev_is_active (w)))
4055 return; 4162 return;
4056 4163
4057 if (w->reschedule_cb) 4164 if (w->reschedule_cb)
4058 ev_at (w) = w->reschedule_cb (w, ev_rt_now); 4165 ev_at (w) = w->reschedule_cb (w, ev_rt_now);
4059 else if (w->interval) 4166 else if (w->interval)
4076 EV_FREQUENT_CHECK; 4183 EV_FREQUENT_CHECK;
4077 4184
4078 /*assert (("libev: internal periodic heap corruption", ANHE_w (periodics [ev_active (w)]) == (WT)w));*/ 4185 /*assert (("libev: internal periodic heap corruption", ANHE_w (periodics [ev_active (w)]) == (WT)w));*/
4079} 4186}
4080 4187
4081noinline 4188ecb_noinline
4082void 4189void
4083ev_periodic_stop (EV_P_ ev_periodic *w) EV_NOEXCEPT 4190ev_periodic_stop (EV_P_ ev_periodic *w) EV_NOEXCEPT
4084{ 4191{
4085 clear_pending (EV_A_ (W)w); 4192 clear_pending (EV_A_ (W)w);
4086 if (expect_false (!ev_is_active (w))) 4193 if (ecb_expect_false (!ev_is_active (w)))
4087 return; 4194 return;
4088 4195
4089 EV_FREQUENT_CHECK; 4196 EV_FREQUENT_CHECK;
4090 4197
4091 { 4198 {
4093 4200
4094 assert (("libev: internal periodic heap corruption", ANHE_w (periodics [active]) == (WT)w)); 4201 assert (("libev: internal periodic heap corruption", ANHE_w (periodics [active]) == (WT)w));
4095 4202
4096 --periodiccnt; 4203 --periodiccnt;
4097 4204
4098 if (expect_true (active < periodiccnt + HEAP0)) 4205 if (ecb_expect_true (active < periodiccnt + HEAP0))
4099 { 4206 {
4100 periodics [active] = periodics [periodiccnt + HEAP0]; 4207 periodics [active] = periodics [periodiccnt + HEAP0];
4101 adjustheap (periodics, periodiccnt, active); 4208 adjustheap (periodics, periodiccnt, active);
4102 } 4209 }
4103 } 4210 }
4105 ev_stop (EV_A_ (W)w); 4212 ev_stop (EV_A_ (W)w);
4106 4213
4107 EV_FREQUENT_CHECK; 4214 EV_FREQUENT_CHECK;
4108} 4215}
4109 4216
4110noinline 4217ecb_noinline
4111void 4218void
4112ev_periodic_again (EV_P_ ev_periodic *w) EV_NOEXCEPT 4219ev_periodic_again (EV_P_ ev_periodic *w) EV_NOEXCEPT
4113{ 4220{
4114 /* TODO: use adjustheap and recalculation */ 4221 /* TODO: use adjustheap and recalculation */
4115 ev_periodic_stop (EV_A_ w); 4222 ev_periodic_stop (EV_A_ w);
4121# define SA_RESTART 0 4228# define SA_RESTART 0
4122#endif 4229#endif
4123 4230
4124#if EV_SIGNAL_ENABLE 4231#if EV_SIGNAL_ENABLE
4125 4232
4126noinline 4233ecb_noinline
4127void 4234void
4128ev_signal_start (EV_P_ ev_signal *w) EV_NOEXCEPT 4235ev_signal_start (EV_P_ ev_signal *w) EV_NOEXCEPT
4129{ 4236{
4130 if (expect_false (ev_is_active (w))) 4237 if (ecb_expect_false (ev_is_active (w)))
4131 return; 4238 return;
4132 4239
4133 assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0 && w->signum < EV_NSIG)); 4240 assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0 && w->signum < EV_NSIG));
4134 4241
4135#if EV_MULTIPLICITY 4242#if EV_MULTIPLICITY
4204 } 4311 }
4205 4312
4206 EV_FREQUENT_CHECK; 4313 EV_FREQUENT_CHECK;
4207} 4314}
4208 4315
4209noinline 4316ecb_noinline
4210void 4317void
4211ev_signal_stop (EV_P_ ev_signal *w) EV_NOEXCEPT 4318ev_signal_stop (EV_P_ ev_signal *w) EV_NOEXCEPT
4212{ 4319{
4213 clear_pending (EV_A_ (W)w); 4320 clear_pending (EV_A_ (W)w);
4214 if (expect_false (!ev_is_active (w))) 4321 if (ecb_expect_false (!ev_is_active (w)))
4215 return; 4322 return;
4216 4323
4217 EV_FREQUENT_CHECK; 4324 EV_FREQUENT_CHECK;
4218 4325
4219 wlist_del (&signals [w->signum - 1].head, (WL)w); 4326 wlist_del (&signals [w->signum - 1].head, (WL)w);
4252ev_child_start (EV_P_ ev_child *w) EV_NOEXCEPT 4359ev_child_start (EV_P_ ev_child *w) EV_NOEXCEPT
4253{ 4360{
4254#if EV_MULTIPLICITY 4361#if EV_MULTIPLICITY
4255 assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr)); 4362 assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
4256#endif 4363#endif
4257 if (expect_false (ev_is_active (w))) 4364 if (ecb_expect_false (ev_is_active (w)))
4258 return; 4365 return;
4259 4366
4260 EV_FREQUENT_CHECK; 4367 EV_FREQUENT_CHECK;
4261 4368
4262 ev_start (EV_A_ (W)w, 1); 4369 ev_start (EV_A_ (W)w, 1);
4267 4374
4268void 4375void
4269ev_child_stop (EV_P_ ev_child *w) EV_NOEXCEPT 4376ev_child_stop (EV_P_ ev_child *w) EV_NOEXCEPT
4270{ 4377{
4271 clear_pending (EV_A_ (W)w); 4378 clear_pending (EV_A_ (W)w);
4272 if (expect_false (!ev_is_active (w))) 4379 if (ecb_expect_false (!ev_is_active (w)))
4273 return; 4380 return;
4274 4381
4275 EV_FREQUENT_CHECK; 4382 EV_FREQUENT_CHECK;
4276 4383
4277 wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w); 4384 wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
4291 4398
4292#define DEF_STAT_INTERVAL 5.0074891 4399#define DEF_STAT_INTERVAL 5.0074891
4293#define NFS_STAT_INTERVAL 30.1074891 /* for filesystems potentially failing inotify */ 4400#define NFS_STAT_INTERVAL 30.1074891 /* for filesystems potentially failing inotify */
4294#define MIN_STAT_INTERVAL 0.1074891 4401#define MIN_STAT_INTERVAL 0.1074891
4295 4402
4296noinline static void stat_timer_cb (EV_P_ ev_timer *w_, int revents); 4403ecb_noinline static void stat_timer_cb (EV_P_ ev_timer *w_, int revents);
4297 4404
4298#if EV_USE_INOTIFY 4405#if EV_USE_INOTIFY
4299 4406
4300/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */ 4407/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
4301# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX) 4408# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
4302 4409
4303noinline 4410ecb_noinline
4304static void 4411static void
4305infy_add (EV_P_ ev_stat *w) 4412infy_add (EV_P_ ev_stat *w)
4306{ 4413{
4307 w->wd = inotify_add_watch (fs_fd, w->path, 4414 w->wd = inotify_add_watch (fs_fd, w->path,
4308 IN_ATTRIB | IN_DELETE_SELF | IN_MOVE_SELF | IN_MODIFY 4415 IN_ATTRIB | IN_DELETE_SELF | IN_MOVE_SELF | IN_MODIFY
4373 if (ev_is_active (&w->timer)) ev_ref (EV_A); 4480 if (ev_is_active (&w->timer)) ev_ref (EV_A);
4374 ev_timer_again (EV_A_ &w->timer); 4481 ev_timer_again (EV_A_ &w->timer);
4375 if (ev_is_active (&w->timer)) ev_unref (EV_A); 4482 if (ev_is_active (&w->timer)) ev_unref (EV_A);
4376} 4483}
4377 4484
4378noinline 4485ecb_noinline
4379static void 4486static void
4380infy_del (EV_P_ ev_stat *w) 4487infy_del (EV_P_ ev_stat *w)
4381{ 4488{
4382 int slot; 4489 int slot;
4383 int wd = w->wd; 4490 int wd = w->wd;
4391 4498
4392 /* remove this watcher, if others are watching it, they will rearm */ 4499 /* remove this watcher, if others are watching it, they will rearm */
4393 inotify_rm_watch (fs_fd, wd); 4500 inotify_rm_watch (fs_fd, wd);
4394} 4501}
4395 4502
4396noinline 4503ecb_noinline
4397static void 4504static void
4398infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev) 4505infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
4399{ 4506{
4400 if (slot < 0) 4507 if (slot < 0)
4401 /* overflow, need to check for all hash slots */ 4508 /* overflow, need to check for all hash slots */
4547 w->attr.st_nlink = 0; 4654 w->attr.st_nlink = 0;
4548 else if (!w->attr.st_nlink) 4655 else if (!w->attr.st_nlink)
4549 w->attr.st_nlink = 1; 4656 w->attr.st_nlink = 1;
4550} 4657}
4551 4658
4552noinline 4659ecb_noinline
4553static void 4660static void
4554stat_timer_cb (EV_P_ ev_timer *w_, int revents) 4661stat_timer_cb (EV_P_ ev_timer *w_, int revents)
4555{ 4662{
4556 ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer)); 4663 ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
4557 4664
4591} 4698}
4592 4699
4593void 4700void
4594ev_stat_start (EV_P_ ev_stat *w) EV_NOEXCEPT 4701ev_stat_start (EV_P_ ev_stat *w) EV_NOEXCEPT
4595{ 4702{
4596 if (expect_false (ev_is_active (w))) 4703 if (ecb_expect_false (ev_is_active (w)))
4597 return; 4704 return;
4598 4705
4599 ev_stat_stat (EV_A_ w); 4706 ev_stat_stat (EV_A_ w);
4600 4707
4601 if (w->interval < MIN_STAT_INTERVAL && w->interval) 4708 if (w->interval < MIN_STAT_INTERVAL && w->interval)
4623 4730
4624void 4731void
4625ev_stat_stop (EV_P_ ev_stat *w) EV_NOEXCEPT 4732ev_stat_stop (EV_P_ ev_stat *w) EV_NOEXCEPT
4626{ 4733{
4627 clear_pending (EV_A_ (W)w); 4734 clear_pending (EV_A_ (W)w);
4628 if (expect_false (!ev_is_active (w))) 4735 if (ecb_expect_false (!ev_is_active (w)))
4629 return; 4736 return;
4630 4737
4631 EV_FREQUENT_CHECK; 4738 EV_FREQUENT_CHECK;
4632 4739
4633#if EV_USE_INOTIFY 4740#if EV_USE_INOTIFY
4648 4755
4649#if EV_IDLE_ENABLE 4756#if EV_IDLE_ENABLE
4650void 4757void
4651ev_idle_start (EV_P_ ev_idle *w) EV_NOEXCEPT 4758ev_idle_start (EV_P_ ev_idle *w) EV_NOEXCEPT
4652{ 4759{
4653 if (expect_false (ev_is_active (w))) 4760 if (ecb_expect_false (ev_is_active (w)))
4654 return; 4761 return;
4655 4762
4656 pri_adjust (EV_A_ (W)w); 4763 pri_adjust (EV_A_ (W)w);
4657 4764
4658 EV_FREQUENT_CHECK; 4765 EV_FREQUENT_CHECK;
4672 4779
4673void 4780void
4674ev_idle_stop (EV_P_ ev_idle *w) EV_NOEXCEPT 4781ev_idle_stop (EV_P_ ev_idle *w) EV_NOEXCEPT
4675{ 4782{
4676 clear_pending (EV_A_ (W)w); 4783 clear_pending (EV_A_ (W)w);
4677 if (expect_false (!ev_is_active (w))) 4784 if (ecb_expect_false (!ev_is_active (w)))
4678 return; 4785 return;
4679 4786
4680 EV_FREQUENT_CHECK; 4787 EV_FREQUENT_CHECK;
4681 4788
4682 { 4789 {
4695 4802
4696#if EV_PREPARE_ENABLE 4803#if EV_PREPARE_ENABLE
4697void 4804void
4698ev_prepare_start (EV_P_ ev_prepare *w) EV_NOEXCEPT 4805ev_prepare_start (EV_P_ ev_prepare *w) EV_NOEXCEPT
4699{ 4806{
4700 if (expect_false (ev_is_active (w))) 4807 if (ecb_expect_false (ev_is_active (w)))
4701 return; 4808 return;
4702 4809
4703 EV_FREQUENT_CHECK; 4810 EV_FREQUENT_CHECK;
4704 4811
4705 ev_start (EV_A_ (W)w, ++preparecnt); 4812 ev_start (EV_A_ (W)w, ++preparecnt);
4711 4818
4712void 4819void
4713ev_prepare_stop (EV_P_ ev_prepare *w) EV_NOEXCEPT 4820ev_prepare_stop (EV_P_ ev_prepare *w) EV_NOEXCEPT
4714{ 4821{
4715 clear_pending (EV_A_ (W)w); 4822 clear_pending (EV_A_ (W)w);
4716 if (expect_false (!ev_is_active (w))) 4823 if (ecb_expect_false (!ev_is_active (w)))
4717 return; 4824 return;
4718 4825
4719 EV_FREQUENT_CHECK; 4826 EV_FREQUENT_CHECK;
4720 4827
4721 { 4828 {
4733 4840
4734#if EV_CHECK_ENABLE 4841#if EV_CHECK_ENABLE
4735void 4842void
4736ev_check_start (EV_P_ ev_check *w) EV_NOEXCEPT 4843ev_check_start (EV_P_ ev_check *w) EV_NOEXCEPT
4737{ 4844{
4738 if (expect_false (ev_is_active (w))) 4845 if (ecb_expect_false (ev_is_active (w)))
4739 return; 4846 return;
4740 4847
4741 EV_FREQUENT_CHECK; 4848 EV_FREQUENT_CHECK;
4742 4849
4743 ev_start (EV_A_ (W)w, ++checkcnt); 4850 ev_start (EV_A_ (W)w, ++checkcnt);
4749 4856
4750void 4857void
4751ev_check_stop (EV_P_ ev_check *w) EV_NOEXCEPT 4858ev_check_stop (EV_P_ ev_check *w) EV_NOEXCEPT
4752{ 4859{
4753 clear_pending (EV_A_ (W)w); 4860 clear_pending (EV_A_ (W)w);
4754 if (expect_false (!ev_is_active (w))) 4861 if (ecb_expect_false (!ev_is_active (w)))
4755 return; 4862 return;
4756 4863
4757 EV_FREQUENT_CHECK; 4864 EV_FREQUENT_CHECK;
4758 4865
4759 { 4866 {
4768 EV_FREQUENT_CHECK; 4875 EV_FREQUENT_CHECK;
4769} 4876}
4770#endif 4877#endif
4771 4878
4772#if EV_EMBED_ENABLE 4879#if EV_EMBED_ENABLE
4773noinline 4880ecb_noinline
4774void 4881void
4775ev_embed_sweep (EV_P_ ev_embed *w) EV_NOEXCEPT 4882ev_embed_sweep (EV_P_ ev_embed *w) EV_NOEXCEPT
4776{ 4883{
4777 ev_run (w->other, EVRUN_NOWAIT); 4884 ev_run (w->other, EVRUN_NOWAIT);
4778} 4885}
4830#endif 4937#endif
4831 4938
4832void 4939void
4833ev_embed_start (EV_P_ ev_embed *w) EV_NOEXCEPT 4940ev_embed_start (EV_P_ ev_embed *w) EV_NOEXCEPT
4834{ 4941{
4835 if (expect_false (ev_is_active (w))) 4942 if (ecb_expect_false (ev_is_active (w)))
4836 return; 4943 return;
4837 4944
4838 { 4945 {
4839 EV_P = w->other; 4946 EV_P = w->other;
4840 assert (("libev: loop to be embedded is not embeddable", backend & ev_embeddable_backends ())); 4947 assert (("libev: loop to be embedded is not embeddable", backend & ev_embeddable_backends ()));
4862 4969
4863void 4970void
4864ev_embed_stop (EV_P_ ev_embed *w) EV_NOEXCEPT 4971ev_embed_stop (EV_P_ ev_embed *w) EV_NOEXCEPT
4865{ 4972{
4866 clear_pending (EV_A_ (W)w); 4973 clear_pending (EV_A_ (W)w);
4867 if (expect_false (!ev_is_active (w))) 4974 if (ecb_expect_false (!ev_is_active (w)))
4868 return; 4975 return;
4869 4976
4870 EV_FREQUENT_CHECK; 4977 EV_FREQUENT_CHECK;
4871 4978
4872 ev_io_stop (EV_A_ &w->io); 4979 ev_io_stop (EV_A_ &w->io);
4881 4988
4882#if EV_FORK_ENABLE 4989#if EV_FORK_ENABLE
4883void 4990void
4884ev_fork_start (EV_P_ ev_fork *w) EV_NOEXCEPT 4991ev_fork_start (EV_P_ ev_fork *w) EV_NOEXCEPT
4885{ 4992{
4886 if (expect_false (ev_is_active (w))) 4993 if (ecb_expect_false (ev_is_active (w)))
4887 return; 4994 return;
4888 4995
4889 EV_FREQUENT_CHECK; 4996 EV_FREQUENT_CHECK;
4890 4997
4891 ev_start (EV_A_ (W)w, ++forkcnt); 4998 ev_start (EV_A_ (W)w, ++forkcnt);
4897 5004
4898void 5005void
4899ev_fork_stop (EV_P_ ev_fork *w) EV_NOEXCEPT 5006ev_fork_stop (EV_P_ ev_fork *w) EV_NOEXCEPT
4900{ 5007{
4901 clear_pending (EV_A_ (W)w); 5008 clear_pending (EV_A_ (W)w);
4902 if (expect_false (!ev_is_active (w))) 5009 if (ecb_expect_false (!ev_is_active (w)))
4903 return; 5010 return;
4904 5011
4905 EV_FREQUENT_CHECK; 5012 EV_FREQUENT_CHECK;
4906 5013
4907 { 5014 {
4919 5026
4920#if EV_CLEANUP_ENABLE 5027#if EV_CLEANUP_ENABLE
4921void 5028void
4922ev_cleanup_start (EV_P_ ev_cleanup *w) EV_NOEXCEPT 5029ev_cleanup_start (EV_P_ ev_cleanup *w) EV_NOEXCEPT
4923{ 5030{
4924 if (expect_false (ev_is_active (w))) 5031 if (ecb_expect_false (ev_is_active (w)))
4925 return; 5032 return;
4926 5033
4927 EV_FREQUENT_CHECK; 5034 EV_FREQUENT_CHECK;
4928 5035
4929 ev_start (EV_A_ (W)w, ++cleanupcnt); 5036 ev_start (EV_A_ (W)w, ++cleanupcnt);
4937 5044
4938void 5045void
4939ev_cleanup_stop (EV_P_ ev_cleanup *w) EV_NOEXCEPT 5046ev_cleanup_stop (EV_P_ ev_cleanup *w) EV_NOEXCEPT
4940{ 5047{
4941 clear_pending (EV_A_ (W)w); 5048 clear_pending (EV_A_ (W)w);
4942 if (expect_false (!ev_is_active (w))) 5049 if (ecb_expect_false (!ev_is_active (w)))
4943 return; 5050 return;
4944 5051
4945 EV_FREQUENT_CHECK; 5052 EV_FREQUENT_CHECK;
4946 ev_ref (EV_A); 5053 ev_ref (EV_A);
4947 5054
4960 5067
4961#if EV_ASYNC_ENABLE 5068#if EV_ASYNC_ENABLE
4962void 5069void
4963ev_async_start (EV_P_ ev_async *w) EV_NOEXCEPT 5070ev_async_start (EV_P_ ev_async *w) EV_NOEXCEPT
4964{ 5071{
4965 if (expect_false (ev_is_active (w))) 5072 if (ecb_expect_false (ev_is_active (w)))
4966 return; 5073 return;
4967 5074
4968 w->sent = 0; 5075 w->sent = 0;
4969 5076
4970 evpipe_init (EV_A); 5077 evpipe_init (EV_A);
4980 5087
4981void 5088void
4982ev_async_stop (EV_P_ ev_async *w) EV_NOEXCEPT 5089ev_async_stop (EV_P_ ev_async *w) EV_NOEXCEPT
4983{ 5090{
4984 clear_pending (EV_A_ (W)w); 5091 clear_pending (EV_A_ (W)w);
4985 if (expect_false (!ev_is_active (w))) 5092 if (ecb_expect_false (!ev_is_active (w)))
4986 return; 5093 return;
4987 5094
4988 EV_FREQUENT_CHECK; 5095 EV_FREQUENT_CHECK;
4989 5096
4990 { 5097 {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines