ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.308 by root, Sun Jul 19 20:39:54 2009 UTC vs.
Revision 1.346 by root, Thu Oct 14 05:07:04 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
404	#endif	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
		451	#endif
		452
405		453
406	/**/	454	/**/
407		455
408	#if EV_VERIFY >= 3	456	#if EV_VERIFY >= 3
409	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	457	# define EV_FREQUENT_CHECK ev_verify (EV_A)
410	#else	458	#else
411	# define EV_FREQUENT_CHECK do { } while (0)	459	# define EV_FREQUENT_CHECK do { } while (0)
412	#endif	460	#endif
413		461
414	/*	462	/*
…		…
421	*/	469	*/
422	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	470	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
423		471
424	#define MIN_TIMEJUMP 1. /* minimum timejump that gets detected (if monotonic clock available) */	472	#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) */	473	#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 */
427		474
428	#if __GNUC__ >= 4	475	#if __GNUC__ >= 4
429	# define expect(expr,value) __builtin_expect ((expr),(value))	476	# define expect(expr,value) __builtin_expect ((expr),(value))
430	# define noinline __attribute__ ((noinline))	477	# define noinline __attribute__ ((noinline))
431	#else	478	#else
…		…
438		485
439	#define expect_false(expr) expect ((expr) != 0, 0)	486	#define expect_false(expr) expect ((expr) != 0, 0)
440	#define expect_true(expr) expect ((expr) != 0, 1)	487	#define expect_true(expr) expect ((expr) != 0, 1)
441	#define inline_size static inline	488	#define inline_size static inline
442		489
443	#if EV_MINIMAL	490	#if EV_FEATURE_CODE
		491	# define inline_speed static inline
		492	#else
444	# define inline_speed static noinline	493	# define inline_speed static noinline
445	#else
446	# define inline_speed static inline
447	#endif	494	#endif
448		495
449	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	496	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
450		497
451	#if EV_MINPRI == EV_MAXPRI	498	#if EV_MINPRI == EV_MAXPRI
…		…
464	#define ev_active(w) ((W)(w))->active	511	#define ev_active(w) ((W)(w))->active
465	#define ev_at(w) ((WT)(w))->at	512	#define ev_at(w) ((WT)(w))->at
466		513
467	#if EV_USE_REALTIME	514	#if EV_USE_REALTIME
468	/* sig_atomic_t is used to avoid per-thread variables or locking but still */	515	/* 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 */	516	/* giving it a reasonably high chance of working on typical architectures */
470	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */	517	static EV_ATOMIC_T have_realtime; /* did clock_gettime (CLOCK_REALTIME) work? */
471	#endif	518	#endif
472		519
473	#if EV_USE_MONOTONIC	520	#if EV_USE_MONOTONIC
474	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */	521	static EV_ATOMIC_T have_monotonic; /* did clock_gettime (CLOCK_MONOTONIC) work? */
475	#endif	522	#endif
476		523
		524	#ifndef EV_FD_TO_WIN32_HANDLE
		525	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
		526	#endif
		527	#ifndef EV_WIN32_HANDLE_TO_FD
		528	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
		529	#endif
		530	#ifndef EV_WIN32_CLOSE_FD
		531	# define EV_WIN32_CLOSE_FD(fd) close (fd)
		532	#endif
		533
477	#ifdef _WIN32	534	#ifdef _WIN32
478	# include "ev_win32.c"	535	# include "ev_win32.c"
479	#endif	536	#endif
480		537
481	/*****************************************************************************/	538	/*****************************************************************************/
		539
		540	#if EV_AVOID_STDIO
		541	static void noinline
		542	ev_printerr (const char *msg)
		543	{
		544	write (STDERR_FILENO, msg, strlen (msg));
		545	}
		546	#endif
482		547
483	static void (*syserr_cb)(const char *msg);	548	static void (*syserr_cb)(const char *msg);
484		549
485	void	550	void
486	ev_set_syserr_cb (void (*cb)(const char *msg))	551	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
496		561
497	if (syserr_cb)	562	if (syserr_cb)
498	syserr_cb (msg);	563	syserr_cb (msg);
499	else	564	else
500	{	565	{
		566	#if EV_AVOID_STDIO
		567	const char *err = strerror (errno);
		568
		569	ev_printerr (msg);
		570	ev_printerr (": ");
		571	ev_printerr (err);
		572	ev_printerr ("\n");
		573	#else
501	perror (msg);	574	perror (msg);
		575	#endif
502	abort ();	576	abort ();
503	}	577	}
504	}	578	}
505		579
506	static void *	580	static void *
507	ev_realloc_emul (void *ptr, long size)	581	ev_realloc_emul (void *ptr, long size)
508	{	582	{
		583	#if __GLIBC__
		584	return realloc (ptr, size);
		585	#else
509	/* some systems, notably openbsd and darwin, fail to properly	586	/* some systems, notably openbsd and darwin, fail to properly
510	* implement realloc (x, 0) (as required by both ansi c-98 and	587	* implement realloc (x, 0) (as required by both ansi c-89 and
511	* the single unix specification, so work around them here.	588	* the single unix specification, so work around them here.
512	*/	589	*/
513		590
514	if (size)	591	if (size)
515	return realloc (ptr, size);	592	return realloc (ptr, size);
516		593
517	free (ptr);	594	free (ptr);
518	return 0;	595	return 0;
		596	#endif
519	}	597	}
520		598
521	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	599	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
522		600
523	void	601	void
…		…
531	{	609	{
532	ptr = alloc (ptr, size);	610	ptr = alloc (ptr, size);
533		611
534	if (!ptr && size)	612	if (!ptr && size)
535	{	613	{
		614	#if EV_AVOID_STDIO
		615	ev_printerr ("libev: memory allocation failed, aborting.\n");
		616	#else
536	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	617	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		618	#endif
537	abort ();	619	abort ();
538	}	620	}
539		621
540	return ptr;	622	return ptr;
541	}	623	}
…		…
623		705
624	static int ev_default_loop_ptr;	706	static int ev_default_loop_ptr;
625		707
626	#endif	708	#endif
627		709
628	#if EV_MINIMAL < 2	710	#if EV_FEATURE_API
629	# define EV_RELEASE_CB if (expect_false (release_cb)) release_cb (EV_A)	711	# 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)	712	# define EV_ACQUIRE_CB if (expect_false (acquire_cb)) acquire_cb (EV_A)
631	# define EV_INVOKE_PENDING invoke_cb (EV_A)	713	# define EV_INVOKE_PENDING invoke_cb (EV_A)
632	#else	714	#else
633	# define EV_RELEASE_CB (void)0	715	# define EV_RELEASE_CB (void)0
…		…
712	/*****************************************************************************/	794	/*****************************************************************************/
713		795
714	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */	796	#define MALLOC_ROUND 4096 /* prefer to allocate in chunks of this size, must be 2**n and >> 4 longs */
715		797
716	/* find a suitable new size for the given array, */	798	/* find a suitable new size for the given array, */
717	/* hopefully by rounding to a ncie-to-malloc size */	799	/* hopefully by rounding to a nice-to-malloc size */
718	inline_size int	800	inline_size int
719	array_nextsize (int elem, int cur, int cnt)	801	array_nextsize (int elem, int cur, int cnt)
720	{	802	{
721	int ncur = cur + 1;	803	int ncur = cur + 1;
722		804
…		…
818	}	900	}
819		901
820	/*****************************************************************************/	902	/*****************************************************************************/
821		903
822	inline_speed void	904	inline_speed void
823	fd_event_nc (EV_P_ int fd, int revents)	905	fd_event_nocheck (EV_P_ int fd, int revents)
824	{	906	{
825	ANFD *anfd = anfds + fd;	907	ANFD *anfd = anfds + fd;
826	ev_io *w;	908	ev_io *w;
827		909
828	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	910	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)
…		…
840	fd_event (EV_P_ int fd, int revents)	922	fd_event (EV_P_ int fd, int revents)
841	{	923	{
842	ANFD *anfd = anfds + fd;	924	ANFD *anfd = anfds + fd;
843		925
844	if (expect_true (!anfd->reify))	926	if (expect_true (!anfd->reify))
845	fd_event_nc (EV_A_ fd, revents);	927	fd_event_nocheck (EV_A_ fd, revents);
846	}	928	}
847		929
848	void	930	void
849	ev_feed_fd_event (EV_P_ int fd, int revents)	931	ev_feed_fd_event (EV_P_ int fd, int revents)
850	{	932	{
851	if (fd >= 0 && fd < anfdmax)	933	if (fd >= 0 && fd < anfdmax)
852	fd_event_nc (EV_A_ fd, revents);	934	fd_event_nocheck (EV_A_ fd, revents);
853	}	935	}
854		936
855	/* make sure the external fd watch events are in-sync */	937	/* make sure the external fd watch events are in-sync */
856	/* with the kernel/libev internal state */	938	/* with the kernel/libev internal state */
857	inline_size void	939	inline_size void
…		…
872		954
873	#if EV_SELECT_IS_WINSOCKET	955	#if EV_SELECT_IS_WINSOCKET
874	if (events)	956	if (events)
875	{	957	{
876	unsigned long arg;	958	unsigned long arg;
877	#ifdef EV_FD_TO_WIN32_HANDLE
878	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	959	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));	960	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));
883	}	961	}
884	#endif	962	#endif
885		963
886	{	964	{
…		…
924	ev_io_stop (EV_A_ w);	1002	ev_io_stop (EV_A_ w);
925	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);	1003	ev_feed_event (EV_A_ (W)w, EV_ERROR | EV_READ | EV_WRITE);
926	}	1004	}
927	}	1005	}
928		1006
929	/* check whether the given fd is atcually valid, for error recovery */	1007	/* check whether the given fd is actually valid, for error recovery */
930	inline_size int	1008	inline_size int
931	fd_valid (int fd)	1009	fd_valid (int fd)
932	{	1010	{
933	#ifdef _WIN32	1011	#ifdef _WIN32
934	return _get_osfhandle (fd) != -1;	1012	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
935	#else	1013	#else
936	return fcntl (fd, F_GETFD) != -1;	1014	return fcntl (fd, F_GETFD) != -1;
937	#endif	1015	#endif
938	}	1016	}
939		1017
…		…
976	anfds [fd].emask = 0;	1054	anfds [fd].emask = 0;
977	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1055	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
978	}	1056	}
979	}	1057	}
980		1058
		1059	/* used to prepare libev internal fd's */
		1060	/* this is not fork-safe */
		1061	inline_speed void
		1062	fd_intern (int fd)
		1063	{
		1064	#ifdef _WIN32
		1065	unsigned long arg = 1;
		1066	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1067	#else
		1068	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1069	fcntl (fd, F_SETFL, O_NONBLOCK);
		1070	#endif
		1071	}
		1072
