[ViewVC] Diff of: cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.349 by sf-exg, Fri Oct 15 22:59:59 2010 UTC vs.
Revision 1.372 by root, Wed Feb 16 08:02:50 2011 UTC

…		…
1	/*	1	/*
2	* libev event processing core, watcher management	2	* libev event processing core, watcher management
3	*	3	*
4	* Copyright (c) 2007,2008,2009,2010 Marc Alexander Lehmann <libev@schmorp.de>	4	* Copyright (c) 2007,2008,2009,2010,2011 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	*
10	* 1. Redistributions of source code must retain the above copyright notice,	10	* 1. Redistributions of source code must retain the above copyright notice,
11	* this list of conditions and the following disclaimer.	11	* this list of conditions and the following disclaimer.
12	*	12	*
13	* 2. Redistributions in binary form must reproduce the above copyright	13	* 2. Redistributions in binary form must reproduce the above copyright
14	* notice, this list of conditions and the following disclaimer in the	14	* notice, this list of conditions and the following disclaimer in the
15	* documentation and/or other materials provided with the distribution.	15	* documentation and/or other materials provided with the distribution.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
18	* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER-	18	* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER-
19	* CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO	19	* CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
20	* EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE-	20	* EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE-
21	* CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,	21	* CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
34	* by deleting the provisions above and replace them with the notice	34	* by deleting the provisions above and replace them with the notice
35	* and other provisions required by the GPL. If you do not delete the	35	* and other provisions required by the GPL. If you do not delete the
36	* provisions above, a recipient may use your version of this file under	36	* provisions above, a recipient may use your version of this file under
37	* either the BSD or the GPL.	37	* either the BSD or the GPL.
38	*/	38	*/
39
40	#ifdef __cplusplus
41	extern "C" {
42	#endif
43		39
44	/* this big block deduces configuration from config.h */	40	/* this big block deduces configuration from config.h */
45	#ifndef EV_STANDALONE	41	#ifndef EV_STANDALONE
46	# ifdef EV_CONFIG_H	42	# ifdef EV_CONFIG_H
47	# include EV_CONFIG_H	43	# include EV_CONFIG_H
…		…
182	# include EV_H	178	# include EV_H
183	#else	179	#else
184	# include "ev.h"	180	# include "ev.h"
185	#endif	181	#endif
186		182
		183	EV_CPP(extern "C" {)
		184
187	#ifndef _WIN32	185	#ifndef _WIN32
188	# include <sys/time.h>	186	# include <sys/time.h>
189	# include <sys/wait.h>	187	# include <sys/wait.h>
190	# include <unistd.h>	188	# include <unistd.h>
191	#else	189	#else
…		…
378	# undef EV_USE_INOTIFY	376	# undef EV_USE_INOTIFY
379	# define EV_USE_INOTIFY 0	377	# define EV_USE_INOTIFY 0
380	#endif	378	#endif
381		379
382	#if !EV_USE_NANOSLEEP	380	#if !EV_USE_NANOSLEEP
383	# ifndef _WIN32	381	/* hp-ux has it in sys/time.h, which we unconditionally include above */
		382	# if !defined(_WIN32) && !defined(__hpux)
384	# include <sys/select.h>	383	# include <sys/select.h>
385	# endif	384	# endif
386	#endif	385	#endif
387		386
388	#if EV_USE_INOTIFY	387	#if EV_USE_INOTIFY
389	# include <sys/utsname.h>
390	# include <sys/statfs.h>	388	# include <sys/statfs.h>
391	# include <sys/inotify.h>	389	# include <sys/inotify.h>
392	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */	390	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */
393	# ifndef IN_DONT_FOLLOW	391	# ifndef IN_DONT_FOLLOW
394	# undef EV_USE_INOTIFY	392	# undef EV_USE_INOTIFY
…		…
411	# define EFD_CLOEXEC O_CLOEXEC	409	# define EFD_CLOEXEC O_CLOEXEC
412	# else	410	# else
413	# define EFD_CLOEXEC 02000000	411	# define EFD_CLOEXEC 02000000
414	# endif	412	# endif
415	# endif	413	# endif
416	# ifdef __cplusplus
417	extern "C" {
418	# endif
419	int (eventfd) (unsigned int initval, int flags);	414	EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags);
420	# ifdef __cplusplus
421	}
422	# endif
423	#endif	415	#endif
424		416
425	#if EV_USE_SIGNALFD	417	#if EV_USE_SIGNALFD
426	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */	418	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */
427	# include <stdint.h>	419	# include <stdint.h>
…		…
433	# define SFD_CLOEXEC O_CLOEXEC	425	# define SFD_CLOEXEC O_CLOEXEC
434	# else	426	# else
435	# define SFD_CLOEXEC 02000000	427	# define SFD_CLOEXEC 02000000
436	# endif	428	# endif
437	# endif	429	# endif
438	# ifdef __cplusplus
439	extern "C" {
440	# endif
441	int signalfd (int fd, const sigset_t *mask, int flags);	430	EV_CPP (extern "C") int signalfd (int fd, const sigset_t *mask, int flags);
442		431
443	struct signalfd_siginfo	432	struct signalfd_siginfo
444	{	433	{
445	uint32_t ssi_signo;	434	uint32_t ssi_signo;
446	char pad[128 - sizeof (uint32_t)];	435	char pad[128 - sizeof (uint32_t)];
447	};	436	};
448	# ifdef __cplusplus
449	}
450	# endif
451	#endif	437	#endif
452		438
453	/**/	439	/**/
454		440
455	#if EV_VERIFY >= 3	441	#if EV_VERIFY >= 3
…		…
537	# include "ev_win32.c"	523	# include "ev_win32.c"
538	#endif	524	#endif
539		525
540	/*****************************************************************************/	526	/*****************************************************************************/
541		527
		528	#ifdef __linux
		529	# include <sys/utsname.h>
		530	#endif
		531
		532	static unsigned int noinline
		533	ev_linux_version (void)
		534	{
		535	#ifdef __linux
		536	unsigned int v = 0;
		537	struct utsname buf;
		538	int i;
		539	char *p = buf.release;
		540
		541	if (uname (&buf))
		542	return 0;
		543
		544	for (i = 3+1; --i; )
		545	{
		546	unsigned int c = 0;
		547
		548	for (;;)
		549	{
		550	if (p >= '0' && p <= '9')
		551	c = c * 10 + *p++ - '0';
		552	else
		553	{
		554	p += *p == '.';
		555	break;
		556	}
		557	}
		558
		559	v = (v << 8) \| c;
		560	}
		561
		562	return v;
		563	#else
		564	return 0;
		565	#endif
		566	}
		567
		568	/*****************************************************************************/
		569
542	#if EV_AVOID_STDIO	570	#if EV_AVOID_STDIO
543	static void noinline	571	static void noinline
544	ev_printerr (const char *msg)	572	ev_printerr (const char *msg)
545	{	573	{
546	write (STDERR_FILENO, msg, strlen (msg));	574	write (STDERR_FILENO, msg, strlen (msg));
…		…
564	if (syserr_cb)	592	if (syserr_cb)
565	syserr_cb (msg);	593	syserr_cb (msg);
566	else	594	else
567	{	595	{
568	#if EV_AVOID_STDIO	596	#if EV_AVOID_STDIO
569	const char *err = strerror (errno);
570
571	ev_printerr (msg);	597	ev_printerr (msg);
572	ev_printerr (": ");	598	ev_printerr (": ");
573	ev_printerr (err);	599	ev_printerr (strerror (errno));
574	ev_printerr ("\n");	600	ev_printerr ("\n");
575	#else	601	#else
576	perror (msg);	602	perror (msg);
577	#endif	603	#endif
578	abort ();	604	abort ();
…		…
612	ptr = alloc (ptr, size);	638	ptr = alloc (ptr, size);
613		639
614	if (!ptr && size)	640	if (!ptr && size)
615	{	641	{
616	#if EV_AVOID_STDIO	642	#if EV_AVOID_STDIO
617	ev_printerr ("libev: memory allocation failed, aborting.\n");	643	ev_printerr ("(libev) memory allocation failed, aborting.\n");
618	#else	644	#else
619	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	645	fprintf (stderr, "(libev) cannot allocate %ld bytes, aborting.", size);
620	#endif	646	#endif
621	abort ();	647	abort ();
622	}	648	}
623		649
624	return ptr;	650	return ptr;
…		…
641	unsigned char emask; /* the epoll backend stores the actual kernel mask in here */	667	unsigned char emask; /* the epoll backend stores the actual kernel mask in here */
642	unsigned char unused;	668	unsigned char unused;
643	#if EV_USE_EPOLL	669	#if EV_USE_EPOLL
644	unsigned int egen; /* generation counter to counter epoll bugs */	670	unsigned int egen; /* generation counter to counter epoll bugs */
645	#endif	671	#endif
646	#if EV_SELECT_IS_WINSOCKET	672	#if EV_SELECT_IS_WINSOCKET \|\| EV_USE_IOCP
647	SOCKET handle;	673	SOCKET handle;
		674	#endif
		675	#if EV_USE_IOCP
		676	OVERLAPPED or, ow;
648	#endif	677	#endif
649	} ANFD;	678	} ANFD;
650		679
651	/* stores the pending event set for a given watcher */	680	/* stores the pending event set for a given watcher */
652	typedef struct	681	typedef struct
…		…
717	# define EV_RELEASE_CB (void)0	746	# define EV_RELEASE_CB (void)0
718	# define EV_ACQUIRE_CB (void)0	747	# define EV_ACQUIRE_CB (void)0
719	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)	748	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)
720	#endif	749	#endif
721		750
722	#define EVUNLOOP_RECURSE 0x80	751	#define EVBREAK_RECURSE 0x80
723		752
724	/*****************************************************************************/	753	/*****************************************************************************/
725		754
726	#ifndef EV_HAVE_EV_TIME	755	#ifndef EV_HAVE_EV_TIME
727	ev_tstamp	756	ev_tstamp
…		…
785	/* by older ones */	814	/* by older ones */
786	EV_TV_SET (tv, delay);	815	EV_TV_SET (tv, delay);
787	select (0, 0, 0, 0, &tv);	816	select (0, 0, 0, 0, &tv);
788	#endif	817	#endif
789	}	818	}
		819	}
		820
		821	inline_speed int
		822	ev_timeout_to_ms (ev_tstamp timeout)
		823	{
		824	int ms = timeout * 1000. + .999999;
		825
		826	return expect_true (ms) ? ms : timeout < 1e-6 ? 0 : 1;
790	}	827	}
791		828
792	/*****************************************************************************/	829	/*****************************************************************************/
793		830
794	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2*n and >> 4 longs /	831	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2*n and >> 4 longs /
…		…
937	inline_size void	974	inline_size void
938	fd_reify (EV_P)	975	fd_reify (EV_P)
939	{	976	{
940	int i;	977	int i;
941		978
		979	#if EV_SELECT_IS_WINSOCKET \|\| EV_USE_IOCP
		980	for (i = 0; i < fdchangecnt; ++i)
		981	{
		982	int fd = fdchanges [i];
		983	ANFD *anfd = anfds + fd;
		984
		985	if (anfd->reify & EV__IOFDSET)
		986	{
		987	SOCKET handle = EV_FD_TO_WIN32_HANDLE (fd);
		988
		989	if (handle != anfd->handle)
		990	{
		991	unsigned long arg;
		992
		993	assert (("libev: only socket fds supported in this configuration", ioctlsocket (handle, FIONREAD, &arg) == 0));
		994
		995	/* handle changed, but fd didn't - we need to do it in two steps */
		996	backend_modify (EV_A_ fd, anfd->events, 0);
		997	anfd->events = 0;
		998	anfd->handle = handle;
		999	}
		1000	}
		1001	}
		1002	#endif
		1003
942	for (i = 0; i < fdchangecnt; ++i)	1004	for (i = 0; i < fdchangecnt; ++i)
943	{	1005	{
944	int fd = fdchanges [i];	1006	int fd = fdchanges [i];
945	ANFD *anfd = anfds + fd;	1007	ANFD *anfd = anfds + fd;
946	ev_io *w;	1008	ev_io *w;
947		1009
948	unsigned char events = 0;	1010	unsigned char o_events = anfd->events;
		1011	unsigned char o_reify = anfd->reify;
949		1012
950	for (w = (ev_io )anfd->head; w; w = (ev_io )((WL)w)->next)	1013	anfd->reify = 0;
951	events \|= (unsigned char)w->events;
952		1014
953	#if EV_SELECT_IS_WINSOCKET	1015	/if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation /
954	if (events)
955	{	1016	{
956	unsigned long arg;	1017	anfd->events = 0;
957	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	1018
958	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	1019	for (w = (ev_io )anfd->head; w; w = (ev_io )((WL)w)->next)
		1020	anfd->events \|= (unsigned char)w->events;
		1021
		1022	if (o_events != anfd->events)
		1023	o_reify = EV__IOFDSET; /* actually \|= */
959	}	1024	}
960	#endif
961		1025
962	{	1026	if (o_reify & EV__IOFDSET)
963	unsigned char o_events = anfd->events;
964	unsigned char o_reify = anfd->reify;
965
966	anfd->reify = 0;
967	anfd->events = events;
968
969	if (o_events != events \|\| o_reify & EV__IOFDSET)
970	backend_modify (EV_A_ fd, o_events, events);	1027	backend_modify (EV_A_ fd, o_events, anfd->events);
971	}
972	}	1028	}
973		1029
974	fdchangecnt = 0;	1030	fdchangecnt = 0;
975	}	1031	}
976		1032
…		…
1311	char dummy;	1367	char dummy;
1312	/* see discussion in evpipe_write when you think this read should be recv in win32 */	1368	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1313	read (evpipe [0], &dummy, 1);	1369	read (evpipe [0], &dummy, 1);
1314	}	1370	}
1315		1371
		1372	#if EV_SIGNAL_ENABLE
