… | |
… | |
570 | struct timeval tv; |
570 | struct timeval tv; |
571 | gettimeofday (&tv, 0); |
571 | gettimeofday (&tv, 0); |
572 | return tv.tv_sec + tv.tv_usec * 1e-6; |
572 | return tv.tv_sec + tv.tv_usec * 1e-6; |
573 | } |
573 | } |
574 | |
574 | |
575 | ev_tstamp inline_size |
575 | inline_size ev_tstamp |
576 | get_clock (void) |
576 | get_clock (void) |
577 | { |
577 | { |
578 | #if EV_USE_MONOTONIC |
578 | #if EV_USE_MONOTONIC |
579 | if (expect_true (have_monotonic)) |
579 | if (expect_true (have_monotonic)) |
580 | { |
580 | { |
… | |
… | |
625 | |
625 | |
626 | /*****************************************************************************/ |
626 | /*****************************************************************************/ |
627 | |
627 | |
628 | #define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */ |
628 | #define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */ |
629 | |
629 | |
630 | int inline_size |
630 | inline_size int |
631 | array_nextsize (int elem, int cur, int cnt) |
631 | array_nextsize (int elem, int cur, int cnt) |
632 | { |
632 | { |
633 | int ncur = cur + 1; |
633 | int ncur = cur + 1; |
634 | |
634 | |
635 | do |
635 | do |
… | |
… | |
697 | pendings [pri][w_->pending - 1].w = w_; |
697 | pendings [pri][w_->pending - 1].w = w_; |
698 | pendings [pri][w_->pending - 1].events = revents; |
698 | pendings [pri][w_->pending - 1].events = revents; |
699 | } |
699 | } |
700 | } |
700 | } |
701 | |
701 | |
702 | void inline_speed |
702 | inline_speed void |
|
|
703 | feed_reverse (EV_P_ W w) |
|
|
704 | { |
|
|
705 | array_needsize (W, rfeeds, rfeedmax, rfeedcnt + 1, EMPTY2); |
|
|
706 | rfeeds [rfeedcnt++] = w; |
|
|
707 | } |
|
|
708 | |
|
|
709 | inline_size void |
|
|
710 | feed_reverse_done (EV_P_ int revents) |
|
|
711 | { |
|
|
712 | do |
|
|
713 | ev_feed_event (EV_A_ rfeeds [--rfeedcnt], revents); |
|
|
714 | while (rfeedcnt); |
|
|
715 | } |
|
|
716 | |
|
|
717 | inline_speed void |
703 | queue_events (EV_P_ W *events, int eventcnt, int type) |
718 | queue_events (EV_P_ W *events, int eventcnt, int type) |
704 | { |
719 | { |
705 | int i; |
720 | int i; |
706 | |
721 | |
707 | for (i = 0; i < eventcnt; ++i) |
722 | for (i = 0; i < eventcnt; ++i) |
708 | ev_feed_event (EV_A_ events [i], type); |
723 | ev_feed_event (EV_A_ events [i], type); |
709 | } |
724 | } |
710 | |
725 | |
711 | /*****************************************************************************/ |
726 | /*****************************************************************************/ |
712 | |
727 | |
713 | void inline_speed |
728 | inline_speed void |
714 | fd_event (EV_P_ int fd, int revents) |
729 | fd_event (EV_P_ int fd, int revents) |
715 | { |
730 | { |
716 | ANFD *anfd = anfds + fd; |
731 | ANFD *anfd = anfds + fd; |
717 | ev_io *w; |
732 | ev_io *w; |
718 | |
733 | |
… | |
… | |
730 | { |
745 | { |
731 | if (fd >= 0 && fd < anfdmax) |
746 | if (fd >= 0 && fd < anfdmax) |
732 | fd_event (EV_A_ fd, revents); |
747 | fd_event (EV_A_ fd, revents); |
733 | } |
748 | } |
734 | |
749 | |
735 | void inline_size |
750 | inline_size void |
736 | fd_reify (EV_P) |
751 | fd_reify (EV_P) |
737 | { |
752 | { |
738 | int i; |
753 | int i; |
739 | |
754 | |
740 | for (i = 0; i < fdchangecnt; ++i) |
755 | for (i = 0; i < fdchangecnt; ++i) |
… | |
… | |
774 | } |
789 | } |
775 | |
790 | |
776 | fdchangecnt = 0; |
791 | fdchangecnt = 0; |
777 | } |
792 | } |
778 | |
793 | |
779 | void inline_size |
794 | inline_size void |
780 | fd_change (EV_P_ int fd, int flags) |
795 | fd_change (EV_P_ int fd, int flags) |
781 | { |
796 | { |
782 | unsigned char reify = anfds [fd].reify; |
797 | unsigned char reify = anfds [fd].reify; |
783 | anfds [fd].reify |= flags; |
798 | anfds [fd].reify |= flags; |
784 | |
799 | |
… | |
… | |
788 | array_needsize (int, fdchanges, fdchangemax, fdchangecnt, EMPTY2); |
803 | array_needsize (int, fdchanges, fdchangemax, fdchangecnt, EMPTY2); |
789 | fdchanges [fdchangecnt - 1] = fd; |
804 | fdchanges [fdchangecnt - 1] = fd; |
790 | } |
805 | } |
791 | } |
806 | } |
792 | |
807 | |
793 | void inline_speed |
808 | inline_speed void |
794 | fd_kill (EV_P_ int fd) |
809 | fd_kill (EV_P_ int fd) |
795 | { |
810 | { |
796 | ev_io *w; |
811 | ev_io *w; |
797 | |
812 | |
798 | while ((w = (ev_io *)anfds [fd].head)) |
813 | while ((w = (ev_io *)anfds [fd].head)) |
… | |
… | |
800 | ev_io_stop (EV_A_ w); |
815 | ev_io_stop (EV_A_ w); |
801 | ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE); |
816 | ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE); |
802 | } |
817 | } |
803 | } |
818 | } |
804 | |
819 | |
805 | int inline_size |
820 | inline_size int |
806 | fd_valid (int fd) |
821 | fd_valid (int fd) |
807 | { |
822 | { |
808 | #ifdef _WIN32 |
823 | #ifdef _WIN32 |
809 | return _get_osfhandle (fd) != -1; |
824 | return _get_osfhandle (fd) != -1; |
810 | #else |
825 | #else |
… | |
… | |
873 | #define HEAP0 (DHEAP - 1) /* index of first element in heap */ |
888 | #define HEAP0 (DHEAP - 1) /* index of first element in heap */ |
874 | #define HPARENT(k) ((((k) - HEAP0 - 1) / DHEAP) + HEAP0) |
889 | #define HPARENT(k) ((((k) - HEAP0 - 1) / DHEAP) + HEAP0) |
875 | #define UPHEAP_DONE(p,k) ((p) == (k)) |
890 | #define UPHEAP_DONE(p,k) ((p) == (k)) |
876 | |
891 | |
877 | /* away from the root */ |
892 | /* away from the root */ |
878 | void inline_speed |
893 | inline_speed void |
879 | downheap (ANHE *heap, int N, int k) |
894 | downheap (ANHE *heap, int N, int k) |
880 | { |
895 | { |
881 | ANHE he = heap [k]; |
896 | ANHE he = heap [k]; |
882 | ANHE *E = heap + N + HEAP0; |
897 | ANHE *E = heap + N + HEAP0; |
883 | |
898 | |
… | |
… | |
923 | #define HEAP0 1 |
938 | #define HEAP0 1 |
924 | #define HPARENT(k) ((k) >> 1) |
939 | #define HPARENT(k) ((k) >> 1) |
925 | #define UPHEAP_DONE(p,k) (!(p)) |
940 | #define UPHEAP_DONE(p,k) (!(p)) |
926 | |
941 | |
927 | /* away from the root */ |
942 | /* away from the root */ |
928 | void inline_speed |
943 | inline_speed void |
929 | downheap (ANHE *heap, int N, int k) |
944 | downheap (ANHE *heap, int N, int k) |
930 | { |
945 | { |
931 | ANHE he = heap [k]; |
946 | ANHE he = heap [k]; |
932 | |
947 | |
933 | for (;;) |
948 | for (;;) |
… | |
… | |
953 | ev_active (ANHE_w (he)) = k; |
968 | ev_active (ANHE_w (he)) = k; |
954 | } |
969 | } |
955 | #endif |
970 | #endif |
956 | |
971 | |
957 | /* towards the root */ |
972 | /* towards the root */ |
958 | void inline_speed |
973 | inline_speed void |
959 | upheap (ANHE *heap, int k) |
974 | upheap (ANHE *heap, int k) |
960 | { |
975 | { |
961 | ANHE he = heap [k]; |
976 | ANHE he = heap [k]; |
962 | |
977 | |
963 | for (;;) |
978 | for (;;) |
… | |
… | |
974 | |
989 | |
975 | heap [k] = he; |
990 | heap [k] = he; |
976 | ev_active (ANHE_w (he)) = k; |
991 | ev_active (ANHE_w (he)) = k; |
977 | } |
992 | } |
978 | |
993 | |
979 | void inline_size |
994 | inline_size void |
980 | adjustheap (ANHE *heap, int N, int k) |
995 | adjustheap (ANHE *heap, int N, int k) |
981 | { |
996 | { |
982 | if (k > HEAP0 && ANHE_at (heap [HPARENT (k)]) >= ANHE_at (heap [k])) |
997 | if (k > HEAP0 && ANHE_at (heap [HPARENT (k)]) >= ANHE_at (heap [k])) |
983 | upheap (heap, k); |
998 | upheap (heap, k); |
984 | else |
999 | else |
985 | downheap (heap, N, k); |
1000 | downheap (heap, N, k); |
986 | } |
1001 | } |
987 | |
1002 | |
988 | /* rebuild the heap: this function is used only once and executed rarely */ |
1003 | /* rebuild the heap: this function is used only once and executed rarely */ |
989 | void inline_size |
1004 | inline_size void |
990 | reheap (ANHE *heap, int N) |
1005 | reheap (ANHE *heap, int N) |
991 | { |
1006 | { |
992 | int i; |
1007 | int i; |
993 | |
1008 | |
994 | /* we don't use floyds algorithm, upheap is simpler and is more cache-efficient */ |
1009 | /* we don't use floyds algorithm, upheap is simpler and is more cache-efficient */ |
… | |
… | |
1010 | |
1025 | |
1011 | static EV_ATOMIC_T gotsig; |
1026 | static EV_ATOMIC_T gotsig; |
1012 | |
1027 | |
1013 | /*****************************************************************************/ |
1028 | /*****************************************************************************/ |
1014 | |
1029 | |
1015 | void inline_speed |
1030 | inline_speed void |
1016 | fd_intern (int fd) |
1031 | fd_intern (int fd) |
1017 | { |
1032 | { |
1018 | #ifdef _WIN32 |
1033 | #ifdef _WIN32 |
1019 | unsigned long arg = 1; |
1034 | unsigned long arg = 1; |
1020 | ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg); |
1035 | ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg); |
… | |
… | |
1050 | ev_io_start (EV_A_ &pipeev); |
1065 | ev_io_start (EV_A_ &pipeev); |
1051 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
1066 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
1052 | } |
1067 | } |
1053 | } |
1068 | } |
1054 | |
1069 | |
1055 | void inline_size |
1070 | inline_size void |
1056 | evpipe_write (EV_P_ EV_ATOMIC_T *flag) |
1071 | evpipe_write (EV_P_ EV_ATOMIC_T *flag) |
1057 | { |
1072 | { |
1058 | if (!*flag) |
1073 | if (!*flag) |
1059 | { |
1074 | { |
1060 | int old_errno = errno; /* save errno because write might clobber it */ |
1075 | int old_errno = errno; /* save errno because write might clobber it */ |
… | |
… | |
1164 | |
1179 | |
1165 | #ifndef WIFCONTINUED |
1180 | #ifndef WIFCONTINUED |
1166 | # define WIFCONTINUED(status) 0 |
1181 | # define WIFCONTINUED(status) 0 |
1167 | #endif |
1182 | #endif |
1168 | |
1183 | |
1169 | void inline_speed |
1184 | inline_speed void |
1170 | child_reap (EV_P_ int chain, int pid, int status) |
1185 | child_reap (EV_P_ int chain, int pid, int status) |
1171 | { |
1186 | { |
1172 | ev_child *w; |
1187 | ev_child *w; |
1173 | int traced = WIFSTOPPED (status) || WIFCONTINUED (status); |
1188 | int traced = WIFSTOPPED (status) || WIFCONTINUED (status); |
1174 | |
1189 | |
… | |
… | |
1452 | } |
1467 | } |
1453 | |
1468 | |
1454 | ev_free (anfds); anfdmax = 0; |
1469 | ev_free (anfds); anfdmax = 0; |
1455 | |
1470 | |
1456 | /* have to use the microsoft-never-gets-it-right macro */ |
1471 | /* have to use the microsoft-never-gets-it-right macro */ |
|
|
1472 | array_free (rfeed, EMPTY); |
1457 | array_free (fdchange, EMPTY); |
1473 | array_free (fdchange, EMPTY); |
1458 | array_free (timer, EMPTY); |
1474 | array_free (timer, EMPTY); |
1459 | #if EV_PERIODIC_ENABLE |
1475 | #if EV_PERIODIC_ENABLE |
1460 | array_free (periodic, EMPTY); |
1476 | array_free (periodic, EMPTY); |
1461 | #endif |
1477 | #endif |
… | |
… | |
1470 | |
1486 | |
1471 | backend = 0; |
1487 | backend = 0; |
1472 | } |
1488 | } |
1473 | |
1489 | |
1474 | #if EV_USE_INOTIFY |
1490 | #if EV_USE_INOTIFY |
1475 | void inline_size infy_fork (EV_P); |
1491 | inline_size void infy_fork (EV_P); |
1476 | #endif |
1492 | #endif |
1477 | |
1493 | |
1478 | void inline_size |
1494 | inline_size void |
1479 | loop_fork (EV_P) |
1495 | loop_fork (EV_P) |
1480 | { |
1496 | { |
1481 | #if EV_USE_PORT |
1497 | #if EV_USE_PORT |
1482 | if (backend == EVBACKEND_PORT ) port_fork (EV_A); |
1498 | if (backend == EVBACKEND_PORT ) port_fork (EV_A); |
1483 | #endif |
1499 | #endif |
… | |
… | |
1720 | ev_invoke (EV_P_ void *w, int revents) |
1736 | ev_invoke (EV_P_ void *w, int revents) |
1721 | { |
1737 | { |
1722 | EV_CB_INVOKE ((W)w, revents); |
1738 | EV_CB_INVOKE ((W)w, revents); |
1723 | } |
1739 | } |
1724 | |
1740 | |
1725 | void inline_speed |
1741 | inline_speed void |
1726 | call_pending (EV_P) |
1742 | call_pending (EV_P) |
1727 | { |
1743 | { |
1728 | int pri; |
1744 | int pri; |
1729 | |
1745 | |
1730 | for (pri = NUMPRI; pri--; ) |
1746 | for (pri = NUMPRI; pri--; ) |
… | |
… | |
1742 | } |
1758 | } |
1743 | } |
1759 | } |
1744 | } |
1760 | } |
1745 | |
1761 | |
1746 | #if EV_IDLE_ENABLE |
1762 | #if EV_IDLE_ENABLE |
1747 | void inline_size |
1763 | inline_size void |
1748 | idle_reify (EV_P) |
1764 | idle_reify (EV_P) |
1749 | { |
1765 | { |
1750 | if (expect_false (idleall)) |
1766 | if (expect_false (idleall)) |
1751 | { |
1767 | { |
1752 | int pri; |
1768 | int pri; |
… | |
… | |
1764 | } |
1780 | } |
1765 | } |
1781 | } |
1766 | } |
1782 | } |
1767 | #endif |
1783 | #endif |
1768 | |
1784 | |
1769 | void inline_size |
1785 | inline_size void |
1770 | timers_reify (EV_P) |
1786 | timers_reify (EV_P) |
1771 | { |
1787 | { |
1772 | EV_FREQUENT_CHECK; |
1788 | EV_FREQUENT_CHECK; |
1773 | |
1789 | |
1774 | while (timercnt && ANHE_at (timers [HEAP0]) < mn_now) |
1790 | if (timercnt && ANHE_at (timers [HEAP0]) < mn_now) |
1775 | { |
1791 | { |
1776 | ev_timer *w = (ev_timer *)ANHE_w (timers [HEAP0]); |
1792 | do |
1777 | |
|
|
1778 | /*assert (("libev: inactive timer on timer heap detected", ev_is_active (w)));*/ |
|
|
1779 | |
|
|
1780 | /* first reschedule or stop timer */ |
|
|
1781 | if (w->repeat) |
|
|
1782 | { |
1793 | { |
|
|
1794 | ev_timer *w = (ev_timer *)ANHE_w (timers [HEAP0]); |
|
|
1795 | |
|
|
1796 | /*assert (("libev: inactive timer on timer heap detected", ev_is_active (w)));*/ |
|
|
1797 | |
|
|
1798 | /* first reschedule or stop timer */ |
|
|
1799 | if (w->repeat) |
|
|
1800 | { |
1783 | ev_at (w) += w->repeat; |
1801 | ev_at (w) += w->repeat; |
1784 | if (ev_at (w) < mn_now) |
1802 | if (ev_at (w) < mn_now) |
1785 | ev_at (w) = mn_now; |
1803 | ev_at (w) = mn_now; |
1786 | |
1804 | |
1787 | assert (("libev: negative ev_timer repeat value found while processing timers", w->repeat > 0.)); |
1805 | assert (("libev: negative ev_timer repeat value found while processing timers", w->repeat > 0.)); |
1788 | |
1806 | |
1789 | ANHE_at_cache (timers [HEAP0]); |
1807 | ANHE_at_cache (timers [HEAP0]); |
1790 | downheap (timers, timercnt, HEAP0); |
1808 | downheap (timers, timercnt, HEAP0); |
|
|
1809 | } |
|
|
1810 | else |
|
|
1811 | ev_timer_stop (EV_A_ w); /* nonrepeating: stop timer */ |
|
|
1812 | |
|
|
1813 | EV_FREQUENT_CHECK; |
|
|
1814 | feed_reverse (EV_A_ (W)w); |
1791 | } |
1815 | } |
1792 | else |
1816 | while (timercnt && ANHE_at (timers [HEAP0]) < mn_now); |
1793 | ev_timer_stop (EV_A_ w); /* nonrepeating: stop timer */ |
|
|
1794 | |
1817 | |
1795 | EV_FREQUENT_CHECK; |
|
|
1796 | ev_feed_event (EV_A_ (W)w, EV_TIMEOUT); |
1818 | feed_reverse_done (EV_A_ EV_TIMEOUT); |
1797 | } |
1819 | } |
1798 | } |
1820 | } |
1799 | |
1821 | |
1800 | #if EV_PERIODIC_ENABLE |
1822 | #if EV_PERIODIC_ENABLE |
1801 | void inline_size |
1823 | inline_size void |
1802 | periodics_reify (EV_P) |
1824 | periodics_reify (EV_P) |
1803 | { |
1825 | { |
1804 | EV_FREQUENT_CHECK; |
1826 | EV_FREQUENT_CHECK; |
1805 | |
1827 | |
1806 | while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now) |
1828 | while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now) |
1807 | { |
1829 | { |
1808 | ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]); |
1830 | int feed_count = 0; |
1809 | |
1831 | |
1810 | /*assert (("libev: inactive timer on periodic heap detected", ev_is_active (w)));*/ |
1832 | do |
1811 | |
|
|
1812 | /* first reschedule or stop timer */ |
|
|
1813 | if (w->reschedule_cb) |
|
|
1814 | { |
1833 | { |
|
|
1834 | ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]); |
|
|
1835 | |
|
|
1836 | /*assert (("libev: inactive timer on periodic heap detected", ev_is_active (w)));*/ |
|
|
1837 | |
|
|
1838 | /* first reschedule or stop timer */ |
|
|
1839 | if (w->reschedule_cb) |
|
|
1840 | { |
1815 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
1841 | ev_at (w) = w->reschedule_cb (w, ev_rt_now); |
1816 | |
1842 | |
1817 | assert (("libev: ev_periodic reschedule callback returned time in the past", ev_at (w) >= ev_rt_now)); |
1843 | assert (("libev: ev_periodic reschedule callback returned time in the past", ev_at (w) >= ev_rt_now)); |
1818 | |
1844 | |
1819 | ANHE_at_cache (periodics [HEAP0]); |
1845 | ANHE_at_cache (periodics [HEAP0]); |
1820 | downheap (periodics, periodiccnt, HEAP0); |
1846 | downheap (periodics, periodiccnt, HEAP0); |
|
|
1847 | } |
|
|
1848 | else if (w->interval) |
|
|
1849 | { |
|
|
1850 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
|
|
1851 | /* if next trigger time is not sufficiently in the future, put it there */ |
|
|
1852 | /* this might happen because of floating point inexactness */ |
|
|
1853 | if (ev_at (w) - ev_rt_now < TIME_EPSILON) |
|
|
1854 | { |
|
|
1855 | ev_at (w) += w->interval; |
|
|
1856 | |
|
|
1857 | /* if interval is unreasonably low we might still have a time in the past */ |
|
|
1858 | /* so correct this. this will make the periodic very inexact, but the user */ |
|
|
1859 | /* has effectively asked to get triggered more often than possible */ |
|
|
1860 | if (ev_at (w) < ev_rt_now) |
|
|
1861 | ev_at (w) = ev_rt_now; |
|
|
1862 | } |
|
|
1863 | |
|
|
1864 | ANHE_at_cache (periodics [HEAP0]); |
|
|
1865 | downheap (periodics, periodiccnt, HEAP0); |
|
|
1866 | } |
|
|
1867 | else |
|
|
1868 | ev_periodic_stop (EV_A_ w); /* nonrepeating: stop timer */ |
|
|
1869 | |
|
|
1870 | EV_FREQUENT_CHECK; |
|
|
1871 | feed_reverse (EV_A_ (W)w); |
1821 | } |
1872 | } |
1822 | else if (w->interval) |
1873 | while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now); |
1823 | { |
|
|
1824 | ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval; |
|
|
1825 | /* if next trigger time is not sufficiently in the future, put it there */ |
|
|
1826 | /* this might happen because of floating point inexactness */ |
|
|
1827 | if (ev_at (w) - ev_rt_now < TIME_EPSILON) |
|
|
1828 | { |
|
|
1829 | ev_at (w) += w->interval; |
|
|
1830 | |
1874 | |
1831 | /* if interval is unreasonably low we might still have a time in the past */ |
|
|
1832 | /* so correct this. this will make the periodic very inexact, but the user */ |
|
|
1833 | /* has effectively asked to get triggered more often than possible */ |
|
|
1834 | if (ev_at (w) < ev_rt_now) |
|
|
1835 | ev_at (w) = ev_rt_now; |
|
|
1836 | } |
|
|
1837 | |
|
|
1838 | ANHE_at_cache (periodics [HEAP0]); |
|
|
1839 | downheap (periodics, periodiccnt, HEAP0); |
|
|
1840 | } |
|
|
1841 | else |
|
|
1842 | ev_periodic_stop (EV_A_ w); /* nonrepeating: stop timer */ |
|
|
1843 | |
|
|
1844 | EV_FREQUENT_CHECK; |
|
|
1845 | ev_feed_event (EV_A_ (W)w, EV_PERIODIC); |
1875 | feed_reverse_done (EV_A_ EV_PERIODIC); |
1846 | } |
1876 | } |
1847 | } |
1877 | } |
1848 | |
1878 | |
1849 | static void noinline |
1879 | static void noinline |
1850 | periodics_reschedule (EV_P) |
1880 | periodics_reschedule (EV_P) |
… | |
… | |
1866 | |
1896 | |
1867 | reheap (periodics, periodiccnt); |
1897 | reheap (periodics, periodiccnt); |
1868 | } |
1898 | } |
1869 | #endif |
1899 | #endif |
1870 | |
1900 | |
1871 | void inline_speed |
1901 | static void noinline |
|
|
1902 | timers_reschedule (EV_P_ ev_tstamp adjust) |
|
|
1903 | { |
|
|
1904 | int i; |
|
|
1905 | |
|
|
1906 | for (i = 0; i < timercnt; ++i) |
|
|
1907 | { |
|
|
1908 | ANHE *he = timers + i + HEAP0; |
|
|
1909 | ANHE_w (*he)->at += adjust; |
|
|
1910 | ANHE_at_cache (*he); |
|
|
1911 | } |
|
|
1912 | } |
|
|
1913 | |
|
|
1914 | inline_speed void |
1872 | time_update (EV_P_ ev_tstamp max_block) |
1915 | time_update (EV_P_ ev_tstamp max_block) |
1873 | { |
1916 | { |
1874 | int i; |
1917 | int i; |
1875 | |
1918 | |
1876 | #if EV_USE_MONOTONIC |
1919 | #if EV_USE_MONOTONIC |
… | |
… | |
1909 | ev_rt_now = ev_time (); |
1952 | ev_rt_now = ev_time (); |
1910 | mn_now = get_clock (); |
1953 | mn_now = get_clock (); |
1911 | now_floor = mn_now; |
1954 | now_floor = mn_now; |
1912 | } |
1955 | } |
1913 | |
1956 | |
|
|
1957 | /* no timer adjustment, as the monotonic clock doesn't jump */ |
|
|
1958 | /* timers_reschedule (EV_A_ rtmn_diff - odiff) */ |
1914 | # if EV_PERIODIC_ENABLE |
1959 | # if EV_PERIODIC_ENABLE |
1915 | periodics_reschedule (EV_A); |
1960 | periodics_reschedule (EV_A); |
1916 | # endif |
1961 | # endif |
1917 | /* no timer adjustment, as the monotonic clock doesn't jump */ |
|
|
1918 | /* timers_reschedule (EV_A_ rtmn_diff - odiff) */ |
|
|
1919 | } |
1962 | } |
1920 | else |
1963 | else |
1921 | #endif |
1964 | #endif |
1922 | { |
1965 | { |
1923 | ev_rt_now = ev_time (); |
1966 | ev_rt_now = ev_time (); |
1924 | |
1967 | |
1925 | if (expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + MIN_TIMEJUMP)) |
1968 | if (expect_false (mn_now > ev_rt_now || ev_rt_now > mn_now + max_block + MIN_TIMEJUMP)) |
1926 | { |
1969 | { |
|
|
1970 | /* adjust timers. this is easy, as the offset is the same for all of them */ |
|
|
1971 | timers_reschedule (EV_A_ ev_rt_now - mn_now); |
1927 | #if EV_PERIODIC_ENABLE |
1972 | #if EV_PERIODIC_ENABLE |
1928 | periodics_reschedule (EV_A); |
1973 | periodics_reschedule (EV_A); |
1929 | #endif |
1974 | #endif |
1930 | /* adjust timers. this is easy, as the offset is the same for all of them */ |
|
|
1931 | for (i = 0; i < timercnt; ++i) |
|
|
1932 | { |
|
|
1933 | ANHE *he = timers + i + HEAP0; |
|
|
1934 | ANHE_w (*he)->at += ev_rt_now - mn_now; |
|
|
1935 | ANHE_at_cache (*he); |
|
|
1936 | } |
|
|
1937 | } |
1975 | } |
1938 | |
1976 | |
1939 | mn_now = ev_rt_now; |
1977 | mn_now = ev_rt_now; |
1940 | } |
1978 | } |
1941 | } |
|
|
1942 | |
|
|
1943 | void |
|
|
1944 | ev_ref (EV_P) |
|
|
1945 | { |
|
|
1946 | ++activecnt; |
|
|
1947 | } |
|
|
1948 | |
|
|
1949 | void |
|
|
1950 | ev_unref (EV_P) |
|
|
1951 | { |
|
|
1952 | --activecnt; |
|
|
1953 | } |
|
|
1954 | |
|
|
1955 | void |
|
|
1956 | ev_now_update (EV_P) |
|
|
1957 | { |
|
|
1958 | time_update (EV_A_ 1e100); |
|
|
1959 | } |
1979 | } |
1960 | |
1980 | |
1961 | static int loop_done; |
1981 | static int loop_done; |
1962 | |
1982 | |
1963 | void |
1983 | void |
… | |
… | |
1997 | { |
2017 | { |
1998 | queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE); |
2018 | queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE); |
1999 | call_pending (EV_A); |
2019 | call_pending (EV_A); |
2000 | } |
2020 | } |
2001 | |
2021 | |
2002 | if (expect_false (!activecnt)) |
|
|
2003 | break; |
|
|
2004 | |
|
|
2005 | /* we might have forked, so reify kernel state if necessary */ |
2022 | /* we might have forked, so reify kernel state if necessary */ |
2006 | if (expect_false (postfork)) |
2023 | if (expect_false (postfork)) |
2007 | loop_fork (EV_A); |
2024 | loop_fork (EV_A); |
2008 | |
2025 | |
2009 | /* update fd-related kernel structures */ |
2026 | /* update fd-related kernel structures */ |
… | |
… | |
2016 | |
2033 | |
2017 | if (expect_true (!(flags & EVLOOP_NONBLOCK || idleall || !activecnt))) |
2034 | if (expect_true (!(flags & EVLOOP_NONBLOCK || idleall || !activecnt))) |
2018 | { |
2035 | { |
2019 | /* update time to cancel out callback processing overhead */ |
2036 | /* update time to cancel out callback processing overhead */ |
2020 | time_update (EV_A_ 1e100); |
2037 | time_update (EV_A_ 1e100); |
2021 | |
|
|
2022 | waittime = MAX_BLOCKTIME; |
|
|
2023 | |
2038 | |
2024 | if (timercnt) |
2039 | if (timercnt) |
2025 | { |
2040 | { |
2026 | ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge; |
2041 | ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge; |
2027 | if (waittime > to) waittime = to; |
2042 | if (waittime > to) waittime = to; |
… | |
… | |
2088 | ev_unloop (EV_P_ int how) |
2103 | ev_unloop (EV_P_ int how) |
2089 | { |
2104 | { |
2090 | loop_done = how; |
2105 | loop_done = how; |
2091 | } |
2106 | } |
2092 | |
2107 | |
|
|
2108 | void |
|
|
2109 | ev_ref (EV_P) |
|
|
2110 | { |
|
|
2111 | ++activecnt; |
|
|
2112 | } |
|
|
2113 | |
|
|
2114 | void |
|
|
2115 | ev_unref (EV_P) |
|
|
2116 | { |
|
|
2117 | --activecnt; |
|
|
2118 | } |
|
|
2119 | |
|
|
2120 | void |
|
|
2121 | ev_now_update (EV_P) |
|
|
2122 | { |
|
|
2123 | time_update (EV_A_ 1e100); |
|
|
2124 | } |
|
|
2125 | |
|
|
2126 | void |
|
|
2127 | ev_suspend (EV_P) |
|
|
2128 | { |
|
|
2129 | ev_now_update (EV_A); |
|
|
2130 | } |
|
|
2131 | |
|
|
2132 | void |
|
|
2133 | ev_resume (EV_P) |
|
|
2134 | { |
|
|
2135 | ev_tstamp mn_prev = mn_now; |
|
|
2136 | |
|
|
2137 | ev_now_update (EV_A); |
|
|
2138 | timers_reschedule (EV_A_ mn_now - mn_prev); |
|
|
2139 | #if EV_PERIODIC_ENABLE |
|
|
2140 | periodics_reschedule (EV_A); |
|
|
2141 | #endif |
|
|
2142 | } |
|
|
2143 | |
2093 | /*****************************************************************************/ |
2144 | /*****************************************************************************/ |
2094 | |
2145 | |
2095 | void inline_size |
2146 | inline_size void |
2096 | wlist_add (WL *head, WL elem) |
2147 | wlist_add (WL *head, WL elem) |
2097 | { |
2148 | { |
2098 | elem->next = *head; |
2149 | elem->next = *head; |
2099 | *head = elem; |
2150 | *head = elem; |
2100 | } |
2151 | } |
2101 | |
2152 | |
2102 | void inline_size |
2153 | inline_size void |
2103 | wlist_del (WL *head, WL elem) |
2154 | wlist_del (WL *head, WL elem) |
2104 | { |
2155 | { |
2105 | while (*head) |
2156 | while (*head) |
2106 | { |
2157 | { |
2107 | if (*head == elem) |
2158 | if (*head == elem) |
… | |
… | |
2112 | |
2163 | |
2113 | head = &(*head)->next; |
2164 | head = &(*head)->next; |
2114 | } |
2165 | } |
2115 | } |
2166 | } |
2116 | |
2167 | |
2117 | void inline_speed |
2168 | inline_speed void |
2118 | clear_pending (EV_P_ W w) |
2169 | clear_pending (EV_P_ W w) |
2119 | { |
2170 | { |
2120 | if (w->pending) |
2171 | if (w->pending) |
2121 | { |
2172 | { |
2122 | pendings [ABSPRI (w)][w->pending - 1].w = 0; |
2173 | pendings [ABSPRI (w)][w->pending - 1].w = 0; |
… | |
… | |
2139 | } |
2190 | } |
2140 | else |
2191 | else |
2141 | return 0; |
2192 | return 0; |
2142 | } |
2193 | } |
2143 | |
2194 | |
2144 | void inline_size |
2195 | inline_size void |
2145 | pri_adjust (EV_P_ W w) |
2196 | pri_adjust (EV_P_ W w) |
2146 | { |
2197 | { |
2147 | int pri = w->priority; |
2198 | int pri = w->priority; |
2148 | pri = pri < EV_MINPRI ? EV_MINPRI : pri; |
2199 | pri = pri < EV_MINPRI ? EV_MINPRI : pri; |
2149 | pri = pri > EV_MAXPRI ? EV_MAXPRI : pri; |
2200 | pri = pri > EV_MAXPRI ? EV_MAXPRI : pri; |
2150 | w->priority = pri; |
2201 | w->priority = pri; |
2151 | } |
2202 | } |
2152 | |
2203 | |
2153 | void inline_speed |
2204 | inline_speed void |
2154 | ev_start (EV_P_ W w, int active) |
2205 | ev_start (EV_P_ W w, int active) |
2155 | { |
2206 | { |
2156 | pri_adjust (EV_A_ w); |
2207 | pri_adjust (EV_A_ w); |
2157 | w->active = active; |
2208 | w->active = active; |
2158 | ev_ref (EV_A); |
2209 | ev_ref (EV_A); |
2159 | } |
2210 | } |
2160 | |
2211 | |
2161 | void inline_size |
2212 | inline_size void |
2162 | ev_stop (EV_P_ W w) |
2213 | ev_stop (EV_P_ W w) |
2163 | { |
2214 | { |
2164 | ev_unref (EV_A); |
2215 | ev_unref (EV_A); |
2165 | w->active = 0; |
2216 | w->active = 0; |
2166 | } |
2217 | } |
… | |
… | |
2591 | |
2642 | |
2592 | for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len) |
2643 | for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len) |
2593 | infy_wd (EV_A_ ev->wd, ev->wd, ev); |
2644 | infy_wd (EV_A_ ev->wd, ev->wd, ev); |
2594 | } |
2645 | } |
2595 | |
2646 | |
2596 | void inline_size |
2647 | inline_size void |
2597 | check_2625 (EV_P) |
2648 | check_2625 (EV_P) |
2598 | { |
2649 | { |
2599 | /* kernels < 2.6.25 are borked |
2650 | /* kernels < 2.6.25 are borked |
2600 | * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html |
2651 | * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html |
2601 | */ |
2652 | */ |
… | |
… | |
2614 | return; |
2665 | return; |
2615 | |
2666 | |
2616 | fs_2625 = 1; |
2667 | fs_2625 = 1; |
2617 | } |
2668 | } |
2618 | |
2669 | |
2619 | void inline_size |
2670 | inline_size void |
2620 | infy_init (EV_P) |
2671 | infy_init (EV_P) |
2621 | { |
2672 | { |
2622 | if (fs_fd != -2) |
2673 | if (fs_fd != -2) |
2623 | return; |
2674 | return; |
2624 | |
2675 | |
… | |
… | |
2634 | ev_set_priority (&fs_w, EV_MAXPRI); |
2685 | ev_set_priority (&fs_w, EV_MAXPRI); |
2635 | ev_io_start (EV_A_ &fs_w); |
2686 | ev_io_start (EV_A_ &fs_w); |
2636 | } |
2687 | } |
2637 | } |
2688 | } |
2638 | |
2689 | |
2639 | void inline_size |
2690 | inline_size void |
2640 | infy_fork (EV_P) |
2691 | infy_fork (EV_P) |
2641 | { |
2692 | { |
2642 | int slot; |
2693 | int slot; |
2643 | |
2694 | |
2644 | if (fs_fd < 0) |
2695 | if (fs_fd < 0) |
… | |
… | |
3146 | ev_timer_set (&once->to, timeout, 0.); |
3197 | ev_timer_set (&once->to, timeout, 0.); |
3147 | ev_timer_start (EV_A_ &once->to); |
3198 | ev_timer_start (EV_A_ &once->to); |
3148 | } |
3199 | } |
3149 | } |
3200 | } |
3150 | |
3201 | |
|
|
3202 | /*****************************************************************************/ |
|
|
3203 | |
|
|
3204 | #if 0 |
|
|
3205 | void |
|
|
3206 | ev_walk (EV_P_ int types, void (*cb)(EV_P_ int type, void *w)) |
|
|
3207 | { |
|
|
3208 | int i, j; |
|
|
3209 | ev_watcher_list *wl, *wn; |
|
|
3210 | |
|
|
3211 | if (types & (EV_IO | EV_EMBED)) |
|
|
3212 | for (i = 0; i < anfdmax; ++i) |
|
|
3213 | for (wl = anfds [i].head; wl; ) |
|
|
3214 | { |
|
|
3215 | wn = wl->next; |
|
|
3216 | |
|
|
3217 | #if EV_EMBED_ENABLE |
|
|
3218 | if (ev_cb ((ev_io *)wl) == embed_io_cb) |
|
|
3219 | { |
|
|
3220 | if (types & EV_EMBED) |
|
|
3221 | cb (EV_A_ EV_EMBED, ((char *)wl) - offsetof (struct ev_embed, io)); |
|
|
3222 | } |
|
|
3223 | else |
|
|
3224 | #endif |
|
|
3225 | #if EV_USE_INOTIFY |
|
|
3226 | if (ev_cb ((ev_io *)wl) == infy_cb) |
|
|
3227 | ; |
|
|
3228 | else |
|
|
3229 | #endif |
|
|
3230 | if ((ev_io *)wl != &pipeev) |
|
|
3231 | if (types & EV_IO) |
|
|
3232 | cb (EV_A_ EV_IO, wl); |
|
|
3233 | |
|
|
3234 | wl = wn; |
|
|
3235 | } |
|
|
3236 | |
|
|
3237 | if (types & (EV_TIMER | EV_STAT)) |
|
|
3238 | for (i = timercnt + HEAP0; i-- > HEAP0; ) |
|
|
3239 | #if EV_STAT_ENABLE |
|
|
3240 | /*TODO: timer is not always active*/ |
|
|
3241 | if (ev_cb ((ev_timer *)ANHE_w (timers [i])) == stat_timer_cb) |
|
|
3242 | { |
|
|
3243 | if (types & EV_STAT) |
|
|
3244 | cb (EV_A_ EV_STAT, ((char *)ANHE_w (timers [i])) - offsetof (struct ev_stat, timer)); |
|
|
3245 | } |
|
|
3246 | else |
|
|
3247 | #endif |
|
|
3248 | if (types & EV_TIMER) |
|
|
3249 | cb (EV_A_ EV_TIMER, ANHE_w (timers [i])); |
|
|
3250 | |
|
|
3251 | #if EV_PERIODIC_ENABLE |
|
|
3252 | if (types & EV_PERIODIC) |
|
|
3253 | for (i = periodiccnt + HEAP0; i-- > HEAP0; ) |
|
|
3254 | cb (EV_A_ EV_PERIODIC, ANHE_w (periodics [i])); |
|
|
3255 | #endif |
|
|
3256 | |
|
|
3257 | #if EV_IDLE_ENABLE |
|
|
3258 | if (types & EV_IDLE) |
|
|
3259 | for (j = NUMPRI; i--; ) |
|
|
3260 | for (i = idlecnt [j]; i--; ) |
|
|
3261 | cb (EV_A_ EV_IDLE, idles [j][i]); |
|
|
3262 | #endif |
|
|
3263 | |
|
|
3264 | #if EV_FORK_ENABLE |
|
|
3265 | if (types & EV_FORK) |
|
|
3266 | for (i = forkcnt; i--; ) |
|
|
3267 | if (ev_cb (forks [i]) != embed_fork_cb) |
|
|
3268 | cb (EV_A_ EV_FORK, forks [i]); |
|
|
3269 | #endif |
|
|
3270 | |
|
|
3271 | #if EV_ASYNC_ENABLE |
|
|
3272 | if (types & EV_ASYNC) |
|
|
3273 | for (i = asynccnt; i--; ) |
|
|
3274 | cb (EV_A_ EV_ASYNC, asyncs [i]); |
|
|
3275 | #endif |
|
|
3276 | |
|
|
3277 | if (types & EV_PREPARE) |
|
|
3278 | for (i = preparecnt; i--; ) |
|
|
3279 | #if EV_EMBED_ENABLE |
|
|
3280 | if (ev_cb (prepares [i]) != embed_prepare_cb) |
|
|
3281 | #endif |
|
|
3282 | cb (EV_A_ EV_PREPARE, prepares [i]); |
|
|
3283 | |
|
|
3284 | if (types & EV_CHECK) |
|
|
3285 | for (i = checkcnt; i--; ) |
|
|
3286 | cb (EV_A_ EV_CHECK, checks [i]); |
|
|
3287 | |
|
|
3288 | if (types & EV_SIGNAL) |
|
|
3289 | for (i = 0; i < signalmax; ++i) |
|
|
3290 | for (wl = signals [i].head; wl; ) |
|
|
3291 | { |
|
|
3292 | wn = wl->next; |
|
|
3293 | cb (EV_A_ EV_SIGNAL, wl); |
|
|
3294 | wl = wn; |
|
|
3295 | } |
|
|
3296 | |
|
|
3297 | if (types & EV_CHILD) |
|
|
3298 | for (i = EV_PID_HASHSIZE; i--; ) |
|
|
3299 | for (wl = childs [i]; wl; ) |
|
|
3300 | { |
|
|
3301 | wn = wl->next; |
|
|
3302 | cb (EV_A_ EV_CHILD, wl); |
|
|
3303 | wl = wn; |
|
|
3304 | } |
|
|
3305 | /* EV_STAT 0x00001000 /* stat data changed */ |
|
|
3306 | /* EV_EMBED 0x00010000 /* embedded event loop needs sweep */ |
|
|
3307 | } |
|
|
3308 | #endif |
|
|
3309 | |
3151 | #if EV_MULTIPLICITY |
3310 | #if EV_MULTIPLICITY |
3152 | #include "ev_wrap.h" |
3311 | #include "ev_wrap.h" |
3153 | #endif |
3312 | #endif |
3154 | |
3313 | |
3155 | #ifdef __cplusplus |
3314 | #ifdef __cplusplus |