981	/*****************************************************************************/	1073	/*****************************************************************************/
982		1074
983	/*	1075	/*
984	* the heap functions want a real array index. array index 0 uis guaranteed to not	1076	* 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	1077	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
986	* the branching factor of the d-tree.	1078	* the branching factor of the d-tree.
987	*/	1079	*/
988		1080
989	/*	1081	/*
…		…
1057		1149
1058	for (;;)	1150	for (;;)
1059	{	1151	{
1060	int c = k << 1;	1152	int c = k << 1;
1061		1153
1062	if (c > N + HEAP0 - 1)	1154	if (c >= N + HEAP0)
1063	break;	1155	break;
1064		1156
1065	c += c + 1 < N + HEAP0 && ANHE_at (heap [c]) > ANHE_at (heap [c + 1])	1157	c += c + 1 < N + HEAP0 && ANHE_at (heap [c]) > ANHE_at (heap [c + 1])
1066	? 1 : 0;	1158	? 1 : 0;
1067		1159
…		…
1103		1195
1104	/* move an element suitably so it is in a correct place */	1196	/* move an element suitably so it is in a correct place */
1105	inline_size void	1197	inline_size void
1106	adjustheap (ANHE *heap, int N, int k)	1198	adjustheap (ANHE *heap, int N, int k)
1107	{	1199	{
1108	if (k > HEAP0 && ANHE_at (heap [HPARENT (k)]) >= ANHE_at (heap [k]))	1200	if (k > HEAP0 && ANHE_at (heap [k]) <= ANHE_at (heap [HPARENT (k)]))
1109	upheap (heap, k);	1201	upheap (heap, k);
1110	else	1202	else
1111	downheap (heap, N, k);	1203	downheap (heap, N, k);
1112	}	1204	}
1113		1205
…		…
1137		1229
1138	static ANSIG signals [EV_NSIG - 1];	1230	static ANSIG signals [EV_NSIG - 1];
1139		1231
1140	/*****************************************************************************/	1232	/*****************************************************************************/
1141		1233
1142	/* used to prepare libev internal fd's */	1234	#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		1235
1156	static void noinline	1236	static void noinline
1157	evpipe_init (EV_P)	1237	evpipe_init (EV_P)
1158	{	1238	{
1159	if (!ev_is_active (&pipe_w))	1239	if (!ev_is_active (&pipe_w))
1160	{	1240	{
1161	#if EV_USE_EVENTFD	1241	# if EV_USE_EVENTFD
1162	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1242	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1163	if (evfd < 0 && errno == EINVAL)	1243	if (evfd < 0 && errno == EINVAL)
1164	evfd = eventfd (0, 0);	1244	evfd = eventfd (0, 0);
1165		1245
1166	if (evfd >= 0)	1246	if (evfd >= 0)
…		…
1168	evpipe [0] = -1;	1248	evpipe [0] = -1;
1169	fd_intern (evfd); /* doing it twice doesn't hurt */	1249	fd_intern (evfd); /* doing it twice doesn't hurt */
1170	ev_io_set (&pipe_w, evfd, EV_READ);	1250	ev_io_set (&pipe_w, evfd, EV_READ);
1171	}	1251	}
1172	else	1252	else
1173	#endif	1253	# endif
1174	{	1254	{
1175	while (pipe (evpipe))	1255	while (pipe (evpipe))
1176	ev_syserr ("(libev) error creating signal/async pipe");	1256	ev_syserr ("(libev) error creating signal/async pipe");
1177		1257
1178	fd_intern (evpipe [0]);	1258	fd_intern (evpipe [0]);
…		…
1189	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1269	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1190	{	1270	{
1191	if (!*flag)	1271	if (!*flag)
1192	{	1272	{
1193	int old_errno = errno; /* save errno because write might clobber it */	1273	int old_errno = errno; /* save errno because write might clobber it */
		1274	char dummy;
1194		1275
1195	*flag = 1;	1276	*flag = 1;
1196		1277
1197	#if EV_USE_EVENTFD	1278	#if EV_USE_EVENTFD
1198	if (evfd >= 0)	1279	if (evfd >= 0)
…		…
1200	uint64_t counter = 1;	1281	uint64_t counter = 1;
1201	write (evfd, &counter, sizeof (uint64_t));	1282	write (evfd, &counter, sizeof (uint64_t));
1202	}	1283	}
1203	else	1284	else
1204	#endif	1285	#endif
		1286	/* win32 people keep sending patches that change this write() to send() */
		1287	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1288	/* so when you think this write should be a send instead, please find out */
		1289	/* where your send() is from - it's definitely not the microsoft send, and */
		1290	/* tell me. thank you. */
1205	write (evpipe [1], &old_errno, 1);	1291	write (evpipe [1], &dummy, 1);
1206		1292
1207	errno = old_errno;	1293	errno = old_errno;
1208	}	1294	}
1209	}	1295	}
1210		1296
…		…
1223	}	1309	}
1224	else	1310	else
1225	#endif	1311	#endif
1226	{	1312	{
1227	char dummy;	1313	char dummy;
		1314	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1228	read (evpipe [0], &dummy, 1);	1315	read (evpipe [0], &dummy, 1);
1229	}	1316	}
1230		1317
1231	if (sig_pending)	1318	if (sig_pending)
1232	{	1319	{
…		…
1259	{	1346	{
1260	#if EV_MULTIPLICITY	1347	#if EV_MULTIPLICITY
1261	EV_P = signals [signum - 1].loop;	1348	EV_P = signals [signum - 1].loop;
1262	#endif	1349	#endif
1263		1350
1264	#if _WIN32	1351	#ifdef _WIN32
1265	signal (signum, ev_sighandler);	1352	signal (signum, ev_sighandler);
1266	#endif	1353	#endif
1267		1354
1268	signals [signum - 1].pending = 1;	1355	signals [signum - 1].pending = 1;
1269	evpipe_write (EV_A_ &sig_pending);	1356	evpipe_write (EV_A_ &sig_pending);
…		…
1311	break;	1398	break;
1312	}	1399	}
1313	}	1400	}
1314	#endif	1401	#endif
1315		1402
		1403	#endif
		1404
