ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.318 by root, Tue Nov 17 00:22:28 2009 UTC vs.
Revision 1.354 by root, Fri Oct 22 09:24:11 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>
157	#include <stdlib.h>	162	#include <stdlib.h>
		163	#include <string.h>
158	#include <fcntl.h>	164	#include <fcntl.h>
159	#include <stddef.h>	165	#include <stddef.h>
160		166
161	#include <stdio.h>	167	#include <stdio.h>
162		168
163	#include <assert.h>	169	#include <assert.h>
164	#include <errno.h>	170	#include <errno.h>
165	#include <sys/types.h>	171	#include <sys/types.h>
166	#include <time.h>	172	#include <time.h>
		173	#include <limits.h>
167		174
168	#include <signal.h>	175	#include <signal.h>
169		176
170	#ifdef EV_H	177	#ifdef EV_H
171	# include EV_H	178	# include EV_H
172	#else	179	#else
173	# include "ev.h"	180	# include "ev.h"
174	#endif	181	#endif
		182
		183	EV_CPP(extern "C" {)
175		184
176	#ifndef _WIN32	185	#ifndef _WIN32
177	# include <sys/time.h>	186	# include <sys/time.h>
178	# include <sys/wait.h>	187	# include <sys/wait.h>
179	# include <unistd.h>	188	# include <unistd.h>
…		…
182	# define WIN32_LEAN_AND_MEAN	191	# define WIN32_LEAN_AND_MEAN
183	# include <windows.h>	192	# include <windows.h>
184	# ifndef EV_SELECT_IS_WINSOCKET	193	# ifndef EV_SELECT_IS_WINSOCKET
185	# define EV_SELECT_IS_WINSOCKET 1	194	# define EV_SELECT_IS_WINSOCKET 1
186	# endif	195	# endif
		196	# undef EV_AVOID_STDIO
187	#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
188		206
189	/* 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 */
190		208
191	/* try to deduce the maximum number of signals on this platform */	209	/* try to deduce the maximum number of signals on this platform */
192	#if defined (EV_NSIG)	210	#if defined (EV_NSIG)
…		…
204	#elif defined (MAXSIG)	222	#elif defined (MAXSIG)
205	# define EV_NSIG (MAXSIG+1)	223	# define EV_NSIG (MAXSIG+1)
206	#elif defined (MAX_SIG)	224	#elif defined (MAX_SIG)
207	# define EV_NSIG (MAX_SIG+1)	225	# define EV_NSIG (MAX_SIG+1)
208	#elif defined (SIGARRAYSIZE)	226	#elif defined (SIGARRAYSIZE)
209	# define EV_NSIG SIGARRAYSIZE /* Assume ary[SIGARRAYSIZE] */	227	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
210	#elif defined (_sys_nsig)	228	#elif defined (_sys_nsig)
211	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	229	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
212	#else	230	#else
213	# error "unable to find value for NSIG, please report"	231	# error "unable to find value for NSIG, please report"
214	/* 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! :) */
215	# define EV_NSIG 65	234	# define EV_NSIG 65
216	#endif	235	#endif
217		236
218	#ifndef EV_USE_CLOCK_SYSCALL	237	#ifndef EV_USE_CLOCK_SYSCALL
219	# if __linux && __GLIBC__ >= 2	238	# if __linux && __GLIBC__ >= 2
220	# define EV_USE_CLOCK_SYSCALL 1	239	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
221	# else	240	# else
222	# define EV_USE_CLOCK_SYSCALL 0	241	# define EV_USE_CLOCK_SYSCALL 0
223	# endif	242	# endif
224	#endif	243	#endif
225		244
226	#ifndef EV_USE_MONOTONIC	245	#ifndef EV_USE_MONOTONIC
227	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	246	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0
228	# define EV_USE_MONOTONIC 1	247	# define EV_USE_MONOTONIC EV_FEATURE_OS
229	# else	248	# else
230	# define EV_USE_MONOTONIC 0	249	# define EV_USE_MONOTONIC 0
231	# endif	250	# endif
232	#endif	251	#endif
233		252
…		…
235	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL	254	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL
236	#endif	255	#endif
237		256
238	#ifndef EV_USE_NANOSLEEP	257	#ifndef EV_USE_NANOSLEEP
239	# if _POSIX_C_SOURCE >= 199309L	258	# if _POSIX_C_SOURCE >= 199309L
240	# define EV_USE_NANOSLEEP 1	259	# define EV_USE_NANOSLEEP EV_FEATURE_OS
241	# else	260	# else
242	# define EV_USE_NANOSLEEP 0	261	# define EV_USE_NANOSLEEP 0
243	# endif	262	# endif
244	#endif	263	#endif
245		264
246	#ifndef EV_USE_SELECT	265	#ifndef EV_USE_SELECT
247	# define EV_USE_SELECT 1	266	# define EV_USE_SELECT EV_FEATURE_BACKENDS
248	#endif	267	#endif
249		268
250	#ifndef EV_USE_POLL	269	#ifndef EV_USE_POLL
251	# ifdef _WIN32	270	# ifdef _WIN32
252	# define EV_USE_POLL 0	271	# define EV_USE_POLL 0
253	# else	272	# else
254	# define EV_USE_POLL 1	273	# define EV_USE_POLL EV_FEATURE_BACKENDS
255	# endif	274	# endif
256	#endif	275	#endif
257		276
258	#ifndef EV_USE_EPOLL	277	#ifndef EV_USE_EPOLL
259	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	278	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
260	# define EV_USE_EPOLL 1	279	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
261	# else	280	# else
262	# define EV_USE_EPOLL 0	281	# define EV_USE_EPOLL 0
263	# endif	282	# endif
264	#endif	283	#endif
265		284
…		…
271	# define EV_USE_PORT 0	290	# define EV_USE_PORT 0
272	#endif	291	#endif
273		292
274	#ifndef EV_USE_INOTIFY	293	#ifndef EV_USE_INOTIFY
275	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	294	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
276	# define EV_USE_INOTIFY 1	295	# define EV_USE_INOTIFY EV_FEATURE_OS
277	# else	296	# else
278	# define EV_USE_INOTIFY 0	297	# define EV_USE_INOTIFY 0
279	# endif	298	# endif
280	#endif	299	#endif
281		300
282	#ifndef EV_PID_HASHSIZE	301	#ifndef EV_PID_HASHSIZE
283	# if EV_MINIMAL	302	# define EV_PID_HASHSIZE EV_FEATURE_DATA ? 16 : 1
284	# define EV_PID_HASHSIZE 1
285	# else
286	# define EV_PID_HASHSIZE 16
287	# endif
288	#endif	303	#endif
289		304
290	#ifndef EV_INOTIFY_HASHSIZE	305	#ifndef EV_INOTIFY_HASHSIZE
291	# if EV_MINIMAL	306	# define EV_INOTIFY_HASHSIZE EV_FEATURE_DATA ? 16 : 1
292	# define EV_INOTIFY_HASHSIZE 1
293	# else
294	# define EV_INOTIFY_HASHSIZE 16
295	# endif
296	#endif	307	#endif
297		308
298	#ifndef EV_USE_EVENTFD	309	#ifndef EV_USE_EVENTFD
299	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	310	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
300	# define EV_USE_EVENTFD 1	311	# define EV_USE_EVENTFD EV_FEATURE_OS
301	# else	312	# else
302	# define EV_USE_EVENTFD 0	313	# define EV_USE_EVENTFD 0
303	# endif	314	# endif
304	#endif	315	#endif
305		316
306	#ifndef EV_USE_SIGNALFD	317	#ifndef EV_USE_SIGNALFD
307	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	318	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
308	# define EV_USE_SIGNALFD 1	319	# define EV_USE_SIGNALFD EV_FEATURE_OS
309	# else	320	# else
310	# define EV_USE_SIGNALFD 0	321	# define EV_USE_SIGNALFD 0
311	# endif	322	# endif
312	#endif	323	#endif
313		324
…		…
316	# define EV_USE_4HEAP 1	327	# define EV_USE_4HEAP 1
317	# define EV_HEAP_CACHE_AT 1	328	# define EV_HEAP_CACHE_AT 1
318	#endif	329	#endif
319		330
320	#ifndef EV_VERIFY	331	#ifndef EV_VERIFY
321	# define EV_VERIFY !EV_MINIMAL	332	# define EV_VERIFY (EV_FEATURE_API ? 1 : 0)
322	#endif	333	#endif
323		334
324	#ifndef EV_USE_4HEAP	335	#ifndef EV_USE_4HEAP
325	# define EV_USE_4HEAP !EV_MINIMAL	336	# define EV_USE_4HEAP EV_FEATURE_DATA
326	#endif	337	#endif
327		338
328	#ifndef EV_HEAP_CACHE_AT	339	#ifndef EV_HEAP_CACHE_AT
329	# define EV_HEAP_CACHE_AT !EV_MINIMAL	340	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
330	#endif	341	#endif
331		342
332	/* 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, */
333	/* which makes programs even slower. might work on other unices, too. */	344	/* which makes programs even slower. might work on other unices, too. */
334	#if EV_USE_CLOCK_SYSCALL	345	#if EV_USE_CLOCK_SYSCALL
…		…
342	# define EV_USE_CLOCK_SYSCALL 0	353	# define EV_USE_CLOCK_SYSCALL 0
343	# endif	354	# endif
344	#endif	355	#endif
345		356
346	/* 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
347		364
348	#ifndef CLOCK_MONOTONIC	365	#ifndef CLOCK_MONOTONIC
349	# undef EV_USE_MONOTONIC	366	# undef EV_USE_MONOTONIC
350	# define EV_USE_MONOTONIC 0	367	# define EV_USE_MONOTONIC 0
351	#endif	368	#endif
…		…
392	# define EFD_CLOEXEC O_CLOEXEC	409	# define EFD_CLOEXEC O_CLOEXEC
393	# else	410	# else
394	# define EFD_CLOEXEC 02000000	411	# define EFD_CLOEXEC 02000000
395	# endif	412	# endif
396	# endif	413	# endif
397	# ifdef __cplusplus
398	extern "C" {
399	# endif
400	int eventfd (unsigned int initval, int flags);	414	EV_CPP(extern "C") int (eventfd) (unsigned int initval, int flags);
401	# ifdef __cplusplus
402	}
403	# endif
404	#endif	415	#endif
405		416
406	#if EV_USE_SIGNALFD	417	#if EV_USE_SIGNALFD
407	/* 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 */
408	# include <stdint.h>	419	# include <stdint.h>
…		…
414	# define SFD_CLOEXEC O_CLOEXEC	425	# define SFD_CLOEXEC O_CLOEXEC
415	# else	426	# else
416	# define SFD_CLOEXEC 02000000	427	# define SFD_CLOEXEC 02000000
417	# endif	428	# endif
418	# endif	429	# endif
419	# ifdef __cplusplus
420	extern "C" {
421	# endif
422	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);
423		431
424	struct signalfd_siginfo	432	struct signalfd_siginfo
425	{	433	{
426	uint32_t ssi_signo;	434	uint32_t ssi_signo;
427	char pad[128 - sizeof (uint32_t)];	435	char pad[128 - sizeof (uint32_t)];
428	};	436	};
429	# ifdef __cplusplus
430	}
431	# endif	437	#endif
432	#endif
433
434		438
435	/**/	439	/**/
436		440
437	#if EV_VERIFY >= 3	441	#if EV_VERIFY >= 3
438	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	442	# define EV_FREQUENT_CHECK ev_verify (EV_A)
439	#else	443	#else
440	# define EV_FREQUENT_CHECK do { } while (0)	444	# define EV_FREQUENT_CHECK do { } while (0)
441	#endif	445	#endif
442		446
443	/*	447	/*
…		…
451	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	455	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
452		456
453	#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) */
454	#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) */
455		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
456	#if __GNUC__ >= 4	463	#if __GNUC__ >= 4
457	# define expect(expr,value) __builtin_expect ((expr),(value))	464	# define expect(expr,value) __builtin_expect ((expr),(value))
458	# define noinline __attribute__ ((noinline))	465	# define noinline __attribute__ ((noinline))
459	#else	466	#else
460	# define expect(expr,value) (expr)	467	# define expect(expr,value) (expr)
…		…
466		473
467	#define expect_false(expr) expect ((expr) != 0, 0)	474	#define expect_false(expr) expect ((expr) != 0, 0)
468	#define expect_true(expr) expect ((expr) != 0, 1)	475	#define expect_true(expr) expect ((expr) != 0, 1)
469	#define inline_size static inline	476	#define inline_size static inline
470		477
471	#if EV_MINIMAL	478	#if EV_FEATURE_CODE
		479	# define inline_speed static inline
		480	#else
