ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.333 by root, Tue Mar 9 08:58:22 2010 UTC vs.
Revision 1.375 by root, Sat Jun 4 05:25:03 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,
…		…
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
49	# include "config.h"	45	# include "config.h"
50	# endif	46	# endif
		47
		48	#if HAVE_FLOOR
		49	# ifndef EV_USE_FLOOR
		50	# define EV_USE_FLOOR 1
		51	# endif
		52	#endif
51		53
52	# if HAVE_CLOCK_SYSCALL	54	# if HAVE_CLOCK_SYSCALL
53	# ifndef EV_USE_CLOCK_SYSCALL	55	# ifndef EV_USE_CLOCK_SYSCALL
54	# define EV_USE_CLOCK_SYSCALL 1	56	# define EV_USE_CLOCK_SYSCALL 1
55	# ifndef EV_USE_REALTIME	57	# ifndef EV_USE_REALTIME
…		…
77	# ifndef EV_USE_REALTIME	79	# ifndef EV_USE_REALTIME
78	# define EV_USE_REALTIME 0	80	# define EV_USE_REALTIME 0
79	# endif	81	# endif
80	# endif	82	# endif
81		83
		84	# if HAVE_NANOSLEEP
82	# ifndef EV_USE_NANOSLEEP	85	# ifndef EV_USE_NANOSLEEP
83	# if HAVE_NANOSLEEP
84	# define EV_USE_NANOSLEEP 1	86	# define EV_USE_NANOSLEEP EV_FEATURE_OS
		87	# endif
85	# else	88	# else
		89	# undef EV_USE_NANOSLEEP
86	# define EV_USE_NANOSLEEP 0	90	# define EV_USE_NANOSLEEP 0
		91	# endif
		92
		93	# if HAVE_SELECT && HAVE_SYS_SELECT_H
		94	# ifndef EV_USE_SELECT
		95	# define EV_USE_SELECT EV_FEATURE_BACKENDS
87	# endif	96	# endif
		97	# else
		98	# undef EV_USE_SELECT
		99	# define EV_USE_SELECT 0
88	# endif	100	# endif
89		101
		102	# if HAVE_POLL && HAVE_POLL_H
90	# ifndef EV_USE_SELECT	103	# ifndef EV_USE_POLL
91	# if HAVE_SELECT && HAVE_SYS_SELECT_H	104	# define EV_USE_POLL EV_FEATURE_BACKENDS
92	# define EV_USE_SELECT 1
93	# else
94	# define EV_USE_SELECT 0
95	# endif	105	# endif
96	# endif
97
98	# ifndef EV_USE_POLL
99	# if HAVE_POLL && HAVE_POLL_H
100	# define EV_USE_POLL 1
101	# else	106	# else
		107	# undef EV_USE_POLL
102	# define EV_USE_POLL 0	108	# define EV_USE_POLL 0
103	# endif
104	# endif	109	# endif
105		110
106	# ifndef EV_USE_EPOLL
107	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H	111	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H
108	# define EV_USE_EPOLL 1	112	# ifndef EV_USE_EPOLL
109	# else	113	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
110	# define EV_USE_EPOLL 0
111	# endif	114	# endif
		115	# else
		116	# undef EV_USE_EPOLL
		117	# define EV_USE_EPOLL 0
112	# endif	118	# endif
113		119
114	# ifndef EV_USE_KQUEUE
115	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H	120	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H
116	# define EV_USE_KQUEUE 1	121	# ifndef EV_USE_KQUEUE
117	# else	122	# define EV_USE_KQUEUE EV_FEATURE_BACKENDS
118	# define EV_USE_KQUEUE 0
119	# endif	123	# endif
		124	# else
		125	# undef EV_USE_KQUEUE
		126	# define EV_USE_KQUEUE 0
120	# endif	127	# endif
121		128
122	# ifndef EV_USE_PORT
123	# if HAVE_PORT_H && HAVE_PORT_CREATE	129	# if HAVE_PORT_H && HAVE_PORT_CREATE
124	# define EV_USE_PORT 1	130	# ifndef EV_USE_PORT
125	# else	131	# define EV_USE_PORT EV_FEATURE_BACKENDS
126	# define EV_USE_PORT 0
127	# endif	132	# endif
		133	# else
		134	# undef EV_USE_PORT
		135	# define EV_USE_PORT 0
128	# endif	136	# endif
129		137
130	# ifndef EV_USE_INOTIFY
131	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H	138	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H
132	# define EV_USE_INOTIFY 1	139	# ifndef EV_USE_INOTIFY
133	# else
134	# define EV_USE_INOTIFY 0	140	# define EV_USE_INOTIFY EV_FEATURE_OS
135	# endif	141	# endif
		142	# else
		143	# undef EV_USE_INOTIFY
		144	# define EV_USE_INOTIFY 0
136	# endif	145	# endif
137		146
138	# ifndef EV_USE_SIGNALFD
139	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H	147	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H
140	# define EV_USE_SIGNALFD 1	148	# ifndef EV_USE_SIGNALFD
141	# else
142	# define EV_USE_SIGNALFD 0	149	# define EV_USE_SIGNALFD EV_FEATURE_OS
143	# endif	150	# endif
		151	# else
		152	# undef EV_USE_SIGNALFD
		153	# define EV_USE_SIGNALFD 0
144	# endif	154	# endif
145		155
		156	# if HAVE_EVENTFD
146	# ifndef EV_USE_EVENTFD	157	# ifndef EV_USE_EVENTFD
147	# if HAVE_EVENTFD
148	# define EV_USE_EVENTFD 1	158	# define EV_USE_EVENTFD EV_FEATURE_OS
149	# else
150	# define EV_USE_EVENTFD 0
151	# endif	159	# endif
		160	# else
		161	# undef EV_USE_EVENTFD
		162	# define EV_USE_EVENTFD 0