1316	/*****************************************************************************/	1405	/*****************************************************************************/
1317		1406
		1407	#if EV_CHILD_ENABLE
1318	static WL childs [EV_PID_HASHSIZE];	1408	static WL childs [EV_PID_HASHSIZE];
1319
1320	#ifndef _WIN32
1321		1409
1322	static ev_signal childev;	1410	static ev_signal childev;
1323		1411
1324	#ifndef WIFCONTINUED	1412	#ifndef WIFCONTINUED
1325	# define WIFCONTINUED(status) 0	1413	# define WIFCONTINUED(status) 0
…		…
1330	child_reap (EV_P_ int chain, int pid, int status)	1418	child_reap (EV_P_ int chain, int pid, int status)
1331	{	1419	{
1332	ev_child *w;	1420	ev_child *w;
1333	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1421	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1334		1422
1335	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1423	for (w = (ev_child *)childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child *)((WL)w)->next)
1336	{	1424	{
1337	if ((w->pid == pid || !w->pid)	1425	if ((w->pid == pid || !w->pid)
1338	&& (!traced || (w->flags & 1)))	1426	&& (!traced || (w->flags & 1)))
1339	{	1427	{
1340	ev_set_priority (w, EV_MAXPRI); /* need to do it *now*, this *must* be the same prio as the signal watcher itself */	1428	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 */	1453	/* 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 */	1454	/* 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);	1455	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1368		1456
1369	child_reap (EV_A_ pid, pid, status);	1457	child_reap (EV_A_ pid, pid, status);
1370	if (EV_PID_HASHSIZE > 1)	1458	if ((EV_PID_HASHSIZE) > 1)
1371	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1459	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1372	}	1460	}
1373		1461
1374	#endif	1462	#endif
1375		1463
…		…
1442	#ifdef __APPLE__	1530	#ifdef __APPLE__
1443	/* only select works correctly on that "unix-certified" platform */	1531	/* only select works correctly on that "unix-certified" platform */
1444	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1532	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1445	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1533	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1446	#endif	1534	#endif
		1535	#ifdef __FreeBSD__
		1536	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1537	#endif
1447		1538
1448	return flags;	1539	return flags;
1449	}	1540	}
1450		1541
1451	unsigned int	1542	unsigned int
…		…
1464	ev_backend (EV_P)	1555	ev_backend (EV_P)
1465	{	1556	{
1466	return backend;	1557	return backend;
1467	}	1558	}
1468		1559
1469	#if EV_MINIMAL < 2	1560	#if EV_FEATURE_API
1470	unsigned int	1561	unsigned int
1471	ev_loop_count (EV_P)	1562	ev_iteration (EV_P)
1472	{	1563	{
1473	return loop_count;	1564	return loop_count;
1474	}	1565	}
1475		1566
1476	unsigned int	1567	unsigned int
1477	ev_loop_depth (EV_P)	1568	ev_depth (EV_P)
1478	{	1569	{
1479	return loop_depth;	1570	return loop_depth;
1480	}	1571	}
1481		1572
1482	void	1573	void
…		…
1554		1645
1555	ev_rt_now = ev_time ();	1646	ev_rt_now = ev_time ();
1556	mn_now = get_clock ();	1647	mn_now = get_clock ();
1557	now_floor = mn_now;	1648	now_floor = mn_now;
1558	rtmn_diff = ev_rt_now - mn_now;	1649	rtmn_diff = ev_rt_now - mn_now;
1559	#if EV_MINIMAL < 2	1650	#if EV_FEATURE_API
1560	invoke_cb = ev_invoke_pending;	1651	invoke_cb = ev_invoke_pending;
1561	#endif	1652	#endif
1562		1653
1563	io_blocktime = 0.;	1654	io_blocktime = 0.;
1564	timeout_blocktime = 0.;	1655	timeout_blocktime = 0.;
…		…
1570	#endif	1661	#endif
1571	#if EV_USE_INOTIFY	1662	#if EV_USE_INOTIFY
1572	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1663	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1573	#endif	1664	#endif
1574	#if EV_USE_SIGNALFD	1665	#if EV_USE_SIGNALFD
1575	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1666	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1576	#endif	1667	#endif
1577		1668
1578	if (!(flags & 0x0000ffffU))	1669	if (!(flags & 0x0000ffffU))
1579	flags |= ev_recommended_backends ();	1670	flags |= ev_recommended_backends ();
1580		1671
…		…
1594	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1685	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1595	#endif	1686	#endif
1596		1687
1597	ev_prepare_init (&pending_w, pendingcb);	1688	ev_prepare_init (&pending_w, pendingcb);
1598		1689
		1690	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1599	ev_init (&pipe_w, pipecb);	1691	ev_init (&pipe_w, pipecb);
1600	ev_set_priority (&pipe_w, EV_MAXPRI);	1692	ev_set_priority (&pipe_w, EV_MAXPRI);
		1693	#endif
1601	}	1694	}
1602	}	1695	}
1603		1696
1604	/* free up a loop structure */	1697	/* free up a loop structure */
1605	static void noinline	1698	static void noinline
…		…
1617	close (evfd);	1710	close (evfd);
1618	#endif	1711	#endif
1619		1712
1620	if (evpipe [0] >= 0)	1713	if (evpipe [0] >= 0)
1621	{	1714	{
1622	close (evpipe [0]);	1715	EV_WIN32_CLOSE_FD (evpipe [0]);
1623	close (evpipe [1]);	1716	EV_WIN32_CLOSE_FD (evpipe [1]);
1624	}	1717	}
1625	}	1718	}
1626		1719
1627	#if EV_USE_SIGNALFD	1720	#if EV_USE_SIGNALFD
1628	if (ev_is_active (&sigfd_w))	1721	if (ev_is_active (&sigfd_w))
1629	{
1630	/*ev_ref (EV_A);*/
1631	/*ev_io_stop (EV_A_ &sigfd_w);*/
1632
1633	close (sigfd);	1722	close (sigfd);
1634	}
1635	#endif	1723	#endif
1636		1724
1637	#if EV_USE_INOTIFY	1725	#if EV_USE_INOTIFY
1638	if (fs_fd >= 0)	1726	if (fs_fd >= 0)
1639	close (fs_fd);	1727	close (fs_fd);
…		…
1724	close (evfd);	1812	close (evfd);
1725	#endif	1813	#endif
1726		1814
1727	if (evpipe [0] >= 0)	1815	if (evpipe [0] >= 0)
1728	{	1816	{
1729	close (evpipe [0]);	1817	EV_WIN32_CLOSE_FD (evpipe [0]);
1730	close (evpipe [1]);	1818	EV_WIN32_CLOSE_FD (evpipe [1]);
1731	}	1819	}
1732		1820
		1821	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1733	evpipe_init (EV_A);	1822	evpipe_init (EV_A);