1316	if (sig_pending)	1373	if (sig_pending)
1317	{	1374	{
1318	sig_pending = 0;	1375	sig_pending = 0;
1319		1376
1320	for (i = EV_NSIG - 1; i--; )	1377	for (i = EV_NSIG - 1; i--; )
1321	if (expect_false (signals [i].pending))	1378	if (expect_false (signals [i].pending))
1322	ev_feed_signal_event (EV_A_ i + 1);	1379	ev_feed_signal_event (EV_A_ i + 1);
1323	}	1380	}
		1381	#endif
1324		1382
1325	#if EV_ASYNC_ENABLE	1383	#if EV_ASYNC_ENABLE
1326	if (async_pending)	1384	if (async_pending)
1327	{	1385	{
1328	async_pending = 0;	1386	async_pending = 0;
…		…
1337	#endif	1395	#endif
1338	}	1396	}
1339		1397
1340	/*****************************************************************************/	1398	/*****************************************************************************/
1341		1399
		1400	void
		1401	ev_feed_signal (int signum)
		1402	{
		1403	#if EV_MULTIPLICITY
		1404	EV_P = signals [signum - 1].loop;
		1405
		1406	if (!EV_A)
		1407	return;
		1408	#endif
		1409
		1410	signals [signum - 1].pending = 1;
		1411	evpipe_write (EV_A_ &sig_pending);
		1412	}
		1413
