1 | /* |
1 | /* |
2 | * libev event processing core, watcher management |
2 | * libev event processing core, watcher management |
3 | * |
3 | * |
4 | * Copyright (c) 2007,2008,2009,2010 Marc Alexander Lehmann <libev@schmorp.de> |
4 | * Copyright (c) 2007,2008,2009,2010,2011 Marc Alexander Lehmann <libev@schmorp.de> |
5 | * All rights reserved. |
5 | * All rights reserved. |
6 | * |
6 | * |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
8 | * tion, are permitted provided that the following conditions are met: |
8 | * tion, are permitted provided that the following conditions are met: |
9 | * |
9 | * |
… | |
… | |
376 | # undef EV_USE_INOTIFY |
376 | # undef EV_USE_INOTIFY |
377 | # define EV_USE_INOTIFY 0 |
377 | # define EV_USE_INOTIFY 0 |
378 | #endif |
378 | #endif |
379 | |
379 | |
380 | #if !EV_USE_NANOSLEEP |
380 | #if !EV_USE_NANOSLEEP |
381 | # ifndef _WIN32 |
381 | /* hp-ux has it in sys/time.h, which we unconditionally include above */ |
|
|
382 | # if !defined(_WIN32) && !defined(__hpux) |
382 | # include <sys/select.h> |
383 | # include <sys/select.h> |
383 | # endif |
384 | # endif |
384 | #endif |
385 | #endif |
385 | |
386 | |
386 | #if EV_USE_INOTIFY |
387 | #if EV_USE_INOTIFY |
387 | # include <sys/utsname.h> |
|
|
388 | # include <sys/statfs.h> |
388 | # include <sys/statfs.h> |
389 | # include <sys/inotify.h> |
389 | # include <sys/inotify.h> |
390 | /* some very old inotify.h headers don't have IN_DONT_FOLLOW */ |
390 | /* some very old inotify.h headers don't have IN_DONT_FOLLOW */ |
391 | # ifndef IN_DONT_FOLLOW |
391 | # ifndef IN_DONT_FOLLOW |
392 | # undef EV_USE_INOTIFY |
392 | # undef EV_USE_INOTIFY |
… | |
… | |
523 | # include "ev_win32.c" |
523 | # include "ev_win32.c" |
524 | #endif |
524 | #endif |
525 | |
525 | |
526 | /*****************************************************************************/ |
526 | /*****************************************************************************/ |
527 | |
527 | |
|
|
528 | #ifdef __linux |
|
|
529 | # include <sys/utsname.h> |
|
|
530 | #endif |
|
|
531 | |
528 | static unsigned int noinline |
532 | static unsigned int noinline |
529 | ev_linux_version (void) |
533 | ev_linux_version (void) |
530 | { |
534 | { |
531 | #ifdef __linux |
535 | #ifdef __linux |
|
|
536 | unsigned int v = 0; |
532 | struct utsname buf; |
537 | struct utsname buf; |
533 | unsigned int v; |
|
|
534 | int i; |
538 | int i; |
535 | char *p = buf.release; |
539 | char *p = buf.release; |
536 | |
540 | |
537 | if (uname (&buf)) |
541 | if (uname (&buf)) |
538 | return 0; |
542 | return 0; |
… | |
… | |
588 | if (syserr_cb) |
592 | if (syserr_cb) |
589 | syserr_cb (msg); |
593 | syserr_cb (msg); |
590 | else |
594 | else |
591 | { |
595 | { |
592 | #if EV_AVOID_STDIO |
596 | #if EV_AVOID_STDIO |
593 | const char *err = strerror (errno); |
|
|
594 | |
|
|
595 | ev_printerr (msg); |
597 | ev_printerr (msg); |
596 | ev_printerr (": "); |
598 | ev_printerr (": "); |
597 | ev_printerr (err); |
599 | ev_printerr (strerror (errno)); |
598 | ev_printerr ("\n"); |
600 | ev_printerr ("\n"); |
599 | #else |
601 | #else |
600 | perror (msg); |
602 | perror (msg); |
601 | #endif |
603 | #endif |
602 | abort (); |
604 | abort (); |
… | |
… | |
636 | ptr = alloc (ptr, size); |
638 | ptr = alloc (ptr, size); |
637 | |
639 | |
638 | if (!ptr && size) |
640 | if (!ptr && size) |
639 | { |
641 | { |
640 | #if EV_AVOID_STDIO |
642 | #if EV_AVOID_STDIO |
641 | ev_printerr ("libev: memory allocation failed, aborting.\n"); |
643 | ev_printerr ("(libev) memory allocation failed, aborting.\n"); |
642 | #else |
644 | #else |
643 | fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size); |
645 | fprintf (stderr, "(libev) cannot allocate %ld bytes, aborting.", size); |
644 | #endif |
646 | #endif |
645 | abort (); |
647 | abort (); |
646 | } |
648 | } |
647 | |
649 | |
648 | return ptr; |
650 | return ptr; |
… | |
… | |
665 | unsigned char emask; /* the epoll backend stores the actual kernel mask in here */ |
667 | unsigned char emask; /* the epoll backend stores the actual kernel mask in here */ |
666 | unsigned char unused; |
668 | unsigned char unused; |
667 | #if EV_USE_EPOLL |
669 | #if EV_USE_EPOLL |
668 | unsigned int egen; /* generation counter to counter epoll bugs */ |
670 | unsigned int egen; /* generation counter to counter epoll bugs */ |
669 | #endif |
671 | #endif |
670 | #if EV_SELECT_IS_WINSOCKET |
672 | #if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP |
671 | SOCKET handle; |
673 | SOCKET handle; |
|
|
674 | #endif |
|
|
675 | #if EV_USE_IOCP |
|
|
676 | OVERLAPPED or, ow; |
672 | #endif |
677 | #endif |
673 | } ANFD; |
678 | } ANFD; |
674 | |
679 | |
675 | /* stores the pending event set for a given watcher */ |
680 | /* stores the pending event set for a given watcher */ |
676 | typedef struct |
681 | typedef struct |
… | |
… | |
811 | select (0, 0, 0, 0, &tv); |
816 | select (0, 0, 0, 0, &tv); |
812 | #endif |
817 | #endif |
813 | } |
818 | } |
814 | } |
819 | } |
815 | |
820 | |
|
|
821 | inline_speed int |
|
|
822 | ev_timeout_to_ms (ev_tstamp timeout) |
|
|
823 | { |
|
|
824 | int ms = timeout * 1000. + .999999; |
|
|
825 | |
|
|
826 | return expect_true (ms) ? ms : timeout < 1e-6 ? 0 : 1; |
|
|
827 | } |
|
|
828 | |
816 | /*****************************************************************************/ |
829 | /*****************************************************************************/ |
817 | |
830 | |
818 | #define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */ |
831 | #define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */ |
819 | |
832 | |
820 | /* find a suitable new size for the given array, */ |
833 | /* find a suitable new size for the given array, */ |
… | |
… | |
972 | unsigned char o_events = anfd->events; |
985 | unsigned char o_events = anfd->events; |
973 | unsigned char o_reify = anfd->reify; |
986 | unsigned char o_reify = anfd->reify; |
974 | |
987 | |
975 | anfd->reify = 0; |
988 | anfd->reify = 0; |
976 | |
989 | |
977 | #if EV_SELECT_IS_WINSOCKET |
990 | #if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP |
978 | if (o_reify & EV__IOFDSET) |
991 | if (o_reify & EV__IOFDSET) |
979 | { |
992 | { |
980 | unsigned long arg; |
993 | unsigned long arg; |
981 | anfd->handle = EV_FD_TO_WIN32_HANDLE (fd); |
994 | anfd->handle = EV_FD_TO_WIN32_HANDLE (fd); |
982 | assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0)); |
995 | assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0)); |
|
|
996 | printf ("oi %d %x\n", fd, anfd->handle);//D |
983 | } |
997 | } |
984 | #endif |
998 | #endif |
985 | |
999 | |
986 | /*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */ |
1000 | /*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */ |
987 | { |
1001 | { |
… | |
… | |
1338 | char dummy; |
1352 | char dummy; |
1339 | /* see discussion in evpipe_write when you think this read should be recv in win32 */ |
1353 | /* see discussion in evpipe_write when you think this read should be recv in win32 */ |
1340 | read (evpipe [0], &dummy, 1); |
1354 | read (evpipe [0], &dummy, 1); |
1341 | } |
1355 | } |
1342 | |
1356 | |
|
|
1357 | #if EV_SIGNAL_ENABLE |
1343 | if (sig_pending) |
1358 | if (sig_pending) |
1344 | { |
1359 | { |
1345 | sig_pending = 0; |
1360 | sig_pending = 0; |
1346 | |
1361 | |
1347 | for (i = EV_NSIG - 1; i--; ) |
1362 | for (i = EV_NSIG - 1; i--; ) |
1348 | if (expect_false (signals [i].pending)) |
1363 | if (expect_false (signals [i].pending)) |
1349 | ev_feed_signal_event (EV_A_ i + 1); |
1364 | ev_feed_signal_event (EV_A_ i + 1); |
1350 | } |
1365 | } |
|
|
1366 | #endif |
1351 | |
1367 | |
1352 | #if EV_ASYNC_ENABLE |
1368 | #if EV_ASYNC_ENABLE |
1353 | if (async_pending) |
1369 | if (async_pending) |
1354 | { |
1370 | { |
1355 | async_pending = 0; |
1371 | async_pending = 0; |
… | |
… | |
1364 | #endif |
1380 | #endif |
1365 | } |
1381 | } |
1366 | |
1382 | |
1367 | /*****************************************************************************/ |
1383 | /*****************************************************************************/ |
1368 | |
1384 | |
|
|
1385 | void |
|
|
1386 | ev_feed_signal (int signum) |
|
|
1387 | { |
|
|
1388 | #if EV_MULTIPLICITY |
|
|
1389 | EV_P = signals [signum - 1].loop; |
|
|
1390 | |
|
|
1391 | if (!EV_A) |
|
|
1392 | return; |
|
|
1393 | #endif |
|
|
1394 | |
|
|
1395 | signals [signum - 1].pending = 1; |
|
|
1396 | evpipe_write (EV_A_ &sig_pending); |
|
|
1397 | } |
|
|
1398 | |
1369 | static void |
1399 | static void |
1370 | ev_sighandler (int signum) |
1400 | ev_sighandler (int signum) |
1371 | { |
1401 | { |
1372 | #if EV_MULTIPLICITY |
|
|
1373 | EV_P = signals [signum - 1].loop; |
|
|
1374 | #endif |
|
|
1375 | |
|
|
1376 | #ifdef _WIN32 |
1402 | #ifdef _WIN32 |
1377 | signal (signum, ev_sighandler); |
1403 | signal (signum, ev_sighandler); |
1378 | #endif |
1404 | #endif |
1379 | |
1405 | |
1380 | signals [signum - 1].pending = 1; |
1406 | ev_feed_signal (signum); |
1381 | evpipe_write (EV_A_ &sig_pending); |
|
|
1382 | } |
1407 | } |
1383 | |
1408 | |
1384 | void noinline |
1409 | void noinline |
1385 | ev_feed_signal_event (EV_P_ int signum) |
1410 | ev_feed_signal_event (EV_P_ int signum) |
1386 | { |
1411 | { |
… | |
… | |
1486 | |
1511 | |
1487 | #endif |
1512 | #endif |
1488 | |
1513 | |
1489 | /*****************************************************************************/ |
1514 | /*****************************************************************************/ |
1490 | |
1515 | |
|
|
1516 | #if EV_USE_IOCP |
|
|
1517 | # include "ev_iocp.c" |
|
|
1518 | #endif |
1491 | #if EV_USE_PORT |
1519 | #if EV_USE_PORT |
1492 | # include "ev_port.c" |
1520 | # include "ev_port.c" |
1493 | #endif |
1521 | #endif |
1494 | #if EV_USE_KQUEUE |
1522 | #if EV_USE_KQUEUE |
1495 | # include "ev_kqueue.c" |
1523 | # include "ev_kqueue.c" |
… | |
… | |
1635 | static void noinline |
1663 | static void noinline |
1636 | loop_init (EV_P_ unsigned int flags) |
1664 | loop_init (EV_P_ unsigned int flags) |
1637 | { |
1665 | { |
1638 | if (!backend) |
1666 | if (!backend) |
1639 | { |
1667 | { |
|
|
1668 | origflags = flags; |
|
|
1669 | |
1640 | #if EV_USE_REALTIME |
1670 | #if EV_USE_REALTIME |
1641 | if (!have_realtime) |
1671 | if (!have_realtime) |
1642 | { |
1672 | { |
1643 | struct timespec ts; |
1673 | struct timespec ts; |
1644 | |
1674 | |
… | |
… | |
1689 | #endif |
1719 | #endif |
1690 | #if EV_USE_SIGNALFD |
1720 | #if EV_USE_SIGNALFD |
1691 | sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1; |
1721 | sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1; |
1692 | #endif |
1722 | #endif |
1693 | |
1723 | |
1694 | if (!(flags & 0x0000ffffU)) |
1724 | if (!(flags & EVBACKEND_MASK)) |
1695 | flags |= ev_recommended_backends (); |
1725 | flags |= ev_recommended_backends (); |
1696 | |
1726 | |
|
|
1727 | #if EV_USE_IOCP |
|
|
1728 | if (!backend && (flags & EVBACKEND_IOCP )) backend = iocp_init (EV_A_ flags); |
|
|
1729 | #endif |
1697 | #if EV_USE_PORT |
1730 | #if EV_USE_PORT |
1698 | if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags); |
1731 | if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags); |
1699 | #endif |
1732 | #endif |
1700 | #if EV_USE_KQUEUE |
1733 | #if EV_USE_KQUEUE |
1701 | if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags); |
1734 | if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags); |
… | |
… | |
1718 | #endif |
1751 | #endif |
1719 | } |
1752 | } |
1720 | } |
1753 | } |
1721 | |
1754 | |
1722 | /* free up a loop structure */ |
1755 | /* free up a loop structure */ |
1723 | static void noinline |
1756 | void |
1724 | loop_destroy (EV_P) |
1757 | ev_loop_destroy (EV_P) |
1725 | { |
1758 | { |
1726 | int i; |
1759 | int i; |
|
|
1760 | |
|
|
1761 | #if EV_MULTIPLICITY |
|
|
1762 | /* mimic free (0) */ |
|
|
1763 | if (!EV_A) |
|
|
1764 | return; |
|
|
1765 | #endif |
|
|
1766 | |
|
|
1767 | #if EV_CLEANUP_ENABLE |
|
|
1768 | /* queue cleanup watchers (and execute them) */ |
|
|
1769 | if (expect_false (cleanupcnt)) |
|
|
1770 | { |
|
|
1771 | queue_events (EV_A_ (W *)cleanups, cleanupcnt, EV_CLEANUP); |
|
|
1772 | EV_INVOKE_PENDING; |
|
|
1773 | } |
|
|
1774 | #endif |
|
|
1775 | |
|
|
1776 | #if EV_CHILD_ENABLE |
|
|
1777 | if (ev_is_active (&childev)) |
|
|
1778 | { |
|
|
1779 | ev_ref (EV_A); /* child watcher */ |
|
|
1780 | ev_signal_stop (EV_A_ &childev); |
|
|
1781 | } |
|
|
1782 | #endif |
1727 | |
1783 | |
1728 | if (ev_is_active (&pipe_w)) |
1784 | if (ev_is_active (&pipe_w)) |
1729 | { |
1785 | { |
1730 | /*ev_ref (EV_A);*/ |
1786 | /*ev_ref (EV_A);*/ |
1731 | /*ev_io_stop (EV_A_ &pipe_w);*/ |
1787 | /*ev_io_stop (EV_A_ &pipe_w);*/ |
… | |
… | |
1753 | #endif |
1809 | #endif |
1754 | |
1810 | |
1755 | if (backend_fd >= 0) |
1811 | if (backend_fd >= 0) |
1756 | close (backend_fd); |
1812 | close (backend_fd); |
1757 | |
1813 | |
|
|
1814 | #if EV_USE_IOCP |
|
|
1815 | if (backend == EVBACKEND_IOCP ) iocp_destroy (EV_A); |
|
|
1816 | #endif |
1758 | #if EV_USE_PORT |
1817 | #if EV_USE_PORT |
1759 | if (backend == EVBACKEND_PORT ) port_destroy (EV_A); |
1818 | if (backend == EVBACKEND_PORT ) port_destroy (EV_A); |
1760 | #endif |
1819 | #endif |
1761 | #if EV_USE_KQUEUE |
1820 | #if EV_USE_KQUEUE |
1762 | if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A); |
1821 | if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A); |
… | |
… | |
1789 | array_free (periodic, EMPTY); |
1848 | array_free (periodic, EMPTY); |
1790 | #endif |
1849 | #endif |
1791 | #if EV_FORK_ENABLE |
1850 | #if EV_FORK_ENABLE |
1792 | array_free (fork, EMPTY); |
1851 | array_free (fork, EMPTY); |
1793 | #endif |
1852 | #endif |
|
|
1853 | #if EV_CLEANUP_ENABLE |
|
|
1854 | array_free (cleanup, EMPTY); |
|
|
1855 | #endif |
1794 | array_free (prepare, EMPTY); |
1856 | array_free (prepare, EMPTY); |
1795 | array_free (check, EMPTY); |
1857 | array_free (check, EMPTY); |
1796 | #if EV_ASYNC_ENABLE |
1858 | #if EV_ASYNC_ENABLE |
1797 | array_free (async, EMPTY); |
1859 | array_free (async, EMPTY); |
1798 | #endif |
1860 | #endif |
1799 | |
1861 | |
1800 | backend = 0; |
1862 | backend = 0; |
|
|
1863 | |
|
|
1864 | #if EV_MULTIPLICITY |
|
|
1865 | if (ev_is_default_loop (EV_A)) |
|
|
1866 | #endif |
|
|
1867 | ev_default_loop_ptr = 0; |
|
|
1868 | #if EV_MULTIPLICITY |
|
|
1869 | else |
|
|
1870 | ev_free (EV_A); |
|
|
1871 | #endif |
1801 | } |
1872 | } |
1802 | |
1873 | |
1803 | #if EV_USE_INOTIFY |
1874 | #if EV_USE_INOTIFY |
1804 | inline_size void infy_fork (EV_P); |
1875 | inline_size void infy_fork (EV_P); |
1805 | #endif |
1876 | #endif |
… | |
… | |
1864 | loop_init (EV_A_ flags); |
1935 | loop_init (EV_A_ flags); |
1865 | |
1936 | |
1866 | if (ev_backend (EV_A)) |
1937 | if (ev_backend (EV_A)) |
1867 | return EV_A; |
1938 | return EV_A; |
1868 | |
1939 | |
|
|
1940 | ev_free (EV_A); |
1869 | return 0; |
1941 | return 0; |
1870 | } |
1942 | } |
1871 | |
1943 | |
1872 | void |
|
|
1873 | ev_loop_destroy (EV_P) |
|
|
1874 | { |
|
|
1875 | loop_destroy (EV_A); |
|
|
1876 | ev_free (loop); |
|
|
1877 | } |
|
|
1878 | |
|
|
1879 | void |
|
|
1880 | ev_loop_fork (EV_P) |
|
|
1881 | { |
|
|
1882 | postfork = 1; /* must be in line with ev_default_fork */ |
|
|
1883 | } |
|
|
1884 | #endif /* multiplicity */ |
1944 | #endif /* multiplicity */ |
1885 | |
1945 | |
1886 | #if EV_VERIFY |
1946 | #if EV_VERIFY |
1887 | static void noinline |
1947 | static void noinline |
1888 | verify_watcher (EV_P_ W w) |
1948 | verify_watcher (EV_P_ W w) |
… | |
… | |
1963 | #if EV_FORK_ENABLE |
2023 | #if EV_FORK_ENABLE |
1964 | assert (forkmax >= forkcnt); |
2024 | assert (forkmax >= forkcnt); |
1965 | array_verify (EV_A_ (W *)forks, forkcnt); |
2025 | array_verify (EV_A_ (W *)forks, forkcnt); |
1966 | #endif |
2026 | #endif |
1967 | |
2027 | |
|
|
2028 | #if EV_CLEANUP_ENABLE |
|
|
2029 | assert (cleanupmax >= cleanupcnt); |
|
|
2030 | array_verify (EV_A_ (W *)cleanups, cleanupcnt); |
|
|
2031 | #endif |
|
|
2032 | |
1968 | #if EV_ASYNC_ENABLE |
2033 | #if EV_ASYNC_ENABLE |
1969 | assert (asyncmax >= asynccnt); |
2034 | assert (asyncmax >= asynccnt); |
1970 | array_verify (EV_A_ (W *)asyncs, asynccnt); |
2035 | array_verify (EV_A_ (W *)asyncs, asynccnt); |
1971 | #endif |
2036 | #endif |
1972 | |
2037 | |
… | |
… | |
1990 | } |
2055 | } |
1991 | #endif |
2056 | #endif |
1992 | |
2057 | |
1993 | #if EV_MULTIPLICITY |
2058 | #if EV_MULTIPLICITY |
1994 | struct ev_loop * |
2059 | struct ev_loop * |
1995 | ev_default_loop_init (unsigned int flags) |
|
|
1996 | #else |
2060 | #else |
1997 | int |
2061 | int |
|
|
2062 | #endif |
1998 | ev_default_loop (unsigned int flags) |
2063 | ev_default_loop (unsigned int flags) |
1999 | #endif |
|
|
2000 | { |
2064 | { |
2001 | if (!ev_default_loop_ptr) |
2065 | if (!ev_default_loop_ptr) |
2002 | { |
2066 | { |
2003 | #if EV_MULTIPLICITY |
2067 | #if EV_MULTIPLICITY |
2004 | EV_P = ev_default_loop_ptr = &default_loop_struct; |
2068 | EV_P = ev_default_loop_ptr = &default_loop_struct; |
… | |
… | |
2023 | |
2087 | |
2024 | return ev_default_loop_ptr; |
2088 | return ev_default_loop_ptr; |
2025 | } |
2089 | } |
2026 | |
2090 | |
2027 | void |
2091 | void |
2028 | ev_default_destroy (void) |
2092 | ev_loop_fork (EV_P) |
2029 | { |
2093 | { |
2030 | #if EV_MULTIPLICITY |
|
|
2031 | EV_P = ev_default_loop_ptr; |
|
|
2032 | #endif |
|
|
2033 | |
|
|
2034 | ev_default_loop_ptr = 0; |
|
|
2035 | |
|
|
2036 | #if EV_CHILD_ENABLE |
|
|
2037 | ev_ref (EV_A); /* child watcher */ |
|
|
2038 | ev_signal_stop (EV_A_ &childev); |
|
|
2039 | #endif |
|
|
2040 | |
|
|
2041 | loop_destroy (EV_A); |
|
|
2042 | } |
|
|
2043 | |
|
|
2044 | void |
|
|
2045 | ev_default_fork (void) |
|
|
2046 | { |
|
|
2047 | #if EV_MULTIPLICITY |
|
|
2048 | EV_P = ev_default_loop_ptr; |
|
|
2049 | #endif |
|
|
2050 | |
|
|
2051 | postfork = 1; /* must be in line with ev_loop_fork */ |
2094 | postfork = 1; /* must be in line with ev_default_fork */ |
2052 | } |
2095 | } |
2053 | |
2096 | |
2054 | /*****************************************************************************/ |
2097 | /*****************************************************************************/ |
2055 | |
2098 | |
2056 | void |
2099 | void |
… | |
… | |
2078 | |
2121 | |
2079 | for (pri = NUMPRI; pri--; ) |
2122 | for (pri = NUMPRI; pri--; ) |
2080 | while (pendingcnt [pri]) |
2123 | while (pendingcnt [pri]) |
2081 | { |
2124 | { |
2082 | ANPENDING *p = pendings [pri] + --pendingcnt [pri]; |
2125 | ANPENDING *p = pendings [pri] + --pendingcnt [pri]; |
2083 | |
|
|
2084 | /*assert (("libev: non-pending watcher on pending list", p->w->pending));*/ |
|
|
2085 | /* ^ this is no longer true, as pending_w could be here */ |
|
|
2086 | |
2126 | |
2087 | p->w->pending = 0; |
2127 | p->w->pending = 0; |
2088 | EV_CB_INVOKE (p->w, p->events); |
2128 | EV_CB_INVOKE (p->w, p->events); |
2089 | EV_FREQUENT_CHECK; |
2129 | EV_FREQUENT_CHECK; |
2090 | } |
2130 | } |
… | |
… | |
2152 | feed_reverse_done (EV_A_ EV_TIMER); |
2192 | feed_reverse_done (EV_A_ EV_TIMER); |
2153 | } |
2193 | } |
2154 | } |
2194 | } |
2155 | |
2195 | |
2156 | #if EV_PERIODIC_ENABLE |
2196 | #if EV_PERIODIC_ENABLE |
|
|
2197 | |
|
|
2198 | inline_speed |
|
|
2199 | periodic_recalc (EV_P_ ev_periodic *w) |
|
|
2200 | { |
|
|
2201 | /* TODO: use slow but potentially more correct incremental algo, */ |
|
|
2202 | /* also do not rely on ceil */ |
|
|
2203 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
|
|
2204 | } |
|
|
2205 | |
2157 | /* make periodics pending */ |
2206 | /* make periodics pending */ |
2158 | inline_size void |
2207 | inline_size void |
2159 | periodics_reify (EV_P) |
2208 | periodics_reify (EV_P) |
2160 | { |
2209 | { |
2161 | EV_FREQUENT_CHECK; |
2210 | EV_FREQUENT_CHECK; |
… | |
… | |
2180 | ANHE_at_cache (periodics [HEAP0]); |
2229 | ANHE_at_cache (periodics [HEAP0]); |
2181 | downheap (periodics, periodiccnt, HEAP0); |
2230 | downheap (periodics, periodiccnt, HEAP0); |
2182 | } |
2231 | } |
2183 | else if (w->interval) |
2232 | else if (w->interval) |
2184 | { |
2233 | { |
2185 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
2234 | periodic_recalc (EV_A_ w); |
|
|
2235 | |
2186 | /* if next trigger time is not sufficiently in the future, put it there */ |
2236 | /* if next trigger time is not sufficiently in the future, put it there */ |
2187 | /* this might happen because of floating point inexactness */ |
2237 | /* this might happen because of floating point inexactness */ |
2188 | if (ev_at (w) - ev_rt_now < TIME_EPSILON) |
2238 | if (ev_at (w) - ev_rt_now < TIME_EPSILON) |
2189 | { |
2239 | { |
2190 | ev_at (w) += w->interval; |
2240 | ev_at (w) += w->interval; |
… | |
… | |
2224 | ev_periodic *w = (ev_periodic *)ANHE_w (periodics [i]); |
2274 | ev_periodic *w = (ev_periodic *)ANHE_w (periodics [i]); |
2225 | |
2275 | |
2226 | if (w->reschedule_cb) |
2276 | if (w->reschedule_cb) |
2227 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
2277 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
2228 | else if (w->interval) |
2278 | else if (w->interval) |
2229 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
2279 | periodic_recalc (EV_A_ w); |
2230 | |
2280 | |
2231 | ANHE_at_cache (periodics [i]); |
2281 | ANHE_at_cache (periodics [i]); |
2232 | } |
2282 | } |
2233 | |
2283 | |
2234 | reheap (periodics, periodiccnt); |
2284 | reheap (periodics, periodiccnt); |
… | |
… | |
2726 | if (w->reschedule_cb) |
2776 | if (w->reschedule_cb) |
2727 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
2777 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
2728 | else if (w->interval) |
2778 | else if (w->interval) |
2729 | { |
2779 | { |
2730 | assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.)); |
2780 | assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.)); |
2731 | /* this formula differs from the one in periodic_reify because we do not always round up */ |
2781 | periodic_recalc (EV_A_ w); |
2732 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
|
|
2733 | } |
2782 | } |
2734 | else |
2783 | else |
2735 | ev_at (w) = w->offset; |
2784 | ev_at (w) = w->offset; |
2736 | |
2785 | |
2737 | EV_FREQUENT_CHECK; |
2786 | EV_FREQUENT_CHECK; |
… | |
… | |
2858 | sa.sa_handler = ev_sighandler; |
2907 | sa.sa_handler = ev_sighandler; |
2859 | sigfillset (&sa.sa_mask); |
2908 | sigfillset (&sa.sa_mask); |
2860 | sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */ |
2909 | sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */ |
2861 | sigaction (w->signum, &sa, 0); |
2910 | sigaction (w->signum, &sa, 0); |
2862 | |
2911 | |
|
|
2912 | if (origflags & EVFLAG_NOSIGMASK) |
|
|
2913 | { |
2863 | sigemptyset (&sa.sa_mask); |
2914 | sigemptyset (&sa.sa_mask); |
2864 | sigaddset (&sa.sa_mask, w->signum); |
2915 | sigaddset (&sa.sa_mask, w->signum); |
2865 | sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0); |
2916 | sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0); |
|
|
2917 | } |
2866 | #endif |
2918 | #endif |
2867 | } |
2919 | } |
2868 | |
2920 | |
2869 | EV_FREQUENT_CHECK; |
2921 | EV_FREQUENT_CHECK; |
2870 | } |
2922 | } |
… | |
… | |
3562 | |
3614 | |
3563 | EV_FREQUENT_CHECK; |
3615 | EV_FREQUENT_CHECK; |
3564 | } |
3616 | } |
3565 | #endif |
3617 | #endif |
3566 | |
3618 | |
|
|
3619 | #if EV_CLEANUP_ENABLE |
|
|
3620 | void |
|
|
3621 | ev_cleanup_start (EV_P_ ev_cleanup *w) |
|
|
3622 | { |
|
|
3623 | if (expect_false (ev_is_active (w))) |
|
|
3624 | return; |
|
|
3625 | |
|
|
3626 | EV_FREQUENT_CHECK; |
|
|
3627 | |
|
|
3628 | ev_start (EV_A_ (W)w, ++cleanupcnt); |
|
|
3629 | array_needsize (ev_cleanup *, cleanups, cleanupmax, cleanupcnt, EMPTY2); |
|
|
3630 | cleanups [cleanupcnt - 1] = w; |
|
|
3631 | |
|
|
3632 | /* cleanup watchers should never keep a refcount on the loop */ |
|
|
3633 | ev_unref (EV_A); |
|
|
3634 | EV_FREQUENT_CHECK; |
|
|
3635 | } |
|
|
3636 | |
|
|
3637 | void |
|
|
3638 | ev_cleanup_stop (EV_P_ ev_cleanup *w) |
|
|
3639 | { |
|
|
3640 | clear_pending (EV_A_ (W)w); |
|
|
3641 | if (expect_false (!ev_is_active (w))) |
|
|
3642 | return; |
|
|
3643 | |
|
|
3644 | EV_FREQUENT_CHECK; |
|
|
3645 | ev_ref (EV_A); |
|
|
3646 | |
|
|
3647 | { |
|
|
3648 | int active = ev_active (w); |
|
|
3649 | |
|
|
3650 | cleanups [active - 1] = cleanups [--cleanupcnt]; |
|
|
3651 | ev_active (cleanups [active - 1]) = active; |
|
|
3652 | } |
|
|
3653 | |
|
|
3654 | ev_stop (EV_A_ (W)w); |
|
|
3655 | |
|
|
3656 | EV_FREQUENT_CHECK; |
|
|
3657 | } |
|
|
3658 | #endif |
|
|
3659 | |
3567 | #if EV_ASYNC_ENABLE |
3660 | #if EV_ASYNC_ENABLE |
3568 | void |
3661 | void |
3569 | ev_async_start (EV_P_ ev_async *w) |
3662 | ev_async_start (EV_P_ ev_async *w) |
3570 | { |
3663 | { |
3571 | if (expect_false (ev_is_active (w))) |
3664 | if (expect_false (ev_is_active (w))) |