1734	/* now iterate over everything, in case we missed something */	1823	/* now iterate over everything, in case we missed something */
1735	pipecb (EV_A_ &pipe_w, EV_READ);	1824	pipecb (EV_A_ &pipe_w, EV_READ);
		1825	#endif
1736	}	1826	}
1737		1827
1738	postfork = 0;	1828	postfork = 0;
1739	}	1829	}
1740		1830
…		…
1802	verify_watcher (EV_A_ ws [cnt]);	1892	verify_watcher (EV_A_ ws [cnt]);
1803	}	1893	}
1804	}	1894	}
1805	#endif	1895	#endif
1806		1896
1807	#if EV_MINIMAL < 2	1897	#if EV_FEATURE_API
1808	void	1898	void
1809	ev_loop_verify (EV_P)	1899	ev_verify (EV_P)
1810	{	1900	{
1811	#if EV_VERIFY	1901	#if EV_VERIFY
1812	int i;	1902	int i;
1813	WL w;	1903	WL w;
1814		1904
…		…
1853	#if EV_ASYNC_ENABLE	1943	#if EV_ASYNC_ENABLE
1854	assert (asyncmax >= asynccnt);	1944	assert (asyncmax >= asynccnt);
1855	array_verify (EV_A_ (W *)asyncs, asynccnt);	1945	array_verify (EV_A_ (W *)asyncs, asynccnt);
1856	#endif	1946	#endif
1857		1947
		1948	#if EV_PREPARE_ENABLE
1858	assert (preparemax >= preparecnt);	1949	assert (preparemax >= preparecnt);
1859	array_verify (EV_A_ (W *)prepares, preparecnt);	1950	array_verify (EV_A_ (W *)prepares, preparecnt);
		1951	#endif
1860		1952
		1953	#if EV_CHECK_ENABLE
1861	assert (checkmax >= checkcnt);	1954	assert (checkmax >= checkcnt);
1862	array_verify (EV_A_ (W *)checks, checkcnt);	1955	array_verify (EV_A_ (W *)checks, checkcnt);
		1956	#endif
1863		1957
1864	# if 0	1958	# if 0
		1959	#if EV_CHILD_ENABLE
1865	for (w = (ev_child *)childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child *)((WL)w)->next)	1960	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)	1961	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1962	#endif
1867	# endif	1963	# endif
1868	#endif	1964	#endif
1869	}	1965	}
1870	#endif	1966	#endif
1871		1967
…		…
1887		1983
1888	loop_init (EV_A_ flags);	1984	loop_init (EV_A_ flags);
1889		1985
1890	if (ev_backend (EV_A))	1986	if (ev_backend (EV_A))
1891	{	1987	{
1892	#ifndef _WIN32	1988	#if EV_CHILD_ENABLE
1893	ev_signal_init (&childev, childcb, SIGCHLD);	1989	ev_signal_init (&childev, childcb, SIGCHLD);
1894	ev_set_priority (&childev, EV_MAXPRI);	1990	ev_set_priority (&childev, EV_MAXPRI);
1895	ev_signal_start (EV_A_ &childev);	1991	ev_signal_start (EV_A_ &childev);
1896	ev_unref (EV_A); /* child watcher should not keep loop alive */	1992	ev_unref (EV_A); /* child watcher should not keep loop alive */
1897	#endif	1993	#endif
…		…
1910	EV_P = ev_default_loop_ptr;	2006	EV_P = ev_default_loop_ptr;
1911	#endif	2007	#endif
1912		2008
1913	ev_default_loop_ptr = 0;	2009	ev_default_loop_ptr = 0;
1914		2010
1915	#ifndef _WIN32	2011	#if EV_CHILD_ENABLE
1916	ev_ref (EV_A); /* child watcher */	2012	ev_ref (EV_A); /* child watcher */
1917	ev_signal_stop (EV_A_ &childev);	2013	ev_signal_stop (EV_A_ &childev);
1918	#endif	2014	#endif
1919		2015
1920	loop_destroy (EV_A);	2016	loop_destroy (EV_A);
…		…
2026	EV_FREQUENT_CHECK;	2122	EV_FREQUENT_CHECK;
2027	feed_reverse (EV_A_ (W)w);	2123	feed_reverse (EV_A_ (W)w);
2028	}	2124	}
2029	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2125	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2030		2126
2031	feed_reverse_done (EV_A_ EV_TIMEOUT);	2127	feed_reverse_done (EV_A_ EV_TIMER);
2032	}	2128	}
2033	}	2129	}
2034		2130
2035	#if EV_PERIODIC_ENABLE	2131	#if EV_PERIODIC_ENABLE
2036	/* make periodics pending */	2132	/* make periodics pending */
…		…
2089	feed_reverse_done (EV_A_ EV_PERIODIC);	2185	feed_reverse_done (EV_A_ EV_PERIODIC);
2090	}	2186	}
2091	}	2187	}
2092		2188
2093	/* simply recalculate all periodics */	2189	/* simply recalculate all periodics */
2094	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2190	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2095	static void noinline	2191	static void noinline
2096	periodics_reschedule (EV_P)	2192	periodics_reschedule (EV_P)
2097	{	2193	{
2098	int i;	2194	int i;
2099		2195
…		…
2127	ANHE_at_cache (*he);	2223	ANHE_at_cache (*he);
2128	}	2224	}
2129	}	2225	}
2130		2226
2131	/* fetch new monotonic and realtime times from the kernel */	2227	/* fetch new monotonic and realtime times from the kernel */
2132	/* also detetc if there was a timejump, and act accordingly */	2228	/* also detect if there was a timejump, and act accordingly */
2133	inline_speed void	2229	inline_speed void
2134	time_update (EV_P_ ev_tstamp max_block)	2230	time_update (EV_P_ ev_tstamp max_block)
2135	{	2231	{
2136	#if EV_USE_MONOTONIC	2232	#if EV_USE_MONOTONIC
2137	if (expect_true (have_monotonic))	2233	if (expect_true (have_monotonic))
…		…
2197	}	2293	}
2198		2294
2199	void	2295	void
2200	ev_loop (EV_P_ int flags)	2296	ev_loop (EV_P_ int flags)
2201	{	2297	{
2202	#if EV_MINIMAL < 2	2298	#if EV_FEATURE_API
2203	++loop_depth;	2299	++loop_depth;
2204	#endif	2300	#endif
2205		2301
2206	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2302	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));
2207		2303
…		…
2210	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2306	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2211		2307
2212	do	2308	do
2213	{	2309	{
2214	#if EV_VERIFY >= 2	2310	#if EV_VERIFY >= 2
2215	ev_loop_verify (EV_A);	2311	ev_verify (EV_A);
2216	#endif	2312	#endif
2217		2313
2218	#ifndef _WIN32	2314	#ifndef _WIN32
2219	if (expect_false (curpid)) /* penalise the forking check even more */	2315	if (expect_false (curpid)) /* penalise the forking check even more */
2220	if (expect_false (getpid () != curpid))	2316	if (expect_false (getpid () != curpid))
…		…
2232	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2328	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2233	EV_INVOKE_PENDING;	2329	EV_INVOKE_PENDING;
2234	}	2330	}
2235	#endif	2331	#endif
2236		2332
		2333	#if EV_PREPARE_ENABLE
2237	/* queue prepare watchers (and execute them) */	2334	/* queue prepare watchers (and execute them) */
2238	if (expect_false (preparecnt))	2335	if (expect_false (preparecnt))
2239	{	2336	{
2240	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2337	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2241	EV_INVOKE_PENDING;	2338	EV_INVOKE_PENDING;
2242	}	2339	}
		2340	#endif
2243		2341
2244	if (expect_false (loop_done))	2342	if (expect_false (loop_done))
2245	break;	2343	break;
2246		2344
2247	/* we might have forked, so reify kernel state if necessary */	2345	/* we might have forked, so reify kernel state if necessary */
…		…
2298	waittime -= sleeptime;	2396	waittime -= sleeptime;
2299	}	2397	}
2300	}	2398	}
2301	}	2399	}
2302		2400
2303	#if EV_MINIMAL < 2	2401	#if EV_FEATURE_API
2304	++loop_count;	2402	++loop_count;
2305	#endif	2403	#endif
2306	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2404	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */
2307	backend_poll (EV_A_ waittime);	2405	backend_poll (EV_A_ waittime);
2308	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2406	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */
…		…
2320	#if EV_IDLE_ENABLE	2418	#if EV_IDLE_ENABLE
2321	/* queue idle watchers unless other events are pending */	2419	/* queue idle watchers unless other events are pending */
2322	idle_reify (EV_A);	2420	idle_reify (EV_A);
2323	#endif	2421	#endif
2324		2422
		2423	#if EV_CHECK_ENABLE
2325	/* queue check watchers, to be executed first */	2424	/* queue check watchers, to be executed first */
2326	if (expect_false (checkcnt))	2425	if (expect_false (checkcnt))
2327	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2426	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2427	#endif
2328		2428
2329	EV_INVOKE_PENDING;	2429	EV_INVOKE_PENDING;
2330	}	2430	}
2331	while (expect_true (	2431	while (expect_true (
2332	activecnt	2432	activecnt
…		…
2335	));	2435	));
2336		2436
2337	if (loop_done == EVUNLOOP_ONE)	2437	if (loop_done == EVUNLOOP_ONE)
2338	loop_done = EVUNLOOP_CANCEL;	2438	loop_done = EVUNLOOP_CANCEL;
2339		2439
2340	#if EV_MINIMAL < 2	2440	#if EV_FEATURE_API
2341	--loop_depth;	2441	--loop_depth;
2342	#endif	2442	#endif
2343	}	2443	}
2344		2444
2345	void	2445	void
…		…
2471		2571
2472	if (expect_false (ev_is_active (w)))	2572	if (expect_false (ev_is_active (w)))
2473	return;	2573	return;
2474		2574
2475	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2575	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))));	2576	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
2477		2577
2478	EV_FREQUENT_CHECK;	2578	EV_FREQUENT_CHECK;
2479		2579
2480	ev_start (EV_A_ (W)w, 1);	2580	ev_start (EV_A_ (W)w, 1);
2481	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2581	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2551	timers [active] = timers [timercnt + HEAP0];	2651	timers [active] = timers [timercnt + HEAP0];
2552	adjustheap (timers, timercnt, active);	2652	adjustheap (timers, timercnt, active);
2553	}	2653	}
2554	}	2654	}
2555		2655
2556	EV_FREQUENT_CHECK;
2557
2558	ev_at (w) -= mn_now;	2656	ev_at (w) -= mn_now;
2559		2657
2560	ev_stop (EV_A_ (W)w);	2658	ev_stop (EV_A_ (W)w);
		2659
		2660	EV_FREQUENT_CHECK;
2561	}	2661	}
2562		2662
2563	void noinline	2663	void noinline
2564	ev_timer_again (EV_P_ ev_timer *w)	2664	ev_timer_again (EV_P_ ev_timer *w)
2565	{	2665	{
…		…
2644	periodics [active] = periodics [periodiccnt + HEAP0];	2744	periodics [active] = periodics [periodiccnt + HEAP0];
2645	adjustheap (periodics, periodiccnt, active);	2745	adjustheap (periodics, periodiccnt, active);
2646	}	2746	}
2647	}	2747	}
2648		2748
2649	EV_FREQUENT_CHECK;
2650
2651	ev_stop (EV_A_ (W)w);	2749	ev_stop (EV_A_ (W)w);
		2750
		2751	EV_FREQUENT_CHECK;
2652	}	2752	}
2653		2753
2654	void noinline	2754	void noinline
2655	ev_periodic_again (EV_P_ ev_periodic *w)	2755	ev_periodic_again (EV_P_ ev_periodic *w)
2656	{	2756	{
…		…
2661	#endif	2761	#endif
2662		2762
2663	#ifndef SA_RESTART	2763	#ifndef SA_RESTART
2664	# define SA_RESTART 0	2764	# define SA_RESTART 0
2665	#endif	2765	#endif
		2766
		2767	#if EV_SIGNAL_ENABLE
2666		2768
2667	void noinline	2769	void noinline
2668	ev_signal_start (EV_P_ ev_signal *w)	2770	ev_signal_start (EV_P_ ev_signal *w)
2669	{	2771	{
2670	if (expect_false (ev_is_active (w)))	2772	if (expect_false (ev_is_active (w)))
…		…
2717	if (!((WL)w)->next)	2819	if (!((WL)w)->next)
2718	# if EV_USE_SIGNALFD	2820	# if EV_USE_SIGNALFD
2719	if (sigfd < 0) /*TODO*/	2821	if (sigfd < 0) /*TODO*/
2720	# endif	2822	# endif
2721	{	2823	{
2722	# if _WIN32	2824	# ifdef _WIN32
		2825	evpipe_init (EV_A);
		2826
2723	signal (w->signum, ev_sighandler);	2827	signal (w->signum, ev_sighandler);
2724	# else	2828	# else
2725	struct sigaction sa;	2829	struct sigaction sa;
2726		2830
2727	evpipe_init (EV_A);	2831	evpipe_init (EV_A);
…		…
2758	signals [w->signum - 1].loop = 0; /* unattach from signal */	2862	signals [w->signum - 1].loop = 0; /* unattach from signal */
2759	#endif	2863	#endif
2760	#if EV_USE_SIGNALFD	2864	#if EV_USE_SIGNALFD
2761	if (sigfd >= 0)	2865	if (sigfd >= 0)
2762	{	2866	{
2763	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2867	sigset_t ss;
		2868
		2869	sigemptyset (&ss);
		2870	sigaddset (&ss, w->signum);
2764	sigdelset (&sigfd_set, w->signum);	2871	sigdelset (&sigfd_set, w->signum);
		2872
2765	signalfd (sigfd, &sigfd_set, 0);	2873	signalfd (sigfd, &sigfd_set, 0);
2766	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2874	sigprocmask (SIG_UNBLOCK, &ss, 0);
2767	/*TODO: maybe unblock signal? */
2768	}	2875	}
2769	else	2876	else
2770	#endif	2877	#endif
2771	signal (w->signum, SIG_DFL);	2878	signal (w->signum, SIG_DFL);
2772	}	2879	}
2773		2880
2774	EV_FREQUENT_CHECK;	2881	EV_FREQUENT_CHECK;
2775	}	2882	}
2776		2883
		2884	#endif
		2885
		2886	#if EV_CHILD_ENABLE
		2887
2777	void	2888	void
2778	ev_child_start (EV_P_ ev_child *w)	2889	ev_child_start (EV_P_ ev_child *w)
2779	{	2890	{
2780	#if EV_MULTIPLICITY	2891	#if EV_MULTIPLICITY
2781	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	2892	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2784	return;	2895	return;
2785		2896
2786	EV_FREQUENT_CHECK;	2897	EV_FREQUENT_CHECK;
2787		2898
2788	ev_start (EV_A_ (W)w, 1);	2899	ev_start (EV_A_ (W)w, 1);
2789	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2900	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2790		2901
2791	EV_FREQUENT_CHECK;	2902	EV_FREQUENT_CHECK;
2792	}	2903	}
2793		2904
2794	void	2905	void
…		…
2798	if (expect_false (!ev_is_active (w)))	2909	if (expect_false (!ev_is_active (w)))
2799	return;	2910	return;
2800		2911
2801	EV_FREQUENT_CHECK;	2912	EV_FREQUENT_CHECK;
2802		2913
2803	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2914	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2804	ev_stop (EV_A_ (W)w);	2915	ev_stop (EV_A_ (W)w);
2805		2916
2806	EV_FREQUENT_CHECK;	2917	EV_FREQUENT_CHECK;
2807	}	2918	}
		2919
		2920	#endif
