ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.310 by root, Sun Jul 26 04:43:03 2009 UTC vs.
Revision 1.349 by sf-exg, Fri Oct 15 22:59:59 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	*
…		…
77	# ifndef EV_USE_REALTIME	77	# ifndef EV_USE_REALTIME
78	# define EV_USE_REALTIME 0	78	# define EV_USE_REALTIME 0
79	# endif	79	# endif
80	# endif	80	# endif
81		81
		82	# if HAVE_NANOSLEEP
82	# ifndef EV_USE_NANOSLEEP	83	# ifndef EV_USE_NANOSLEEP
83	# if HAVE_NANOSLEEP
84	# define EV_USE_NANOSLEEP 1	84	# define EV_USE_NANOSLEEP EV_FEATURE_OS
		85	# endif
85	# else	86	# else
		87	# undef EV_USE_NANOSLEEP
86	# define EV_USE_NANOSLEEP 0	88	# define EV_USE_NANOSLEEP 0
		89	# endif
		90
		91	# if HAVE_SELECT && HAVE_SYS_SELECT_H
		92	# ifndef EV_USE_SELECT
		93	# define EV_USE_SELECT EV_FEATURE_BACKENDS
87	# endif	94	# endif
		95	# else
		96	# undef EV_USE_SELECT
		97	# define EV_USE_SELECT 0
88	# endif	98	# endif
89		99
		100	# if HAVE_POLL && HAVE_POLL_H
90	# ifndef EV_USE_SELECT	101	# ifndef EV_USE_POLL
91	# if HAVE_SELECT && HAVE_SYS_SELECT_H	102	# define EV_USE_POLL EV_FEATURE_BACKENDS
92	# define EV_USE_SELECT 1
93	# else
94	# define EV_USE_SELECT 0
95	# endif	103	# endif
96	# endif
97
98	# ifndef EV_USE_POLL
99	# if HAVE_POLL && HAVE_POLL_H
100	# define EV_USE_POLL 1
101	# else	104	# else
		105	# undef EV_USE_POLL
102	# define EV_USE_POLL 0	106	# define EV_USE_POLL 0
103	# endif
104	# endif	107	# endif
105		108
106	# ifndef EV_USE_EPOLL
107	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H	109	# if HAVE_EPOLL_CTL && HAVE_SYS_EPOLL_H
108	# define EV_USE_EPOLL 1	110	# ifndef EV_USE_EPOLL
109	# else	111	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
110	# define EV_USE_EPOLL 0
111	# endif	112	# endif
		113	# else
		114	# undef EV_USE_EPOLL
		115	# define EV_USE_EPOLL 0
112	# endif	116	# endif
113		117
		118	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H
114	# ifndef EV_USE_KQUEUE	119	# ifndef EV_USE_KQUEUE
115	# if HAVE_KQUEUE && HAVE_SYS_EVENT_H && HAVE_SYS_QUEUE_H	120	# define EV_USE_KQUEUE EV_FEATURE_BACKENDS
116	# define EV_USE_KQUEUE 1
117	# else
118	# define EV_USE_KQUEUE 0
119	# endif	121	# endif
		122	# else
		123	# undef EV_USE_KQUEUE
		124	# define EV_USE_KQUEUE 0
120	# endif	125	# endif
121		126
122	# ifndef EV_USE_PORT
123	# if HAVE_PORT_H && HAVE_PORT_CREATE	127	# if HAVE_PORT_H && HAVE_PORT_CREATE
124	# define EV_USE_PORT 1	128	# ifndef EV_USE_PORT
125	# else	129	# define EV_USE_PORT EV_FEATURE_BACKENDS
126	# define EV_USE_PORT 0
127	# endif	130	# endif
		131	# else
		132	# undef EV_USE_PORT
		133	# define EV_USE_PORT 0
128	# endif	134	# endif
129		135
130	# ifndef EV_USE_INOTIFY
131	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H	136	# if HAVE_INOTIFY_INIT && HAVE_SYS_INOTIFY_H
132	# define EV_USE_INOTIFY 1	137	# ifndef EV_USE_INOTIFY
133	# else
134	# define EV_USE_INOTIFY 0	138	# define EV_USE_INOTIFY EV_FEATURE_OS
135	# endif	139	# endif
		140	# else
		141	# undef EV_USE_INOTIFY
		142	# define EV_USE_INOTIFY 0
136	# endif	143	# endif
137		144
138	# ifndef EV_USE_SIGNALFD
139	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H	145	# if HAVE_SIGNALFD && HAVE_SYS_SIGNALFD_H
140	# define EV_USE_SIGNALFD 1	146	# ifndef EV_USE_SIGNALFD
141	# else
142	# define EV_USE_SIGNALFD 0	147	# define EV_USE_SIGNALFD EV_FEATURE_OS
143	# endif	148	# endif
		149	# else
		150	# undef EV_USE_SIGNALFD
		151	# define EV_USE_SIGNALFD 0
144	# endif	152	# endif
145		153
		154	# if HAVE_EVENTFD
146	# ifndef EV_USE_EVENTFD	155	# ifndef EV_USE_EVENTFD
147	# if HAVE_EVENTFD
148	# define EV_USE_EVENTFD 1	156	# define EV_USE_EVENTFD EV_FEATURE_OS
149	# else
150	# define EV_USE_EVENTFD 0
151	# endif	157	# endif
		158	# else
		159	# undef EV_USE_EVENTFD
		160	# define EV_USE_EVENTFD 0
152	# endif	161	# endif
153		162
154	#endif	163	#endif
155		164
156	#include <math.h>	165	#include <math.h>
157	#include <stdlib.h>	166	#include <stdlib.h>
		167	#include <string.h>
158	#include <fcntl.h>	168	#include <fcntl.h>
159	#include <stddef.h>	169	#include <stddef.h>
160		170
161	#include <stdio.h>	171	#include <stdio.h>
162		172
163	#include <assert.h>	173	#include <assert.h>
164	#include <errno.h>	174	#include <errno.h>
165	#include <sys/types.h>	175	#include <sys/types.h>
166	#include <time.h>	176	#include <time.h>
		177	#include <limits.h>
167		178
168	#include <signal.h>	179	#include <signal.h>
169		180
170	#ifdef EV_H	181	#ifdef EV_H
171	# include EV_H	182	# include EV_H
…		…
182	# define WIN32_LEAN_AND_MEAN	193	# define WIN32_LEAN_AND_MEAN
183	# include <windows.h>	194	# include <windows.h>
184	# ifndef EV_SELECT_IS_WINSOCKET	195	# ifndef EV_SELECT_IS_WINSOCKET
185	# define EV_SELECT_IS_WINSOCKET 1	196	# define EV_SELECT_IS_WINSOCKET 1
186	# endif	197	# endif
		198	# undef EV_AVOID_STDIO
187	#endif	199	#endif
		200
		201	/* OS X, in its infinite idiocy, actually HARDCODES
		202	* a limit of 1024 into their select. Where people have brains,
		203	* OS X engineers apparently have a vacuum. Or maybe they were
		204	* ordered to have a vacuum, or they do anything for money.
		205	* This might help. Or not.
		206	*/
		207	#define _DARWIN_UNLIMITED_SELECT 1
188		208
189	/* this block tries to deduce configuration from header-defined symbols and defaults */	209	/* this block tries to deduce configuration from header-defined symbols and defaults */
190		210
191	/* try to deduce the maximum number of signals on this platform */	211	/* try to deduce the maximum number of signals on this platform */
192	#if defined (EV_NSIG)	212	#if defined (EV_NSIG)
…		…
204	#elif defined (MAXSIG)	224	#elif defined (MAXSIG)
205	# define EV_NSIG (MAXSIG+1)	225	# define EV_NSIG (MAXSIG+1)
206	#elif defined (MAX_SIG)	226	#elif defined (MAX_SIG)
207	# define EV_NSIG (MAX_SIG+1)	227	# define EV_NSIG (MAX_SIG+1)
208	#elif defined (SIGARRAYSIZE)	228	#elif defined (SIGARRAYSIZE)
209	# define EV_NSIG SIGARRAYSIZE /* Assume ary[SIGARRAYSIZE] */	229	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
210	#elif defined (_sys_nsig)	230	#elif defined (_sys_nsig)
211	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	231	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
212	#else	232	#else
213	# error "unable to find value for NSIG, please report"	233	# error "unable to find value for NSIG, please report"
214	/* to make it compile regardless, just remove the above line */	234	/* to make it compile regardless, just remove the above line, */
		235	/* but consider reporting it, too! :) */
