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

Comparing libev/ev.c (file contents):
Revision 1.378 by root, Mon Jun 13 09:52:36 2011 UTC vs.
Revision 1.379 by root, Sun Jun 19 17:55:13 2011 UTC

… …
464#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */ 464#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
465 465
466#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0) 466#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0)
467#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0) 467#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0)
468 468
469#if __GNUC__ >= 4 469/* the following are taken from libecb */
470# define expect(expr,value) __builtin_expect ((expr),(value)) 470/* ecb.h start */
471# define noinline __attribute__ ((noinline)) 471
472/* many compilers define _GNUC_ to some versions but then only implement
473 * what their idiot authors think are the "more important" extensions,
474 * causing enourmous grief in return for some better fake benchmark numbers.
475 * or so.
476 * we try to detect these and simply assume they are not gcc - if they have
477 * an issue with that they should have done it right in the first place.
478 */
479#ifndef ECB_GCC_VERSION
480 #if !defined(__GNUC_MINOR__) || defined(__INTEL_COMPILER) || defined(__SUNPRO_C) || defined(__SUNPRO_CC) || defined(__llvm__) || defined(__clang__)
481 #define ECB_GCC_VERSION(major,minor) 0
482 #else
483 #define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))
484 #endif
485#endif
486
487#if __cplusplus
488 #define ecb_inline static inline
489#elif ECB_GCC_VERSION(2,5)
490 #define ecb_inline static __inline__
491#elif ECB_C99
492 #define ecb_inline static inline
472#else 493#else
473# define expect(expr,value) (expr) 494 #define ecb_inline static
474# define noinline
475# if __STDC_VERSION__ < 199901L && __GNUC__ < 2
476# define inline
477# endif 495#endif
478#endif
479 496
497#if ECB_GCC_VERSION(3,1)
498 #define ecb_attribute(attrlist) __attribute__(attrlist)
499 #define ecb_is_constant(expr) __builtin_constant_p (expr)
500 #define ecb_expect(expr,value) __builtin_expect ((expr),(value))
501 #define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
502#else
503 #define ecb_attribute(attrlist)
504 #define ecb_is_constant(expr) 0
505 #define ecb_expect(expr,value) (expr)
506 #define ecb_prefetch(addr,rw,locality)
507#endif
508
509#define ecb_noinline ecb_attribute ((__noinline__))
510#define ecb_noreturn ecb_attribute ((__noreturn__))
511#define ecb_unused ecb_attribute ((__unused__))
512#define ecb_const ecb_attribute ((__const__))
513#define ecb_pure ecb_attribute ((__pure__))
514
515#if ECB_GCC_VERSION(4,3)
516 #define ecb_artificial ecb_attribute ((__artificial__))
517 #define ecb_hot ecb_attribute ((__hot__))
518 #define ecb_cold ecb_attribute ((__cold__))
519#else
520 #define ecb_artificial
521 #define ecb_hot
522 #define ecb_cold
523#endif
524
525/* put around conditional expressions if you are very sure that the */
526/* expression is mostly true or mostly false. note that these return */
527/* booleans, not the expression. */
480#define expect_false(expr) expect ((expr) != 0, 0) 528#define ecb_expect_false(expr) ecb_expect (!!(expr), 0)
481#define expect_true(expr) expect ((expr) != 0, 1) 529#define ecb_expect_true(expr) ecb_expect (!!(expr), 1)
530/* ecb.h end */
531
532#define expect_false(cond) ecb_expect_false (cond)
533#define expect_true(cond) ecb_expect_true (cond)
534#define noinline ecb_noinline
535
482#define inline_size static inline 536#define inline_size ecb_inline
483 537
484#if EV_FEATURE_CODE 538#if EV_FEATURE_CODE
485# define inline_speed static inline 539# define inline_speed ecb_inline
486#else 540#else
487# define inline_speed static noinline 541# define inline_speed static noinline
488#endif 542#endif
489 543
490#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1) 544#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
… …
581 635
582#ifdef __linux 636#ifdef __linux
583# include <sys/utsname.h> 637# include <sys/utsname.h>
584#endif 638#endif
585 639
586static unsigned int noinline 640static unsigned int noinline ecb_cold
587ev_linux_version (void) 641ev_linux_version (void)
588{ 642{
589#ifdef __linux 643#ifdef __linux
590 unsigned int v = 0; 644 unsigned int v = 0;
591 struct utsname buf; 645 struct utsname buf;
… …
620} 674}
621 675
622/*****************************************************************************/ 676/*****************************************************************************/
623 677
624#if EV_AVOID_STDIO 678#if EV_AVOID_STDIO
625static void noinline 679static void noinline ecb_cold
626ev_printerr (const char *msg) 680ev_printerr (const char *msg)
627{ 681{
628 write (STDERR_FILENO, msg, strlen (msg)); 682 write (STDERR_FILENO, msg, strlen (msg));
629} 683}
630#endif 684#endif
631 685
632static void (*syserr_cb)(const char *msg); 686static void (*syserr_cb)(const char *msg);
633 687
634void 688void ecb_cold
635ev_set_syserr_cb (void (*cb)(const char *msg)) 689ev_set_syserr_cb (void (*cb)(const char *msg))
636{ 690{
637 syserr_cb = cb; 691 syserr_cb = cb;
638} 692}
639 693
640static void noinline 694static void noinline ecb_cold
641ev_syserr (const char *msg) 695ev_syserr (const char *msg)
642{ 696{
643 if (!msg) 697 if (!msg)
644 msg = "(libev) system error"; 698 msg = "(libev) system error";
645 699
… …
678#endif 732#endif
679} 733}
680 734
681static void *(*alloc)(void *ptr, long size) = ev_realloc_emul; 735static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
682 736
683void 737void ecb_cold
684ev_set_allocator (void *(*cb)(void *ptr, long size)) 738ev_set_allocator (void *(*cb)(void *ptr, long size))
685{ 739{
686 alloc = cb; 740 alloc = cb;
687} 741}
688 742
… …
897 } 951 }
898 952
899 return ncur; 953 return ncur;
900} 954}
901 955
902static noinline void * 956static void * noinline ecb_cold
903array_realloc (int elem, void *base, int *cur, int cnt) 957array_realloc (int elem, void *base, int *cur, int cnt)
904{ 958{
905 *cur = array_nextsize (elem, *cur, cnt); 959 *cur = array_nextsize (elem, *cur, cnt);
906 return ev_realloc (base, elem * *cur); 960 return ev_realloc (base, elem * *cur);
907} 961}
… …
1090 fdchanges [fdchangecnt - 1] = fd; 1144 fdchanges [fdchangecnt - 1] = fd;
1091 } 1145 }
1092} 1146}
1093 1147
1094/* the given fd is invalid/unusable, so make sure it doesn't hurt us anymore */ 1148/* the given fd is invalid/unusable, so make sure it doesn't hurt us anymore */
1095inline_speed void 1149inline_speed void ecb_cold
1096fd_kill (EV_P_ int fd) 1150fd_kill (EV_P_ int fd)
1097{ 1151{
1098 ev_io *w; 1152 ev_io *w;
1099 1153
1100 while ((w = (ev_io *)anfds [fd].head)) 1154 while ((w = (ev_io *)anfds [fd].head))
… …
1103 ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE); 1157 ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
1104 } 1158 }
1105} 1159}
1106 1160
1107/* check whether the given fd is actually valid, for error recovery */ 1161/* check whether the given fd is actually valid, for error recovery */
1108inline_size int 1162inline_size int ecb_cold
1109fd_valid (int fd) 1163fd_valid (int fd)
1110{ 1164{
1111#ifdef _WIN32 1165#ifdef _WIN32
1112 return EV_FD_TO_WIN32_HANDLE (fd) != -1; 1166 return EV_FD_TO_WIN32_HANDLE (fd) != -1;
1113#else 1167#else
1114 return fcntl (fd, F_GETFD) != -1; 1168 return fcntl (fd, F_GETFD) != -1;
1115#endif 1169#endif
1116} 1170}
1117 1171
1118/* called on EBADF to verify fds */ 1172/* called on EBADF to verify fds */
1119static void noinline 1173static void noinline ecb_cold
1120fd_ebadf (EV_P) 1174fd_ebadf (EV_P)
1121{ 1175{
1122 int fd; 1176 int fd;
1123 1177
1124 for (fd = 0; fd < anfdmax; ++fd) 1178 for (fd = 0; fd < anfdmax; ++fd)
… …
1126 if (!fd_valid (fd) && errno == EBADF) 1180 if (!fd_valid (fd) && errno == EBADF)
1127 fd_kill (EV_A_ fd); 1181 fd_kill (EV_A_ fd);
1128} 1182}
1129 1183
1130/* called on ENOMEM in select/poll to kill some fds and retry */ 1184/* called on ENOMEM in select/poll to kill some fds and retry */
1131static void noinline 1185static void noinline ecb_cold
1132fd_enomem (EV_P) 1186fd_enomem (EV_P)
1133{ 1187{
1134 int fd; 1188 int fd;
1135 1189
1136 for (fd = anfdmax; fd--; ) 1190 for (fd = anfdmax; fd--; )
… …
1331 1385
1332/*****************************************************************************/ 1386/*****************************************************************************/
1333 1387
1334#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE 1388#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1335 1389
1336static void noinline 1390static void noinline ecb_cold
1337evpipe_init (EV_P) 1391evpipe_init (EV_P)
1338{ 1392{
1339 if (!ev_is_active (&pipe_w)) 1393 if (!ev_is_active (&pipe_w))
1340 { 1394 {
1341# if EV_USE_EVENTFD 1395# if EV_USE_EVENTFD
… …
1607#endif 1661#endif
1608#if EV_USE_SELECT 1662#if EV_USE_SELECT
1609# include "ev_select.c" 1663# include "ev_select.c"
1610#endif 1664#endif
1611 1665
1612int 1666int ecb_cold
1613ev_version_major (void) 1667ev_version_major (void)
1614{ 1668{
1615 return EV_VERSION_MAJOR; 1669 return EV_VERSION_MAJOR;
1616} 1670}
1617 1671
1618int 1672int ecb_cold
1619ev_version_minor (void) 1673ev_version_minor (void)
1620{ 1674{
1621 return EV_VERSION_MINOR; 1675 return EV_VERSION_MINOR;
1622} 1676}
1623 1677
1624/* return true if we are running with elevated privileges and should ignore env variables */ 1678/* return true if we are running with elevated privileges and should ignore env variables */
1625int inline_size 1679int inline_size ecb_cold
1626enable_secure (void) 1680enable_secure (void)
1627{ 1681{
1628#ifdef _WIN32 1682#ifdef _WIN32
1629 return 0; 1683 return 0;
1630#else 1684#else
1631 return getuid () != geteuid () 1685 return getuid () != geteuid ()
1632 || getgid () != getegid (); 1686 || getgid () != getegid ();
1633#endif 1687#endif
1634} 1688}
1635 1689
1636unsigned int 1690unsigned int ecb_cold
1637ev_supported_backends (void) 1691ev_supported_backends (void)
1638{ 1692{
1639 unsigned int flags = 0; 1693 unsigned int flags = 0;
1640 1694
1641 if (EV_USE_PORT ) flags |= EVBACKEND_PORT; 1695 if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
… …
1645 if (EV_USE_SELECT) flags |= EVBACKEND_SELECT; 1699 if (EV_USE_SELECT) flags |= EVBACKEND_SELECT;
1646 1700
1647 return flags; 1701 return flags;
1648} 1702}
1649 1703
1650unsigned int 1704unsigned int ecb_cold
1651ev_recommended_backends (void) 1705ev_recommended_backends (void)
1652{ 1706{
1653 unsigned int flags = ev_supported_backends (); 1707 unsigned int flags = ev_supported_backends ();
1654 1708
1655#ifndef __NetBSD__ 1709#ifndef __NetBSD__
… …
1667#endif 1721#endif
1668 1722
1669 return flags; 1723 return flags;
1670} 1724}
1671 1725
1672unsigned int 1726unsigned int ecb_cold
1673ev_embeddable_backends (void) 1727ev_embeddable_backends (void)
1674{ 1728{
1675 int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT; 1729 int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
1676 1730
1677 /* epoll embeddability broken on all linux versions up to at least 2.6.23 */ 1731 /* epoll embeddability broken on all linux versions up to at least 2.6.23 */
… …
1722ev_userdata (EV_P) 1776ev_userdata (EV_P)
1723{ 1777{
1724 return userdata; 1778 return userdata;
1725} 1779}
1726 1780
1781void
1727void ev_set_invoke_pending_cb (EV_P_ void (*invoke_pending_cb)(EV_P)) 1782ev_set_invoke_pending_cb (EV_P_ void (*invoke_pending_cb)(EV_P))
1728{ 1783{
1729 invoke_cb = invoke_pending_cb; 1784 invoke_cb = invoke_pending_cb;
1730} 1785}
1731 1786
1787void
1732void ev_set_loop_release_cb (EV_P_ void (*release)(EV_P), void (*acquire)(EV_P)) 1788ev_set_loop_release_cb (EV_P_ void (*release)(EV_P), void (*acquire)(EV_P))
1733{ 1789{
1734 release_cb = release; 1790 release_cb = release;
1735 acquire_cb = acquire; 1791 acquire_cb = acquire;
1736} 1792}
1737#endif 1793#endif
1738 1794
1739/* initialise a loop structure, must be zero-initialised */ 1795/* initialise a loop structure, must be zero-initialised */
1740static void noinline 1796static void noinline ecb_cold
1741loop_init (EV_P_ unsigned int flags) 1797loop_init (EV_P_ unsigned int flags)
1742{ 1798{
1743 if (!backend) 1799 if (!backend)
1744 { 1800 {
1745 origflags = flags; 1801 origflags = flags;
… …
1830#endif 1886#endif
1831 } 1887 }
1832} 1888}
1833 1889
1834/* free up a loop structure */ 1890/* free up a loop structure */
1835void 1891void ecb_cold
1836ev_loop_destroy (EV_P) 1892ev_loop_destroy (EV_P)
1837{ 1893{
1838 int i; 1894 int i;
1839 1895
1840#if EV_MULTIPLICITY 1896#if EV_MULTIPLICITY
… …
1998 postfork = 0; 2054 postfork = 0;
1999} 2055}
2000 2056
2001#if EV_MULTIPLICITY 2057#if EV_MULTIPLICITY
2002 2058
2003struct ev_loop * 2059struct ev_loop * ecb_cold
2004ev_loop_new (unsigned int flags) 2060ev_loop_new (unsigned int flags)
2005{ 2061{
2006 EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop)); 2062 EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));
2007 2063
2008 memset (EV_A, 0, sizeof (struct ev_loop)); 2064 memset (EV_A, 0, sizeof (struct ev_loop));
… …
2016} 2072}
2017 2073
2018#endif /* multiplicity */ 2074#endif /* multiplicity */
2019 2075
2020#if EV_VERIFY 2076#if EV_VERIFY
2021static void noinline 2077static void noinline ecb_cold
2022verify_watcher (EV_P_ W w) 2078verify_watcher (EV_P_ W w)
2023{ 2079{
2024 assert (("libev: watcher has invalid priority", ABSPRI (w) >= 0 && ABSPRI (w) < NUMPRI)); 2080 assert (("libev: watcher has invalid priority", ABSPRI (w) >= 0 && ABSPRI (w) < NUMPRI));
2025 2081
2026 if (w->pending) 2082 if (w->pending)
2027 assert (("libev: pending watcher not on pending queue", pendings [ABSPRI (w)][w->pending - 1].w == w)); 2083 assert (("libev: pending watcher not on pending queue", pendings [ABSPRI (w)][w->pending - 1].w == w));
2028} 2084}
2029 2085
2030static void noinline 2086static void noinline ecb_cold
2031verify_heap (EV_P_ ANHE *heap, int N) 2087verify_heap (EV_P_ ANHE *heap, int N)
2032{ 2088{
2033 int i; 2089 int i;
2034 2090
2035 for (i = HEAP0; i < N + HEAP0; ++i) 2091 for (i = HEAP0; i < N + HEAP0; ++i)
… …
2040 2096
2041 verify_watcher (EV_A_ (W)ANHE_w (heap [i])); 2097 verify_watcher (EV_A_ (W)ANHE_w (heap [i]));
2042 } 2098 }
2043} 2099}
2044 2100
2045static void noinline 2101static void noinline ecb_cold
2046array_verify (EV_P_ W *ws, int cnt) 2102array_verify (EV_P_ W *ws, int cnt)
2047{ 2103{
2048 while (cnt--) 2104 while (cnt--)
2049 { 2105 {
2050 assert (("libev: active index mismatch", ev_active (ws [cnt]) == cnt + 1)); 2106 assert (("libev: active index mismatch", ev_active (ws [cnt]) == cnt + 1));
… …
2052 } 2108 }
2053} 2109}
2054#endif 2110#endif
2055 2111
2056#if EV_FEATURE_API 2112#if EV_FEATURE_API
2057void 2113void ecb_cold
2058ev_verify (EV_P) 2114ev_verify (EV_P)
2059{ 2115{
2060#if EV_VERIFY 2116#if EV_VERIFY
2061 int i; 2117 int i;
2062 WL w; 2118 WL w;
… …
2128#endif 2184#endif
2129} 2185}
2130#endif 2186#endif
2131 2187
2132#if EV_MULTIPLICITY 2188#if EV_MULTIPLICITY
2133struct ev_loop * 2189struct ev_loop * ecb_cold
2134#else 2190#else
2135int 2191int
2136#endif 2192#endif
2137ev_default_loop (unsigned int flags) 2193ev_default_loop (unsigned int flags)
2138{ 2194{
… …
2337 } 2393 }
2338} 2394}
2339 2395
2340/* simply recalculate all periodics */ 2396/* simply recalculate all periodics */
2341/* TODO: maybe ensure that at least one event happens when jumping forward? */ 2397/* TODO: maybe ensure that at least one event happens when jumping forward? */
2342static void noinline 2398static void noinline ecb_cold
2343periodics_reschedule (EV_P) 2399periodics_reschedule (EV_P)
2344{ 2400{
2345 int i; 2401 int i;
2346 2402
2347 /* adjust periodics after time jump */ 2403 /* adjust periodics after time jump */
… …
2360 reheap (periodics, periodiccnt); 2416 reheap (periodics, periodiccnt);
2361} 2417}
2362#endif 2418#endif
2363 2419
2364/* adjust all timers by a given offset */ 2420/* adjust all timers by a given offset */
2365static void noinline 2421static void noinline ecb_cold
2366timers_reschedule (EV_P_ ev_tstamp adjust) 2422timers_reschedule (EV_P_ ev_tstamp adjust)
2367{ 2423{
2368 int i; 2424 int i;
2369 2425
2370 for (i = 0; i < timercnt; ++i) 2426 for (i = 0; i < timercnt; ++i)
… …
3236 infy_wd (EV_A_ ev->wd, ev->wd, ev); 3292 infy_wd (EV_A_ ev->wd, ev->wd, ev);
3237 ofs += sizeof (struct inotify_event) + ev->len; 3293 ofs += sizeof (struct inotify_event) + ev->len;
3238 } 3294 }
3239} 3295}
3240 3296
3241inline_size void 3297inline_size void ecb_cold
3242ev_check_2625 (EV_P) 3298ev_check_2625 (EV_P)
3243{ 3299{
3244 /* kernels < 2.6.25 are borked 3300 /* kernels < 2.6.25 are borked
3245 * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html 3301 * http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
3246 */ 3302 */
… …
3871} 3927}
3872 3928
3873/*****************************************************************************/ 3929/*****************************************************************************/
3874 3930
3875#if EV_WALK_ENABLE 3931#if EV_WALK_ENABLE
3876void 3932void ecb_cold
3877ev_walk (EV_P_ int types, void (*cb)(EV_P_ int type, void *w)) 3933ev_walk (EV_P_ int types, void (*cb)(EV_P_ int type, void *w))
3878{ 3934{
3879 int i, j; 3935 int i, j;
3880 ev_watcher_list *wl, *wn; 3936 ev_watcher_list *wl, *wn;
3881 3937

Diff Legend

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