2808		2921
2809	#if EV_STAT_ENABLE	2922	#if EV_STAT_ENABLE
2810		2923
2811	# ifdef _WIN32	2924	# ifdef _WIN32
2812	# undef lstat	2925	# undef lstat
…		…
2818	#define MIN_STAT_INTERVAL 0.1074891	2931	#define MIN_STAT_INTERVAL 0.1074891
2819		2932
2820	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);	2933	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);
2821		2934
2822	#if EV_USE_INOTIFY	2935	#if EV_USE_INOTIFY
2823	# define EV_INOTIFY_BUFSIZE 8192	2936
		2937	/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
		2938	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
2824		2939
2825	static void noinline	2940	static void noinline
2826	infy_add (EV_P_ ev_stat *w)	2941	infy_add (EV_P_ ev_stat *w)
2827	{	2942	{
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);	2943	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		2944
2830	if (w->wd < 0)	2945	if (w->wd >= 0)
		2946	{
		2947	struct statfs sfs;
		2948
		2949	/* now local changes will be tracked by inotify, but remote changes won't */
		2950	/* unless the filesystem is known to be local, we therefore still poll */
		2951	/* also do poll on <2.6.25, but with normal frequency */
		2952
		2953	if (!fs_2625)
		2954	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		2955	else if (!statfs (w->path, &sfs)
		2956	&& (sfs.f_type == 0x1373 /* devfs */
		2957	|| sfs.f_type == 0xEF53 /* ext2/3 */
		2958	|| sfs.f_type == 0x3153464a /* jfs */
		2959	|| sfs.f_type == 0x52654973 /* reiser3 */
		2960	|| sfs.f_type == 0x01021994 /* tempfs */
		2961	|| sfs.f_type == 0x58465342 /* xfs */))
		2962	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
		2963	else
		2964	w->timer.repeat = w->interval ? w->interval : NFS_STAT_INTERVAL; /* remote, use reduced frequency */
2831	{	2965	}
		2966	else
		2967	{
		2968	/* can't use inotify, continue to stat */
2832	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	2969	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		2970
2835	/* monitor some parent directory for speedup hints */	2971	/* 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, */	2972	/* note that exceeding the hardcoded path limit is not a correctness issue, */
2837	/* but an efficiency issue only */	2973	/* but an efficiency issue only */
2838	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)	2974	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)
2839	{	2975	{
2840	char path [4096];	2976	char path [4096];
…		…
2856	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	2992	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2857	}	2993	}
2858	}	2994	}
2859		2995
2860	if (w->wd >= 0)	2996	if (w->wd >= 0)
2861	{
2862	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	2997	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2863		2998
2864	/* now local changes will be tracked by inotify, but remote changes won't */	2999	/* now re-arm timer, if required */
2865	/* unless the filesystem it known to be local, we therefore still poll */	3000	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);	3001	ev_timer_again (EV_A_ &w->timer);
2880	}	3002	if (ev_is_active (&w->timer)) ev_unref (EV_A);
2881	}	3003	}
2882		3004
2883	static void noinline	3005	static void noinline
2884	infy_del (EV_P_ ev_stat *w)	3006	infy_del (EV_P_ ev_stat *w)
2885	{	3007	{
…		…
2888		3010
2889	if (wd < 0)	3011	if (wd < 0)
2890	return;	3012	return;
2891		3013
2892	w->wd = -2;	3014	w->wd = -2;
2893	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3015	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2894	wlist_del (&fs_hash [slot].head, (WL)w);	3016	wlist_del (&fs_hash [slot].head, (WL)w);
2895		3017
2896	/* remove this watcher, if others are watching it, they will rearm */	3018	/* remove this watcher, if others are watching it, they will rearm */
2897	inotify_rm_watch (fs_fd, wd);	3019	inotify_rm_watch (fs_fd, wd);
2898	}	3020	}
…		…
2900	static void noinline	3022	static void noinline
2901	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3023	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2902	{	3024	{
2903	if (slot < 0)	3025	if (slot < 0)
2904	/* overflow, need to check for all hash slots */	3026	/* overflow, need to check for all hash slots */
2905	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3027	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2906	infy_wd (EV_A_ slot, wd, ev);	3028	infy_wd (EV_A_ slot, wd, ev);
2907	else	3029	else
2908	{	3030	{
2909	WL w_;	3031	WL w_;
2910		3032
2911	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3033	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2912	{	3034	{
2913	ev_stat *w = (ev_stat *)w_;	3035	ev_stat *w = (ev_stat *)w_;
2914	w_ = w_->next; /* lets us remove this watcher and all before it */	3036	w_ = w_->next; /* lets us remove this watcher and all before it */
2915		3037
2916	if (w->wd == wd || wd == -1)	3038	if (w->wd == wd || wd == -1)
2917	{	3039	{
2918	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3040	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2919	{	3041	{
2920	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3042	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2921	w->wd = -1;	3043	w->wd = -1;
2922	infy_add (EV_A_ w); /* re-add, no matter what */	3044	infy_add (EV_A_ w); /* re-add, no matter what */
2923	}	3045	}
2924		3046
2925	stat_timer_cb (EV_A_ &w->timer, 0);	3047	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2930		3052
2931	static void	3053	static void
2932	infy_cb (EV_P_ ev_io *w, int revents)	3054	infy_cb (EV_P_ ev_io *w, int revents)
2933	{	3055	{
2934	char buf [EV_INOTIFY_BUFSIZE];	3056	char buf [EV_INOTIFY_BUFSIZE];
2935	struct inotify_event *ev = (struct inotify_event *)buf;
2936	int ofs;	3057	int ofs;
2937	int len = read (fs_fd, buf, sizeof (buf));	3058	int len = read (fs_fd, buf, sizeof (buf));
2938		3059
2939	for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len)	3060	for (ofs = 0; ofs < len; )
		3061	{
		3062	struct inotify_event *ev = (struct inotify_event *)(buf + ofs);
2940	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3063	infy_wd (EV_A_ ev->wd, ev->wd, ev);
		3064	ofs += sizeof (struct inotify_event) + ev->len;
		3065	}
		3066	}
		3067
		3068	inline_size unsigned int
		3069	ev_linux_version (void)
		3070	{
		3071	struct utsname buf;
		3072	unsigned int v;
		3073	int i;
		3074	char *p = buf.release;
		3075
		3076	if (uname (&buf))
		3077	return 0;
		3078
		3079	for (i = 3+1; --i; )
		3080	{
		3081	unsigned int c = 0;
		3082
		3083	for (;;)
		3084	{
		3085	if (*p >= '0' && *p <= '9')
		3086	c = c * 10 + *p++ - '0';
		3087	else
		3088	{
		3089	p += *p == '.';
		3090	break;
		3091	}
		3092	}
		3093
		3094	v = (v << 8) | c;
		3095	}
		3096
		3097	return v;
2941	}	3098	}
2942		3099
2943	inline_size void	3100	inline_size void
2944	check_2625 (EV_P)	3101	ev_check_2625 (EV_P)
2945	{	3102	{
2946	/* kernels < 2.6.25 are borked	3103	/* kernels < 2.6.25 are borked
2947	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html	3104	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
2948	*/	3105	*/
2949	struct utsname buf;	3106	if (ev_linux_version () < 0x020619)
2950	int major, minor, micro;
2951
2952	if (uname (&buf))
2953	return;	3107	return;
2954		3108
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;	3109	fs_2625 = 1;
		3110	}
		3111
		3112	inline_size int
		3113	infy_newfd (void)
		3114	{
		3115	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)
		3116	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
		3117	if (fd >= 0)
		3118	return fd;
		3119	#endif
		3120	return inotify_init ();
2964	}	3121	}
2965		3122
2966	inline_size void	3123	inline_size void
2967	infy_init (EV_P)	3124	infy_init (EV_P)
2968	{	3125	{
2969	if (fs_fd != -2)	3126	if (fs_fd != -2)
2970	return;	3127	return;
2971		3128
2972	fs_fd = -1;	3129	fs_fd = -1;
2973		3130
2974	check_2625 (EV_A);	3131	ev_check_2625 (EV_A);
2975		3132
2976	fs_fd = inotify_init ();	3133	fs_fd = infy_newfd ();
2977		3134
2978	if (fs_fd >= 0)	3135	if (fs_fd >= 0)
2979	{	3136	{
		3137	fd_intern (fs_fd);
2980	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);	3138	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);
2981	ev_set_priority (&fs_w, EV_MAXPRI);	3139	ev_set_priority (&fs_w, EV_MAXPRI);
2982	ev_io_start (EV_A_ &fs_w);	3140	ev_io_start (EV_A_ &fs_w);
		3141	ev_unref (EV_A);
2983	}	3142	}
2984	}	3143	}
2985		3144
2986	inline_size void	3145	inline_size void
2987	infy_fork (EV_P)	3146	infy_fork (EV_P)
…		…
2989	int slot;	3148	int slot;
2990		3149
2991	if (fs_fd < 0)	3150	if (fs_fd < 0)
2992	return;	3151	return;
2993		3152
		3153	ev_ref (EV_A);
		3154	ev_io_stop (EV_A_ &fs_w);
2994	close (fs_fd);	3155	close (fs_fd);
2995	fs_fd = inotify_init ();	3156	fs_fd = infy_newfd ();
2996		3157
		3158	if (fs_fd >= 0)
		3159	{
		3160	fd_intern (fs_fd);
		3161	ev_io_set (&fs_w, fs_fd, EV_READ);
		3162	ev_io_start (EV_A_ &fs_w);
		3163	ev_unref (EV_A);
		3164	}
		3165
2997	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3166	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2998	{	3167	{
2999	WL w_ = fs_hash [slot].head;	3168	WL w_ = fs_hash [slot].head;
3000	fs_hash [slot].head = 0;	3169	fs_hash [slot].head = 0;
3001		3170
3002	while (w_)	3171	while (w_)
…		…
3007	w->wd = -1;	3176	w->wd = -1;
3008		3177
3009	if (fs_fd >= 0)	3178	if (fs_fd >= 0)
3010	infy_add (EV_A_ w); /* re-add, no matter what */	3179	infy_add (EV_A_ w); /* re-add, no matter what */
3011	else	3180	else
		3181	{
		3182	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		3183	if (ev_is_active (&w->timer)) ev_ref (EV_A);
3012	ev_timer_again (EV_A_ &w->timer);	3184	ev_timer_again (EV_A_ &w->timer);
		3185	if (ev_is_active (&w->timer)) ev_unref (EV_A);
		3186	}
3013	}	3187	}
3014	}	3188	}
3015	}	3189	}
3016		3190
3017	#endif	3191	#endif
…		…
3034	static void noinline	3208	static void noinline
3035	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3209	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3036	{	3210	{
3037	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));	3211	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
3038		3212
3039	/* we copy this here each the time so that */	3213	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);	3214	ev_stat_stat (EV_A_ w);
3043		3215
3044	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */	3216	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */
3045	if (	3217	if (
3046	w->prev.st_dev != w->attr.st_dev	3218	prev.st_dev != w->attr.st_dev
3047	|| w->prev.st_ino != w->attr.st_ino	3219	|| prev.st_ino != w->attr.st_ino
3048	|| w->prev.st_mode != w->attr.st_mode	3220	|| prev.st_mode != w->attr.st_mode
3049	|| w->prev.st_nlink != w->attr.st_nlink	3221	|| prev.st_nlink != w->attr.st_nlink
3050	|| w->prev.st_uid != w->attr.st_uid	3222	|| prev.st_uid != w->attr.st_uid
3051	|| w->prev.st_gid != w->attr.st_gid	3223	|| prev.st_gid != w->attr.st_gid
3052	|| w->prev.st_rdev != w->attr.st_rdev	3224	|| prev.st_rdev != w->attr.st_rdev
3053	|| w->prev.st_size != w->attr.st_size	3225	|| prev.st_size != w->attr.st_size
3054	|| w->prev.st_atime != w->attr.st_atime	3226	|| prev.st_atime != w->attr.st_atime
3055	|| w->prev.st_mtime != w->attr.st_mtime	3227	|| prev.st_mtime != w->attr.st_mtime
3056	|| w->prev.st_ctime != w->attr.st_ctime	3228	|| prev.st_ctime != w->attr.st_ctime
3057	) {	3229	) {
		3230	/* we only update w->prev on actual differences */
		3231	/* in case we test more often than invoke the callback, */
		3232	/* to ensure that prev is always different to attr */
		3233	w->prev = prev;
		3234
3058	#if EV_USE_INOTIFY	3235	#if EV_USE_INOTIFY
3059	if (fs_fd >= 0)	3236	if (fs_fd >= 0)
3060	{	3237	{
3061	infy_del (EV_A_ w);	3238	infy_del (EV_A_ w);
3062	infy_add (EV_A_ w);	3239	infy_add (EV_A_ w);
…		…
3087		3264
3088	if (fs_fd >= 0)	3265	if (fs_fd >= 0)
3089	infy_add (EV_A_ w);	3266	infy_add (EV_A_ w);
3090	else	3267	else
3091	#endif	3268	#endif
		3269	{
3092	ev_timer_again (EV_A_ &w->timer);	3270	ev_timer_again (EV_A_ &w->timer);
		3271	ev_unref (EV_A);
		3272	}
3093		3273
3094	ev_start (EV_A_ (W)w, 1);	3274	ev_start (EV_A_ (W)w, 1);
3095		3275
3096	EV_FREQUENT_CHECK;	3276	EV_FREQUENT_CHECK;
3097	}	3277	}
…		…
3106	EV_FREQUENT_CHECK;	3286	EV_FREQUENT_CHECK;
3107		3287
3108	#if EV_USE_INOTIFY	3288	#if EV_USE_INOTIFY
3109	infy_del (EV_A_ w);	3289	infy_del (EV_A_ w);
3110	#endif	3290	#endif
		3291
		3292	if (ev_is_active (&w->timer))
		3293	{
		3294	ev_ref (EV_A);
3111	ev_timer_stop (EV_A_ &w->timer);	3295	ev_timer_stop (EV_A_ &w->timer);
		3296	}
3112		3297
3113	ev_stop (EV_A_ (W)w);	3298	ev_stop (EV_A_ (W)w);
3114		3299
3115	EV_FREQUENT_CHECK;	3300	EV_FREQUENT_CHECK;
3116	}	3301	}
…		…
3161		3346
3162	EV_FREQUENT_CHECK;	3347	EV_FREQUENT_CHECK;
3163	}	3348	}
3164	#endif	3349	#endif
3165		3350
		3351	#if EV_PREPARE_ENABLE