215	# define EV_NSIG 65	236	# define EV_NSIG 65
216	#endif	237	#endif
217		238
218	#ifndef EV_USE_CLOCK_SYSCALL	239	#ifndef EV_USE_CLOCK_SYSCALL
219	# if __linux && __GLIBC__ >= 2	240	# if __linux && __GLIBC__ >= 2
220	# define EV_USE_CLOCK_SYSCALL 1	241	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
221	# else	242	# else
222	# define EV_USE_CLOCK_SYSCALL 0	243	# define EV_USE_CLOCK_SYSCALL 0
223	# endif	244	# endif
224	#endif	245	#endif
225		246
226	#ifndef EV_USE_MONOTONIC	247	#ifndef EV_USE_MONOTONIC
227	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	248	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0
228	# define EV_USE_MONOTONIC 1	249	# define EV_USE_MONOTONIC EV_FEATURE_OS
229	# else	250	# else
230	# define EV_USE_MONOTONIC 0	251	# define EV_USE_MONOTONIC 0
231	# endif	252	# endif
232	#endif	253	#endif
233		254
…		…
235	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL	256	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL
236	#endif	257	#endif
237		258
238	#ifndef EV_USE_NANOSLEEP	259	#ifndef EV_USE_NANOSLEEP
239	# if _POSIX_C_SOURCE >= 199309L	260	# if _POSIX_C_SOURCE >= 199309L
240	# define EV_USE_NANOSLEEP 1	261	# define EV_USE_NANOSLEEP EV_FEATURE_OS
241	# else	262	# else
242	# define EV_USE_NANOSLEEP 0	263	# define EV_USE_NANOSLEEP 0
243	# endif	264	# endif
244	#endif	265	#endif
245		266
246	#ifndef EV_USE_SELECT	267	#ifndef EV_USE_SELECT
247	# define EV_USE_SELECT 1	268	# define EV_USE_SELECT EV_FEATURE_BACKENDS
248	#endif	269	#endif
249		270
250	#ifndef EV_USE_POLL	271	#ifndef EV_USE_POLL
251	# ifdef _WIN32	272	# ifdef _WIN32
252	# define EV_USE_POLL 0	273	# define EV_USE_POLL 0
253	# else	274	# else
254	# define EV_USE_POLL 1	275	# define EV_USE_POLL EV_FEATURE_BACKENDS
255	# endif	276	# endif
256	#endif	277	#endif
257		278
258	#ifndef EV_USE_EPOLL	279	#ifndef EV_USE_EPOLL
259	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	280	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
260	# define EV_USE_EPOLL 1	281	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
261	# else	282	# else
262	# define EV_USE_EPOLL 0	283	# define EV_USE_EPOLL 0
263	# endif	284	# endif
264	#endif	285	#endif
265		286
…		…
271	# define EV_USE_PORT 0	292	# define EV_USE_PORT 0
272	#endif	293	#endif
273		294
274	#ifndef EV_USE_INOTIFY	295	#ifndef EV_USE_INOTIFY
275	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	296	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
276	# define EV_USE_INOTIFY 1	297	# define EV_USE_INOTIFY EV_FEATURE_OS
277	# else	298	# else
278	# define EV_USE_INOTIFY 0	299	# define EV_USE_INOTIFY 0
279	# endif	300	# endif
280	#endif	301	#endif
281		302
282	#ifndef EV_PID_HASHSIZE	303	#ifndef EV_PID_HASHSIZE
283	# if EV_MINIMAL	304	# 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	305	#endif
289		306
290	#ifndef EV_INOTIFY_HASHSIZE	307	#ifndef EV_INOTIFY_HASHSIZE
291	# if EV_MINIMAL	308	# 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	309	#endif
297		310
298	#ifndef EV_USE_EVENTFD	311	#ifndef EV_USE_EVENTFD
299	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	312	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
300	# define EV_USE_EVENTFD 1	313	# define EV_USE_EVENTFD EV_FEATURE_OS
301	# else	314	# else
302	# define EV_USE_EVENTFD 0	315	# define EV_USE_EVENTFD 0
303	# endif	316	# endif
304	#endif	317	#endif
305		318
306	#ifndef EV_USE_SIGNALFD	319	#ifndef EV_USE_SIGNALFD
307	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 9))	320	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
308	# define EV_USE_SIGNALFD 1	321	# define EV_USE_SIGNALFD EV_FEATURE_OS
309	# else	322	# else
310	# define EV_USE_SIGNALFD 0	323	# define EV_USE_SIGNALFD 0
311	# endif	324	# endif
312	#endif	325	#endif
313		326
…		…
316	# define EV_USE_4HEAP 1	329	# define EV_USE_4HEAP 1
317	# define EV_HEAP_CACHE_AT 1	330	# define EV_HEAP_CACHE_AT 1
318	#endif	331	#endif
319		332
320	#ifndef EV_VERIFY	333	#ifndef EV_VERIFY
321	# define EV_VERIFY !EV_MINIMAL	334	# define EV_VERIFY (EV_FEATURE_API ? 1 : 0)
322	#endif	335	#endif
323		336
324	#ifndef EV_USE_4HEAP	337	#ifndef EV_USE_4HEAP
325	# define EV_USE_4HEAP !EV_MINIMAL	338	# define EV_USE_4HEAP EV_FEATURE_DATA
326	#endif	339	#endif
327		340
328	#ifndef EV_HEAP_CACHE_AT	341	#ifndef EV_HEAP_CACHE_AT
329	# define EV_HEAP_CACHE_AT !EV_MINIMAL	342	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
330	#endif	343	#endif
331		344
332	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */	345	/* 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. */	346	/* which makes programs even slower. might work on other unices, too. */
334	#if EV_USE_CLOCK_SYSCALL	347	#if EV_USE_CLOCK_SYSCALL
…		…
343	# endif	356	# endif
344	#endif	357	#endif
345		358
346	/* this block fixes any misconfiguration where we know we run into trouble otherwise */	359	/* this block fixes any misconfiguration where we know we run into trouble otherwise */
347		360
		361	#ifdef _AIX
		362	/* AIX has a completely broken poll.h header */
		363	# undef EV_USE_POLL
		364	# define EV_USE_POLL 0
		365	#endif
		366
348	#ifndef CLOCK_MONOTONIC	367	#ifndef CLOCK_MONOTONIC
349	# undef EV_USE_MONOTONIC	368	# undef EV_USE_MONOTONIC
350	# define EV_USE_MONOTONIC 0	369	# define EV_USE_MONOTONIC 0
351	#endif	370	#endif
352		371
…		…
386	# include <stdint.h>	405	# include <stdint.h>
387	# ifndef EFD_NONBLOCK	406	# ifndef EFD_NONBLOCK
388	# define EFD_NONBLOCK O_NONBLOCK	407	# define EFD_NONBLOCK O_NONBLOCK
389	# endif	408	# endif
390	# ifndef EFD_CLOEXEC	409	# ifndef EFD_CLOEXEC
		410	# ifdef O_CLOEXEC
391	# define EFD_CLOEXEC O_CLOEXEC	411	# define EFD_CLOEXEC O_CLOEXEC
		412	# else
		413	# define EFD_CLOEXEC 02000000
		414	# endif
392	# endif	415	# endif
393	# ifdef __cplusplus	416	# ifdef __cplusplus
394	extern "C" {	417	extern "C" {
395	# endif	418	# endif
396	int eventfd (unsigned int initval, int flags);	419	int (eventfd) (unsigned int initval, int flags);
397	# ifdef __cplusplus	420	# ifdef __cplusplus
398	}	421	}
399	# endif	422	# endif
400	#endif	423	#endif
401		424
402	#if EV_USE_SIGNALFD	425	#if EV_USE_SIGNALFD
403	# include <sys/signalfd.h>	426	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */
		427	# include <stdint.h>
		428	# ifndef SFD_NONBLOCK
		429	# define SFD_NONBLOCK O_NONBLOCK
		430	# endif
		431	# ifndef SFD_CLOEXEC
		432	# ifdef O_CLOEXEC
		433	# define SFD_CLOEXEC O_CLOEXEC
		434	# else
		435	# define SFD_CLOEXEC 02000000
		436	# endif
		437	# endif
		438	# ifdef __cplusplus
		439	extern "C" {
		440	# endif
		441	int signalfd (int fd, const sigset_t *mask, int flags);
		442
		443	struct signalfd_siginfo
		444	{
		445	uint32_t ssi_signo;
		446	char pad[128 - sizeof (uint32_t)];
		447	};
		448	# ifdef __cplusplus
		449	}
		450	# endif
404	#endif	451	#endif
405		452
406	/**/	453	/**/
407		454
408	#if EV_VERIFY >= 3	455	#if EV_VERIFY >= 3
409	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	456	# define EV_FREQUENT_CHECK ev_verify (EV_A)
410	#else	457	#else
411	# define EV_FREQUENT_CHECK do { } while (0)	458	# define EV_FREQUENT_CHECK do { } while (0)
412	#endif	459	#endif
413		460
414	/*	461	/*
…		…
421	*/	468	*/
422	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	469	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
423		470
424	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */	471	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */
425	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */	472	#define MAX_BLOCKTIME 59.743 /* never wait longer than this time (to detect time jumps) */
426	/*#define CLEANUP_INTERVAL (MAX_BLOCKTIME * 5.) /* how often to try to free memory and re-check fds, TODO */	473
		474	#define EV_TV_SET(tv,t) do { tv.tv_sec = (long)t; tv.tv_usec = (long)((t - tv.tv_sec) * 1e6); } while (0)
		475	#define EV_TS_SET(ts,t) do { ts.tv_sec = (long)t; ts.tv_nsec = (long)((t - ts.tv_sec) * 1e9); } while (0)
427		476
428	#if __GNUC__ >= 4	477	#if __GNUC__ >= 4
429	# define expect(expr,value) __builtin_expect ((expr),(value))	478	# define expect(expr,value) __builtin_expect ((expr),(value))
430	# define noinline __attribute__ ((noinline))	479	# define noinline __attribute__ ((noinline))
431	#else	480	#else
…		…
438		487
439	#define expect_false(expr) expect ((expr) != 0, 0)	488	#define expect_false(expr) expect ((expr) != 0, 0)
440	#define expect_true(expr) expect ((expr) != 0, 1)	489	#define expect_true(expr) expect ((expr) != 0, 1)
441	#define inline_size static inline	490	#define inline_size static inline
442		491
443	#if EV_MINIMAL	492	#if EV_FEATURE_CODE
		493	# define inline_speed static inline
		494	#else
