ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.320 by root, Fri Dec 4 20:25:06 2009 UTC vs.
Revision 1.355 by root, Fri Oct 22 10:09:12 2010 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 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	*
…		…
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		39
40	#ifdef __cplusplus
41	extern "C" {
42	#endif
43
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
48	# else	44	# else
…		…
77	# ifndef EV_USE_REALTIME	73	# ifndef EV_USE_REALTIME
78	# define EV_USE_REALTIME 0	74	# define EV_USE_REALTIME 0
79	# endif	75	# endif
80	# endif	76	# endif
81		77
		78	# if HAVE_NANOSLEEP
82	# ifndef EV_USE_NANOSLEEP	79	# ifndef EV_USE_NANOSLEEP
83	# if HAVE_NANOSLEEP
84	# define EV_USE_NANOSLEEP 1	80	# define EV_USE_NANOSLEEP EV_FEATURE_OS
		81	# endif
85	# else	82	# else
		83	# undef EV_USE_NANOSLEEP
86	# define EV_USE_NANOSLEEP 0	84	# define EV_USE_NANOSLEEP 0
		85	# endif
		86
		87	# if HAVE_SELECT && HAVE_SYS_SELECT_H
		88	# ifndef EV_USE_SELECT
		89	# define EV_USE_SELECT EV_FEATURE_BACKENDS
87	# endif	90	# endif
		91	# else
		92	# undef EV_USE_SELECT
		93	# define EV_USE_SELECT 0
88	# endif	94	# endif
89		95
		96	# if HAVE_POLL && HAVE_POLL_H
90	# ifndef EV_USE_SELECT	97	# ifndef EV_USE_POLL
91	# if HAVE_SELECT && HAVE_SYS_SELECT_H	98	# define EV_USE_POLL EV_FEATURE_BACKENDS
92	# define EV_USE_SELECT 1
93	# else
94	# define EV_USE_SELECT 0
95	# endif	99	# endif
96	# endif
97
98	# ifndef EV_USE_POLL
99	# if HAVE_POLL && HAVE_POLL_H
100	# define EV_USE_POLL 1
101	# else	100	# else
		101	# undef EV_USE_POLL
102	# define EV_USE_POLL 0	102	# define EV_USE_POLL 0
103	# endif
104	# endif	103	# endif
105		104
106	# ifndef EV_USE_EPOLL
107	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H	105	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H
108	# define EV_USE_EPOLL 1	106	# ifndef EV_USE_EPOLL
109	# else	107	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
110	# define EV_USE_EPOLL 0
111	# endif	108	# endif
		109	# else
		110	# undef EV_USE_EPOLL
		111	# define EV_USE_EPOLL 0
112	# endif	112	# endif
113		113
		114	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H
114	# ifndef EV_USE_KQUEUE	115	# ifndef EV_USE_KQUEUE
115	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H && HAVE_SYS_QUEUE_H	116	# define EV_USE_KQUEUE EV_FEATURE_BACKENDS
116	# define EV_USE_KQUEUE 1
117	# else
118	# define EV_USE_KQUEUE 0
119	# endif	117	# endif
		118	# else
		119	# undef EV_USE_KQUEUE
		120	# define EV_USE_KQUEUE 0
120	# endif	121	# endif
121		122
122	# ifndef EV_USE_PORT
123	# if HAVE_PORT_H && HAVE_PORT_CREATE	123	# if HAVE_PORT_H && HAVE_PORT_CREATE
124	# define EV_USE_PORT 1	124	# ifndef EV_USE_PORT
125	# else	125	# define EV_USE_PORT EV_FEATURE_BACKENDS
126	# define EV_USE_PORT 0
127	# endif	126	# endif
		127	# else
		128	# undef EV_USE_PORT
		129	# define EV_USE_PORT 0
128	# endif	130	# endif
129		131
130	# ifndef EV_USE_INOTIFY
131	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H	132	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H
132	# define EV_USE_INOTIFY 1	133	# ifndef EV_USE_INOTIFY
133	# else
134	# define EV_USE_INOTIFY 0	134	# define EV_USE_INOTIFY EV_FEATURE_OS
135	# endif	135	# endif
		136	# else
		137	# undef EV_USE_INOTIFY
		138	# define EV_USE_INOTIFY 0
136	# endif	139	# endif
137		140
138	# ifndef EV_USE_SIGNALFD
139	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H	141	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H
140	# define EV_USE_SIGNALFD 1	142	# ifndef EV_USE_SIGNALFD
141	# else
142	# define EV_USE_SIGNALFD 0	143	# define EV_USE_SIGNALFD EV_FEATURE_OS
143	# endif	144	# endif
		145	# else
		146	# undef EV_USE_SIGNALFD
		147	# define EV_USE_SIGNALFD 0
144	# endif	148	# endif
145		149
		150	# if HAVE_EVENTFD
146	# ifndef EV_USE_EVENTFD	151	# ifndef EV_USE_EVENTFD
147	# if HAVE_EVENTFD
148	# define EV_USE_EVENTFD 1	152	# define EV_USE_EVENTFD EV_FEATURE_OS
149	# else
150	# define EV_USE_EVENTFD 0
151	# endif	153	# endif
		154	# else
		155	# undef EV_USE_EVENTFD
		156	# define EV_USE_EVENTFD 0
152	# endif	157	# endif
153		158
154	#endif	159	#endif
155		160
156	#include <math.h>	161	#include <math.h>
…		…
163		168
164	#include <assert.h>	169	#include <assert.h>
165	#include <errno.h>	170	#include <errno.h>
166	#include <sys/types.h>	171	#include <sys/types.h>
167	#include <time.h>	172	#include <time.h>
		173	#include <limits.h>
168		174
169	#include <signal.h>	175	#include <signal.h>
170		176
171	#ifdef EV_H	177	#ifdef EV_H
172	# include EV_H	178	# include EV_H
173	#else	179	#else
174	# include "ev.h"	180	# include "ev.h"
175	#endif	181	#endif
		182
		183	EV_CPP(extern "C" {)
176		184
177	#ifndef _WIN32	185	#ifndef _WIN32
178	# include <sys/time.h>	186	# include <sys/time.h>
179	# include <sys/wait.h>	187	# include <sys/wait.h>
180	# include <unistd.h>	188	# include <unistd.h>
…		…
183	# define WIN32_LEAN_AND_MEAN	191	# define WIN32_LEAN_AND_MEAN
184	# include <windows.h>	192	# include <windows.h>
185	# ifndef EV_SELECT_IS_WINSOCKET	193	# ifndef EV_SELECT_IS_WINSOCKET
186	# define EV_SELECT_IS_WINSOCKET 1	194	# define EV_SELECT_IS_WINSOCKET 1
187	# endif	195	# endif
		196	# undef EV_AVOID_STDIO
188	#endif	197	#endif
		198
		199	/* OS X, in its infinite idiocy, actually HARDCODES
		200	* a limit of 1024 into their select. Where people have brains,
		201	* OS X engineers apparently have a vacuum. Or maybe they were
		202	* ordered to have a vacuum, or they do anything for money.
		203	* This might help. Or not.
		204	*/
		205	#define _DARWIN_UNLIMITED_SELECT 1
189		206
190	/* this block tries to deduce configuration from header-defined symbols and defaults */	207	/* this block tries to deduce configuration from header-defined symbols and defaults */
191		208
192	/* try to deduce the maximum number of signals on this platform */	209	/* try to deduce the maximum number of signals on this platform */
193	#if defined (EV_NSIG)	210	#if defined (EV_NSIG)
…		…
205	#elif defined (MAXSIG)	222	#elif defined (MAXSIG)
206	# define EV_NSIG (MAXSIG+1)	223	# define EV_NSIG (MAXSIG+1)
207	#elif defined (MAX_SIG)	224	#elif defined (MAX_SIG)
208	# define EV_NSIG (MAX_SIG+1)	225	# define EV_NSIG (MAX_SIG+1)
209	#elif defined (SIGARRAYSIZE)	226	#elif defined (SIGARRAYSIZE)
210	# define EV_NSIG SIGARRAYSIZE /* Assume ary[SIGARRAYSIZE] */	227	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
211	#elif defined (_sys_nsig)	228	#elif defined (_sys_nsig)
212	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	229	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
213	#else	230	#else
214	# error "unable to find value for NSIG, please report"	231	# error "unable to find value for NSIG, please report"
215	/* to make it compile regardless, just remove the above line */	232	/* to make it compile regardless, just remove the above line, */
		233	/* but consider reporting it, too! :) */
216	# define EV_NSIG 65	234	# define EV_NSIG 65
217	#endif	235	#endif
218		236
219	#ifndef EV_USE_CLOCK_SYSCALL	237	#ifndef EV_USE_CLOCK_SYSCALL
220	# if __linux && __GLIBC__ >= 2	238	# if __linux && __GLIBC__ >= 2
221	# define EV_USE_CLOCK_SYSCALL 1	239	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
222	# else	240	# else
223	# define EV_USE_CLOCK_SYSCALL 0	241	# define EV_USE_CLOCK_SYSCALL 0
224	# endif	242	# endif
225	#endif	243	#endif
226		244
227	#ifndef EV_USE_MONOTONIC	245	#ifndef EV_USE_MONOTONIC
228	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	246	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0
229	# define EV_USE_MONOTONIC 1	247	# define EV_USE_MONOTONIC EV_FEATURE_OS
230	# else	248	# else
231	# define EV_USE_MONOTONIC 0	249	# define EV_USE_MONOTONIC 0
232	# endif	250	# endif
233	#endif	251	#endif
234		252
…		…
236	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL	254	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL
237	#endif	255	#endif
238		256
239	#ifndef EV_USE_NANOSLEEP	257	#ifndef EV_USE_NANOSLEEP
240	# if _POSIX_C_SOURCE >= 199309L	258	# if _POSIX_C_SOURCE >= 199309L
241	# define EV_USE_NANOSLEEP 1	259	# define EV_USE_NANOSLEEP EV_FEATURE_OS
242	# else	260	# else
243	# define EV_USE_NANOSLEEP 0	261	# define EV_USE_NANOSLEEP 0
244	# endif	262	# endif
245	#endif	263	#endif
246		264
247	#ifndef EV_USE_SELECT	265	#ifndef EV_USE_SELECT
248	# define EV_USE_SELECT 1	266	# define EV_USE_SELECT EV_FEATURE_BACKENDS
249	#endif	267	#endif
250		268
251	#ifndef EV_USE_POLL	269	#ifndef EV_USE_POLL
252	# ifdef _WIN32	270	# ifdef _WIN32
253	# define EV_USE_POLL 0	271	# define EV_USE_POLL 0
254	# else	272	# else
255	# define EV_USE_POLL 1	273	# define EV_USE_POLL EV_FEATURE_BACKENDS
256	# endif	274	# endif
257	#endif	275	#endif
258		276
259	#ifndef EV_USE_EPOLL	277	#ifndef EV_USE_EPOLL
260	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	278	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
261	# define EV_USE_EPOLL 1	279	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
262	# else	280	# else
263	# define EV_USE_EPOLL 0	281	# define EV_USE_EPOLL 0
264	# endif	282	# endif
265	#endif	283	#endif
266		284
…		…
272	# define EV_USE_PORT 0	290	# define EV_USE_PORT 0
273	#endif	291	#endif
274		292
275	#ifndef EV_USE_INOTIFY	293	#ifndef EV_USE_INOTIFY
276	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	294	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
277	# define EV_USE_INOTIFY 1	295	# define EV_USE_INOTIFY EV_FEATURE_OS
278	# else	296	# else
279	# define EV_USE_INOTIFY 0	297	# define EV_USE_INOTIFY 0
280	# endif	298	# endif
281	#endif	299	#endif
282		300
283	#ifndef EV_PID_HASHSIZE	301	#ifndef EV_PID_HASHSIZE
284	# if EV_MINIMAL	302	# define EV_PID_HASHSIZE EV_FEATURE_DATA ? 16 : 1
285	# define EV_PID_HASHSIZE 1
286	# else
287	# define EV_PID_HASHSIZE 16
288	# endif
289	#endif	303	#endif
290		304
291	#ifndef EV_INOTIFY_HASHSIZE	305	#ifndef EV_INOTIFY_HASHSIZE
292	# if EV_MINIMAL	306	# define EV_INOTIFY_HASHSIZE EV_FEATURE_DATA ? 16 : 1
293	# define EV_INOTIFY_HASHSIZE 1
294	# else
295	# define EV_INOTIFY_HASHSIZE 16
296	# endif
297	#endif	307	#endif
298		308
299	#ifndef EV_USE_EVENTFD	309	#ifndef EV_USE_EVENTFD
300	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	310	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
301	# define EV_USE_EVENTFD 1	311	# define EV_USE_EVENTFD EV_FEATURE_OS
302	# else	312	# else
303	# define EV_USE_EVENTFD 0	313	# define EV_USE_EVENTFD 0
304	# endif	314	# endif
305	#endif	315	#endif
306		316
307	#ifndef EV_USE_SIGNALFD	317	#ifndef EV_USE_SIGNALFD
308	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	318	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
309	# define EV_USE_SIGNALFD 1	319	# define EV_USE_SIGNALFD EV_FEATURE_OS
310	# else	320	# else
311	# define EV_USE_SIGNALFD 0	321	# define EV_USE_SIGNALFD 0
312	# endif	322	# endif
313	#endif	323	#endif
314		324
…		…
317	# define EV_USE_4HEAP 1	327	# define EV_USE_4HEAP 1
318	# define EV_HEAP_CACHE_AT 1	328	# define EV_HEAP_CACHE_AT 1
319	#endif	329	#endif
320		330
321	#ifndef EV_VERIFY	331	#ifndef EV_VERIFY
322	# define EV_VERIFY !EV_MINIMAL	332	# define EV_VERIFY (EV_FEATURE_API ? 1 : 0)
323	#endif	333	#endif
324		334
325	#ifndef EV_USE_4HEAP	335	#ifndef EV_USE_4HEAP
326	# define EV_USE_4HEAP !EV_MINIMAL	336	# define EV_USE_4HEAP EV_FEATURE_DATA
327	#endif	337	#endif
328		338
329	#ifndef EV_HEAP_CACHE_AT	339	#ifndef EV_HEAP_CACHE_AT
330	# define EV_HEAP_CACHE_AT !EV_MINIMAL	340	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
331	#endif	341	#endif
332		342
333	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */	343	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */
334	/* which makes programs even slower. might work on other unices, too. */	344	/* which makes programs even slower. might work on other unices, too. */
335	#if EV_USE_CLOCK_SYSCALL	345	#if EV_USE_CLOCK_SYSCALL
…		…
343	# define EV_USE_CLOCK_SYSCALL 0	353	# define EV_USE_CLOCK_SYSCALL 0
344	# endif	354	# endif
345	#endif	355	#endif
346		356
347	/* this block fixes any misconfiguration where we know we run into trouble otherwise */	357	/* this block fixes any misconfiguration where we know we run into trouble otherwise */
		358
		359	#ifdef _AIX
		360	/* AIX has a completely broken poll.h header */
		361	# undef EV_USE_POLL
		362	# define EV_USE_POLL 0
		363	#endif
348		364
349	#ifndef CLOCK_MONOTONIC	365	#ifndef CLOCK_MONOTONIC
350	# undef EV_USE_MONOTONIC	366	# undef EV_USE_MONOTONIC
351	# define EV_USE_MONOTONIC 0	367	# define EV_USE_MONOTONIC 0
352	#endif	368	#endif
…		…
393	# define EFD_CLOEXEC O_CLOEXEC	409	# define EFD_CLOEXEC O_CLOEXEC
394	# else	410	# else
395	# define EFD_CLOEXEC 02000000	411	# define EFD_CLOEXEC 02000000
396	# endif	412	# endif
397	# endif	413	# endif
398	# ifdef __cplusplus
399	extern "C" {
400	# endif
401	int eventfd (unsigned int initval, int flags);	414	EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags);
402	# ifdef __cplusplus
403	}
404	# endif
405	#endif	415	#endif
406		416
407	#if EV_USE_SIGNALFD	417	#if EV_USE_SIGNALFD
408	/* 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 */
409	# include <stdint.h>	419	# include <stdint.h>
…		…
415	# define SFD_CLOEXEC O_CLOEXEC	425	# define SFD_CLOEXEC O_CLOEXEC
416	# else	426	# else
417	# define SFD_CLOEXEC 02000000	427	# define SFD_CLOEXEC 02000000
418	# endif	428	# endif
419	# endif	429	# endif
420	# ifdef __cplusplus
421	extern "C" {
422	# endif
423	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);
424		431
425	struct signalfd_siginfo	432	struct signalfd_siginfo
426	{	433	{
427	uint32_t ssi_signo;	434	uint32_t ssi_signo;
428	char pad[128 - sizeof (uint32_t)];	435	char pad[128 - sizeof (uint32_t)];
429	};	436	};
430	# ifdef __cplusplus
431	}
432	# endif	437	#endif
433	#endif
434
435		438
436	/**/	439	/**/
437		440
438	#if EV_VERIFY >= 3	441	#if EV_VERIFY >= 3
439	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	442	# define EV_FREQUENT_CHECK ev_verify (EV_A)
440	#else	443	#else
441	# define EV_FREQUENT_CHECK do { } while (0)	444	# define EV_FREQUENT_CHECK do { } while (0)
442	#endif	445	#endif
443		446
444	/*	447	/*
…		…
452	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	455	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
453		456
454	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */	457	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
455	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */	458	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
456		459
		460	#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0)
		461	#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0)
		462
457	#if __GNUC__ >= 4	463	#if __GNUC__ >= 4
458	# define expect(expr,value) __builtin_expect ((expr),(value))	464	# define expect(expr,value) __builtin_expect ((expr),(value))
459	# define noinline __attribute__ ((noinline))	465	# define noinline __attribute__ ((noinline))
460	#else	466	#else
461	# define expect(expr,value) (expr)	467	# define expect(expr,value) (expr)
…		…
467		473
468	#define expect_false(expr) expect ((expr) != 0, 0)	474	#define expect_false(expr) expect ((expr) != 0, 0)
469	#define expect_true(expr) expect ((expr) != 0, 1)	475	#define expect_true(expr) expect ((expr) != 0, 1)
470	#define inline_size static inline	476	#define inline_size static inline
471		477
472	#if EV_MINIMAL	478	#if EV_FEATURE_CODE
		479	# define inline_speed static inline
		480	#else
473	# define inline_speed static noinline	481	# define inline_speed static noinline
474	#else
475	# define inline_speed static inline
476	#endif	482	#endif
477		483
478	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	484	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
479		485
480	#if EV_MINPRI == EV_MAXPRI	486	#if EV_MINPRI == EV_MAXPRI
…		…
493	#define ev_active(w) ((W)(w))->active	499	#define ev_active(w) ((W)(w))->active
494	#define ev_at(w) ((WT)(w))->at	500	#define ev_at(w) ((WT)(w))->at
495		501
496	#if EV_USE_REALTIME	502	#if EV_USE_REALTIME
497	/* sig_atomic_t is used to avoid per-thread variables or locking but still */	503	/* sig_atomic_t is used to avoid per-thread variables or locking but still */
498	/* giving it a reasonably high chance of working on typical architetcures */	504	/* giving it a reasonably high chance of working on typical architectures */
499	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */	505	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */
500	#endif	506	#endif
501		507
502	#if EV_USE_MONOTONIC	508	#if EV_USE_MONOTONIC
503	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */	509	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */
…		…
505		511
506	#ifndef EV_FD_TO_WIN32_HANDLE	512	#ifndef EV_FD_TO_WIN32_HANDLE
507	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)	513	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
508	#endif	514	#endif
509	#ifndef EV_WIN32_HANDLE_TO_FD	515	#ifndef EV_WIN32_HANDLE_TO_FD
510	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (fd, 0)	516	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
511	#endif	517	#endif
512	#ifndef EV_WIN32_CLOSE_FD	518	#ifndef EV_WIN32_CLOSE_FD
513	# define EV_WIN32_CLOSE_FD(fd) close (fd)	519	# define EV_WIN32_CLOSE_FD(fd) close (fd)
514	#endif	520	#endif
515		521
516	#ifdef _WIN32	522	#ifdef _WIN32
517	# include "ev_win32.c"	523	# include "ev_win32.c"
518	#endif	524	#endif
519		525
520	/*****************************************************************************/	526	/*****************************************************************************/
		527
		528	static unsigned int noinline
		529	ev_linux_version (void)
		530	{
		531	#ifdef __linux
		532	struct utsname buf;
		533	unsigned int v;
		534	int i;
		535	char *p = buf.release;
		536
		537	if (uname (&buf))
		538	return 0;
		539
		540	for (i = 3+1; --i; )
		541	{
		542	unsigned int c = 0;
		543
		544	for (;;)
		545	{
		546	if (*p >= '0' && *p <= '9')
		547	c = c * 10 + *p++ - '0';
		548	else
		549	{
		550	p += *p == '.';
		551	break;
		552	}
		553	}
		554
		555	v = (v << 8) | c;
		556	}
		557
		558	return v;
		559	#else
		560	return 0;
		561	#endif
		562	}
		563
		564	/*****************************************************************************/
		565
		566	#if EV_AVOID_STDIO
		567	static void noinline
		568	ev_printerr (const char *msg)
		569	{
		570	write (STDERR_FILENO, msg, strlen (msg));
		571	}
		572	#endif
521		573
522	static void (*syserr_cb)(const char *msg);	574	static void (*syserr_cb)(const char *msg);
523		575
524	void	576	void
525	ev_set_syserr_cb (void (*cb)(const char *msg))	577	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
535		587
536	if (syserr_cb)	588	if (syserr_cb)
537	syserr_cb (msg);	589	syserr_cb (msg);
538	else	590	else
539	{	591	{
		592	#if EV_AVOID_STDIO
		593	const char *err = strerror (errno);
		594
		595	ev_printerr (msg);
		596	ev_printerr (": ");
		597	ev_printerr (err);
		598	ev_printerr ("\n");
		599	#else
540	perror (msg);	600	perror (msg);
		601	#endif
541	abort ();	602	abort ();
542	}	603	}
543	}	604	}
544		605
545	static void *	606	static void *
546	ev_realloc_emul (void *ptr, long size)	607	ev_realloc_emul (void *ptr, long size)
547	{	608	{
		609	#if __GLIBC__
		610	return realloc (ptr, size);
		611	#else
548	/* some systems, notably openbsd and darwin, fail to properly	612	/* some systems, notably openbsd and darwin, fail to properly
549	* implement realloc (x, 0) (as required by both ansi c-98 and	613	* implement realloc (x, 0) (as required by both ansi c-89 and
550	* the single unix specification, so work around them here.	614	* the single unix specification, so work around them here.
551	*/	615	*/
552		616
553	if (size)	617	if (size)
554	return realloc (ptr, size);	618	return realloc (ptr, size);
555		619
556	free (ptr);	620	free (ptr);
557	return 0;	621	return 0;
		622	#endif
558	}	623	}
559		624
560	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	625	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
561		626
562	void	627	void
…		…
570	{	635	{
571	ptr = alloc (ptr, size);	636	ptr = alloc (ptr, size);
572		637
573	if (!ptr && size)	638	if (!ptr && size)
574	{	639	{
		640	#if EV_AVOID_STDIO
		641	ev_printerr ("libev: memory allocation failed, aborting.\n");
		642	#else
575	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	643	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		644	#endif
576	abort ();	645	abort ();
577	}	646	}
578		647
579	return ptr;	648	return ptr;
580	}	649	}
…		…
662		731
663	static int ev_default_loop_ptr;	732	static int ev_default_loop_ptr;
664		733
665	#endif	734	#endif
666		735
667	#if EV_MINIMAL < 2	736	#if EV_FEATURE_API
668	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)	737	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)
669	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)	738	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)
670	# define EV_INVOKE_PENDING invoke_cb (EV_A)	739	# define EV_INVOKE_PENDING invoke_cb (EV_A)
671	#else	740	#else
672	# define EV_RELEASE_CB (void)0	741	# define EV_RELEASE_CB (void)0
673	# define EV_ACQUIRE_CB (void)0	742	# define EV_ACQUIRE_CB (void)0
674	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)	743	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)
675	#endif	744	#endif
676		745
677	#define EVUNLOOP_RECURSE 0x80	746	#define EVBREAK_RECURSE 0x80
678		747
679	/*****************************************************************************/	748	/*****************************************************************************/
680		749
681	#ifndef EV_HAVE_EV_TIME	750	#ifndef EV_HAVE_EV_TIME
682	ev_tstamp	751	ev_tstamp
…		…
726	if (delay > 0.)	795	if (delay > 0.)
727	{	796	{
728	#if EV_USE_NANOSLEEP	797	#if EV_USE_NANOSLEEP
729	struct timespec ts;	798	struct timespec ts;
730		799
731	ts.tv_sec = (time_t)delay;	800	EV_TS_SET (ts, delay);
732	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
733
734	nanosleep (&ts, 0);	801	nanosleep (&ts, 0);
735	#elif defined(_WIN32)	802	#elif defined(_WIN32)
736	Sleep ((unsigned long)(delay * 1e3));	803	Sleep ((unsigned long)(delay * 1e3));
737	#else	804	#else
738	struct timeval tv;	805	struct timeval tv;
739		806
740	tv.tv_sec = (time_t)delay;
741	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
742
743	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */	807	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
744	/* something not guaranteed by newer posix versions, but guaranteed */	808	/* something not guaranteed by newer posix versions, but guaranteed */
745	/* by older ones */	809	/* by older ones */
		810	EV_TV_SET (tv, delay);
746	select (0, 0, 0, 0, &tv);	811	select (0, 0, 0, 0, &tv);
747	#endif	812	#endif
748	}	813	}
749	}	814	}
750		815
751	/*****************************************************************************/	816	/*****************************************************************************/
752		817
753	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */	818	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */
754		819
755	/* find a suitable new size for the given array, */	820	/* find a suitable new size for the given array, */
756	/* hopefully by rounding to a ncie-to-malloc size */	821	/* hopefully by rounding to a nice-to-malloc size */
757	inline_size int	822	inline_size int
758	array_nextsize (int elem, int cur, int cnt)	823	array_nextsize (int elem, int cur, int cnt)
759	{	824	{
760	int ncur = cur + 1;	825	int ncur = cur + 1;
761		826
…		…
857	}	922	}
858		923
859	/*****************************************************************************/	924	/*****************************************************************************/
860		925
861	inline_speed void	926	inline_speed void
862	fd_event_nc (EV_P_ int fd, int revents)	927	fd_event_nocheck (EV_P_ int fd, int revents)
863	{	928	{
864	ANFD *anfd = anfds + fd;	929	ANFD *anfd = anfds + fd;
865	ev_io *w;	930	ev_io *w;
866		931
867	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	932	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
…		…
879	fd_event (EV_P_ int fd, int revents)	944	fd_event (EV_P_ int fd, int revents)
880	{	945	{
881	ANFD *anfd = anfds + fd;	946	ANFD *anfd = anfds + fd;
882		947
883	if (expect_true (!anfd->reify))	948	if (expect_true (!anfd->reify))
884	fd_event_nc (EV_A_ fd, revents);	949	fd_event_nocheck (EV_A_ fd, revents);
885	}	950	}
886		951
887	void	952	void
888	ev_feed_fd_event (EV_P_ int fd, int revents)	953	ev_feed_fd_event (EV_P_ int fd, int revents)
889	{	954	{
890	if (fd >= 0 && fd < anfdmax)	955	if (fd >= 0 && fd < anfdmax)
891	fd_event_nc (EV_A_ fd, revents);	956	fd_event_nocheck (EV_A_ fd, revents);
892	}	957	}
893		958
894	/* make sure the external fd watch events are in-sync */	959	/* make sure the external fd watch events are in-sync */
895	/* with the kernel/libev internal state */	960	/* with the kernel/libev internal state */
896	inline_size void	961	inline_size void
…		…
902	{	967	{
903	int fd = fdchanges [i];	968	int fd = fdchanges [i];
904	ANFD *anfd = anfds + fd;	969	ANFD *anfd = anfds + fd;
905	ev_io *w;	970	ev_io *w;
906		971
907	unsigned char events = 0;	972	unsigned char o_events = anfd->events;
		973	unsigned char o_reify = anfd->reify;
908		974
909	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	975	anfd->reify = 0;
910	events |= (unsigned char)w->events;
911		976
912	#if EV_SELECT_IS_WINSOCKET	977	#if EV_SELECT_IS_WINSOCKET
913	if (events)	978	if (o_reify & EV__IOFDSET)
914	{	979	{
915	unsigned long arg;	980	unsigned long arg;
916	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	981	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);
917	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	982	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));
918	}	983	}
919	#endif	984	#endif
920		985
		986	/*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */
921	{	987	{
922	unsigned char o_events = anfd->events;
923	unsigned char o_reify = anfd->reify;
924
925	anfd->reify = 0;
926	anfd->events = events;	988	anfd->events = 0;
927		989
928	if (o_events != events || o_reify & EV__IOFDSET)	990	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
		991	anfd->events |= (unsigned char)w->events;
		992
		993	if (o_events != anfd->events)
		994	o_reify = EV__IOFDSET; /* actually |= */
		995	}
		996
		997	if (o_reify & EV__IOFDSET)
929	backend_modify (EV_A_ fd, o_events, events);	998	backend_modify (EV_A_ fd, o_events, anfd->events);
930	}
931	}	999	}
932		1000
933	fdchangecnt = 0;	1001	fdchangecnt = 0;
934	}	1002	}
935		1003
…		…
959	ev_io_stop (EV_A_ w);	1027	ev_io_stop (EV_A_ w);
960	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);	1028	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
961	}	1029	}
962	}	1030	}
963		1031
964	/* check whether the given fd is atcually valid, for error recovery */	1032	/* check whether the given fd is actually valid, for error recovery */
965	inline_size int	1033	inline_size int
966	fd_valid (int fd)	1034	fd_valid (int fd)
967	{	1035	{
968	#ifdef _WIN32	1036	#ifdef _WIN32
969	return _get_osfhandle (fd) != -1;	1037	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
970	#else	1038	#else
971	return fcntl (fd, F_GETFD) != -1;	1039	return fcntl (fd, F_GETFD) != -1;
972	#endif	1040	#endif
973	}	1041	}
974		1042
…		…
1011	anfds [fd].emask = 0;	1079	anfds [fd].emask = 0;
1012	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1080	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
1013	}	1081	}
1014	}	1082	}
1015		1083
		1084	/* used to prepare libev internal fd's */
		1085	/* this is not fork-safe */
		1086	inline_speed void
		1087	fd_intern (int fd)
		1088	{
		1089	#ifdef _WIN32
		1090	unsigned long arg = 1;
		1091	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1092	#else
		1093	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1094	fcntl (fd, F_SETFL, O_NONBLOCK);
		1095	#endif
		1096	}
		1097
1016	/*****************************************************************************/	1098	/*****************************************************************************/
1017		1099
1018	/*	1100	/*
1019	* the heap functions want a real array index. array index 0 uis guaranteed to not	1101	* the heap functions want a real array index. array index 0 is guaranteed to not
1020	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives	1102	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
1021	* the branching factor of the d-tree.	1103	* the branching factor of the d-tree.
1022	*/	1104	*/
1023		1105
1024	/*	1106	/*
…		…
1172		1254
1173	static ANSIG signals [EV_NSIG - 1];	1255	static ANSIG signals [EV_NSIG - 1];
1174		1256
1175	/*****************************************************************************/	1257	/*****************************************************************************/
1176		1258
1177	/* used to prepare libev internal fd's */	1259	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1178	/* this is not fork-safe */
1179	inline_speed void
1180	fd_intern (int fd)
1181	{
1182	#ifdef _WIN32
1183	unsigned long arg = 1;
1184	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1185	#else
1186	fcntl (fd, F_SETFD, FD_CLOEXEC);
1187	fcntl (fd, F_SETFL, O_NONBLOCK);
1188	#endif
1189	}
1190		1260
1191	static void noinline	1261	static void noinline
1192	evpipe_init (EV_P)	1262	evpipe_init (EV_P)
1193	{	1263	{
1194	if (!ev_is_active (&pipe_w))	1264	if (!ev_is_active (&pipe_w))
1195	{	1265	{
1196	#if EV_USE_EVENTFD	1266	# if EV_USE_EVENTFD
1197	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1267	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1198	if (evfd < 0 && errno == EINVAL)	1268	if (evfd < 0 && errno == EINVAL)
1199	evfd = eventfd (0, 0);	1269	evfd = eventfd (0, 0);
1200		1270
1201	if (evfd >= 0)	1271	if (evfd >= 0)
…		…
1203	evpipe [0] = -1;	1273	evpipe [0] = -1;
1204	fd_intern (evfd); /* doing it twice doesn't hurt */	1274	fd_intern (evfd); /* doing it twice doesn't hurt */
1205	ev_io_set (&pipe_w, evfd, EV_READ);	1275	ev_io_set (&pipe_w, evfd, EV_READ);
1206	}	1276	}
1207	else	1277	else
1208	#endif	1278	# endif
1209	{	1279	{
1210	while (pipe (evpipe))	1280	while (pipe (evpipe))
1211	ev_syserr ("(libev) error creating signal/async pipe");	1281	ev_syserr ("(libev) error creating signal/async pipe");
1212		1282
1213	fd_intern (evpipe [0]);	1283	fd_intern (evpipe [0]);
…		…
1224	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1294	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1225	{	1295	{
1226	if (!*flag)	1296	if (!*flag)
1227	{	1297	{
1228	int old_errno = errno; /* save errno because write might clobber it */	1298	int old_errno = errno; /* save errno because write might clobber it */
		1299	char dummy;
1229		1300
1230	*flag = 1;	1301	*flag = 1;
1231		1302
1232	#if EV_USE_EVENTFD	1303	#if EV_USE_EVENTFD
1233	if (evfd >= 0)	1304	if (evfd >= 0)
…		…
1235	uint64_t counter = 1;	1306	uint64_t counter = 1;
1236	write (evfd, &counter, sizeof (uint64_t));	1307	write (evfd, &counter, sizeof (uint64_t));
1237	}	1308	}
1238	else	1309	else
1239	#endif	1310	#endif
		1311	/* win32 people keep sending patches that change this write() to send() */
		1312	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1313	/* so when you think this write should be a send instead, please find out */
		1314	/* where your send() is from - it's definitely not the microsoft send, and */
		1315	/* tell me. thank you. */
1240	write (evpipe [1], &old_errno, 1);	1316	write (evpipe [1], &dummy, 1);
1241		1317
1242	errno = old_errno;	1318	errno = old_errno;
1243	}	1319	}
1244	}	1320	}
1245		1321
…		…
1258	}	1334	}
1259	else	1335	else
1260	#endif	1336	#endif
1261	{	1337	{
1262	char dummy;	1338	char dummy;
		1339	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1263	read (evpipe [0], &dummy, 1);	1340	read (evpipe [0], &dummy, 1);
1264	}	1341	}
1265		1342
1266	if (sig_pending)	1343	if (sig_pending)
1267	{	1344	{
…		…
1294	{	1371	{
1295	#if EV_MULTIPLICITY	1372	#if EV_MULTIPLICITY
1296	EV_P = signals [signum - 1].loop;	1373	EV_P = signals [signum - 1].loop;
1297	#endif	1374	#endif
1298		1375
1299	#if _WIN32	1376	#ifdef _WIN32
1300	signal (signum, ev_sighandler);	1377	signal (signum, ev_sighandler);
1301	#endif	1378	#endif
1302		1379
1303	signals [signum - 1].pending = 1;	1380	signals [signum - 1].pending = 1;
1304	evpipe_write (EV_A_ &sig_pending);	1381	evpipe_write (EV_A_ &sig_pending);
…		…
1346	break;	1423	break;
1347	}	1424	}
1348	}	1425	}
1349	#endif	1426	#endif
1350		1427
		1428	#endif
		1429
1351	/*****************************************************************************/	1430	/*****************************************************************************/
1352		1431
		1432	#if EV_CHILD_ENABLE
1353	static WL childs [EV_PID_HASHSIZE];	1433	static WL childs [EV_PID_HASHSIZE];
1354
1355	#ifndef _WIN32
1356		1434
1357	static ev_signal childev;	1435	static ev_signal childev;
1358		1436
1359	#ifndef WIFCONTINUED	1437	#ifndef WIFCONTINUED
1360	# define WIFCONTINUED(status) 0	1438	# define WIFCONTINUED(status) 0
…		…
1365	child_reap (EV_P_ int chain, int pid, int status)	1443	child_reap (EV_P_ int chain, int pid, int status)
1366	{	1444	{
1367	ev_child *w;	1445	ev_child *w;
1368	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1446	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1369		1447
1370	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1448	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1371	{	1449	{
1372	if ((w->pid == pid || !w->pid)	1450	if ((w->pid == pid || !w->pid)
1373	&& (!traced || (w->flags & 1)))	1451	&& (!traced || (w->flags & 1)))
1374	{	1452	{
1375	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */	1453	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */
…		…
1400	/* make sure we are called again until all children have been reaped */	1478	/* make sure we are called again until all children have been reaped */
1401	/* we need to do it this way so that the callback gets called before we continue */	1479	/* we need to do it this way so that the callback gets called before we continue */
1402	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1480	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1403		1481
1404	child_reap (EV_A_ pid, pid, status);	1482	child_reap (EV_A_ pid, pid, status);
1405	if (EV_PID_HASHSIZE > 1)	1483	if ((EV_PID_HASHSIZE) > 1)
1406	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1484	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1407	}	1485	}
1408		1486
1409	#endif	1487	#endif
1410		1488
…		…
1477	#ifdef __APPLE__	1555	#ifdef __APPLE__
1478	/* only select works correctly on that "unix-certified" platform */	1556	/* only select works correctly on that "unix-certified" platform */
1479	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1557	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1480	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1558	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1481	#endif	1559	#endif
		1560	#ifdef __FreeBSD__
		1561	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1562	#endif
1482		1563
1483	return flags;	1564	return flags;
1484	}	1565	}
1485		1566
1486	unsigned int	1567	unsigned int
1487	ev_embeddable_backends (void)	1568	ev_embeddable_backends (void)
1488	{	1569	{
1489	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;	1570	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
1490		1571
1491	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */	1572	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */
1492	/* please fix it and tell me how to detect the fix */	1573	if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */
1493	flags &= ~EVBACKEND_EPOLL;	1574	flags &= ~EVBACKEND_EPOLL;
1494		1575
1495	return flags;	1576	return flags;
1496	}	1577	}
1497		1578
1498	unsigned int	1579	unsigned int
1499	ev_backend (EV_P)	1580	ev_backend (EV_P)
1500	{	1581	{
1501	return backend;	1582	return backend;
1502	}	1583	}
1503		1584
1504	#if EV_MINIMAL < 2	1585	#if EV_FEATURE_API
1505	unsigned int	1586	unsigned int
1506	ev_loop_count (EV_P)	1587	ev_iteration (EV_P)
1507	{	1588	{
1508	return loop_count;	1589	return loop_count;
1509	}	1590	}
1510		1591
1511	unsigned int	1592	unsigned int
1512	ev_loop_depth (EV_P)	1593	ev_depth (EV_P)
1513	{	1594	{
1514	return loop_depth;	1595	return loop_depth;
1515	}	1596	}
1516		1597
1517	void	1598	void
…		…
1589		1670
1590	ev_rt_now = ev_time ();	1671	ev_rt_now = ev_time ();
1591	mn_now = get_clock ();	1672	mn_now = get_clock ();
1592	now_floor = mn_now;	1673	now_floor = mn_now;
1593	rtmn_diff = ev_rt_now - mn_now;	1674	rtmn_diff = ev_rt_now - mn_now;
1594	#if EV_MINIMAL < 2	1675	#if EV_FEATURE_API
1595	invoke_cb = ev_invoke_pending;	1676	invoke_cb = ev_invoke_pending;
1596	#endif	1677	#endif
1597		1678
1598	io_blocktime = 0.;	1679	io_blocktime = 0.;
1599	timeout_blocktime = 0.;	1680	timeout_blocktime = 0.;
…		…
1605	#endif	1686	#endif
1606	#if EV_USE_INOTIFY	1687	#if EV_USE_INOTIFY
1607	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1688	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1608	#endif	1689	#endif
1609	#if EV_USE_SIGNALFD	1690	#if EV_USE_SIGNALFD
1610	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1691	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1611	#endif	1692	#endif
1612		1693
1613	if (!(flags & 0x0000ffffU))	1694	if (!(flags & 0x0000ffffU))
1614	flags |= ev_recommended_backends ();	1695	flags |= ev_recommended_backends ();
1615		1696
…		…
1629	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1710	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1630	#endif	1711	#endif
1631		1712
1632	ev_prepare_init (&pending_w, pendingcb);	1713	ev_prepare_init (&pending_w, pendingcb);
1633		1714
		1715	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1634	ev_init (&pipe_w, pipecb);	1716	ev_init (&pipe_w, pipecb);
1635	ev_set_priority (&pipe_w, EV_MAXPRI);	1717	ev_set_priority (&pipe_w, EV_MAXPRI);
		1718	#endif
1636	}	1719	}
1637	}	1720	}
1638		1721
1639	/* free up a loop structure */	1722	/* free up a loop structure */
1640	static void noinline	1723	static void noinline
…		…
1758	{	1841	{
1759	EV_WIN32_CLOSE_FD (evpipe [0]);	1842	EV_WIN32_CLOSE_FD (evpipe [0]);
1760	EV_WIN32_CLOSE_FD (evpipe [1]);	1843	EV_WIN32_CLOSE_FD (evpipe [1]);
1761	}	1844	}
1762		1845
		1846	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1763	evpipe_init (EV_A);	1847	evpipe_init (EV_A);
1764	/* now iterate over everything, in case we missed something */	1848	/* now iterate over everything, in case we missed something */
1765	pipecb (EV_A_ &pipe_w, EV_READ);	1849	pipecb (EV_A_ &pipe_w, EV_READ);
		1850	#endif
1766	}	1851	}
1767		1852
1768	postfork = 0;	1853	postfork = 0;
1769	}	1854	}
1770		1855
…		…
1832	verify_watcher (EV_A_ ws [cnt]);	1917	verify_watcher (EV_A_ ws [cnt]);
1833	}	1918	}
1834	}	1919	}
1835	#endif	1920	#endif
1836		1921
1837	#if EV_MINIMAL < 2	1922	#if EV_FEATURE_API
1838	void	1923	void
1839	ev_loop_verify (EV_P)	1924	ev_verify (EV_P)
1840	{	1925	{
1841	#if EV_VERIFY	1926	#if EV_VERIFY
1842	int i;	1927	int i;
1843	WL w;	1928	WL w;
1844		1929
…		…
1883	#if EV_ASYNC_ENABLE	1968	#if EV_ASYNC_ENABLE
1884	assert (asyncmax >= asynccnt);	1969	assert (asyncmax >= asynccnt);
1885	array_verify (EV_A_ (W *)asyncs, asynccnt);	1970	array_verify (EV_A_ (W *)asyncs, asynccnt);
1886	#endif	1971	#endif
1887		1972
		1973	#if EV_PREPARE_ENABLE
1888	assert (preparemax >= preparecnt);	1974	assert (preparemax >= preparecnt);
1889	array_verify (EV_A_ (W *)prepares, preparecnt);	1975	array_verify (EV_A_ (W *)prepares, preparecnt);
		1976	#endif
1890		1977
		1978	#if EV_CHECK_ENABLE
1891	assert (checkmax >= checkcnt);	1979	assert (checkmax >= checkcnt);
1892	array_verify (EV_A_ (W *)checks, checkcnt);	1980	array_verify (EV_A_ (W *)checks, checkcnt);
		1981	#endif
1893		1982
1894	# if 0	1983	# if 0
		1984	#if EV_CHILD_ENABLE
1895	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1985	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1896	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	1986	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1987	#endif
1897	# endif	1988	# endif
1898	#endif	1989	#endif
1899	}	1990	}
1900	#endif	1991	#endif
1901		1992
…		…
1917		2008
1918	loop_init (EV_A_ flags);	2009	loop_init (EV_A_ flags);
1919		2010
1920	if (ev_backend (EV_A))	2011	if (ev_backend (EV_A))
1921	{	2012	{
1922	#ifndef _WIN32	2013	#if EV_CHILD_ENABLE
1923	ev_signal_init (&childev, childcb, SIGCHLD);	2014	ev_signal_init (&childev, childcb, SIGCHLD);
1924	ev_set_priority (&childev, EV_MAXPRI);	2015	ev_set_priority (&childev, EV_MAXPRI);
1925	ev_signal_start (EV_A_ &childev);	2016	ev_signal_start (EV_A_ &childev);
1926	ev_unref (EV_A); /* child watcher should not keep loop alive */	2017	ev_unref (EV_A); /* child watcher should not keep loop alive */
1927	#endif	2018	#endif
…		…
1940	EV_P = ev_default_loop_ptr;	2031	EV_P = ev_default_loop_ptr;
1941	#endif	2032	#endif
1942		2033
1943	ev_default_loop_ptr = 0;	2034	ev_default_loop_ptr = 0;
1944		2035
1945	#ifndef _WIN32	2036	#if EV_CHILD_ENABLE
1946	ev_ref (EV_A); /* child watcher */	2037	ev_ref (EV_A); /* child watcher */
1947	ev_signal_stop (EV_A_ &childev);	2038	ev_signal_stop (EV_A_ &childev);
1948	#endif	2039	#endif
1949		2040
1950	loop_destroy (EV_A);	2041	loop_destroy (EV_A);
…		…
2056	EV_FREQUENT_CHECK;	2147	EV_FREQUENT_CHECK;
2057	feed_reverse (EV_A_ (W)w);	2148	feed_reverse (EV_A_ (W)w);
2058	}	2149	}
2059	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2150	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2060		2151
2061	feed_reverse_done (EV_A_ EV_TIMEOUT);	2152	feed_reverse_done (EV_A_ EV_TIMER);
2062	}	2153	}
2063	}	2154	}
2064		2155
2065	#if EV_PERIODIC_ENABLE	2156	#if EV_PERIODIC_ENABLE
2066	/* make periodics pending */	2157	/* make periodics pending */
…		…
2119	feed_reverse_done (EV_A_ EV_PERIODIC);	2210	feed_reverse_done (EV_A_ EV_PERIODIC);
2120	}	2211	}
2121	}	2212	}
2122		2213
2123	/* simply recalculate all periodics */	2214	/* simply recalculate all periodics */
2124	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2215	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2125	static void noinline	2216	static void noinline
2126	periodics_reschedule (EV_P)	2217	periodics_reschedule (EV_P)
2127	{	2218	{
2128	int i;	2219	int i;
2129		2220
…		…
2157	ANHE_at_cache (*he);	2248	ANHE_at_cache (*he);
2158	}	2249	}
2159	}	2250	}
2160		2251
2161	/* fetch new monotonic and realtime times from the kernel */	2252	/* fetch new monotonic and realtime times from the kernel */
2162	/* also detetc if there was a timejump, and act accordingly */	2253	/* also detect if there was a timejump, and act accordingly */
2163	inline_speed void	2254	inline_speed void
2164	time_update (EV_P_ ev_tstamp max_block)	2255	time_update (EV_P_ ev_tstamp max_block)
2165	{	2256	{
2166	#if EV_USE_MONOTONIC	2257	#if EV_USE_MONOTONIC
2167	if (expect_true (have_monotonic))	2258	if (expect_true (have_monotonic))
…		…
2225	mn_now = ev_rt_now;	2316	mn_now = ev_rt_now;
2226	}	2317	}
2227	}	2318	}
2228		2319
2229	void	2320	void
2230	ev_loop (EV_P_ int flags)	2321	ev_run (EV_P_ int flags)
2231	{	2322	{
2232	#if EV_MINIMAL < 2	2323	#if EV_FEATURE_API
2233	++loop_depth;	2324	++loop_depth;
2234	#endif	2325	#endif
2235		2326
2236	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2327	assert (("libev: ev_loop recursion during release detected", loop_done != EVBREAK_RECURSE));
2237		2328
2238	loop_done = EVUNLOOP_CANCEL;	2329	loop_done = EVBREAK_CANCEL;
2239		2330
2240	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2331	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2241		2332
2242	do	2333	do
2243	{	2334	{
2244	#if EV_VERIFY >= 2	2335	#if EV_VERIFY >= 2
2245	ev_loop_verify (EV_A);	2336	ev_verify (EV_A);
2246	#endif	2337	#endif
2247		2338
2248	#ifndef _WIN32	2339	#ifndef _WIN32
2249	if (expect_false (curpid)) /* penalise the forking check even more */	2340	if (expect_false (curpid)) /* penalise the forking check even more */
2250	if (expect_false (getpid () != curpid))	2341	if (expect_false (getpid () != curpid))
…		…
2262	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2353	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2263	EV_INVOKE_PENDING;	2354	EV_INVOKE_PENDING;
2264	}	2355	}
2265	#endif	2356	#endif
2266		2357
		2358	#if EV_PREPARE_ENABLE
2267	/* queue prepare watchers (and execute them) */	2359	/* queue prepare watchers (and execute them) */
2268	if (expect_false (preparecnt))	2360	if (expect_false (preparecnt))
2269	{	2361	{
2270	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2362	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2271	EV_INVOKE_PENDING;	2363	EV_INVOKE_PENDING;
2272	}	2364	}
		2365	#endif
2273		2366
2274	if (expect_false (loop_done))	2367	if (expect_false (loop_done))
2275	break;	2368	break;
2276		2369
2277	/* we might have forked, so reify kernel state if necessary */	2370	/* we might have forked, so reify kernel state if necessary */
…		…
2284	/* calculate blocking time */	2377	/* calculate blocking time */
2285	{	2378	{
2286	ev_tstamp waittime = 0.;	2379	ev_tstamp waittime = 0.;
2287	ev_tstamp sleeptime = 0.;	2380	ev_tstamp sleeptime = 0.;
2288		2381
		2382	/* remember old timestamp for io_blocktime calculation */
		2383	ev_tstamp prev_mn_now = mn_now;
		2384
		2385	/* update time to cancel out callback processing overhead */
		2386	time_update (EV_A_ 1e100);
		2387
2289	if (expect_true (!(flags & EVLOOP_NONBLOCK || idleall || !activecnt)))	2388	if (expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt)))
2290	{	2389	{
2291	/* remember old timestamp for io_blocktime calculation */
2292	ev_tstamp prev_mn_now = mn_now;
2293
2294	/* update time to cancel out callback processing overhead */
2295	time_update (EV_A_ 1e100);
2296
2297	waittime = MAX_BLOCKTIME;	2390	waittime = MAX_BLOCKTIME;
2298		2391
2299	if (timercnt)	2392	if (timercnt)
2300	{	2393	{
2301	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;	2394	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;
…		…
2328	waittime -= sleeptime;	2421	waittime -= sleeptime;
2329	}	2422	}
2330	}	2423	}
2331	}	2424	}
2332		2425
2333	#if EV_MINIMAL < 2	2426	#if EV_FEATURE_API
2334	++loop_count;	2427	++loop_count;
2335	#endif	2428	#endif
2336	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2429	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */
2337	backend_poll (EV_A_ waittime);	2430	backend_poll (EV_A_ waittime);
2338	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2431	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
2339		2432
2340	/* update ev_rt_now, do magic */	2433	/* update ev_rt_now, do magic */
2341	time_update (EV_A_ waittime + sleeptime);	2434	time_update (EV_A_ waittime + sleeptime);
2342	}	2435	}
2343		2436
…		…
2350	#if EV_IDLE_ENABLE	2443	#if EV_IDLE_ENABLE
2351	/* queue idle watchers unless other events are pending */	2444	/* queue idle watchers unless other events are pending */
2352	idle_reify (EV_A);	2445	idle_reify (EV_A);
2353	#endif	2446	#endif
2354		2447
		2448	#if EV_CHECK_ENABLE
2355	/* queue check watchers, to be executed first */	2449	/* queue check watchers, to be executed first */
2356	if (expect_false (checkcnt))	2450	if (expect_false (checkcnt))
2357	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2451	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2452	#endif
2358		2453
2359	EV_INVOKE_PENDING;	2454	EV_INVOKE_PENDING;
2360	}	2455	}
2361	while (expect_true (	2456	while (expect_true (
2362	activecnt	2457	activecnt
2363	&& !loop_done	2458	&& !loop_done
2364	&& !(flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK))	2459	&& !(flags & (EVRUN_ONCE | EVRUN_NOWAIT))
2365	));	2460	));
2366		2461
2367	if (loop_done == EVUNLOOP_ONE)	2462	if (loop_done == EVBREAK_ONE)
2368	loop_done = EVUNLOOP_CANCEL;	2463	loop_done = EVBREAK_CANCEL;
2369		2464
2370	#if EV_MINIMAL < 2	2465	#if EV_FEATURE_API
2371	--loop_depth;	2466	--loop_depth;
2372	#endif	2467	#endif
2373	}	2468	}
2374		2469
2375	void	2470	void
2376	ev_unloop (EV_P_ int how)	2471	ev_break (EV_P_ int how)
2377	{	2472	{
2378	loop_done = how;	2473	loop_done = how;
2379	}	2474	}
2380		2475
2381	void	2476	void
…		…
2501		2596
2502	if (expect_false (ev_is_active (w)))	2597	if (expect_false (ev_is_active (w)))
2503	return;	2598	return;
2504		2599
2505	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2600	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))));	2601	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
2507		2602
2508	EV_FREQUENT_CHECK;	2603	EV_FREQUENT_CHECK;
2509		2604
2510	ev_start (EV_A_ (W)w, 1);	2605	ev_start (EV_A_ (W)w, 1);
2511	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2606	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2529	EV_FREQUENT_CHECK;	2624	EV_FREQUENT_CHECK;
2530		2625
2531	wlist_del (&anfds[w->fd].head, (WL)w);	2626	wlist_del (&anfds[w->fd].head, (WL)w);
2532	ev_stop (EV_A_ (W)w);	2627	ev_stop (EV_A_ (W)w);
2533		2628
2534	fd_change (EV_A_ w->fd, 1);	2629	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2535		2630
2536	EV_FREQUENT_CHECK;	2631	EV_FREQUENT_CHECK;
2537	}	2632	}
2538		2633
2539	void noinline	2634	void noinline
…		…
2581	timers [active] = timers [timercnt + HEAP0];	2676	timers [active] = timers [timercnt + HEAP0];
2582	adjustheap (timers, timercnt, active);	2677	adjustheap (timers, timercnt, active);
2583	}	2678	}
2584	}	2679	}
2585		2680
2586	EV_FREQUENT_CHECK;
2587
2588	ev_at (w) -= mn_now;	2681	ev_at (w) -= mn_now;
2589		2682
2590	ev_stop (EV_A_ (W)w);	2683	ev_stop (EV_A_ (W)w);
		2684
		2685	EV_FREQUENT_CHECK;
2591	}	2686	}
2592		2687
2593	void noinline	2688	void noinline
2594	ev_timer_again (EV_P_ ev_timer *w)	2689	ev_timer_again (EV_P_ ev_timer *w)
2595	{	2690	{
…		…
2674	periodics [active] = periodics [periodiccnt + HEAP0];	2769	periodics [active] = periodics [periodiccnt + HEAP0];
2675	adjustheap (periodics, periodiccnt, active);	2770	adjustheap (periodics, periodiccnt, active);
2676	}	2771	}
2677	}	2772	}
2678		2773
2679	EV_FREQUENT_CHECK;
2680
2681	ev_stop (EV_A_ (W)w);	2774	ev_stop (EV_A_ (W)w);
		2775
		2776	EV_FREQUENT_CHECK;
2682	}	2777	}
2683		2778
2684	void noinline	2779	void noinline
2685	ev_periodic_again (EV_P_ ev_periodic *w)	2780	ev_periodic_again (EV_P_ ev_periodic *w)
2686	{	2781	{
…		…
2691	#endif	2786	#endif
2692		2787
2693	#ifndef SA_RESTART	2788	#ifndef SA_RESTART
2694	# define SA_RESTART 0	2789	# define SA_RESTART 0
2695	#endif	2790	#endif
		2791
		2792	#if EV_SIGNAL_ENABLE
2696		2793
2697	void noinline	2794	void noinline
2698	ev_signal_start (EV_P_ ev_signal *w)	2795	ev_signal_start (EV_P_ ev_signal *w)
2699	{	2796	{
2700	if (expect_false (ev_is_active (w)))	2797	if (expect_false (ev_is_active (w)))
…		…
2747	if (!((WL)w)->next)	2844	if (!((WL)w)->next)
2748	# if EV_USE_SIGNALFD	2845	# if EV_USE_SIGNALFD
2749	if (sigfd < 0) /*TODO*/	2846	if (sigfd < 0) /*TODO*/
2750	# endif	2847	# endif
2751	{	2848	{
2752	# if _WIN32	2849	# ifdef _WIN32
2753	evpipe_init (EV_A);	2850	evpipe_init (EV_A);
2754		2851
2755	signal (w->signum, ev_sighandler);	2852	signal (w->signum, ev_sighandler);
2756	# else	2853	# else
2757	struct sigaction sa;	2854	struct sigaction sa;
…		…
2790	signals [w->signum - 1].loop = 0; /* unattach from signal */	2887	signals [w->signum - 1].loop = 0; /* unattach from signal */
2791	#endif	2888	#endif
2792	#if EV_USE_SIGNALFD	2889	#if EV_USE_SIGNALFD
2793	if (sigfd >= 0)	2890	if (sigfd >= 0)
2794	{	2891	{
2795	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2892	sigset_t ss;
		2893
		2894	sigemptyset (&ss);
		2895	sigaddset (&ss, w->signum);
2796	sigdelset (&sigfd_set, w->signum);	2896	sigdelset (&sigfd_set, w->signum);
		2897
2797	signalfd (sigfd, &sigfd_set, 0);	2898	signalfd (sigfd, &sigfd_set, 0);
2798	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2899	sigprocmask (SIG_UNBLOCK, &ss, 0);
2799	/*TODO: maybe unblock signal? */
2800	}	2900	}
2801	else	2901	else
2802	#endif	2902	#endif
2803	signal (w->signum, SIG_DFL);	2903	signal (w->signum, SIG_DFL);
2804	}	2904	}
2805		2905
2806	EV_FREQUENT_CHECK;	2906	EV_FREQUENT_CHECK;
2807	}	2907	}
2808		2908
		2909	#endif
		2910
		2911	#if EV_CHILD_ENABLE
		2912
2809	void	2913	void
2810	ev_child_start (EV_P_ ev_child *w)	2914	ev_child_start (EV_P_ ev_child *w)
2811	{	2915	{
2812	#if EV_MULTIPLICITY	2916	#if EV_MULTIPLICITY
2813	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	2917	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2816	return;	2920	return;
2817		2921
2818	EV_FREQUENT_CHECK;	2922	EV_FREQUENT_CHECK;
2819		2923
2820	ev_start (EV_A_ (W)w, 1);	2924	ev_start (EV_A_ (W)w, 1);
2821	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2925	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2822		2926
2823	EV_FREQUENT_CHECK;	2927	EV_FREQUENT_CHECK;
2824	}	2928	}
2825		2929
2826	void	2930	void
…		…
2830	if (expect_false (!ev_is_active (w)))	2934	if (expect_false (!ev_is_active (w)))
2831	return;	2935	return;
2832		2936
2833	EV_FREQUENT_CHECK;	2937	EV_FREQUENT_CHECK;
2834		2938
2835	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2939	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2836	ev_stop (EV_A_ (W)w);	2940	ev_stop (EV_A_ (W)w);
2837		2941
2838	EV_FREQUENT_CHECK;	2942	EV_FREQUENT_CHECK;
2839	}	2943	}
		2944
		2945	#endif
2840		2946
2841	#if EV_STAT_ENABLE	2947	#if EV_STAT_ENABLE
2842		2948
2843	# ifdef _WIN32	2949	# ifdef _WIN32
2844	# undef lstat	2950	# undef lstat
…		…
2850	#define MIN_STAT_INTERVAL 0.1074891	2956	#define MIN_STAT_INTERVAL 0.1074891
2851		2957
2852	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);	2958	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);
2853		2959
2854	#if EV_USE_INOTIFY	2960	#if EV_USE_INOTIFY
2855	# define EV_INOTIFY_BUFSIZE 8192	2961
		2962	/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
		2963	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
2856		2964
2857	static void noinline	2965	static void noinline
2858	infy_add (EV_P_ ev_stat *w)	2966	infy_add (EV_P_ ev_stat *w)
2859	{	2967	{
2860	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);	2968	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);
…		…
2909	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	3017	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2910	}	3018	}
2911	}	3019	}
2912		3020
2913	if (w->wd >= 0)	3021	if (w->wd >= 0)
2914	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3022	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2915		3023
2916	/* now re-arm timer, if required */	3024	/* now re-arm timer, if required */
2917	if (ev_is_active (&w->timer)) ev_ref (EV_A);	3025	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2918	ev_timer_again (EV_A_ &w->timer);	3026	ev_timer_again (EV_A_ &w->timer);
2919	if (ev_is_active (&w->timer)) ev_unref (EV_A);	3027	if (ev_is_active (&w->timer)) ev_unref (EV_A);
…		…
2927		3035
2928	if (wd < 0)	3036	if (wd < 0)
2929	return;	3037	return;
2930		3038
2931	w->wd = -2;	3039	w->wd = -2;
2932	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3040	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2933	wlist_del (&fs_hash [slot].head, (WL)w);	3041	wlist_del (&fs_hash [slot].head, (WL)w);
2934		3042
2935	/* remove this watcher, if others are watching it, they will rearm */	3043	/* remove this watcher, if others are watching it, they will rearm */
2936	inotify_rm_watch (fs_fd, wd);	3044	inotify_rm_watch (fs_fd, wd);
2937	}	3045	}
…		…
2939	static void noinline	3047	static void noinline
2940	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3048	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2941	{	3049	{
2942	if (slot < 0)	3050	if (slot < 0)
2943	/* overflow, need to check for all hash slots */	3051	/* overflow, need to check for all hash slots */
2944	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3052	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2945	infy_wd (EV_A_ slot, wd, ev);	3053	infy_wd (EV_A_ slot, wd, ev);
2946	else	3054	else
2947	{	3055	{
2948	WL w_;	3056	WL w_;
2949		3057
2950	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3058	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2951	{	3059	{
2952	ev_stat *w = (ev_stat *)w_;	3060	ev_stat *w = (ev_stat *)w_;
2953	w_ = w_->next; /* lets us remove this watcher and all before it */	3061	w_ = w_->next; /* lets us remove this watcher and all before it */
2954		3062
2955	if (w->wd == wd || wd == -1)	3063	if (w->wd == wd || wd == -1)
2956	{	3064	{
2957	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3065	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2958	{	3066	{
2959	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3067	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2960	w->wd = -1;	3068	w->wd = -1;
2961	infy_add (EV_A_ w); /* re-add, no matter what */	3069	infy_add (EV_A_ w); /* re-add, no matter what */
2962	}	3070	}
2963		3071
2964	stat_timer_cb (EV_A_ &w->timer, 0);	3072	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2969		3077
2970	static void	3078	static void
2971	infy_cb (EV_P_ ev_io *w, int revents)	3079	infy_cb (EV_P_ ev_io *w, int revents)
2972	{	3080	{
2973	char buf [EV_INOTIFY_BUFSIZE];	3081	char buf [EV_INOTIFY_BUFSIZE];
2974	struct inotify_event *ev = (struct inotify_event *)buf;
2975	int ofs;	3082	int ofs;
2976	int len = read (fs_fd, buf, sizeof (buf));	3083	int len = read (fs_fd, buf, sizeof (buf));
2977		3084
2978	for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len)	3085	for (ofs = 0; ofs < len; )
		3086	{
		3087	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);
2979	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3088	infy_wd (EV_A_ ev->wd, ev->wd, ev);
		3089	ofs += sizeof (struct inotify_event) + ev->len;
		3090	}
2980	}	3091	}
2981		3092
2982	inline_size void	3093	inline_size void
2983	check_2625 (EV_P)	3094	ev_check_2625 (EV_P)
2984	{	3095	{
2985	/* kernels < 2.6.25 are borked	3096	/* kernels < 2.6.25 are borked
2986	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html	3097	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
2987	*/	3098	*/
2988	struct utsname buf;	3099	if (ev_linux_version () < 0x020619)
2989	int major, minor, micro;
2990
2991	if (uname (&buf))
2992	return;
2993
2994	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2995	return;
2996
2997	if (major < 2
2998	|| (major == 2 && minor < 6)
2999	|| (major == 2 && minor == 6 && micro < 25))
3000	return;	3100	return;
3001		3101
3002	fs_2625 = 1;	3102	fs_2625 = 1;
3003	}	3103	}
3004		3104
…		…
3019	if (fs_fd != -2)	3119	if (fs_fd != -2)
3020	return;	3120	return;
3021		3121
3022	fs_fd = -1;	3122	fs_fd = -1;
3023		3123
3024	check_2625 (EV_A);	3124	ev_check_2625 (EV_A);
3025		3125
3026	fs_fd = infy_newfd ();	3126	fs_fd = infy_newfd ();
3027		3127
3028	if (fs_fd >= 0)	3128	if (fs_fd >= 0)
3029	{	3129	{
…		…
3054	ev_io_set (&fs_w, fs_fd, EV_READ);	3154	ev_io_set (&fs_w, fs_fd, EV_READ);
3055	ev_io_start (EV_A_ &fs_w);	3155	ev_io_start (EV_A_ &fs_w);
3056	ev_unref (EV_A);	3156	ev_unref (EV_A);
3057	}	3157	}
3058		3158
3059	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3159	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3060	{	3160	{
3061	WL w_ = fs_hash [slot].head;	3161	WL w_ = fs_hash [slot].head;
3062	fs_hash [slot].head = 0;	3162	fs_hash [slot].head = 0;
3063		3163
3064	while (w_)	3164	while (w_)
…		…
3239		3339
3240	EV_FREQUENT_CHECK;	3340	EV_FREQUENT_CHECK;
3241	}	3341	}
3242	#endif	3342	#endif
3243		3343
		3344	#if EV_PREPARE_ENABLE
3244	void	3345	void
3245	ev_prepare_start (EV_P_ ev_prepare *w)	3346	ev_prepare_start (EV_P_ ev_prepare *w)
3246	{	3347	{
3247	if (expect_false (ev_is_active (w)))	3348	if (expect_false (ev_is_active (w)))
3248	return;	3349	return;
…		…
3274		3375
3275	ev_stop (EV_A_ (W)w);	3376	ev_stop (EV_A_ (W)w);
3276		3377
3277	EV_FREQUENT_CHECK;	3378	EV_FREQUENT_CHECK;
3278	}	3379	}
		3380	#endif
3279		3381
		3382	#if EV_CHECK_ENABLE
3280	void	3383	void
3281	ev_check_start (EV_P_ ev_check *w)	3384	ev_check_start (EV_P_ ev_check *w)
3282	{	3385	{
3283	if (expect_false (ev_is_active (w)))	3386	if (expect_false (ev_is_active (w)))
3284	return;	3387	return;
…		…
3310		3413
3311	ev_stop (EV_A_ (W)w);	3414	ev_stop (EV_A_ (W)w);
3312		3415
3313	EV_FREQUENT_CHECK;	3416	EV_FREQUENT_CHECK;
3314	}	3417	}
		3418	#endif
3315		3419
3316	#if EV_EMBED_ENABLE	3420	#if EV_EMBED_ENABLE
3317	void noinline	3421	void noinline
3318	ev_embed_sweep (EV_P_ ev_embed *w)	3422	ev_embed_sweep (EV_P_ ev_embed *w)
3319	{	3423	{
3320	ev_loop (w->other, EVLOOP_NONBLOCK);	3424	ev_run (w->other, EVRUN_NOWAIT);
3321	}	3425	}
3322		3426
3323	static void	3427	static void
3324	embed_io_cb (EV_P_ ev_io *io, int revents)	3428	embed_io_cb (EV_P_ ev_io *io, int revents)
3325	{	3429	{
3326	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));	3430	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));
3327		3431
3328	if (ev_cb (w))	3432	if (ev_cb (w))
3329	ev_feed_event (EV_A_ (W)w, EV_EMBED);	3433	ev_feed_event (EV_A_ (W)w, EV_EMBED);
3330	else	3434	else
3331	ev_loop (w->other, EVLOOP_NONBLOCK);	3435	ev_run (w->other, EVRUN_NOWAIT);
3332	}	3436	}
3333		3437
3334	static void	3438	static void
3335	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)	3439	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)
3336	{	3440	{
…		…
3340	EV_P = w->other;	3444	EV_P = w->other;
3341		3445
3342	while (fdchangecnt)	3446	while (fdchangecnt)
3343	{	3447	{
3344	fd_reify (EV_A);	3448	fd_reify (EV_A);
3345	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3449	ev_run (EV_A_ EVRUN_NOWAIT);
3346	}	3450	}
3347	}	3451	}
3348	}	3452	}
3349		3453
3350	static void	3454	static void
…		…
3356		3460
3357	{	3461	{
3358	EV_P = w->other;	3462	EV_P = w->other;
3359		3463
3360	ev_loop_fork (EV_A);	3464	ev_loop_fork (EV_A);
3361	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3465	ev_run (EV_A_ EVRUN_NOWAIT);
3362	}	3466	}
3363		3467
3364	ev_embed_start (EV_A_ w);	3468	ev_embed_start (EV_A_ w);
3365	}	3469	}
3366		3470
…		…
3414		3518
3415	ev_io_stop (EV_A_ &w->io);	3519	ev_io_stop (EV_A_ &w->io);
3416	ev_prepare_stop (EV_A_ &w->prepare);	3520	ev_prepare_stop (EV_A_ &w->prepare);
3417	ev_fork_stop (EV_A_ &w->fork);	3521	ev_fork_stop (EV_A_ &w->fork);
3418		3522
		3523	ev_stop (EV_A_ (W)w);
		3524
3419	EV_FREQUENT_CHECK;	3525	EV_FREQUENT_CHECK;
3420	}	3526	}
3421	#endif	3527	#endif
3422		3528
3423	#if EV_FORK_ENABLE	3529	#if EV_FORK_ENABLE
…		…
3462	void	3568	void
3463	ev_async_start (EV_P_ ev_async *w)	3569	ev_async_start (EV_P_ ev_async *w)
3464	{	3570	{
3465	if (expect_false (ev_is_active (w)))	3571	if (expect_false (ev_is_active (w)))
3466	return;	3572	return;
		3573
		3574	w->sent = 0;
3467		3575
3468	evpipe_init (EV_A);	3576	evpipe_init (EV_A);
3469		3577
3470	EV_FREQUENT_CHECK;	3578	EV_FREQUENT_CHECK;
3471		3579
…		…
3549	{	3657	{
3550	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	3658	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
3551		3659
3552	if (expect_false (!once))	3660	if (expect_false (!once))
3553	{	3661	{
3554	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3662	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3555	return;	3663	return;
3556	}	3664	}
3557		3665
3558	once->cb = cb;	3666	once->cb = cb;
3559	once->arg = arg;	3667	once->arg = arg;
…		…
3646	if (types & EV_ASYNC)	3754	if (types & EV_ASYNC)
3647	for (i = asynccnt; i--; )	3755	for (i = asynccnt; i--; )
3648	cb (EV_A_ EV_ASYNC, asyncs [i]);	3756	cb (EV_A_ EV_ASYNC, asyncs [i]);
3649	#endif	3757	#endif
3650		3758
		3759	#if EV_PREPARE_ENABLE
3651	if (types & EV_PREPARE)	3760	if (types & EV_PREPARE)
3652	for (i = preparecnt; i--; )	3761	for (i = preparecnt; i--; )
3653	#if EV_EMBED_ENABLE	3762	# if EV_EMBED_ENABLE
3654	if (ev_cb (prepares [i]) != embed_prepare_cb)	3763	if (ev_cb (prepares [i]) != embed_prepare_cb)
3655	#endif	3764	# endif
3656	cb (EV_A_ EV_PREPARE, prepares [i]);	3765	cb (EV_A_ EV_PREPARE, prepares [i]);
		3766	#endif
3657		3767
		3768	#if EV_CHECK_ENABLE
3658	if (types & EV_CHECK)	3769	if (types & EV_CHECK)
3659	for (i = checkcnt; i--; )	3770	for (i = checkcnt; i--; )
3660	cb (EV_A_ EV_CHECK, checks [i]);	3771	cb (EV_A_ EV_CHECK, checks [i]);
		3772	#endif
3661		3773
		3774	#if EV_SIGNAL_ENABLE
3662	if (types & EV_SIGNAL)	3775	if (types & EV_SIGNAL)
3663	for (i = 0; i < EV_NSIG - 1; ++i)	3776	for (i = 0; i < EV_NSIG - 1; ++i)
3664	for (wl = signals [i].head; wl; )	3777	for (wl = signals [i].head; wl; )
3665	{	3778	{
3666	wn = wl->next;	3779	wn = wl->next;
3667	cb (EV_A_ EV_SIGNAL, wl);	3780	cb (EV_A_ EV_SIGNAL, wl);
3668	wl = wn;	3781	wl = wn;
3669	}	3782	}
		3783	#endif
3670		3784
		3785	#if EV_CHILD_ENABLE
3671	if (types & EV_CHILD)	3786	if (types & EV_CHILD)
3672	for (i = EV_PID_HASHSIZE; i--; )	3787	for (i = (EV_PID_HASHSIZE); i--; )
3673	for (wl = childs [i]; wl; )	3788	for (wl = childs [i]; wl; )
3674	{	3789	{
3675	wn = wl->next;	3790	wn = wl->next;
3676	cb (EV_A_ EV_CHILD, wl);	3791	cb (EV_A_ EV_CHILD, wl);
3677	wl = wn;	3792	wl = wn;
3678	}	3793	}
		3794	#endif
3679	/* EV_STAT 0x00001000 /* stat data changed */	3795	/* EV_STAT 0x00001000 /* stat data changed */
3680	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3796	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3681	}	3797	}
3682	#endif	3798	#endif
3683		3799
3684	#if EV_MULTIPLICITY	3800	#if EV_MULTIPLICITY
3685	#include "ev_wrap.h"	3801	#include "ev_wrap.h"
3686	#endif	3802	#endif
3687		3803
3688	#ifdef __cplusplus	3804	EV_CPP(})
3689	}
3690	#endif
3691		3805

Diff Legend

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