3166	void	3352	void
3167	ev_prepare_start (EV_P_ ev_prepare *w)	3353	ev_prepare_start (EV_P_ ev_prepare *w)
3168	{	3354	{
3169	if (expect_false (ev_is_active (w)))	3355	if (expect_false (ev_is_active (w)))
3170	return;	3356	return;
…		…
3196		3382
3197	ev_stop (EV_A_ (W)w);	3383	ev_stop (EV_A_ (W)w);
3198		3384
3199	EV_FREQUENT_CHECK;	3385	EV_FREQUENT_CHECK;
3200	}	3386	}
		3387	#endif
3201		3388
		3389	#if EV_CHECK_ENABLE
3202	void	3390	void
3203	ev_check_start (EV_P_ ev_check *w)	3391	ev_check_start (EV_P_ ev_check *w)
3204	{	3392	{
3205	if (expect_false (ev_is_active (w)))	3393	if (expect_false (ev_is_active (w)))
3206	return;	3394	return;
…		…
3232		3420
3233	ev_stop (EV_A_ (W)w);	3421	ev_stop (EV_A_ (W)w);
3234		3422
3235	EV_FREQUENT_CHECK;	3423	EV_FREQUENT_CHECK;
3236	}	3424	}
		3425	#endif
3237		3426
3238	#if EV_EMBED_ENABLE	3427	#if EV_EMBED_ENABLE
3239	void noinline	3428	void noinline
3240	ev_embed_sweep (EV_P_ ev_embed *w)	3429	ev_embed_sweep (EV_P_ ev_embed *w)
3241	{	3430	{
…		…
3336		3525
3337	ev_io_stop (EV_A_ &w->io);	3526	ev_io_stop (EV_A_ &w->io);
3338	ev_prepare_stop (EV_A_ &w->prepare);	3527	ev_prepare_stop (EV_A_ &w->prepare);
3339	ev_fork_stop (EV_A_ &w->fork);	3528	ev_fork_stop (EV_A_ &w->fork);
3340		3529
		3530	ev_stop (EV_A_ (W)w);
		3531
3341	EV_FREQUENT_CHECK;	3532	EV_FREQUENT_CHECK;
3342	}	3533	}
3343	#endif	3534	#endif
3344		3535
3345	#if EV_FORK_ENABLE	3536	#if EV_FORK_ENABLE
…		…
3471	{	3662	{
3472	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	3663	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
3473		3664
3474	if (expect_false (!once))	3665	if (expect_false (!once))
3475	{	3666	{
3476	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3667	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3477	return;	3668	return;
3478	}	3669	}
3479		3670
3480	once->cb = cb;	3671	once->cb = cb;
3481	once->arg = arg;	3672	once->arg = arg;
…		…
3568	if (types & EV_ASYNC)	3759	if (types & EV_ASYNC)
3569	for (i = asynccnt; i--; )	3760	for (i = asynccnt; i--; )
3570	cb (EV_A_ EV_ASYNC, asyncs [i]);	3761	cb (EV_A_ EV_ASYNC, asyncs [i]);
3571	#endif	3762	#endif
3572		3763
		3764	#if EV_PREPARE_ENABLE
3573	if (types & EV_PREPARE)	3765	if (types & EV_PREPARE)
3574	for (i = preparecnt; i--; )	3766	for (i = preparecnt; i--; )
3575	#if EV_EMBED_ENABLE	3767	# if EV_EMBED_ENABLE
3576	if (ev_cb (prepares [i]) != embed_prepare_cb)	3768	if (ev_cb (prepares [i]) != embed_prepare_cb)
3577	#endif	3769	# endif
3578	cb (EV_A_ EV_PREPARE, prepares [i]);	3770	cb (EV_A_ EV_PREPARE, prepares [i]);
		3771	#endif
3579		3772
		3773	#if EV_CHECK_ENABLE
3580	if (types & EV_CHECK)	3774	if (types & EV_CHECK)
3581	for (i = checkcnt; i--; )	3775	for (i = checkcnt; i--; )
3582	cb (EV_A_ EV_CHECK, checks [i]);	3776	cb (EV_A_ EV_CHECK, checks [i]);
		3777	#endif
3583		3778
		3779	#if EV_SIGNAL_ENABLE
3584	if (types & EV_SIGNAL)	3780	if (types & EV_SIGNAL)
3585	for (i = 0; i < EV_NSIG - 1; ++i)	3781	for (i = 0; i < EV_NSIG - 1; ++i)
3586	for (wl = signals [i].head; wl; )	3782	for (wl = signals [i].head; wl; )
3587	{	3783	{
3588	wn = wl->next;	3784	wn = wl->next;
3589	cb (EV_A_ EV_SIGNAL, wl);	3785	cb (EV_A_ EV_SIGNAL, wl);
3590	wl = wn;	3786	wl = wn;
3591	}	3787	}
		3788	#endif
3592		3789
		3790	#if EV_CHILD_ENABLE
3593	if (types & EV_CHILD)	3791	if (types & EV_CHILD)
3594	for (i = EV_PID_HASHSIZE; i--; )	3792	for (i = (EV_PID_HASHSIZE); i--; )
3595	for (wl = childs [i]; wl; )	3793	for (wl = childs [i]; wl; )
3596	{	3794	{
3597	wn = wl->next;	3795	wn = wl->next;
3598	cb (EV_A_ EV_CHILD, wl);	3796	cb (EV_A_ EV_CHILD, wl);
3599	wl = wn;	3797	wl = wn;
3600	}	3798	}
		3799	#endif
3601	/* EV_STAT 0x00001000 /* stat data changed */	3800	/* EV_STAT 0x00001000 /* stat data changed */
3602	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3801	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3603	}	3802	}
3604	#endif	3803	#endif
3605		3804

Diff Legend

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