472	# define inline_speed static noinline	481	# define inline_speed static noinline
473	#else
474	# define inline_speed static inline
475	#endif	482	#endif
476		483
477	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	484	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
478		485
479	#if EV_MINPRI == EV_MAXPRI	486	#if EV_MINPRI == EV_MAXPRI
…		…
492	#define ev_active(w) ((W)(w))->active	499	#define ev_active(w) ((W)(w))->active
493	#define ev_at(w) ((WT)(w))->at	500	#define ev_at(w) ((WT)(w))->at
494		501
495	#if EV_USE_REALTIME	502	#if EV_USE_REALTIME
496	/* 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 */
497	/* giving it a reasonably high chance of working on typical architetcures */	504	/* giving it a reasonably high chance of working on typical architectures */
498	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? */
499	#endif	506	#endif
500		507
501	#if EV_USE_MONOTONIC	508	#if EV_USE_MONOTONIC
502	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? */
…		…
504		511
505	#ifndef EV_FD_TO_WIN32_HANDLE	512	#ifndef EV_FD_TO_WIN32_HANDLE
506	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)	513	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
507	#endif	514	#endif
508	#ifndef EV_WIN32_HANDLE_TO_FD	515	#ifndef EV_WIN32_HANDLE_TO_FD
509	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (fd, 0)	516	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
510	#endif	517	#endif
511	#ifndef EV_WIN32_CLOSE_FD	518	#ifndef EV_WIN32_CLOSE_FD
512	# define EV_WIN32_CLOSE_FD(fd) close (fd)	519	# define EV_WIN32_CLOSE_FD(fd) close (fd)
513	#endif	520	#endif
514		521
515	#ifdef _WIN32	522	#ifdef _WIN32
516	# include "ev_win32.c"	523	# include "ev_win32.c"
517	#endif	524	#endif
518		525
519	/*****************************************************************************/	526	/*****************************************************************************/
		527
		528	#if EV_AVOID_STDIO
		529	static void noinline
		530	ev_printerr (const char *msg)
		531	{
		532	write (STDERR_FILENO, msg, strlen (msg));
		533	}
		534	#endif
