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

Comparing libev/ev.c (file contents):
Revision 1.44 by root, Fri Nov 2 20:59:14 2007 UTC vs.
Revision 1.52 by root, Sat Nov 3 22:10:39 2007 UTC

26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
29 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 */ 30 */
31#if EV_USE_CONFIG_H 31#ifndef EV_STANDALONE
32# include "config.h" 32# include "config.h"
33#endif 33#endif
34 34
35#include <math.h> 35#include <math.h>
36#include <stdlib.h> 36#include <stdlib.h>
42#include <stdio.h> 42#include <stdio.h>
43 43
44#include <assert.h> 44#include <assert.h>
45#include <errno.h> 45#include <errno.h>
46#include <sys/types.h> 46#include <sys/types.h>
47#ifndef WIN32
47#include <sys/wait.h> 48# include <sys/wait.h>
49#endif
48#include <sys/time.h> 50#include <sys/time.h>
49#include <time.h> 51#include <time.h>
50 52
51/**/ 53/**/
52 54
56 58
57#ifndef EV_USE_SELECT 59#ifndef EV_USE_SELECT
58# define EV_USE_SELECT 1 60# define EV_USE_SELECT 1
59#endif 61#endif
60 62
61#ifndef EV_USE_POLL 63#ifndef EV_USEV_POLL
62# define EV_USE_POLL 0 /* poll is usually slower than select, and not as well tested */ 64# define EV_USEV_POLL 0 /* poll is usually slower than select, and not as well tested */
63#endif 65#endif
64 66
65#ifndef EV_USE_EPOLL 67#ifndef EV_USE_EPOLL
66# define EV_USE_EPOLL 0 68# define EV_USE_EPOLL 0
67#endif 69#endif
111 113
112typedef struct ev_watcher *W; 114typedef struct ev_watcher *W;
113typedef struct ev_watcher_list *WL; 115typedef struct ev_watcher_list *WL;
114typedef struct ev_watcher_time *WT; 116typedef struct ev_watcher_time *WT;
115 117
116static ev_tstamp now_floor, now, diff; /* monotonic clock */ 118static ev_tstamp now_floor, mn_now, diff; /* monotonic clock */
117ev_tstamp ev_now; 119static ev_tstamp rt_now;
118int ev_method; 120static int method;
119 121
120static int have_monotonic; /* runtime */ 122static int have_monotonic; /* runtime */
121 123
122static ev_tstamp method_fudge; /* stupid epoll-returns-early bug */ 124static ev_tstamp method_fudge; /* stupid epoll-returns-early bug */
123static void (*method_modify)(int fd, int oev, int nev); 125static void (*method_modify)(EV_P_ int fd, int oev, int nev);
124static void (*method_poll)(ev_tstamp timeout); 126static void (*method_poll)(EV_P_ ev_tstamp timeout);
127
128static int activecnt; /* number of active events */
129
130#if EV_USE_SELECT
131static unsigned char *vec_ri, *vec_ro, *vec_wi, *vec_wo;
132static int vec_max;
133#endif
134
135#if EV_USEV_POLL
136static struct pollfd *polls;
137static int pollmax, pollcnt;
138static int *pollidxs; /* maps fds into structure indices */
139static int pollidxmax;
140#endif
141
142#if EV_USE_EPOLL
143static int epoll_fd = -1;
144
145static struct epoll_event *events;
146static int eventmax;
147#endif
148
149#if EV_USE_KQUEUE
150static int kqueue_fd;
151static struct kevent *kqueue_changes;
152static int kqueue_changemax, kqueue_changecnt;
153static struct kevent *kqueue_events;
154static int kqueue_eventmax;
155#endif
125 156
126/*****************************************************************************/ 157/*****************************************************************************/
127 158
128ev_tstamp 159inline ev_tstamp
129ev_time (void) 160ev_time (void)
130{ 161{
131#if EV_USE_REALTIME 162#if EV_USE_REALTIME
132 struct timespec ts; 163 struct timespec ts;
133 clock_gettime (CLOCK_REALTIME, &ts); 164 clock_gettime (CLOCK_REALTIME, &ts);
137 gettimeofday (&tv, 0); 168 gettimeofday (&tv, 0);
138 return tv.tv_sec + tv.tv_usec * 1e-6; 169 return tv.tv_sec + tv.tv_usec * 1e-6;
139#endif 170#endif
140} 171}
141 172
142static ev_tstamp 173inline ev_tstamp
143get_clock (void) 174get_clock (void)
144{ 175{
145#if EV_USE_MONOTONIC 176#if EV_USE_MONOTONIC
146 if (expect_true (have_monotonic)) 177 if (expect_true (have_monotonic))
147 { 178 {
150 return ts.tv_sec + ts.tv_nsec * 1e-9; 181 return ts.tv_sec + ts.tv_nsec * 1e-9;
151 } 182 }
152#endif 183#endif
153 184
154 return ev_time (); 185 return ev_time ();
186}
187
188ev_tstamp
189ev_now (EV_P)
190{
191 return rt_now;
155} 192}
156 193
157#define array_roundsize(base,n) ((n) | 4 & ~3) 194#define array_roundsize(base,n) ((n) | 4 & ~3)
158 195
159#define array_needsize(base,cur,cnt,init) \ 196#define array_needsize(base,cur,cnt,init) \
173 210
174/*****************************************************************************/ 211/*****************************************************************************/
175 212
176typedef struct 213typedef struct
177{ 214{
178 struct ev_io *head; 215 struct ev_watcher_list *head;
179 unsigned char events; 216 unsigned char events;
180 unsigned char reify; 217 unsigned char reify;
181} ANFD; 218} ANFD;
182 219
183static ANFD *anfds; 220static ANFD *anfds;
204 241
205static ANPENDING *pendings [NUMPRI]; 242static ANPENDING *pendings [NUMPRI];
206static int pendingmax [NUMPRI], pendingcnt [NUMPRI]; 243static int pendingmax [NUMPRI], pendingcnt [NUMPRI];
207 244
208static void 245static void
209event (W w, int events) 246event (EV_P_ W w, int events)
210{ 247{
211 if (w->pending) 248 if (w->pending)
212 { 249 {
213 pendings [ABSPRI (w)][w->pending - 1].events |= events; 250 pendings [ABSPRI (w)][w->pending - 1].events |= events;
214 return; 251 return;
219 pendings [ABSPRI (w)][w->pending - 1].w = w; 256 pendings [ABSPRI (w)][w->pending - 1].w = w;
220 pendings [ABSPRI (w)][w->pending - 1].events = events; 257 pendings [ABSPRI (w)][w->pending - 1].events = events;
221} 258}
222 259
223static void 260static void
224queue_events (W *events, int eventcnt, int type) 261queue_events (EV_P_ W *events, int eventcnt, int type)
225{ 262{
226 int i; 263 int i;
227 264
228 for (i = 0; i < eventcnt; ++i) 265 for (i = 0; i < eventcnt; ++i)
229 event (events [i], type); 266 event (EV_A_ events [i], type);
230} 267}
231 268
232static void 269static void
233fd_event (int fd, int events) 270fd_event (EV_P_ int fd, int events)
234{ 271{
235 ANFD *anfd = anfds + fd; 272 ANFD *anfd = anfds + fd;
236 struct ev_io *w; 273 struct ev_io *w;
237 274
238 for (w = anfd->head; w; w = w->next) 275 for (w = (struct ev_io *)anfd->head; w; w = (struct ev_io *)((WL)w)->next)
239 { 276 {
240 int ev = w->events & events; 277 int ev = w->events & events;
241 278
242 if (ev) 279 if (ev)
243 event ((W)w, ev); 280 event (EV_A_ (W)w, ev);
244 } 281 }
245} 282}
246 283
247/*****************************************************************************/ 284/*****************************************************************************/
248 285
249static int *fdchanges; 286static int *fdchanges;
250static int fdchangemax, fdchangecnt; 287static int fdchangemax, fdchangecnt;
251 288
252static void 289static void
253fd_reify (void) 290fd_reify (EV_P)
254{ 291{
255 int i; 292 int i;
256 293
257 for (i = 0; i < fdchangecnt; ++i) 294 for (i = 0; i < fdchangecnt; ++i)
258 { 295 {
260 ANFD *anfd = anfds + fd; 297 ANFD *anfd = anfds + fd;
261 struct ev_io *w; 298 struct ev_io *w;
262 299
263 int events = 0; 300 int events = 0;
264 301
265 for (w = anfd->head; w; w = w->next) 302 for (w = (struct ev_io *)anfd->head; w; w = (struct ev_io *)((WL)w)->next)
266 events |= w->events; 303 events |= w->events;
267 304
268 anfd->reify = 0; 305 anfd->reify = 0;
269 306
270 if (anfd->events != events) 307 if (anfd->events != events)
271 { 308 {
272 method_modify (fd, anfd->events, events); 309 method_modify (EV_A_ fd, anfd->events, events);
273 anfd->events = events; 310 anfd->events = events;
274 } 311 }
275 } 312 }
276 313
277 fdchangecnt = 0; 314 fdchangecnt = 0;
278} 315}
279 316
280static void 317static void
281fd_change (int fd) 318fd_change (EV_P_ int fd)
282{ 319{
283 if (anfds [fd].reify || fdchangecnt < 0) 320 if (anfds [fd].reify || fdchangecnt < 0)
284 return; 321 return;
285 322
286 anfds [fd].reify = 1; 323 anfds [fd].reify = 1;
289 array_needsize (fdchanges, fdchangemax, fdchangecnt, ); 326 array_needsize (fdchanges, fdchangemax, fdchangecnt, );
290 fdchanges [fdchangecnt - 1] = fd; 327 fdchanges [fdchangecnt - 1] = fd;
291} 328}
292 329
293static void 330static void
294fd_kill (int fd) 331fd_kill (EV_P_ int fd)
295{ 332{
296 struct ev_io *w; 333 struct ev_io *w;
297 334
298 printf ("killing fd %d\n", fd);//D
299 while ((w = anfds [fd].head)) 335 while ((w = (struct ev_io *)anfds [fd].head))
300 { 336 {
301 ev_io_stop (w); 337 ev_io_stop (EV_A_ w);
302 event ((W)w, EV_ERROR | EV_READ | EV_WRITE); 338 event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
303 } 339 }
304} 340}
305 341
306/* called on EBADF to verify fds */ 342/* called on EBADF to verify fds */
307static void 343static void
308fd_ebadf (void) 344fd_ebadf (EV_P)
309{ 345{
310 int fd; 346 int fd;
311 347
312 for (fd = 0; fd < anfdmax; ++fd) 348 for (fd = 0; fd < anfdmax; ++fd)
313 if (anfds [fd].events) 349 if (anfds [fd].events)
314 if (fcntl (fd, F_GETFD) == -1 && errno == EBADF) 350 if (fcntl (fd, F_GETFD) == -1 && errno == EBADF)
315 fd_kill (fd); 351 fd_kill (EV_A_ fd);
316} 352}
317 353
318/* called on ENOMEM in select/poll to kill some fds and retry */ 354/* called on ENOMEM in select/poll to kill some fds and retry */
319static void 355static void
320fd_enomem (void) 356fd_enomem (EV_P)
321{ 357{
322 int fd = anfdmax; 358 int fd = anfdmax;
323 359
324 while (fd--) 360 while (fd--)
325 if (anfds [fd].events) 361 if (anfds [fd].events)
326 { 362 {
327 close (fd); 363 close (fd);
328 fd_kill (fd); 364 fd_kill (EV_A_ fd);
329 return; 365 return;
330 } 366 }
331} 367}
332 368
333/*****************************************************************************/ 369/*****************************************************************************/
381 417
382/*****************************************************************************/ 418/*****************************************************************************/
383 419
384typedef struct 420typedef struct
385{ 421{
386 struct ev_signal *head; 422 struct ev_watcher_list *head;
387 sig_atomic_t volatile gotsig; 423 sig_atomic_t volatile gotsig;
388} ANSIG; 424} ANSIG;
389 425
390static ANSIG *signals; 426static ANSIG *signals;
391static int signalmax; 427static int signalmax;
411{ 447{
412 signals [signum - 1].gotsig = 1; 448 signals [signum - 1].gotsig = 1;
413 449
414 if (!gotsig) 450 if (!gotsig)
415 { 451 {
452 int old_errno = errno;
416 gotsig = 1; 453 gotsig = 1;
417 write (sigpipe [1], &signum, 1); 454 write (sigpipe [1], &signum, 1);
455 errno = old_errno;
418 } 456 }
419} 457}
420 458
421static void 459static void
422sigcb (struct ev_io *iow, int revents) 460sigcb (EV_P_ struct ev_io *iow, int revents)
423{ 461{
424 struct ev_signal *w; 462 struct ev_watcher_list *w;
425 int signum; 463 int signum;
426 464
427 read (sigpipe [0], &revents, 1); 465 read (sigpipe [0], &revents, 1);
428 gotsig = 0; 466 gotsig = 0;
429 467
431 if (signals [signum].gotsig) 469 if (signals [signum].gotsig)
432 { 470 {
433 signals [signum].gotsig = 0; 471 signals [signum].gotsig = 0;
434 472
435 for (w = signals [signum].head; w; w = w->next) 473 for (w = signals [signum].head; w; w = w->next)
436 event ((W)w, EV_SIGNAL); 474 event (EV_A_ (W)w, EV_SIGNAL);
437 } 475 }
438} 476}
439 477
440static void 478static void
441siginit (void) 479siginit (EV_P)
442{ 480{
481#ifndef WIN32
443 fcntl (sigpipe [0], F_SETFD, FD_CLOEXEC); 482 fcntl (sigpipe [0], F_SETFD, FD_CLOEXEC);
444 fcntl (sigpipe [1], F_SETFD, FD_CLOEXEC); 483 fcntl (sigpipe [1], F_SETFD, FD_CLOEXEC);
445 484
446 /* rather than sort out wether we really need nb, set it */ 485 /* rather than sort out wether we really need nb, set it */
447 fcntl (sigpipe [0], F_SETFL, O_NONBLOCK); 486 fcntl (sigpipe [0], F_SETFL, O_NONBLOCK);
448 fcntl (sigpipe [1], F_SETFL, O_NONBLOCK); 487 fcntl (sigpipe [1], F_SETFL, O_NONBLOCK);
488#endif
449 489
450 ev_io_set (&sigev, sigpipe [0], EV_READ); 490 ev_io_set (&sigev, sigpipe [0], EV_READ);
451 ev_io_start (&sigev); 491 ev_io_start (&sigev);
492 ev_unref (EV_A); /* child watcher should not keep loop alive */
452} 493}
453 494
454/*****************************************************************************/ 495/*****************************************************************************/
455 496
456static struct ev_idle **idles; 497static struct ev_idle **idles;
465/*****************************************************************************/ 506/*****************************************************************************/
466 507
467static struct ev_child *childs [PID_HASHSIZE]; 508static struct ev_child *childs [PID_HASHSIZE];
468static struct ev_signal childev; 509static struct ev_signal childev;
469 510
511#ifndef WIN32
512
470#ifndef WCONTINUED 513#ifndef WCONTINUED
471# define WCONTINUED 0 514# define WCONTINUED 0
472#endif 515#endif
473 516
474static void 517static void
475childcb (struct ev_signal *sw, int revents) 518child_reap (EV_P_ struct ev_signal *sw, int chain, int pid, int status)
476{ 519{
477 struct ev_child *w; 520 struct ev_child *w;
521
522 for (w = (struct ev_child *)childs [chain & (PID_HASHSIZE - 1)]; w; w = (struct ev_child *)((WL)w)->next)
523 if (w->pid == pid || !w->pid)
524 {
525 w->priority = sw->priority; /* need to do it *now* */
526 w->rpid = pid;
527 w->rstatus = status;
528 event (EV_A_ (W)w, EV_CHILD);
529 }
530}
531
532static void
533childcb (EV_P_ struct ev_signal *sw, int revents)
534{
478 int pid, status; 535 int pid, status;
479 536
480 while ((pid = waitpid (-1, &status, WNOHANG | WUNTRACED | WCONTINUED)) != -1) 537 if (0 < (pid = waitpid (-1, &status, WNOHANG | WUNTRACED | WCONTINUED)))
481 for (w = childs [pid & (PID_HASHSIZE - 1)]; w; w = w->next) 538 {
482 if (w->pid == pid || !w->pid) 539 /* make sure we are called again until all childs have been reaped */
483 { 540 event (EV_A_ (W)sw, EV_SIGNAL);
484 w->status = status; 541
485 event ((W)w, EV_CHILD); 542 child_reap (EV_A_ sw, pid, pid, status);
486 } 543 child_reap (EV_A_ sw, 0, pid, status); /* this might trigger a watcher twice, but event catches that */
544 }
487} 545}
546
547#endif
488 548
489/*****************************************************************************/ 549/*****************************************************************************/
490 550
491#if EV_USE_KQUEUE 551#if EV_USE_KQUEUE
492# include "ev_kqueue.c" 552# include "ev_kqueue.c"
493#endif 553#endif
494#if EV_USE_EPOLL 554#if EV_USE_EPOLL
495# include "ev_epoll.c" 555# include "ev_epoll.c"
496#endif 556#endif
497#if EV_USE_POLL 557#if EV_USEV_POLL
498# include "ev_poll.c" 558# include "ev_poll.c"
499#endif 559#endif
500#if EV_USE_SELECT 560#if EV_USE_SELECT
501# include "ev_select.c" 561# include "ev_select.c"
502#endif 562#endif
511ev_version_minor (void) 571ev_version_minor (void)
512{ 572{
513 return EV_VERSION_MINOR; 573 return EV_VERSION_MINOR;
514} 574}
515 575
516/* return true if we are running with elevated privileges and ignore env variables */ 576/* return true if we are running with elevated privileges and should ignore env variables */
517static int 577static int
518enable_secure () 578enable_secure (void)
519{ 579{
580#ifdef WIN32
581 return 0;
582#else
520 return getuid () != geteuid () 583 return getuid () != geteuid ()
521 || getgid () != getegid (); 584 || getgid () != getegid ();
585#endif
522} 586}
523 587
588int
589ev_method (EV_P)
590{
591 return method;
592}
593
594int
524int ev_init (int methods) 595ev_init (EV_P_ int methods)
525{ 596{
526 if (!ev_method) 597 if (!method)
527 { 598 {
528#if EV_USE_MONOTONIC 599#if EV_USE_MONOTONIC
529 { 600 {
530 struct timespec ts; 601 struct timespec ts;
531 if (!clock_gettime (CLOCK_MONOTONIC, &ts)) 602 if (!clock_gettime (CLOCK_MONOTONIC, &ts))
532 have_monotonic = 1; 603 have_monotonic = 1;
533 } 604 }
534#endif 605#endif
535 606
536 ev_now = ev_time (); 607 rt_now = ev_time ();
537 now = get_clock (); 608 mn_now = get_clock ();
538 now_floor = now; 609 now_floor = mn_now;
539 diff = ev_now - now; 610 diff = rt_now - mn_now;
540 611
541 if (pipe (sigpipe)) 612 if (pipe (sigpipe))
542 return 0; 613 return 0;
543 614
544 if (methods == EVMETHOD_AUTO) 615 if (methods == EVMETHOD_AUTO)
545 if (!enable_secure () && getenv ("LIBEV_METHODS")) 616 if (!enable_secure () && getenv ("LIBmethodS"))
546 methods = atoi (getenv ("LIBEV_METHODS")); 617 methods = atoi (getenv ("LIBmethodS"));
547 else 618 else
548 methods = EVMETHOD_ANY; 619 methods = EVMETHOD_ANY;
549 620
550 ev_method = 0; 621 method = 0;
551#if EV_USE_KQUEUE 622#if EV_USE_KQUEUE
552 if (!ev_method && (methods & EVMETHOD_KQUEUE)) kqueue_init (methods); 623 if (!method && (methods & EVMETHOD_KQUEUE)) method = kqueue_init (EV_A_ methods);
553#endif 624#endif
554#if EV_USE_EPOLL 625#if EV_USE_EPOLL
555 if (!ev_method && (methods & EVMETHOD_EPOLL )) epoll_init (methods); 626 if (!method && (methods & EVMETHOD_EPOLL )) method = epoll_init (EV_A_ methods);
556#endif 627#endif
557#if EV_USE_POLL 628#if EV_USEV_POLL
558 if (!ev_method && (methods & EVMETHOD_POLL )) poll_init (methods); 629 if (!method && (methods & EVMETHOD_POLL )) method = poll_init (EV_A_ methods);
559#endif 630#endif
560#if EV_USE_SELECT 631#if EV_USE_SELECT
561 if (!ev_method && (methods & EVMETHOD_SELECT)) select_init (methods); 632 if (!method && (methods & EVMETHOD_SELECT)) method = select_init (EV_A_ methods);
562#endif 633#endif
563 634
564 if (ev_method) 635 if (method)
565 { 636 {
566 ev_watcher_init (&sigev, sigcb); 637 ev_watcher_init (&sigev, sigcb);
638 ev_set_priority (&sigev, EV_MAXPRI);
567 siginit (); 639 siginit (EV_A);
568 640
641#ifndef WIN32
569 ev_signal_init (&childev, childcb, SIGCHLD); 642 ev_signal_init (&childev, childcb, SIGCHLD);
643 ev_set_priority (&childev, EV_MAXPRI);
570 ev_signal_start (&childev); 644 ev_signal_start (EV_A_ &childev);
645 ev_unref (EV_A); /* child watcher should not keep loop alive */
646#endif
571 } 647 }
572 } 648 }
573 649
574 return ev_method; 650 return method;
575} 651}
576 652
577/*****************************************************************************/ 653/*****************************************************************************/
578 654
579void 655void
590 666
591void 667void
592ev_fork_child (void) 668ev_fork_child (void)
593{ 669{
594#if EV_USE_EPOLL 670#if EV_USE_EPOLL
595 if (ev_method == EVMETHOD_EPOLL) 671 if (method == EVMETHOD_EPOLL)
596 epoll_postfork_child (); 672 epoll_postfork_child ();
597#endif 673#endif
598 674
599 ev_io_stop (&sigev); 675 ev_io_stop (&sigev);
600 close (sigpipe [0]); 676 close (sigpipe [0]);
604} 680}
605 681
606/*****************************************************************************/ 682/*****************************************************************************/
607 683
608static void 684static void
609call_pending (void) 685call_pending (EV_P)
610{ 686{
611 int pri; 687 int pri;
612 688
613 for (pri = NUMPRI; pri--; ) 689 for (pri = NUMPRI; pri--; )
614 while (pendingcnt [pri]) 690 while (pendingcnt [pri])
616 ANPENDING *p = pendings [pri] + --pendingcnt [pri]; 692 ANPENDING *p = pendings [pri] + --pendingcnt [pri];
617 693
618 if (p->w) 694 if (p->w)
619 { 695 {
620 p->w->pending = 0; 696 p->w->pending = 0;
621 p->w->cb (p->w, p->events); 697 p->w->cb (EV_A_ p->w, p->events);
622 } 698 }
623 } 699 }
624} 700}
625 701
626static void 702static void
627timers_reify (void) 703timers_reify (EV_P)
628{ 704{
629 while (timercnt && timers [0]->at <= now) 705 while (timercnt && timers [0]->at <= mn_now)
630 { 706 {
631 struct ev_timer *w = timers [0]; 707 struct ev_timer *w = timers [0];
632 708
633 /* first reschedule or stop timer */ 709 /* first reschedule or stop timer */
634 if (w->repeat) 710 if (w->repeat)
635 { 711 {
636 assert (("negative ev_timer repeat value found while processing timers", w->repeat > 0.)); 712 assert (("negative ev_timer repeat value found while processing timers", w->repeat > 0.));
637 w->at = now + w->repeat; 713 w->at = mn_now + w->repeat;
638 downheap ((WT *)timers, timercnt, 0); 714 downheap ((WT *)timers, timercnt, 0);
639 } 715 }
640 else 716 else
641 ev_timer_stop (w); /* nonrepeating: stop timer */ 717 ev_timer_stop (EV_A_ w); /* nonrepeating: stop timer */
642 718
643 event ((W)w, EV_TIMEOUT); 719 event ((W)w, EV_TIMEOUT);
644 } 720 }
645} 721}
646 722
647static void 723static void
648periodics_reify (void) 724periodics_reify (EV_P)
649{ 725{
650 while (periodiccnt && periodics [0]->at <= ev_now) 726 while (periodiccnt && periodics [0]->at <= rt_now)
651 { 727 {
652 struct ev_periodic *w = periodics [0]; 728 struct ev_periodic *w = periodics [0];
653 729
654 /* first reschedule or stop timer */ 730 /* first reschedule or stop timer */
655 if (w->interval) 731 if (w->interval)
656 { 732 {
657 w->at += floor ((ev_now - w->at) / w->interval + 1.) * w->interval; 733 w->at += floor ((rt_now - w->at) / w->interval + 1.) * w->interval;
658 assert (("ev_periodic timeout in the past detected while processing timers, negative interval?", w->at > ev_now)); 734 assert (("ev_periodic timeout in the past detected while processing timers, negative interval?", w->at > rt_now));
659 downheap ((WT *)periodics, periodiccnt, 0); 735 downheap ((WT *)periodics, periodiccnt, 0);
660 } 736 }
661 else 737 else
662 ev_periodic_stop (w); /* nonrepeating: stop timer */ 738 ev_periodic_stop (EV_A_ w); /* nonrepeating: stop timer */
663 739
664 event ((W)w, EV_PERIODIC); 740 event (EV_A_ (W)w, EV_PERIODIC);
665 } 741 }
666} 742}
667 743
668static void 744static void
669periodics_reschedule (ev_tstamp diff) 745periodics_reschedule (EV_P_ ev_tstamp diff)
670{ 746{
671 int i; 747 int i;
672 748
673 /* adjust periodics after time jump */ 749 /* adjust periodics after time jump */
674 for (i = 0; i < periodiccnt; ++i) 750 for (i = 0; i < periodiccnt; ++i)
675 { 751 {
676 struct ev_periodic *w = periodics [i]; 752 struct ev_periodic *w = periodics [i];
677 753
678 if (w->interval) 754 if (w->interval)
679 { 755 {
680 ev_tstamp diff = ceil ((ev_now - w->at) / w->interval) * w->interval; 756 ev_tstamp diff = ceil ((rt_now - w->at) / w->interval) * w->interval;
681 757
682 if (fabs (diff) >= 1e-4) 758 if (fabs (diff) >= 1e-4)
683 { 759 {
684 ev_periodic_stop (w); 760 ev_periodic_stop (EV_A_ w);
685 ev_periodic_start (w); 761 ev_periodic_start (EV_A_ w);
686 762
687 i = 0; /* restart loop, inefficient, but time jumps should be rare */ 763 i = 0; /* restart loop, inefficient, but time jumps should be rare */
688 } 764 }
689 } 765 }
690 } 766 }
691} 767}
692 768
693static int 769inline int
694time_update_monotonic (void) 770time_update_monotonic (EV_P)
695{ 771{
696 now = get_clock (); 772 mn_now = get_clock ();
697 773
698 if (expect_true (now - now_floor < MIN_TIMEJUMP * .5)) 774 if (expect_true (mn_now - now_floor < MIN_TIMEJUMP * .5))
699 { 775 {
700 ev_now = now + diff; 776 rt_now = mn_now + diff;
701 return 0; 777 return 0;
702 } 778 }
703 else 779 else
704 { 780 {
705 now_floor = now; 781 now_floor = mn_now;
706 ev_now = ev_time (); 782 rt_now = ev_time ();
707 return 1; 783 return 1;
708 } 784 }
709} 785}
710 786
711static void 787static void
712time_update (void) 788time_update (EV_P)
713{ 789{
714 int i; 790 int i;
715 791
716#if EV_USE_MONOTONIC 792#if EV_USE_MONOTONIC
717 if (expect_true (have_monotonic)) 793 if (expect_true (have_monotonic))
718 { 794 {
719 if (time_update_monotonic ()) 795 if (time_update_monotonic (EV_A))
720 { 796 {
721 ev_tstamp odiff = diff; 797 ev_tstamp odiff = diff;
722 798
723 for (i = 4; --i; ) /* loop a few times, before making important decisions */ 799 for (i = 4; --i; ) /* loop a few times, before making important decisions */
724 { 800 {
725 diff = ev_now - now; 801 diff = rt_now - mn_now;
726 802
727 if (fabs (odiff - diff) < MIN_TIMEJUMP) 803 if (fabs (odiff - diff) < MIN_TIMEJUMP)
728 return; /* all is well */ 804 return; /* all is well */
729 805
730 ev_now = ev_time (); 806 rt_now = ev_time ();
731 now = get_clock (); 807 mn_now = get_clock ();
732 now_floor = now; 808 now_floor = mn_now;
733 } 809 }
734 810
735 periodics_reschedule (diff - odiff); 811 periodics_reschedule (EV_A_ diff - odiff);
736 /* no timer adjustment, as the monotonic clock doesn't jump */ 812 /* no timer adjustment, as the monotonic clock doesn't jump */
737 } 813 }
738 } 814 }
739 else 815 else
740#endif 816#endif
741 { 817 {
742 ev_now = ev_time (); 818 rt_now = ev_time ();
743 819
744 if (expect_false (now > ev_now || now < ev_now - MAX_BLOCKTIME - MIN_TIMEJUMP)) 820 if (expect_false (mn_now > rt_now || mn_now < rt_now - MAX_BLOCKTIME - MIN_TIMEJUMP))
745 { 821 {
746 periodics_reschedule (ev_now - now); 822 periodics_reschedule (EV_A_ rt_now - mn_now);
747 823
748 /* adjust timers. this is easy, as the offset is the same for all */ 824 /* adjust timers. this is easy, as the offset is the same for all */
749 for (i = 0; i < timercnt; ++i) 825 for (i = 0; i < timercnt; ++i)
750 timers [i]->at += diff; 826 timers [i]->at += diff;
751 } 827 }
752 828
753 now = ev_now; 829 mn_now = rt_now;
754 } 830 }
755} 831}
756 832
757int ev_loop_done; 833void
834ev_ref (EV_P)
835{
836 ++activecnt;
837}
758 838
839void
840ev_unref (EV_P)
841{
842 --activecnt;
843}
844
845static int loop_done;
846
847void
759void ev_loop (int flags) 848ev_loop (EV_P_ int flags)
760{ 849{
761 double block; 850 double block;
762 ev_loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) ? 1 : 0; 851 loop_done = flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK) ? 1 : 0;
763 852
764 do 853 do
765 { 854 {
766 /* queue check watchers (and execute them) */ 855 /* queue check watchers (and execute them) */
767 if (expect_false (preparecnt)) 856 if (expect_false (preparecnt))
768 { 857 {
769 queue_events ((W *)prepares, preparecnt, EV_PREPARE); 858 queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
770 call_pending (); 859 call_pending (EV_A);
771 } 860 }
772 861
773 /* update fd-related kernel structures */ 862 /* update fd-related kernel structures */
774 fd_reify (); 863 fd_reify (EV_A);
775 864
776 /* calculate blocking time */ 865 /* calculate blocking time */
777 866
778 /* we only need this for !monotonic clockor timers, but as we basically 867 /* we only need this for !monotonic clockor timers, but as we basically
779 always have timers, we just calculate it always */ 868 always have timers, we just calculate it always */
780#if EV_USE_MONOTONIC 869#if EV_USE_MONOTONIC
781 if (expect_true (have_monotonic)) 870 if (expect_true (have_monotonic))
782 time_update_monotonic (); 871 time_update_monotonic (EV_A);
783 else 872 else
784#endif 873#endif
785 { 874 {
786 ev_now = ev_time (); 875 rt_now = ev_time ();
787 now = ev_now; 876 mn_now = rt_now;
788 } 877 }
789 878
790 if (flags & EVLOOP_NONBLOCK || idlecnt) 879 if (flags & EVLOOP_NONBLOCK || idlecnt)
791 block = 0.; 880 block = 0.;
792 else 881 else
793 { 882 {
794 block = MAX_BLOCKTIME; 883 block = MAX_BLOCKTIME;
795 884
796 if (timercnt) 885 if (timercnt)
797 { 886 {
798 ev_tstamp to = timers [0]->at - now + method_fudge; 887 ev_tstamp to = timers [0]->at - mn_now + method_fudge;
799 if (block > to) block = to; 888 if (block > to) block = to;
800 } 889 }
801 890
802 if (periodiccnt) 891 if (periodiccnt)
803 { 892 {
804 ev_tstamp to = periodics [0]->at - ev_now + method_fudge; 893 ev_tstamp to = periodics [0]->at - rt_now + method_fudge;
805 if (block > to) block = to; 894 if (block > to) block = to;
806 } 895 }
807 896
808 if (block < 0.) block = 0.; 897 if (block < 0.) block = 0.;
809 } 898 }
810 899
811 method_poll (block); 900 method_poll (EV_A_ block);
812 901
813 /* update ev_now, do magic */ 902 /* update rt_now, do magic */
814 time_update (); 903 time_update (EV_A);
815 904
816 /* queue pending timers and reschedule them */ 905 /* queue pending timers and reschedule them */
817 timers_reify (); /* relative timers called last */ 906 timers_reify (EV_A); /* relative timers called last */
818 periodics_reify (); /* absolute timers called first */ 907 periodics_reify (EV_A); /* absolute timers called first */
819 908
820 /* queue idle watchers unless io or timers are pending */ 909 /* queue idle watchers unless io or timers are pending */
821 if (!pendingcnt) 910 if (!pendingcnt)
822 queue_events ((W *)idles, idlecnt, EV_IDLE); 911 queue_events (EV_A_ (W *)idles, idlecnt, EV_IDLE);
823 912
824 /* queue check watchers, to be executed first */ 913 /* queue check watchers, to be executed first */
825 if (checkcnt) 914 if (checkcnt)
826 queue_events ((W *)checks, checkcnt, EV_CHECK); 915 queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
827 916
828 call_pending (); 917 call_pending (EV_A);
829 } 918 }
830 while (!ev_loop_done); 919 while (activecnt && !loop_done);
831 920
832 if (ev_loop_done != 2) 921 if (loop_done != 2)
833 ev_loop_done = 0; 922 loop_done = 0;
923}
924
925void
926ev_unloop (EV_P_ int how)
927{
928 loop_done = how;
834} 929}
835 930
836/*****************************************************************************/ 931/*****************************************************************************/
837 932
838static void 933inline void
839wlist_add (WL *head, WL elem) 934wlist_add (WL *head, WL elem)
840{ 935{
841 elem->next = *head; 936 elem->next = *head;
842 *head = elem; 937 *head = elem;
843} 938}
844 939
845static void 940inline void
846wlist_del (WL *head, WL elem) 941wlist_del (WL *head, WL elem)
847{ 942{
848 while (*head) 943 while (*head)
849 { 944 {
850 if (*head == elem) 945 if (*head == elem)
855 950
856 head = &(*head)->next; 951 head = &(*head)->next;
857 } 952 }
858} 953}
859 954
860static void 955inline void
861ev_clear_pending (W w) 956ev_clear_pending (EV_P_ W w)
862{ 957{
863 if (w->pending) 958 if (w->pending)
864 { 959 {
865 pendings [ABSPRI (w)][w->pending - 1].w = 0; 960 pendings [ABSPRI (w)][w->pending - 1].w = 0;
866 w->pending = 0; 961 w->pending = 0;
867 } 962 }
868} 963}
869 964
870static void 965inline void
871ev_start (W w, int active) 966ev_start (EV_P_ W w, int active)
872{ 967{
873 if (w->priority < EV_MINPRI) w->priority = EV_MINPRI; 968 if (w->priority < EV_MINPRI) w->priority = EV_MINPRI;
874 if (w->priority > EV_MAXPRI) w->priority = EV_MAXPRI; 969 if (w->priority > EV_MAXPRI) w->priority = EV_MAXPRI;
875 970
876 w->active = active; 971 w->active = active;
972 ev_ref (EV_A);
877} 973}
878 974
879static void 975inline void
880ev_stop (W w) 976ev_stop (EV_P_ W w)
881{ 977{
978 ev_unref (EV_A);
882 w->active = 0; 979 w->active = 0;
883} 980}
884 981
885/*****************************************************************************/ 982/*****************************************************************************/
886 983
887void 984void
888ev_io_start (struct ev_io *w) 985ev_io_start (EV_P_ struct ev_io *w)
889{ 986{
890 int fd = w->fd; 987 int fd = w->fd;
891 988
892 if (ev_is_active (w)) 989 if (ev_is_active (w))
893 return; 990 return;
894 991
895 assert (("ev_io_start called with negative fd", fd >= 0)); 992 assert (("ev_io_start called with negative fd", fd >= 0));
896 993
897 ev_start ((W)w, 1); 994 ev_start (EV_A_ (W)w, 1);
898 array_needsize (anfds, anfdmax, fd + 1, anfds_init); 995 array_needsize (anfds, anfdmax, fd + 1, anfds_init);
899 wlist_add ((WL *)&anfds[fd].head, (WL)w); 996 wlist_add ((WL *)&anfds[fd].head, (WL)w);
900 997
901 fd_change (fd); 998 fd_change (EV_A_ fd);
902} 999}
903 1000
904void 1001void
905ev_io_stop (struct ev_io *w) 1002ev_io_stop (EV_P_ struct ev_io *w)
906{ 1003{
907 ev_clear_pending ((W)w); 1004 ev_clear_pending (EV_A_ (W)w);
908 if (!ev_is_active (w)) 1005 if (!ev_is_active (w))
909 return; 1006 return;
910 1007
911 wlist_del ((WL *)&anfds[w->fd].head, (WL)w); 1008 wlist_del ((WL *)&anfds[w->fd].head, (WL)w);
912 ev_stop ((W)w); 1009 ev_stop (EV_A_ (W)w);
913 1010
914 fd_change (w->fd); 1011 fd_change (EV_A_ w->fd);
915} 1012}
916 1013
917void 1014void
918ev_timer_start (struct ev_timer *w) 1015ev_timer_start (EV_P_ struct ev_timer *w)
919{ 1016{
920 if (ev_is_active (w)) 1017 if (ev_is_active (w))
921 return; 1018 return;
922 1019
923 w->at += now; 1020 w->at += mn_now;
924 1021
925 assert (("ev_timer_start called with negative timer repeat value", w->repeat >= 0.)); 1022 assert (("ev_timer_start called with negative timer repeat value", w->repeat >= 0.));
926 1023
927 ev_start ((W)w, ++timercnt); 1024 ev_start (EV_A_ (W)w, ++timercnt);
928 array_needsize (timers, timermax, timercnt, ); 1025 array_needsize (timers, timermax, timercnt, );
929 timers [timercnt - 1] = w; 1026 timers [timercnt - 1] = w;
930 upheap ((WT *)timers, timercnt - 1); 1027 upheap ((WT *)timers, timercnt - 1);
931} 1028}
932 1029
933void 1030void
934ev_timer_stop (struct ev_timer *w) 1031ev_timer_stop (EV_P_ struct ev_timer *w)
935{ 1032{
936 ev_clear_pending ((W)w); 1033 ev_clear_pending (EV_A_ (W)w);
937 if (!ev_is_active (w)) 1034 if (!ev_is_active (w))
938 return; 1035 return;
939 1036
940 if (w->active < timercnt--) 1037 if (w->active < timercnt--)
941 { 1038 {
943 downheap ((WT *)timers, timercnt, w->active - 1); 1040 downheap ((WT *)timers, timercnt, w->active - 1);
944 } 1041 }
945 1042
946 w->at = w->repeat; 1043 w->at = w->repeat;
947 1044
948 ev_stop ((W)w); 1045 ev_stop (EV_A_ (W)w);
949} 1046}
950 1047
951void 1048void
952ev_timer_again (struct ev_timer *w) 1049ev_timer_again (EV_P_ struct ev_timer *w)
953{ 1050{
954 if (ev_is_active (w)) 1051 if (ev_is_active (w))
955 { 1052 {
956 if (w->repeat) 1053 if (w->repeat)
957 { 1054 {
958 w->at = now + w->repeat; 1055 w->at = mn_now + w->repeat;
959 downheap ((WT *)timers, timercnt, w->active - 1); 1056 downheap ((WT *)timers, timercnt, w->active - 1);
960 } 1057 }
961 else 1058 else
962 ev_timer_stop (w); 1059 ev_timer_stop (EV_A_ w);
963 } 1060 }
964 else if (w->repeat) 1061 else if (w->repeat)
965 ev_timer_start (w); 1062 ev_timer_start (EV_A_ w);
966} 1063}
967 1064
968void 1065void
969ev_periodic_start (struct ev_periodic *w) 1066ev_periodic_start (EV_P_ struct ev_periodic *w)
970{ 1067{
971 if (ev_is_active (w)) 1068 if (ev_is_active (w))
972 return; 1069 return;
973 1070
974 assert (("ev_periodic_start called with negative interval value", w->interval >= 0.)); 1071 assert (("ev_periodic_start called with negative interval value", w->interval >= 0.));
975 1072
976 /* this formula differs from the one in periodic_reify because we do not always round up */ 1073 /* this formula differs from the one in periodic_reify because we do not always round up */
977 if (w->interval) 1074 if (w->interval)
978 w->at += ceil ((ev_now - w->at) / w->interval) * w->interval; 1075 w->at += ceil ((rt_now - w->at) / w->interval) * w->interval;
979 1076
980 ev_start ((W)w, ++periodiccnt); 1077 ev_start (EV_A_ (W)w, ++periodiccnt);
981 array_needsize (periodics, periodicmax, periodiccnt, ); 1078 array_needsize (periodics, periodicmax, periodiccnt, );
982 periodics [periodiccnt - 1] = w; 1079 periodics [periodiccnt - 1] = w;
983 upheap ((WT *)periodics, periodiccnt - 1); 1080 upheap ((WT *)periodics, periodiccnt - 1);
984} 1081}
985 1082
986void 1083void
987ev_periodic_stop (struct ev_periodic *w) 1084ev_periodic_stop (EV_P_ struct ev_periodic *w)
988{ 1085{
989 ev_clear_pending ((W)w); 1086 ev_clear_pending (EV_A_ (W)w);
990 if (!ev_is_active (w)) 1087 if (!ev_is_active (w))
991 return; 1088 return;
992 1089
993 if (w->active < periodiccnt--) 1090 if (w->active < periodiccnt--)
994 { 1091 {
995 periodics [w->active - 1] = periodics [periodiccnt]; 1092 periodics [w->active - 1] = periodics [periodiccnt];
996 downheap ((WT *)periodics, periodiccnt, w->active - 1); 1093 downheap ((WT *)periodics, periodiccnt, w->active - 1);
997 } 1094 }
998 1095
999 ev_stop ((W)w); 1096 ev_stop (EV_A_ (W)w);
1000} 1097}
1001 1098
1099#ifndef SA_RESTART
1100# define SA_RESTART 0
1101#endif
1102
1002void 1103void
1003ev_signal_start (struct ev_signal *w) 1104ev_signal_start (EV_P_ struct ev_signal *w)
1004{ 1105{
1005 if (ev_is_active (w)) 1106 if (ev_is_active (w))
1006 return; 1107 return;
1007 1108
1008 assert (("ev_signal_start called with illegal signal number", w->signum > 0)); 1109 assert (("ev_signal_start called with illegal signal number", w->signum > 0));
1009 1110
1010 ev_start ((W)w, 1); 1111 ev_start (EV_A_ (W)w, 1);
1011 array_needsize (signals, signalmax, w->signum, signals_init); 1112 array_needsize (signals, signalmax, w->signum, signals_init);
1012 wlist_add ((WL *)&signals [w->signum - 1].head, (WL)w); 1113 wlist_add ((WL *)&signals [w->signum - 1].head, (WL)w);
1013 1114
1014 if (!w->next) 1115 if (!w->next)
1015 { 1116 {
1016 struct sigaction sa; 1117 struct sigaction sa;
1017 sa.sa_handler = sighandler; 1118 sa.sa_handler = sighandler;
1018 sigfillset (&sa.sa_mask); 1119 sigfillset (&sa.sa_mask);
1019 sa.sa_flags = 0; 1120 sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */
1020 sigaction (w->signum, &sa, 0); 1121 sigaction (w->signum, &sa, 0);
1021 } 1122 }
1022} 1123}
1023 1124
1024void 1125void
1025ev_signal_stop (struct ev_signal *w) 1126ev_signal_stop (EV_P_ struct ev_signal *w)
1026{ 1127{
1027 ev_clear_pending ((W)w); 1128 ev_clear_pending (EV_A_ (W)w);
1028 if (!ev_is_active (w)) 1129 if (!ev_is_active (w))
1029 return; 1130 return;
1030 1131
1031 wlist_del ((WL *)&signals [w->signum - 1].head, (WL)w); 1132 wlist_del ((WL *)&signals [w->signum - 1].head, (WL)w);
1032 ev_stop ((W)w); 1133 ev_stop (EV_A_ (W)w);
1033 1134
1034 if (!signals [w->signum - 1].head) 1135 if (!signals [w->signum - 1].head)
1035 signal (w->signum, SIG_DFL); 1136 signal (w->signum, SIG_DFL);
1036} 1137}
1037 1138
1038void 1139void
1039ev_idle_start (struct ev_idle *w) 1140ev_idle_start (EV_P_ struct ev_idle *w)
1040{ 1141{
1041 if (ev_is_active (w)) 1142 if (ev_is_active (w))
1042 return; 1143 return;
1043 1144
1044 ev_start ((W)w, ++idlecnt); 1145 ev_start (EV_A_ (W)w, ++idlecnt);
1045 array_needsize (idles, idlemax, idlecnt, ); 1146 array_needsize (idles, idlemax, idlecnt, );
1046 idles [idlecnt - 1] = w; 1147 idles [idlecnt - 1] = w;
1047} 1148}
1048 1149
1049void 1150void
1050ev_idle_stop (struct ev_idle *w) 1151ev_idle_stop (EV_P_ struct ev_idle *w)
1051{ 1152{
1052 ev_clear_pending ((W)w); 1153 ev_clear_pending (EV_A_ (W)w);
1053 if (ev_is_active (w)) 1154 if (ev_is_active (w))
1054 return; 1155 return;
1055 1156
1056 idles [w->active - 1] = idles [--idlecnt]; 1157 idles [w->active - 1] = idles [--idlecnt];
1057 ev_stop ((W)w); 1158 ev_stop (EV_A_ (W)w);
1058} 1159}
1059 1160
1060void 1161void
1061ev_prepare_start (struct ev_prepare *w) 1162ev_prepare_start (EV_P_ struct ev_prepare *w)
1062{ 1163{
1063 if (ev_is_active (w)) 1164 if (ev_is_active (w))
1064 return; 1165 return;
1065 1166
1066 ev_start ((W)w, ++preparecnt); 1167 ev_start (EV_A_ (W)w, ++preparecnt);
1067 array_needsize (prepares, preparemax, preparecnt, ); 1168 array_needsize (prepares, preparemax, preparecnt, );
1068 prepares [preparecnt - 1] = w; 1169 prepares [preparecnt - 1] = w;
1069} 1170}
1070 1171
1071void 1172void
1072ev_prepare_stop (struct ev_prepare *w) 1173ev_prepare_stop (EV_P_ struct ev_prepare *w)
1073{ 1174{
1074 ev_clear_pending ((W)w); 1175 ev_clear_pending (EV_A_ (W)w);
1075 if (ev_is_active (w)) 1176 if (ev_is_active (w))
1076 return; 1177 return;
1077 1178
1078 prepares [w->active - 1] = prepares [--preparecnt]; 1179 prepares [w->active - 1] = prepares [--preparecnt];
1079 ev_stop ((W)w); 1180 ev_stop (EV_A_ (W)w);
1080} 1181}
1081 1182
1082void 1183void
1083ev_check_start (struct ev_check *w) 1184ev_check_start (EV_P_ struct ev_check *w)
1084{ 1185{
1085 if (ev_is_active (w)) 1186 if (ev_is_active (w))
1086 return; 1187 return;
1087 1188
1088 ev_start ((W)w, ++checkcnt); 1189 ev_start (EV_A_ (W)w, ++checkcnt);
1089 array_needsize (checks, checkmax, checkcnt, ); 1190 array_needsize (checks, checkmax, checkcnt, );
1090 checks [checkcnt - 1] = w; 1191 checks [checkcnt - 1] = w;
1091} 1192}
1092 1193
1093void 1194void
1094ev_check_stop (struct ev_check *w) 1195ev_check_stop (EV_P_ struct ev_check *w)
1095{ 1196{
1096 ev_clear_pending ((W)w); 1197 ev_clear_pending (EV_A_ (W)w);
1097 if (ev_is_active (w)) 1198 if (ev_is_active (w))
1098 return; 1199 return;
1099 1200
1100 checks [w->active - 1] = checks [--checkcnt]; 1201 checks [w->active - 1] = checks [--checkcnt];
1101 ev_stop ((W)w); 1202 ev_stop (EV_A_ (W)w);
1102} 1203}
1103 1204
1104void 1205void
1105ev_child_start (struct ev_child *w) 1206ev_child_start (EV_P_ struct ev_child *w)
1106{ 1207{
1107 if (ev_is_active (w)) 1208 if (ev_is_active (w))
1108 return; 1209 return;
1109 1210
1110 ev_start ((W)w, 1); 1211 ev_start (EV_A_ (W)w, 1);
1111 wlist_add ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w); 1212 wlist_add ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w);
1112} 1213}
1113 1214
1114void 1215void
1115ev_child_stop (struct ev_child *w) 1216ev_child_stop (EV_P_ struct ev_child *w)
1116{ 1217{
1117 ev_clear_pending ((W)w); 1218 ev_clear_pending (EV_A_ (W)w);
1118 if (ev_is_active (w)) 1219 if (ev_is_active (w))
1119 return; 1220 return;
1120 1221
1121 wlist_del ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w); 1222 wlist_del ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w);
1122 ev_stop ((W)w); 1223 ev_stop (EV_A_ (W)w);
1123} 1224}
1124 1225
1125/*****************************************************************************/ 1226/*****************************************************************************/
1126 1227
1127struct ev_once 1228struct ev_once
1131 void (*cb)(int revents, void *arg); 1232 void (*cb)(int revents, void *arg);
1132 void *arg; 1233 void *arg;
1133}; 1234};
1134 1235
1135static void 1236static void
1136once_cb (struct ev_once *once, int revents) 1237once_cb (EV_P_ struct ev_once *once, int revents)
1137{ 1238{
1138 void (*cb)(int revents, void *arg) = once->cb; 1239 void (*cb)(int revents, void *arg) = once->cb;
1139 void *arg = once->arg; 1240 void *arg = once->arg;
1140 1241
1141 ev_io_stop (&once->io); 1242 ev_io_stop (EV_A_ &once->io);
1142 ev_timer_stop (&once->to); 1243 ev_timer_stop (EV_A_ &once->to);
1143 free (once); 1244 free (once);
1144 1245
1145 cb (revents, arg); 1246 cb (revents, arg);
1146} 1247}
1147 1248
1148static void 1249static void
1149once_cb_io (struct ev_io *w, int revents) 1250once_cb_io (EV_P_ struct ev_io *w, int revents)
1150{ 1251{
1151 once_cb ((struct ev_once *)(((char *)w) - offsetof (struct ev_once, io)), revents); 1252 once_cb (EV_A_ (struct ev_once *)(((char *)w) - offsetof (struct ev_once, io)), revents);
1152} 1253}
1153 1254
1154static void 1255static void
1155once_cb_to (struct ev_timer *w, int revents) 1256once_cb_to (EV_P_ struct ev_timer *w, int revents)
1156{ 1257{
1157 once_cb ((struct ev_once *)(((char *)w) - offsetof (struct ev_once, to)), revents); 1258 once_cb (EV_A_ (struct ev_once *)(((char *)w) - offsetof (struct ev_once, to)), revents);
1158} 1259}
1159 1260
1160void 1261void
1161ev_once (int fd, int events, ev_tstamp timeout, void (*cb)(int revents, void *arg), void *arg) 1262ev_once (EV_P_ int fd, int events, ev_tstamp timeout, void (*cb)(int revents, void *arg), void *arg)
1162{ 1263{
1163 struct ev_once *once = malloc (sizeof (struct ev_once)); 1264 struct ev_once *once = malloc (sizeof (struct ev_once));
1164 1265
1165 if (!once) 1266 if (!once)
1166 cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg); 1267 cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);
1171 1272
1172 ev_watcher_init (&once->io, once_cb_io); 1273 ev_watcher_init (&once->io, once_cb_io);
1173 if (fd >= 0) 1274 if (fd >= 0)
1174 { 1275 {
1175 ev_io_set (&once->io, fd, events); 1276 ev_io_set (&once->io, fd, events);
1176 ev_io_start (&once->io); 1277 ev_io_start (EV_A_ &once->io);
1177 } 1278 }
1178 1279
1179 ev_watcher_init (&once->to, once_cb_to); 1280 ev_watcher_init (&once->to, once_cb_to);
1180 if (timeout >= 0.) 1281 if (timeout >= 0.)
1181 { 1282 {
1182 ev_timer_set (&once->to, timeout, 0.); 1283 ev_timer_set (&once->to, timeout, 0.);
1183 ev_timer_start (&once->to); 1284 ev_timer_start (EV_A_ &once->to);
1184 } 1285 }
1185 } 1286 }
1186} 1287}
1187 1288
1188/*****************************************************************************/ 1289/*****************************************************************************/

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines