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

Comparing libev/ev.c (file contents):
Revision 1.111 by root, Mon Nov 12 06:34:49 2007 UTC vs.
Revision 1.121 by root, Fri Nov 16 10:37:28 2007 UTC

… …
59 59
60# if HAVE_KQUEUE && HAVE_SYS_EVENT_H && HAVE_SYS_QUEUE_H && !defined (EV_USE_KQUEUE) 60# if HAVE_KQUEUE && HAVE_SYS_EVENT_H && HAVE_SYS_QUEUE_H && !defined (EV_USE_KQUEUE)
61# define EV_USE_KQUEUE 1 61# define EV_USE_KQUEUE 1
62# endif 62# endif
63 63
64# if HAVE_PORT_H && HAVE_PORT_CREATE && !defined (EV_USE_PORT)
65# define EV_USE_PORT 1
66# endif
67
64#endif 68#endif
65 69
66#include <math.h> 70#include <math.h>
67#include <stdlib.h> 71#include <stdlib.h>
68#include <fcntl.h> 72#include <fcntl.h>
… …
90#endif 94#endif
91 95
92/**/ 96/**/
93 97
94#ifndef EV_USE_MONOTONIC 98#ifndef EV_USE_MONOTONIC
95# define EV_USE_MONOTONIC 1 99# define EV_USE_MONOTONIC 0
100#endif
101
102#ifndef EV_USE_REALTIME
103# define EV_USE_REALTIME 0
96#endif 104#endif
97 105
98#ifndef EV_USE_SELECT 106#ifndef EV_USE_SELECT
99# define EV_USE_SELECT 1 107# define EV_USE_SELECT 1
100# define EV_SELECT_USE_FD_SET 1
101#endif 108#endif
102 109
103#ifndef EV_USE_POLL 110#ifndef EV_USE_POLL
104# ifdef _WIN32 111# ifdef _WIN32
105# define EV_USE_POLL 0 112# define EV_USE_POLL 0
… …
114 121
115#ifndef EV_USE_KQUEUE 122#ifndef EV_USE_KQUEUE
116# define EV_USE_KQUEUE 0 123# define EV_USE_KQUEUE 0
117#endif 124#endif
118 125
119#ifndef EV_USE_REALTIME 126#ifndef EV_USE_PORT
120# define EV_USE_REALTIME 1 127# define EV_USE_PORT 0
121#endif 128#endif
122 129
123/**/ 130/**/
124 131
125/* darwin simply cannot be helped */ 132/* darwin simply cannot be helped */
… …
143#endif 150#endif
144 151
145/**/ 152/**/
146 153
147#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */ 154#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
148#define MAX_BLOCKTIME 59.731 /* never wait longer than this time (to detect time jumps) */ 155#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
149#define PID_HASHSIZE 16 /* size of pid hash table, must be power of two */ 156#define PID_HASHSIZE 16 /* size of pid hash table, must be power of two */
150/*#define CLEANUP_INTERVAL 300. /* how often to try to free memory and re-check fds */ 157/*#define CLEANUP_INTERVAL (MAX_BLOCKTIME * 5.) /* how often to try to free memory and re-check fds */
151 158
152#ifdef EV_H 159#ifdef EV_H
153# include EV_H 160# include EV_H
154#else 161#else
155# include "ev.h" 162# include "ev.h"
… …
167#define expect_true(expr) expect ((expr) != 0, 1) 174#define expect_true(expr) expect ((expr) != 0, 1)
168 175
169#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1) 176#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
170#define ABSPRI(w) ((w)->priority - EV_MINPRI) 177#define ABSPRI(w) ((w)->priority - EV_MINPRI)
171 178
172#define EMPTY /* required for microsofts broken pseudo-c compiler */ 179#define EMPTY0 /* required for microsofts broken pseudo-c compiler */
180#define EMPTY2(a,b) /* used to suppress some warnings */
173 181
174typedef struct ev_watcher *W; 182typedef struct ev_watcher *W;
175typedef struct ev_watcher_list *WL; 183typedef struct ev_watcher_list *WL;
176typedef struct ev_watcher_time *WT; 184typedef struct ev_watcher_time *WT;
177 185
… …
257 #include "ev_vars.h" 265 #include "ev_vars.h"
258 #undef VAR 266 #undef VAR
259 }; 267 };
260 #include "ev_wrap.h" 268 #include "ev_wrap.h"
261 269
262 struct ev_loop default_loop_struct; 270 static struct ev_loop default_loop_struct;
263 static struct ev_loop *default_loop; 271 struct ev_loop *ev_default_loop_ptr;
264 272
265#else 273#else
266 274
267 ev_tstamp ev_rt_now; 275 ev_tstamp ev_rt_now;
268 #define VAR(name,decl) static decl; 276 #define VAR(name,decl) static decl;
269 #include "ev_vars.h" 277 #include "ev_vars.h"
270 #undef VAR 278 #undef VAR
271 279
272 static int default_loop; 280 static int ev_default_loop_ptr;
273 281
274#endif 282#endif
275 283
276/*****************************************************************************/ 284/*****************************************************************************/
277 285
… …
365 pendings [ABSPRI (w_)][w_->pending - 1].events |= revents; 373 pendings [ABSPRI (w_)][w_->pending - 1].events |= revents;
366 return; 374 return;
367 } 375 }
368 376
369 w_->pending = ++pendingcnt [ABSPRI (w_)]; 377 w_->pending = ++pendingcnt [ABSPRI (w_)];
370 array_needsize (ANPENDING, pendings [ABSPRI (w_)], pendingmax [ABSPRI (w_)], pendingcnt [ABSPRI (w_)], (void)); 378 array_needsize (ANPENDING, pendings [ABSPRI (w_)], pendingmax [ABSPRI (w_)], pendingcnt [ABSPRI (w_)], EMPTY2);
371 pendings [ABSPRI (w_)][w_->pending - 1].w = w_; 379 pendings [ABSPRI (w_)][w_->pending - 1].w = w_;
372 pendings [ABSPRI (w_)][w_->pending - 1].events = revents; 380 pendings [ABSPRI (w_)][w_->pending - 1].events = revents;
373} 381}
374 382
375static void 383static void
… …
445 return; 453 return;
446 454
447 anfds [fd].reify = 1; 455 anfds [fd].reify = 1;
448 456
449 ++fdchangecnt; 457 ++fdchangecnt;
450 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, (void)); 458 array_needsize (int, fdchanges, fdchangemax, fdchangecnt, EMPTY2);
451 fdchanges [fdchangecnt - 1] = fd; 459 fdchanges [fdchangecnt - 1] = fd;
452} 460}
453 461
454static void 462static void
455fd_kill (EV_P_ int fd) 463fd_kill (EV_P_ int fd)
… …
613ev_feed_signal_event (EV_P_ int signum) 621ev_feed_signal_event (EV_P_ int signum)
614{ 622{
615 WL w; 623 WL w;
616 624
617#if EV_MULTIPLICITY 625#if EV_MULTIPLICITY
618 assert (("feeding signal events is only supported in the default loop", loop == default_loop)); 626 assert (("feeding signal events is only supported in the default loop", loop == ev_default_loop_ptr));
619#endif 627#endif
620 628
621 --signum; 629 --signum;
622 630
623 if (signum < 0 || signum >= signalmax) 631 if (signum < 0 || signum >= signalmax)
… …
709 717
710#endif 718#endif
711 719
712/*****************************************************************************/ 720/*****************************************************************************/
713 721
722#if EV_USE_PORT
723# include "ev_port.c"
724#endif
714#if EV_USE_KQUEUE 725#if EV_USE_KQUEUE
715# include "ev_kqueue.c" 726# include "ev_kqueue.c"
716#endif 727#endif
717#if EV_USE_EPOLL 728#if EV_USE_EPOLL
718# include "ev_epoll.c" 729# include "ev_epoll.c"
… …
770 ev_rt_now = ev_time (); 781 ev_rt_now = ev_time ();
771 mn_now = get_clock (); 782 mn_now = get_clock ();
772 now_floor = mn_now; 783 now_floor = mn_now;
773 rtmn_diff = ev_rt_now - mn_now; 784 rtmn_diff = ev_rt_now - mn_now;
774 785
775 if (!(flags & EVMETHOD_NOENV) && !enable_secure () && getenv ("LIBEV_FLAGS")) 786 if (!(flags & EVFLAG_NOENV) && !enable_secure () && getenv ("LIBEV_FLAGS"))
776 flags = atoi (getenv ("LIBEV_FLAGS")); 787 flags = atoi (getenv ("LIBEV_FLAGS"));
777 788
778 if (!(flags & 0x0000ffff)) 789 if (!(flags & 0x0000ffff))
779 flags |= 0x0000ffff; 790 flags |= 0x0000ffff;
780 791
781 method = 0; 792 method = 0;
793#if EV_USE_PORT
794 if (!method && (flags & EVMETHOD_PORT )) method = port_init (EV_A_ flags);
795#endif
782#if EV_USE_KQUEUE 796#if EV_USE_KQUEUE
783 if (!method && (flags & EVMETHOD_KQUEUE)) method = kqueue_init (EV_A_ flags); 797 if (!method && (flags & EVMETHOD_KQUEUE)) method = kqueue_init (EV_A_ flags);
784#endif 798#endif
785#if EV_USE_EPOLL 799#if EV_USE_EPOLL
786 if (!method && (flags & EVMETHOD_EPOLL )) method = epoll_init (EV_A_ flags); 800 if (!method && (flags & EVMETHOD_EPOLL )) method = epoll_init (EV_A_ flags);
… …
800void 814void
801loop_destroy (EV_P) 815loop_destroy (EV_P)
802{ 816{
803 int i; 817 int i;
804 818
819#if EV_USE_PORT
820 if (method == EVMETHOD_PORT ) port_destroy (EV_A);
821#endif
805#if EV_USE_KQUEUE 822#if EV_USE_KQUEUE
806 if (method == EVMETHOD_KQUEUE) kqueue_destroy (EV_A); 823 if (method == EVMETHOD_KQUEUE) kqueue_destroy (EV_A);
807#endif 824#endif
808#if EV_USE_EPOLL 825#if EV_USE_EPOLL
809 if (method == EVMETHOD_EPOLL ) epoll_destroy (EV_A); 826 if (method == EVMETHOD_EPOLL ) epoll_destroy (EV_A);
… …
817 834
818 for (i = NUMPRI; i--; ) 835 for (i = NUMPRI; i--; )
819 array_free (pending, [i]); 836 array_free (pending, [i]);
820 837
821 /* have to use the microsoft-never-gets-it-right macro */ 838 /* have to use the microsoft-never-gets-it-right macro */
822 array_free (fdchange, EMPTY); 839 array_free (fdchange, EMPTY0);
823 array_free (timer, EMPTY); 840 array_free (timer, EMPTY0);
824#if EV_PERIODICS 841#if EV_PERIODICS
825 array_free (periodic, EMPTY); 842 array_free (periodic, EMPTY0);
826#endif 843#endif
827 array_free (idle, EMPTY); 844 array_free (idle, EMPTY0);
828 array_free (prepare, EMPTY); 845 array_free (prepare, EMPTY0);
829 array_free (check, EMPTY); 846 array_free (check, EMPTY0);
830 847
831 method = 0; 848 method = 0;
832} 849}
833 850
834static void 851static void
835loop_fork (EV_P) 852loop_fork (EV_P)
836{ 853{
854#if EV_USE_PORT
855 if (method == EVMETHOD_PORT ) port_fork (EV_A);
856#endif
857#if EV_USE_KQUEUE
858 if (method == EVMETHOD_KQUEUE) kqueue_fork (EV_A);
859#endif
837#if EV_USE_EPOLL 860#if EV_USE_EPOLL
838 if (method == EVMETHOD_EPOLL ) epoll_fork (EV_A); 861 if (method == EVMETHOD_EPOLL ) epoll_fork (EV_A);
839#endif
840#if EV_USE_KQUEUE
841 if (method == EVMETHOD_KQUEUE) kqueue_fork (EV_A);
842#endif 862#endif
843 863
844 if (ev_is_active (&sigev)) 864 if (ev_is_active (&sigev))
845 { 865 {
846 /* default loop */ 866 /* default loop */
… …
890 910
891#endif 911#endif
892 912
893#if EV_MULTIPLICITY 913#if EV_MULTIPLICITY
894struct ev_loop * 914struct ev_loop *
915ev_default_loop_ (unsigned int flags)
895#else 916#else
896int 917int
897#endif
898ev_default_loop (unsigned int flags) 918ev_default_loop (unsigned int flags)
919#endif
899{ 920{
900 if (sigpipe [0] == sigpipe [1]) 921 if (sigpipe [0] == sigpipe [1])
901 if (pipe (sigpipe)) 922 if (pipe (sigpipe))
902 return 0; 923 return 0;
903 924
904 if (!default_loop) 925 if (!ev_default_loop_ptr)
905 { 926 {
906#if EV_MULTIPLICITY 927#if EV_MULTIPLICITY
907 struct ev_loop *loop = default_loop = &default_loop_struct; 928 struct ev_loop *loop = ev_default_loop_ptr = &default_loop_struct;
908#else 929#else
909 default_loop = 1; 930 ev_default_loop_ptr = 1;
910#endif 931#endif
911 932
912 loop_init (EV_A_ flags); 933 loop_init (EV_A_ flags);
913 934
914 if (ev_method (EV_A)) 935 if (ev_method (EV_A))
… …
921 ev_signal_start (EV_A_ &childev); 942 ev_signal_start (EV_A_ &childev);
922 ev_unref (EV_A); /* child watcher should not keep loop alive */ 943 ev_unref (EV_A); /* child watcher should not keep loop alive */
923#endif 944#endif
924 } 945 }
925 else 946 else
926 default_loop = 0; 947 ev_default_loop_ptr = 0;
927 } 948 }
928 949
929 return default_loop; 950 return ev_default_loop_ptr;
930} 951}
931 952
932void 953void
933ev_default_destroy (void) 954ev_default_destroy (void)
934{ 955{
935#if EV_MULTIPLICITY 956#if EV_MULTIPLICITY
936 struct ev_loop *loop = default_loop; 957 struct ev_loop *loop = ev_default_loop_ptr;
937#endif 958#endif
938 959
939#ifndef _WIN32 960#ifndef _WIN32
940 ev_ref (EV_A); /* child watcher */ 961 ev_ref (EV_A); /* child watcher */
941 ev_signal_stop (EV_A_ &childev); 962 ev_signal_stop (EV_A_ &childev);
… …
952 973
953void 974void
954ev_default_fork (void) 975ev_default_fork (void)
955{ 976{
956#if EV_MULTIPLICITY 977#if EV_MULTIPLICITY
957 struct ev_loop *loop = default_loop; 978 struct ev_loop *loop = ev_default_loop_ptr;
958#endif 979#endif
959 980
960 if (method) 981 if (method)
961 postfork = 1; 982 postfork = 1;
962} 983}
… …
1159ev_loop (EV_P_ int flags) 1180ev_loop (EV_P_ int flags)
1160{ 1181{
1161 double block; 1182 double block;
1162 loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) ? 1 : 0; 1183 loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) ? 1 : 0;
1163 1184
1164 do 1185 while (activecnt)
1165 { 1186 {
1166 /* queue check watchers (and execute them) */ 1187 /* queue check watchers (and execute them) */
1167 if (expect_false (preparecnt)) 1188 if (expect_false (preparecnt))
1168 { 1189 {
1169 queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE); 1190 queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
… …
1232 /* queue check watchers, to be executed first */ 1253 /* queue check watchers, to be executed first */
1233 if (checkcnt) 1254 if (checkcnt)
1234 queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK); 1255 queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
1235 1256
1236 call_pending (EV_A); 1257 call_pending (EV_A);
1258
1259 if (loop_done)
1260 break;
1237 } 1261 }
1238 while (activecnt && !loop_done);
1239 1262
1240 if (loop_done != 2) 1263 if (loop_done != 2)
1241 loop_done = 0; 1264 loop_done = 0;
1242} 1265}
1243 1266
… …
1341 ((WT)w)->at += mn_now; 1364 ((WT)w)->at += mn_now;
1342 1365
1343 assert (("ev_timer_start called with negative timer repeat value", w->repeat >= 0.)); 1366 assert (("ev_timer_start called with negative timer repeat value", w->repeat >= 0.));
1344 1367
1345 ev_start (EV_A_ (W)w, ++timercnt); 1368 ev_start (EV_A_ (W)w, ++timercnt);
1346 array_needsize (struct ev_timer *, timers, timermax, timercnt, (void)); 1369 array_needsize (struct ev_timer *, timers, timermax, timercnt, EMPTY2);
1347 timers [timercnt - 1] = w; 1370 timers [timercnt - 1] = w;
1348 upheap ((WT *)timers, timercnt - 1); 1371 upheap ((WT *)timers, timercnt - 1);
1349 1372
1350 assert (("internal timer heap corruption", timers [((W)w)->active - 1] == w)); 1373 assert (("internal timer heap corruption", timers [((W)w)->active - 1] == w));
1351} 1374}
… …
1382 } 1405 }
1383 else 1406 else
1384 ev_timer_stop (EV_A_ w); 1407 ev_timer_stop (EV_A_ w);
1385 } 1408 }
1386 else if (w->repeat) 1409 else if (w->repeat)
1410 {
1411 w->at = w->repeat;
1387 ev_timer_start (EV_A_ w); 1412 ev_timer_start (EV_A_ w);
1413 }
1388} 1414}
1389 1415
1390#if EV_PERIODICS 1416#if EV_PERIODICS
1391void 1417void
1392ev_periodic_start (EV_P_ struct ev_periodic *w) 1418ev_periodic_start (EV_P_ struct ev_periodic *w)
… …
1402 /* this formula differs from the one in periodic_reify because we do not always round up */ 1428 /* this formula differs from the one in periodic_reify because we do not always round up */
1403 ((WT)w)->at += ceil ((ev_rt_now - ((WT)w)->at) / w->interval) * w->interval; 1429 ((WT)w)->at += ceil ((ev_rt_now - ((WT)w)->at) / w->interval) * w->interval;
1404 } 1430 }
1405 1431
1406 ev_start (EV_A_ (W)w, ++periodiccnt); 1432 ev_start (EV_A_ (W)w, ++periodiccnt);
1407 array_needsize (struct ev_periodic *, periodics, periodicmax, periodiccnt, (void)); 1433 array_needsize (struct ev_periodic *, periodics, periodicmax, periodiccnt, EMPTY2);
1408 periodics [periodiccnt - 1] = w; 1434 periodics [periodiccnt - 1] = w;
1409 upheap ((WT *)periodics, periodiccnt - 1); 1435 upheap ((WT *)periodics, periodiccnt - 1);
1410 1436
1411 assert (("internal periodic heap corruption", periodics [((W)w)->active - 1] == w)); 1437 assert (("internal periodic heap corruption", periodics [((W)w)->active - 1] == w));
1412} 1438}
… …
1443{ 1469{
1444 if (ev_is_active (w)) 1470 if (ev_is_active (w))
1445 return; 1471 return;
1446 1472
1447 ev_start (EV_A_ (W)w, ++idlecnt); 1473 ev_start (EV_A_ (W)w, ++idlecnt);
1448 array_needsize (struct ev_idle *, idles, idlemax, idlecnt, (void)); 1474 array_needsize (struct ev_idle *, idles, idlemax, idlecnt, EMPTY2);
1449 idles [idlecnt - 1] = w; 1475 idles [idlecnt - 1] = w;
1450} 1476}
1451 1477
1452void 1478void
1453ev_idle_stop (EV_P_ struct ev_idle *w) 1479ev_idle_stop (EV_P_ struct ev_idle *w)
… …
1465{ 1491{
1466 if (ev_is_active (w)) 1492 if (ev_is_active (w))
1467 return; 1493 return;
1468 1494
1469 ev_start (EV_A_ (W)w, ++preparecnt); 1495 ev_start (EV_A_ (W)w, ++preparecnt);
1470 array_needsize (struct ev_prepare *, prepares, preparemax, preparecnt, (void)); 1496 array_needsize (struct ev_prepare *, prepares, preparemax, preparecnt, EMPTY2);
1471 prepares [preparecnt - 1] = w; 1497 prepares [preparecnt - 1] = w;
1472} 1498}
1473 1499
1474void 1500void
1475ev_prepare_stop (EV_P_ struct ev_prepare *w) 1501ev_prepare_stop (EV_P_ struct ev_prepare *w)
… …
1487{ 1513{
1488 if (ev_is_active (w)) 1514 if (ev_is_active (w))
1489 return; 1515 return;
1490 1516
1491 ev_start (EV_A_ (W)w, ++checkcnt); 1517 ev_start (EV_A_ (W)w, ++checkcnt);
1492 array_needsize (struct ev_check *, checks, checkmax, checkcnt, (void)); 1518 array_needsize (struct ev_check *, checks, checkmax, checkcnt, EMPTY2);
1493 checks [checkcnt - 1] = w; 1519 checks [checkcnt - 1] = w;
1494} 1520}
1495 1521
1496void 1522void
1497ev_check_stop (EV_P_ struct ev_check *w) 1523ev_check_stop (EV_P_ struct ev_check *w)
… …
1510 1536
1511void 1537void
1512ev_signal_start (EV_P_ struct ev_signal *w) 1538ev_signal_start (EV_P_ struct ev_signal *w)
1513{ 1539{
1514#if EV_MULTIPLICITY 1540#if EV_MULTIPLICITY
1515 assert (("signal watchers are only supported in the default loop", loop == default_loop)); 1541 assert (("signal watchers are only supported in the default loop", loop == ev_default_loop_ptr));
1516#endif 1542#endif
1517 if (ev_is_active (w)) 1543 if (ev_is_active (w))
1518 return; 1544 return;
1519 1545
1520 assert (("ev_signal_start called with illegal signal number", w->signum > 0)); 1546 assert (("ev_signal_start called with illegal signal number", w->signum > 0));
… …
1553 1579
1554void 1580void
1555ev_child_start (EV_P_ struct ev_child *w) 1581ev_child_start (EV_P_ struct ev_child *w)
1556{ 1582{
1557#if EV_MULTIPLICITY 1583#if EV_MULTIPLICITY
1558 assert (("child watchers are only supported in the default loop", loop == default_loop)); 1584 assert (("child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
1559#endif 1585#endif
1560 if (ev_is_active (w)) 1586 if (ev_is_active (w))
1561 return; 1587 return;
1562 1588
1563 ev_start (EV_A_ (W)w, 1); 1589 ev_start (EV_A_ (W)w, 1);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines