… | |
… | |
39 | |
39 | |
40 | #ifdef __cplusplus |
40 | #ifdef __cplusplus |
41 | extern "C" { |
41 | extern "C" { |
42 | #endif |
42 | #endif |
43 | |
43 | |
|
|
44 | /* this big block deduces configuration from config.h */ |
44 | #ifndef EV_STANDALONE |
45 | #ifndef EV_STANDALONE |
45 | # ifdef EV_CONFIG_H |
46 | # ifdef EV_CONFIG_H |
46 | # include EV_CONFIG_H |
47 | # include EV_CONFIG_H |
47 | # else |
48 | # else |
48 | # include "config.h" |
49 | # include "config.h" |
… | |
… | |
118 | # else |
119 | # else |
119 | # define EV_USE_INOTIFY 0 |
120 | # define EV_USE_INOTIFY 0 |
120 | # endif |
121 | # endif |
121 | # endif |
122 | # endif |
122 | |
123 | |
|
|
124 | # ifndef EV_USE_EVENTFD |
|
|
125 | # if HAVE_EVENTFD |
|
|
126 | # define EV_USE_EVENTFD 1 |
|
|
127 | # else |
|
|
128 | # define EV_USE_EVENTFD 0 |
|
|
129 | # endif |
|
|
130 | # endif |
|
|
131 | |
123 | #endif |
132 | #endif |
124 | |
133 | |
125 | #include <math.h> |
134 | #include <math.h> |
126 | #include <stdlib.h> |
135 | #include <stdlib.h> |
127 | #include <fcntl.h> |
136 | #include <fcntl.h> |
… | |
… | |
152 | # ifndef EV_SELECT_IS_WINSOCKET |
161 | # ifndef EV_SELECT_IS_WINSOCKET |
153 | # define EV_SELECT_IS_WINSOCKET 1 |
162 | # define EV_SELECT_IS_WINSOCKET 1 |
154 | # endif |
163 | # endif |
155 | #endif |
164 | #endif |
156 | |
165 | |
157 | /**/ |
166 | /* this block tries to deduce configuration from header-defined symbols and defaults */ |
158 | |
167 | |
159 | #ifndef EV_USE_MONOTONIC |
168 | #ifndef EV_USE_MONOTONIC |
160 | # define EV_USE_MONOTONIC 0 |
169 | # define EV_USE_MONOTONIC 0 |
161 | #endif |
170 | #endif |
162 | |
171 | |
… | |
… | |
179 | # define EV_USE_POLL 1 |
188 | # define EV_USE_POLL 1 |
180 | # endif |
189 | # endif |
181 | #endif |
190 | #endif |
182 | |
191 | |
183 | #ifndef EV_USE_EPOLL |
192 | #ifndef EV_USE_EPOLL |
|
|
193 | # if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4)) |
|
|
194 | # define EV_USE_EPOLL 1 |
|
|
195 | # else |
184 | # define EV_USE_EPOLL 0 |
196 | # define EV_USE_EPOLL 0 |
|
|
197 | # endif |
185 | #endif |
198 | #endif |
186 | |
199 | |
187 | #ifndef EV_USE_KQUEUE |
200 | #ifndef EV_USE_KQUEUE |
188 | # define EV_USE_KQUEUE 0 |
201 | # define EV_USE_KQUEUE 0 |
189 | #endif |
202 | #endif |
… | |
… | |
191 | #ifndef EV_USE_PORT |
204 | #ifndef EV_USE_PORT |
192 | # define EV_USE_PORT 0 |
205 | # define EV_USE_PORT 0 |
193 | #endif |
206 | #endif |
194 | |
207 | |
195 | #ifndef EV_USE_INOTIFY |
208 | #ifndef EV_USE_INOTIFY |
|
|
209 | # if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4)) |
|
|
210 | # define EV_USE_INOTIFY 1 |
|
|
211 | # else |
196 | # define EV_USE_INOTIFY 0 |
212 | # define EV_USE_INOTIFY 0 |
|
|
213 | # endif |
197 | #endif |
214 | #endif |
198 | |
215 | |
199 | #ifndef EV_PID_HASHSIZE |
216 | #ifndef EV_PID_HASHSIZE |
200 | # if EV_MINIMAL |
217 | # if EV_MINIMAL |
201 | # define EV_PID_HASHSIZE 1 |
218 | # define EV_PID_HASHSIZE 1 |
… | |
… | |
210 | # else |
227 | # else |
211 | # define EV_INOTIFY_HASHSIZE 16 |
228 | # define EV_INOTIFY_HASHSIZE 16 |
212 | # endif |
229 | # endif |
213 | #endif |
230 | #endif |
214 | |
231 | |
215 | /**/ |
232 | #ifndef EV_USE_EVENTFD |
|
|
233 | # if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7)) |
|
|
234 | # define EV_USE_EVENTFD 1 |
|
|
235 | # else |
|
|
236 | # define EV_USE_EVENTFD 0 |
|
|
237 | # endif |
|
|
238 | #endif |
|
|
239 | |
|
|
240 | /* this block fixes any misconfiguration where we know we run into trouble otherwise */ |
216 | |
241 | |
217 | #ifndef CLOCK_MONOTONIC |
242 | #ifndef CLOCK_MONOTONIC |
218 | # undef EV_USE_MONOTONIC |
243 | # undef EV_USE_MONOTONIC |
219 | # define EV_USE_MONOTONIC 0 |
244 | # define EV_USE_MONOTONIC 0 |
220 | #endif |
245 | #endif |
… | |
… | |
239 | # include <sys/inotify.h> |
264 | # include <sys/inotify.h> |
240 | #endif |
265 | #endif |
241 | |
266 | |
242 | #if EV_SELECT_IS_WINSOCKET |
267 | #if EV_SELECT_IS_WINSOCKET |
243 | # include <winsock.h> |
268 | # include <winsock.h> |
|
|
269 | #endif |
|
|
270 | |
|
|
271 | #if EV_USE_EVENTFD |
|
|
272 | /* our minimum requirement is glibc 2.7 which has the stub, but not the header */ |
|
|
273 | # include <stdint.h> |
|
|
274 | # ifdef __cplusplus |
|
|
275 | extern "C" { |
|
|
276 | # endif |
|
|
277 | int eventfd (unsigned int initval, int flags); |
|
|
278 | # ifdef __cplusplus |
|
|
279 | } |
|
|
280 | # endif |
244 | #endif |
281 | #endif |
245 | |
282 | |
246 | /**/ |
283 | /**/ |
247 | |
284 | |
248 | /* |
285 | /* |
… | |
… | |
263 | # define expect(expr,value) __builtin_expect ((expr),(value)) |
300 | # define expect(expr,value) __builtin_expect ((expr),(value)) |
264 | # define noinline __attribute__ ((noinline)) |
301 | # define noinline __attribute__ ((noinline)) |
265 | #else |
302 | #else |
266 | # define expect(expr,value) (expr) |
303 | # define expect(expr,value) (expr) |
267 | # define noinline |
304 | # define noinline |
268 | # if __STDC_VERSION__ < 199901L |
305 | # if __STDC_VERSION__ < 199901L && __GNUC__ < 2 |
269 | # define inline |
306 | # define inline |
270 | # endif |
307 | # endif |
271 | #endif |
308 | #endif |
272 | |
309 | |
273 | #define expect_false(expr) expect ((expr) != 0, 0) |
310 | #define expect_false(expr) expect ((expr) != 0, 0) |
… | |
… | |
323 | perror (msg); |
360 | perror (msg); |
324 | abort (); |
361 | abort (); |
325 | } |
362 | } |
326 | } |
363 | } |
327 | |
364 | |
|
|
365 | static void * |
|
|
366 | ev_realloc_emul (void *ptr, long size) |
|
|
367 | { |
|
|
368 | /* some systems, notably openbsd and darwin, fail to properly |
|
|
369 | * implement realloc (x, 0) (as required by both ansi c-98 and |
|
|
370 | * the single unix specification, so work around them here. |
|
|
371 | */ |
|
|
372 | |
|
|
373 | if (size) |
|
|
374 | return realloc (ptr, size); |
|
|
375 | |
|
|
376 | free (ptr); |
|
|
377 | return 0; |
|
|
378 | } |
|
|
379 | |
328 | static void *(*alloc)(void *ptr, long size); |
380 | static void *(*alloc)(void *ptr, long size) = ev_realloc_emul; |
329 | |
381 | |
330 | void |
382 | void |
331 | ev_set_allocator (void *(*cb)(void *ptr, long size)) |
383 | ev_set_allocator (void *(*cb)(void *ptr, long size)) |
332 | { |
384 | { |
333 | alloc = cb; |
385 | alloc = cb; |
334 | } |
386 | } |
335 | |
387 | |
336 | inline_speed void * |
388 | inline_speed void * |
337 | ev_realloc (void *ptr, long size) |
389 | ev_realloc (void *ptr, long size) |
338 | { |
390 | { |
339 | ptr = alloc ? alloc (ptr, size) : realloc (ptr, size); |
391 | ptr = alloc (ptr, size); |
340 | |
392 | |
341 | if (!ptr && size) |
393 | if (!ptr && size) |
342 | { |
394 | { |
343 | fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size); |
395 | fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size); |
344 | abort (); |
396 | abort (); |
… | |
… | |
702 | } |
754 | } |
703 | } |
755 | } |
704 | |
756 | |
705 | /*****************************************************************************/ |
757 | /*****************************************************************************/ |
706 | |
758 | |
|
|
759 | /* towards the root */ |
707 | void inline_speed |
760 | void inline_speed |
708 | upheap (WT *heap, int k) |
761 | upheap (WT *heap, int k) |
709 | { |
762 | { |
710 | WT w = heap [k]; |
763 | WT w = heap [k]; |
711 | |
764 | |
… | |
… | |
723 | |
776 | |
724 | heap [k] = w; |
777 | heap [k] = w; |
725 | ((W)heap [k])->active = k + 1; |
778 | ((W)heap [k])->active = k + 1; |
726 | } |
779 | } |
727 | |
780 | |
|
|
781 | /* away from the root */ |
728 | void inline_speed |
782 | void inline_speed |
729 | downheap (WT *heap, int N, int k) |
783 | downheap (WT *heap, int N, int k) |
730 | { |
784 | { |
731 | WT w = heap [k]; |
785 | WT w = heap [k]; |
732 | |
786 | |
… | |
… | |
802 | static void noinline |
856 | static void noinline |
803 | evpipe_init (EV_P) |
857 | evpipe_init (EV_P) |
804 | { |
858 | { |
805 | if (!ev_is_active (&pipeev)) |
859 | if (!ev_is_active (&pipeev)) |
806 | { |
860 | { |
|
|
861 | #if EV_USE_EVENTFD |
|
|
862 | if ((evfd = eventfd (0, 0)) >= 0) |
|
|
863 | { |
|
|
864 | evpipe [0] = -1; |
|
|
865 | fd_intern (evfd); |
|
|
866 | ev_io_set (&pipeev, evfd, EV_READ); |
|
|
867 | } |
|
|
868 | else |
|
|
869 | #endif |
|
|
870 | { |
807 | while (pipe (evpipe)) |
871 | while (pipe (evpipe)) |
808 | syserr ("(libev) error creating signal/async pipe"); |
872 | syserr ("(libev) error creating signal/async pipe"); |
809 | |
873 | |
810 | fd_intern (evpipe [0]); |
874 | fd_intern (evpipe [0]); |
811 | fd_intern (evpipe [1]); |
875 | fd_intern (evpipe [1]); |
812 | |
|
|
813 | ev_io_set (&pipeev, evpipe [0], EV_READ); |
876 | ev_io_set (&pipeev, evpipe [0], EV_READ); |
|
|
877 | } |
|
|
878 | |
814 | ev_io_start (EV_A_ &pipeev); |
879 | ev_io_start (EV_A_ &pipeev); |
815 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
880 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
816 | } |
881 | } |
817 | } |
882 | } |
818 | |
883 | |
… | |
… | |
822 | if (!*flag) |
887 | if (!*flag) |
823 | { |
888 | { |
824 | int old_errno = errno; /* save errno because write might clobber it */ |
889 | int old_errno = errno; /* save errno because write might clobber it */ |
825 | |
890 | |
826 | *flag = 1; |
891 | *flag = 1; |
|
|
892 | |
|
|
893 | #if EV_USE_EVENTFD |
|
|
894 | if (evfd >= 0) |
|
|
895 | { |
|
|
896 | uint64_t counter = 1; |
|
|
897 | write (evfd, &counter, sizeof (uint64_t)); |
|
|
898 | } |
|
|
899 | else |
|
|
900 | #endif |
827 | write (evpipe [1], &old_errno, 1); |
901 | write (evpipe [1], &old_errno, 1); |
828 | |
902 | |
829 | errno = old_errno; |
903 | errno = old_errno; |
830 | } |
904 | } |
831 | } |
905 | } |
832 | |
906 | |
833 | static void |
907 | static void |
834 | pipecb (EV_P_ ev_io *iow, int revents) |
908 | pipecb (EV_P_ ev_io *iow, int revents) |
835 | { |
909 | { |
|
|
910 | #if EV_USE_EVENTFD |
|
|
911 | if (evfd >= 0) |
836 | { |
912 | { |
837 | int dummy; |
913 | uint64_t counter = 1; |
|
|
914 | read (evfd, &counter, sizeof (uint64_t)); |
|
|
915 | } |
|
|
916 | else |
|
|
917 | #endif |
|
|
918 | { |
|
|
919 | char dummy; |
838 | read (evpipe [0], &dummy, 1); |
920 | read (evpipe [0], &dummy, 1); |
839 | } |
921 | } |
840 | |
922 | |
841 | if (gotsig && ev_is_default_loop (EV_A)) |
923 | if (gotsig && ev_is_default_loop (EV_A)) |
842 | { |
924 | { |
843 | int signum; |
925 | int signum; |
844 | gotsig = 0; |
926 | gotsig = 0; |
… | |
… | |
865 | } |
947 | } |
866 | |
948 | |
867 | /*****************************************************************************/ |
949 | /*****************************************************************************/ |
868 | |
950 | |
869 | static void |
951 | static void |
870 | sighandler (int signum) |
952 | ev_sighandler (int signum) |
871 | { |
953 | { |
872 | #if EV_MULTIPLICITY |
954 | #if EV_MULTIPLICITY |
873 | struct ev_loop *loop = &default_loop_struct; |
955 | struct ev_loop *loop = &default_loop_struct; |
874 | #endif |
956 | #endif |
875 | |
957 | |
876 | #if _WIN32 |
958 | #if _WIN32 |
877 | signal (signum, sighandler); |
959 | signal (signum, ev_sighandler); |
878 | #endif |
960 | #endif |
879 | |
961 | |
880 | signals [signum - 1].gotsig = 1; |
962 | signals [signum - 1].gotsig = 1; |
881 | evpipe_write (EV_A_ &gotsig); |
963 | evpipe_write (EV_A_ &gotsig); |
882 | } |
964 | } |
… | |
… | |
1105 | if (!(flags & EVFLAG_NOENV) |
1187 | if (!(flags & EVFLAG_NOENV) |
1106 | && !enable_secure () |
1188 | && !enable_secure () |
1107 | && getenv ("LIBEV_FLAGS")) |
1189 | && getenv ("LIBEV_FLAGS")) |
1108 | flags = atoi (getenv ("LIBEV_FLAGS")); |
1190 | flags = atoi (getenv ("LIBEV_FLAGS")); |
1109 | |
1191 | |
1110 | if (!(flags & 0x0000ffffUL)) |
1192 | if (!(flags & 0x0000ffffU)) |
1111 | flags |= ev_recommended_backends (); |
1193 | flags |= ev_recommended_backends (); |
1112 | |
1194 | |
1113 | #if EV_USE_PORT |
1195 | #if EV_USE_PORT |
1114 | if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags); |
1196 | if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags); |
1115 | #endif |
1197 | #endif |
… | |
… | |
1139 | if (ev_is_active (&pipeev)) |
1221 | if (ev_is_active (&pipeev)) |
1140 | { |
1222 | { |
1141 | ev_ref (EV_A); /* signal watcher */ |
1223 | ev_ref (EV_A); /* signal watcher */ |
1142 | ev_io_stop (EV_A_ &pipeev); |
1224 | ev_io_stop (EV_A_ &pipeev); |
1143 | |
1225 | |
1144 | close (evpipe [0]); evpipe [0] = 0; |
1226 | #if EV_USE_EVENTFD |
1145 | close (evpipe [1]); evpipe [1] = 0; |
1227 | if (evfd >= 0) |
|
|
1228 | close (evfd); |
|
|
1229 | #endif |
|
|
1230 | |
|
|
1231 | if (evpipe [0] >= 0) |
|
|
1232 | { |
|
|
1233 | close (evpipe [0]); |
|
|
1234 | close (evpipe [1]); |
|
|
1235 | } |
1146 | } |
1236 | } |
1147 | |
1237 | |
1148 | #if EV_USE_INOTIFY |
1238 | #if EV_USE_INOTIFY |
1149 | if (fs_fd >= 0) |
1239 | if (fs_fd >= 0) |
1150 | close (fs_fd); |
1240 | close (fs_fd); |
… | |
… | |
1195 | #endif |
1285 | #endif |
1196 | |
1286 | |
1197 | backend = 0; |
1287 | backend = 0; |
1198 | } |
1288 | } |
1199 | |
1289 | |
|
|
1290 | #if EV_USE_INOTIFY |
1200 | void inline_size infy_fork (EV_P); |
1291 | void inline_size infy_fork (EV_P); |
|
|
1292 | #endif |
1201 | |
1293 | |
1202 | void inline_size |
1294 | void inline_size |
1203 | loop_fork (EV_P) |
1295 | loop_fork (EV_P) |
1204 | { |
1296 | { |
1205 | #if EV_USE_PORT |
1297 | #if EV_USE_PORT |
… | |
… | |
1224 | gotasync = 1; |
1316 | gotasync = 1; |
1225 | #endif |
1317 | #endif |
1226 | |
1318 | |
1227 | ev_ref (EV_A); |
1319 | ev_ref (EV_A); |
1228 | ev_io_stop (EV_A_ &pipeev); |
1320 | ev_io_stop (EV_A_ &pipeev); |
|
|
1321 | |
|
|
1322 | #if EV_USE_EVENTFD |
|
|
1323 | if (evfd >= 0) |
|
|
1324 | close (evfd); |
|
|
1325 | #endif |
|
|
1326 | |
|
|
1327 | if (evpipe [0] >= 0) |
|
|
1328 | { |
1229 | close (evpipe [0]); |
1329 | close (evpipe [0]); |
1230 | close (evpipe [1]); |
1330 | close (evpipe [1]); |
|
|
1331 | } |
1231 | |
1332 | |
1232 | evpipe_init (EV_A); |
1333 | evpipe_init (EV_A); |
1233 | /* now iterate over everything, in case we missed something */ |
1334 | /* now iterate over everything, in case we missed something */ |
1234 | pipecb (EV_A_ &pipeev, EV_READ); |
1335 | pipecb (EV_A_ &pipeev, EV_READ); |
1235 | } |
1336 | } |
… | |
… | |
1542 | static int loop_done; |
1643 | static int loop_done; |
1543 | |
1644 | |
1544 | void |
1645 | void |
1545 | ev_loop (EV_P_ int flags) |
1646 | ev_loop (EV_P_ int flags) |
1546 | { |
1647 | { |
1547 | loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) |
1648 | loop_done = EVUNLOOP_CANCEL; |
1548 | ? EVUNLOOP_ONE |
|
|
1549 | : EVUNLOOP_CANCEL; |
|
|
1550 | |
1649 | |
1551 | call_pending (EV_A); /* in case we recurse, ensure ordering stays nice and clean */ |
1650 | call_pending (EV_A); /* in case we recurse, ensure ordering stays nice and clean */ |
1552 | |
1651 | |
1553 | do |
1652 | do |
1554 | { |
1653 | { |
… | |
… | |
1650 | /* queue check watchers, to be executed first */ |
1749 | /* queue check watchers, to be executed first */ |
1651 | if (expect_false (checkcnt)) |
1750 | if (expect_false (checkcnt)) |
1652 | queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK); |
1751 | queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK); |
1653 | |
1752 | |
1654 | call_pending (EV_A); |
1753 | call_pending (EV_A); |
1655 | |
|
|
1656 | } |
1754 | } |
1657 | while (expect_true (activecnt && !loop_done)); |
1755 | while (expect_true ( |
|
|
1756 | activecnt |
|
|
1757 | && !loop_done |
|
|
1758 | && !(flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK)) |
|
|
1759 | )); |
1658 | |
1760 | |
1659 | if (loop_done == EVUNLOOP_ONE) |
1761 | if (loop_done == EVUNLOOP_ONE) |
1660 | loop_done = EVUNLOOP_CANCEL; |
1762 | loop_done = EVUNLOOP_CANCEL; |
1661 | } |
1763 | } |
1662 | |
1764 | |
… | |
… | |
1930 | wlist_add (&signals [w->signum - 1].head, (WL)w); |
2032 | wlist_add (&signals [w->signum - 1].head, (WL)w); |
1931 | |
2033 | |
1932 | if (!((WL)w)->next) |
2034 | if (!((WL)w)->next) |
1933 | { |
2035 | { |
1934 | #if _WIN32 |
2036 | #if _WIN32 |
1935 | signal (w->signum, sighandler); |
2037 | signal (w->signum, ev_sighandler); |
1936 | #else |
2038 | #else |
1937 | struct sigaction sa; |
2039 | struct sigaction sa; |
1938 | sa.sa_handler = sighandler; |
2040 | sa.sa_handler = ev_sighandler; |
1939 | sigfillset (&sa.sa_mask); |
2041 | sigfillset (&sa.sa_mask); |
1940 | sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */ |
2042 | sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */ |
1941 | sigaction (w->signum, &sa, 0); |
2043 | sigaction (w->signum, &sa, 0); |
1942 | #endif |
2044 | #endif |
1943 | } |
2045 | } |