152	# endif	163	# endif
153		164
154	#endif	165	#endif
155		166
156	#include <math.h>
157	#include <stdlib.h>	167	#include <stdlib.h>
158	#include <string.h>	168	#include <string.h>
159	#include <fcntl.h>	169	#include <fcntl.h>
160	#include <stddef.h>	170	#include <stddef.h>
161		171
…		…
172	#ifdef EV_H	182	#ifdef EV_H
173	# include EV_H	183	# include EV_H
174	#else	184	#else
175	# include "ev.h"	185	# include "ev.h"
176	#endif	186	#endif
		187
		188	EV_CPP(extern "C" {)
177		189
178	#ifndef _WIN32	190	#ifndef _WIN32
179	# include <sys/time.h>	191	# include <sys/time.h>
180	# include <sys/wait.h>	192	# include <sys/wait.h>
181	# include <unistd.h>	193	# include <unistd.h>
…		…
186	# ifndef EV_SELECT_IS_WINSOCKET	198	# ifndef EV_SELECT_IS_WINSOCKET
187	# define EV_SELECT_IS_WINSOCKET 1	199	# define EV_SELECT_IS_WINSOCKET 1
188	# endif	200	# endif
189	# undef EV_AVOID_STDIO	201	# undef EV_AVOID_STDIO
190	#endif	202	#endif
		203
		204	/* OS X, in its infinite idiocy, actually HARDCODES
		205	* a limit of 1024 into their select. Where people have brains,
		206	* OS X engineers apparently have a vacuum. Or maybe they were
		207	* ordered to have a vacuum, or they do anything for money.
		208	* This might help. Or not.
		209	*/
		210	#define _DARWIN_UNLIMITED_SELECT 1
191		211
192	/* this block tries to deduce configuration from header-defined symbols and defaults */	212	/* this block tries to deduce configuration from header-defined symbols and defaults */
193		213
194	/* try to deduce the maximum number of signals on this platform */	214	/* try to deduce the maximum number of signals on this platform */
195	#if defined (EV_NSIG)	215	#if defined (EV_NSIG)
…		…
207	#elif defined (MAXSIG)	227	#elif defined (MAXSIG)
208	# define EV_NSIG (MAXSIG+1)	228	# define EV_NSIG (MAXSIG+1)
209	#elif defined (MAX_SIG)	229	#elif defined (MAX_SIG)
210	# define EV_NSIG (MAX_SIG+1)	230	# define EV_NSIG (MAX_SIG+1)
211	#elif defined (SIGARRAYSIZE)	231	#elif defined (SIGARRAYSIZE)
212	# define EV_NSIG SIGARRAYSIZE /* Assume ary[SIGARRAYSIZE] */	232	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
213	#elif defined (_sys_nsig)	233	#elif defined (_sys_nsig)
214	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	234	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
215	#else	235	#else
216	# error "unable to find value for NSIG, please report"	236	# error "unable to find value for NSIG, please report"
217	/* to make it compile regardless, just remove the above line */	237	/* to make it compile regardless, just remove the above line, */
		238	/* but consider reporting it, too! :) */
218	# define EV_NSIG 65	239	# define EV_NSIG 65
		240	#endif
		241
		242	#ifndef EV_USE_FLOOR
		243	# define EV_USE_FLOOR 0
219	#endif	244	#endif
220		245
221	#ifndef EV_USE_CLOCK_SYSCALL	246	#ifndef EV_USE_CLOCK_SYSCALL
222	# if __linux && __GLIBC__ >= 2	247	# if __linux && __GLIBC__ >= 2
223	# define EV_USE_CLOCK_SYSCALL 1	248	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
224	# else	249	# else
225	# define EV_USE_CLOCK_SYSCALL 0	250	# define EV_USE_CLOCK_SYSCALL 0
226	# endif	251	# endif
227	#endif	252	#endif
228		253
229	#ifndef EV_USE_MONOTONIC	254	#ifndef EV_USE_MONOTONIC
230	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	255	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0
231	# define EV_USE_MONOTONIC 1	256	# define EV_USE_MONOTONIC EV_FEATURE_OS
232	# else	257	# else
233	# define EV_USE_MONOTONIC 0	258	# define EV_USE_MONOTONIC 0
234	# endif	259	# endif
235	#endif	260	#endif
236		261
…		…
238	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL	263	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL
239	#endif	264	#endif
240		265
241	#ifndef EV_USE_NANOSLEEP	266	#ifndef EV_USE_NANOSLEEP
242	# if _POSIX_C_SOURCE >= 199309L	267	# if _POSIX_C_SOURCE >= 199309L
243	# define EV_USE_NANOSLEEP 1	268	# define EV_USE_NANOSLEEP EV_FEATURE_OS
244	# else	269	# else
245	# define EV_USE_NANOSLEEP 0	270	# define EV_USE_NANOSLEEP 0
246	# endif	271	# endif
247	#endif	272	#endif
248		273
249	#ifndef EV_USE_SELECT	274	#ifndef EV_USE_SELECT
250	# define EV_USE_SELECT 1	275	# define EV_USE_SELECT EV_FEATURE_BACKENDS
251	#endif	276	#endif
252		277
253	#ifndef EV_USE_POLL	278	#ifndef EV_USE_POLL
254	# ifdef _WIN32	279	# ifdef _WIN32
255	# define EV_USE_POLL 0	280	# define EV_USE_POLL 0
256	# else	281	# else
257	# define EV_USE_POLL 1	282	# define EV_USE_POLL EV_FEATURE_BACKENDS
258	# endif	283	# endif
259	#endif	284	#endif
260		285
261	#ifndef EV_USE_EPOLL	286	#ifndef EV_USE_EPOLL
262	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	287	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
263	# define EV_USE_EPOLL 1	288	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
264	# else	289	# else
265	# define EV_USE_EPOLL 0	290	# define EV_USE_EPOLL 0
266	# endif	291	# endif
267	#endif	292	#endif
268		293
…		…
274	# define EV_USE_PORT 0	299	# define EV_USE_PORT 0
275	#endif	300	#endif
276		301
277	#ifndef EV_USE_INOTIFY	302	#ifndef EV_USE_INOTIFY
278	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	303	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
279	# define EV_USE_INOTIFY 1	304	# define EV_USE_INOTIFY EV_FEATURE_OS
280	# else	305	# else
281	# define EV_USE_INOTIFY 0	306	# define EV_USE_INOTIFY 0
282	# endif	307	# endif
283	#endif	308	#endif
284		309
285	#ifndef EV_PID_HASHSIZE	310	#ifndef EV_PID_HASHSIZE
286	# if EV_MINIMAL	311	# define EV_PID_HASHSIZE EV_FEATURE_DATA ? 16 : 1
287	# define EV_PID_HASHSIZE 1
288	# else
289	# define EV_PID_HASHSIZE 16
290	# endif
291	#endif	312	#endif
292		313
293	#ifndef EV_INOTIFY_HASHSIZE	314	#ifndef EV_INOTIFY_HASHSIZE
294	# if EV_MINIMAL	315	# define EV_INOTIFY_HASHSIZE EV_FEATURE_DATA ? 16 : 1
295	# define EV_INOTIFY_HASHSIZE 1
296	# else
297	# define EV_INOTIFY_HASHSIZE 16
298	# endif
299	#endif	316	#endif
300		317
301	#ifndef EV_USE_EVENTFD	318	#ifndef EV_USE_EVENTFD
302	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	319	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
303	# define EV_USE_EVENTFD 1	320	# define EV_USE_EVENTFD EV_FEATURE_OS
304	# else	321	# else
305	# define EV_USE_EVENTFD 0	322	# define EV_USE_EVENTFD 0
306	# endif	323	# endif
307	#endif	324	#endif
308		325
309	#ifndef EV_USE_SIGNALFD	326	#ifndef EV_USE_SIGNALFD
310	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	327	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
311	# define EV_USE_SIGNALFD 1	328	# define EV_USE_SIGNALFD EV_FEATURE_OS
312	# else	329	# else
313	# define EV_USE_SIGNALFD 0	330	# define EV_USE_SIGNALFD 0
314	# endif	331	# endif
315	#endif	332	#endif
316		333
…		…
319	# define EV_USE_4HEAP 1	336	# define EV_USE_4HEAP 1
320	# define EV_HEAP_CACHE_AT 1	337	# define EV_HEAP_CACHE_AT 1
321	#endif	338	#endif
322		339
323	#ifndef EV_VERIFY	340	#ifndef EV_VERIFY
324	# define EV_VERIFY !EV_MINIMAL	341	# define EV_VERIFY (EV_FEATURE_API ? 1 : 0)
325	#endif	342	#endif
326		343
327	#ifndef EV_USE_4HEAP	344	#ifndef EV_USE_4HEAP
328	# define EV_USE_4HEAP !EV_MINIMAL	345	# define EV_USE_4HEAP EV_FEATURE_DATA
329	#endif	346	#endif
330		347
331	#ifndef EV_HEAP_CACHE_AT	348	#ifndef EV_HEAP_CACHE_AT
332	# define EV_HEAP_CACHE_AT !EV_MINIMAL	349	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
333	#endif	350	#endif
334		351
335	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */	352	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */
336	/* which makes programs even slower. might work on other unices, too. */	353	/* which makes programs even slower. might work on other unices, too. */
337	#if EV_USE_CLOCK_SYSCALL	354	#if EV_USE_CLOCK_SYSCALL
…		…
368	# undef EV_USE_INOTIFY	385	# undef EV_USE_INOTIFY
369	# define EV_USE_INOTIFY 0	386	# define EV_USE_INOTIFY 0
370	#endif	387	#endif
371		388
372	#if !EV_USE_NANOSLEEP	389	#if !EV_USE_NANOSLEEP
373	# ifndef _WIN32	390	/* hp-ux has it in sys/time.h, which we unconditionally include above */
		391	# if !defined(_WIN32) && !defined(__hpux)
374	# include <sys/select.h>	392	# include <sys/select.h>
375	# endif	393	# endif
376	#endif	394	#endif
377		395
378	#if EV_USE_INOTIFY	396	#if EV_USE_INOTIFY
379	# include <sys/utsname.h>
380	# include <sys/statfs.h>	397	# include <sys/statfs.h>
381	# include <sys/inotify.h>	398	# include <sys/inotify.h>
382	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */	399	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */
383	# ifndef IN_DONT_FOLLOW	400	# ifndef IN_DONT_FOLLOW
384	# undef EV_USE_INOTIFY	401	# undef EV_USE_INOTIFY
…		…
401	# define EFD_CLOEXEC O_CLOEXEC	418	# define EFD_CLOEXEC O_CLOEXEC
402	# else	419	# else
403	# define EFD_CLOEXEC 02000000	420	# define EFD_CLOEXEC 02000000
404	# endif	421	# endif
405	# endif	422	# endif
406	# ifdef __cplusplus
407	extern "C" {
408	# endif
409	int (eventfd) (unsigned int initval, int flags);	423	EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags);
410	# ifdef __cplusplus
411	}
412	# endif
413	#endif	424	#endif
414		425
415	#if EV_USE_SIGNALFD	426	#if EV_USE_SIGNALFD
416	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */	427	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */
417	# include <stdint.h>	428	# include <stdint.h>
…		…
423	# define SFD_CLOEXEC O_CLOEXEC	434	# define SFD_CLOEXEC O_CLOEXEC
424	# else	435	# else
425	# define SFD_CLOEXEC 02000000	436	# define SFD_CLOEXEC 02000000
426	# endif	437	# endif
427	# endif	438	# endif
428	# ifdef __cplusplus
429	extern "C" {
430	# endif
431	int signalfd (int fd, const sigset_t *mask, int flags);	439	EV_CPP (extern "C") int signalfd (int fd, const sigset_t *mask, int flags);
432		440
433	struct signalfd_siginfo	441	struct signalfd_siginfo
434	{	442	{
435	uint32_t ssi_signo;	443	uint32_t ssi_signo;
436	char pad[128 - sizeof (uint32_t)];	444	char pad[128 - sizeof (uint32_t)];
437	};	445	};
438	# ifdef __cplusplus
439	}
440	# endif	446	#endif
441	#endif
442
443		447
444	/**/	448	/**/
445		449
446	#if EV_VERIFY >= 3	450	#if EV_VERIFY >= 3
447	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	451	# define EV_FREQUENT_CHECK ev_verify (EV_A)
448	#else	452	#else
449	# define EV_FREQUENT_CHECK do { } while (0)	453	# define EV_FREQUENT_CHECK do { } while (0)
450	#endif	454	#endif
451		455
452	/*	456	/*
453	* This is used to avoid floating point rounding problems.	457	* This is used to work around floating point rounding problems.
454	* It is added to ev_rt_now when scheduling periodics
455	* to ensure progress, time-wise, even when rounding
456	* errors are against us.
457	* This value is good at least till the year 4000.	458	* This value is good at least till the year 4000.
458	* Better solutions welcome.
459	*/	459	*/
460	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	460	#define MIN_INTERVAL 0.0001220703125 /* 1/2**13, good till 4000 */
		461	/*#define MIN_INTERVAL 0.00000095367431640625 /* 1/2**20, good till 2200 */
461		462
462	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */	463	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
463	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */	464	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
		465
		466	#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0)
		467	#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0)
464		468
465	#if __GNUC__ >= 4	469	#if __GNUC__ >= 4
466	# define expect(expr,value) __builtin_expect ((expr),(value))	470	# define expect(expr,value) __builtin_expect ((expr),(value))
467	# define noinline __attribute__ ((noinline))	471	# define noinline __attribute__ ((noinline))
468	#else	472	#else
…		…
475		479
476	#define expect_false(expr) expect ((expr) != 0, 0)	480	#define expect_false(expr) expect ((expr) != 0, 0)
477	#define expect_true(expr) expect ((expr) != 0, 1)	481	#define expect_true(expr) expect ((expr) != 0, 1)
478	#define inline_size static inline	482	#define inline_size static inline
479		483
480	#if EV_MINIMAL	484	#if EV_FEATURE_CODE
		485	# define inline_speed static inline
		486	#else
481	# define inline_speed static noinline	487	# define inline_speed static noinline
482	#else
483	# define inline_speed static inline
484	#endif	488	#endif
485		489
486	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	490	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
487		491
488	#if EV_MINPRI == EV_MAXPRI	492	#if EV_MINPRI == EV_MAXPRI
…		…
501	#define ev_active(w) ((W)(w))->active	505	#define ev_active(w) ((W)(w))->active
502	#define ev_at(w) ((WT)(w))->at	506	#define ev_at(w) ((WT)(w))->at
503		507
504	#if EV_USE_REALTIME	508	#if EV_USE_REALTIME
505	/* sig_atomic_t is used to avoid per-thread variables or locking but still */	509	/* sig_atomic_t is used to avoid per-thread variables or locking but still */
506	/* giving it a reasonably high chance of working on typical architetcures */	510	/* giving it a reasonably high chance of working on typical architectures */
507	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */	511	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */
508	#endif	512	#endif
509		513
510	#if EV_USE_MONOTONIC	514	#if EV_USE_MONOTONIC
511	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */	515	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */
…		…
522	#endif	526	#endif
523		527
524	#ifdef _WIN32	528	#ifdef _WIN32
525	# include "ev_win32.c"	529	# include "ev_win32.c"
526	#endif	530	#endif
		531
		532	/*****************************************************************************/
		533
		534	/* define a suitable floor function (only used by periodics atm) */
		535
		536	#if EV_USE_FLOOR
		537	# include <math.h>
		538	# define ev_floor(v) floor (v)
		539	#else
		540
		541	#include <float.h>
		542
		543	/* a floor() replacement function, should be independent of ev_tstamp type */
		544	static ev_tstamp noinline
		545	ev_floor (ev_tstamp v)
		546	{
		547	/* the choice of shift factor is not terribly important */
		548	#if FLT_RADIX != 2 /* assume FLT_RADIX == 10 */
		549	const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 10000000000000000000. : 1000000000.;
		550	#else
		551	const ev_tstamp shift = sizeof (unsigned long) >= 8 ? 18446744073709551616. : 4294967296.;
		552	#endif
		553
		554	/* argument too large for an unsigned long? */
		555	if (expect_false (v >= shift))
		556	{
		557	ev_tstamp f;
		558
		559	if (v == v - 1.)
		560	return v; /* very large number */
		561
		562	f = shift * ev_floor (v * (1. / shift));
		563	return f + ev_floor (v - f);
		564	}
		565
		566	/* special treatment for negative args? */
		567	if (expect_false (v < 0.))
		568	{
		569	ev_tstamp f = -ev_floor (-v);
		570
		571	return f - (f == v ? 0 : 1);
		572	}
		573
		574	/* fits into an unsigned long */
		575	return (unsigned long)v;
		576	}
		577
		578	#endif
		579
		580	/*****************************************************************************/
		581
		582	#ifdef __linux
		583	# include <sys/utsname.h>
		584	#endif
		585
		586	static unsigned int noinline
		587	ev_linux_version (void)
		588	{
		589	#ifdef __linux
		590	unsigned int v = 0;
		591	struct utsname buf;
		592	int i;
		593	char *p = buf.release;
		594
		595	if (uname (&buf))
		596	return 0;
		597
		598	for (i = 3+1; --i; )
		599	{
		600	unsigned int c = 0;
		601
		602	for (;;)
		603	{
		604	if (*p >= '0' && *p <= '9')
		605	c = c * 10 + *p++ - '0';
		606	else
		607	{
		608	p += *p == '.';
		609	break;
		610	}
		611	}
		612
		613	v = (v << 8) | c;
		614	}
		615
		616	return v;
		617	#else
		618	return 0;
		619	#endif
		620	}