1342	static void	1414	static void
1343	ev_sighandler (int signum)	1415	ev_sighandler (int signum)
1344	{	1416	{
1345	#if EV_MULTIPLICITY
1346	EV_P = signals [signum - 1].loop;
1347	#endif
1348
1349	#ifdef _WIN32	1417	#ifdef _WIN32
1350	signal (signum, ev_sighandler);	1418	signal (signum, ev_sighandler);
1351	#endif	1419	#endif
1352		1420
1353	signals [signum - 1].pending = 1;	1421	ev_feed_signal (signum);
1354	evpipe_write (EV_A_ &sig_pending);
1355	}	1422	}
1356		1423
1357	void noinline	1424	void noinline
1358	ev_feed_signal_event (EV_P_ int signum)	1425	ev_feed_signal_event (EV_P_ int signum)
1359	{	1426	{
…		…
1459		1526
1460	#endif	1527	#endif
1461		1528
1462	/*****************************************************************************/	1529	/*****************************************************************************/
1463		1530
		1531	#if EV_USE_IOCP
		1532	# include "ev_iocp.c"
		1533	#endif
1464	#if EV_USE_PORT	1534	#if EV_USE_PORT
1465	# include "ev_port.c"	1535	# include "ev_port.c"
1466	#endif	1536	#endif
1467	#if EV_USE_KQUEUE	1537	#if EV_USE_KQUEUE
1468	# include "ev_kqueue.c"	1538	# include "ev_kqueue.c"
…		…
1541	ev_embeddable_backends (void)	1611	ev_embeddable_backends (void)
1542	{	1612	{
1543	int flags = EVBACKEND_EPOLL \| EVBACKEND_KQUEUE \| EVBACKEND_PORT;	1613	int flags = EVBACKEND_EPOLL \| EVBACKEND_KQUEUE \| EVBACKEND_PORT;
1544		1614
1545	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */	1615	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */
1546	/* please fix it and tell me how to detect the fix */	1616	if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */
1547	flags &= ~EVBACKEND_EPOLL;	1617	flags &= ~EVBACKEND_EPOLL;
1548		1618
1549	return flags;	1619	return flags;
1550	}	1620	}
1551		1621
1552	unsigned int	1622	unsigned int
…		…
1608	static void noinline	1678	static void noinline
1609	loop_init (EV_P_ unsigned int flags)	1679	loop_init (EV_P_ unsigned int flags)
1610	{	1680	{
1611	if (!backend)	1681	if (!backend)
1612	{	1682	{
		1683	origflags = flags;
		1684
1613	#if EV_USE_REALTIME	1685	#if EV_USE_REALTIME
1614	if (!have_realtime)	1686	if (!have_realtime)
1615	{	1687	{
1616	struct timespec ts;	1688	struct timespec ts;
1617		1689
…		…
1662	#endif	1734	#endif
1663	#if EV_USE_SIGNALFD	1735	#if EV_USE_SIGNALFD
1664	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;	1736	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1665	#endif	1737	#endif
1666		1738
1667	if (!(flags & 0x0000ffffU))	1739	if (!(flags & EVBACKEND_MASK))
1668	flags \|= ev_recommended_backends ();	1740	flags \|= ev_recommended_backends ();
1669		1741
		1742	#if EV_USE_IOCP
		1743	if (!backend && (flags & EVBACKEND_IOCP )) backend = iocp_init (EV_A_ flags);
		1744	#endif
1670	#if EV_USE_PORT	1745	#if EV_USE_PORT
1671	if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags);	1746	if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags);
1672	#endif	1747	#endif
1673	#if EV_USE_KQUEUE	1748	#if EV_USE_KQUEUE
1674	if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags);	1749	if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags);
…		…
1691	#endif	1766	#endif
1692	}	1767	}
1693	}	1768	}
1694		1769
1695	/* free up a loop structure */	1770	/* free up a loop structure */
1696	static void noinline	1771	void
1697	loop_destroy (EV_P)	1772	ev_loop_destroy (EV_P)
1698	{	1773	{
1699	int i;	1774	int i;
		1775
		1776	#if EV_MULTIPLICITY
		1777	/* mimic free (0) */
		1778	if (!EV_A)
		1779	return;
		1780	#endif
		1781
		1782	#if EV_CLEANUP_ENABLE
		1783	/* queue cleanup watchers (and execute them) */
		1784	if (expect_false (cleanupcnt))
		1785	{
		1786	queue_events (EV_A_ (W *)cleanups, cleanupcnt, EV_CLEANUP);
		1787	EV_INVOKE_PENDING;
		1788	}
		1789	#endif
		1790
		1791	#if EV_CHILD_ENABLE
		1792	if (ev_is_active (&childev))
		1793	{
		1794	ev_ref (EV_A); /* child watcher */
		1795	ev_signal_stop (EV_A_ &childev);
		1796	}
		1797	#endif
1700		1798
1701	if (ev_is_active (&pipe_w))	1799	if (ev_is_active (&pipe_w))
1702	{	1800	{
1703	/ev_ref (EV_A);/	1801	/ev_ref (EV_A);/
1704	/ev_io_stop (EV_A_ &pipe_w);/	1802	/ev_io_stop (EV_A_ &pipe_w);/
…		…
1726	#endif	1824	#endif
1727		1825
1728	if (backend_fd >= 0)	1826	if (backend_fd >= 0)
1729	close (backend_fd);	1827	close (backend_fd);
1730		1828
		1829	#if EV_USE_IOCP
		1830	if (backend == EVBACKEND_IOCP ) iocp_destroy (EV_A);
		1831	#endif
1731	#if EV_USE_PORT	1832	#if EV_USE_PORT
1732	if (backend == EVBACKEND_PORT ) port_destroy (EV_A);	1833	if (backend == EVBACKEND_PORT ) port_destroy (EV_A);
1733	#endif	1834	#endif
1734	#if EV_USE_KQUEUE	1835	#if EV_USE_KQUEUE
1735	if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A);	1836	if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A);
…		…
1762	array_free (periodic, EMPTY);	1863	array_free (periodic, EMPTY);
1763	#endif	1864	#endif
1764	#if EV_FORK_ENABLE	1865	#if EV_FORK_ENABLE
1765	array_free (fork, EMPTY);	1866	array_free (fork, EMPTY);
1766	#endif	1867	#endif
		1868	#if EV_CLEANUP_ENABLE
		1869	array_free (cleanup, EMPTY);
		1870	#endif
1767	array_free (prepare, EMPTY);	1871	array_free (prepare, EMPTY);
1768	array_free (check, EMPTY);	1872	array_free (check, EMPTY);
1769	#if EV_ASYNC_ENABLE	1873	#if EV_ASYNC_ENABLE
1770	array_free (async, EMPTY);	1874	array_free (async, EMPTY);
1771	#endif	1875	#endif
1772		1876
1773	backend = 0;	1877	backend = 0;
		1878
		1879	#if EV_MULTIPLICITY
		1880	if (ev_is_default_loop (EV_A))
		1881	#endif
		1882	ev_default_loop_ptr = 0;
		1883	#if EV_MULTIPLICITY
		1884	else
		1885	ev_free (EV_A);
		1886	#endif
1774	}	1887	}
1775		1888
1776	#if EV_USE_INOTIFY	1889	#if EV_USE_INOTIFY
1777	inline_size void infy_fork (EV_P);	1890	inline_size void infy_fork (EV_P);
1778	#endif	1891	#endif
…		…
1837	loop_init (EV_A_ flags);	1950	loop_init (EV_A_ flags);
1838		1951
1839	if (ev_backend (EV_A))	1952	if (ev_backend (EV_A))
1840	return EV_A;	1953	return EV_A;
1841		1954
		1955	ev_free (EV_A);
1842	return 0;	1956	return 0;
1843	}	1957	}
1844		1958
1845	void
1846	ev_loop_destroy (EV_P)
1847	{
1848	loop_destroy (EV_A);
1849	ev_free (loop);
1850	}
1851
1852	void
1853	ev_loop_fork (EV_P)
1854	{
1855	postfork = 1; /* must be in line with ev_default_fork */
1856	}
1857	#endif /* multiplicity */	1959	#endif /* multiplicity */
1858		1960
1859	#if EV_VERIFY	1961	#if EV_VERIFY
1860	static void noinline	1962	static void noinline
1861	verify_watcher (EV_P_ W w)	1963	verify_watcher (EV_P_ W w)
…		…
1936	#if EV_FORK_ENABLE	2038	#if EV_FORK_ENABLE
1937	assert (forkmax >= forkcnt);	2039	assert (forkmax >= forkcnt);
1938	array_verify (EV_A_ (W *)forks, forkcnt);	2040	array_verify (EV_A_ (W *)forks, forkcnt);
1939	#endif	2041	#endif
1940		2042
		2043	#if EV_CLEANUP_ENABLE
		2044	assert (cleanupmax >= cleanupcnt);
		2045	array_verify (EV_A_ (W *)cleanups, cleanupcnt);
		2046	#endif
		2047
1941	#if EV_ASYNC_ENABLE	2048	#if EV_ASYNC_ENABLE
1942	assert (asyncmax >= asynccnt);	2049	assert (asyncmax >= asynccnt);
1943	array_verify (EV_A_ (W *)asyncs, asynccnt);	2050	array_verify (EV_A_ (W *)asyncs, asynccnt);
1944	#endif	2051	#endif
1945		2052
…		…
1963	}	2070	}
1964	#endif	2071	#endif
1965		2072
1966	#if EV_MULTIPLICITY	2073	#if EV_MULTIPLICITY
1967	struct ev_loop *	2074	struct ev_loop *
1968	ev_default_loop_init (unsigned int flags)
1969	#else	2075	#else
1970	int	2076	int
		2077	#endif
1971	ev_default_loop (unsigned int flags)	2078	ev_default_loop (unsigned int flags)
1972	#endif
1973	{	2079	{
1974	if (!ev_default_loop_ptr)	2080	if (!ev_default_loop_ptr)
1975	{	2081	{
1976	#if EV_MULTIPLICITY	2082	#if EV_MULTIPLICITY
1977	EV_P = ev_default_loop_ptr = &default_loop_struct;	2083	EV_P = ev_default_loop_ptr = &default_loop_struct;
…		…
1996		2102
1997	return ev_default_loop_ptr;	2103	return ev_default_loop_ptr;
1998	}	2104	}
1999		2105
2000	void	2106	void
2001	ev_default_destroy (void)	2107	ev_loop_fork (EV_P)
2002	{	2108	{
2003	#if EV_MULTIPLICITY
2004	EV_P = ev_default_loop_ptr;
2005	#endif
2006
2007	ev_default_loop_ptr = 0;
2008
2009	#if EV_CHILD_ENABLE
2010	ev_ref (EV_A); /* child watcher */
2011	ev_signal_stop (EV_A_ &childev);
2012	#endif
2013
2014	loop_destroy (EV_A);
2015	}
2016
2017	void
2018	ev_default_fork (void)
2019	{
2020	#if EV_MULTIPLICITY
2021	EV_P = ev_default_loop_ptr;
2022	#endif
2023
2024	postfork = 1; /* must be in line with ev_loop_fork */	2109	postfork = 1; /* must be in line with ev_default_fork */
2025	}	2110	}
2026		2111
2027	/*****************************************************************************/	2112	/*****************************************************************************/
2028		2113
2029	void	2114	void
…		…
2051		2136
2052	for (pri = NUMPRI; pri--; )	2137	for (pri = NUMPRI; pri--; )
2053	while (pendingcnt [pri])	2138	while (pendingcnt [pri])
2054	{	2139	{
2055	ANPENDING *p = pendings [pri] + --pendingcnt [pri];	2140	ANPENDING *p = pendings [pri] + --pendingcnt [pri];
2056
2057	/assert (("libev: non-pending watcher on pending list", p->w->pending));/
2058	/* ^ this is no longer true, as pending_w could be here */
2059		2141
2060	p->w->pending = 0;	2142	p->w->pending = 0;
2061	EV_CB_INVOKE (p->w, p->events);	2143	EV_CB_INVOKE (p->w, p->events);
2062	EV_FREQUENT_CHECK;	2144	EV_FREQUENT_CHECK;
2063	}	2145	}
…		…
2125	feed_reverse_done (EV_A_ EV_TIMER);	2207	feed_reverse_done (EV_A_ EV_TIMER);
2126	}	2208	}
2127	}	2209	}
2128		2210
2129	#if EV_PERIODIC_ENABLE	2211	#if EV_PERIODIC_ENABLE
		2212
		2213	inline_speed void
		2214	periodic_recalc (EV_P_ ev_periodic *w)
		2215	{
		2216	/* TODO: use slow but potentially more correct incremental algo, */
		2217	/* also do not rely on ceil */
		2218	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;
		2219	}
		2220
2130	/* make periodics pending */	2221	/* make periodics pending */
2131	inline_size void	2222	inline_size void
2132	periodics_reify (EV_P)	2223	periodics_reify (EV_P)
2133	{	2224	{
2134	EV_FREQUENT_CHECK;	2225	EV_FREQUENT_CHECK;
…		…
2153	ANHE_at_cache (periodics [HEAP0]);	2244	ANHE_at_cache (periodics [HEAP0]);
2154	downheap (periodics, periodiccnt, HEAP0);	2245	downheap (periodics, periodiccnt, HEAP0);
2155	}	2246	}
2156	else if (w->interval)	2247	else if (w->interval)
2157	{	2248	{
2158	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;	2249	periodic_recalc (EV_A_ w);
		2250
2159	/* if next trigger time is not sufficiently in the future, put it there */	2251	/* if next trigger time is not sufficiently in the future, put it there */
2160	/* this might happen because of floating point inexactness */	2252	/* this might happen because of floating point inexactness */
2161	if (ev_at (w) - ev_rt_now < TIME_EPSILON)	2253	if (ev_at (w) - ev_rt_now < TIME_EPSILON)
2162	{	2254	{
2163	ev_at (w) += w->interval;	2255	ev_at (w) += w->interval;
…		…
2197	ev_periodic w = (ev_periodic )ANHE_w (periodics [i]);	2289	ev_periodic w = (ev_periodic )ANHE_w (periodics [i]);
2198		2290
2199	if (w->reschedule_cb)	2291	if (w->reschedule_cb)
2200	ev_at (w) = w->reschedule_cb (w, ev_rt_now);	2292	ev_at (w) = w->reschedule_cb (w, ev_rt_now);
2201	else if (w->interval)	2293	else if (w->interval)
2202	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;	2294	periodic_recalc (EV_A_ w);
2203		2295
2204	ANHE_at_cache (periodics [i]);	2296	ANHE_at_cache (periodics [i]);
2205	}	2297	}
2206		2298
2207	reheap (periodics, periodiccnt);	2299	reheap (periodics, periodiccnt);
…		…
2289	mn_now = ev_rt_now;	2381	mn_now = ev_rt_now;
2290	}	2382	}
2291	}	2383	}
2292		2384
2293	void	2385	void
2294	ev_loop (EV_P_ int flags)	2386	ev_run (EV_P_ int flags)
2295	{	2387	{
2296	#if EV_FEATURE_API	2388	#if EV_FEATURE_API
2297	++loop_depth;	2389	++loop_depth;
2298	#endif	2390	#endif
2299		2391
2300	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2392	assert (("libev: ev_loop recursion during release detected", loop_done != EVBREAK_RECURSE));
2301		2393
2302	loop_done = EVUNLOOP_CANCEL;	2394	loop_done = EVBREAK_CANCEL;
2303		2395
2304	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2396	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2305		2397
2306	do	2398	do
2307	{	2399	{
…		…
2350	/* calculate blocking time */	2442	/* calculate blocking time */
2351	{	2443	{
2352	ev_tstamp waittime = 0.;	2444	ev_tstamp waittime = 0.;
2353	ev_tstamp sleeptime = 0.;	2445	ev_tstamp sleeptime = 0.;
2354		2446
		2447	/* remember old timestamp for io_blocktime calculation */
		2448	ev_tstamp prev_mn_now = mn_now;
		2449
		2450	/* update time to cancel out callback processing overhead */
		2451	time_update (EV_A_ 1e100);
		2452
2355	if (expect_true (!(flags & EVLOOP_NONBLOCK \|\| idleall \|\| !activecnt)))	2453	if (expect_true (!(flags & EVRUN_NOWAIT \|\| idleall \|\| !activecnt)))
2356	{	2454	{
2357	/* remember old timestamp for io_blocktime calculation */
2358	ev_tstamp prev_mn_now = mn_now;
2359
2360	/* update time to cancel out callback processing overhead */
2361	time_update (EV_A_ 1e100);
2362
2363	waittime = MAX_BLOCKTIME;	2455	waittime = MAX_BLOCKTIME;
2364		2456
2365	if (timercnt)	2457	if (timercnt)
2366	{	2458	{
2367	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;	2459	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;
…		…
2397	}	2489	}
2398		2490
2399	#if EV_FEATURE_API	2491	#if EV_FEATURE_API
2400	++loop_count;	2492	++loop_count;
2401	#endif	2493	#endif
2402	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2494	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */
2403	backend_poll (EV_A_ waittime);	2495	backend_poll (EV_A_ waittime);
2404	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2496	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
2405		2497
2406	/* update ev_rt_now, do magic */	2498	/* update ev_rt_now, do magic */
2407	time_update (EV_A_ waittime + sleeptime);	2499	time_update (EV_A_ waittime + sleeptime);
2408	}	2500	}
2409		2501
…		…
2427	EV_INVOKE_PENDING;	2519	EV_INVOKE_PENDING;
2428	}	2520	}
2429	while (expect_true (	2521	while (expect_true (
2430	activecnt	2522	activecnt
2431	&& !loop_done	2523	&& !loop_done
2432	&& !(flags & (EVLOOP_ONESHOT \| EVLOOP_NONBLOCK))	2524	&& !(flags & (EVRUN_ONCE \| EVRUN_NOWAIT))
2433	));	2525	));
2434		2526
2435	if (loop_done == EVUNLOOP_ONE)	2527	if (loop_done == EVBREAK_ONE)
2436	loop_done = EVUNLOOP_CANCEL;	2528	loop_done = EVBREAK_CANCEL;
2437		2529
2438	#if EV_FEATURE_API	2530	#if EV_FEATURE_API
2439	--loop_depth;	2531	--loop_depth;
2440	#endif	2532	#endif
2441	}	2533	}
2442		2534
2443	void	2535	void
2444	ev_unloop (EV_P_ int how)	2536	ev_break (EV_P_ int how)
2445	{	2537	{
2446	loop_done = how;	2538	loop_done = how;
2447	}	2539	}
2448		2540
2449	void	2541	void
…		…
2597	EV_FREQUENT_CHECK;	2689	EV_FREQUENT_CHECK;
2598		2690
2599	wlist_del (&anfds[w->fd].head, (WL)w);	2691	wlist_del (&anfds[w->fd].head, (WL)w);
2600	ev_stop (EV_A_ (W)w);	2692	ev_stop (EV_A_ (W)w);
2601		2693
2602	fd_change (EV_A_ w->fd, 1);	2694	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2603		2695
2604	EV_FREQUENT_CHECK;	2696	EV_FREQUENT_CHECK;
2605	}	2697	}
2606		2698
2607	void noinline	2699	void noinline
…		…
2699	if (w->reschedule_cb)	2791	if (w->reschedule_cb)
2700	ev_at (w) = w->reschedule_cb (w, ev_rt_now);	2792	ev_at (w) = w->reschedule_cb (w, ev_rt_now);
2701	else if (w->interval)	2793	else if (w->interval)
2702	{	2794	{
2703	assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.));	2795	assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.));
2704	/* this formula differs from the one in periodic_reify because we do not always round up */	2796	periodic_recalc (EV_A_ w);
2705	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;
2706	}	2797	}
2707	else	2798	else
2708	ev_at (w) = w->offset;	2799	ev_at (w) = w->offset;
2709		2800
2710	EV_FREQUENT_CHECK;	2801	EV_FREQUENT_CHECK;
…		…
2831	sa.sa_handler = ev_sighandler;	2922	sa.sa_handler = ev_sighandler;
2832	sigfillset (&sa.sa_mask);	2923	sigfillset (&sa.sa_mask);
2833	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */	2924	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */
2834	sigaction (w->signum, &sa, 0);	2925	sigaction (w->signum, &sa, 0);
2835		2926
		2927	if (origflags & EVFLAG_NOSIGMASK)
		2928	{
2836	sigemptyset (&sa.sa_mask);	2929	sigemptyset (&sa.sa_mask);
2837	sigaddset (&sa.sa_mask, w->signum);	2930	sigaddset (&sa.sa_mask, w->signum);
2838	sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0);	2931	sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0);
		2932	}