444	# define inline_speed static noinline	495	# define inline_speed static noinline
445	#else
446	# define inline_speed static inline
447	#endif	496	#endif
448		497
449	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	498	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
450		499
451	#if EV_MINPRI == EV_MAXPRI	500	#if EV_MINPRI == EV_MAXPRI
…		…
464	#define ev_active(w) ((W)(w))->active	513	#define ev_active(w) ((W)(w))->active
465	#define ev_at(w) ((WT)(w))->at	514	#define ev_at(w) ((WT)(w))->at
466		515
467	#if EV_USE_REALTIME	516	#if EV_USE_REALTIME
468	/* sig_atomic_t is used to avoid per-thread variables or locking but still */	517	/* sig_atomic_t is used to avoid per-thread variables or locking but still */
469	/* giving it a reasonably high chance of working on typical architetcures */	518	/* giving it a reasonably high chance of working on typical architectures */
470	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */	519	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */
471	#endif	520	#endif
472		521
473	#if EV_USE_MONOTONIC	522	#if EV_USE_MONOTONIC
474	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */	523	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */
475	#endif	524	#endif
476		525
		526	#ifndef EV_FD_TO_WIN32_HANDLE
		527	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
		528	#endif
		529	#ifndef EV_WIN32_HANDLE_TO_FD
		530	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
		531	#endif
		532	#ifndef EV_WIN32_CLOSE_FD
		533	# define EV_WIN32_CLOSE_FD(fd) close (fd)
		534	#endif
		535
477	#ifdef _WIN32	536	#ifdef _WIN32
478	# include "ev_win32.c"	537	# include "ev_win32.c"
479	#endif	538	#endif
480		539
481	/*****************************************************************************/	540	/*****************************************************************************/
		541
		542	#if EV_AVOID_STDIO
		543	static void noinline
		544	ev_printerr (const char *msg)
		545	{
		546	write (STDERR_FILENO, msg, strlen (msg));
		547	}
		548	#endif
482		549
483	static void (*syserr_cb)(const char *msg);	550	static void (*syserr_cb)(const char *msg);
484		551
485	void	552	void
486	ev_set_syserr_cb (void (*cb)(const char *msg))	553	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
496		563
497	if (syserr_cb)	564	if (syserr_cb)
498	syserr_cb (msg);	565	syserr_cb (msg);
499	else	566	else
500	{	567	{
		568	#if EV_AVOID_STDIO
		569	const char *err = strerror (errno);
		570
		571	ev_printerr (msg);
		572	ev_printerr (": ");
		573	ev_printerr (err);
		574	ev_printerr ("\n");
		575	#else
501	perror (msg);	576	perror (msg);
		577	#endif
502	abort ();	578	abort ();
503	}	579	}
504	}	580	}
505		581
506	static void *	582	static void *
507	ev_realloc_emul (void *ptr, long size)	583	ev_realloc_emul (void *ptr, long size)
508	{	584	{
		585	#if __GLIBC__
		586	return realloc (ptr, size);
		587	#else
509	/* some systems, notably openbsd and darwin, fail to properly	588	/* some systems, notably openbsd and darwin, fail to properly
510	* implement realloc (x, 0) (as required by both ansi c-98 and	589	* implement realloc (x, 0) (as required by both ansi c-89 and
511	* the single unix specification, so work around them here.	590	* the single unix specification, so work around them here.
512	*/	591	*/
513		592
514	if (size)	593	if (size)
515	return realloc (ptr, size);	594	return realloc (ptr, size);
516		595
517	free (ptr);	596	free (ptr);
518	return 0;	597	return 0;
		598	#endif
519	}	599	}
520		600
521	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	601	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
522		602
523	void	603	void
…		…
531	{	611	{
532	ptr = alloc (ptr, size);	612	ptr = alloc (ptr, size);
533		613
534	if (!ptr && size)	614	if (!ptr && size)
535	{	615	{
		616	#if EV_AVOID_STDIO
		617	ev_printerr ("libev: memory allocation failed, aborting.\n");
		618	#else
536	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	619	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		620	#endif
537	abort ();	621	abort ();
538	}	622	}
539		623
540	return ptr;	624	return ptr;
541	}	625	}
…		…
623		707
624	static int ev_default_loop_ptr;	708	static int ev_default_loop_ptr;
625		709
626	#endif	710	#endif
627		711
628	#if EV_MINIMAL < 2	712	#if EV_FEATURE_API
629	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)	713	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)
630	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)	714	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)
631	# define EV_INVOKE_PENDING invoke_cb (EV_A)	715	# define EV_INVOKE_PENDING invoke_cb (EV_A)
632	#else	716	#else
633	# define EV_RELEASE_CB (void)0	717	# define EV_RELEASE_CB (void)0
…		…
687	if (delay > 0.)	771	if (delay > 0.)
688	{	772	{
689	#if EV_USE_NANOSLEEP	773	#if EV_USE_NANOSLEEP
690	struct timespec ts;	774	struct timespec ts;
691		775
692	ts.tv_sec = (time_t)delay;	776	EV_TS_SET (ts, delay);
693	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
694
695	nanosleep (&ts, 0);	777	nanosleep (&ts, 0);
696	#elif defined(_WIN32)	778	#elif defined(_WIN32)
697	Sleep ((unsigned long)(delay * 1e3));	779	Sleep ((unsigned long)(delay * 1e3));
698	#else	780	#else
699	struct timeval tv;	781	struct timeval tv;
700		782
701	tv.tv_sec = (time_t)delay;
702	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
703
704	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */	783	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
705	/* something not guaranteed by newer posix versions, but guaranteed */	784	/* something not guaranteed by newer posix versions, but guaranteed */
706	/* by older ones */	785	/* by older ones */
		786	EV_TV_SET (tv, delay);
707	select (0, 0, 0, 0, &tv);	787	select (0, 0, 0, 0, &tv);
708	#endif	788	#endif
709	}	789	}
710	}	790	}
711		791
712	/*****************************************************************************/	792	/*****************************************************************************/
713		793
714	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */	794	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */
715		795
716	/* find a suitable new size for the given array, */	796	/* find a suitable new size for the given array, */
717	/* hopefully by rounding to a ncie-to-malloc size */	797	/* hopefully by rounding to a nice-to-malloc size */
718	inline_size int	798	inline_size int
719	array_nextsize (int elem, int cur, int cnt)	799	array_nextsize (int elem, int cur, int cnt)
720	{	800	{
721	int ncur = cur + 1;	801	int ncur = cur + 1;
722		802
…		…
818	}	898	}
819		899
820	/*****************************************************************************/	900	/*****************************************************************************/
821		901
822	inline_speed void	902	inline_speed void
823	fd_event_nc (EV_P_ int fd, int revents)	903	fd_event_nocheck (EV_P_ int fd, int revents)
824	{	904	{
825	ANFD *anfd = anfds + fd;	905	ANFD *anfd = anfds + fd;
826	ev_io *w;	906	ev_io *w;
827		907
828	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	908	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
…		…
840	fd_event (EV_P_ int fd, int revents)	920	fd_event (EV_P_ int fd, int revents)
841	{	921	{
842	ANFD *anfd = anfds + fd;	922	ANFD *anfd = anfds + fd;
843		923
844	if (expect_true (!anfd->reify))	924	if (expect_true (!anfd->reify))
845	fd_event_nc (EV_A_ fd, revents);	925	fd_event_nocheck (EV_A_ fd, revents);
846	}	926	}
847		927
848	void	928	void
849	ev_feed_fd_event (EV_P_ int fd, int revents)	929	ev_feed_fd_event (EV_P_ int fd, int revents)
850	{	930	{
851	if (fd >= 0 && fd < anfdmax)	931	if (fd >= 0 && fd < anfdmax)
852	fd_event_nc (EV_A_ fd, revents);	932	fd_event_nocheck (EV_A_ fd, revents);
853	}	933	}
854		934
855	/* make sure the external fd watch events are in-sync */	935	/* make sure the external fd watch events are in-sync */
856	/* with the kernel/libev internal state */	936	/* with the kernel/libev internal state */
857	inline_size void	937	inline_size void
…		…
872		952
873	#if EV_SELECT_IS_WINSOCKET	953	#if EV_SELECT_IS_WINSOCKET
874	if (events)	954	if (events)
875	{	955	{
876	unsigned long arg;	956	unsigned long arg;
877	#ifdef EV_FD_TO_WIN32_HANDLE
878	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	957	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);
879	#else
880	anfd->handle = _get_osfhandle (fd);
881	#endif
882	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	958	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));
883	}	959	}
884	#endif	960	#endif
885		961
886	{	962	{
…		…
924	ev_io_stop (EV_A_ w);	1000	ev_io_stop (EV_A_ w);
925	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);	1001	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
926	}	1002	}
927	}	1003	}
928		1004
929	/* check whether the given fd is atcually valid, for error recovery */	1005	/* check whether the given fd is actually valid, for error recovery */
930	inline_size int	1006	inline_size int
931	fd_valid (int fd)	1007	fd_valid (int fd)
932	{	1008	{
933	#ifdef _WIN32	1009	#ifdef _WIN32
934	return _get_osfhandle (fd) != -1;	1010	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
935	#else	1011	#else
936	return fcntl (fd, F_GETFD) != -1;	1012	return fcntl (fd, F_GETFD) != -1;
937	#endif	1013	#endif
938	}	1014	}
939		1015
…		…
976	anfds [fd].emask = 0;	1052	anfds [fd].emask = 0;
977	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1053	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
978	}	1054	}
979	}	1055	}
980		1056
		1057	/* used to prepare libev internal fd's */
		1058	/* this is not fork-safe */
		1059	inline_speed void
		1060	fd_intern (int fd)
		1061	{
		1062	#ifdef _WIN32
		1063	unsigned long arg = 1;
		1064	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1065	#else
		1066	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1067	fcntl (fd, F_SETFL, O_NONBLOCK);
		1068	#endif
		1069	}
		1070