527		621
528	/*****************************************************************************/	622	/*****************************************************************************/
529		623
530	#if EV_AVOID_STDIO	624	#if EV_AVOID_STDIO
531	static void noinline	625	static void noinline
…		…
552	if (syserr_cb)	646	if (syserr_cb)
553	syserr_cb (msg);	647	syserr_cb (msg);
554	else	648	else
555	{	649	{
556	#if EV_AVOID_STDIO	650	#if EV_AVOID_STDIO
557	const char *err = strerror (errno);
558
559	ev_printerr (msg);	651	ev_printerr (msg);
560	ev_printerr (": ");	652	ev_printerr (": ");
561	ev_printerr (err);	653	ev_printerr (strerror (errno));
562	ev_printerr ("\n");	654	ev_printerr ("\n");
563	#else	655	#else
564	perror (msg);	656	perror (msg);
565	#endif	657	#endif
566	abort ();	658	abort ();
…		…
568	}	660	}
569		661
570	static void *	662	static void *
571	ev_realloc_emul (void *ptr, long size)	663	ev_realloc_emul (void *ptr, long size)
572	{	664	{
		665	#if __GLIBC__
		666	return realloc (ptr, size);
		667	#else
573	/* some systems, notably openbsd and darwin, fail to properly	668	/* some systems, notably openbsd and darwin, fail to properly
574	* implement realloc (x, 0) (as required by both ansi c-98 and	669	* implement realloc (x, 0) (as required by both ansi c-89 and
575	* the single unix specification, so work around them here.	670	* the single unix specification, so work around them here.
576	*/	671	*/
577		672
578	if (size)	673	if (size)
579	return realloc (ptr, size);	674	return realloc (ptr, size);
580		675
581	free (ptr);	676	free (ptr);
582	return 0;	677	return 0;
		678	#endif
583	}	679	}
584		680
585	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	681	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
586		682
587	void	683	void
…		…
596	ptr = alloc (ptr, size);	692	ptr = alloc (ptr, size);
597		693
598	if (!ptr && size)	694	if (!ptr && size)
599	{	695	{
600	#if EV_AVOID_STDIO	696	#if EV_AVOID_STDIO
601	ev_printerr ("libev: memory allocation failed, aborting.\n");	697	ev_printerr ("(libev) memory allocation failed, aborting.\n");
602	#else	698	#else
603	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	699	fprintf (stderr, "(libev) cannot allocate %ld bytes, aborting.", size);
604	#endif	700	#endif
605	abort ();	701	abort ();
606	}	702	}
607		703
608	return ptr;	704	return ptr;
…		…
625	unsigned char emask; /* the epoll backend stores the actual kernel mask in here */	721	unsigned char emask; /* the epoll backend stores the actual kernel mask in here */
626	unsigned char unused;	722	unsigned char unused;
627	#if EV_USE_EPOLL	723	#if EV_USE_EPOLL
628	unsigned int egen; /* generation counter to counter epoll bugs */	724	unsigned int egen; /* generation counter to counter epoll bugs */
629	#endif	725	#endif
630	#if EV_SELECT_IS_WINSOCKET	726	#if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP
631	SOCKET handle;	727	SOCKET handle;
		728	#endif
		729	#if EV_USE_IOCP
		730	OVERLAPPED or, ow;
632	#endif	731	#endif
633	} ANFD;	732	} ANFD;
634		733
635	/* stores the pending event set for a given watcher */	734	/* stores the pending event set for a given watcher */
636	typedef struct	735	typedef struct
…		…
691		790
692	static int ev_default_loop_ptr;	791	static int ev_default_loop_ptr;
693		792
694	#endif	793	#endif
695		794
696	#if EV_MINIMAL < 2	795	#if EV_FEATURE_API
697	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)	796	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)
698	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)	797	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)
699	# define EV_INVOKE_PENDING invoke_cb (EV_A)	798	# define EV_INVOKE_PENDING invoke_cb (EV_A)
700	#else	799	#else
701	# define EV_RELEASE_CB (void)0	800	# define EV_RELEASE_CB (void)0
702	# define EV_ACQUIRE_CB (void)0	801	# define EV_ACQUIRE_CB (void)0
703	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)	802	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)
704	#endif	803	#endif
705		804
706	#define EVUNLOOP_RECURSE 0x80	805	#define EVBREAK_RECURSE 0x80
707		806
708	/*****************************************************************************/	807	/*****************************************************************************/
709		808
710	#ifndef EV_HAVE_EV_TIME	809	#ifndef EV_HAVE_EV_TIME
711	ev_tstamp	810	ev_tstamp
…		…
755	if (delay > 0.)	854	if (delay > 0.)
756	{	855	{
757	#if EV_USE_NANOSLEEP	856	#if EV_USE_NANOSLEEP
758	struct timespec ts;	857	struct timespec ts;
759		858
760	ts.tv_sec = (time_t)delay;	859	EV_TS_SET (ts, delay);
761	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
762
763	nanosleep (&ts, 0);	860	nanosleep (&ts, 0);
764	#elif defined(_WIN32)	861	#elif defined(_WIN32)
765	Sleep ((unsigned long)(delay * 1e3));	862	Sleep ((unsigned long)(delay * 1e3));
766	#else	863	#else
767	struct timeval tv;	864	struct timeval tv;
768		865
769	tv.tv_sec = (time_t)delay;
770	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
771
772	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */	866	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
773	/* something not guaranteed by newer posix versions, but guaranteed */	867	/* something not guaranteed by newer posix versions, but guaranteed */
774	/* by older ones */	868	/* by older ones */
		869	EV_TV_SET (tv, delay);
775	select (0, 0, 0, 0, &tv);	870	select (0, 0, 0, 0, &tv);
776	#endif	871	#endif
777	}	872	}
778	}	873	}
779		874
780	/*****************************************************************************/	875	/*****************************************************************************/
781		876
782	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */	877	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */
783		878
784	/* find a suitable new size for the given array, */	879	/* find a suitable new size for the given array, */
785	/* hopefully by rounding to a ncie-to-malloc size */	880	/* hopefully by rounding to a nice-to-malloc size */
786	inline_size int	881	inline_size int
787	array_nextsize (int elem, int cur, int cnt)	882	array_nextsize (int elem, int cur, int cnt)
788	{	883	{
789	int ncur = cur + 1;	884	int ncur = cur + 1;
790		885
…		…
886	}	981	}
887		982
888	/*****************************************************************************/	983	/*****************************************************************************/
889		984
890	inline_speed void	985	inline_speed void
891	fd_event_nc (EV_P_ int fd, int revents)	986	fd_event_nocheck (EV_P_ int fd, int revents)
892	{	987	{
893	ANFD *anfd = anfds + fd;	988	ANFD *anfd = anfds + fd;
894	ev_io *w;	989	ev_io *w;
895		990
896	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	991	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
…		…
908	fd_event (EV_P_ int fd, int revents)	1003	fd_event (EV_P_ int fd, int revents)
909	{	1004	{
910	ANFD *anfd = anfds + fd;	1005	ANFD *anfd = anfds + fd;
911		1006
912	if (expect_true (!anfd->reify))	1007	if (expect_true (!anfd->reify))
913	fd_event_nc (EV_A_ fd, revents);	1008	fd_event_nocheck (EV_A_ fd, revents);
914	}	1009	}
915		1010
916	void	1011	void
917	ev_feed_fd_event (EV_P_ int fd, int revents)	1012	ev_feed_fd_event (EV_P_ int fd, int revents)
918	{	1013	{
919	if (fd >= 0 && fd < anfdmax)	1014	if (fd >= 0 && fd < anfdmax)
920	fd_event_nc (EV_A_ fd, revents);	1015	fd_event_nocheck (EV_A_ fd, revents);
921	}	1016	}
922		1017
923	/* make sure the external fd watch events are in-sync */	1018	/* make sure the external fd watch events are in-sync */
924	/* with the kernel/libev internal state */	1019	/* with the kernel/libev internal state */
925	inline_size void	1020	inline_size void
926	fd_reify (EV_P)	1021	fd_reify (EV_P)
927	{	1022	{
928	int i;	1023	int i;
929		1024
		1025	#if EV_SELECT_IS_WINSOCKET || EV_USE_IOCP
		1026	for (i = 0; i < fdchangecnt; ++i)
		1027	{
		1028	int fd = fdchanges [i];
		1029	ANFD *anfd = anfds + fd;
		1030
		1031	if (anfd->reify & EV__IOFDSET && anfd->head)
		1032	{
		1033	SOCKET handle = EV_FD_TO_WIN32_HANDLE (fd);
		1034
		1035	if (handle != anfd->handle)
		1036	{
		1037	unsigned long arg;
		1038
		1039	assert (("libev: only socket fds supported in this configuration", ioctlsocket (handle, FIONREAD, &arg) == 0));
		1040
		1041	/* handle changed, but fd didn't - we need to do it in two steps */
		1042	backend_modify (EV_A_ fd, anfd->events, 0);
		1043	anfd->events = 0;
		1044	anfd->handle = handle;
		1045	}
		1046	}
		1047	}
		1048	#endif
		1049
930	for (i = 0; i < fdchangecnt; ++i)	1050	for (i = 0; i < fdchangecnt; ++i)
931	{	1051	{
932	int fd = fdchanges [i];	1052	int fd = fdchanges [i];
933	ANFD *anfd = anfds + fd;	1053	ANFD *anfd = anfds + fd;
934	ev_io *w;	1054	ev_io *w;
935		1055
936	unsigned char events = 0;	1056	unsigned char o_events = anfd->events;
		1057	unsigned char o_reify = anfd->reify;
937		1058
938	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	1059	anfd->reify = 0;
939	events |= (unsigned char)w->events;
940		1060
941	#if EV_SELECT_IS_WINSOCKET	1061	/*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */
942	if (events)
943	{	1062	{
944	unsigned long arg;	1063	anfd->events = 0;
945	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	1064
946	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	1065	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
		1066	anfd->events |= (unsigned char)w->events;
		1067
		1068	if (o_events != anfd->events)
		1069	o_reify = EV__IOFDSET; /* actually |= */
947	}	1070	}
948	#endif
949		1071
950	{	1072	if (o_reify & EV__IOFDSET)
951	unsigned char o_events = anfd->events;
952	unsigned char o_reify = anfd->reify;
953
954	anfd->reify = 0;
955	anfd->events = events;
956
957	if (o_events != events || o_reify & EV__IOFDSET)
958	backend_modify (EV_A_ fd, o_events, events);	1073	backend_modify (EV_A_ fd, o_events, anfd->events);
959	}
960	}	1074	}
961		1075
962	fdchangecnt = 0;	1076	fdchangecnt = 0;
963	}	1077	}
964		1078
…		…
988	ev_io_stop (EV_A_ w);	1102	ev_io_stop (EV_A_ w);
989	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);	1103	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
990	}	1104	}
991	}	1105	}
992		1106
993	/* check whether the given fd is atcually valid, for error recovery */	1107	/* check whether the given fd is actually valid, for error recovery */
994	inline_size int	1108	inline_size int
995	fd_valid (int fd)	1109	fd_valid (int fd)
996	{	1110	{
997	#ifdef _WIN32	1111	#ifdef _WIN32
998	return EV_FD_TO_WIN32_HANDLE (fd) != -1;	1112	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
…		…
1040	anfds [fd].emask = 0;	1154	anfds [fd].emask = 0;
1041	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1155	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
1042	}	1156	}
1043	}	1157	}
1044		1158
		1159	/* used to prepare libev internal fd's */
		1160	/* this is not fork-safe */
		1161	inline_speed void
		1162	fd_intern (int fd)
		1163	{
		1164	#ifdef _WIN32
		1165	unsigned long arg = 1;
		1166	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1167	#else
		1168	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1169	fcntl (fd, F_SETFL, O_NONBLOCK);
		1170	#endif
		1171	}
		1172