520		535
521	static void (*syserr_cb)(const char *msg);	536	static void (*syserr_cb)(const char *msg);
522		537
523	void	538	void
524	ev_set_syserr_cb (void (*cb)(const char *msg))	539	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
534		549
535	if (syserr_cb)	550	if (syserr_cb)
536	syserr_cb (msg);	551	syserr_cb (msg);
537	else	552	else
538	{	553	{
		554	#if EV_AVOID_STDIO
		555	const char *err = strerror (errno);
		556
		557	ev_printerr (msg);
		558	ev_printerr (": ");
		559	ev_printerr (err);
		560	ev_printerr ("\n");
		561	#else
539	perror (msg);	562	perror (msg);
		563	#endif
540	abort ();	564	abort ();
541	}	565	}
542	}	566	}
543		567
544	static void *	568	static void *
545	ev_realloc_emul (void *ptr, long size)	569	ev_realloc_emul (void *ptr, long size)
546	{	570	{
		571	#if __GLIBC__
		572	return realloc (ptr, size);
		573	#else
547	/* some systems, notably openbsd and darwin, fail to properly	574	/* some systems, notably openbsd and darwin, fail to properly
548	* implement realloc (x, 0) (as required by both ansi c-98 and	575	* implement realloc (x, 0) (as required by both ansi c-89 and
549	* the single unix specification, so work around them here.	576	* the single unix specification, so work around them here.
550	*/	577	*/
551		578
552	if (size)	579	if (size)
553	return realloc (ptr, size);	580	return realloc (ptr, size);
554		581
555	free (ptr);	582	free (ptr);
556	return 0;	583	return 0;
		584	#endif
557	}	585	}
558		586
559	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	587	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
560		588
561	void	589	void
…		…
569	{	597	{
570	ptr = alloc (ptr, size);	598	ptr = alloc (ptr, size);
571		599
572	if (!ptr && size)	600	if (!ptr && size)
573	{	601	{
		602	#if EV_AVOID_STDIO
		603	ev_printerr ("libev: memory allocation failed, aborting.\n");
		604	#else
574	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	605	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		606	#endif
575	abort ();	607	abort ();
576	}	608	}
577		609
578	return ptr;	610	return ptr;
579	}	611	}
…		…
661		693
662	static int ev_default_loop_ptr;	694	static int ev_default_loop_ptr;
663		695
664	#endif	696	#endif
665		697
666	#if EV_MINIMAL < 2	698	#if EV_FEATURE_API
667	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)	699	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)
668	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)	700	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)
669	# define EV_INVOKE_PENDING invoke_cb (EV_A)	701	# define EV_INVOKE_PENDING invoke_cb (EV_A)
670	#else	702	#else
671	# define EV_RELEASE_CB (void)0	703	# define EV_RELEASE_CB (void)0
672	# define EV_ACQUIRE_CB (void)0	704	# define EV_ACQUIRE_CB (void)0
673	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)	705	# define EV_INVOKE_PENDING ev_invoke_pending (EV_A)
674	#endif	706	#endif
675		707
676	#define EVUNLOOP_RECURSE 0x80	708	#define EVBREAK_RECURSE 0x80
677		709
678	/*****************************************************************************/	710	/*****************************************************************************/
679		711
680	#ifndef EV_HAVE_EV_TIME	712	#ifndef EV_HAVE_EV_TIME
681	ev_tstamp	713	ev_tstamp
…		…
725	if (delay > 0.)	757	if (delay > 0.)
726	{	758	{
727	#if EV_USE_NANOSLEEP	759	#if EV_USE_NANOSLEEP
728	struct timespec ts;	760	struct timespec ts;
729		761
730	ts.tv_sec = (time_t)delay;	762	EV_TS_SET (ts, delay);
731	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
732
733	nanosleep (&ts, 0);	763	nanosleep (&ts, 0);
734	#elif defined(_WIN32)	764	#elif defined(_WIN32)
735	Sleep ((unsigned long)(delay * 1e3));	765	Sleep ((unsigned long)(delay * 1e3));
736	#else	766	#else
737	struct timeval tv;	767	struct timeval tv;
738		768
739	tv.tv_sec = (time_t)delay;
740	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
741
742	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */	769	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
743	/* something not guaranteed by newer posix versions, but guaranteed */	770	/* something not guaranteed by newer posix versions, but guaranteed */
744	/* by older ones */	771	/* by older ones */
		772	EV_TV_SET (tv, delay);
745	select (0, 0, 0, 0, &tv);	773	select (0, 0, 0, 0, &tv);
746	#endif	774	#endif
747	}	775	}
748	}	776	}
749		777
750	/*****************************************************************************/	778	/*****************************************************************************/
751		779
752	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */	780	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */
753		781
754	/* find a suitable new size for the given array, */	782	/* find a suitable new size for the given array, */
755	/* hopefully by rounding to a ncie-to-malloc size */	783	/* hopefully by rounding to a nice-to-malloc size */
756	inline_size int	784	inline_size int
757	array_nextsize (int elem, int cur, int cnt)	785	array_nextsize (int elem, int cur, int cnt)
758	{	786	{
759	int ncur = cur + 1;	787	int ncur = cur + 1;
760		788
…		…
856	}	884	}
857		885
858	/*****************************************************************************/	886	/*****************************************************************************/
859		887
860	inline_speed void	888	inline_speed void
861	fd_event_nc (EV_P_ int fd, int revents)	889	fd_event_nocheck (EV_P_ int fd, int revents)
862	{	890	{
863	ANFD *anfd = anfds + fd;	891	ANFD *anfd = anfds + fd;
864	ev_io *w;	892	ev_io *w;
865		893
866	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	894	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
…		…
878	fd_event (EV_P_ int fd, int revents)	906	fd_event (EV_P_ int fd, int revents)
879	{	907	{
880	ANFD *anfd = anfds + fd;	908	ANFD *anfd = anfds + fd;
881		909
882	if (expect_true (!anfd->reify))	910	if (expect_true (!anfd->reify))
883	fd_event_nc (EV_A_ fd, revents);	911	fd_event_nocheck (EV_A_ fd, revents);
884	}	912	}
885		913
886	void	914	void
887	ev_feed_fd_event (EV_P_ int fd, int revents)	915	ev_feed_fd_event (EV_P_ int fd, int revents)
888	{	916	{
889	if (fd >= 0 && fd < anfdmax)	917	if (fd >= 0 && fd < anfdmax)
890	fd_event_nc (EV_A_ fd, revents);	918	fd_event_nocheck (EV_A_ fd, revents);
891	}	919	}
892		920
893	/* make sure the external fd watch events are in-sync */	921	/* make sure the external fd watch events are in-sync */
894	/* with the kernel/libev internal state */	922	/* with the kernel/libev internal state */
895	inline_size void	923	inline_size void
…		…
901	{	929	{
902	int fd = fdchanges [i];	930	int fd = fdchanges [i];
903	ANFD *anfd = anfds + fd;	931	ANFD *anfd = anfds + fd;
904	ev_io *w;	932	ev_io *w;
905		933
906	unsigned char events = 0;	934	unsigned char o_events = anfd->events;
		935	unsigned char o_reify = anfd->reify;
907		936
908	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	937	anfd->reify = 0;
909	events |= (unsigned char)w->events;
910		938
911	#if EV_SELECT_IS_WINSOCKET	939	#if EV_SELECT_IS_WINSOCKET
912	if (events)	940	if (o_reify & EV__IOFDSET)
913	{	941	{
914	unsigned long arg;	942	unsigned long arg;
915	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	943	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);
916	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	944	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));
917	}	945	}
918	#endif	946	#endif
919		947
		948	/*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */
920	{	949	{
921	unsigned char o_events = anfd->events;
922	unsigned char o_reify = anfd->reify;
923
924	anfd->reify = 0;
925	anfd->events = events;	950	anfd->events = 0;
926		951
927	if (o_events != events || o_reify & EV__IOFDSET)	952	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
		953	anfd->events |= (unsigned char)w->events;
		954
		955	if (o_events != anfd->events)
		956	o_reify = EV__IOFDSET; /* actually |= */
		957	}
		958
		959	if (o_reify & EV__IOFDSET)
928	backend_modify (EV_A_ fd, o_events, events);	960	backend_modify (EV_A_ fd, o_events, anfd->events);
929	}
930	}	961	}
931		962
932	fdchangecnt = 0;	963	fdchangecnt = 0;
933	}	964	}
934		965
…		…
958	ev_io_stop (EV_A_ w);	989	ev_io_stop (EV_A_ w);
959	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);	990	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
960	}	991	}
961	}	992	}
962		993
963	/* check whether the given fd is atcually valid, for error recovery */	994	/* check whether the given fd is actually valid, for error recovery */
964	inline_size int	995	inline_size int
965	fd_valid (int fd)	996	fd_valid (int fd)
966	{	997	{
967	#ifdef _WIN32	998	#ifdef _WIN32
968	return _get_osfhandle (fd) != -1;	999	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
969	#else	1000	#else
970	return fcntl (fd, F_GETFD) != -1;	1001	return fcntl (fd, F_GETFD) != -1;
971	#endif	1002	#endif
972	}	1003	}
973		1004
…		…
1010	anfds [fd].emask = 0;	1041	anfds [fd].emask = 0;
1011	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1042	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
1012	}	1043	}
1013	}	1044	}
1014		1045
		1046	/* used to prepare libev internal fd's */
		1047	/* this is not fork-safe */
		1048	inline_speed void
		1049	fd_intern (int fd)
		1050	{
		1051	#ifdef _WIN32
		1052	unsigned long arg = 1;
		1053	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1054	#else
		1055	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1056	fcntl (fd, F_SETFL, O_NONBLOCK);
		1057	#endif
		1058	}
		1059
