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

Comparing libev/ev.c (file contents):
Revision 1.19 by root, Wed Oct 31 17:55:55 2007 UTC vs.
Revision 1.27 by root, Wed Oct 31 22:16:36 2007 UTC

… …
36 36
37#include <stdio.h> 37#include <stdio.h>
38 38
39#include <assert.h> 39#include <assert.h>
40#include <errno.h> 40#include <errno.h>
41#include <sys/types.h>
42#include <sys/wait.h>
41#include <sys/time.h> 43#include <sys/time.h>
42#include <time.h> 44#include <time.h>
43 45
44#ifndef HAVE_MONOTONIC 46#ifndef HAVE_MONOTONIC
45# ifdef CLOCK_MONOTONIC 47# ifdef CLOCK_MONOTONIC
… …
59# define HAVE_REALTIME 1 /* posix requirement, but might be slower */ 61# define HAVE_REALTIME 1 /* posix requirement, but might be slower */
60#endif 62#endif
61 63
62#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */ 64#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
63#define MAX_BLOCKTIME 60. 65#define MAX_BLOCKTIME 60.
66#define PID_HASHSIZE 16 /* size of pid hahs table, must be power of two */
64 67
65#include "ev.h" 68#include "ev.h"
66 69
67typedef struct ev_watcher *W; 70typedef struct ev_watcher *W;
68typedef struct ev_watcher_list *WL; 71typedef struct ev_watcher_list *WL;
… …
110} 113}
111 114
112#define array_needsize(base,cur,cnt,init) \ 115#define array_needsize(base,cur,cnt,init) \
113 if ((cnt) > cur) \ 116 if ((cnt) > cur) \
114 { \ 117 { \
115 int newcnt = cur ? cur << 1 : 16; \ 118 int newcnt = cur; \
119 do \
120 { \
121 newcnt = (newcnt << 1) | 4 & ~3; \
122 } \
123 while ((cnt) > newcnt); \
124 \
116 base = realloc (base, sizeof (*base) * (newcnt)); \ 125 base = realloc (base, sizeof (*base) * (newcnt)); \
117 init (base + cur, newcnt - cur); \ 126 init (base + cur, newcnt - cur); \
118 cur = newcnt; \ 127 cur = newcnt; \
119 } 128 }
120 129
121/*****************************************************************************/ 130/*****************************************************************************/
122 131
123typedef struct 132typedef struct
124{ 133{
125 struct ev_io *head; 134 struct ev_io *head;
126 unsigned char wev, rev; /* want, received event set */ 135 int events;
127} ANFD; 136} ANFD;
128 137
129static ANFD *anfds; 138static ANFD *anfds;
130static int anfdmax; 139static int anfdmax;
131 140
132static int *fdchanges;
133static int fdchangemax, fdchangecnt;
134
135static void 141static void
136anfds_init (ANFD *base, int count) 142anfds_init (ANFD *base, int count)
137{ 143{
138 while (count--) 144 while (count--)
139 { 145 {
140 base->head = 0; 146 base->head = 0;
141 base->wev = base->rev = EV_NONE; 147 base->events = EV_NONE;
142 ++base; 148 ++base;
143 } 149 }
144} 150}
145 151
146typedef struct 152typedef struct
… …
163 pendings [pendingcnt - 1].events = events; 169 pendings [pendingcnt - 1].events = events;
164 } 170 }
165} 171}
166 172
167static void 173static void
174queue_events (W *events, int eventcnt, int type)
175{
176 int i;
177
178 for (i = 0; i < eventcnt; ++i)
179 event (events [i], type);
180}
181
182static void
168fd_event (int fd, int events) 183fd_event (int fd, int events)
169{ 184{
170 ANFD *anfd = anfds + fd; 185 ANFD *anfd = anfds + fd;
171 struct ev_io *w; 186 struct ev_io *w;
172 187
… …
177 if (ev) 192 if (ev)
178 event ((W)w, ev); 193 event ((W)w, ev);
179 } 194 }
180} 195}
181 196
197/*****************************************************************************/
198
199static int *fdchanges;
200static int fdchangemax, fdchangecnt;
201
182static void 202static void
183queue_events (W *events, int eventcnt, int type) 203fd_reify (void)
184{ 204{
185 int i; 205 int i;
186 206
187 for (i = 0; i < eventcnt; ++i) 207 for (i = 0; i < fdchangecnt; ++i)
188 event (events [i], type); 208 {
209 int fd = fdchanges [i];
210 ANFD *anfd = anfds + fd;
211 struct ev_io *w;
212
213 int events = 0;
214
215 for (w = anfd->head; w; w = w->next)
216 events |= w->events;
217
218 anfd->events &= ~EV_REIFY;
219
220 if (anfd->events != events)
221 {
222 method_modify (fd, anfd->events, events);
223 anfd->events = events;
224 }
225 }
226
227 fdchangecnt = 0;
228}
229
230static void
231fd_change (int fd)
232{
233 if (anfds [fd].events & EV_REIFY)
234 return;
235
236 anfds [fd].events |= EV_REIFY;
237
238 ++fdchangecnt;
239 array_needsize (fdchanges, fdchangemax, fdchangecnt, );
240 fdchanges [fdchangecnt - 1] = fd;
189} 241}
190 242
191/* called on EBADF to verify fds */ 243/* called on EBADF to verify fds */
192static void 244static void
193fd_recheck () 245fd_recheck (void)
194{ 246{
195 int fd; 247 int fd;
196 248
197 for (fd = 0; fd < anfdmax; ++fd) 249 for (fd = 0; fd < anfdmax; ++fd)
198 if (anfds [fd].wev) 250 if (anfds [fd].events)
199 if (fcntl (fd, F_GETFD) == -1 && errno == EBADF) 251 if (fcntl (fd, F_GETFD) == -1 && errno == EBADF)
200 while (anfds [fd].head) 252 while (anfds [fd].head)
253 {
254 event ((W)anfds [fd].head, EV_ERROR);
201 evio_stop (anfds [fd].head); 255 evio_stop (anfds [fd].head);
256 }
202} 257}
203 258
204/*****************************************************************************/ 259/*****************************************************************************/
205 260
206static struct ev_timer **timers; 261static struct ev_timer **timers;
… …
324/*****************************************************************************/ 379/*****************************************************************************/
325 380
326static struct ev_idle **idles; 381static struct ev_idle **idles;
327static int idlemax, idlecnt; 382static int idlemax, idlecnt;
328 383
384static struct ev_prepare **prepares;
385static int preparemax, preparecnt;
386
329static struct ev_check **checks; 387static struct ev_check **checks;
330static int checkmax, checkcnt; 388static int checkmax, checkcnt;
331 389
332/*****************************************************************************/ 390/*****************************************************************************/
333 391
392static struct ev_child *childs [PID_HASHSIZE];
393static struct ev_signal childev;
394
395#ifndef WCONTINUED
396# define WCONTINUED 0
397#endif
398
399static void
400childcb (struct ev_signal *sw, int revents)
401{
402 struct ev_child *w;
403 int pid, status;
404
405 while ((pid = waitpid (-1, &status, WNOHANG | WUNTRACED | WCONTINUED)) != -1)
406 for (w = childs [pid & (PID_HASHSIZE - 1)]; w; w = w->next)
407 if (w->pid == pid || w->pid == -1)
408 {
409 w->status = status;
410 event ((W)w, EV_CHILD);
411 }
412}
413
414/*****************************************************************************/
415
334#if HAVE_EPOLL 416#if HAVE_EPOLL
335# include "ev_epoll.c" 417# include "ev_epoll.c"
336#endif 418#endif
337#if HAVE_SELECT 419#if HAVE_SELECT
338# include "ev_select.c" 420# include "ev_select.c"
339#endif 421#endif
340 422
423int
424ev_version_major (void)
425{
426 return EV_VERSION_MAJOR;
427}
428
429int
430ev_version_minor (void)
431{
432 return EV_VERSION_MINOR;
433}
434
341int ev_init (int flags) 435int ev_init (int flags)
342{ 436{
437 if (!ev_method)
438 {
343#if HAVE_MONOTONIC 439#if HAVE_MONOTONIC
344 { 440 {
345 struct timespec ts; 441 struct timespec ts;
346 if (!clock_gettime (CLOCK_MONOTONIC, &ts)) 442 if (!clock_gettime (CLOCK_MONOTONIC, &ts))
347 have_monotonic = 1; 443 have_monotonic = 1;
348 } 444 }
349#endif 445#endif
350 446
351 ev_now = ev_time (); 447 ev_now = ev_time ();
352 now = get_clock (); 448 now = get_clock ();
353 diff = ev_now - now; 449 diff = ev_now - now;
354 450
355 if (pipe (sigpipe)) 451 if (pipe (sigpipe))
356 return 0; 452 return 0;
357 453
358 ev_method = EVMETHOD_NONE; 454 ev_method = EVMETHOD_NONE;
359#if HAVE_EPOLL 455#if HAVE_EPOLL
360 if (ev_method == EVMETHOD_NONE) epoll_init (flags); 456 if (ev_method == EVMETHOD_NONE) epoll_init (flags);
361#endif 457#endif
362#if HAVE_SELECT 458#if HAVE_SELECT
363 if (ev_method == EVMETHOD_NONE) select_init (flags); 459 if (ev_method == EVMETHOD_NONE) select_init (flags);
364#endif 460#endif
365 461
366 if (ev_method) 462 if (ev_method)
367 { 463 {
368 evw_init (&sigev, sigcb); 464 evw_init (&sigev, sigcb);
369 siginit (); 465 siginit ();
466
467 evsignal_init (&childev, childcb, SIGCHLD);
468 evsignal_start (&childev);
469 }
370 } 470 }
371 471
372 return ev_method; 472 return ev_method;
373} 473}
374 474
375/*****************************************************************************/ 475/*****************************************************************************/
376 476
477void
377void ev_prefork (void) 478ev_prefork (void)
378{ 479{
379 /* nop */ 480 /* nop */
380} 481}
381 482
483void
382void ev_postfork_parent (void) 484ev_postfork_parent (void)
383{ 485{
384 /* nop */ 486 /* nop */
385} 487}
386 488
489void
387void ev_postfork_child (void) 490ev_postfork_child (void)
388{ 491{
389#if HAVE_EPOLL 492#if HAVE_EPOLL
390 if (ev_method == EVMETHOD_EPOLL) 493 if (ev_method == EVMETHOD_EPOLL)
391 epoll_postfork_child (); 494 epoll_postfork_child ();
392#endif 495#endif
… …
399} 502}
400 503
401/*****************************************************************************/ 504/*****************************************************************************/
402 505
403static void 506static void
404fd_reify (void)
405{
406 int i;
407
408 for (i = 0; i < fdchangecnt; ++i)
409 {
410 int fd = fdchanges [i];
411 ANFD *anfd = anfds + fd;
412 struct ev_io *w;
413
414 int wev = 0;
415
416 for (w = anfd->head; w; w = w->next)
417 wev |= w->events;
418
419 if (anfd->wev != wev)
420 {
421 method_modify (fd, anfd->wev, wev);
422 anfd->wev = wev;
423 }
424 }
425
426 fdchangecnt = 0;
427}
428
429static void
430call_pending () 507call_pending (void)
431{ 508{
432 while (pendingcnt) 509 while (pendingcnt)
433 { 510 {
434 ANPENDING *p = pendings + --pendingcnt; 511 ANPENDING *p = pendings + --pendingcnt;
435 512
… …
440 } 517 }
441 } 518 }
442} 519}
443 520
444static void 521static void
445timers_reify () 522timers_reify (void)
446{ 523{
447 while (timercnt && timers [0]->at <= now) 524 while (timercnt && timers [0]->at <= now)
448 { 525 {
449 struct ev_timer *w = timers [0]; 526 struct ev_timer *w = timers [0];
450 527
… …
461 evtimer_stop (w); /* nonrepeating: stop timer */ 538 evtimer_stop (w); /* nonrepeating: stop timer */
462 } 539 }
463} 540}
464 541
465static void 542static void
466periodics_reify () 543periodics_reify (void)
467{ 544{
468 while (periodiccnt && periodics [0]->at <= ev_now) 545 while (periodiccnt && periodics [0]->at <= ev_now)
469 { 546 {
470 struct ev_periodic *w = periodics [0]; 547 struct ev_periodic *w = periodics [0];
471 548
… …
507 } 584 }
508 } 585 }
509} 586}
510 587
511static void 588static void
512time_update () 589time_update (void)
513{ 590{
514 int i; 591 int i;
515 592
516 ev_now = ev_time (); 593 ev_now = ev_time ();
517 594
… …
551int ev_loop_done; 628int ev_loop_done;
552 629
553void ev_loop (int flags) 630void ev_loop (int flags)
554{ 631{
555 double block; 632 double block;
556 ev_loop_done = flags & EVLOOP_ONESHOT ? 1 : 0; 633 ev_loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) ? 1 : 0;
557
558 if (checkcnt)
559 {
560 queue_events ((W *)checks, checkcnt, EV_CHECK);
561 call_pending ();
562 }
563 634
564 do 635 do
565 { 636 {
637 /* queue check watchers (and execute them) */
638 if (preparecnt)
639 {
640 queue_events ((W *)prepares, preparecnt, EV_PREPARE);
641 call_pending ();
642 }
643
566 /* update fd-related kernel structures */ 644 /* update fd-related kernel structures */
567 fd_reify (); 645 fd_reify ();
568 646
569 /* calculate blocking time */ 647 /* calculate blocking time */
570 648
571 /* we only need this for !monotonic clock, but as we always have timers, we just calculate it every time */ 649 /* we only need this for !monotonic clockor timers, but as we basically
650 always have timers, we just calculate it always */
572 ev_now = ev_time (); 651 ev_now = ev_time ();
573 652
574 if (flags & EVLOOP_NONBLOCK || idlecnt) 653 if (flags & EVLOOP_NONBLOCK || idlecnt)
575 block = 0.; 654 block = 0.;
576 else 655 else
… …
596 675
597 /* update ev_now, do magic */ 676 /* update ev_now, do magic */
598 time_update (); 677 time_update ();
599 678
600 /* queue pending timers and reschedule them */ 679 /* queue pending timers and reschedule them */
680 timers_reify (); /* relative timers called last */
601 periodics_reify (); /* absolute timers first */ 681 periodics_reify (); /* absolute timers called first */
602 timers_reify (); /* relative timers second */
603 682
604 /* queue idle watchers unless io or timers are pending */ 683 /* queue idle watchers unless io or timers are pending */
605 if (!pendingcnt) 684 if (!pendingcnt)
606 queue_events ((W *)idles, idlecnt, EV_IDLE); 685 queue_events ((W *)idles, idlecnt, EV_IDLE);
607 686
608 /* queue check and possibly idle watchers */ 687 /* queue check watchers, to be executed first */
688 if (checkcnt)
609 queue_events ((W *)checks, checkcnt, EV_CHECK); 689 queue_events ((W *)checks, checkcnt, EV_CHECK);
610 690
611 call_pending (); 691 call_pending ();
612 } 692 }
613 while (!ev_loop_done); 693 while (!ev_loop_done);
614 694
… …
674 754
675 ev_start ((W)w, 1); 755 ev_start ((W)w, 1);
676 array_needsize (anfds, anfdmax, fd + 1, anfds_init); 756 array_needsize (anfds, anfdmax, fd + 1, anfds_init);
677 wlist_add ((WL *)&anfds[fd].head, (WL)w); 757 wlist_add ((WL *)&anfds[fd].head, (WL)w);
678 758
679 ++fdchangecnt; 759 fd_change (fd);
680 array_needsize (fdchanges, fdchangemax, fdchangecnt, );
681 fdchanges [fdchangecnt - 1] = fd;
682} 760}
683 761
684void 762void
685evio_stop (struct ev_io *w) 763evio_stop (struct ev_io *w)
686{ 764{
… …
689 return; 767 return;
690 768
691 wlist_del ((WL *)&anfds[w->fd].head, (WL)w); 769 wlist_del ((WL *)&anfds[w->fd].head, (WL)w);
692 ev_stop ((W)w); 770 ev_stop ((W)w);
693 771
694 ++fdchangecnt; 772 fd_change (w->fd);
695 array_needsize (fdchanges, fdchangemax, fdchangecnt, );
696 fdchanges [fdchangecnt - 1] = w->fd;
697} 773}
698 774
699void 775void
700evtimer_start (struct ev_timer *w) 776evtimer_start (struct ev_timer *w)
701{ 777{
… …
833 909
834 idles [w->active - 1] = idles [--idlecnt]; 910 idles [w->active - 1] = idles [--idlecnt];
835 ev_stop ((W)w); 911 ev_stop ((W)w);
836} 912}
837 913
914void evprepare_start (struct ev_prepare *w)
915{
916 if (ev_is_active (w))
917 return;
918
919 ev_start ((W)w, ++preparecnt);
920 array_needsize (prepares, preparemax, preparecnt, );
921 prepares [preparecnt - 1] = w;
922}
923
924void evprepare_stop (struct ev_prepare *w)
925{
926 ev_clear ((W)w);
927 if (ev_is_active (w))
928 return;
929
930 prepares [w->active - 1] = prepares [--preparecnt];
931 ev_stop ((W)w);
932}
933
838void evcheck_start (struct ev_check *w) 934void evcheck_start (struct ev_check *w)
839{ 935{
840 if (ev_is_active (w)) 936 if (ev_is_active (w))
841 return; 937 return;
842 938
… …
850 ev_clear ((W)w); 946 ev_clear ((W)w);
851 if (ev_is_active (w)) 947 if (ev_is_active (w))
852 return; 948 return;
853 949
854 checks [w->active - 1] = checks [--checkcnt]; 950 checks [w->active - 1] = checks [--checkcnt];
951 ev_stop ((W)w);
952}
953
954void evchild_start (struct ev_child *w)
955{
956 if (ev_is_active (w))
957 return;
958
959 ev_start ((W)w, 1);
960 wlist_add ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w);
961}
962
963void evchild_stop (struct ev_child *w)
964{
965 ev_clear ((W)w);
966 if (ev_is_active (w))
967 return;
968
969 wlist_del ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w);
855 ev_stop ((W)w); 970 ev_stop ((W)w);
856} 971}
857 972
858/*****************************************************************************/ 973/*****************************************************************************/
859 974

Diff Legend

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