1045	/*****************************************************************************/	1173	/*****************************************************************************/
1046		1174
1047	/*	1175	/*
1048	* the heap functions want a real array index. array index 0 uis guaranteed to not	1176	* the heap functions want a real array index. array index 0 is guaranteed to not
1049	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives	1177	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
1050	* the branching factor of the d-tree.	1178	* the branching factor of the d-tree.
1051	*/	1179	*/
1052		1180
1053	/*	1181	/*
…		…
1201		1329
1202	static ANSIG signals [EV_NSIG - 1];	1330	static ANSIG signals [EV_NSIG - 1];
1203		1331
1204	/*****************************************************************************/	1332	/*****************************************************************************/
1205		1333
1206	/* used to prepare libev internal fd's */	1334	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1207	/* this is not fork-safe */
1208	inline_speed void
1209	fd_intern (int fd)
1210	{
1211	#ifdef _WIN32
1212	unsigned long arg = 1;
1213	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
1214	#else
1215	fcntl (fd, F_SETFD, FD_CLOEXEC);
1216	fcntl (fd, F_SETFL, O_NONBLOCK);
1217	#endif
1218	}
1219		1335
1220	static void noinline	1336	static void noinline
1221	evpipe_init (EV_P)	1337	evpipe_init (EV_P)
1222	{	1338	{
1223	if (!ev_is_active (&pipe_w))	1339	if (!ev_is_active (&pipe_w))
1224	{	1340	{
1225	#if EV_USE_EVENTFD	1341	# if EV_USE_EVENTFD
1226	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1342	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1227	if (evfd < 0 && errno == EINVAL)	1343	if (evfd < 0 && errno == EINVAL)
1228	evfd = eventfd (0, 0);	1344	evfd = eventfd (0, 0);
1229		1345
1230	if (evfd >= 0)	1346	if (evfd >= 0)
…		…
1232	evpipe [0] = -1;	1348	evpipe [0] = -1;
1233	fd_intern (evfd); /* doing it twice doesn't hurt */	1349	fd_intern (evfd); /* doing it twice doesn't hurt */
1234	ev_io_set (&pipe_w, evfd, EV_READ);	1350	ev_io_set (&pipe_w, evfd, EV_READ);
1235	}	1351	}
1236	else	1352	else
1237	#endif	1353	# endif
1238	{	1354	{
1239	while (pipe (evpipe))	1355	while (pipe (evpipe))
1240	ev_syserr ("(libev) error creating signal/async pipe");	1356	ev_syserr ("(libev) error creating signal/async pipe");
1241		1357
1242	fd_intern (evpipe [0]);	1358	fd_intern (evpipe [0]);
…		…
1253	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1369	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1254	{	1370	{
1255	if (!*flag)	1371	if (!*flag)
1256	{	1372	{
1257	int old_errno = errno; /* save errno because write might clobber it */	1373	int old_errno = errno; /* save errno because write might clobber it */
		1374	char dummy;
1258		1375
1259	*flag = 1;	1376	*flag = 1;
1260		1377
1261	#if EV_USE_EVENTFD	1378	#if EV_USE_EVENTFD
1262	if (evfd >= 0)	1379	if (evfd >= 0)
…		…
1264	uint64_t counter = 1;	1381	uint64_t counter = 1;
1265	write (evfd, &counter, sizeof (uint64_t));	1382	write (evfd, &counter, sizeof (uint64_t));
1266	}	1383	}
1267	else	1384	else
1268	#endif	1385	#endif
		1386	/* win32 people keep sending patches that change this write() to send() */
		1387	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1388	/* so when you think this write should be a send instead, please find out */
		1389	/* where your send() is from - it's definitely not the microsoft send, and */
		1390	/* tell me. thank you. */
1269	write (evpipe [1], &old_errno, 1);	1391	write (evpipe [1], &dummy, 1);
1270		1392
1271	errno = old_errno;	1393	errno = old_errno;
1272	}	1394	}
1273	}	1395	}
1274		1396
…		…
1287	}	1409	}
1288	else	1410	else
1289	#endif	1411	#endif
1290	{	1412	{
1291	char dummy;	1413	char dummy;
		1414	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1292	read (evpipe [0], &dummy, 1);	1415	read (evpipe [0], &dummy, 1);
1293	}	1416	}
1294		1417
		1418	#if EV_SIGNAL_ENABLE
1295	if (sig_pending)	1419	if (sig_pending)
1296	{	1420	{
1297	sig_pending = 0;	1421	sig_pending = 0;
1298		1422
1299	for (i = EV_NSIG - 1; i--; )	1423	for (i = EV_NSIG - 1; i--; )
1300	if (expect_false (signals [i].pending))	1424	if (expect_false (signals [i].pending))
1301	ev_feed_signal_event (EV_A_ i + 1);	1425	ev_feed_signal_event (EV_A_ i + 1);
1302	}	1426	}
		1427	#endif
1303		1428
1304	#if EV_ASYNC_ENABLE	1429	#if EV_ASYNC_ENABLE
1305	if (async_pending)	1430	if (async_pending)
1306	{	1431	{
1307	async_pending = 0;	1432	async_pending = 0;
…		…
1316	#endif	1441	#endif
1317	}	1442	}
1318		1443
1319	/*****************************************************************************/	1444	/*****************************************************************************/
1320		1445
		1446	void
		1447	ev_feed_signal (int signum)
		1448	{
		1449	#if EV_MULTIPLICITY
		1450	EV_P = signals [signum - 1].loop;
		1451
		1452	if (!EV_A)
		1453	return;
		1454	#endif
		1455
		1456	signals [signum - 1].pending = 1;
		1457	evpipe_write (EV_A_ &sig_pending);
		1458	}
		1459
1321	static void	1460	static void
1322	ev_sighandler (int signum)	1461	ev_sighandler (int signum)
1323	{	1462	{
1324	#if EV_MULTIPLICITY
1325	EV_P = signals [signum - 1].loop;
1326	#endif
1327
1328	#ifdef _WIN32	1463	#ifdef _WIN32
1329	signal (signum, ev_sighandler);	1464	signal (signum, ev_sighandler);
1330	#endif	1465	#endif
1331		1466
1332	signals [signum - 1].pending = 1;	1467	ev_feed_signal (signum);
1333	evpipe_write (EV_A_ &sig_pending);
1334	}	1468	}
1335		1469
1336	void noinline	1470	void noinline
1337	ev_feed_signal_event (EV_P_ int signum)	1471	ev_feed_signal_event (EV_P_ int signum)
1338	{	1472	{
…		…
1375	break;	1509	break;
1376	}	1510	}
1377	}	1511	}
1378	#endif	1512	#endif
1379		1513
		1514	#endif
		1515
1380	/*****************************************************************************/	1516	/*****************************************************************************/
1381		1517
		1518	#if EV_CHILD_ENABLE
