1 | /* |
1 | /* |
2 | * libev event processing core, watcher management |
2 | * libev event processing core, watcher management |
3 | * |
3 | * |
4 | * Copyright (c) 2007 Marc Alexander Lehmann <libev@schmorp.de> |
4 | * Copyright (c) 2007,2008 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 | * |
… | |
… | |
291 | typedef ev_watcher_time *WT; |
291 | typedef ev_watcher_time *WT; |
292 | |
292 | |
293 | #if EV_USE_MONOTONIC |
293 | #if EV_USE_MONOTONIC |
294 | /* sig_atomic_t is used to avoid per-thread variables or locking but still */ |
294 | /* sig_atomic_t is used to avoid per-thread variables or locking but still */ |
295 | /* giving it a reasonably high chance of working on typical architetcures */ |
295 | /* giving it a reasonably high chance of working on typical architetcures */ |
296 | static sig_atomic_t have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */ |
296 | static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */ |
297 | #endif |
297 | #endif |
298 | |
298 | |
299 | #ifdef _WIN32 |
299 | #ifdef _WIN32 |
300 | # include "ev_win32.c" |
300 | # include "ev_win32.c" |
301 | #endif |
301 | #endif |
… | |
… | |
600 | |
600 | |
601 | #if EV_SELECT_IS_WINSOCKET |
601 | #if EV_SELECT_IS_WINSOCKET |
602 | if (events) |
602 | if (events) |
603 | { |
603 | { |
604 | unsigned long argp; |
604 | unsigned long argp; |
|
|
605 | #ifdef EV_FD_TO_WIN32_HANDLE |
|
|
606 | anfd->handle = EV_FD_TO_WIN32_HANDLE (fd); |
|
|
607 | #else |
605 | anfd->handle = _get_osfhandle (fd); |
608 | anfd->handle = _get_osfhandle (fd); |
|
|
609 | #endif |
606 | assert (("libev only supports socket fds in this configuration", ioctlsocket (anfd->handle, FIONREAD, &argp) == 0)); |
610 | assert (("libev only supports socket fds in this configuration", ioctlsocket (anfd->handle, FIONREAD, &argp) == 0)); |
607 | } |
611 | } |
608 | #endif |
612 | #endif |
609 | |
613 | |
610 | { |
614 | { |
… | |
… | |
759 | /*****************************************************************************/ |
763 | /*****************************************************************************/ |
760 | |
764 | |
761 | typedef struct |
765 | typedef struct |
762 | { |
766 | { |
763 | WL head; |
767 | WL head; |
764 | sig_atomic_t volatile gotsig; |
768 | EV_ATOMIC_T gotsig; |
765 | } ANSIG; |
769 | } ANSIG; |
766 | |
770 | |
767 | static ANSIG *signals; |
771 | static ANSIG *signals; |
768 | static int signalmax; |
772 | static int signalmax; |
769 | |
773 | |
770 | static int sigpipe [2]; |
774 | static EV_ATOMIC_T gotsig; |
771 | static sig_atomic_t volatile gotsig; |
|
|
772 | static ev_io sigev; |
|
|
773 | |
775 | |
774 | void inline_size |
776 | void inline_size |
775 | signals_init (ANSIG *base, int count) |
777 | signals_init (ANSIG *base, int count) |
776 | { |
778 | { |
777 | while (count--) |
779 | while (count--) |
… | |
… | |
781 | |
783 | |
782 | ++base; |
784 | ++base; |
783 | } |
785 | } |
784 | } |
786 | } |
785 | |
787 | |
786 | static void |
788 | /*****************************************************************************/ |
787 | sighandler (int signum) |
|
|
788 | { |
|
|
789 | #if _WIN32 |
|
|
790 | signal (signum, sighandler); |
|
|
791 | #endif |
|
|
792 | |
|
|
793 | signals [signum - 1].gotsig = 1; |
|
|
794 | |
|
|
795 | if (!gotsig) |
|
|
796 | { |
|
|
797 | int old_errno = errno; |
|
|
798 | gotsig = 1; |
|
|
799 | write (sigpipe [1], &signum, 1); |
|
|
800 | errno = old_errno; |
|
|
801 | } |
|
|
802 | } |
|
|
803 | |
|
|
804 | void noinline |
|
|
805 | ev_feed_signal_event (EV_P_ int signum) |
|
|
806 | { |
|
|
807 | WL w; |
|
|
808 | |
|
|
809 | #if EV_MULTIPLICITY |
|
|
810 | assert (("feeding signal events is only supported in the default loop", loop == ev_default_loop_ptr)); |
|
|
811 | #endif |
|
|
812 | |
|
|
813 | --signum; |
|
|
814 | |
|
|
815 | if (signum < 0 || signum >= signalmax) |
|
|
816 | return; |
|
|
817 | |
|
|
818 | signals [signum].gotsig = 0; |
|
|
819 | |
|
|
820 | for (w = signals [signum].head; w; w = w->next) |
|
|
821 | ev_feed_event (EV_A_ (W)w, EV_SIGNAL); |
|
|
822 | } |
|
|
823 | |
|
|
824 | static void |
|
|
825 | sigcb (EV_P_ ev_io *iow, int revents) |
|
|
826 | { |
|
|
827 | int signum; |
|
|
828 | |
|
|
829 | read (sigpipe [0], &revents, 1); |
|
|
830 | gotsig = 0; |
|
|
831 | |
|
|
832 | for (signum = signalmax; signum--; ) |
|
|
833 | if (signals [signum].gotsig) |
|
|
834 | ev_feed_signal_event (EV_A_ signum + 1); |
|
|
835 | } |
|
|
836 | |
789 | |
837 | void inline_speed |
790 | void inline_speed |
838 | fd_intern (int fd) |
791 | fd_intern (int fd) |
839 | { |
792 | { |
840 | #ifdef _WIN32 |
793 | #ifdef _WIN32 |
… | |
… | |
845 | fcntl (fd, F_SETFL, O_NONBLOCK); |
798 | fcntl (fd, F_SETFL, O_NONBLOCK); |
846 | #endif |
799 | #endif |
847 | } |
800 | } |
848 | |
801 | |
849 | static void noinline |
802 | static void noinline |
850 | siginit (EV_P) |
803 | evpipe_init (EV_P) |
851 | { |
804 | { |
|
|
805 | if (!ev_is_active (&pipeev)) |
|
|
806 | { |
|
|
807 | while (pipe (evpipe)) |
|
|
808 | syserr ("(libev) error creating signal/async pipe"); |
|
|
809 | |
852 | fd_intern (sigpipe [0]); |
810 | fd_intern (evpipe [0]); |
853 | fd_intern (sigpipe [1]); |
811 | fd_intern (evpipe [1]); |
854 | |
812 | |
855 | ev_io_set (&sigev, sigpipe [0], EV_READ); |
813 | ev_io_set (&pipeev, evpipe [0], EV_READ); |
856 | ev_io_start (EV_A_ &sigev); |
814 | ev_io_start (EV_A_ &pipeev); |
857 | ev_unref (EV_A); /* child watcher should not keep loop alive */ |
815 | ev_unref (EV_A); /* child watcher should not keep loop alive */ |
|
|
816 | } |
|
|
817 | } |
|
|
818 | |
|
|
819 | void inline_size |
|
|
820 | evpipe_write (EV_P_ int sig, int async) |
|
|
821 | { |
|
|
822 | if (!(gotasync || gotsig)) |
|
|
823 | { |
|
|
824 | int old_errno = errno; |
|
|
825 | |
|
|
826 | if (sig) gotsig = 1; |
|
|
827 | if (async) gotasync = 1; |
|
|
828 | |
|
|
829 | write (evpipe [1], &old_errno, 1); |
|
|
830 | errno = old_errno; |
|
|
831 | } |
|
|
832 | } |
|
|
833 | |
|
|
834 | static void |
|
|
835 | pipecb (EV_P_ ev_io *iow, int revents) |
|
|
836 | { |
|
|
837 | { |
|
|
838 | int dummy; |
|
|
839 | read (evpipe [0], &dummy, 1); |
|
|
840 | } |
|
|
841 | |
|
|
842 | if (gotsig) |
|
|
843 | { |
|
|
844 | int signum; |
|
|
845 | gotsig = 0; |
|
|
846 | |
|
|
847 | for (signum = signalmax; signum--; ) |
|
|
848 | if (signals [signum].gotsig) |
|
|
849 | ev_feed_signal_event (EV_A_ signum + 1); |
|
|
850 | } |
|
|
851 | |
|
|
852 | if (gotasync) |
|
|
853 | { |
|
|
854 | int i; |
|
|
855 | gotasync = 0; |
|
|
856 | |
|
|
857 | for (i = asynccnt; i--; ) |
|
|
858 | if (asyncs [i]->sent) |
|
|
859 | { |
|
|
860 | asyncs [i]->sent = 0; |
|
|
861 | ev_feed_event (EV_A_ asyncs [i], EV_ASYNC); |
|
|
862 | } |
|
|
863 | } |
858 | } |
864 | } |
859 | |
865 | |
860 | /*****************************************************************************/ |
866 | /*****************************************************************************/ |
861 | |
867 | |
|
|
868 | static void |
|
|
869 | sighandler (int signum) |
|
|
870 | { |
|
|
871 | #if EV_MULTIPLICITY |
|
|
872 | struct ev_loop *loop = &default_loop_struct; |
|
|
873 | #endif |
|
|
874 | |
|
|
875 | #if _WIN32 |
|
|
876 | signal (signum, sighandler); |
|
|
877 | #endif |
|
|
878 | |
|
|
879 | signals [signum - 1].gotsig = 1; |
|
|
880 | evpipe_write (EV_A_ 1, 0); |
|
|
881 | } |
|
|
882 | |
|
|
883 | void noinline |
|
|
884 | ev_feed_signal_event (EV_P_ int signum) |
|
|
885 | { |
|
|
886 | WL w; |
|
|
887 | |
|
|
888 | #if EV_MULTIPLICITY |
|
|
889 | assert (("feeding signal events is only supported in the default loop", loop == ev_default_loop_ptr)); |
|
|
890 | #endif |
|
|
891 | |
|
|
892 | --signum; |
|
|
893 | |
|
|
894 | if (signum < 0 || signum >= signalmax) |
|
|
895 | return; |
|
|
896 | |
|
|
897 | signals [signum].gotsig = 0; |
|
|
898 | |
|
|
899 | for (w = signals [signum].head; w; w = w->next) |
|
|
900 | ev_feed_event (EV_A_ (W)w, EV_SIGNAL); |
|
|
901 | } |
|
|
902 | |
|
|
903 | /*****************************************************************************/ |
|
|
904 | |
862 | static WL childs [EV_PID_HASHSIZE]; |
905 | static WL childs [EV_PID_HASHSIZE]; |
863 | |
906 | |
864 | #ifndef _WIN32 |
907 | #ifndef _WIN32 |
865 | |
908 | |
866 | static ev_signal childev; |
909 | static ev_signal childev; |
|
|
910 | |
|
|
911 | #ifndef WIFCONTINUED |
|
|
912 | # define WIFCONTINUED(status) 0 |
|
|
913 | #endif |
867 | |
914 | |
868 | void inline_speed |
915 | void inline_speed |
869 | child_reap (EV_P_ ev_signal *sw, int chain, int pid, int status) |
916 | child_reap (EV_P_ ev_signal *sw, int chain, int pid, int status) |
870 | { |
917 | { |
871 | ev_child *w; |
918 | ev_child *w; |
|
|
919 | int traced = WIFSTOPPED (status) || WIFCONTINUED (status); |
872 | |
920 | |
873 | for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next) |
921 | for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next) |
|
|
922 | { |
874 | if (w->pid == pid || !w->pid) |
923 | if ((w->pid == pid || !w->pid) |
|
|
924 | && (!traced || (w->flags & 1))) |
875 | { |
925 | { |
876 | ev_set_priority (w, ev_priority (sw)); /* need to do it *now* */ |
926 | ev_set_priority (w, ev_priority (sw)); /* need to do it *now* */ |
877 | w->rpid = pid; |
927 | w->rpid = pid; |
878 | w->rstatus = status; |
928 | w->rstatus = status; |
879 | ev_feed_event (EV_A_ (W)w, EV_CHILD); |
929 | ev_feed_event (EV_A_ (W)w, EV_CHILD); |
880 | } |
930 | } |
|
|
931 | } |
881 | } |
932 | } |
882 | |
933 | |
883 | #ifndef WCONTINUED |
934 | #ifndef WCONTINUED |
884 | # define WCONTINUED 0 |
935 | # define WCONTINUED 0 |
885 | #endif |
936 | #endif |
… | |
… | |
1072 | #endif |
1123 | #endif |
1073 | #if EV_USE_SELECT |
1124 | #if EV_USE_SELECT |
1074 | if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags); |
1125 | if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags); |
1075 | #endif |
1126 | #endif |
1076 | |
1127 | |
1077 | ev_init (&sigev, sigcb); |
1128 | ev_init (&pipeev, pipecb); |
1078 | ev_set_priority (&sigev, EV_MAXPRI); |
1129 | ev_set_priority (&pipeev, EV_MAXPRI); |
1079 | } |
1130 | } |
1080 | } |
1131 | } |
1081 | |
1132 | |
1082 | static void noinline |
1133 | static void noinline |
1083 | loop_destroy (EV_P) |
1134 | loop_destroy (EV_P) |
1084 | { |
1135 | { |
1085 | int i; |
1136 | int i; |
|
|
1137 | |
|
|
1138 | if (ev_is_active (&pipeev)) |
|
|
1139 | { |
|
|
1140 | ev_ref (EV_A); /* signal watcher */ |
|
|
1141 | ev_io_stop (EV_A_ &pipeev); |
|
|
1142 | |
|
|
1143 | close (evpipe [0]); evpipe [0] = 0; |
|
|
1144 | close (evpipe [1]); evpipe [1] = 0; |
|
|
1145 | } |
1086 | |
1146 | |
1087 | #if EV_USE_INOTIFY |
1147 | #if EV_USE_INOTIFY |
1088 | if (fs_fd >= 0) |
1148 | if (fs_fd >= 0) |
1089 | close (fs_fd); |
1149 | close (fs_fd); |
1090 | #endif |
1150 | #endif |
… | |
… | |
1149 | #endif |
1209 | #endif |
1150 | #if EV_USE_INOTIFY |
1210 | #if EV_USE_INOTIFY |
1151 | infy_fork (EV_A); |
1211 | infy_fork (EV_A); |
1152 | #endif |
1212 | #endif |
1153 | |
1213 | |
1154 | if (ev_is_active (&sigev)) |
1214 | if (ev_is_active (&pipeev)) |
1155 | { |
1215 | { |
1156 | /* default loop */ |
1216 | /* this "locks" the handlers against writing to the pipe */ |
|
|
1217 | gotsig = gotasync = 1; |
1157 | |
1218 | |
1158 | ev_ref (EV_A); |
1219 | ev_ref (EV_A); |
1159 | ev_io_stop (EV_A_ &sigev); |
1220 | ev_io_stop (EV_A_ &pipeev); |
1160 | close (sigpipe [0]); |
1221 | close (evpipe [0]); |
1161 | close (sigpipe [1]); |
1222 | close (evpipe [1]); |
1162 | |
1223 | |
1163 | while (pipe (sigpipe)) |
|
|
1164 | syserr ("(libev) error creating pipe"); |
|
|
1165 | |
|
|
1166 | siginit (EV_A); |
1224 | evpipe_init (EV_A); |
|
|
1225 | /* now iterate over everything */ |
|
|
1226 | evcb (EV_A_ &pipeev, EV_READ); |
1167 | } |
1227 | } |
1168 | |
1228 | |
1169 | postfork = 0; |
1229 | postfork = 0; |
1170 | } |
1230 | } |
1171 | |
1231 | |
… | |
… | |
1193 | } |
1253 | } |
1194 | |
1254 | |
1195 | void |
1255 | void |
1196 | ev_loop_fork (EV_P) |
1256 | ev_loop_fork (EV_P) |
1197 | { |
1257 | { |
1198 | postfork = 1; |
1258 | postfork = 1; /* must be in line with ev_default_fork */ |
1199 | } |
1259 | } |
1200 | |
1260 | |
1201 | #endif |
1261 | #endif |
1202 | |
1262 | |
1203 | #if EV_MULTIPLICITY |
1263 | #if EV_MULTIPLICITY |
… | |
… | |
1206 | #else |
1266 | #else |
1207 | int |
1267 | int |
1208 | ev_default_loop (unsigned int flags) |
1268 | ev_default_loop (unsigned int flags) |
1209 | #endif |
1269 | #endif |
1210 | { |
1270 | { |
1211 | if (sigpipe [0] == sigpipe [1]) |
|
|
1212 | if (pipe (sigpipe)) |
|
|
1213 | return 0; |
|
|
1214 | |
|
|
1215 | if (!ev_default_loop_ptr) |
1271 | if (!ev_default_loop_ptr) |
1216 | { |
1272 | { |
1217 | #if EV_MULTIPLICITY |
1273 | #if EV_MULTIPLICITY |
1218 | struct ev_loop *loop = ev_default_loop_ptr = &default_loop_struct; |
1274 | struct ev_loop *loop = ev_default_loop_ptr = &default_loop_struct; |
1219 | #else |
1275 | #else |
… | |
… | |
1222 | |
1278 | |
1223 | loop_init (EV_A_ flags); |
1279 | loop_init (EV_A_ flags); |
1224 | |
1280 | |
1225 | if (ev_backend (EV_A)) |
1281 | if (ev_backend (EV_A)) |
1226 | { |
1282 | { |
1227 | siginit (EV_A); |
|
|
1228 | |
|
|
1229 | #ifndef _WIN32 |
1283 | #ifndef _WIN32 |
1230 | ev_signal_init (&childev, childcb, SIGCHLD); |
1284 | ev_signal_init (&childev, childcb, SIGCHLD); |
1231 | ev_set_priority (&childev, EV_MAXPRI); |
1285 | ev_set_priority (&childev, EV_MAXPRI); |
1232 | ev_signal_start (EV_A_ &childev); |
1286 | ev_signal_start (EV_A_ &childev); |
1233 | ev_unref (EV_A); /* child watcher should not keep loop alive */ |
1287 | ev_unref (EV_A); /* child watcher should not keep loop alive */ |
… | |
… | |
1250 | #ifndef _WIN32 |
1304 | #ifndef _WIN32 |
1251 | ev_ref (EV_A); /* child watcher */ |
1305 | ev_ref (EV_A); /* child watcher */ |
1252 | ev_signal_stop (EV_A_ &childev); |
1306 | ev_signal_stop (EV_A_ &childev); |
1253 | #endif |
1307 | #endif |
1254 | |
1308 | |
1255 | ev_ref (EV_A); /* signal watcher */ |
|
|
1256 | ev_io_stop (EV_A_ &sigev); |
|
|
1257 | |
|
|
1258 | close (sigpipe [0]); sigpipe [0] = 0; |
|
|
1259 | close (sigpipe [1]); sigpipe [1] = 0; |
|
|
1260 | |
|
|
1261 | loop_destroy (EV_A); |
1309 | loop_destroy (EV_A); |
1262 | } |
1310 | } |
1263 | |
1311 | |
1264 | void |
1312 | void |
1265 | ev_default_fork (void) |
1313 | ev_default_fork (void) |
… | |
… | |
1267 | #if EV_MULTIPLICITY |
1315 | #if EV_MULTIPLICITY |
1268 | struct ev_loop *loop = ev_default_loop_ptr; |
1316 | struct ev_loop *loop = ev_default_loop_ptr; |
1269 | #endif |
1317 | #endif |
1270 | |
1318 | |
1271 | if (backend) |
1319 | if (backend) |
1272 | postfork = 1; |
1320 | postfork = 1; /* must be in line with ev_loop_fork */ |
1273 | } |
1321 | } |
1274 | |
1322 | |
1275 | /*****************************************************************************/ |
1323 | /*****************************************************************************/ |
1276 | |
1324 | |
1277 | void |
1325 | void |
… | |
… | |
1851 | #endif |
1899 | #endif |
1852 | if (expect_false (ev_is_active (w))) |
1900 | if (expect_false (ev_is_active (w))) |
1853 | return; |
1901 | return; |
1854 | |
1902 | |
1855 | assert (("ev_signal_start called with illegal signal number", w->signum > 0)); |
1903 | assert (("ev_signal_start called with illegal signal number", w->signum > 0)); |
|
|
1904 | |
|
|
1905 | evpipe_init (EV_A); |
1856 | |
1906 | |
1857 | { |
1907 | { |
1858 | #ifndef _WIN32 |
1908 | #ifndef _WIN32 |
1859 | sigset_t full, prev; |
1909 | sigset_t full, prev; |
1860 | sigfillset (&full); |
1910 | sigfillset (&full); |
… | |
… | |
2374 | |
2424 | |
2375 | ev_stop (EV_A_ (W)w); |
2425 | ev_stop (EV_A_ (W)w); |
2376 | } |
2426 | } |
2377 | #endif |
2427 | #endif |
2378 | |
2428 | |
|
|
2429 | #if EV_ASYNC_ENABLE |
|
|
2430 | void |
|
|
2431 | ev_async_start (EV_P_ ev_async *w) |
|
|
2432 | { |
|
|
2433 | if (expect_false (ev_is_active (w))) |
|
|
2434 | return; |
|
|
2435 | |
|
|
2436 | evpipe_init (EV_A); |
|
|
2437 | |
|
|
2438 | ev_start (EV_A_ (W)w, ++asynccnt); |
|
|
2439 | array_needsize (ev_async *, asyncs, asyncmax, asynccnt, EMPTY2); |
|
|
2440 | asyncs [asynccnt - 1] = w; |
|
|
2441 | } |
|
|
2442 | |
|
|
2443 | void |
|
|
2444 | ev_async_stop (EV_P_ ev_async *w) |
|
|
2445 | { |
|
|
2446 | clear_pending (EV_A_ (W)w); |
|
|
2447 | if (expect_false (!ev_is_active (w))) |
|
|
2448 | return; |
|
|
2449 | |
|
|
2450 | { |
|
|
2451 | int active = ((W)w)->active; |
|
|
2452 | asyncs [active - 1] = asyncs [--asynccnt]; |
|
|
2453 | ((W)asyncs [active - 1])->active = active; |
|
|
2454 | } |
|
|
2455 | |
|
|
2456 | ev_stop (EV_A_ (W)w); |
|
|
2457 | } |
|
|
2458 | |
|
|
2459 | void |
|
|
2460 | ev_async_send (EV_P_ ev_async *w) |
|
|
2461 | { |
|
|
2462 | w->sent = 1; |
|
|
2463 | evpipe_write (EV_A_ 0, 1); |
|
|
2464 | } |
|
|
2465 | #endif |
|
|
2466 | |
2379 | /*****************************************************************************/ |
2467 | /*****************************************************************************/ |
2380 | |
2468 | |
2381 | struct ev_once |
2469 | struct ev_once |
2382 | { |
2470 | { |
2383 | ev_io io; |
2471 | ev_io io; |