1015	/*****************************************************************************/	1060	/*****************************************************************************/
1016		1061
1017	/*	1062	/*
1018	* the heap functions want a real array index. array index 0 uis guaranteed to not	1063	* the heap functions want a real array index. array index 0 is guaranteed to not
1019	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives	1064	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
1020	* the branching factor of the d-tree.	1065	* the branching factor of the d-tree.
1021	*/	1066	*/
1022		1067
1023	/*	1068	/*
…		…
1171		1216
1172	static ANSIG signals [EV_NSIG - 1];	1217	static ANSIG signals [EV_NSIG - 1];
1173		1218
1174	/*****************************************************************************/	1219	/*****************************************************************************/
1175		1220
1176	/* used to prepare libev internal fd's */	1221	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1177	/* this is not fork-safe */
1178	inline_speed void
1179	fd_intern (int fd)
1180	{
1181	#ifdef _WIN32
1182	unsigned long arg = 1;
1183	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1184	#else
1185	fcntl (fd, F_SETFD, FD_CLOEXEC);
1186	fcntl (fd, F_SETFL, O_NONBLOCK);
1187	#endif
1188	}
1189		1222
1190	static void noinline	1223	static void noinline
1191	evpipe_init (EV_P)	1224	evpipe_init (EV_P)
1192	{	1225	{
1193	if (!ev_is_active (&pipe_w))	1226	if (!ev_is_active (&pipe_w))
1194	{	1227	{
1195	#if EV_USE_EVENTFD	1228	# if EV_USE_EVENTFD
1196	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1229	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1197	if (evfd < 0 && errno == EINVAL)	1230	if (evfd < 0 && errno == EINVAL)
1198	evfd = eventfd (0, 0);	1231	evfd = eventfd (0, 0);
1199		1232
1200	if (evfd >= 0)	1233	if (evfd >= 0)
…		…
1202	evpipe [0] = -1;	1235	evpipe [0] = -1;
1203	fd_intern (evfd); /* doing it twice doesn't hurt */	1236	fd_intern (evfd); /* doing it twice doesn't hurt */
1204	ev_io_set (&pipe_w, evfd, EV_READ);	1237	ev_io_set (&pipe_w, evfd, EV_READ);
1205	}	1238	}
1206	else	1239	else
1207	#endif	1240	# endif
1208	{	1241	{
1209	while (pipe (evpipe))	1242	while (pipe (evpipe))
1210	ev_syserr ("(libev) error creating signal/async pipe");	1243	ev_syserr ("(libev) error creating signal/async pipe");
1211		1244
1212	fd_intern (evpipe [0]);	1245	fd_intern (evpipe [0]);
…		…
1223	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1256	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1224	{	1257	{
1225	if (!*flag)	1258	if (!*flag)
1226	{	1259	{
1227	int old_errno = errno; /* save errno because write might clobber it */	1260	int old_errno = errno; /* save errno because write might clobber it */
		1261	char dummy;
1228		1262
1229	*flag = 1;	1263	*flag = 1;
1230		1264
1231	#if EV_USE_EVENTFD	1265	#if EV_USE_EVENTFD
1232	if (evfd >= 0)	1266	if (evfd >= 0)
…		…
1234	uint64_t counter = 1;	1268	uint64_t counter = 1;
1235	write (evfd, &counter, sizeof (uint64_t));	1269	write (evfd, &counter, sizeof (uint64_t));
1236	}	1270	}
1237	else	1271	else
1238	#endif	1272	#endif
		1273	/* win32 people keep sending patches that change this write() to send() */
		1274	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1275	/* so when you think this write should be a send instead, please find out */
		1276	/* where your send() is from - it's definitely not the microsoft send, and */
		1277	/* tell me. thank you. */
1239	write (evpipe [1], &old_errno, 1);	1278	write (evpipe [1], &dummy, 1);
1240		1279
1241	errno = old_errno;	1280	errno = old_errno;
1242	}	1281	}
1243	}	1282	}
1244		1283
…		…
1257	}	1296	}
1258	else	1297	else
1259	#endif	1298	#endif
1260	{	1299	{
1261	char dummy;	1300	char dummy;
		1301	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1262	read (evpipe [0], &dummy, 1);	1302	read (evpipe [0], &dummy, 1);
1263	}	1303	}
1264		1304
1265	if (sig_pending)	1305	if (sig_pending)
1266	{	1306	{
…		…
1293	{	1333	{
1294	#if EV_MULTIPLICITY	1334	#if EV_MULTIPLICITY
1295	EV_P = signals [signum - 1].loop;	1335	EV_P = signals [signum - 1].loop;
1296	#endif	1336	#endif
1297		1337
1298	#if _WIN32	1338	#ifdef _WIN32
1299	signal (signum, ev_sighandler);	1339	signal (signum, ev_sighandler);
1300	#endif	1340	#endif
1301		1341
1302	signals [signum - 1].pending = 1;	1342	signals [signum - 1].pending = 1;
1303	evpipe_write (EV_A_ &sig_pending);	1343	evpipe_write (EV_A_ &sig_pending);
…		…
1345	break;	1385	break;
1346	}	1386	}
1347	}	1387	}
1348	#endif	1388	#endif
1349		1389
		1390	#endif
		1391
1350	/*****************************************************************************/	1392	/*****************************************************************************/
1351		1393
		1394	#if EV_CHILD_ENABLE
1352	static WL childs [EV_PID_HASHSIZE];	1395	static WL childs [EV_PID_HASHSIZE];
1353
1354	#ifndef _WIN32
1355		1396
1356	static ev_signal childev;	1397	static ev_signal childev;
1357		1398
1358	#ifndef WIFCONTINUED	1399	#ifndef WIFCONTINUED
1359	# define WIFCONTINUED(status) 0	1400	# define WIFCONTINUED(status) 0
…		…
1364	child_reap (EV_P_ int chain, int pid, int status)	1405	child_reap (EV_P_ int chain, int pid, int status)
1365	{	1406	{
1366	ev_child *w;	1407	ev_child *w;
1367	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1408	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1368		1409
1369	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1410	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1370	{	1411	{
1371	if ((w->pid == pid || !w->pid)	1412	if ((w->pid == pid || !w->pid)
1372	&& (!traced || (w->flags & 1)))	1413	&& (!traced || (w->flags & 1)))
1373	{	1414	{
1374	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */	1415	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */
…		…
1399	/* make sure we are called again until all children have been reaped */	1440	/* make sure we are called again until all children have been reaped */
1400	/* we need to do it this way so that the callback gets called before we continue */	1441	/* we need to do it this way so that the callback gets called before we continue */
1401	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1442	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1402		1443
1403	child_reap (EV_A_ pid, pid, status);	1444	child_reap (EV_A_ pid, pid, status);
1404	if (EV_PID_HASHSIZE > 1)	1445	if ((EV_PID_HASHSIZE) > 1)
1405	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1446	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1406	}	1447	}
1407		1448
1408	#endif	1449	#endif
1409		1450
…		…
1476	#ifdef __APPLE__	1517	#ifdef __APPLE__
1477	/* only select works correctly on that "unix-certified" platform */	1518	/* only select works correctly on that "unix-certified" platform */
1478	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1519	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1479	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1520	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1480	#endif	1521	#endif
		1522	#ifdef __FreeBSD__
		1523	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1524	#endif
1481		1525
1482	return flags;	1526	return flags;
1483	}	1527	}
1484		1528
1485	unsigned int	1529	unsigned int
…		…
1498	ev_backend (EV_P)	1542	ev_backend (EV_P)
1499	{	1543	{
1500	return backend;	1544	return backend;
1501	}	1545	}
1502		1546
1503	#if EV_MINIMAL < 2	1547	#if EV_FEATURE_API
1504	unsigned int	1548	unsigned int
1505	ev_loop_count (EV_P)	1549	ev_iteration (EV_P)
1506	{	1550	{
1507	return loop_count;	1551	return loop_count;
1508	}	1552	}
1509		1553
1510	unsigned int	1554	unsigned int
1511	ev_loop_depth (EV_P)	1555	ev_depth (EV_P)
1512	{	1556	{
1513	return loop_depth;	1557	return loop_depth;
1514	}	1558	}
1515		1559
1516	void	1560	void
…		…
1588		1632
1589	ev_rt_now = ev_time ();	1633	ev_rt_now = ev_time ();
1590	mn_now = get_clock ();	1634	mn_now = get_clock ();
1591	now_floor = mn_now;	1635	now_floor = mn_now;
1592	rtmn_diff = ev_rt_now - mn_now;	1636	rtmn_diff = ev_rt_now - mn_now;
1593	#if EV_MINIMAL < 2	1637	#if EV_FEATURE_API
1594	invoke_cb = ev_invoke_pending;	1638	invoke_cb = ev_invoke_pending;
1595	#endif	1639	#endif
1596		1640
1597	io_blocktime = 0.;	1641	io_blocktime = 0.;
1598	timeout_blocktime = 0.;	1642	timeout_blocktime = 0.;
…		…
1604	#endif	1648	#endif
1605	#if EV_USE_INOTIFY	1649	#if EV_USE_INOTIFY
1606	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1650	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1607	#endif	1651	#endif
1608	#if EV_USE_SIGNALFD	1652	#if EV_USE_SIGNALFD
1609	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1653	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1610	#endif	1654	#endif
1611		1655
1612	if (!(flags & 0x0000ffffU))	1656	if (!(flags & 0x0000ffffU))
1613	flags |= ev_recommended_backends ();	1657	flags |= ev_recommended_backends ();
1614		1658
…		…
1628	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1672	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1629	#endif	1673	#endif
1630		1674
1631	ev_prepare_init (&pending_w, pendingcb);	1675	ev_prepare_init (&pending_w, pendingcb);
1632		1676
		1677	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1633	ev_init (&pipe_w, pipecb);	1678	ev_init (&pipe_w, pipecb);
1634	ev_set_priority (&pipe_w, EV_MAXPRI);	1679	ev_set_priority (&pipe_w, EV_MAXPRI);
		1680	#endif
1635	}	1681	}
1636	}	1682	}
1637		1683
1638	/* free up a loop structure */	1684	/* free up a loop structure */
1639	static void noinline	1685	static void noinline
…		…
1757	{	1803	{
1758	EV_WIN32_CLOSE_FD (evpipe [0]);	1804	EV_WIN32_CLOSE_FD (evpipe [0]);
1759	EV_WIN32_CLOSE_FD (evpipe [1]);	1805	EV_WIN32_CLOSE_FD (evpipe [1]);
1760	}	1806	}
1761		1807
		1808	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1762	evpipe_init (EV_A);	1809	evpipe_init (EV_A);
1763	/* now iterate over everything, in case we missed something */	1810	/* now iterate over everything, in case we missed something */
1764	pipecb (EV_A_ &pipe_w, EV_READ);	1811	pipecb (EV_A_ &pipe_w, EV_READ);
		1812	#endif
1765	}	1813	}
1766		1814
1767	postfork = 0;	1815	postfork = 0;
1768	}	1816	}
1769		1817
…		…
1831	verify_watcher (EV_A_ ws [cnt]);	1879	verify_watcher (EV_A_ ws [cnt]);
1832	}	1880	}
1833	}	1881	}
1834	#endif	1882	#endif
1835		1883
1836	#if EV_MINIMAL < 2	1884	#if EV_FEATURE_API
1837	void	1885	void
1838	ev_loop_verify (EV_P)	1886	ev_verify (EV_P)
1839	{	1887	{
1840	#if EV_VERIFY	1888	#if EV_VERIFY
1841	int i;	1889	int i;
1842	WL w;	1890	WL w;
1843		1891
…		…
1882	#if EV_ASYNC_ENABLE	1930	#if EV_ASYNC_ENABLE
1883	assert (asyncmax >= asynccnt);	1931	assert (asyncmax >= asynccnt);
1884	array_verify (EV_A_ (W *)asyncs, asynccnt);	1932	array_verify (EV_A_ (W *)asyncs, asynccnt);
1885	#endif	1933	#endif
1886		1934
		1935	#if EV_PREPARE_ENABLE
1887	assert (preparemax >= preparecnt);	1936	assert (preparemax >= preparecnt);
1888	array_verify (EV_A_ (W *)prepares, preparecnt);	1937	array_verify (EV_A_ (W *)prepares, preparecnt);
		1938	#endif
1889		1939
		1940	#if EV_CHECK_ENABLE
1890	assert (checkmax >= checkcnt);	1941	assert (checkmax >= checkcnt);
1891	array_verify (EV_A_ (W *)checks, checkcnt);	1942	array_verify (EV_A_ (W *)checks, checkcnt);
		1943	#endif
1892		1944
1893	# if 0	1945	# if 0
		1946	#if EV_CHILD_ENABLE
1894	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1947	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1895	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	1948	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1949	#endif
1896	# endif	1950	# endif
1897	#endif	1951	#endif
1898	}	1952	}
1899	#endif	1953	#endif
1900		1954
…		…
1916		1970
1917	loop_init (EV_A_ flags);	1971	loop_init (EV_A_ flags);
1918		1972
1919	if (ev_backend (EV_A))	1973	if (ev_backend (EV_A))
1920	{	1974	{
1921	#ifndef _WIN32	1975	#if EV_CHILD_ENABLE
1922	ev_signal_init (&childev, childcb, SIGCHLD);	1976	ev_signal_init (&childev, childcb, SIGCHLD);
1923	ev_set_priority (&childev, EV_MAXPRI);	1977	ev_set_priority (&childev, EV_MAXPRI);
1924	ev_signal_start (EV_A_ &childev);	1978	ev_signal_start (EV_A_ &childev);
1925	ev_unref (EV_A); /* child watcher should not keep loop alive */	1979	ev_unref (EV_A); /* child watcher should not keep loop alive */
1926	#endif	1980	#endif
…		…
1939	EV_P = ev_default_loop_ptr;	1993	EV_P = ev_default_loop_ptr;
1940	#endif	1994	#endif
1941		1995
1942	ev_default_loop_ptr = 0;	1996	ev_default_loop_ptr = 0;
1943		1997
1944	#ifndef _WIN32	1998	#if EV_CHILD_ENABLE
1945	ev_ref (EV_A); /* child watcher */	1999	ev_ref (EV_A); /* child watcher */
1946	ev_signal_stop (EV_A_ &childev);	2000	ev_signal_stop (EV_A_ &childev);
1947	#endif	2001	#endif
1948		2002
1949	loop_destroy (EV_A);	2003	loop_destroy (EV_A);
…		…
2055	EV_FREQUENT_CHECK;	2109	EV_FREQUENT_CHECK;
2056	feed_reverse (EV_A_ (W)w);	2110	feed_reverse (EV_A_ (W)w);
2057	}	2111	}
2058	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2112	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2059		2113
2060	feed_reverse_done (EV_A_ EV_TIMEOUT);	2114	feed_reverse_done (EV_A_ EV_TIMER);
2061	}	2115	}
2062	}	2116	}
2063		2117
2064	#if EV_PERIODIC_ENABLE	2118	#if EV_PERIODIC_ENABLE
2065	/* make periodics pending */	2119	/* make periodics pending */
…		…
2118	feed_reverse_done (EV_A_ EV_PERIODIC);	2172	feed_reverse_done (EV_A_ EV_PERIODIC);
2119	}	2173	}
2120	}	2174	}
2121		2175
2122	/* simply recalculate all periodics */	2176	/* simply recalculate all periodics */
2123	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2177	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2124	static void noinline	2178	static void noinline
2125	periodics_reschedule (EV_P)	2179	periodics_reschedule (EV_P)
2126	{	2180	{
2127	int i;	2181	int i;
2128		2182
…		…
2156	ANHE_at_cache (*he);	2210	ANHE_at_cache (*he);
2157	}	2211	}
2158	}	2212	}
2159		2213
2160	/* fetch new monotonic and realtime times from the kernel */	2214	/* fetch new monotonic and realtime times from the kernel */
2161	/* also detetc if there was a timejump, and act accordingly */	2215	/* also detect if there was a timejump, and act accordingly */
2162	inline_speed void	2216	inline_speed void
2163	time_update (EV_P_ ev_tstamp max_block)	2217	time_update (EV_P_ ev_tstamp max_block)
2164	{	2218	{
2165	#if EV_USE_MONOTONIC	2219	#if EV_USE_MONOTONIC
2166	if (expect_true (have_monotonic))	2220	if (expect_true (have_monotonic))
…		…
2224	mn_now = ev_rt_now;	2278	mn_now = ev_rt_now;
2225	}	2279	}
2226	}	2280	}
2227		2281
2228	void	2282	void
2229	ev_loop (EV_P_ int flags)	2283	ev_run (EV_P_ int flags)
2230	{	2284	{
2231	#if EV_MINIMAL < 2	2285	#if EV_FEATURE_API
2232	++loop_depth;	2286	++loop_depth;
2233	#endif	2287	#endif
2234		2288
2235	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2289	assert (("libev: ev_loop recursion during release detected", loop_done != EVBREAK_RECURSE));
2236		2290
2237	loop_done = EVUNLOOP_CANCEL;	2291	loop_done = EVBREAK_CANCEL;
2238		2292
2239	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2293	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2240		2294
2241	do	2295	do
2242	{	2296	{
2243	#if EV_VERIFY >= 2	2297	#if EV_VERIFY >= 2
2244	ev_loop_verify (EV_A);	2298	ev_verify (EV_A);
2245	#endif	2299	#endif
2246		2300
2247	#ifndef _WIN32	2301	#ifndef _WIN32
2248	if (expect_false (curpid)) /* penalise the forking check even more */	2302	if (expect_false (curpid)) /* penalise the forking check even more */
2249	if (expect_false (getpid () != curpid))	2303	if (expect_false (getpid () != curpid))
…		…
2261	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2315	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2262	EV_INVOKE_PENDING;	2316	EV_INVOKE_PENDING;
2263	}	2317	}
2264	#endif	2318	#endif
2265		2319
		2320	#if EV_PREPARE_ENABLE
2266	/* queue prepare watchers (and execute them) */	2321	/* queue prepare watchers (and execute them) */
2267	if (expect_false (preparecnt))	2322	if (expect_false (preparecnt))
2268	{	2323	{
2269	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2324	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2270	EV_INVOKE_PENDING;	2325	EV_INVOKE_PENDING;
2271	}	2326	}
		2327	#endif
2272		2328
2273	if (expect_false (loop_done))	2329	if (expect_false (loop_done))
2274	break;	2330	break;
2275		2331
2276	/* we might have forked, so reify kernel state if necessary */	2332	/* we might have forked, so reify kernel state if necessary */
…		…
2283	/* calculate blocking time */	2339	/* calculate blocking time */
2284	{	2340	{
2285	ev_tstamp waittime = 0.;	2341	ev_tstamp waittime = 0.;
2286	ev_tstamp sleeptime = 0.;	2342	ev_tstamp sleeptime = 0.;
2287		2343
		2344	/* remember old timestamp for io_blocktime calculation */
		2345	ev_tstamp prev_mn_now = mn_now;
		2346
		2347	/* update time to cancel out callback processing overhead */
		2348	time_update (EV_A_ 1e100);
		2349
2288	if (expect_true (!(flags & EVLOOP_NONBLOCK || idleall || !activecnt)))	2350	if (expect_true (!(flags & EVRUN_NOWAIT || idleall || !activecnt)))
2289	{	2351	{
2290	/* remember old timestamp for io_blocktime calculation */
2291	ev_tstamp prev_mn_now = mn_now;
2292
2293	/* update time to cancel out callback processing overhead */
2294	time_update (EV_A_ 1e100);
2295
2296	waittime = MAX_BLOCKTIME;	2352	waittime = MAX_BLOCKTIME;
2297		2353
2298	if (timercnt)	2354	if (timercnt)
2299	{	2355	{
2300	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;	2356	ev_tstamp to = ANHE_at (timers [HEAP0]) - mn_now + backend_fudge;
…		…
2327	waittime -= sleeptime;	2383	waittime -= sleeptime;
2328	}	2384	}
2329	}	2385	}
2330	}	2386	}
2331		2387
2332	#if EV_MINIMAL < 2	2388	#if EV_FEATURE_API
2333	++loop_count;	2389	++loop_count;
2334	#endif	2390	#endif
2335	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2391	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */
2336	backend_poll (EV_A_ waittime);	2392	backend_poll (EV_A_ waittime);
2337	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2393	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
2338		2394
2339	/* update ev_rt_now, do magic */	2395	/* update ev_rt_now, do magic */
2340	time_update (EV_A_ waittime + sleeptime);	2396	time_update (EV_A_ waittime + sleeptime);
2341	}	2397	}
2342		2398
…		…
2349	#if EV_IDLE_ENABLE	2405	#if EV_IDLE_ENABLE
2350	/* queue idle watchers unless other events are pending */	2406	/* queue idle watchers unless other events are pending */
2351	idle_reify (EV_A);	2407	idle_reify (EV_A);
2352	#endif	2408	#endif
2353		2409
		2410	#if EV_CHECK_ENABLE
2354	/* queue check watchers, to be executed first */	2411	/* queue check watchers, to be executed first */
2355	if (expect_false (checkcnt))	2412	if (expect_false (checkcnt))
2356	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2413	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2414	#endif
2357		2415
2358	EV_INVOKE_PENDING;	2416	EV_INVOKE_PENDING;
2359	}	2417	}
2360	while (expect_true (	2418	while (expect_true (
2361	activecnt	2419	activecnt
2362	&& !loop_done	2420	&& !loop_done
2363	&& !(flags & (EVLOOP_ONESHOT | EVLOOP_NONBLOCK))	2421	&& !(flags & (EVRUN_ONCE | EVRUN_NOWAIT))
2364	));	2422	));
2365		2423
2366	if (loop_done == EVUNLOOP_ONE)	2424	if (loop_done == EVBREAK_ONE)
2367	loop_done = EVUNLOOP_CANCEL;	2425	loop_done = EVBREAK_CANCEL;
2368		2426
2369	#if EV_MINIMAL < 2	2427	#if EV_FEATURE_API
2370	--loop_depth;	2428	--loop_depth;
2371	#endif	2429	#endif
2372	}	2430	}
2373		2431
2374	void	2432	void
2375	ev_unloop (EV_P_ int how)	2433	ev_break (EV_P_ int how)
2376	{	2434	{
2377	loop_done = how;	2435	loop_done = how;
2378	}	2436	}
2379		2437
2380	void	2438	void
…		…
2500		2558
2501	if (expect_false (ev_is_active (w)))	2559	if (expect_false (ev_is_active (w)))
2502	return;	2560	return;
2503		2561
2504	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2562	assert (("libev: ev_io_start called with negative fd", fd >= 0));
2505	assert (("libev: ev_io start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));	2563	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
2506		2564
2507	EV_FREQUENT_CHECK;	2565	EV_FREQUENT_CHECK;
2508		2566
2509	ev_start (EV_A_ (W)w, 1);	2567	ev_start (EV_A_ (W)w, 1);
2510	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2568	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2528	EV_FREQUENT_CHECK;	2586	EV_FREQUENT_CHECK;
2529		2587
2530	wlist_del (&anfds[w->fd].head, (WL)w);	2588	wlist_del (&anfds[w->fd].head, (WL)w);
2531	ev_stop (EV_A_ (W)w);	2589	ev_stop (EV_A_ (W)w);
2532		2590
2533	fd_change (EV_A_ w->fd, 1);	2591	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2534		2592
2535	EV_FREQUENT_CHECK;	2593	EV_FREQUENT_CHECK;
2536	}	2594	}
2537		2595
2538	void noinline	2596	void noinline
…		…
2580	timers [active] = timers [timercnt + HEAP0];	2638	timers [active] = timers [timercnt + HEAP0];
2581	adjustheap (timers, timercnt, active);	2639	adjustheap (timers, timercnt, active);
2582	}	2640	}
2583	}	2641	}
2584		2642
2585	EV_FREQUENT_CHECK;
2586
2587	ev_at (w) -= mn_now;	2643	ev_at (w) -= mn_now;
2588		2644
2589	ev_stop (EV_A_ (W)w);	2645	ev_stop (EV_A_ (W)w);
		2646
		2647	EV_FREQUENT_CHECK;
2590	}	2648	}
2591		2649
2592	void noinline	2650	void noinline
2593	ev_timer_again (EV_P_ ev_timer *w)	2651	ev_timer_again (EV_P_ ev_timer *w)
2594	{	2652	{
…		…
2673	periodics [active] = periodics [periodiccnt + HEAP0];	2731	periodics [active] = periodics [periodiccnt + HEAP0];
2674	adjustheap (periodics, periodiccnt, active);	2732	adjustheap (periodics, periodiccnt, active);
2675	}	2733	}
2676	}	2734	}
2677		2735
2678	EV_FREQUENT_CHECK;
2679
2680	ev_stop (EV_A_ (W)w);	2736	ev_stop (EV_A_ (W)w);
		2737
		2738	EV_FREQUENT_CHECK;
2681	}	2739	}
2682		2740
2683	void noinline	2741	void noinline
2684	ev_periodic_again (EV_P_ ev_periodic *w)	2742	ev_periodic_again (EV_P_ ev_periodic *w)
2685	{	2743	{
…		…
2690	#endif	2748	#endif
2691		2749
2692	#ifndef SA_RESTART	2750	#ifndef SA_RESTART
2693	# define SA_RESTART 0	2751	# define SA_RESTART 0
2694	#endif	2752	#endif
		2753
		2754	#if EV_SIGNAL_ENABLE
2695		2755
2696	void noinline	2756	void noinline
2697	ev_signal_start (EV_P_ ev_signal *w)	2757	ev_signal_start (EV_P_ ev_signal *w)
2698	{	2758	{
2699	if (expect_false (ev_is_active (w)))	2759	if (expect_false (ev_is_active (w)))
…		…
2746	if (!((WL)w)->next)	2806	if (!((WL)w)->next)
2747	# if EV_USE_SIGNALFD	2807	# if EV_USE_SIGNALFD
2748	if (sigfd < 0) /*TODO*/	2808	if (sigfd < 0) /*TODO*/
2749	# endif	2809	# endif
2750	{	2810	{
2751	# if _WIN32	2811	# ifdef _WIN32
2752	evpipe_init (EV_A);	2812	evpipe_init (EV_A);
2753		2813
2754	signal (w->signum, ev_sighandler);	2814	signal (w->signum, ev_sighandler);
2755	# else	2815	# else
2756	struct sigaction sa;	2816	struct sigaction sa;
…		…
2789	signals [w->signum - 1].loop = 0; /* unattach from signal */	2849	signals [w->signum - 1].loop = 0; /* unattach from signal */
2790	#endif	2850	#endif
2791	#if EV_USE_SIGNALFD	2851	#if EV_USE_SIGNALFD
2792	if (sigfd >= 0)	2852	if (sigfd >= 0)
2793	{	2853	{
2794	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2854	sigset_t ss;
		2855
		2856	sigemptyset (&ss);
		2857	sigaddset (&ss, w->signum);
2795	sigdelset (&sigfd_set, w->signum);	2858	sigdelset (&sigfd_set, w->signum);
		2859
2796	signalfd (sigfd, &sigfd_set, 0);	2860	signalfd (sigfd, &sigfd_set, 0);
2797	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2861	sigprocmask (SIG_UNBLOCK, &ss, 0);
2798	/*TODO: maybe unblock signal? */
2799	}	2862	}
2800	else	2863	else
2801	#endif	2864	#endif
2802	signal (w->signum, SIG_DFL);	2865	signal (w->signum, SIG_DFL);
2803	}	2866	}
2804		2867
2805	EV_FREQUENT_CHECK;	2868	EV_FREQUENT_CHECK;
2806	}	2869	}
2807		2870
		2871	#endif
		2872
		2873	#if EV_CHILD_ENABLE
		2874
2808	void	2875	void
2809	ev_child_start (EV_P_ ev_child *w)	2876	ev_child_start (EV_P_ ev_child *w)
2810	{	2877	{
2811	#if EV_MULTIPLICITY	2878	#if EV_MULTIPLICITY
2812	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	2879	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2815	return;	2882	return;
2816		2883
2817	EV_FREQUENT_CHECK;	2884	EV_FREQUENT_CHECK;
2818		2885
2819	ev_start (EV_A_ (W)w, 1);	2886	ev_start (EV_A_ (W)w, 1);
2820	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2887	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2821		2888
2822	EV_FREQUENT_CHECK;	2889	EV_FREQUENT_CHECK;
2823	}	2890	}
2824		2891
2825	void	2892	void
…		…
2829	if (expect_false (!ev_is_active (w)))	2896	if (expect_false (!ev_is_active (w)))
2830	return;	2897	return;
2831		2898
2832	EV_FREQUENT_CHECK;	2899	EV_FREQUENT_CHECK;
2833		2900
2834	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2901	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2835	ev_stop (EV_A_ (W)w);	2902	ev_stop (EV_A_ (W)w);
2836		2903
2837	EV_FREQUENT_CHECK;	2904	EV_FREQUENT_CHECK;
2838	}	2905	}
		2906
		2907	#endif
2839		2908
2840	#if EV_STAT_ENABLE	2909	#if EV_STAT_ENABLE
2841		2910
2842	# ifdef _WIN32	2911	# ifdef _WIN32
2843	# undef lstat	2912	# undef lstat
…		…
2849	#define MIN_STAT_INTERVAL 0.1074891	2918	#define MIN_STAT_INTERVAL 0.1074891
2850		2919
2851	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);	2920	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);
2852		2921
2853	#if EV_USE_INOTIFY	2922	#if EV_USE_INOTIFY
2854	# define EV_INOTIFY_BUFSIZE 8192	2923
		2924	/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
		2925	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
2855		2926
2856	static void noinline	2927	static void noinline
2857	infy_add (EV_P_ ev_stat *w)	2928	infy_add (EV_P_ ev_stat *w)
2858	{	2929	{
2859	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);	2930	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);
…		…
2908	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	2979	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2909	}	2980	}
2910	}	2981	}
2911		2982
2912	if (w->wd >= 0)	2983	if (w->wd >= 0)
2913	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	2984	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2914		2985
2915	/* now re-arm timer, if required */	2986	/* now re-arm timer, if required */
2916	if (ev_is_active (&w->timer)) ev_ref (EV_A);	2987	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2917	ev_timer_again (EV_A_ &w->timer);	2988	ev_timer_again (EV_A_ &w->timer);
2918	if (ev_is_active (&w->timer)) ev_unref (EV_A);	2989	if (ev_is_active (&w->timer)) ev_unref (EV_A);
…		…
2926		2997
2927	if (wd < 0)	2998	if (wd < 0)
2928	return;	2999	return;
2929		3000
2930	w->wd = -2;	3001	w->wd = -2;
2931	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3002	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2932	wlist_del (&fs_hash [slot].head, (WL)w);	3003	wlist_del (&fs_hash [slot].head, (WL)w);
2933		3004
2934	/* remove this watcher, if others are watching it, they will rearm */	3005	/* remove this watcher, if others are watching it, they will rearm */
2935	inotify_rm_watch (fs_fd, wd);	3006	inotify_rm_watch (fs_fd, wd);
2936	}	3007	}
…		…
2938	static void noinline	3009	static void noinline
2939	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3010	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2940	{	3011	{
2941	if (slot < 0)	3012	if (slot < 0)
2942	/* overflow, need to check for all hash slots */	3013	/* overflow, need to check for all hash slots */
2943	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3014	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2944	infy_wd (EV_A_ slot, wd, ev);	3015	infy_wd (EV_A_ slot, wd, ev);
2945	else	3016	else
2946	{	3017	{
2947	WL w_;	3018	WL w_;
2948		3019
2949	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3020	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2950	{	3021	{
2951	ev_stat *w = (ev_stat *)w_;	3022	ev_stat *w = (ev_stat *)w_;
2952	w_ = w_->next; /* lets us remove this watcher and all before it */	3023	w_ = w_->next; /* lets us remove this watcher and all before it */
2953		3024
2954	if (w->wd == wd || wd == -1)	3025	if (w->wd == wd || wd == -1)
2955	{	3026	{
2956	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3027	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2957	{	3028	{
2958	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3029	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2959	w->wd = -1;	3030	w->wd = -1;
2960	infy_add (EV_A_ w); /* re-add, no matter what */	3031	infy_add (EV_A_ w); /* re-add, no matter what */
2961	}	3032	}
2962		3033
2963	stat_timer_cb (EV_A_ &w->timer, 0);	3034	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2968		3039
2969	static void	3040	static void
2970	infy_cb (EV_P_ ev_io *w, int revents)	3041	infy_cb (EV_P_ ev_io *w, int revents)
2971	{	3042	{
2972	char buf [EV_INOTIFY_BUFSIZE];	3043	char buf [EV_INOTIFY_BUFSIZE];
2973	struct inotify_event *ev = (struct inotify_event *)buf;
2974	int ofs;	3044	int ofs;
2975	int len = read (fs_fd, buf, sizeof (buf));	3045	int len = read (fs_fd, buf, sizeof (buf));
2976		3046
2977	for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len)	3047	for (ofs = 0; ofs < len; )
		3048	{
		3049	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);
2978	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3050	infy_wd (EV_A_ ev->wd, ev->wd, ev);
		3051	ofs += sizeof (struct inotify_event) + ev->len;
		3052	}
		3053	}
		3054
		3055	inline_size unsigned int
		3056	ev_linux_version (void)
		3057	{
		3058	struct utsname buf;
		3059	unsigned int v;
		3060	int i;
		3061	char *p = buf.release;
		3062
		3063	if (uname (&buf))
		3064	return 0;
		3065
		3066	for (i = 3+1; --i; )
		3067	{
		3068	unsigned int c = 0;
		3069
		3070	for (;;)
		3071	{
		3072	if (*p >= '0' && *p <= '9')
		3073	c = c * 10 + *p++ - '0';
		3074	else
		3075	{
		3076	p += *p == '.';
		3077	break;
		3078	}
		3079	}
		3080
		3081	v = (v << 8) | c;
		3082	}
		3083
		3084	return v;
2979	}	3085	}
2980		3086
2981	inline_size void	3087	inline_size void
2982	check_2625 (EV_P)	3088	ev_check_2625 (EV_P)
2983	{	3089	{
2984	/* kernels < 2.6.25 are borked	3090	/* kernels < 2.6.25 are borked
2985	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html	3091	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
2986	*/	3092	*/
2987	struct utsname buf;	3093	if (ev_linux_version () < 0x020619)
2988	int major, minor, micro;
2989
2990	if (uname (&buf))
2991	return;
2992
2993	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2994	return;
2995
2996	if (major < 2
2997	|| (major == 2 && minor < 6)
2998	|| (major == 2 && minor == 6 && micro < 25))
2999	return;	3094	return;
3000		3095
3001	fs_2625 = 1;	3096	fs_2625 = 1;
3002	}	3097	}
3003		3098
…		…
3018	if (fs_fd != -2)	3113	if (fs_fd != -2)
3019	return;	3114	return;
3020		3115
3021	fs_fd = -1;	3116	fs_fd = -1;
3022		3117
3023	check_2625 (EV_A);	3118	ev_check_2625 (EV_A);
3024		3119
3025	fs_fd = infy_newfd ();	3120	fs_fd = infy_newfd ();
3026		3121
3027	if (fs_fd >= 0)	3122	if (fs_fd >= 0)
3028	{	3123	{
…		…
3053	ev_io_set (&fs_w, fs_fd, EV_READ);	3148	ev_io_set (&fs_w, fs_fd, EV_READ);
3054	ev_io_start (EV_A_ &fs_w);	3149	ev_io_start (EV_A_ &fs_w);
3055	ev_unref (EV_A);	3150	ev_unref (EV_A);
3056	}	3151	}
3057		3152
3058	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3153	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3059	{	3154	{
3060	WL w_ = fs_hash [slot].head;	3155	WL w_ = fs_hash [slot].head;
3061	fs_hash [slot].head = 0;	3156	fs_hash [slot].head = 0;
3062		3157
3063	while (w_)	3158	while (w_)
…		…
3100	static void noinline	3195	static void noinline
3101	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3196	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3102	{	3197	{
3103	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));	3198	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
3104		3199
3105	/* we copy this here each the time so that */	3200	ev_statdata prev = w->attr;
3106	/* prev has the old value when the callback gets invoked */
3107	w->prev = w->attr;
3108	ev_stat_stat (EV_A_ w);	3201	ev_stat_stat (EV_A_ w);
3109		3202
3110	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */	3203	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */
3111	if (	3204	if (
3112	w->prev.st_dev != w->attr.st_dev	3205	prev.st_dev != w->attr.st_dev
3113	|| w->prev.st_ino != w->attr.st_ino	3206	|| prev.st_ino != w->attr.st_ino
3114	|| w->prev.st_mode != w->attr.st_mode	3207	|| prev.st_mode != w->attr.st_mode
3115	|| w->prev.st_nlink != w->attr.st_nlink	3208	|| prev.st_nlink != w->attr.st_nlink
3116	|| w->prev.st_uid != w->attr.st_uid	3209	|| prev.st_uid != w->attr.st_uid
3117	|| w->prev.st_gid != w->attr.st_gid	3210	|| prev.st_gid != w->attr.st_gid
3118	|| w->prev.st_rdev != w->attr.st_rdev	3211	|| prev.st_rdev != w->attr.st_rdev
3119	|| w->prev.st_size != w->attr.st_size	3212	|| prev.st_size != w->attr.st_size
3120	|| w->prev.st_atime != w->attr.st_atime	3213	|| prev.st_atime != w->attr.st_atime
3121	|| w->prev.st_mtime != w->attr.st_mtime	3214	|| prev.st_mtime != w->attr.st_mtime
3122	|| w->prev.st_ctime != w->attr.st_ctime	3215	|| prev.st_ctime != w->attr.st_ctime
3123	) {	3216	) {
		3217	/* we only update w->prev on actual differences */
		3218	/* in case we test more often than invoke the callback, */
		3219	/* to ensure that prev is always different to attr */
		3220	w->prev = prev;
		3221
3124	#if EV_USE_INOTIFY	3222	#if EV_USE_INOTIFY
3125	if (fs_fd >= 0)	3223	if (fs_fd >= 0)
3126	{	3224	{
3127	infy_del (EV_A_ w);	3225	infy_del (EV_A_ w);
3128	infy_add (EV_A_ w);	3226	infy_add (EV_A_ w);
…		…
3235		3333
3236	EV_FREQUENT_CHECK;	3334	EV_FREQUENT_CHECK;
3237	}	3335	}
3238	#endif	3336	#endif
3239		3337
		3338	#if EV_PREPARE_ENABLE
3240	void	3339	void
3241	ev_prepare_start (EV_P_ ev_prepare *w)	3340	ev_prepare_start (EV_P_ ev_prepare *w)
3242	{	3341	{
3243	if (expect_false (ev_is_active (w)))	3342	if (expect_false (ev_is_active (w)))
3244	return;	3343	return;
…		…
3270		3369
3271	ev_stop (EV_A_ (W)w);	3370	ev_stop (EV_A_ (W)w);
3272		3371
3273	EV_FREQUENT_CHECK;	3372	EV_FREQUENT_CHECK;
3274	}	3373	}
		3374	#endif
3275		3375
		3376	#if EV_CHECK_ENABLE
3276	void	3377	void
3277	ev_check_start (EV_P_ ev_check *w)	3378	ev_check_start (EV_P_ ev_check *w)
3278	{	3379	{
3279	if (expect_false (ev_is_active (w)))	3380	if (expect_false (ev_is_active (w)))
3280	return;	3381	return;
…		…
3306		3407
3307	ev_stop (EV_A_ (W)w);	3408	ev_stop (EV_A_ (W)w);
3308		3409
3309	EV_FREQUENT_CHECK;	3410	EV_FREQUENT_CHECK;
3310	}	3411	}
		3412	#endif
3311		3413
3312	#if EV_EMBED_ENABLE	3414	#if EV_EMBED_ENABLE
3313	void noinline	3415	void noinline
3314	ev_embed_sweep (EV_P_ ev_embed *w)	3416	ev_embed_sweep (EV_P_ ev_embed *w)
3315	{	3417	{
3316	ev_loop (w->other, EVLOOP_NONBLOCK);	3418	ev_run (w->other, EVRUN_NOWAIT);
3317	}	3419	}
3318		3420
3319	static void	3421	static void
3320	embed_io_cb (EV_P_ ev_io *io, int revents)	3422	embed_io_cb (EV_P_ ev_io *io, int revents)
3321	{	3423	{
3322	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));	3424	ev_embed *w = (ev_embed *)(((char *)io) - offsetof (ev_embed, io));
3323		3425
3324	if (ev_cb (w))	3426	if (ev_cb (w))
3325	ev_feed_event (EV_A_ (W)w, EV_EMBED);	3427	ev_feed_event (EV_A_ (W)w, EV_EMBED);
3326	else	3428	else
3327	ev_loop (w->other, EVLOOP_NONBLOCK);	3429	ev_run (w->other, EVRUN_NOWAIT);
3328	}	3430	}
3329		3431
3330	static void	3432	static void
3331	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)	3433	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)
3332	{	3434	{
…		…
3336	EV_P = w->other;	3438	EV_P = w->other;
3337		3439
3338	while (fdchangecnt)	3440	while (fdchangecnt)
3339	{	3441	{
3340	fd_reify (EV_A);	3442	fd_reify (EV_A);
3341	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3443	ev_run (EV_A_ EVRUN_NOWAIT);
3342	}	3444	}
3343	}	3445	}
3344	}	3446	}
3345		3447
3346	static void	3448	static void
…		…
3352		3454
3353	{	3455	{
3354	EV_P = w->other;	3456	EV_P = w->other;
3355		3457
3356	ev_loop_fork (EV_A);	3458	ev_loop_fork (EV_A);
3357	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3459	ev_run (EV_A_ EVRUN_NOWAIT);
3358	}	3460	}
3359		3461
3360	ev_embed_start (EV_A_ w);	3462	ev_embed_start (EV_A_ w);
3361	}	3463	}
3362		3464
…		…
3410		3512
3411	ev_io_stop (EV_A_ &w->io);	3513	ev_io_stop (EV_A_ &w->io);
3412	ev_prepare_stop (EV_A_ &w->prepare);	3514	ev_prepare_stop (EV_A_ &w->prepare);
3413	ev_fork_stop (EV_A_ &w->fork);	3515	ev_fork_stop (EV_A_ &w->fork);
3414		3516
		3517	ev_stop (EV_A_ (W)w);
		3518
3415	EV_FREQUENT_CHECK;	3519	EV_FREQUENT_CHECK;
3416	}	3520	}
3417	#endif	3521	#endif
3418		3522
3419	#if EV_FORK_ENABLE	3523	#if EV_FORK_ENABLE
…		…
3458	void	3562	void
3459	ev_async_start (EV_P_ ev_async *w)	3563	ev_async_start (EV_P_ ev_async *w)
3460	{	3564	{
3461	if (expect_false (ev_is_active (w)))	3565	if (expect_false (ev_is_active (w)))
3462	return;	3566	return;
		3567
		3568	w->sent = 0;
3463		3569
3464	evpipe_init (EV_A);	3570	evpipe_init (EV_A);
3465		3571
3466	EV_FREQUENT_CHECK;	3572	EV_FREQUENT_CHECK;
3467		3573
…		…
3545	{	3651	{
3546	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	3652	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
3547		3653
3548	if (expect_false (!once))	3654	if (expect_false (!once))
3549	{	3655	{
3550	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3656	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3551	return;	3657	return;
3552	}	3658	}
3553		3659
3554	once->cb = cb;	3660	once->cb = cb;
3555	once->arg = arg;	3661	once->arg = arg;
…		…
3642	if (types & EV_ASYNC)	3748	if (types & EV_ASYNC)
3643	for (i = asynccnt; i--; )	3749	for (i = asynccnt; i--; )
3644	cb (EV_A_ EV_ASYNC, asyncs [i]);	3750	cb (EV_A_ EV_ASYNC, asyncs [i]);
3645	#endif	3751	#endif
3646		3752
		3753	#if EV_PREPARE_ENABLE
3647	if (types & EV_PREPARE)	3754	if (types & EV_PREPARE)
3648	for (i = preparecnt; i--; )	3755	for (i = preparecnt; i--; )
3649	#if EV_EMBED_ENABLE	3756	# if EV_EMBED_ENABLE
3650	if (ev_cb (prepares [i]) != embed_prepare_cb)	3757	if (ev_cb (prepares [i]) != embed_prepare_cb)
3651	#endif	3758	# endif
3652	cb (EV_A_ EV_PREPARE, prepares [i]);	3759	cb (EV_A_ EV_PREPARE, prepares [i]);
		3760	#endif
3653		3761
		3762	#if EV_CHECK_ENABLE
3654	if (types & EV_CHECK)	3763	if (types & EV_CHECK)
3655	for (i = checkcnt; i--; )	3764	for (i = checkcnt; i--; )
3656	cb (EV_A_ EV_CHECK, checks [i]);	3765	cb (EV_A_ EV_CHECK, checks [i]);
		3766	#endif
3657		3767
		3768	#if EV_SIGNAL_ENABLE
3658	if (types & EV_SIGNAL)	3769	if (types & EV_SIGNAL)
3659	for (i = 0; i < EV_NSIG - 1; ++i)	3770	for (i = 0; i < EV_NSIG - 1; ++i)
3660	for (wl = signals [i].head; wl; )	3771	for (wl = signals [i].head; wl; )
3661	{	3772	{
3662	wn = wl->next;	3773	wn = wl->next;
3663	cb (EV_A_ EV_SIGNAL, wl);	3774	cb (EV_A_ EV_SIGNAL, wl);
3664	wl = wn;	3775	wl = wn;
3665	}	3776	}
		3777	#endif
3666		3778
		3779	#if EV_CHILD_ENABLE
3667	if (types & EV_CHILD)	3780	if (types & EV_CHILD)
3668	for (i = EV_PID_HASHSIZE; i--; )	3781	for (i = (EV_PID_HASHSIZE); i--; )
3669	for (wl = childs [i]; wl; )	3782	for (wl = childs [i]; wl; )
3670	{	3783	{
3671	wn = wl->next;	3784	wn = wl->next;
3672	cb (EV_A_ EV_CHILD, wl);	3785	cb (EV_A_ EV_CHILD, wl);
3673	wl = wn;	3786	wl = wn;
3674	}	3787	}
		3788	#endif
3675	/* EV_STAT 0x00001000 /* stat data changed */	3789	/* EV_STAT 0x00001000 /* stat data changed */
3676	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3790	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3677	}	3791	}
3678	#endif	3792	#endif
3679		3793
3680	#if EV_MULTIPLICITY	3794	#if EV_MULTIPLICITY
3681	#include "ev_wrap.h"	3795	#include "ev_wrap.h"
3682	#endif	3796	#endif
3683		3797
3684	#ifdef __cplusplus	3798	EV_CPP(})
3685	}
3686	#endif
3687		3799

Diff Legend

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