981	/*****************************************************************************/	1071	/*****************************************************************************/
982		1072
983	/*	1073	/*
984	* the heap functions want a real array index. array index 0 uis guaranteed to not	1074	* the heap functions want a real array index. array index 0 is guaranteed to not
985	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives	1075	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
986	* the branching factor of the d-tree.	1076	* the branching factor of the d-tree.
987	*/	1077	*/
988		1078
989	/*	1079	/*
…		…
1137		1227
1138	static ANSIG signals [EV_NSIG - 1];	1228	static ANSIG signals [EV_NSIG - 1];
1139		1229
1140	/*****************************************************************************/	1230	/*****************************************************************************/
1141		1231
1142	/* used to prepare libev internal fd's */	1232	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1143	/* this is not fork-safe */
1144	inline_speed void
1145	fd_intern (int fd)
1146	{
1147	#ifdef _WIN32
1148	unsigned long arg = 1;
1149	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1150	#else
1151	fcntl (fd, F_SETFD, FD_CLOEXEC);
1152	fcntl (fd, F_SETFL, O_NONBLOCK);
1153	#endif
1154	}
1155		1233
1156	static void noinline	1234	static void noinline
1157	evpipe_init (EV_P)	1235	evpipe_init (EV_P)
1158	{	1236	{
1159	if (!ev_is_active (&pipe_w))	1237	if (!ev_is_active (&pipe_w))
1160	{	1238	{
1161	#if EV_USE_EVENTFD	1239	# if EV_USE_EVENTFD
1162	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1240	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1163	if (evfd < 0 && errno == EINVAL)	1241	if (evfd < 0 && errno == EINVAL)
1164	evfd = eventfd (0, 0);	1242	evfd = eventfd (0, 0);
1165		1243
1166	if (evfd >= 0)	1244	if (evfd >= 0)
…		…
1168	evpipe [0] = -1;	1246	evpipe [0] = -1;
1169	fd_intern (evfd); /* doing it twice doesn't hurt */	1247	fd_intern (evfd); /* doing it twice doesn't hurt */
1170	ev_io_set (&pipe_w, evfd, EV_READ);	1248	ev_io_set (&pipe_w, evfd, EV_READ);
1171	}	1249	}
1172	else	1250	else
1173	#endif	1251	# endif
1174	{	1252	{
1175	while (pipe (evpipe))	1253	while (pipe (evpipe))
1176	ev_syserr ("(libev) error creating signal/async pipe");	1254	ev_syserr ("(libev) error creating signal/async pipe");
1177		1255
1178	fd_intern (evpipe [0]);	1256	fd_intern (evpipe [0]);
…		…
1189	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1267	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1190	{	1268	{
1191	if (!*flag)	1269	if (!*flag)
1192	{	1270	{
1193	int old_errno = errno; /* save errno because write might clobber it */	1271	int old_errno = errno; /* save errno because write might clobber it */
		1272	char dummy;
1194		1273
1195	*flag = 1;	1274	*flag = 1;
1196		1275
1197	#if EV_USE_EVENTFD	1276	#if EV_USE_EVENTFD
1198	if (evfd >= 0)	1277	if (evfd >= 0)
…		…
1200	uint64_t counter = 1;	1279	uint64_t counter = 1;
1201	write (evfd, &counter, sizeof (uint64_t));	1280	write (evfd, &counter, sizeof (uint64_t));
1202	}	1281	}
1203	else	1282	else
1204	#endif	1283	#endif
		1284	/* win32 people keep sending patches that change this write() to send() */
		1285	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1286	/* so when you think this write should be a send instead, please find out */
		1287	/* where your send() is from - it's definitely not the microsoft send, and */
		1288	/* tell me. thank you. */
1205	write (evpipe [1], &old_errno, 1);	1289	write (evpipe [1], &dummy, 1);
1206		1290
1207	errno = old_errno;	1291	errno = old_errno;
1208	}	1292	}
1209	}	1293	}
1210		1294
…		…
1223	}	1307	}
1224	else	1308	else
1225	#endif	1309	#endif
1226	{	1310	{
1227	char dummy;	1311	char dummy;
		1312	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1228	read (evpipe [0], &dummy, 1);	1313	read (evpipe [0], &dummy, 1);
1229	}	1314	}
1230		1315
1231	if (sig_pending)	1316	if (sig_pending)
1232	{	1317	{
…		…
1259	{	1344	{
1260	#if EV_MULTIPLICITY	1345	#if EV_MULTIPLICITY
1261	EV_P = signals [signum - 1].loop;	1346	EV_P = signals [signum - 1].loop;
1262	#endif	1347	#endif
1263		1348
1264	#if _WIN32	1349	#ifdef _WIN32
1265	signal (signum, ev_sighandler);	1350	signal (signum, ev_sighandler);
1266	#endif	1351	#endif
1267		1352
1268	signals [signum - 1].pending = 1;	1353	signals [signum - 1].pending = 1;
1269	evpipe_write (EV_A_ &sig_pending);	1354	evpipe_write (EV_A_ &sig_pending);
…		…
1311	break;	1396	break;
1312	}	1397	}
1313	}	1398	}
1314	#endif	1399	#endif
1315		1400
		1401	#endif
		1402
1316	/*****************************************************************************/	1403	/*****************************************************************************/
1317		1404
		1405	#if EV_CHILD_ENABLE
1318	static WL childs [EV_PID_HASHSIZE];	1406	static WL childs [EV_PID_HASHSIZE];
1319
1320	#ifndef _WIN32
1321		1407
1322	static ev_signal childev;	1408	static ev_signal childev;
1323		1409
1324	#ifndef WIFCONTINUED	1410	#ifndef WIFCONTINUED
1325	# define WIFCONTINUED(status) 0	1411	# define WIFCONTINUED(status) 0
…		…
1330	child_reap (EV_P_ int chain, int pid, int status)	1416	child_reap (EV_P_ int chain, int pid, int status)
1331	{	1417	{
1332	ev_child *w;	1418	ev_child *w;
1333	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1419	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1334		1420
1335	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1421	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1336	{	1422	{
1337	if ((w->pid == pid || !w->pid)	1423	if ((w->pid == pid || !w->pid)
1338	&& (!traced || (w->flags & 1)))	1424	&& (!traced || (w->flags & 1)))
1339	{	1425	{
1340	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */	1426	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */
…		…
1365	/* make sure we are called again until all children have been reaped */	1451	/* make sure we are called again until all children have been reaped */
1366	/* we need to do it this way so that the callback gets called before we continue */	1452	/* we need to do it this way so that the callback gets called before we continue */
1367	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1453	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1368		1454
1369	child_reap (EV_A_ pid, pid, status);	1455	child_reap (EV_A_ pid, pid, status);
1370	if (EV_PID_HASHSIZE > 1)	1456	if ((EV_PID_HASHSIZE) > 1)
1371	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1457	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1372	}	1458	}
1373		1459
1374	#endif	1460	#endif
1375		1461
…		…
1442	#ifdef __APPLE__	1528	#ifdef __APPLE__
1443	/* only select works correctly on that "unix-certified" platform */	1529	/* only select works correctly on that "unix-certified" platform */
1444	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1530	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1445	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1531	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1446	#endif	1532	#endif
		1533	#ifdef __FreeBSD__
		1534	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1535	#endif
1447		1536
1448	return flags;	1537	return flags;
1449	}	1538	}
1450		1539
1451	unsigned int	1540	unsigned int
…		…
1464	ev_backend (EV_P)	1553	ev_backend (EV_P)
1465	{	1554	{
1466	return backend;	1555	return backend;
1467	}	1556	}
1468		1557
1469	#if EV_MINIMAL < 2	1558	#if EV_FEATURE_API
1470	unsigned int	1559	unsigned int
1471	ev_loop_count (EV_P)	1560	ev_iteration (EV_P)
1472	{	1561	{
1473	return loop_count;	1562	return loop_count;
1474	}	1563	}
1475		1564
1476	unsigned int	1565	unsigned int
1477	ev_loop_depth (EV_P)	1566	ev_depth (EV_P)
1478	{	1567	{
1479	return loop_depth;	1568	return loop_depth;
1480	}	1569	}
1481		1570
1482	void	1571	void
…		…
1554		1643
1555	ev_rt_now = ev_time ();	1644	ev_rt_now = ev_time ();
1556	mn_now = get_clock ();	1645	mn_now = get_clock ();
1557	now_floor = mn_now;	1646	now_floor = mn_now;
1558	rtmn_diff = ev_rt_now - mn_now;	1647	rtmn_diff = ev_rt_now - mn_now;
1559	#if EV_MINIMAL < 2	1648	#if EV_FEATURE_API
1560	invoke_cb = ev_invoke_pending;	1649	invoke_cb = ev_invoke_pending;
1561	#endif	1650	#endif
1562		1651
1563	io_blocktime = 0.;	1652	io_blocktime = 0.;
1564	timeout_blocktime = 0.;	1653	timeout_blocktime = 0.;
…		…
1570	#endif	1659	#endif
1571	#if EV_USE_INOTIFY	1660	#if EV_USE_INOTIFY
1572	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1661	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1573	#endif	1662	#endif
1574	#if EV_USE_SIGNALFD	1663	#if EV_USE_SIGNALFD
1575	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1664	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1576	#endif	1665	#endif
1577		1666
1578	if (!(flags & 0x0000ffffU))	1667	if (!(flags & 0x0000ffffU))
1579	flags |= ev_recommended_backends ();	1668	flags |= ev_recommended_backends ();
1580		1669
…		…
1594	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1683	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1595	#endif	1684	#endif
1596		1685
1597	ev_prepare_init (&pending_w, pendingcb);	1686	ev_prepare_init (&pending_w, pendingcb);
1598		1687
		1688	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1599	ev_init (&pipe_w, pipecb);	1689	ev_init (&pipe_w, pipecb);
1600	ev_set_priority (&pipe_w, EV_MAXPRI);	1690	ev_set_priority (&pipe_w, EV_MAXPRI);
		1691	#endif
1601	}	1692	}
1602	}	1693	}
1603		1694
1604	/* free up a loop structure */	1695	/* free up a loop structure */
1605	static void noinline	1696	static void noinline
…		…
1617	close (evfd);	1708	close (evfd);
1618	#endif	1709	#endif
1619		1710
1620	if (evpipe [0] >= 0)	1711	if (evpipe [0] >= 0)
1621	{	1712	{
1622	close (evpipe [0]);	1713	EV_WIN32_CLOSE_FD (evpipe [0]);
1623	close (evpipe [1]);	1714	EV_WIN32_CLOSE_FD (evpipe [1]);
1624	}	1715	}
1625	}	1716	}
1626		1717
1627	#if EV_USE_SIGNALFD	1718	#if EV_USE_SIGNALFD
1628	if (ev_is_active (&sigfd_w))	1719	if (ev_is_active (&sigfd_w))
1629	{
1630	/*ev_ref (EV_A);*/
1631	/*ev_io_stop (EV_A_ &sigfd_w);*/
1632
1633	close (sigfd);	1720	close (sigfd);
1634	}
1635	#endif	1721	#endif
1636		1722
1637	#if EV_USE_INOTIFY	1723	#if EV_USE_INOTIFY
1638	if (fs_fd >= 0)	1724	if (fs_fd >= 0)
1639	close (fs_fd);	1725	close (fs_fd);
…		…
1724	close (evfd);	1810	close (evfd);
1725	#endif	1811	#endif
1726		1812
1727	if (evpipe [0] >= 0)	1813	if (evpipe [0] >= 0)
1728	{	1814	{
1729	close (evpipe [0]);	1815	EV_WIN32_CLOSE_FD (evpipe [0]);
1730	close (evpipe [1]);	1816	EV_WIN32_CLOSE_FD (evpipe [1]);
1731	}	1817	}
1732		1818
		1819	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1733	evpipe_init (EV_A);	1820	evpipe_init (EV_A);
1734	/* now iterate over everything, in case we missed something */	1821	/* now iterate over everything, in case we missed something */
1735	pipecb (EV_A_ &pipe_w, EV_READ);	1822	pipecb (EV_A_ &pipe_w, EV_READ);
		1823	#endif
1736	}	1824	}
1737		1825
1738	postfork = 0;	1826	postfork = 0;
1739	}	1827	}
1740		1828
…		…
1802	verify_watcher (EV_A_ ws [cnt]);	1890	verify_watcher (EV_A_ ws [cnt]);
1803	}	1891	}
1804	}	1892	}
1805	#endif	1893	#endif
1806		1894
1807	#if EV_MINIMAL < 2	1895	#if EV_FEATURE_API
1808	void	1896	void
1809	ev_loop_verify (EV_P)	1897	ev_verify (EV_P)
1810	{	1898	{
1811	#if EV_VERIFY	1899	#if EV_VERIFY
1812	int i;	1900	int i;
1813	WL w;	1901	WL w;
1814		1902
…		…
1853	#if EV_ASYNC_ENABLE	1941	#if EV_ASYNC_ENABLE
1854	assert (asyncmax >= asynccnt);	1942	assert (asyncmax >= asynccnt);
1855	array_verify (EV_A_ (W *)asyncs, asynccnt);	1943	array_verify (EV_A_ (W *)asyncs, asynccnt);
1856	#endif	1944	#endif
1857		1945
		1946	#if EV_PREPARE_ENABLE
1858	assert (preparemax >= preparecnt);	1947	assert (preparemax >= preparecnt);
1859	array_verify (EV_A_ (W *)prepares, preparecnt);	1948	array_verify (EV_A_ (W *)prepares, preparecnt);
		1949	#endif
1860		1950
		1951	#if EV_CHECK_ENABLE
1861	assert (checkmax >= checkcnt);	1952	assert (checkmax >= checkcnt);
1862	array_verify (EV_A_ (W *)checks, checkcnt);	1953	array_verify (EV_A_ (W *)checks, checkcnt);
		1954	#endif
1863		1955
1864	# if 0	1956	# if 0
		1957	#if EV_CHILD_ENABLE
1865	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1958	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1866	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	1959	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1960	#endif
1867	# endif	1961	# endif
1868	#endif	1962	#endif
1869	}	1963	}
1870	#endif	1964	#endif
1871		1965
…		…
1887		1981
1888	loop_init (EV_A_ flags);	1982	loop_init (EV_A_ flags);
1889		1983
1890	if (ev_backend (EV_A))	1984	if (ev_backend (EV_A))
1891	{	1985	{
1892	#ifndef _WIN32	1986	#if EV_CHILD_ENABLE
1893	ev_signal_init (&childev, childcb, SIGCHLD);	1987	ev_signal_init (&childev, childcb, SIGCHLD);
1894	ev_set_priority (&childev, EV_MAXPRI);	1988	ev_set_priority (&childev, EV_MAXPRI);
1895	ev_signal_start (EV_A_ &childev);	1989	ev_signal_start (EV_A_ &childev);
1896	ev_unref (EV_A); /* child watcher should not keep loop alive */	1990	ev_unref (EV_A); /* child watcher should not keep loop alive */
1897	#endif	1991	#endif
…		…
1910	EV_P = ev_default_loop_ptr;	2004	EV_P = ev_default_loop_ptr;
1911	#endif	2005	#endif
1912		2006
1913	ev_default_loop_ptr = 0;	2007	ev_default_loop_ptr = 0;
1914		2008
1915	#ifndef _WIN32	2009	#if EV_CHILD_ENABLE
1916	ev_ref (EV_A); /* child watcher */	2010	ev_ref (EV_A); /* child watcher */
1917	ev_signal_stop (EV_A_ &childev);	2011	ev_signal_stop (EV_A_ &childev);
1918	#endif	2012	#endif
1919		2013
1920	loop_destroy (EV_A);	2014	loop_destroy (EV_A);
…		…
2026	EV_FREQUENT_CHECK;	2120	EV_FREQUENT_CHECK;
2027	feed_reverse (EV_A_ (W)w);	2121	feed_reverse (EV_A_ (W)w);
2028	}	2122	}
2029	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2123	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2030		2124
2031	feed_reverse_done (EV_A_ EV_TIMEOUT);	2125	feed_reverse_done (EV_A_ EV_TIMER);
2032	}	2126	}
2033	}	2127	}
2034		2128
2035	#if EV_PERIODIC_ENABLE	2129	#if EV_PERIODIC_ENABLE
2036	/* make periodics pending */	2130	/* make periodics pending */
…		…
2089	feed_reverse_done (EV_A_ EV_PERIODIC);	2183	feed_reverse_done (EV_A_ EV_PERIODIC);
2090	}	2184	}
2091	}	2185	}
2092		2186
2093	/* simply recalculate all periodics */	2187	/* simply recalculate all periodics */
2094	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2188	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2095	static void noinline	2189	static void noinline
2096	periodics_reschedule (EV_P)	2190	periodics_reschedule (EV_P)
2097	{	2191	{
2098	int i;	2192	int i;
2099		2193
…		…
2127	ANHE_at_cache (*he);	2221	ANHE_at_cache (*he);
2128	}	2222	}
2129	}	2223	}
2130		2224
2131	/* fetch new monotonic and realtime times from the kernel */	2225	/* fetch new monotonic and realtime times from the kernel */
2132	/* also detetc if there was a timejump, and act accordingly */	2226	/* also detect if there was a timejump, and act accordingly */
2133	inline_speed void	2227	inline_speed void
2134	time_update (EV_P_ ev_tstamp max_block)	2228	time_update (EV_P_ ev_tstamp max_block)
2135	{	2229	{
2136	#if EV_USE_MONOTONIC	2230	#if EV_USE_MONOTONIC
2137	if (expect_true (have_monotonic))	2231	if (expect_true (have_monotonic))
…		…
2197	}	2291	}
2198		2292
2199	void	2293	void
2200	ev_loop (EV_P_ int flags)	2294	ev_loop (EV_P_ int flags)
2201	{	2295	{
2202	#if EV_MINIMAL < 2	2296	#if EV_FEATURE_API
2203	++loop_depth;	2297	++loop_depth;
2204	#endif	2298	#endif
2205		2299
2206	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2300	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));
2207		2301
…		…
2210	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2304	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2211		2305
2212	do	2306	do
2213	{	2307	{
2214	#if EV_VERIFY >= 2	2308	#if EV_VERIFY >= 2
2215	ev_loop_verify (EV_A);	2309	ev_verify (EV_A);
2216	#endif	2310	#endif
2217		2311
2218	#ifndef _WIN32	2312	#ifndef _WIN32
2219	if (expect_false (curpid)) /* penalise the forking check even more */	2313	if (expect_false (curpid)) /* penalise the forking check even more */
2220	if (expect_false (getpid () != curpid))	2314	if (expect_false (getpid () != curpid))
…		…
2232	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2326	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2233	EV_INVOKE_PENDING;	2327	EV_INVOKE_PENDING;
2234	}	2328	}
2235	#endif	2329	#endif
2236		2330
		2331	#if EV_PREPARE_ENABLE
2237	/* queue prepare watchers (and execute them) */	2332	/* queue prepare watchers (and execute them) */
2238	if (expect_false (preparecnt))	2333	if (expect_false (preparecnt))
2239	{	2334	{
2240	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2335	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2241	EV_INVOKE_PENDING;	2336	EV_INVOKE_PENDING;
2242	}	2337	}
		2338	#endif
2243		2339
2244	if (expect_false (loop_done))	2340	if (expect_false (loop_done))
2245	break;	2341	break;
2246		2342
2247	/* we might have forked, so reify kernel state if necessary */	2343	/* we might have forked, so reify kernel state if necessary */
…		…
2298	waittime -= sleeptime;	2394	waittime -= sleeptime;
2299	}	2395	}
2300	}	2396	}
2301	}	2397	}
2302		2398
2303	#if EV_MINIMAL < 2	2399	#if EV_FEATURE_API
2304	++loop_count;	2400	++loop_count;
2305	#endif	2401	#endif
2306	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2402	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */
2307	backend_poll (EV_A_ waittime);	2403	backend_poll (EV_A_ waittime);
2308	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2404	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */
…		…
2320	#if EV_IDLE_ENABLE	2416	#if EV_IDLE_ENABLE
2321	/* queue idle watchers unless other events are pending */	2417	/* queue idle watchers unless other events are pending */
2322	idle_reify (EV_A);	2418	idle_reify (EV_A);
2323	#endif	2419	#endif
2324		2420
		2421	#if EV_CHECK_ENABLE
2325	/* queue check watchers, to be executed first */	2422	/* queue check watchers, to be executed first */
2326	if (expect_false (checkcnt))	2423	if (expect_false (checkcnt))
2327	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2424	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2425	#endif
2328		2426
2329	EV_INVOKE_PENDING;	2427	EV_INVOKE_PENDING;
2330	}	2428	}
2331	while (expect_true (	2429	while (expect_true (
2332	activecnt	2430	activecnt
…		…
2335	));	2433	));
2336		2434
2337	if (loop_done == EVUNLOOP_ONE)	2435	if (loop_done == EVUNLOOP_ONE)
2338	loop_done = EVUNLOOP_CANCEL;	2436	loop_done = EVUNLOOP_CANCEL;
2339		2437
2340	#if EV_MINIMAL < 2	2438	#if EV_FEATURE_API
2341	--loop_depth;	2439	--loop_depth;
2342	#endif	2440	#endif
2343	}	2441	}
2344		2442
2345	void	2443	void
…		…
2471		2569
2472	if (expect_false (ev_is_active (w)))	2570	if (expect_false (ev_is_active (w)))
2473	return;	2571	return;
2474		2572
2475	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2573	assert (("libev: ev_io_start called with negative fd", fd >= 0));
2476	assert (("libev: ev_io start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));	2574	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
2477		2575
2478	EV_FREQUENT_CHECK;	2576	EV_FREQUENT_CHECK;
2479		2577
2480	ev_start (EV_A_ (W)w, 1);	2578	ev_start (EV_A_ (W)w, 1);
2481	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2579	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2551	timers [active] = timers [timercnt + HEAP0];	2649	timers [active] = timers [timercnt + HEAP0];
2552	adjustheap (timers, timercnt, active);	2650	adjustheap (timers, timercnt, active);
2553	}	2651	}
2554	}	2652	}
2555		2653
2556	EV_FREQUENT_CHECK;
2557
2558	ev_at (w) -= mn_now;	2654	ev_at (w) -= mn_now;
2559		2655
2560	ev_stop (EV_A_ (W)w);	2656	ev_stop (EV_A_ (W)w);
		2657
		2658	EV_FREQUENT_CHECK;
2561	}	2659	}
2562		2660
2563	void noinline	2661	void noinline
2564	ev_timer_again (EV_P_ ev_timer *w)	2662	ev_timer_again (EV_P_ ev_timer *w)
2565	{	2663	{
…		…
2644	periodics [active] = periodics [periodiccnt + HEAP0];	2742	periodics [active] = periodics [periodiccnt + HEAP0];
2645	adjustheap (periodics, periodiccnt, active);	2743	adjustheap (periodics, periodiccnt, active);
2646	}	2744	}
2647	}	2745	}
2648		2746
2649	EV_FREQUENT_CHECK;
2650
2651	ev_stop (EV_A_ (W)w);	2747	ev_stop (EV_A_ (W)w);
		2748
		2749	EV_FREQUENT_CHECK;
2652	}	2750	}
2653		2751
2654	void noinline	2752	void noinline
2655	ev_periodic_again (EV_P_ ev_periodic *w)	2753	ev_periodic_again (EV_P_ ev_periodic *w)
2656	{	2754	{
…		…
2661	#endif	2759	#endif
2662		2760
2663	#ifndef SA_RESTART	2761	#ifndef SA_RESTART
2664	# define SA_RESTART 0	2762	# define SA_RESTART 0
2665	#endif	2763	#endif
		2764
		2765	#if EV_SIGNAL_ENABLE
2666		2766
2667	void noinline	2767	void noinline
2668	ev_signal_start (EV_P_ ev_signal *w)	2768	ev_signal_start (EV_P_ ev_signal *w)
2669	{	2769	{
2670	if (expect_false (ev_is_active (w)))	2770	if (expect_false (ev_is_active (w)))
…		…
2717	if (!((WL)w)->next)	2817	if (!((WL)w)->next)
2718	# if EV_USE_SIGNALFD	2818	# if EV_USE_SIGNALFD
2719	if (sigfd < 0) /*TODO*/	2819	if (sigfd < 0) /*TODO*/
2720	# endif	2820	# endif
2721	{	2821	{
2722	# if _WIN32	2822	# ifdef _WIN32
		2823	evpipe_init (EV_A);
		2824
2723	signal (w->signum, ev_sighandler);	2825	signal (w->signum, ev_sighandler);
2724	# else	2826	# else
2725	struct sigaction sa;	2827	struct sigaction sa;
2726		2828
2727	evpipe_init (EV_A);	2829	evpipe_init (EV_A);
…		…
2758	signals [w->signum - 1].loop = 0; /* unattach from signal */	2860	signals [w->signum - 1].loop = 0; /* unattach from signal */
2759	#endif	2861	#endif
2760	#if EV_USE_SIGNALFD	2862	#if EV_USE_SIGNALFD
2761	if (sigfd >= 0)	2863	if (sigfd >= 0)
2762	{	2864	{
2763	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2865	sigset_t ss;
		2866
		2867	sigemptyset (&ss);
		2868	sigaddset (&ss, w->signum);
2764	sigdelset (&sigfd_set, w->signum);	2869	sigdelset (&sigfd_set, w->signum);
		2870
2765	signalfd (sigfd, &sigfd_set, 0);	2871	signalfd (sigfd, &sigfd_set, 0);
2766	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2872	sigprocmask (SIG_UNBLOCK, &ss, 0);
2767	/*TODO: maybe unblock signal? */
2768	}	2873	}
2769	else	2874	else
2770	#endif	2875	#endif
2771	signal (w->signum, SIG_DFL);	2876	signal (w->signum, SIG_DFL);
2772	}	2877	}
2773		2878
2774	EV_FREQUENT_CHECK;	2879	EV_FREQUENT_CHECK;
2775	}	2880	}
2776		2881
		2882	#endif
		2883
		2884	#if EV_CHILD_ENABLE
		2885
2777	void	2886	void
2778	ev_child_start (EV_P_ ev_child *w)	2887	ev_child_start (EV_P_ ev_child *w)
2779	{	2888	{
2780	#if EV_MULTIPLICITY	2889	#if EV_MULTIPLICITY
2781	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	2890	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2784	return;	2893	return;
2785		2894
2786	EV_FREQUENT_CHECK;	2895	EV_FREQUENT_CHECK;
2787		2896
2788	ev_start (EV_A_ (W)w, 1);	2897	ev_start (EV_A_ (W)w, 1);
2789	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2898	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2790		2899
2791	EV_FREQUENT_CHECK;	2900	EV_FREQUENT_CHECK;
2792	}	2901	}
2793		2902
2794	void	2903	void
…		…
2798	if (expect_false (!ev_is_active (w)))	2907	if (expect_false (!ev_is_active (w)))
2799	return;	2908	return;
2800		2909
2801	EV_FREQUENT_CHECK;	2910	EV_FREQUENT_CHECK;
2802		2911
2803	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2912	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2804	ev_stop (EV_A_ (W)w);	2913	ev_stop (EV_A_ (W)w);
2805		2914
2806	EV_FREQUENT_CHECK;	2915	EV_FREQUENT_CHECK;
2807	}	2916	}
		2917
		2918	#endif
2808		2919
2809	#if EV_STAT_ENABLE	2920	#if EV_STAT_ENABLE
2810		2921
2811	# ifdef _WIN32	2922	# ifdef _WIN32
2812	# undef lstat	2923	# undef lstat
…		…
2818	#define MIN_STAT_INTERVAL 0.1074891	2929	#define MIN_STAT_INTERVAL 0.1074891
2819		2930
2820	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);	2931	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);
2821		2932
2822	#if EV_USE_INOTIFY	2933	#if EV_USE_INOTIFY
2823	# define EV_INOTIFY_BUFSIZE 8192	2934
		2935	/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
		2936	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