1382	static WL childs [EV_PID_HASHSIZE];	1519	static WL childs [EV_PID_HASHSIZE];
1383
1384	#ifndef _WIN32
1385		1520
1386	static ev_signal childev;	1521	static ev_signal childev;
1387		1522
1388	#ifndef WIFCONTINUED	1523	#ifndef WIFCONTINUED
1389	# define WIFCONTINUED(status) 0	1524	# define WIFCONTINUED(status) 0
…		…
1394	child_reap (EV_P_ int chain, int pid, int status)	1529	child_reap (EV_P_ int chain, int pid, int status)
1395	{	1530	{
1396	ev_child *w;	1531	ev_child *w;
1397	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1532	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1398		1533
1399	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1534	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1400	{	1535	{
1401	if ((w->pid == pid || !w->pid)	1536	if ((w->pid == pid || !w->pid)
1402	&& (!traced || (w->flags & 1)))	1537	&& (!traced || (w->flags & 1)))
1403	{	1538	{
1404	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */	1539	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */
…		…
1429	/* make sure we are called again until all children have been reaped */	1564	/* make sure we are called again until all children have been reaped */
1430	/* we need to do it this way so that the callback gets called before we continue */	1565	/* we need to do it this way so that the callback gets called before we continue */
1431	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1566	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1432		1567
1433	child_reap (EV_A_ pid, pid, status);	1568	child_reap (EV_A_ pid, pid, status);
1434	if (EV_PID_HASHSIZE > 1)	1569	if ((EV_PID_HASHSIZE) > 1)
1435	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1570	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1436	}	1571	}
1437		1572
1438	#endif	1573	#endif
1439		1574
1440	/*****************************************************************************/	1575	/*****************************************************************************/
1441		1576
		1577	#if EV_USE_IOCP
		1578	# include "ev_iocp.c"
		1579	#endif
1442	#if EV_USE_PORT	1580	#if EV_USE_PORT
1443	# include "ev_port.c"	1581	# include "ev_port.c"
1444	#endif	1582	#endif
1445	#if EV_USE_KQUEUE	1583	#if EV_USE_KQUEUE
1446	# include "ev_kqueue.c"	1584	# include "ev_kqueue.c"
…		…
1506	#ifdef __APPLE__	1644	#ifdef __APPLE__
1507	/* only select works correctly on that "unix-certified" platform */	1645	/* only select works correctly on that "unix-certified" platform */
1508	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1646	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1509	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1647	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1510	#endif	1648	#endif
		1649	#ifdef __FreeBSD__
		1650	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1651	#endif
1511		1652
1512	return flags;	1653	return flags;
1513	}	1654	}
1514		1655
1515	unsigned int	1656	unsigned int
1516	ev_embeddable_backends (void)	1657	ev_embeddable_backends (void)
1517	{	1658	{
1518	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;	1659	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
1519		1660
1520	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */	1661	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */
1521	/* please fix it and tell me how to detect the fix */	1662	if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */
1522	flags &= ~EVBACKEND_EPOLL;	1663	flags &= ~EVBACKEND_EPOLL;
1523		1664
1524	return flags;	1665	return flags;
1525	}	1666	}
1526		1667
1527	unsigned int	1668	unsigned int
1528	ev_backend (EV_P)	1669	ev_backend (EV_P)
1529	{	1670	{
1530	return backend;	1671	return backend;
1531	}	1672	}
1532		1673
1533	#if EV_MINIMAL < 2	1674	#if EV_FEATURE_API
1534	unsigned int	1675	unsigned int
1535	ev_loop_count (EV_P)	1676	ev_iteration (EV_P)
1536	{	1677	{
1537	return loop_count;	1678	return loop_count;
1538	}	1679	}
1539		1680
1540	unsigned int	1681	unsigned int
1541	ev_loop_depth (EV_P)	1682	ev_depth (EV_P)
1542	{	1683	{
1543	return loop_depth;	1684	return loop_depth;
1544	}	1685	}
1545		1686
1546	void	1687	void
…		…
1583	static void noinline	1724	static void noinline
1584	loop_init (EV_P_ unsigned int flags)	1725	loop_init (EV_P_ unsigned int flags)
1585	{	1726	{
1586	if (!backend)	1727	if (!backend)
1587	{	1728	{
		1729	origflags = flags;
		1730
1588	#if EV_USE_REALTIME	1731	#if EV_USE_REALTIME
1589	if (!have_realtime)	1732	if (!have_realtime)
1590	{	1733	{
1591	struct timespec ts;	1734	struct timespec ts;
1592		1735
…		…
1618		1761
1619	ev_rt_now = ev_time ();	1762	ev_rt_now = ev_time ();
1620	mn_now = get_clock ();	1763	mn_now = get_clock ();
1621	now_floor = mn_now;	1764	now_floor = mn_now;
1622	rtmn_diff = ev_rt_now - mn_now;	1765	rtmn_diff = ev_rt_now - mn_now;
1623	#if EV_MINIMAL < 2	1766	#if EV_FEATURE_API
1624	invoke_cb = ev_invoke_pending;	1767	invoke_cb = ev_invoke_pending;
1625	#endif	1768	#endif
1626		1769
1627	io_blocktime = 0.;	1770	io_blocktime = 0.;
1628	timeout_blocktime = 0.;	1771	timeout_blocktime = 0.;
…		…
1637	#endif	1780	#endif
1638	#if EV_USE_SIGNALFD	1781	#if EV_USE_SIGNALFD
1639	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;	1782	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1640	#endif	1783	#endif
1641		1784
1642	if (!(flags & 0x0000ffffU))	1785	if (!(flags & EVBACKEND_MASK))
1643	flags |= ev_recommended_backends ();	1786	flags |= ev_recommended_backends ();
1644		1787
		1788	#if EV_USE_IOCP
		1789	if (!backend && (flags & EVBACKEND_IOCP )) backend = iocp_init (EV_A_ flags);
		1790	#endif
1645	#if EV_USE_PORT	1791	#if EV_USE_PORT
1646	if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags);	1792	if (!backend && (flags & EVBACKEND_PORT )) backend = port_init (EV_A_ flags);
1647	#endif	1793	#endif
1648	#if EV_USE_KQUEUE	1794	#if EV_USE_KQUEUE
1649	if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags);	1795	if (!backend && (flags & EVBACKEND_KQUEUE)) backend = kqueue_init (EV_A_ flags);
…		…
1658	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1804	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1659	#endif	1805	#endif
1660		1806
1661	ev_prepare_init (&pending_w, pendingcb);	1807	ev_prepare_init (&pending_w, pendingcb);
1662		1808
		1809	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1663	ev_init (&pipe_w, pipecb);	1810	ev_init (&pipe_w, pipecb);
1664	ev_set_priority (&pipe_w, EV_MAXPRI);	1811	ev_set_priority (&pipe_w, EV_MAXPRI);
		1812	#endif
1665	}	1813	}
1666	}	1814	}
1667		1815
1668	/* free up a loop structure */	1816	/* free up a loop structure */
1669	static void noinline	1817	void
1670	loop_destroy (EV_P)	1818	ev_loop_destroy (EV_P)
1671	{	1819	{
1672	int i;	1820	int i;
		1821
		1822	#if EV_MULTIPLICITY
		1823	/* mimic free (0) */
		1824	if (!EV_A)
		1825	return;
		1826	#endif
		1827
		1828	#if EV_CLEANUP_ENABLE
		1829	/* queue cleanup watchers (and execute them) */
		1830	if (expect_false (cleanupcnt))
		1831	{
		1832	queue_events (EV_A_ (W *)cleanups, cleanupcnt, EV_CLEANUP);
		1833	EV_INVOKE_PENDING;
		1834	}
		1835	#endif
		1836
		1837	#if EV_CHILD_ENABLE
		1838	if (ev_is_active (&childev))
		1839	{
		1840	ev_ref (EV_A); /* child watcher */
		1841	ev_signal_stop (EV_A_ &childev);
		1842	}
		1843	#endif
1673		1844
1674	if (ev_is_active (&pipe_w))	1845	if (ev_is_active (&pipe_w))
1675	{	1846	{
1676	/*ev_ref (EV_A);*/	1847	/*ev_ref (EV_A);*/
1677	/*ev_io_stop (EV_A_ &pipe_w);*/	1848	/*ev_io_stop (EV_A_ &pipe_w);*/
…		…
1699	#endif	1870	#endif
1700		1871
1701	if (backend_fd >= 0)	1872	if (backend_fd >= 0)
1702	close (backend_fd);	1873	close (backend_fd);
1703		1874
		1875	#if EV_USE_IOCP
		1876	if (backend == EVBACKEND_IOCP ) iocp_destroy (EV_A);
		1877	#endif
1704	#if EV_USE_PORT	1878	#if EV_USE_PORT
1705	if (backend == EVBACKEND_PORT ) port_destroy (EV_A);	1879	if (backend == EVBACKEND_PORT ) port_destroy (EV_A);
1706	#endif	1880	#endif
1707	#if EV_USE_KQUEUE	1881	#if EV_USE_KQUEUE
1708	if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A);	1882	if (backend == EVBACKEND_KQUEUE) kqueue_destroy (EV_A);
…		…
1735	array_free (periodic, EMPTY);	1909	array_free (periodic, EMPTY);
1736	#endif	1910	#endif
1737	#if EV_FORK_ENABLE	1911	#if EV_FORK_ENABLE
1738	array_free (fork, EMPTY);	1912	array_free (fork, EMPTY);
1739	#endif	1913	#endif
		1914	#if EV_CLEANUP_ENABLE
		1915	array_free (cleanup, EMPTY);
		1916	#endif
1740	array_free (prepare, EMPTY);	1917	array_free (prepare, EMPTY);
1741	array_free (check, EMPTY);	1918	array_free (check, EMPTY);
1742	#if EV_ASYNC_ENABLE	1919	#if EV_ASYNC_ENABLE
1743	array_free (async, EMPTY);	1920	array_free (async, EMPTY);
1744	#endif	1921	#endif
1745		1922
1746	backend = 0;	1923	backend = 0;
		1924
		1925	#if EV_MULTIPLICITY
		1926	if (ev_is_default_loop (EV_A))
		1927	#endif
		1928	ev_default_loop_ptr = 0;
		1929	#if EV_MULTIPLICITY
		1930	else
		1931	ev_free (EV_A);
		1932	#endif
1747	}	1933	}
1748		1934
1749	#if EV_USE_INOTIFY	1935	#if EV_USE_INOTIFY
1750	inline_size void infy_fork (EV_P);	1936	inline_size void infy_fork (EV_P);
1751	#endif	1937	#endif
…		…
1787	{	1973	{
1788	EV_WIN32_CLOSE_FD (evpipe [0]);	1974	EV_WIN32_CLOSE_FD (evpipe [0]);
1789	EV_WIN32_CLOSE_FD (evpipe [1]);	1975	EV_WIN32_CLOSE_FD (evpipe [1]);
1790	}	1976	}
1791		1977
		1978	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1792	evpipe_init (EV_A);	1979	evpipe_init (EV_A);
1793	/* now iterate over everything, in case we missed something */	1980	/* now iterate over everything, in case we missed something */
1794	pipecb (EV_A_ &pipe_w, EV_READ);	1981	pipecb (EV_A_ &pipe_w, EV_READ);
		1982	#endif
1795	}	1983	}
1796		1984
1797	postfork = 0;	1985	postfork = 0;
1798	}	1986	}
1799		1987
…		…
1808	loop_init (EV_A_ flags);	1996	loop_init (EV_A_ flags);
1809		1997
1810	if (ev_backend (EV_A))	1998	if (ev_backend (EV_A))
1811	return EV_A;	1999	return EV_A;
1812		2000
		2001	ev_free (EV_A);
1813	return 0;	2002	return 0;
1814	}	2003	}
1815		2004
1816	void
1817	ev_loop_destroy (EV_P)
1818	{
1819	loop_destroy (EV_A);
1820	ev_free (loop);
1821	}
1822
1823	void
1824	ev_loop_fork (EV_P)
1825	{
1826	postfork = 1; /* must be in line with ev_default_fork */
1827	}
1828	#endif /* multiplicity */	2005	#endif /* multiplicity */
1829		2006
1830	#if EV_VERIFY	2007	#if EV_VERIFY
1831	static void noinline	2008	static void noinline
1832	verify_watcher (EV_P_ W w)	2009	verify_watcher (EV_P_ W w)
…		…
1861	verify_watcher (EV_A_ ws [cnt]);	2038	verify_watcher (EV_A_ ws [cnt]);
1862	}	2039	}
1863	}	2040	}
1864	#endif	2041	#endif
1865		2042
1866	#if EV_MINIMAL < 2	2043	#if EV_FEATURE_API
1867	void	2044	void
1868	ev_loop_verify (EV_P)	2045	ev_verify (EV_P)
1869	{	2046	{
1870	#if EV_VERIFY	2047	#if EV_VERIFY
1871	int i;	2048	int i;
1872	WL w;	2049	WL w;
1873		2050
…		…
1907	#if EV_FORK_ENABLE	2084	#if EV_FORK_ENABLE
1908	assert (forkmax >= forkcnt);	2085	assert (forkmax >= forkcnt);
1909	array_verify (EV_A_ (W *)forks, forkcnt);	2086	array_verify (EV_A_ (W *)forks, forkcnt);
1910	#endif	2087	#endif
1911		2088
		2089	#if EV_CLEANUP_ENABLE
		2090	assert (cleanupmax >= cleanupcnt);
		2091	array_verify (EV_A_ (W *)cleanups, cleanupcnt);
		2092	#endif
		2093
1912	#if EV_ASYNC_ENABLE	2094	#if EV_ASYNC_ENABLE
1913	assert (asyncmax >= asynccnt);	2095	assert (asyncmax >= asynccnt);
1914	array_verify (EV_A_ (W *)asyncs, asynccnt);	2096	array_verify (EV_A_ (W *)asyncs, asynccnt);
1915	#endif	2097	#endif
1916		2098
		2099	#if EV_PREPARE_ENABLE
1917	assert (preparemax >= preparecnt);	2100	assert (preparemax >= preparecnt);
1918	array_verify (EV_A_ (W *)prepares, preparecnt);	2101	array_verify (EV_A_ (W *)prepares, preparecnt);
		2102	#endif
1919		2103
		2104	#if EV_CHECK_ENABLE
1920	assert (checkmax >= checkcnt);	2105	assert (checkmax >= checkcnt);
1921	array_verify (EV_A_ (W *)checks, checkcnt);	2106	array_verify (EV_A_ (W *)checks, checkcnt);
		2107	#endif
1922		2108
1923	# if 0	2109	# if 0
		2110	#if EV_CHILD_ENABLE
1924	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	2111	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1925	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	2112	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		2113	#endif
1926	# endif	2114	# endif
1927	#endif	2115	#endif
1928	}	2116	}
1929	#endif	2117	#endif
1930		2118
1931	#if EV_MULTIPLICITY	2119	#if EV_MULTIPLICITY
1932	struct ev_loop *	2120	struct ev_loop *
1933	ev_default_loop_init (unsigned int flags)
1934	#else	2121	#else
1935	int	2122	int
		2123	#endif
1936	ev_default_loop (unsigned int flags)	2124	ev_default_loop (unsigned int flags)
1937	#endif
1938	{	2125	{
1939	if (!ev_default_loop_ptr)	2126	if (!ev_default_loop_ptr)
1940	{	2127	{
1941	#if EV_MULTIPLICITY	2128	#if EV_MULTIPLICITY
1942	EV_P = ev_default_loop_ptr = &default_loop_struct;	2129	EV_P = ev_default_loop_ptr = &default_loop_struct;
…		…
1946		2133
1947	loop_init (EV_A_ flags);	2134	loop_init (EV_A_ flags);
1948		2135
1949	if (ev_backend (EV_A))	2136	if (ev_backend (EV_A))
1950	{	2137	{
1951	#ifndef _WIN32	2138	#if EV_CHILD_ENABLE
1952	ev_signal_init (&childev, childcb, SIGCHLD);	2139	ev_signal_init (&childev, childcb, SIGCHLD);
1953	ev_set_priority (&childev, EV_MAXPRI);	2140	ev_set_priority (&childev, EV_MAXPRI);
1954	ev_signal_start (EV_A_ &childev);	2141	ev_signal_start (EV_A_ &childev);
1955	ev_unref (EV_A); /* child watcher should not keep loop alive */	2142	ev_unref (EV_A); /* child watcher should not keep loop alive */
1956	#endif	2143	#endif
…		…
1961		2148
1962	return ev_default_loop_ptr;	2149	return ev_default_loop_ptr;
1963	}	2150	}
1964		2151
1965	void	2152	void
1966	ev_default_destroy (void)	2153	ev_loop_fork (EV_P)
1967	{	2154	{
1968	#if EV_MULTIPLICITY
1969	EV_P = ev_default_loop_ptr;
1970	#endif
1971
1972	ev_default_loop_ptr = 0;
1973
1974	#ifndef _WIN32
1975	ev_ref (EV_A); /* child watcher */
1976	ev_signal_stop (EV_A_ &childev);
1977	#endif
1978
1979	loop_destroy (EV_A);
1980	}
1981
1982	void
1983	ev_default_fork (void)
1984	{
1985	#if EV_MULTIPLICITY
1986	EV_P = ev_default_loop_ptr;
1987	#endif
1988
1989	postfork = 1; /* must be in line with ev_loop_fork */	2155	postfork = 1; /* must be in line with ev_default_fork */
1990	}	2156	}
1991		2157
1992	/*****************************************************************************/	2158	/*****************************************************************************/
1993		2159
1994	void	2160	void
…		…
2016		2182
2017	for (pri = NUMPRI; pri--; )	2183	for (pri = NUMPRI; pri--; )
2018	while (pendingcnt [pri])	2184	while (pendingcnt [pri])
2019	{	2185	{
2020	ANPENDING *p = pendings [pri] + --pendingcnt [pri];	2186	ANPENDING *p = pendings [pri] + --pendingcnt [pri];
2021
2022	/*assert (("libev: non-pending watcher on pending list", p->w->pending));*/
2023	/* ^ this is no longer true, as pending_w could be here */
2024		2187
2025	p->w->pending = 0;	2188	p->w->pending = 0;
2026	EV_CB_INVOKE (p->w, p->events);	2189	EV_CB_INVOKE (p->w, p->events);
2027	EV_FREQUENT_CHECK;	2190	EV_FREQUENT_CHECK;
2028	}	2191	}
…		…
2085	EV_FREQUENT_CHECK;	2248	EV_FREQUENT_CHECK;
2086	feed_reverse (EV_A_ (W)w);	2249	feed_reverse (EV_A_ (W)w);
2087	}	2250	}
2088	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2251	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2089		2252
2090	feed_reverse_done (EV_A_ EV_TIMEOUT);	2253	feed_reverse_done (EV_A_ EV_TIMER);
2091	}	2254	}
2092	}	2255	}
2093		2256
2094	#if EV_PERIODIC_ENABLE	2257	#if EV_PERIODIC_ENABLE
		2258
		2259	static void noinline
		2260	periodic_recalc (EV_P_ ev_periodic *w)
		2261	{
		2262	ev_tstamp interval = w->interval > MIN_INTERVAL ? w->interval : MIN_INTERVAL;
		2263	ev_tstamp at = w->offset + interval * ev_floor ((ev_rt_now - w->offset) / interval);
		2264
		2265	/* the above almost always errs on the low side */
		2266	while (at <= ev_rt_now)
		2267	{
		2268	ev_tstamp nat = at + w->interval;
		2269
		2270	/* when resolution fails us, we use ev_rt_now */
		2271	if (expect_false (nat == at))
		2272	{
		2273	at = ev_rt_now;
		2274	break;
		2275	}
		2276
		2277	at = nat;
		2278	}
		2279
		2280	ev_at (w) = at;
		2281	}
		2282
2095	/* make periodics pending */	2283	/* make periodics pending */
2096	inline_size void	2284	inline_size void
2097	periodics_reify (EV_P)	2285	periodics_reify (EV_P)
2098	{	2286	{
2099	EV_FREQUENT_CHECK;	2287	EV_FREQUENT_CHECK;
…		…
2118	ANHE_at_cache (periodics [HEAP0]);	2306	ANHE_at_cache (periodics [HEAP0]);
2119	downheap (periodics, periodiccnt, HEAP0);	2307	downheap (periodics, periodiccnt, HEAP0);
2120	}	2308	}
2121	else if (w->interval)	2309	else if (w->interval)
2122	{	2310	{
2123	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;	2311	periodic_recalc (EV_A_ w);
2124	/* if next trigger time is not sufficiently in the future, put it there */
2125	/* this might happen because of floating point inexactness */
2126	if (ev_at (w) - ev_rt_now < TIME_EPSILON)
2127	{
2128	ev_at (w) += w->interval;
2129
2130	/* if interval is unreasonably low we might still have a time in the past */
2131	/* so correct this. this will make the periodic very inexact, but the user */
2132	/* has effectively asked to get triggered more often than possible */
2133	if (ev_at (w) < ev_rt_now)
2134	ev_at (w) = ev_rt_now;
2135	}
2136
2137	ANHE_at_cache (periodics [HEAP0]);	2312	ANHE_at_cache (periodics [HEAP0]);
2138	downheap (periodics, periodiccnt, HEAP0);	2313	downheap (periodics, periodiccnt, HEAP0);
2139	}	2314	}
2140	else	2315	else
2141	ev_periodic_stop (EV_A_ w); /* nonrepeating: stop timer */	2316	ev_periodic_stop (EV_A_ w); /* nonrepeating: stop timer */
…		…
2148	feed_reverse_done (EV_A_ EV_PERIODIC);	2323	feed_reverse_done (EV_A_ EV_PERIODIC);
2149	}	2324	}
2150	}	2325	}
2151		2326
2152	/* simply recalculate all periodics */	2327	/* simply recalculate all periodics */
2153	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2328	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2154	static void noinline	2329	static void noinline
2155	periodics_reschedule (EV_P)	2330	periodics_reschedule (EV_P)
2156	{	2331	{
2157	int i;	2332	int i;
2158		2333
…		…
2162	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [i]);	2337	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [i]);
2163		2338
2164	if (w->reschedule_cb)	2339	if (w->reschedule_cb)
2165	ev_at (w) = w->reschedule_cb (w, ev_rt_now);	2340	ev_at (w) = w->reschedule_cb (w, ev_rt_now);
2166	else if (w->interval)	2341	else if (w->interval)
2167	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;	2342	periodic_recalc (EV_A_ w);
2168		2343
2169	ANHE_at_cache (periodics [i]);	2344	ANHE_at_cache (periodics [i]);
2170	}	2345	}
2171		2346
2172	reheap (periodics, periodiccnt);	2347	reheap (periodics, periodiccnt);
…		…
2219	* doesn't hurt either as we only do this on time-jumps or	2394	* doesn't hurt either as we only do this on time-jumps or
2220	* in the unlikely event of having been preempted here.	2395	* in the unlikely event of having been preempted here.
2221	*/	2396	*/
2222	for (i = 4; --i; )	2397	for (i = 4; --i; )
2223	{	2398	{
		2399	ev_tstamp diff;
2224	rtmn_diff = ev_rt_now - mn_now;	2400	rtmn_diff = ev_rt_now - mn_now;
2225		2401
		2402	diff = odiff - rtmn_diff;
		2403
2226	if (expect_true (fabs (odiff - rtmn_diff) < MIN_TIMEJUMP))	2404	if (expect_true ((diff < 0. ? -diff : diff) < MIN_TIMEJUMP))
2227	return; /* all is well */	2405	return; /* all is well */
2228		2406
2229	ev_rt_now = ev_time ();	2407	ev_rt_now = ev_time ();
2230	mn_now = get_clock ();	2408	mn_now = get_clock ();
2231	now_floor = mn_now;	2409	now_floor = mn_now;
…		…
2254	mn_now = ev_rt_now;	2432	mn_now = ev_rt_now;
2255	}	2433	}
2256	}	2434	}
2257		2435
2258	void	2436	void
2259	ev_loop (EV_P_ int flags)	2437	ev_run (EV_P_ int flags)
2260	{	2438	{
2261	#if EV_MINIMAL < 2	2439	#if EV_FEATURE_API
2262	++loop_depth;	2440	++loop_depth;
2263	#endif	2441	#endif
2264		2442
2265	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2443	assert (("libev: ev_loop recursion during release detected", loop_done != EVBREAK_RECURSE));
2266		2444
2267	loop_done = EVUNLOOP_CANCEL;	2445	loop_done = EVBREAK_CANCEL;
2268		2446
2269	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2447	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2270		2448
2271	do	2449	do
2272	{	2450	{
2273	#if EV_VERIFY >= 2	2451	#if EV_VERIFY >= 2
2274	ev_loop_verify (EV_A);	2452	ev_verify (EV_A);
2275	#endif	2453	#endif
2276		2454
2277	#ifndef _WIN32	2455	#ifndef _WIN32
2278	if (expect_false (curpid)) /* penalise the forking check even more */	2456	if (expect_false (curpid)) /* penalise the forking check even more */
2279	if (expect_false (getpid () != curpid))	2457	if (expect_false (getpid () != curpid))
…		…
2291	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2469	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2292	EV_INVOKE_PENDING;	2470	EV_INVOKE_PENDING;
2293	}	2471	}
2294	#endif	2472	#endif
2295		2473
		2474	#if EV_PREPARE_ENABLE
2296	/* queue prepare watchers (and execute them) */	2475	/* queue prepare watchers (and execute them) */
2297	if (expect_false (preparecnt))	2476	if (expect_false (preparecnt))
2298	{	2477	{
2299	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2478	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2300	EV_INVOKE_PENDING;	2479	EV_INVOKE_PENDING;
2301	}	2480	}
		2481	#endif
2302		2482
2303	if (expect_false (loop_done))	2483	if (expect_false (loop_done))
2304	break;	2484	break;
2305		2485
2306	/* we might have forked, so reify kernel state if necessary */	2486	/* we might have forked, so reify kernel state if necessary */
…		…
2313	/* calculate blocking time */	2493	/* calculate blocking time */
2314	{	2494	{
2315	ev_tstamp waittime = 0.;	2495	ev_tstamp waittime = 0.;
2316	ev_tstamp sleeptime = 0.;	2496	ev_tstamp sleeptime = 0.;
2317		2497
		2498	/* remember old timestamp for io_blocktime calculation */
		2499	ev_tstamp prev_mn_now = mn_now;
		2500
		2501	/* update time to cancel out callback processing overhead */
		2502	time_update (EV_A_ 1e100);
		2503
2318	if (expect_true (!(flags & EVLOOP_NONBLOCK || idleall || !activecnt)))	2504	if (expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt)))
2319	{	2505	{
2320	/* remember old timestamp for io_blocktime calculation */
2321	ev_tstamp prev_mn_now = mn_now;
2322
2323	/* update time to cancel out callback processing overhead */
2324	time_update (EV_A_ 1e100);
2325
2326	waittime = MAX_BLOCKTIME;	2506	waittime = MAX_BLOCKTIME;
2327		2507
2328	if (timercnt)	2508	if (timercnt)
2329	{	2509	{
2330	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;	2510	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;
…		…
2357	waittime -= sleeptime;	2537	waittime -= sleeptime;
2358	}	2538	}
2359	}	2539	}
2360	}	2540	}
2361		2541
2362	#if EV_MINIMAL < 2	2542	#if EV_FEATURE_API
2363	++loop_count;	2543	++loop_count;
2364	#endif	2544	#endif
2365	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2545	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */
2366	backend_poll (EV_A_ waittime);	2546	backend_poll (EV_A_ waittime);
2367	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2547	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
2368		2548
2369	/* update ev_rt_now, do magic */	2549	/* update ev_rt_now, do magic */
2370	time_update (EV_A_ waittime + sleeptime);	2550	time_update (EV_A_ waittime + sleeptime);
2371	}	2551	}
2372		2552
…		…
2379	#if EV_IDLE_ENABLE	2559	#if EV_IDLE_ENABLE
2380	/* queue idle watchers unless other events are pending */	2560	/* queue idle watchers unless other events are pending */
2381	idle_reify (EV_A);	2561	idle_reify (EV_A);
2382	#endif	2562	#endif
2383		2563
		2564	#if EV_CHECK_ENABLE
2384	/* queue check watchers, to be executed first */	2565	/* queue check watchers, to be executed first */
2385	if (expect_false (checkcnt))	2566	if (expect_false (checkcnt))
2386	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2567	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2568	#endif
2387		2569
2388	EV_INVOKE_PENDING;	2570	EV_INVOKE_PENDING;
2389	}	2571	}
2390	while (expect_true (	2572	while (expect_true (
2391	activecnt	2573	activecnt
2392	&& !loop_done	2574	&& !loop_done
2393	&& !(flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK))	2575	&& !(flags & (EVRUN_ONCE | EVRUN_NOWAIT))
2394	));	2576	));
2395		2577
2396	if (loop_done == EVUNLOOP_ONE)	2578	if (loop_done == EVBREAK_ONE)
2397	loop_done = EVUNLOOP_CANCEL;	2579	loop_done = EVBREAK_CANCEL;
2398		2580
2399	#if EV_MINIMAL < 2	2581	#if EV_FEATURE_API
2400	--loop_depth;	2582	--loop_depth;
2401	#endif	2583	#endif
2402	}	2584	}
2403		2585
2404	void	2586	void
2405	ev_unloop (EV_P_ int how)	2587	ev_break (EV_P_ int how)
2406	{	2588	{
2407	loop_done = how;	2589	loop_done = how;
2408	}	2590	}
2409		2591
2410	void	2592	void
…		…
2558	EV_FREQUENT_CHECK;	2740	EV_FREQUENT_CHECK;
2559		2741
2560	wlist_del (&anfds[w->fd].head, (WL)w);	2742	wlist_del (&anfds[w->fd].head, (WL)w);
2561	ev_stop (EV_A_ (W)w);	2743	ev_stop (EV_A_ (W)w);
2562		2744
2563	fd_change (EV_A_ w->fd, 1);	2745	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2564		2746
2565	EV_FREQUENT_CHECK;	2747	EV_FREQUENT_CHECK;
2566	}	2748	}
2567		2749
2568	void noinline	2750	void noinline
…		…
2660	if (w->reschedule_cb)	2842	if (w->reschedule_cb)
2661	ev_at (w) = w->reschedule_cb (w, ev_rt_now);	2843	ev_at (w) = w->reschedule_cb (w, ev_rt_now);
2662	else if (w->interval)	2844	else if (w->interval)
2663	{	2845	{
2664	assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.));	2846	assert (("libev: ev_periodic_start called with negative interval value", w->interval >= 0.));
2665	/* this formula differs from the one in periodic_reify because we do not always round up */	2847	periodic_recalc (EV_A_ w);
2666	ev_at (w) = w->offset + ceil ((ev_rt_now - w->offset) / w->interval) * w->interval;
2667	}	2848	}
2668	else	2849	else
2669	ev_at (w) = w->offset;	2850	ev_at (w) = w->offset;
2670		2851
2671	EV_FREQUENT_CHECK;	2852	EV_FREQUENT_CHECK;
…		…
2720	#endif	2901	#endif
2721		2902
2722	#ifndef SA_RESTART	2903	#ifndef SA_RESTART
2723	# define SA_RESTART 0	2904	# define SA_RESTART 0
2724	#endif	2905	#endif
		2906
		2907	#if EV_SIGNAL_ENABLE
2725		2908
2726	void noinline	2909	void noinline
2727	ev_signal_start (EV_P_ ev_signal *w)	2910	ev_signal_start (EV_P_ ev_signal *w)
2728	{	2911	{
2729	if (expect_false (ev_is_active (w)))	2912	if (expect_false (ev_is_active (w)))
…		…
2790	sa.sa_handler = ev_sighandler;	2973	sa.sa_handler = ev_sighandler;
2791	sigfillset (&sa.sa_mask);	2974	sigfillset (&sa.sa_mask);
2792	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */	2975	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */
2793	sigaction (w->signum, &sa, 0);	2976	sigaction (w->signum, &sa, 0);
2794		2977
		2978	if (origflags & EVFLAG_NOSIGMASK)
		2979	{
2795	sigemptyset (&sa.sa_mask);	2980	sigemptyset (&sa.sa_mask);
2796	sigaddset (&sa.sa_mask, w->signum);	2981	sigaddset (&sa.sa_mask, w->signum);
2797	sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0);	2982	sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0);
		2983	}
2798	#endif	2984	#endif
2799	}	2985	}
2800		2986
2801	EV_FREQUENT_CHECK;	2987	EV_FREQUENT_CHECK;
2802	}	2988	}
…		…
2836	}	3022	}
2837		3023
2838	EV_FREQUENT_CHECK;	3024	EV_FREQUENT_CHECK;
2839	}	3025	}
2840		3026
		3027	#endif
		3028
		3029	#if EV_CHILD_ENABLE
		3030
2841	void	3031	void
2842	ev_child_start (EV_P_ ev_child *w)	3032	ev_child_start (EV_P_ ev_child *w)
2843	{	3033	{
2844	#if EV_MULTIPLICITY	3034	#if EV_MULTIPLICITY
2845	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	3035	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2848	return;	3038	return;
2849		3039
2850	EV_FREQUENT_CHECK;	3040	EV_FREQUENT_CHECK;
2851		3041
2852	ev_start (EV_A_ (W)w, 1);	3042	ev_start (EV_A_ (W)w, 1);
2853	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	3043	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2854		3044
2855	EV_FREQUENT_CHECK;	3045	EV_FREQUENT_CHECK;
2856	}	3046	}
2857		3047
2858	void	3048	void
…		…
2862	if (expect_false (!ev_is_active (w)))	3052	if (expect_false (!ev_is_active (w)))
2863	return;	3053	return;
2864		3054
2865	EV_FREQUENT_CHECK;	3055	EV_FREQUENT_CHECK;
2866		3056
2867	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	3057	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2868	ev_stop (EV_A_ (W)w);	3058	ev_stop (EV_A_ (W)w);
2869		3059
2870	EV_FREQUENT_CHECK;	3060	EV_FREQUENT_CHECK;
2871	}	3061	}
		3062
		3063	#endif