2839	#endif	2933	#endif
2840	}	2934	}
2841		2935
2842	EV_FREQUENT_CHECK;	2936	EV_FREQUENT_CHECK;
2843	}	2937	}
…		…
2984	if (!pend \|\| pend == path)	3078	if (!pend \|\| pend == path)
2985	break;	3079	break;
2986		3080
2987	*pend = 0;	3081	*pend = 0;
2988	w->wd = inotify_add_watch (fs_fd, path, mask);	3082	w->wd = inotify_add_watch (fs_fd, path, mask);
2989	}	3083	}
2990	while (w->wd < 0 && (errno == ENOENT \|\| errno == EACCES));	3084	while (w->wd < 0 && (errno == ENOENT \|\| errno == EACCES));
2991	}	3085	}
2992	}	3086	}
2993		3087
2994	if (w->wd >= 0)	3088	if (w->wd >= 0)
…		…
3059	{	3153	{
3060	struct inotify_event ev = (struct inotify_event )(buf + ofs);	3154	struct inotify_event ev = (struct inotify_event )(buf + ofs);
3061	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3155	infy_wd (EV_A_ ev->wd, ev->wd, ev);
3062	ofs += sizeof (struct inotify_event) + ev->len;	3156	ofs += sizeof (struct inotify_event) + ev->len;
3063	}	3157	}
3064	}
3065
3066	inline_size unsigned int
3067	ev_linux_version (void)
3068	{
3069	struct utsname buf;
3070	unsigned int v;
3071	int i;
3072	char *p = buf.release;
3073
3074	if (uname (&buf))
3075	return 0;
3076
3077	for (i = 3+1; --i; )
3078	{
3079	unsigned int c = 0;
3080
3081	for (;;)
3082	{
3083	if (p >= '0' && p <= '9')
3084	c = c * 10 + *p++ - '0';
3085	else
3086	{
3087	p += *p == '.';
3088	break;
3089	}
3090	}
3091
3092	v = (v << 8) \| c;
3093	}
3094
3095	return v;
3096	}	3158	}
3097		3159
3098	inline_size void	3160	inline_size void
3099	ev_check_2625 (EV_P)	3161	ev_check_2625 (EV_P)
3100	{	3162	{
…		…
3424		3486
3425	#if EV_EMBED_ENABLE	3487	#if EV_EMBED_ENABLE
3426	void noinline	3488	void noinline
3427	ev_embed_sweep (EV_P_ ev_embed *w)	3489	ev_embed_sweep (EV_P_ ev_embed *w)
3428	{	3490	{
3429	ev_loop (w->other, EVLOOP_NONBLOCK);	3491	ev_run (w->other, EVRUN_NOWAIT);
3430	}	3492	}
3431		3493
3432	static void	3494	static void
3433	embed_io_cb (EV_P_ ev_io *io, int revents)	3495	embed_io_cb (EV_P_ ev_io *io, int revents)
3434	{	3496	{
3435	ev_embed w = (ev_embed )(((char *)io) - offsetof (ev_embed, io));	3497	ev_embed w = (ev_embed )(((char *)io) - offsetof (ev_embed, io));
3436		3498
3437	if (ev_cb (w))	3499	if (ev_cb (w))
3438	ev_feed_event (EV_A_ (W)w, EV_EMBED);	3500	ev_feed_event (EV_A_ (W)w, EV_EMBED);
3439	else	3501	else
3440	ev_loop (w->other, EVLOOP_NONBLOCK);	3502	ev_run (w->other, EVRUN_NOWAIT);
3441	}	3503	}
3442		3504
3443	static void	3505	static void
3444	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)	3506	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)
3445	{	3507	{
…		…
3449	EV_P = w->other;	3511	EV_P = w->other;
3450		3512
3451	while (fdchangecnt)	3513	while (fdchangecnt)
3452	{	3514	{
3453	fd_reify (EV_A);	3515	fd_reify (EV_A);
3454	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3516	ev_run (EV_A_ EVRUN_NOWAIT);
3455	}	3517	}
3456	}	3518	}
3457	}	3519	}
3458		3520
3459	static void	3521	static void
…		…
3465		3527
3466	{	3528	{
3467	EV_P = w->other;	3529	EV_P = w->other;
3468		3530
3469	ev_loop_fork (EV_A);	3531	ev_loop_fork (EV_A);
3470	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3532	ev_run (EV_A_ EVRUN_NOWAIT);
3471	}	3533	}
3472		3534
3473	ev_embed_start (EV_A_ w);	3535	ev_embed_start (EV_A_ w);
3474	}	3536	}
3475		3537
…		…
3567		3629
3568	EV_FREQUENT_CHECK;	3630	EV_FREQUENT_CHECK;
3569	}	3631	}
3570	#endif	3632	#endif
3571		3633
3572	#if EV_ASYNC_ENABLE	3634	#if EV_CLEANUP_ENABLE
3573	void	3635	void
3574	ev_async_start (EV_P_ ev_async *w)	3636	ev_cleanup_start (EV_P_ ev_cleanup *w)
3575	{	3637	{
3576	if (expect_false (ev_is_active (w)))	3638	if (expect_false (ev_is_active (w)))
3577	return;	3639	return;
		3640
		3641	EV_FREQUENT_CHECK;
		3642
		3643	ev_start (EV_A_ (W)w, ++cleanupcnt);
		3644	array_needsize (ev_cleanup *, cleanups, cleanupmax, cleanupcnt, EMPTY2);
		3645	cleanups [cleanupcnt - 1] = w;
		3646
		3647	/* cleanup watchers should never keep a refcount on the loop */
		3648	ev_unref (EV_A);
		3649	EV_FREQUENT_CHECK;
		3650	}
		3651
		3652	void
		3653	ev_cleanup_stop (EV_P_ ev_cleanup *w)
		3654	{
		3655	clear_pending (EV_A_ (W)w);
		3656	if (expect_false (!ev_is_active (w)))
		3657	return;
		3658
		3659	EV_FREQUENT_CHECK;
		3660	ev_ref (EV_A);
		3661
		3662	{
		3663	int active = ev_active (w);
		3664
		3665	cleanups [active - 1] = cleanups [--cleanupcnt];
		3666	ev_active (cleanups [active - 1]) = active;
		3667	}
		3668
		3669	ev_stop (EV_A_ (W)w);
		3670
		3671	EV_FREQUENT_CHECK;
		3672	}
		3673	#endif
		3674
		3675	#if EV_ASYNC_ENABLE
		3676	void
		3677	ev_async_start (EV_P_ ev_async *w)
		3678	{
		3679	if (expect_false (ev_is_active (w)))
		3680	return;
		3681
		3682	w->sent = 0;
3578		3683
3579	evpipe_init (EV_A);	3684	evpipe_init (EV_A);
3580		3685
3581	EV_FREQUENT_CHECK;	3686	EV_FREQUENT_CHECK;
3582		3687
…		…
3802		3907
3803	#if EV_MULTIPLICITY	3908	#if EV_MULTIPLICITY
3804	#include "ev_wrap.h"	3909	#include "ev_wrap.h"
3805	#endif	3910	#endif
3806		3911
3807	#ifdef __cplusplus	3912	EV_CPP(})
3808	}
3809	#endif
3810		3913

Diff Legend

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

Comparing libev/ev.c (file contents): Revision 1.349 by sf-exg, Fri Oct 15 22:59:59 2010 UTC vs. Revision 1.372 by root, Wed Feb 16 08:02:50 2011 UTC

Diff Legend

Comparing libev/ev.c (file contents):
Revision 1.349 by sf-exg, Fri Oct 15 22:59:59 2010 UTC vs.
Revision 1.372 by root, Wed Feb 16 08:02:50 2011 UTC