2824		2937
2825	static void noinline	2938	static void noinline
2826	infy_add (EV_P_ ev_stat *w)	2939	infy_add (EV_P_ ev_stat *w)
2827	{	2940	{
2828	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);	2941	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);
2829		2942
2830	if (w->wd < 0)	2943	if (w->wd >= 0)
		2944	{
		2945	struct statfs sfs;
		2946
		2947	/* now local changes will be tracked by inotify, but remote changes won't */
		2948	/* unless the filesystem is known to be local, we therefore still poll */
		2949	/* also do poll on <2.6.25, but with normal frequency */
		2950
		2951	if (!fs_2625)
		2952	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		2953	else if (!statfs (w->path, &sfs)
		2954	&& (sfs.f_type == 0x1373 /* devfs */
		2955	|| sfs.f_type == 0xEF53 /* ext2/3 */
		2956	|| sfs.f_type == 0x3153464a /* jfs */
		2957	|| sfs.f_type == 0x52654973 /* reiser3 */
		2958	|| sfs.f_type == 0x01021994 /* tempfs */
		2959	|| sfs.f_type == 0x58465342 /* xfs */))
		2960	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
		2961	else
		2962	w->timer.repeat = w->interval ? w->interval : NFS_STAT_INTERVAL; /* remote, use reduced frequency */
2831	{	2963	}
		2964	else
		2965	{
		2966	/* can't use inotify, continue to stat */
2832	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	2967	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
2833	ev_timer_again (EV_A_ &w->timer); /* this is not race-free, so we still need to recheck periodically */
2834		2968
2835	/* monitor some parent directory for speedup hints */	2969	/* if path is not there, monitor some parent directory for speedup hints */
2836	/* note that exceeding the hardcoded path limit is not a correctness issue, */	2970	/* note that exceeding the hardcoded path limit is not a correctness issue, */
2837	/* but an efficiency issue only */	2971	/* but an efficiency issue only */
2838	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)	2972	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)
2839	{	2973	{
2840	char path [4096];	2974	char path [4096];
…		…
2856	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	2990	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2857	}	2991	}
2858	}	2992	}
2859		2993
2860	if (w->wd >= 0)	2994	if (w->wd >= 0)
2861	{
2862	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	2995	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2863		2996
2864	/* now local changes will be tracked by inotify, but remote changes won't */	2997	/* now re-arm timer, if required */
2865	/* unless the filesystem it known to be local, we therefore still poll */	2998	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2866	/* also do poll on <2.6.25, but with normal frequency */
2867	struct statfs sfs;
2868
2869	if (fs_2625 && !statfs (w->path, &sfs))
2870	if (sfs.f_type == 0x1373 /* devfs */
2871	|| sfs.f_type == 0xEF53 /* ext2/3 */
2872	|| sfs.f_type == 0x3153464a /* jfs */
2873	|| sfs.f_type == 0x52654973 /* reiser3 */
2874	|| sfs.f_type == 0x01021994 /* tempfs */
2875	|| sfs.f_type == 0x58465342 /* xfs */)
2876	return;
2877
2878	w->timer.repeat = w->interval ? w->interval : fs_2625 ? NFS_STAT_INTERVAL : DEF_STAT_INTERVAL;
2879	ev_timer_again (EV_A_ &w->timer);	2999	ev_timer_again (EV_A_ &w->timer);
2880	}	3000	if (ev_is_active (&w->timer)) ev_unref (EV_A);
2881	}	3001	}
2882		3002
2883	static void noinline	3003	static void noinline
2884	infy_del (EV_P_ ev_stat *w)	3004	infy_del (EV_P_ ev_stat *w)
2885	{	3005	{
…		…
2888		3008
2889	if (wd < 0)	3009	if (wd < 0)
2890	return;	3010	return;
2891		3011
2892	w->wd = -2;	3012	w->wd = -2;
2893	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3013	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2894	wlist_del (&fs_hash [slot].head, (WL)w);	3014	wlist_del (&fs_hash [slot].head, (WL)w);
2895		3015
2896	/* remove this watcher, if others are watching it, they will rearm */	3016	/* remove this watcher, if others are watching it, they will rearm */
2897	inotify_rm_watch (fs_fd, wd);	3017	inotify_rm_watch (fs_fd, wd);
2898	}	3018	}
…		…
2900	static void noinline	3020	static void noinline
2901	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3021	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2902	{	3022	{
2903	if (slot < 0)	3023	if (slot < 0)
2904	/* overflow, need to check for all hash slots */	3024	/* overflow, need to check for all hash slots */
2905	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3025	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2906	infy_wd (EV_A_ slot, wd, ev);	3026	infy_wd (EV_A_ slot, wd, ev);
2907	else	3027	else
2908	{	3028	{
2909	WL w_;	3029	WL w_;
2910		3030
2911	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3031	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2912	{	3032	{
2913	ev_stat *w = (ev_stat *)w_;	3033	ev_stat *w = (ev_stat *)w_;
2914	w_ = w_->next; /* lets us remove this watcher and all before it */	3034	w_ = w_->next; /* lets us remove this watcher and all before it */
2915		3035
2916	if (w->wd == wd || wd == -1)	3036	if (w->wd == wd || wd == -1)
2917	{	3037	{
2918	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3038	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2919	{	3039	{
2920	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3040	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2921	w->wd = -1;	3041	w->wd = -1;
2922	infy_add (EV_A_ w); /* re-add, no matter what */	3042	infy_add (EV_A_ w); /* re-add, no matter what */
2923	}	3043	}
2924		3044
2925	stat_timer_cb (EV_A_ &w->timer, 0);	3045	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2930		3050
2931	static void	3051	static void
2932	infy_cb (EV_P_ ev_io *w, int revents)	3052	infy_cb (EV_P_ ev_io *w, int revents)
2933	{	3053	{
2934	char buf [EV_INOTIFY_BUFSIZE];	3054	char buf [EV_INOTIFY_BUFSIZE];
2935	struct inotify_event *ev = (struct inotify_event *)buf;
2936	int ofs;	3055	int ofs;
2937	int len = read (fs_fd, buf, sizeof (buf));	3056	int len = read (fs_fd, buf, sizeof (buf));
2938		3057
2939	for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len)	3058	for (ofs = 0; ofs < len; )
		3059	{
		3060	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);
2940	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3061	infy_wd (EV_A_ ev->wd, ev->wd, ev);
		3062	ofs += sizeof (struct inotify_event) + ev->len;
		3063	}
		3064	}
		3065
		3066	inline_size unsigned int
		3067	ev_linux_version (void)
		3068	{
		3069	struct utsname buf;
		3070	unsigned int v;
		3071	int i;
		3072	char *p = buf.release;
		3073
		3074	if (uname (&buf))
		3075	return 0;
		3076
		3077	for (i = 3+1; --i; )
		3078	{
		3079	unsigned int c = 0;
		3080
		3081	for (;;)
		3082	{
		3083	if (*p >= '0' && *p <= '9')
		3084	c = c * 10 + *p++ - '0';
		3085	else
		3086	{
		3087	p += *p == '.';
		3088	break;
		3089	}
		3090	}
		3091
		3092	v = (v << 8) | c;
		3093	}
		3094
		3095	return v;
2941	}	3096	}
2942		3097
2943	inline_size void	3098	inline_size void
2944	check_2625 (EV_P)	3099	ev_check_2625 (EV_P)
2945	{	3100	{
2946	/* kernels < 2.6.25 are borked	3101	/* kernels < 2.6.25 are borked
2947	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html	3102	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
2948	*/	3103	*/
2949	struct utsname buf;	3104	if (ev_linux_version () < 0x020619)
2950	int major, minor, micro;
2951
2952	if (uname (&buf))
2953	return;	3105	return;
2954		3106
2955	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2956	return;
2957
2958	if (major < 2
2959	|| (major == 2 && minor < 6)
2960	|| (major == 2 && minor == 6 && micro < 25))
2961	return;
2962
2963	fs_2625 = 1;	3107	fs_2625 = 1;
		3108	}
		3109
		3110	inline_size int
		3111	infy_newfd (void)
		3112	{
		3113	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)
		3114	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
		3115	if (fd >= 0)
		3116	return fd;
		3117	#endif
		3118	return inotify_init ();
2964	}	3119	}
2965		3120
2966	inline_size void	3121	inline_size void
2967	infy_init (EV_P)	3122	infy_init (EV_P)
2968	{	3123	{
2969	if (fs_fd != -2)	3124	if (fs_fd != -2)
2970	return;	3125	return;
2971		3126
2972	fs_fd = -1;	3127	fs_fd = -1;
2973		3128
2974	check_2625 (EV_A);	3129	ev_check_2625 (EV_A);
2975		3130
2976	fs_fd = inotify_init ();	3131	fs_fd = infy_newfd ();
2977		3132
2978	if (fs_fd >= 0)	3133	if (fs_fd >= 0)
2979	{	3134	{
		3135	fd_intern (fs_fd);
2980	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);	3136	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);
2981	ev_set_priority (&fs_w, EV_MAXPRI);	3137	ev_set_priority (&fs_w, EV_MAXPRI);
2982	ev_io_start (EV_A_ &fs_w);	3138	ev_io_start (EV_A_ &fs_w);
		3139	ev_unref (EV_A);
2983	}	3140	}
2984	}	3141	}
2985		3142
2986	inline_size void	3143	inline_size void
2987	infy_fork (EV_P)	3144	infy_fork (EV_P)
…		…
2989	int slot;	3146	int slot;
2990		3147
2991	if (fs_fd < 0)	3148	if (fs_fd < 0)
2992	return;	3149	return;
2993		3150
		3151	ev_ref (EV_A);
		3152	ev_io_stop (EV_A_ &fs_w);
2994	close (fs_fd);	3153	close (fs_fd);
2995	fs_fd = inotify_init ();	3154	fs_fd = infy_newfd ();
2996		3155
		3156	if (fs_fd >= 0)
		3157	{
		3158	fd_intern (fs_fd);
		3159	ev_io_set (&fs_w, fs_fd, EV_READ);
		3160	ev_io_start (EV_A_ &fs_w);
		3161	ev_unref (EV_A);
		3162	}
		3163
2997	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3164	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2998	{	3165	{
2999	WL w_ = fs_hash [slot].head;	3166	WL w_ = fs_hash [slot].head;
3000	fs_hash [slot].head = 0;	3167	fs_hash [slot].head = 0;
3001		3168
3002	while (w_)	3169	while (w_)
…		…
3007	w->wd = -1;	3174	w->wd = -1;
3008		3175
3009	if (fs_fd >= 0)	3176	if (fs_fd >= 0)
3010	infy_add (EV_A_ w); /* re-add, no matter what */	3177	infy_add (EV_A_ w); /* re-add, no matter what */
3011	else	3178	else
		3179	{
		3180	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		3181	if (ev_is_active (&w->timer)) ev_ref (EV_A);
3012	ev_timer_again (EV_A_ &w->timer);	3182	ev_timer_again (EV_A_ &w->timer);
		3183	if (ev_is_active (&w->timer)) ev_unref (EV_A);
		3184	}
3013	}	3185	}
3014	}	3186	}
3015	}	3187	}
3016		3188
3017	#endif	3189	#endif
…		…
3034	static void noinline	3206	static void noinline
3035	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3207	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3036	{	3208	{
3037	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));	3209	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
3038		3210
3039	/* we copy this here each the time so that */	3211	ev_statdata prev = w->attr;
3040	/* prev has the old value when the callback gets invoked */
3041	w->prev = w->attr;
3042	ev_stat_stat (EV_A_ w);	3212	ev_stat_stat (EV_A_ w);
3043		3213
3044	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */	3214	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */
3045	if (	3215	if (
3046	w->prev.st_dev != w->attr.st_dev	3216	prev.st_dev != w->attr.st_dev
3047	|| w->prev.st_ino != w->attr.st_ino	3217	|| prev.st_ino != w->attr.st_ino
3048	|| w->prev.st_mode != w->attr.st_mode	3218	|| prev.st_mode != w->attr.st_mode
3049	|| w->prev.st_nlink != w->attr.st_nlink	3219	|| prev.st_nlink != w->attr.st_nlink
3050	|| w->prev.st_uid != w->attr.st_uid	3220	|| prev.st_uid != w->attr.st_uid
3051	|| w->prev.st_gid != w->attr.st_gid	3221	|| prev.st_gid != w->attr.st_gid
3052	|| w->prev.st_rdev != w->attr.st_rdev	3222	|| prev.st_rdev != w->attr.st_rdev
3053	|| w->prev.st_size != w->attr.st_size	3223	|| prev.st_size != w->attr.st_size
3054	|| w->prev.st_atime != w->attr.st_atime	3224	|| prev.st_atime != w->attr.st_atime
3055	|| w->prev.st_mtime != w->attr.st_mtime	3225	|| prev.st_mtime != w->attr.st_mtime
3056	|| w->prev.st_ctime != w->attr.st_ctime	3226	|| prev.st_ctime != w->attr.st_ctime
3057	) {	3227	) {
		3228	/* we only update w->prev on actual differences */
		3229	/* in case we test more often than invoke the callback, */
		3230	/* to ensure that prev is always different to attr */
		3231	w->prev = prev;
		3232
3058	#if EV_USE_INOTIFY	3233	#if EV_USE_INOTIFY
3059	if (fs_fd >= 0)	3234	if (fs_fd >= 0)
3060	{	3235	{
3061	infy_del (EV_A_ w);	3236	infy_del (EV_A_ w);
3062	infy_add (EV_A_ w);	3237	infy_add (EV_A_ w);
…		…
3087		3262
3088	if (fs_fd >= 0)	3263	if (fs_fd >= 0)
3089	infy_add (EV_A_ w);	3264	infy_add (EV_A_ w);
3090	else	3265	else
3091	#endif	3266	#endif
		3267	{
3092	ev_timer_again (EV_A_ &w->timer);	3268	ev_timer_again (EV_A_ &w->timer);
		3269	ev_unref (EV_A);
		3270	}
3093		3271
3094	ev_start (EV_A_ (W)w, 1);	3272	ev_start (EV_A_ (W)w, 1);
3095		3273
3096	EV_FREQUENT_CHECK;	3274	EV_FREQUENT_CHECK;
3097	}	3275	}
…		…
3106	EV_FREQUENT_CHECK;	3284	EV_FREQUENT_CHECK;
3107		3285
3108	#if EV_USE_INOTIFY	3286	#if EV_USE_INOTIFY
3109	infy_del (EV_A_ w);	3287	infy_del (EV_A_ w);
3110	#endif	3288	#endif
		3289
		3290	if (ev_is_active (&w->timer))
		3291	{
		3292	ev_ref (EV_A);
3111	ev_timer_stop (EV_A_ &w->timer);	3293	ev_timer_stop (EV_A_ &w->timer);
		3294	}
3112		3295
3113	ev_stop (EV_A_ (W)w);	3296	ev_stop (EV_A_ (W)w);
3114		3297
3115	EV_FREQUENT_CHECK;	3298	EV_FREQUENT_CHECK;
3116	}	3299	}
…		…
3161		3344
3162	EV_FREQUENT_CHECK;	3345	EV_FREQUENT_CHECK;
3163	}	3346	}
3164	#endif	3347	#endif
3165		3348
		3349	#if EV_PREPARE_ENABLE