2872		3064
2873	#if EV_STAT_ENABLE	3065	#if EV_STAT_ENABLE
2874		3066
2875	# ifdef _WIN32	3067	# ifdef _WIN32
2876	# undef lstat	3068	# undef lstat
…		…
2937	if (!pend || pend == path)	3129	if (!pend || pend == path)
2938	break;	3130	break;
2939		3131
2940	*pend = 0;	3132	*pend = 0;
2941	w->wd = inotify_add_watch (fs_fd, path, mask);	3133	w->wd = inotify_add_watch (fs_fd, path, mask);
2942	}	3134	}
2943	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	3135	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2944	}	3136	}
2945	}	3137	}
2946		3138
2947	if (w->wd >= 0)	3139	if (w->wd >= 0)
2948	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3140	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2949		3141
2950	/* now re-arm timer, if required */	3142	/* now re-arm timer, if required */
2951	if (ev_is_active (&w->timer)) ev_ref (EV_A);	3143	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2952	ev_timer_again (EV_A_ &w->timer);	3144	ev_timer_again (EV_A_ &w->timer);
2953	if (ev_is_active (&w->timer)) ev_unref (EV_A);	3145	if (ev_is_active (&w->timer)) ev_unref (EV_A);
…		…
2961		3153
2962	if (wd < 0)	3154	if (wd < 0)
2963	return;	3155	return;
2964		3156
2965	w->wd = -2;	3157	w->wd = -2;
2966	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3158	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2967	wlist_del (&fs_hash [slot].head, (WL)w);	3159	wlist_del (&fs_hash [slot].head, (WL)w);
2968		3160
2969	/* remove this watcher, if others are watching it, they will rearm */	3161	/* remove this watcher, if others are watching it, they will rearm */
2970	inotify_rm_watch (fs_fd, wd);	3162	inotify_rm_watch (fs_fd, wd);
2971	}	3163	}
…		…
2973	static void noinline	3165	static void noinline
2974	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3166	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2975	{	3167	{
2976	if (slot < 0)	3168	if (slot < 0)
2977	/* overflow, need to check for all hash slots */	3169	/* overflow, need to check for all hash slots */
2978	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3170	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2979	infy_wd (EV_A_ slot, wd, ev);	3171	infy_wd (EV_A_ slot, wd, ev);
2980	else	3172	else
2981	{	3173	{
2982	WL w_;	3174	WL w_;
2983		3175
2984	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3176	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2985	{	3177	{
2986	ev_stat *w = (ev_stat *)w_;	3178	ev_stat *w = (ev_stat *)w_;
2987	w_ = w_->next; /* lets us remove this watcher and all before it */	3179	w_ = w_->next; /* lets us remove this watcher and all before it */
2988		3180
2989	if (w->wd == wd || wd == -1)	3181	if (w->wd == wd || wd == -1)
2990	{	3182	{
2991	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3183	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2992	{	3184	{
2993	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3185	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2994	w->wd = -1;	3186	w->wd = -1;
2995	infy_add (EV_A_ w); /* re-add, no matter what */	3187	infy_add (EV_A_ w); /* re-add, no matter what */
2996	}	3188	}
2997		3189
2998	stat_timer_cb (EV_A_ &w->timer, 0);	3190	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
3012	{	3204	{
3013	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);	3205	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);
3014	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3206	infy_wd (EV_A_ ev->wd, ev->wd, ev);
3015	ofs += sizeof (struct inotify_event) + ev->len;	3207	ofs += sizeof (struct inotify_event) + ev->len;
3016	}	3208	}
3017	}
3018
3019	inline_size unsigned int
3020	ev_linux_version (void)
3021	{
3022	struct utsname buf;
3023	unsigned int v;
3024	int i;
3025	char *p = buf.release;
3026
3027	if (uname (&buf))
3028	return 0;
3029
3030	for (i = 3+1; --i; )
3031	{
3032	unsigned int c = 0;
3033
3034	for (;;)
3035	{
3036	if (*p >= '0' && *p <= '9')
3037	c = c * 10 + *p++ - '0';
3038	else
3039	{
3040	p += *p == '.';
3041	break;
3042	}
3043	}
3044
3045	v = (v << 8) | c;
3046	}
3047
3048	return v;
3049	}	3209	}
3050		3210
3051	inline_size void	3211	inline_size void
3052	ev_check_2625 (EV_P)	3212	ev_check_2625 (EV_P)
3053	{	3213	{
…		…
3112	ev_io_set (&fs_w, fs_fd, EV_READ);	3272	ev_io_set (&fs_w, fs_fd, EV_READ);
3113	ev_io_start (EV_A_ &fs_w);	3273	ev_io_start (EV_A_ &fs_w);
3114	ev_unref (EV_A);	3274	ev_unref (EV_A);
3115	}	3275	}
3116		3276
3117	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3277	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3118	{	3278	{
3119	WL w_ = fs_hash [slot].head;	3279	WL w_ = fs_hash [slot].head;
3120	fs_hash [slot].head = 0;	3280	fs_hash [slot].head = 0;
3121		3281
3122	while (w_)	3282	while (w_)
…		…
3297		3457
3298	EV_FREQUENT_CHECK;	3458	EV_FREQUENT_CHECK;
3299	}	3459	}
3300	#endif	3460	#endif
3301		3461
		3462	#if EV_PREPARE_ENABLE
3302	void	3463	void
3303	ev_prepare_start (EV_P_ ev_prepare *w)	3464	ev_prepare_start (EV_P_ ev_prepare *w)
3304	{	3465	{
3305	if (expect_false (ev_is_active (w)))	3466	if (expect_false (ev_is_active (w)))
3306	return;	3467	return;
…		…
3332		3493
3333	ev_stop (EV_A_ (W)w);	3494	ev_stop (EV_A_ (W)w);
3334		3495
3335	EV_FREQUENT_CHECK;	3496	EV_FREQUENT_CHECK;
3336	}	3497	}
		3498	#endif
3337		3499
		3500	#if EV_CHECK_ENABLE
3338	void	3501	void
3339	ev_check_start (EV_P_ ev_check *w)	3502	ev_check_start (EV_P_ ev_check *w)
3340	{	3503	{
3341	if (expect_false (ev_is_active (w)))	3504	if (expect_false (ev_is_active (w)))
3342	return;	3505	return;
…		…
3368		3531
3369	ev_stop (EV_A_ (W)w);	3532	ev_stop (EV_A_ (W)w);
3370		3533
3371	EV_FREQUENT_CHECK;	3534	EV_FREQUENT_CHECK;
3372	}	3535	}
		3536	#endif
3373		3537
3374	#if EV_EMBED_ENABLE	3538	#if EV_EMBED_ENABLE
3375	void noinline	3539	void noinline
3376	ev_embed_sweep (EV_P_ ev_embed *w)	3540	ev_embed_sweep (EV_P_ ev_embed *w)
3377	{	3541	{
3378	ev_loop (w->other, EVLOOP_NONBLOCK);	3542	ev_run (w->other, EVRUN_NOWAIT);
3379	}	3543	}
3380		3544
3381	static void	3545	static void
3382	embed_io_cb (EV_P_ ev_io *io, int revents)	3546	embed_io_cb (EV_P_ ev_io *io, int revents)
3383	{	3547	{
3384	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));	3548	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));
3385		3549
3386	if (ev_cb (w))	3550	if (ev_cb (w))
3387	ev_feed_event (EV_A_ (W)w, EV_EMBED);	3551	ev_feed_event (EV_A_ (W)w, EV_EMBED);
3388	else	3552	else
3389	ev_loop (w->other, EVLOOP_NONBLOCK);	3553	ev_run (w->other, EVRUN_NOWAIT);
3390	}	3554	}
3391		3555
3392	static void	3556	static void
3393	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)	3557	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)
3394	{	3558	{
…		…
3398	EV_P = w->other;	3562	EV_P = w->other;
3399		3563
3400	while (fdchangecnt)	3564	while (fdchangecnt)
3401	{	3565	{
3402	fd_reify (EV_A);	3566	fd_reify (EV_A);
3403	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3567	ev_run (EV_A_ EVRUN_NOWAIT);
3404	}	3568	}
3405	}	3569	}
3406	}	3570	}
3407		3571
3408	static void	3572	static void
…		…
3414		3578
3415	{	3579	{
3416	EV_P = w->other;	3580	EV_P = w->other;
3417		3581
3418	ev_loop_fork (EV_A);	3582	ev_loop_fork (EV_A);
3419	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3583	ev_run (EV_A_ EVRUN_NOWAIT);
3420	}	3584	}
3421		3585
3422	ev_embed_start (EV_A_ w);	3586	ev_embed_start (EV_A_ w);
3423	}	3587	}
3424		3588
…		…
3516		3680
3517	EV_FREQUENT_CHECK;	3681	EV_FREQUENT_CHECK;
3518	}	3682	}
3519	#endif	3683	#endif
3520		3684
3521	#if EV_ASYNC_ENABLE	3685	#if EV_CLEANUP_ENABLE
3522	void	3686	void
3523	ev_async_start (EV_P_ ev_async *w)	3687	ev_cleanup_start (EV_P_ ev_cleanup *w)
3524	{	3688	{
3525	if (expect_false (ev_is_active (w)))	3689	if (expect_false (ev_is_active (w)))
3526	return;	3690	return;
		3691
		3692	EV_FREQUENT_CHECK;
		3693
		3694	ev_start (EV_A_ (W)w, ++cleanupcnt);
		3695	array_needsize (ev_cleanup *, cleanups, cleanupmax, cleanupcnt, EMPTY2);
		3696	cleanups [cleanupcnt - 1] = w;
		3697
		3698	/* cleanup watchers should never keep a refcount on the loop */
		3699	ev_unref (EV_A);
		3700	EV_FREQUENT_CHECK;
		3701	}
		3702
		3703	void
		3704	ev_cleanup_stop (EV_P_ ev_cleanup *w)
		3705	{
		3706	clear_pending (EV_A_ (W)w);
		3707	if (expect_false (!ev_is_active (w)))
		3708	return;
		3709
		3710	EV_FREQUENT_CHECK;
		3711	ev_ref (EV_A);
		3712
		3713	{
		3714	int active = ev_active (w);
		3715
		3716	cleanups [active - 1] = cleanups [--cleanupcnt];
		3717	ev_active (cleanups [active - 1]) = active;
		3718	}
		3719
		3720	ev_stop (EV_A_ (W)w);
		3721
		3722	EV_FREQUENT_CHECK;
		3723	}
		3724	#endif
		3725
		3726	#if EV_ASYNC_ENABLE
		3727	void
		3728	ev_async_start (EV_P_ ev_async *w)
		3729	{
		3730	if (expect_false (ev_is_active (w)))
		3731	return;
		3732
		3733	w->sent = 0;
3527		3734
3528	evpipe_init (EV_A);	3735	evpipe_init (EV_A);
3529		3736
3530	EV_FREQUENT_CHECK;	3737	EV_FREQUENT_CHECK;
3531		3738
…		…
3609	{	3816	{
3610	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	3817	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
3611		3818
3612	if (expect_false (!once))	3819	if (expect_false (!once))
3613	{	3820	{
3614	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3821	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3615	return;	3822	return;
3616	}	3823	}
3617		3824
3618	once->cb = cb;	3825	once->cb = cb;
3619	once->arg = arg;	3826	once->arg = arg;
…		…
3706	if (types & EV_ASYNC)	3913	if (types & EV_ASYNC)
3707	for (i = asynccnt; i--; )	3914	for (i = asynccnt; i--; )
3708	cb (EV_A_ EV_ASYNC, asyncs [i]);	3915	cb (EV_A_ EV_ASYNC, asyncs [i]);
3709	#endif	3916	#endif
3710		3917
		3918	#if EV_PREPARE_ENABLE
3711	if (types & EV_PREPARE)	3919	if (types & EV_PREPARE)
3712	for (i = preparecnt; i--; )	3920	for (i = preparecnt; i--; )
3713	#if EV_EMBED_ENABLE	3921	# if EV_EMBED_ENABLE
3714	if (ev_cb (prepares [i]) != embed_prepare_cb)	3922	if (ev_cb (prepares [i]) != embed_prepare_cb)
3715	#endif	3923	# endif
3716	cb (EV_A_ EV_PREPARE, prepares [i]);	3924	cb (EV_A_ EV_PREPARE, prepares [i]);
		3925	#endif
3717		3926
		3927	#if EV_CHECK_ENABLE
3718	if (types & EV_CHECK)	3928	if (types & EV_CHECK)
3719	for (i = checkcnt; i--; )	3929	for (i = checkcnt; i--; )
3720	cb (EV_A_ EV_CHECK, checks [i]);	3930	cb (EV_A_ EV_CHECK, checks [i]);
		3931	#endif
3721		3932
		3933	#if EV_SIGNAL_ENABLE
3722	if (types & EV_SIGNAL)	3934	if (types & EV_SIGNAL)
3723	for (i = 0; i < EV_NSIG - 1; ++i)	3935	for (i = 0; i < EV_NSIG - 1; ++i)
3724	for (wl = signals [i].head; wl; )	3936	for (wl = signals [i].head; wl; )
3725	{	3937	{
3726	wn = wl->next;	3938	wn = wl->next;
3727	cb (EV_A_ EV_SIGNAL, wl);	3939	cb (EV_A_ EV_SIGNAL, wl);
3728	wl = wn;	3940	wl = wn;
3729	}	3941	}
		3942	#endif
3730		3943
		3944	#if EV_CHILD_ENABLE
3731	if (types & EV_CHILD)	3945	if (types & EV_CHILD)
3732	for (i = EV_PID_HASHSIZE; i--; )	3946	for (i = (EV_PID_HASHSIZE); i--; )
3733	for (wl = childs [i]; wl; )	3947	for (wl = childs [i]; wl; )
3734	{	3948	{
3735	wn = wl->next;	3949	wn = wl->next;
3736	cb (EV_A_ EV_CHILD, wl);	3950	cb (EV_A_ EV_CHILD, wl);
3737	wl = wn;	3951	wl = wn;
3738	}	3952	}
		3953	#endif
3739	/* EV_STAT 0x00001000 /* stat data changed */	3954	/* EV_STAT 0x00001000 /* stat data changed */
3740	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3955	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3741	}	3956	}
3742	#endif	3957	#endif
3743		3958
3744	#if EV_MULTIPLICITY	3959	#if EV_MULTIPLICITY
3745	#include "ev_wrap.h"	3960	#include "ev_wrap.h"
3746	#endif	3961	#endif
3747		3962
3748	#ifdef __cplusplus	3963	EV_CPP(})
3749	}
3750	#endif
3751		3964

Diff Legend

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