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

Comparing libev/ev.c (file contents):
Revision 1.140 by root, Mon Nov 26 19:49:36 2007 UTC vs.
Revision 1.145 by root, Tue Nov 27 08:54:38 2007 UTC

… …
198# define inline_speed static inline 198# define inline_speed static inline
199# endif 199# endif
200#else 200#else
201# define expect(expr,value) (expr) 201# define expect(expr,value) (expr)
202# define inline_speed static 202# define inline_speed static
203# define inline_minimal static 203# define inline_size static
204# define noinline 204# define noinline
205#endif 205#endif
206 206
207#define expect_false(expr) expect ((expr) != 0, 0) 207#define expect_false(expr) expect ((expr) != 0, 0)
208#define expect_true(expr) expect ((expr) != 0, 1) 208#define expect_true(expr) expect ((expr) != 0, 1)
… …
225 225
226/*****************************************************************************/ 226/*****************************************************************************/
227 227
228static void (*syserr_cb)(const char *msg); 228static void (*syserr_cb)(const char *msg);
229 229
230void
230void ev_set_syserr_cb (void (*cb)(const char *msg)) 231ev_set_syserr_cb (void (*cb)(const char *msg))
231{ 232{
232 syserr_cb = cb; 233 syserr_cb = cb;
233} 234}
234 235
235static void 236static void noinline
236syserr (const char *msg) 237syserr (const char *msg)
237{ 238{
238 if (!msg) 239 if (!msg)
239 msg = "(libev) system error"; 240 msg = "(libev) system error";
240 241
… …
247 } 248 }
248} 249}
249 250
250static void *(*alloc)(void *ptr, long size); 251static void *(*alloc)(void *ptr, long size);
251 252
253void
252void ev_set_allocator (void *(*cb)(void *ptr, long size)) 254ev_set_allocator (void *(*cb)(void *ptr, long size))
253{ 255{
254 alloc = cb; 256 alloc = cb;
255} 257}
256 258
257static void * 259static void *
… …
315 317
316#endif 318#endif
317 319
318/*****************************************************************************/ 320/*****************************************************************************/
319 321
320ev_tstamp noinline 322ev_tstamp
321ev_time (void) 323ev_time (void)
322{ 324{
323#if EV_USE_REALTIME 325#if EV_USE_REALTIME
324 struct timespec ts; 326 struct timespec ts;
325 clock_gettime (CLOCK_REALTIME, &ts); 327 clock_gettime (CLOCK_REALTIME, &ts);
… …
382#define array_free(stem, idx) \ 384#define array_free(stem, idx) \
383 ev_free (stem ## s idx); stem ## cnt idx = stem ## max idx = 0; 385 ev_free (stem ## s idx); stem ## cnt idx = stem ## max idx = 0;
384 386
385/*****************************************************************************/ 387/*****************************************************************************/
386 388
387void inline_size
388anfds_init (ANFD *base, int count)
389{
390 while (count--)
391 {
392 base->head = 0;
393 base->events = EV_NONE;
394 base->reify = 0;
395
396 ++base;
397 }
398}
399
400void noinline 389void noinline
401ev_feed_event (EV_P_ void *w, int revents) 390ev_feed_event (EV_P_ void *w, int revents)
402{ 391{
403 W w_ = (W)w; 392 W w_ = (W)w;
404 393
… …
412 array_needsize (ANPENDING, pendings [ABSPRI (w_)], pendingmax [ABSPRI (w_)], pendingcnt [ABSPRI (w_)], EMPTY2); 401 array_needsize (ANPENDING, pendings [ABSPRI (w_)], pendingmax [ABSPRI (w_)], pendingcnt [ABSPRI (w_)], EMPTY2);
413 pendings [ABSPRI (w_)][w_->pending - 1].w = w_; 402 pendings [ABSPRI (w_)][w_->pending - 1].w = w_;
414 pendings [ABSPRI (w_)][w_->pending - 1].events = revents; 403 pendings [ABSPRI (w_)][w_->pending - 1].events = revents;
415} 404}
416 405
417static void 406void inline_size
418queue_events (EV_P_ W *events, int eventcnt, int type) 407queue_events (EV_P_ W *events, int eventcnt, int type)
419{ 408{
420 int i; 409 int i;
421 410
422 for (i = 0; i < eventcnt; ++i) 411 for (i = 0; i < eventcnt; ++i)
423 ev_feed_event (EV_A_ events [i], type); 412 ev_feed_event (EV_A_ events [i], type);
424} 413}
425 414
415/*****************************************************************************/
416
417void inline_size
418anfds_init (ANFD *base, int count)
419{
420 while (count--)
421 {
422 base->head = 0;
423 base->events = EV_NONE;
424 base->reify = 0;
425
426 ++base;
427 }
428}
429
426void inline_speed 430void inline_speed
427fd_event (EV_P_ int fd, int revents) 431fd_event (EV_P_ int fd, int revents)
428{ 432{
429 ANFD *anfd = anfds + fd; 433 ANFD *anfd = anfds + fd;
430 ev_io *w; 434 ev_io *w;
… …
441void 445void
442ev_feed_fd_event (EV_P_ int fd, int revents) 446ev_feed_fd_event (EV_P_ int fd, int revents)
443{ 447{
444 fd_event (EV_A_ fd, revents); 448 fd_event (EV_A_ fd, revents);
445} 449}
446
447/*****************************************************************************/
448 450
449void inline_size 451void inline_size
450fd_reify (EV_P) 452fd_reify (EV_P)
451{ 453{
452 int i; 454 int i;
… …
712static ev_child *childs [PID_HASHSIZE]; 714static ev_child *childs [PID_HASHSIZE];
713 715
714#ifndef _WIN32 716#ifndef _WIN32
715 717
716static ev_signal childev; 718static ev_signal childev;
717
718#ifndef WCONTINUED
719# define WCONTINUED 0
720#endif
721 719
722void inline_speed 720void inline_speed
723child_reap (EV_P_ ev_signal *sw, int chain, int pid, int status) 721child_reap (EV_P_ ev_signal *sw, int chain, int pid, int status)
724{ 722{
725 ev_child *w; 723 ev_child *w;
… …
732 w->rstatus = status; 730 w->rstatus = status;
733 ev_feed_event (EV_A_ (W)w, EV_CHILD); 731 ev_feed_event (EV_A_ (W)w, EV_CHILD);
734 } 732 }
735} 733}
736 734
735#ifndef WCONTINUED
736# define WCONTINUED 0
737#endif
738
737static void 739static void
738childcb (EV_P_ ev_signal *sw, int revents) 740childcb (EV_P_ ev_signal *sw, int revents)
739{ 741{
740 int pid, status; 742 int pid, status;
741 743
744 /* some systems define WCONTINUED but then fail to support it (linux 2.4) */
742 if (0 < (pid = waitpid (-1, &status, WNOHANG | WUNTRACED | WCONTINUED))) 745 if (0 >= (pid = waitpid (-1, &status, WNOHANG | WUNTRACED | WCONTINUED)))
743 { 746 if (!WCONTINUED
747 || errno != EINVAL
748 || 0 >= (pid = waitpid (-1, &status, WNOHANG | WUNTRACED)))
749 return;
750
744 /* make sure we are called again until all childs have been reaped */ 751 /* make sure we are called again until all childs have been reaped */
745 /* we need to do it this way so that the callback gets called before we continue */ 752 /* we need to do it this way so that the callback gets called before we continue */
746 ev_feed_event (EV_A_ (W)sw, EV_SIGNAL); 753 ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
747 754
748 child_reap (EV_A_ sw, pid, pid, status); 755 child_reap (EV_A_ sw, pid, pid, status);
749 child_reap (EV_A_ sw, 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */ 756 child_reap (EV_A_ sw, 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
750 }
751} 757}
752 758
753#endif 759#endif
754 760
755/*****************************************************************************/ 761/*****************************************************************************/
… …
1552 ev_periodic_stop (EV_A_ w); 1558 ev_periodic_stop (EV_A_ w);
1553 ev_periodic_start (EV_A_ w); 1559 ev_periodic_start (EV_A_ w);
1554} 1560}
1555#endif 1561#endif
1556 1562
1557void
1558ev_idle_start (EV_P_ ev_idle *w)
1559{
1560 if (expect_false (ev_is_active (w)))
1561 return;
1562
1563 ev_start (EV_A_ (W)w, ++idlecnt);
1564 array_needsize (ev_idle *, idles, idlemax, idlecnt, EMPTY2);
1565 idles [idlecnt - 1] = w;
1566}
1567
1568void
1569ev_idle_stop (EV_P_ ev_idle *w)
1570{
1571 ev_clear_pending (EV_A_ (W)w);
1572 if (expect_false (!ev_is_active (w)))
1573 return;
1574
1575 {
1576 int active = ((W)w)->active;
1577 idles [active - 1] = idles [--idlecnt];
1578 ((W)idles [active - 1])->active = active;
1579 }
1580
1581 ev_stop (EV_A_ (W)w);
1582}
1583
1584void
1585ev_prepare_start (EV_P_ ev_prepare *w)
1586{
1587 if (expect_false (ev_is_active (w)))
1588 return;
1589
1590 ev_start (EV_A_ (W)w, ++preparecnt);
1591 array_needsize (ev_prepare *, prepares, preparemax, preparecnt, EMPTY2);
1592 prepares [preparecnt - 1] = w;
1593}
1594
1595void
1596ev_prepare_stop (EV_P_ ev_prepare *w)
1597{
1598 ev_clear_pending (EV_A_ (W)w);
1599 if (expect_false (!ev_is_active (w)))
1600 return;
1601
1602 {
1603 int active = ((W)w)->active;
1604 prepares [active - 1] = prepares [--preparecnt];
1605 ((W)prepares [active - 1])->active = active;
1606 }
1607
1608 ev_stop (EV_A_ (W)w);
1609}
1610
1611void
1612ev_check_start (EV_P_ ev_check *w)
1613{
1614 if (expect_false (ev_is_active (w)))
1615 return;
1616
1617 ev_start (EV_A_ (W)w, ++checkcnt);
1618 array_needsize (ev_check *, checks, checkmax, checkcnt, EMPTY2);
1619 checks [checkcnt - 1] = w;
1620}
1621
1622void
1623ev_check_stop (EV_P_ ev_check *w)
1624{
1625 ev_clear_pending (EV_A_ (W)w);
1626 if (expect_false (!ev_is_active (w)))
1627 return;
1628
1629 {
1630 int active = ((W)w)->active;
1631 checks [active - 1] = checks [--checkcnt];
1632 ((W)checks [active - 1])->active = active;
1633 }
1634
1635 ev_stop (EV_A_ (W)w);
1636}
1637
1638#ifndef SA_RESTART 1563#ifndef SA_RESTART
1639# define SA_RESTART 0 1564# define SA_RESTART 0
1640#endif 1565#endif
1641 1566
1642void 1567void
… …
1704 1629
1705 wlist_del ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w); 1630 wlist_del ((WL *)&childs [w->pid & (PID_HASHSIZE - 1)], (WL)w);
1706 ev_stop (EV_A_ (W)w); 1631 ev_stop (EV_A_ (W)w);
1707} 1632}
1708 1633
1634#if EV_STAT_ENABLE
1635
1636# ifdef _WIN32
1637# define lstat(a,b) stat(a,b)
1638# endif
1639
1640#define DEF_STAT_INTERVAL 5.0074891
1641#define MIN_STAT_INTERVAL 0.1074891
1642
1643void
1644ev_stat_stat (EV_P_ ev_stat *w)
1645{
1646 if (lstat (w->path, &w->attr) < 0)
1647 w->attr.st_nlink = 0;
1648 else if (!w->attr.st_nlink)
1649 w->attr.st_nlink = 1;
1650}
1651
1652static void
1653stat_timer_cb (EV_P_ ev_timer *w_, int revents)
1654{
1655 ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
1656
1657 /* we copy this here each the time so that */
1658 /* prev has the old value when the callback gets invoked */
1659 w->prev = w->attr;
1660 ev_stat_stat (EV_A_ w);
1661
1662 if (memcmp (&w->prev, &w->attr, sizeof (ev_statdata)))
1663 ev_feed_event (EV_A_ w, EV_STAT);
1664}
1665
1666void
1667ev_stat_start (EV_P_ ev_stat *w)
1668{
1669 if (expect_false (ev_is_active (w)))
1670 return;
1671
1672 /* since we use memcmp, we need to clear any padding data etc. */
1673 memset (&w->prev, 0, sizeof (ev_statdata));
1674 memset (&w->attr, 0, sizeof (ev_statdata));
1675
1676 ev_stat_stat (EV_A_ w);
1677
1678 if (w->interval < MIN_STAT_INTERVAL)
1679 w->interval = w->interval ? MIN_STAT_INTERVAL : DEF_STAT_INTERVAL;
1680
1681 ev_timer_init (&w->timer, stat_timer_cb, w->interval, w->interval);
1682 ev_set_priority (&w->timer, ev_priority (w));
1683 ev_timer_start (EV_A_ &w->timer);
1684
1685 ev_start (EV_A_ (W)w, 1);
1686}
1687
1688void
1689ev_stat_stop (EV_P_ ev_stat *w)
1690{
1691 ev_clear_pending (EV_A_ (W)w);
1692 if (expect_false (!ev_is_active (w)))
1693 return;
1694
1695 ev_timer_stop (EV_A_ &w->timer);
1696
1697 ev_stop (EV_A_ (W)w);
1698}
1699#endif
1700
1701void
1702ev_idle_start (EV_P_ ev_idle *w)
1703{
1704 if (expect_false (ev_is_active (w)))
1705 return;
1706
1707 ev_start (EV_A_ (W)w, ++idlecnt);
1708 array_needsize (ev_idle *, idles, idlemax, idlecnt, EMPTY2);
1709 idles [idlecnt - 1] = w;
1710}
1711
1712void
1713ev_idle_stop (EV_P_ ev_idle *w)
1714{
1715 ev_clear_pending (EV_A_ (W)w);
1716 if (expect_false (!ev_is_active (w)))
1717 return;
1718
1719 {
1720 int active = ((W)w)->active;
1721 idles [active - 1] = idles [--idlecnt];
1722 ((W)idles [active - 1])->active = active;
1723 }
1724
1725 ev_stop (EV_A_ (W)w);
1726}
1727
1728void
1729ev_prepare_start (EV_P_ ev_prepare *w)
1730{
1731 if (expect_false (ev_is_active (w)))
1732 return;
1733
1734 ev_start (EV_A_ (W)w, ++preparecnt);
1735 array_needsize (ev_prepare *, prepares, preparemax, preparecnt, EMPTY2);
1736 prepares [preparecnt - 1] = w;
1737}
1738
1739void
1740ev_prepare_stop (EV_P_ ev_prepare *w)
1741{
1742 ev_clear_pending (EV_A_ (W)w);
1743 if (expect_false (!ev_is_active (w)))
1744 return;
1745
1746 {
1747 int active = ((W)w)->active;
1748 prepares [active - 1] = prepares [--preparecnt];
1749 ((W)prepares [active - 1])->active = active;
1750 }
1751
1752 ev_stop (EV_A_ (W)w);
1753}
1754
1755void
1756ev_check_start (EV_P_ ev_check *w)
1757{
1758 if (expect_false (ev_is_active (w)))
1759 return;
1760
1761 ev_start (EV_A_ (W)w, ++checkcnt);
1762 array_needsize (ev_check *, checks, checkmax, checkcnt, EMPTY2);
1763 checks [checkcnt - 1] = w;
1764}
1765
1766void
1767ev_check_stop (EV_P_ ev_check *w)
1768{
1769 ev_clear_pending (EV_A_ (W)w);
1770 if (expect_false (!ev_is_active (w)))
1771 return;
1772
1773 {
1774 int active = ((W)w)->active;
1775 checks [active - 1] = checks [--checkcnt];
1776 ((W)checks [active - 1])->active = active;
1777 }
1778
1779 ev_stop (EV_A_ (W)w);
1780}
1781
1709#if EV_EMBED_ENABLE 1782#if EV_EMBED_ENABLE
1710void noinline 1783void noinline
1711ev_embed_sweep (EV_P_ ev_embed *w) 1784ev_embed_sweep (EV_P_ ev_embed *w)
1712{ 1785{
1713 ev_loop (w->loop, EVLOOP_NONBLOCK); 1786 ev_loop (w->loop, EVLOOP_NONBLOCK);
… …
1753 1826
1754 ev_stop (EV_A_ (W)w); 1827 ev_stop (EV_A_ (W)w);
1755} 1828}
1756#endif 1829#endif
1757 1830
1758#if EV_STAT_ENABLE
1759
1760# ifdef _WIN32
1761# define lstat(a,b) stat(a,b)
1762# endif
1763
1764void
1765ev_stat_stat (EV_P_ ev_stat *w)
1766{
1767 if (lstat (w->path, &w->attr) < 0)
1768 w->attr.st_nlink = 0;
1769 else if (!w->attr.st_nlink)
1770 w->attr.st_nlink = 1;
1771}
1772
1773static void
1774stat_timer_cb (EV_P_ ev_timer *w_, int revents)
1775{
1776 ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
1777
1778 /* we copy this here each the time so that */
1779 /* prev has the old value when the callback gets invoked */
1780 w->prev = w->attr;
1781 ev_stat_stat (EV_A_ w);
1782
1783 if (memcmp (&w->prev, &w->attr, sizeof (ev_statdata)))
1784 ev_feed_event (EV_A_ w, EV_STAT);
1785}
1786
1787void
1788ev_stat_start (EV_P_ ev_stat *w)
1789{
1790 if (expect_false (ev_is_active (w)))
1791 return;
1792
1793 /* since we use memcmp, we need to clear any padding data etc. */
1794 memset (&w->prev, 0, sizeof (ev_statdata));
1795 memset (&w->attr, 0, sizeof (ev_statdata));
1796
1797 ev_stat_stat (EV_A_ w);
1798
1799 ev_timer_init (&w->timer, stat_timer_cb, w->interval, w->interval);
1800 ev_set_priority (&w->timer, ev_priority (w));
1801 ev_timer_start (EV_A_ &w->timer);
1802
1803 ev_start (EV_A_ (W)w, 1);
1804}
1805
1806void
1807ev_stat_stop (EV_P_ ev_stat *w)
1808{
1809 ev_clear_pending (EV_A_ (W)w);
1810 if (expect_false (!ev_is_active (w)))
1811 return;
1812
1813 ev_timer_stop (EV_A_ &w->timer);
1814
1815 ev_stop (EV_A_ (W)w);
1816}
1817#endif
1818
1819/*****************************************************************************/ 1831/*****************************************************************************/
1820 1832
1821struct ev_once 1833struct ev_once
1822{ 1834{
1823 ev_io io; 1835 ev_io io;

Diff Legend

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