3166	void	3350	void
3167	ev_prepare_start (EV_P_ ev_prepare *w)	3351	ev_prepare_start (EV_P_ ev_prepare *w)
3168	{	3352	{
3169	if (expect_false (ev_is_active (w)))	3353	if (expect_false (ev_is_active (w)))
3170	return;	3354	return;
…		…
3196		3380
3197	ev_stop (EV_A_ (W)w);	3381	ev_stop (EV_A_ (W)w);
3198		3382
3199	EV_FREQUENT_CHECK;	3383	EV_FREQUENT_CHECK;
3200	}	3384	}
		3385	#endif
3201		3386
		3387	#if EV_CHECK_ENABLE
3202	void	3388	void
3203	ev_check_start (EV_P_ ev_check *w)	3389	ev_check_start (EV_P_ ev_check *w)
3204	{	3390	{
3205	if (expect_false (ev_is_active (w)))	3391	if (expect_false (ev_is_active (w)))
3206	return;	3392	return;
…		…
3232		3418
3233	ev_stop (EV_A_ (W)w);	3419	ev_stop (EV_A_ (W)w);
3234		3420
3235	EV_FREQUENT_CHECK;	3421	EV_FREQUENT_CHECK;
3236	}	3422	}
		3423	#endif
3237		3424
3238	#if EV_EMBED_ENABLE	3425	#if EV_EMBED_ENABLE
3239	void noinline	3426	void noinline
3240	ev_embed_sweep (EV_P_ ev_embed *w)	3427	ev_embed_sweep (EV_P_ ev_embed *w)
3241	{	3428	{
…		…
3336		3523
3337	ev_io_stop (EV_A_ &w->io);	3524	ev_io_stop (EV_A_ &w->io);
3338	ev_prepare_stop (EV_A_ &w->prepare);	3525	ev_prepare_stop (EV_A_ &w->prepare);
3339	ev_fork_stop (EV_A_ &w->fork);	3526	ev_fork_stop (EV_A_ &w->fork);
3340		3527
		3528	ev_stop (EV_A_ (W)w);
		3529
3341	EV_FREQUENT_CHECK;	3530	EV_FREQUENT_CHECK;
3342	}	3531	}
3343	#endif	3532	#endif
3344		3533
3345	#if EV_FORK_ENABLE	3534	#if EV_FORK_ENABLE
…		…
3471	{	3660	{
3472	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	3661	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
3473		3662
3474	if (expect_false (!once))	3663	if (expect_false (!once))
3475	{	3664	{
3476	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3665	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3477	return;	3666	return;
3478	}	3667	}
3479		3668
3480	once->cb = cb;	3669	once->cb = cb;
3481	once->arg = arg;	3670	once->arg = arg;
…		…
3568	if (types & EV_ASYNC)	3757	if (types & EV_ASYNC)
3569	for (i = asynccnt; i--; )	3758	for (i = asynccnt; i--; )
3570	cb (EV_A_ EV_ASYNC, asyncs [i]);	3759	cb (EV_A_ EV_ASYNC, asyncs [i]);
3571	#endif	3760	#endif
3572		3761
		3762	#if EV_PREPARE_ENABLE
3573	if (types & EV_PREPARE)	3763	if (types & EV_PREPARE)
3574	for (i = preparecnt; i--; )	3764	for (i = preparecnt; i--; )
3575	#if EV_EMBED_ENABLE	3765	# if EV_EMBED_ENABLE
3576	if (ev_cb (prepares [i]) != embed_prepare_cb)	3766	if (ev_cb (prepares [i]) != embed_prepare_cb)
3577	#endif	3767	# endif
3578	cb (EV_A_ EV_PREPARE, prepares [i]);	3768	cb (EV_A_ EV_PREPARE, prepares [i]);
		3769	#endif
3579		3770
		3771	#if EV_CHECK_ENABLE
3580	if (types & EV_CHECK)	3772	if (types & EV_CHECK)
3581	for (i = checkcnt; i--; )	3773	for (i = checkcnt; i--; )
3582	cb (EV_A_ EV_CHECK, checks [i]);	3774	cb (EV_A_ EV_CHECK, checks [i]);
		3775	#endif
3583		3776
		3777	#if EV_SIGNAL_ENABLE
3584	if (types & EV_SIGNAL)	3778	if (types & EV_SIGNAL)
3585	for (i = 0; i < EV_NSIG - 1; ++i)	3779	for (i = 0; i < EV_NSIG - 1; ++i)
3586	for (wl = signals [i].head; wl; )	3780	for (wl = signals [i].head; wl; )
3587	{	3781	{
3588	wn = wl->next;	3782	wn = wl->next;
3589	cb (EV_A_ EV_SIGNAL, wl);	3783	cb (EV_A_ EV_SIGNAL, wl);
3590	wl = wn;	3784	wl = wn;
3591	}	3785	}
		3786	#endif
3592		3787
		3788	#if EV_CHILD_ENABLE
3593	if (types & EV_CHILD)	3789	if (types & EV_CHILD)
3594	for (i = EV_PID_HASHSIZE; i--; )	3790	for (i = (EV_PID_HASHSIZE); i--; )
3595	for (wl = childs [i]; wl; )	3791	for (wl = childs [i]; wl; )
3596	{	3792	{
3597	wn = wl->next;	3793	wn = wl->next;
3598	cb (EV_A_ EV_CHILD, wl);	3794	cb (EV_A_ EV_CHILD, wl);
3599	wl = wn;	3795	wl = wn;
3600	}	3796	}
		3797	#endif
3601	/* EV_STAT 0x00001000 /* stat data changed */	3798	/* EV_STAT 0x00001000 /* stat data changed */
3602	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3799	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3603	}	3800	}
3604	#endif	3801	#endif
3605		3802

Diff Legend

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