1 | /* |
1 | /* |
2 | * libev event processing core, watcher management |
2 | * libev event processing core, watcher management |
3 | * |
3 | * |
4 | * Copyright (c) 2007,2008,2009 Marc Alexander Lehmann <libev@schmorp.de> |
4 | * Copyright (c) 2007,2008,2009,2010 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 | * |
… | |
… | |
163 | |
163 | |
164 | #include <assert.h> |
164 | #include <assert.h> |
165 | #include <errno.h> |
165 | #include <errno.h> |
166 | #include <sys/types.h> |
166 | #include <sys/types.h> |
167 | #include <time.h> |
167 | #include <time.h> |
|
|
168 | #include <limits.h> |
168 | |
169 | |
169 | #include <signal.h> |
170 | #include <signal.h> |
170 | |
171 | |
171 | #ifdef EV_H |
172 | #ifdef EV_H |
172 | # include EV_H |
173 | # include EV_H |
… | |
… | |
344 | # endif |
345 | # endif |
345 | #endif |
346 | #endif |
346 | |
347 | |
347 | /* this block fixes any misconfiguration where we know we run into trouble otherwise */ |
348 | /* this block fixes any misconfiguration where we know we run into trouble otherwise */ |
348 | |
349 | |
|
|
350 | #ifdef _AIX |
|
|
351 | /* AIX has a completely broken poll.h header */ |
|
|
352 | # undef EV_USE_POLL |
|
|
353 | # define EV_USE_POLL 0 |
|
|
354 | #endif |
|
|
355 | |
349 | #ifndef CLOCK_MONOTONIC |
356 | #ifndef CLOCK_MONOTONIC |
350 | # undef EV_USE_MONOTONIC |
357 | # undef EV_USE_MONOTONIC |
351 | # define EV_USE_MONOTONIC 0 |
358 | # define EV_USE_MONOTONIC 0 |
352 | #endif |
359 | #endif |
353 | |
360 | |
… | |
… | |
396 | # endif |
403 | # endif |
397 | # endif |
404 | # endif |
398 | # ifdef __cplusplus |
405 | # ifdef __cplusplus |
399 | extern "C" { |
406 | extern "C" { |
400 | # endif |
407 | # endif |
401 | int eventfd (unsigned int initval, int flags); |
408 | int (eventfd) (unsigned int initval, int flags); |
402 | # ifdef __cplusplus |
409 | # ifdef __cplusplus |
403 | } |
410 | } |
404 | # endif |
411 | # endif |
405 | #endif |
412 | #endif |
406 | |
413 | |
… | |
… | |
535 | |
542 | |
536 | if (syserr_cb) |
543 | if (syserr_cb) |
537 | syserr_cb (msg); |
544 | syserr_cb (msg); |
538 | else |
545 | else |
539 | { |
546 | { |
|
|
547 | #if EV_AVOID_STDIO |
|
|
548 | write (STDERR_FILENO, msg, strlen (msg)); |
|
|
549 | write (STDERR_FILENO, ": ", 2); |
|
|
550 | msg = strerror (errno); |
|
|
551 | write (STDERR_FILENO, msg, strlen (msg)); |
|
|
552 | write (STDERR_FILENO, "\n", 1); |
|
|
553 | #else |
540 | perror (msg); |
554 | perror (msg); |
|
|
555 | #endif |
541 | abort (); |
556 | abort (); |
542 | } |
557 | } |
543 | } |
558 | } |
544 | |
559 | |
545 | static void * |
560 | static void * |
… | |
… | |
570 | { |
585 | { |
571 | ptr = alloc (ptr, size); |
586 | ptr = alloc (ptr, size); |
572 | |
587 | |
573 | if (!ptr && size) |
588 | if (!ptr && size) |
574 | { |
589 | { |
|
|
590 | #if EV_AVOID_STDIO |
|
|
591 | write (STDERR_FILENO, "libev: memory allocation failed, aborting.", |
|
|
592 | sizeof ("libev: memory allocation failed, aborting.") - 1); |
|
|
593 | #else |
575 | fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size); |
594 | fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size); |
|
|
595 | #endif |
576 | abort (); |
596 | abort (); |
577 | } |
597 | } |
578 | |
598 | |
579 | return ptr; |
599 | return ptr; |
580 | } |
600 | } |
… | |
… | |
2501 | |
2521 | |
2502 | if (expect_false (ev_is_active (w))) |
2522 | if (expect_false (ev_is_active (w))) |
2503 | return; |
2523 | return; |
2504 | |
2524 | |
2505 | assert (("libev: ev_io_start called with negative fd", fd >= 0)); |
2525 | assert (("libev: ev_io_start called with negative fd", fd >= 0)); |
2506 | assert (("libev: ev_io start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE)))); |
2526 | assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE)))); |
2507 | |
2527 | |
2508 | EV_FREQUENT_CHECK; |
2528 | EV_FREQUENT_CHECK; |
2509 | |
2529 | |
2510 | ev_start (EV_A_ (W)w, 1); |
2530 | ev_start (EV_A_ (W)w, 1); |
2511 | array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero); |
2531 | array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero); |
… | |
… | |
2581 | timers [active] = timers [timercnt + HEAP0]; |
2601 | timers [active] = timers [timercnt + HEAP0]; |
2582 | adjustheap (timers, timercnt, active); |
2602 | adjustheap (timers, timercnt, active); |
2583 | } |
2603 | } |
2584 | } |
2604 | } |
2585 | |
2605 | |
2586 | EV_FREQUENT_CHECK; |
|
|
2587 | |
|
|
2588 | ev_at (w) -= mn_now; |
2606 | ev_at (w) -= mn_now; |
2589 | |
2607 | |
2590 | ev_stop (EV_A_ (W)w); |
2608 | ev_stop (EV_A_ (W)w); |
|
|
2609 | |
|
|
2610 | EV_FREQUENT_CHECK; |
2591 | } |
2611 | } |
2592 | |
2612 | |
2593 | void noinline |
2613 | void noinline |
2594 | ev_timer_again (EV_P_ ev_timer *w) |
2614 | ev_timer_again (EV_P_ ev_timer *w) |
2595 | { |
2615 | { |
… | |
… | |
2674 | periodics [active] = periodics [periodiccnt + HEAP0]; |
2694 | periodics [active] = periodics [periodiccnt + HEAP0]; |
2675 | adjustheap (periodics, periodiccnt, active); |
2695 | adjustheap (periodics, periodiccnt, active); |
2676 | } |
2696 | } |
2677 | } |
2697 | } |
2678 | |
2698 | |
2679 | EV_FREQUENT_CHECK; |
|
|
2680 | |
|
|
2681 | ev_stop (EV_A_ (W)w); |
2699 | ev_stop (EV_A_ (W)w); |
|
|
2700 | |
|
|
2701 | EV_FREQUENT_CHECK; |
2682 | } |
2702 | } |
2683 | |
2703 | |
2684 | void noinline |
2704 | void noinline |
2685 | ev_periodic_again (EV_P_ ev_periodic *w) |
2705 | ev_periodic_again (EV_P_ ev_periodic *w) |
2686 | { |
2706 | { |
… | |
… | |
2853 | #define MIN_STAT_INTERVAL 0.1074891 |
2873 | #define MIN_STAT_INTERVAL 0.1074891 |
2854 | |
2874 | |
2855 | static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents); |
2875 | static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents); |
2856 | |
2876 | |
2857 | #if EV_USE_INOTIFY |
2877 | #if EV_USE_INOTIFY |
2858 | # define EV_INOTIFY_BUFSIZE 8192 |
2878 | |
|
|
2879 | /* the * 2 is to allow for alignment padding, which for some reason is >> 8 */ |
|
|
2880 | # define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX) |
2859 | |
2881 | |
2860 | static void noinline |
2882 | static void noinline |
2861 | infy_add (EV_P_ ev_stat *w) |
2883 | infy_add (EV_P_ ev_stat *w) |
2862 | { |
2884 | { |
2863 | w->wd = inotify_add_watch (fs_fd, w->path, IN_ATTRIB | IN_DELETE_SELF | IN_MOVE_SELF | IN_MODIFY | IN_DONT_FOLLOW | IN_MASK_ADD); |
2885 | w->wd = inotify_add_watch (fs_fd, w->path, IN_ATTRIB | IN_DELETE_SELF | IN_MOVE_SELF | IN_MODIFY | IN_DONT_FOLLOW | IN_MASK_ADD); |
… | |
… | |
2972 | |
2994 | |
2973 | static void |
2995 | static void |
2974 | infy_cb (EV_P_ ev_io *w, int revents) |
2996 | infy_cb (EV_P_ ev_io *w, int revents) |
2975 | { |
2997 | { |
2976 | char buf [EV_INOTIFY_BUFSIZE]; |
2998 | char buf [EV_INOTIFY_BUFSIZE]; |
2977 | struct inotify_event *ev = (struct inotify_event *)buf; |
|
|
2978 | int ofs; |
2999 | int ofs; |
2979 | int len = read (fs_fd, buf, sizeof (buf)); |
3000 | int len = read (fs_fd, buf, sizeof (buf)); |
2980 | |
3001 | |
2981 | for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len) |
3002 | for (ofs = 0; ofs < len; ) |
|
|
3003 | { |
|
|
3004 | struct inotify_event *ev = (struct inotify_event *)(buf + ofs); |
2982 | infy_wd (EV_A_ ev->wd, ev->wd, ev); |
3005 | infy_wd (EV_A_ ev->wd, ev->wd, ev); |
|
|
3006 | ofs += sizeof (struct inotify_event) + ev->len; |
|
|
3007 | } |
|
|
3008 | } |
|
|
3009 | |
|
|
3010 | inline_size unsigned int |
|
|
3011 | ev_linux_version (void) |
|
|
3012 | { |
|
|
3013 | struct utsname buf; |
|
|
3014 | unsigned int v; |
|
|
3015 | int i; |
|
|
3016 | char *p = buf.release; |
|
|
3017 | |
|
|
3018 | if (uname (&buf)) |
|
|
3019 | return 0; |
|
|
3020 | |
|
|
3021 | for (i = 3+1; --i; ) |
|
|
3022 | { |
|
|
3023 | unsigned int c = 0; |
|
|
3024 | |
|
|
3025 | for (;;) |
|
|
3026 | { |
|
|
3027 | if (*p >= '0' && *p <= '9') |
|
|
3028 | c = c * 10 + *p++ - '0'; |
|
|
3029 | else |
|
|
3030 | { |
|
|
3031 | p += *p == '.'; |
|
|
3032 | break; |
|
|
3033 | } |
|
|
3034 | } |
|
|
3035 | |
|
|
3036 | v = (v << 8) | c; |
|
|
3037 | } |
|
|
3038 | |
|
|
3039 | return v; |
2983 | } |
3040 | } |
2984 | |
3041 | |
2985 | inline_size void |
3042 | inline_size void |
2986 | check_2625 (EV_P) |
3043 | ev_check_2625 (EV_P) |
2987 | { |
3044 | { |
2988 | /* kernels < 2.6.25 are borked |
3045 | /* kernels < 2.6.25 are borked |
2989 | * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html |
3046 | * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html |
2990 | */ |
3047 | */ |
2991 | struct utsname buf; |
3048 | if (ev_linux_version () < 0x020619) |
2992 | int major, minor, micro; |
|
|
2993 | |
|
|
2994 | if (uname (&buf)) |
|
|
2995 | return; |
|
|
2996 | |
|
|
2997 | if (sscanf (buf.release, "%d.%d.%d", &major, &minor, µ) != 3) |
|
|
2998 | return; |
|
|
2999 | |
|
|
3000 | if (major < 2 |
|
|
3001 | || (major == 2 && minor < 6) |
|
|
3002 | || (major == 2 && minor == 6 && micro < 25)) |
|
|
3003 | return; |
3049 | return; |
3004 | |
3050 | |
3005 | fs_2625 = 1; |
3051 | fs_2625 = 1; |
3006 | } |
3052 | } |
3007 | |
3053 | |
… | |
… | |
3022 | if (fs_fd != -2) |
3068 | if (fs_fd != -2) |
3023 | return; |
3069 | return; |
3024 | |
3070 | |
3025 | fs_fd = -1; |
3071 | fs_fd = -1; |
3026 | |
3072 | |
3027 | check_2625 (EV_A); |
3073 | ev_check_2625 (EV_A); |
3028 | |
3074 | |
3029 | fs_fd = infy_newfd (); |
3075 | fs_fd = infy_newfd (); |
3030 | |
3076 | |
3031 | if (fs_fd >= 0) |
3077 | if (fs_fd >= 0) |
3032 | { |
3078 | { |
… | |
… | |
3417 | |
3463 | |
3418 | ev_io_stop (EV_A_ &w->io); |
3464 | ev_io_stop (EV_A_ &w->io); |
3419 | ev_prepare_stop (EV_A_ &w->prepare); |
3465 | ev_prepare_stop (EV_A_ &w->prepare); |
3420 | ev_fork_stop (EV_A_ &w->fork); |
3466 | ev_fork_stop (EV_A_ &w->fork); |
3421 | |
3467 | |
|
|
3468 | ev_stop (EV_A_ (W)w); |
|
|
3469 | |
3422 | EV_FREQUENT_CHECK; |
3470 | EV_FREQUENT_CHECK; |
3423 | } |
3471 | } |
3424 | #endif |
3472 | #endif |
3425 | |
3473 | |
3426 | #if EV_FORK_ENABLE |
3474 | #if EV_FORK_ENABLE |