ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.313 by root, Wed Aug 19 23:44:51 2009 UTC vs.
Revision 1.348 by root, Fri Oct 15 22:48:25 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
…		…
342	# define EV_USE_CLOCK_SYSCALL 0	355	# define EV_USE_CLOCK_SYSCALL 0
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 */
		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
347		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
…		…
395	# endif	414	# endif
396	# endif	415	# endif
397	# ifdef __cplusplus	416	# ifdef __cplusplus
398	extern "C" {	417	extern "C" {
399	# endif	418	# endif
400	int eventfd (unsigned int initval, int flags);	419	int (eventfd) (unsigned int initval, int flags);
401	# ifdef __cplusplus	420	# ifdef __cplusplus
402	}	421	}
403	# endif	422	# endif
404	#endif	423	#endif
405		424
406	#if EV_USE_SIGNALFD	425	#if EV_USE_SIGNALFD
407	# 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
408	#endif	451	#endif
409		452
410	/**/	453	/**/
411		454
412	#if EV_VERIFY >= 3	455	#if EV_VERIFY >= 3
413	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	456	# define EV_FREQUENT_CHECK ev_verify (EV_A)
414	#else	457	#else
415	# define EV_FREQUENT_CHECK do { } while (0)	458	# define EV_FREQUENT_CHECK do { } while (0)
416	#endif	459	#endif
417		460
418	/*	461	/*
…		…
425	*/	468	*/
426	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	469	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
427		470
428	#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) */
429	#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) */
430	/*#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)
431		476
432	#if __GNUC__ >= 4	477	#if __GNUC__ >= 4
433	# define expect(expr,value) __builtin_expect ((expr),(value))	478	# define expect(expr,value) __builtin_expect ((expr),(value))
434	# define noinline __attribute__ ((noinline))	479	# define noinline __attribute__ ((noinline))
435	#else	480	#else
…		…
442		487
443	#define expect_false(expr) expect ((expr) != 0, 0)	488	#define expect_false(expr) expect ((expr) != 0, 0)
444	#define expect_true(expr) expect ((expr) != 0, 1)	489	#define expect_true(expr) expect ((expr) != 0, 1)
445	#define inline_size static inline	490	#define inline_size static inline
446		491
447	#if EV_MINIMAL	492	#if EV_FEATURE_CODE
		493	# define inline_speed static inline
		494	#else
448	# define inline_speed static noinline	495	# define inline_speed static noinline
449	#else
450	# define inline_speed static inline
451	#endif	496	#endif
452		497
453	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	498	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
454		499
455	#if EV_MINPRI == EV_MAXPRI	500	#if EV_MINPRI == EV_MAXPRI
…		…
468	#define ev_active(w) ((W)(w))->active	513	#define ev_active(w) ((W)(w))->active
469	#define ev_at(w) ((WT)(w))->at	514	#define ev_at(w) ((WT)(w))->at
470		515
471	#if EV_USE_REALTIME	516	#if EV_USE_REALTIME
472	/* 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 */
473	/* giving it a reasonably high chance of working on typical architetcures */	518	/* giving it a reasonably high chance of working on typical architectures */
474	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? */
475	#endif	520	#endif
476		521
477	#if EV_USE_MONOTONIC	522	#if EV_USE_MONOTONIC
478	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? */
…		…
480		525
481	#ifndef EV_FD_TO_WIN32_HANDLE	526	#ifndef EV_FD_TO_WIN32_HANDLE
482	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)	527	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
483	#endif	528	#endif
484	#ifndef EV_WIN32_HANDLE_TO_FD	529	#ifndef EV_WIN32_HANDLE_TO_FD
485	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (fd, 0)	530	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
486	#endif	531	#endif
487	#ifndef EV_WIN32_CLOSE_FD	532	#ifndef EV_WIN32_CLOSE_FD
488	# define EV_WIN32_CLOSE_FD(fd) close (fd)	533	# define EV_WIN32_CLOSE_FD(fd) close (fd)
489	#endif	534	#endif
490		535
491	#ifdef _WIN32	536	#ifdef _WIN32
492	# include "ev_win32.c"	537	# include "ev_win32.c"
493	#endif	538	#endif
494		539
495	/*****************************************************************************/	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
496		549
497	static void (*syserr_cb)(const char *msg);	550	static void (*syserr_cb)(const char *msg);
498		551
499	void	552	void
500	ev_set_syserr_cb (void (*cb)(const char *msg))	553	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
510		563
511	if (syserr_cb)	564	if (syserr_cb)
512	syserr_cb (msg);	565	syserr_cb (msg);
513	else	566	else
514	{	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
515	perror (msg);	576	perror (msg);
		577	#endif
516	abort ();	578	abort ();
517	}	579	}
518	}	580	}
519		581
520	static void *	582	static void *
521	ev_realloc_emul (void *ptr, long size)	583	ev_realloc_emul (void *ptr, long size)
522	{	584	{
		585	#if __GLIBC__
		586	return realloc (ptr, size);
		587	#else
523	/* some systems, notably openbsd and darwin, fail to properly	588	/* some systems, notably openbsd and darwin, fail to properly
524	* 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
525	* the single unix specification, so work around them here.	590	* the single unix specification, so work around them here.
526	*/	591	*/
527		592
528	if (size)	593	if (size)
529	return realloc (ptr, size);	594	return realloc (ptr, size);
530		595
531	free (ptr);	596	free (ptr);
532	return 0;	597	return 0;
		598	#endif
533	}	599	}
534		600
535	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	601	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
536		602
537	void	603	void
…		…
545	{	611	{
546	ptr = alloc (ptr, size);	612	ptr = alloc (ptr, size);
547		613
548	if (!ptr && size)	614	if (!ptr && size)
549	{	615	{
		616	#if EV_AVOID_STDIO
		617	ev_printerr ("libev: memory allocation failed, aborting.\n");
		618	#else
550	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	619	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		620	#endif
551	abort ();	621	abort ();
552	}	622	}
553		623
554	return ptr;	624	return ptr;
555	}	625	}
…		…
637		707
638	static int ev_default_loop_ptr;	708	static int ev_default_loop_ptr;
639		709
640	#endif	710	#endif
641		711
642	#if EV_MINIMAL < 2	712	#if EV_FEATURE_API
643	# 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)
644	# 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)
645	# define EV_INVOKE_PENDING invoke_cb (EV_A)	715	# define EV_INVOKE_PENDING invoke_cb (EV_A)
646	#else	716	#else
647	# define EV_RELEASE_CB (void)0	717	# define EV_RELEASE_CB (void)0
…		…
701	if (delay > 0.)	771	if (delay > 0.)
702	{	772	{
703	#if EV_USE_NANOSLEEP	773	#if EV_USE_NANOSLEEP
704	struct timespec ts;	774	struct timespec ts;
705		775
706	ts.tv_sec = (time_t)delay;	776	EV_TS_SET (ts, delay);
707	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
708
709	nanosleep (&ts, 0);	777	nanosleep (&ts, 0);
710	#elif defined(_WIN32)	778	#elif defined(_WIN32)
711	Sleep ((unsigned long)(delay * 1e3));	779	Sleep ((unsigned long)(delay * 1e3));
712	#else	780	#else
713	struct timeval tv;	781	struct timeval tv;
714		782
715	tv.tv_sec = (time_t)delay;
716	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
717
718	/* 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 */
719	/* something not guaranteed by newer posix versions, but guaranteed */	784	/* something not guaranteed by newer posix versions, but guaranteed */
720	/* by older ones */	785	/* by older ones */
		786	EV_TS_SET (tv, delay);
721	select (0, 0, 0, 0, &tv);	787	select (0, 0, 0, 0, &tv);
722	#endif	788	#endif
723	}	789	}
724	}	790	}
725		791
726	/*****************************************************************************/	792	/*****************************************************************************/
727		793
728	#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 */
729		795
730	/* find a suitable new size for the given array, */	796	/* find a suitable new size for the given array, */
731	/* hopefully by rounding to a ncie-to-malloc size */	797	/* hopefully by rounding to a nice-to-malloc size */
732	inline_size int	798	inline_size int
733	array_nextsize (int elem, int cur, int cnt)	799	array_nextsize (int elem, int cur, int cnt)
734	{	800	{
735	int ncur = cur + 1;	801	int ncur = cur + 1;
736		802
…		…
832	}	898	}
833		899
834	/*****************************************************************************/	900	/*****************************************************************************/
835		901
836	inline_speed void	902	inline_speed void
837	fd_event_nc (EV_P_ int fd, int revents)	903	fd_event_nocheck (EV_P_ int fd, int revents)
838	{	904	{
839	ANFD *anfd = anfds + fd;	905	ANFD *anfd = anfds + fd;
840	ev_io *w;	906	ev_io *w;
841		907
842	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)
…		…
854	fd_event (EV_P_ int fd, int revents)	920	fd_event (EV_P_ int fd, int revents)
855	{	921	{
856	ANFD *anfd = anfds + fd;	922	ANFD *anfd = anfds + fd;
857		923
858	if (expect_true (!anfd->reify))	924	if (expect_true (!anfd->reify))
859	fd_event_nc (EV_A_ fd, revents);	925	fd_event_nocheck (EV_A_ fd, revents);
860	}	926	}
861		927
862	void	928	void
863	ev_feed_fd_event (EV_P_ int fd, int revents)	929	ev_feed_fd_event (EV_P_ int fd, int revents)
864	{	930	{
865	if (fd >= 0 && fd < anfdmax)	931	if (fd >= 0 && fd < anfdmax)
866	fd_event_nc (EV_A_ fd, revents);	932	fd_event_nocheck (EV_A_ fd, revents);
867	}	933	}
868		934
869	/* make sure the external fd watch events are in-sync */	935	/* make sure the external fd watch events are in-sync */
870	/* with the kernel/libev internal state */	936	/* with the kernel/libev internal state */
871	inline_size void	937	inline_size void
…		…
934	ev_io_stop (EV_A_ w);	1000	ev_io_stop (EV_A_ w);
935	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);
936	}	1002	}
937	}	1003	}
938		1004
939	/* check whether the given fd is atcually valid, for error recovery */	1005	/* check whether the given fd is actually valid, for error recovery */
940	inline_size int	1006	inline_size int
941	fd_valid (int fd)	1007	fd_valid (int fd)
942	{	1008	{
943	#ifdef _WIN32	1009	#ifdef _WIN32
944	return _get_osfhandle (fd) != -1;	1010	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
945	#else	1011	#else
946	return fcntl (fd, F_GETFD) != -1;	1012	return fcntl (fd, F_GETFD) != -1;
947	#endif	1013	#endif
948	}	1014	}
949		1015
…		…
986	anfds [fd].emask = 0;	1052	anfds [fd].emask = 0;
987	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1053	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
988	}	1054	}
989	}	1055	}
990		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
991	/*****************************************************************************/	1071	/*****************************************************************************/
992		1072
993	/*	1073	/*
994	* 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
995	* 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
996	* the branching factor of the d-tree.	1076	* the branching factor of the d-tree.
997	*/	1077	*/
998		1078
999	/*	1079	/*
…		…
1147		1227
1148	static ANSIG signals [EV_NSIG - 1];	1228	static ANSIG signals [EV_NSIG - 1];
1149		1229
1150	/*****************************************************************************/	1230	/*****************************************************************************/
1151		1231
1152	/* used to prepare libev internal fd's */	1232	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1153	/* this is not fork-safe */
1154	inline_speed void
1155	fd_intern (int fd)
1156	{
1157	#ifdef _WIN32
1158	unsigned long arg = 1;
1159	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1160	#else
1161	fcntl (fd, F_SETFD, FD_CLOEXEC);
1162	fcntl (fd, F_SETFL, O_NONBLOCK);
1163	#endif
1164	}
1165		1233
1166	static void noinline	1234	static void noinline
1167	evpipe_init (EV_P)	1235	evpipe_init (EV_P)
1168	{	1236	{
1169	if (!ev_is_active (&pipe_w))	1237	if (!ev_is_active (&pipe_w))
1170	{	1238	{
1171	#if EV_USE_EVENTFD	1239	# if EV_USE_EVENTFD
1172	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1240	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1173	if (evfd < 0 && errno == EINVAL)	1241	if (evfd < 0 && errno == EINVAL)
1174	evfd = eventfd (0, 0);	1242	evfd = eventfd (0, 0);
1175		1243
1176	if (evfd >= 0)	1244	if (evfd >= 0)
…		…
1178	evpipe [0] = -1;	1246	evpipe [0] = -1;
1179	fd_intern (evfd); /* doing it twice doesn't hurt */	1247	fd_intern (evfd); /* doing it twice doesn't hurt */
1180	ev_io_set (&pipe_w, evfd, EV_READ);	1248	ev_io_set (&pipe_w, evfd, EV_READ);
1181	}	1249	}
1182	else	1250	else
1183	#endif	1251	# endif
1184	{	1252	{
1185	while (pipe (evpipe))	1253	while (pipe (evpipe))
1186	ev_syserr ("(libev) error creating signal/async pipe");	1254	ev_syserr ("(libev) error creating signal/async pipe");
1187		1255
1188	fd_intern (evpipe [0]);	1256	fd_intern (evpipe [0]);
…		…
1199	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1267	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1200	{	1268	{
1201	if (!*flag)	1269	if (!*flag)
1202	{	1270	{
1203	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;
1204		1273
1205	*flag = 1;	1274	*flag = 1;
1206		1275
1207	#if EV_USE_EVENTFD	1276	#if EV_USE_EVENTFD
1208	if (evfd >= 0)	1277	if (evfd >= 0)
…		…
1210	uint64_t counter = 1;	1279	uint64_t counter = 1;
1211	write (evfd, &counter, sizeof (uint64_t));	1280	write (evfd, &counter, sizeof (uint64_t));
1212	}	1281	}
1213	else	1282	else
1214	#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. */
1215	write (evpipe [1], &old_errno, 1);	1289	write (evpipe [1], &dummy, 1);
1216		1290
1217	errno = old_errno;	1291	errno = old_errno;
1218	}	1292	}
1219	}	1293	}
1220		1294
…		…
1233	}	1307	}
1234	else	1308	else
1235	#endif	1309	#endif
1236	{	1310	{
1237	char dummy;	1311	char dummy;
		1312	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1238	read (evpipe [0], &dummy, 1);	1313	read (evpipe [0], &dummy, 1);
1239	}	1314	}
1240		1315
1241	if (sig_pending)	1316	if (sig_pending)
1242	{	1317	{
…		…
1269	{	1344	{
1270	#if EV_MULTIPLICITY	1345	#if EV_MULTIPLICITY
1271	EV_P = signals [signum - 1].loop;	1346	EV_P = signals [signum - 1].loop;
1272	#endif	1347	#endif
1273		1348
1274	#if _WIN32	1349	#ifdef _WIN32
1275	signal (signum, ev_sighandler);	1350	signal (signum, ev_sighandler);
1276	#endif	1351	#endif
1277		1352
1278	signals [signum - 1].pending = 1;	1353	signals [signum - 1].pending = 1;
1279	evpipe_write (EV_A_ &sig_pending);	1354	evpipe_write (EV_A_ &sig_pending);
…		…
1321	break;	1396	break;
1322	}	1397	}
1323	}	1398	}
1324	#endif	1399	#endif
1325		1400
		1401	#endif
		1402
1326	/*****************************************************************************/	1403	/*****************************************************************************/
1327		1404
		1405	#if EV_CHILD_ENABLE
1328	static WL childs [EV_PID_HASHSIZE];	1406	static WL childs [EV_PID_HASHSIZE];
1329
1330	#ifndef _WIN32
1331		1407
1332	static ev_signal childev;	1408	static ev_signal childev;
1333		1409
1334	#ifndef WIFCONTINUED	1410	#ifndef WIFCONTINUED
1335	# define WIFCONTINUED(status) 0	1411	# define WIFCONTINUED(status) 0
…		…
1340	child_reap (EV_P_ int chain, int pid, int status)	1416	child_reap (EV_P_ int chain, int pid, int status)
1341	{	1417	{
1342	ev_child *w;	1418	ev_child *w;
1343	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1419	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1344		1420
1345	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)
1346	{	1422	{
1347	if ((w->pid == pid || !w->pid)	1423	if ((w->pid == pid || !w->pid)
1348	&& (!traced || (w->flags & 1)))	1424	&& (!traced || (w->flags & 1)))
1349	{	1425	{
1350	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 */
…		…
1375	/* 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 */
1376	/* 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 */
1377	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1453	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1378		1454
1379	child_reap (EV_A_ pid, pid, status);	1455	child_reap (EV_A_ pid, pid, status);
1380	if (EV_PID_HASHSIZE > 1)	1456	if ((EV_PID_HASHSIZE) > 1)
1381	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 */
1382	}	1458	}
1383		1459
1384	#endif	1460	#endif
1385		1461
…		…
1452	#ifdef __APPLE__	1528	#ifdef __APPLE__
1453	/* only select works correctly on that "unix-certified" platform */	1529	/* only select works correctly on that "unix-certified" platform */
1454	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1530	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1455	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 */
1456	#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
1457		1536
1458	return flags;	1537	return flags;
1459	}	1538	}
1460		1539
1461	unsigned int	1540	unsigned int
…		…
1474	ev_backend (EV_P)	1553	ev_backend (EV_P)
1475	{	1554	{
1476	return backend;	1555	return backend;
1477	}	1556	}
1478		1557
1479	#if EV_MINIMAL < 2	1558	#if EV_FEATURE_API
1480	unsigned int	1559	unsigned int
1481	ev_loop_count (EV_P)	1560	ev_iteration (EV_P)
1482	{	1561	{
1483	return loop_count;	1562	return loop_count;
1484	}	1563	}
1485		1564
1486	unsigned int	1565	unsigned int
1487	ev_loop_depth (EV_P)	1566	ev_depth (EV_P)
1488	{	1567	{
1489	return loop_depth;	1568	return loop_depth;
1490	}	1569	}
1491		1570
1492	void	1571	void
…		…
1564		1643
1565	ev_rt_now = ev_time ();	1644	ev_rt_now = ev_time ();
1566	mn_now = get_clock ();	1645	mn_now = get_clock ();
1567	now_floor = mn_now;	1646	now_floor = mn_now;
1568	rtmn_diff = ev_rt_now - mn_now;	1647	rtmn_diff = ev_rt_now - mn_now;
1569	#if EV_MINIMAL < 2	1648	#if EV_FEATURE_API
1570	invoke_cb = ev_invoke_pending;	1649	invoke_cb = ev_invoke_pending;
1571	#endif	1650	#endif
1572		1651
1573	io_blocktime = 0.;	1652	io_blocktime = 0.;
1574	timeout_blocktime = 0.;	1653	timeout_blocktime = 0.;
…		…
1580	#endif	1659	#endif
1581	#if EV_USE_INOTIFY	1660	#if EV_USE_INOTIFY
1582	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1661	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1583	#endif	1662	#endif
1584	#if EV_USE_SIGNALFD	1663	#if EV_USE_SIGNALFD
1585	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1664	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1586	#endif	1665	#endif
1587		1666
1588	if (!(flags & 0x0000ffffU))	1667	if (!(flags & 0x0000ffffU))
1589	flags |= ev_recommended_backends ();	1668	flags |= ev_recommended_backends ();
1590		1669
…		…
1604	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1683	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1605	#endif	1684	#endif
1606		1685
1607	ev_prepare_init (&pending_w, pendingcb);	1686	ev_prepare_init (&pending_w, pendingcb);
1608		1687
		1688	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1609	ev_init (&pipe_w, pipecb);	1689	ev_init (&pipe_w, pipecb);
1610	ev_set_priority (&pipe_w, EV_MAXPRI);	1690	ev_set_priority (&pipe_w, EV_MAXPRI);
		1691	#endif
1611	}	1692	}
1612	}	1693	}
1613		1694
1614	/* free up a loop structure */	1695	/* free up a loop structure */
1615	static void noinline	1696	static void noinline
…		…
1634	}	1715	}
1635	}	1716	}
1636		1717
1637	#if EV_USE_SIGNALFD	1718	#if EV_USE_SIGNALFD
1638	if (ev_is_active (&sigfd_w))	1719	if (ev_is_active (&sigfd_w))
1639	{
1640	/*ev_ref (EV_A);*/
1641	/*ev_io_stop (EV_A_ &sigfd_w);*/
1642
1643	close (sigfd);	1720	close (sigfd);
1644	}
1645	#endif	1721	#endif
1646		1722
1647	#if EV_USE_INOTIFY	1723	#if EV_USE_INOTIFY
1648	if (fs_fd >= 0)	1724	if (fs_fd >= 0)
1649	close (fs_fd);	1725	close (fs_fd);
…		…
1738	{	1814	{
1739	EV_WIN32_CLOSE_FD (evpipe [0]);	1815	EV_WIN32_CLOSE_FD (evpipe [0]);
1740	EV_WIN32_CLOSE_FD (evpipe [1]);	1816	EV_WIN32_CLOSE_FD (evpipe [1]);
1741	}	1817	}
1742		1818
		1819	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1743	evpipe_init (EV_A);	1820	evpipe_init (EV_A);
1744	/* now iterate over everything, in case we missed something */	1821	/* now iterate over everything, in case we missed something */
1745	pipecb (EV_A_ &pipe_w, EV_READ);	1822	pipecb (EV_A_ &pipe_w, EV_READ);
		1823	#endif
1746	}	1824	}
1747		1825
1748	postfork = 0;	1826	postfork = 0;
1749	}	1827	}
1750		1828
…		…
1812	verify_watcher (EV_A_ ws [cnt]);	1890	verify_watcher (EV_A_ ws [cnt]);
1813	}	1891	}
1814	}	1892	}
1815	#endif	1893	#endif
1816		1894
1817	#if EV_MINIMAL < 2	1895	#if EV_FEATURE_API
1818	void	1896	void
1819	ev_loop_verify (EV_P)	1897	ev_verify (EV_P)
1820	{	1898	{
1821	#if EV_VERIFY	1899	#if EV_VERIFY
1822	int i;	1900	int i;
1823	WL w;	1901	WL w;
1824		1902
…		…
1863	#if EV_ASYNC_ENABLE	1941	#if EV_ASYNC_ENABLE
1864	assert (asyncmax >= asynccnt);	1942	assert (asyncmax >= asynccnt);
1865	array_verify (EV_A_ (W *)asyncs, asynccnt);	1943	array_verify (EV_A_ (W *)asyncs, asynccnt);
1866	#endif	1944	#endif
1867		1945
		1946	#if EV_PREPARE_ENABLE
1868	assert (preparemax >= preparecnt);	1947	assert (preparemax >= preparecnt);
1869	array_verify (EV_A_ (W *)prepares, preparecnt);	1948	array_verify (EV_A_ (W *)prepares, preparecnt);
		1949	#endif
1870		1950
		1951	#if EV_CHECK_ENABLE
1871	assert (checkmax >= checkcnt);	1952	assert (checkmax >= checkcnt);
1872	array_verify (EV_A_ (W *)checks, checkcnt);	1953	array_verify (EV_A_ (W *)checks, checkcnt);
		1954	#endif
1873		1955
1874	# if 0	1956	# if 0
		1957	#if EV_CHILD_ENABLE
1875	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)
1876	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	1959	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1960	#endif
1877	# endif	1961	# endif
1878	#endif	1962	#endif
1879	}	1963	}
1880	#endif	1964	#endif
1881		1965
…		…
1897		1981
1898	loop_init (EV_A_ flags);	1982	loop_init (EV_A_ flags);
1899		1983
1900	if (ev_backend (EV_A))	1984	if (ev_backend (EV_A))
1901	{	1985	{
1902	#ifndef _WIN32	1986	#if EV_CHILD_ENABLE
1903	ev_signal_init (&childev, childcb, SIGCHLD);	1987	ev_signal_init (&childev, childcb, SIGCHLD);
1904	ev_set_priority (&childev, EV_MAXPRI);	1988	ev_set_priority (&childev, EV_MAXPRI);
1905	ev_signal_start (EV_A_ &childev);	1989	ev_signal_start (EV_A_ &childev);
1906	ev_unref (EV_A); /* child watcher should not keep loop alive */	1990	ev_unref (EV_A); /* child watcher should not keep loop alive */
1907	#endif	1991	#endif
…		…
1920	EV_P = ev_default_loop_ptr;	2004	EV_P = ev_default_loop_ptr;
1921	#endif	2005	#endif
1922		2006
1923	ev_default_loop_ptr = 0;	2007	ev_default_loop_ptr = 0;
1924		2008
1925	#ifndef _WIN32	2009	#if EV_CHILD_ENABLE
1926	ev_ref (EV_A); /* child watcher */	2010	ev_ref (EV_A); /* child watcher */
1927	ev_signal_stop (EV_A_ &childev);	2011	ev_signal_stop (EV_A_ &childev);
1928	#endif	2012	#endif
1929		2013
1930	loop_destroy (EV_A);	2014	loop_destroy (EV_A);
…		…
2036	EV_FREQUENT_CHECK;	2120	EV_FREQUENT_CHECK;
2037	feed_reverse (EV_A_ (W)w);	2121	feed_reverse (EV_A_ (W)w);
2038	}	2122	}
2039	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2123	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2040		2124
2041	feed_reverse_done (EV_A_ EV_TIMEOUT);	2125	feed_reverse_done (EV_A_ EV_TIMER);
2042	}	2126	}
2043	}	2127	}
2044		2128
2045	#if EV_PERIODIC_ENABLE	2129	#if EV_PERIODIC_ENABLE
2046	/* make periodics pending */	2130	/* make periodics pending */
…		…
2099	feed_reverse_done (EV_A_ EV_PERIODIC);	2183	feed_reverse_done (EV_A_ EV_PERIODIC);
2100	}	2184	}
2101	}	2185	}
2102		2186
2103	/* simply recalculate all periodics */	2187	/* simply recalculate all periodics */
2104	/* 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? */
2105	static void noinline	2189	static void noinline
2106	periodics_reschedule (EV_P)	2190	periodics_reschedule (EV_P)
2107	{	2191	{
2108	int i;	2192	int i;
2109		2193
…		…
2137	ANHE_at_cache (*he);	2221	ANHE_at_cache (*he);
2138	}	2222	}
2139	}	2223	}
2140		2224
2141	/* fetch new monotonic and realtime times from the kernel */	2225	/* fetch new monotonic and realtime times from the kernel */
2142	/* also detetc if there was a timejump, and act accordingly */	2226	/* also detect if there was a timejump, and act accordingly */
2143	inline_speed void	2227	inline_speed void
2144	time_update (EV_P_ ev_tstamp max_block)	2228	time_update (EV_P_ ev_tstamp max_block)
2145	{	2229	{
2146	#if EV_USE_MONOTONIC	2230	#if EV_USE_MONOTONIC
2147	if (expect_true (have_monotonic))	2231	if (expect_true (have_monotonic))
…		…
2207	}	2291	}
2208		2292
2209	void	2293	void
2210	ev_loop (EV_P_ int flags)	2294	ev_loop (EV_P_ int flags)
2211	{	2295	{
2212	#if EV_MINIMAL < 2	2296	#if EV_FEATURE_API
2213	++loop_depth;	2297	++loop_depth;
2214	#endif	2298	#endif
2215		2299
2216	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));
2217		2301
…		…
2220	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 */
2221		2305
2222	do	2306	do
2223	{	2307	{
2224	#if EV_VERIFY >= 2	2308	#if EV_VERIFY >= 2
2225	ev_loop_verify (EV_A);	2309	ev_verify (EV_A);
2226	#endif	2310	#endif
2227		2311
2228	#ifndef _WIN32	2312	#ifndef _WIN32
2229	if (expect_false (curpid)) /* penalise the forking check even more */	2313	if (expect_false (curpid)) /* penalise the forking check even more */
2230	if (expect_false (getpid () != curpid))	2314	if (expect_false (getpid () != curpid))
…		…
2242	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2326	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2243	EV_INVOKE_PENDING;	2327	EV_INVOKE_PENDING;
2244	}	2328	}
2245	#endif	2329	#endif
2246		2330
		2331	#if EV_PREPARE_ENABLE
2247	/* queue prepare watchers (and execute them) */	2332	/* queue prepare watchers (and execute them) */
2248	if (expect_false (preparecnt))	2333	if (expect_false (preparecnt))
2249	{	2334	{
2250	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2335	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2251	EV_INVOKE_PENDING;	2336	EV_INVOKE_PENDING;
2252	}	2337	}
		2338	#endif
2253		2339
2254	if (expect_false (loop_done))	2340	if (expect_false (loop_done))
2255	break;	2341	break;
2256		2342
2257	/* we might have forked, so reify kernel state if necessary */	2343	/* we might have forked, so reify kernel state if necessary */
…		…
2308	waittime -= sleeptime;	2394	waittime -= sleeptime;
2309	}	2395	}
2310	}	2396	}
2311	}	2397	}
2312		2398
2313	#if EV_MINIMAL < 2	2399	#if EV_FEATURE_API
2314	++loop_count;	2400	++loop_count;
2315	#endif	2401	#endif
2316	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2402	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */
2317	backend_poll (EV_A_ waittime);	2403	backend_poll (EV_A_ waittime);
2318	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2404	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */
…		…
2330	#if EV_IDLE_ENABLE	2416	#if EV_IDLE_ENABLE
2331	/* queue idle watchers unless other events are pending */	2417	/* queue idle watchers unless other events are pending */
2332	idle_reify (EV_A);	2418	idle_reify (EV_A);
2333	#endif	2419	#endif
2334		2420
		2421	#if EV_CHECK_ENABLE
2335	/* queue check watchers, to be executed first */	2422	/* queue check watchers, to be executed first */
2336	if (expect_false (checkcnt))	2423	if (expect_false (checkcnt))
2337	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2424	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2425	#endif
2338		2426
2339	EV_INVOKE_PENDING;	2427	EV_INVOKE_PENDING;
2340	}	2428	}
2341	while (expect_true (	2429	while (expect_true (
2342	activecnt	2430	activecnt
…		…
2345	));	2433	));
2346		2434
2347	if (loop_done == EVUNLOOP_ONE)	2435	if (loop_done == EVUNLOOP_ONE)
2348	loop_done = EVUNLOOP_CANCEL;	2436	loop_done = EVUNLOOP_CANCEL;
2349		2437
2350	#if EV_MINIMAL < 2	2438	#if EV_FEATURE_API
2351	--loop_depth;	2439	--loop_depth;
2352	#endif	2440	#endif
2353	}	2441	}
2354		2442
2355	void	2443	void
…		…
2481		2569
2482	if (expect_false (ev_is_active (w)))	2570	if (expect_false (ev_is_active (w)))
2483	return;	2571	return;
2484		2572
2485	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2573	assert (("libev: ev_io_start called with negative fd", fd >= 0));
2486	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))));
2487		2575
2488	EV_FREQUENT_CHECK;	2576	EV_FREQUENT_CHECK;
2489		2577
2490	ev_start (EV_A_ (W)w, 1);	2578	ev_start (EV_A_ (W)w, 1);
2491	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2579	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2561	timers [active] = timers [timercnt + HEAP0];	2649	timers [active] = timers [timercnt + HEAP0];
2562	adjustheap (timers, timercnt, active);	2650	adjustheap (timers, timercnt, active);
2563	}	2651	}
2564	}	2652	}
2565		2653
2566	EV_FREQUENT_CHECK;
2567
2568	ev_at (w) -= mn_now;	2654	ev_at (w) -= mn_now;
2569		2655
2570	ev_stop (EV_A_ (W)w);	2656	ev_stop (EV_A_ (W)w);
		2657
		2658	EV_FREQUENT_CHECK;
2571	}	2659	}
2572		2660
2573	void noinline	2661	void noinline
2574	ev_timer_again (EV_P_ ev_timer *w)	2662	ev_timer_again (EV_P_ ev_timer *w)
2575	{	2663	{
…		…
2654	periodics [active] = periodics [periodiccnt + HEAP0];	2742	periodics [active] = periodics [periodiccnt + HEAP0];
2655	adjustheap (periodics, periodiccnt, active);	2743	adjustheap (periodics, periodiccnt, active);
2656	}	2744	}
2657	}	2745	}
2658		2746
2659	EV_FREQUENT_CHECK;
2660
2661	ev_stop (EV_A_ (W)w);	2747	ev_stop (EV_A_ (W)w);
		2748
		2749	EV_FREQUENT_CHECK;
2662	}	2750	}
2663		2751
2664	void noinline	2752	void noinline
2665	ev_periodic_again (EV_P_ ev_periodic *w)	2753	ev_periodic_again (EV_P_ ev_periodic *w)
2666	{	2754	{
…		…
2671	#endif	2759	#endif
2672		2760
2673	#ifndef SA_RESTART	2761	#ifndef SA_RESTART
2674	# define SA_RESTART 0	2762	# define SA_RESTART 0
2675	#endif	2763	#endif
		2764
		2765	#if EV_SIGNAL_ENABLE
2676		2766
2677	void noinline	2767	void noinline
2678	ev_signal_start (EV_P_ ev_signal *w)	2768	ev_signal_start (EV_P_ ev_signal *w)
2679	{	2769	{
2680	if (expect_false (ev_is_active (w)))	2770	if (expect_false (ev_is_active (w)))
…		…
2727	if (!((WL)w)->next)	2817	if (!((WL)w)->next)
2728	# if EV_USE_SIGNALFD	2818	# if EV_USE_SIGNALFD
2729	if (sigfd < 0) /*TODO*/	2819	if (sigfd < 0) /*TODO*/
2730	# endif	2820	# endif
2731	{	2821	{
2732	# if _WIN32	2822	# ifdef _WIN32
		2823	evpipe_init (EV_A);
		2824
2733	signal (w->signum, ev_sighandler);	2825	signal (w->signum, ev_sighandler);
2734	# else	2826	# else
2735	struct sigaction sa;	2827	struct sigaction sa;
2736		2828
2737	evpipe_init (EV_A);	2829	evpipe_init (EV_A);
…		…
2768	signals [w->signum - 1].loop = 0; /* unattach from signal */	2860	signals [w->signum - 1].loop = 0; /* unattach from signal */
2769	#endif	2861	#endif
2770	#if EV_USE_SIGNALFD	2862	#if EV_USE_SIGNALFD
2771	if (sigfd >= 0)	2863	if (sigfd >= 0)
2772	{	2864	{
2773	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2865	sigset_t ss;
		2866
		2867	sigemptyset (&ss);
		2868	sigaddset (&ss, w->signum);
2774	sigdelset (&sigfd_set, w->signum);	2869	sigdelset (&sigfd_set, w->signum);
		2870
2775	signalfd (sigfd, &sigfd_set, 0);	2871	signalfd (sigfd, &sigfd_set, 0);
2776	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2872	sigprocmask (SIG_UNBLOCK, &ss, 0);
2777	/*TODO: maybe unblock signal? */
2778	}	2873	}
2779	else	2874	else
2780	#endif	2875	#endif
2781	signal (w->signum, SIG_DFL);	2876	signal (w->signum, SIG_DFL);
2782	}	2877	}
2783		2878
2784	EV_FREQUENT_CHECK;	2879	EV_FREQUENT_CHECK;
2785	}	2880	}
2786		2881
		2882	#endif
		2883
		2884	#if EV_CHILD_ENABLE
		2885
2787	void	2886	void
2788	ev_child_start (EV_P_ ev_child *w)	2887	ev_child_start (EV_P_ ev_child *w)
2789	{	2888	{
2790	#if EV_MULTIPLICITY	2889	#if EV_MULTIPLICITY
2791	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));
…		…
2794	return;	2893	return;
2795		2894
2796	EV_FREQUENT_CHECK;	2895	EV_FREQUENT_CHECK;
2797		2896
2798	ev_start (EV_A_ (W)w, 1);	2897	ev_start (EV_A_ (W)w, 1);
2799	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2898	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2800		2899
2801	EV_FREQUENT_CHECK;	2900	EV_FREQUENT_CHECK;
2802	}	2901	}
2803		2902
2804	void	2903	void
…		…
2808	if (expect_false (!ev_is_active (w)))	2907	if (expect_false (!ev_is_active (w)))
2809	return;	2908	return;
2810		2909
2811	EV_FREQUENT_CHECK;	2910	EV_FREQUENT_CHECK;
2812		2911
2813	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2912	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2814	ev_stop (EV_A_ (W)w);	2913	ev_stop (EV_A_ (W)w);
2815		2914
2816	EV_FREQUENT_CHECK;	2915	EV_FREQUENT_CHECK;
2817	}	2916	}
		2917
		2918	#endif
2818		2919
2819	#if EV_STAT_ENABLE	2920	#if EV_STAT_ENABLE
2820		2921
2821	# ifdef _WIN32	2922	# ifdef _WIN32
2822	# undef lstat	2923	# undef lstat
…		…
2828	#define MIN_STAT_INTERVAL 0.1074891	2929	#define MIN_STAT_INTERVAL 0.1074891
2829		2930
2830	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);
2831		2932
2832	#if EV_USE_INOTIFY	2933	#if EV_USE_INOTIFY
2833	# 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)
2834		2937
2835	static void noinline	2938	static void noinline
2836	infy_add (EV_P_ ev_stat *w)	2939	infy_add (EV_P_ ev_stat *w)
2837	{	2940	{
2838	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);
2839		2942
2840	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 */
2841	{	2963	}
		2964	else
		2965	{
		2966	/* can't use inotify, continue to stat */
2842	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	2967	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
2843	ev_timer_again (EV_A_ &w->timer); /* this is not race-free, so we still need to recheck periodically */
2844		2968
2845	/* monitor some parent directory for speedup hints */	2969	/* if path is not there, monitor some parent directory for speedup hints */
2846	/* 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, */
2847	/* but an efficiency issue only */	2971	/* but an efficiency issue only */
2848	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)	2972	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)
2849	{	2973	{
2850	char path [4096];	2974	char path [4096];
…		…
2866	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	2990	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2867	}	2991	}
2868	}	2992	}
2869		2993
2870	if (w->wd >= 0)	2994	if (w->wd >= 0)
2871	{
2872	struct statfs sfs;
2873
2874	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);
2875		2996
2876	/* now local changes will be tracked by inotify, but remote changes won't */	2997	/* now re-arm timer, if required */
2877	/* unless the filesystem it known to be local, we therefore still poll */	2998	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2878	/* also do poll on <2.6.25, but with normal frequency */
2879
2880	if (fs_2625 && !statfs (w->path, &sfs))
2881	if (sfs.f_type == 0x1373 /* devfs */
2882	|| sfs.f_type == 0xEF53 /* ext2/3 */
2883	|| sfs.f_type == 0x3153464a /* jfs */
2884	|| sfs.f_type == 0x52654973 /* reiser3 */
2885	|| sfs.f_type == 0x01021994 /* tempfs */
2886	|| sfs.f_type == 0x58465342 /* xfs */)
2887	return;
2888
2889	w->timer.repeat = w->interval ? w->interval : fs_2625 ? NFS_STAT_INTERVAL : DEF_STAT_INTERVAL;
2890	ev_timer_again (EV_A_ &w->timer);	2999	ev_timer_again (EV_A_ &w->timer);
2891	}	3000	if (ev_is_active (&w->timer)) ev_unref (EV_A);
2892	}	3001	}
2893		3002
2894	static void noinline	3003	static void noinline
2895	infy_del (EV_P_ ev_stat *w)	3004	infy_del (EV_P_ ev_stat *w)
2896	{	3005	{
…		…
2899		3008
2900	if (wd < 0)	3009	if (wd < 0)
2901	return;	3010	return;
2902		3011
2903	w->wd = -2;	3012	w->wd = -2;
2904	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3013	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2905	wlist_del (&fs_hash [slot].head, (WL)w);	3014	wlist_del (&fs_hash [slot].head, (WL)w);
2906		3015
2907	/* remove this watcher, if others are watching it, they will rearm */	3016	/* remove this watcher, if others are watching it, they will rearm */
2908	inotify_rm_watch (fs_fd, wd);	3017	inotify_rm_watch (fs_fd, wd);
2909	}	3018	}
…		…
2911	static void noinline	3020	static void noinline
2912	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)
2913	{	3022	{
2914	if (slot < 0)	3023	if (slot < 0)
2915	/* overflow, need to check for all hash slots */	3024	/* overflow, need to check for all hash slots */
2916	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3025	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2917	infy_wd (EV_A_ slot, wd, ev);	3026	infy_wd (EV_A_ slot, wd, ev);
2918	else	3027	else
2919	{	3028	{
2920	WL w_;	3029	WL w_;
2921		3030
2922	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3031	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2923	{	3032	{
2924	ev_stat *w = (ev_stat *)w_;	3033	ev_stat *w = (ev_stat *)w_;
2925	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 */
2926		3035
2927	if (w->wd == wd || wd == -1)	3036	if (w->wd == wd || wd == -1)
2928	{	3037	{
2929	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3038	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2930	{	3039	{
2931	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);
2932	w->wd = -1;	3041	w->wd = -1;
2933	infy_add (EV_A_ w); /* re-add, no matter what */	3042	infy_add (EV_A_ w); /* re-add, no matter what */
2934	}	3043	}
2935		3044
2936	stat_timer_cb (EV_A_ &w->timer, 0);	3045	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2941		3050
2942	static void	3051	static void
2943	infy_cb (EV_P_ ev_io *w, int revents)	3052	infy_cb (EV_P_ ev_io *w, int revents)
2944	{	3053	{
2945	char buf [EV_INOTIFY_BUFSIZE];	3054	char buf [EV_INOTIFY_BUFSIZE];
2946	struct inotify_event *ev = (struct inotify_event *)buf;
2947	int ofs;	3055	int ofs;
2948	int len = read (fs_fd, buf, sizeof (buf));	3056	int len = read (fs_fd, buf, sizeof (buf));
2949		3057
2950	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);
2951	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;
2952	}	3096	}
2953		3097
2954	inline_size void	3098	inline_size void
2955	check_2625 (EV_P)	3099	ev_check_2625 (EV_P)
2956	{	3100	{
2957	/* kernels < 2.6.25 are borked	3101	/* kernels < 2.6.25 are borked
2958	* 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
2959	*/	3103	*/
2960	struct utsname buf;	3104	if (ev_linux_version () < 0x020619)
2961	int major, minor, micro;
2962
2963	if (uname (&buf))
2964	return;	3105	return;
2965		3106
2966	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2967	return;
2968
2969	if (major < 2
2970	|| (major == 2 && minor < 6)
2971	|| (major == 2 && minor == 6 && micro < 25))
2972	return;
2973
2974	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 ();
2975	}	3119	}
2976		3120
2977	inline_size void	3121	inline_size void
2978	infy_init (EV_P)	3122	infy_init (EV_P)
2979	{	3123	{
2980	if (fs_fd != -2)	3124	if (fs_fd != -2)
2981	return;	3125	return;
2982		3126
2983	fs_fd = -1;	3127	fs_fd = -1;
2984		3128
2985	check_2625 (EV_A);	3129	ev_check_2625 (EV_A);
2986		3130
2987	fs_fd = inotify_init ();	3131	fs_fd = infy_newfd ();
2988		3132
2989	if (fs_fd >= 0)	3133	if (fs_fd >= 0)
2990	{	3134	{
		3135	fd_intern (fs_fd);
2991	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);	3136	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);
2992	ev_set_priority (&fs_w, EV_MAXPRI);	3137	ev_set_priority (&fs_w, EV_MAXPRI);
2993	ev_io_start (EV_A_ &fs_w);	3138	ev_io_start (EV_A_ &fs_w);
		3139	ev_unref (EV_A);
2994	}	3140	}
2995	}	3141	}
2996		3142
2997	inline_size void	3143	inline_size void
2998	infy_fork (EV_P)	3144	infy_fork (EV_P)
…		…
3000	int slot;	3146	int slot;
3001		3147
3002	if (fs_fd < 0)	3148	if (fs_fd < 0)
3003	return;	3149	return;
3004		3150
		3151	ev_ref (EV_A);
		3152	ev_io_stop (EV_A_ &fs_w);
3005	close (fs_fd);	3153	close (fs_fd);
3006	fs_fd = inotify_init ();	3154	fs_fd = infy_newfd ();
3007		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
3008	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3164	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3009	{	3165	{
3010	WL w_ = fs_hash [slot].head;	3166	WL w_ = fs_hash [slot].head;
3011	fs_hash [slot].head = 0;	3167	fs_hash [slot].head = 0;
3012		3168
3013	while (w_)	3169	while (w_)
…		…
3018	w->wd = -1;	3174	w->wd = -1;
3019		3175
3020	if (fs_fd >= 0)	3176	if (fs_fd >= 0)
3021	infy_add (EV_A_ w); /* re-add, no matter what */	3177	infy_add (EV_A_ w); /* re-add, no matter what */
3022	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);
3023	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	}
3024	}	3185	}
3025	}	3186	}
3026	}	3187	}
3027		3188
3028	#endif	3189	#endif
…		…
3045	static void noinline	3206	static void noinline
3046	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3207	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3047	{	3208	{
3048	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));	3209	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
3049		3210
3050	/* we copy this here each the time so that */	3211	ev_statdata prev = w->attr;
3051	/* prev has the old value when the callback gets invoked */
3052	w->prev = w->attr;
3053	ev_stat_stat (EV_A_ w);	3212	ev_stat_stat (EV_A_ w);
3054		3213
3055	/* 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 */
3056	if (	3215	if (
3057	w->prev.st_dev != w->attr.st_dev	3216	prev.st_dev != w->attr.st_dev
3058	|| w->prev.st_ino != w->attr.st_ino	3217	|| prev.st_ino != w->attr.st_ino
3059	|| w->prev.st_mode != w->attr.st_mode	3218	|| prev.st_mode != w->attr.st_mode
3060	|| w->prev.st_nlink != w->attr.st_nlink	3219	|| prev.st_nlink != w->attr.st_nlink
3061	|| w->prev.st_uid != w->attr.st_uid	3220	|| prev.st_uid != w->attr.st_uid
3062	|| w->prev.st_gid != w->attr.st_gid	3221	|| prev.st_gid != w->attr.st_gid
3063	|| w->prev.st_rdev != w->attr.st_rdev	3222	|| prev.st_rdev != w->attr.st_rdev
3064	|| w->prev.st_size != w->attr.st_size	3223	|| prev.st_size != w->attr.st_size
3065	|| w->prev.st_atime != w->attr.st_atime	3224	|| prev.st_atime != w->attr.st_atime
3066	|| w->prev.st_mtime != w->attr.st_mtime	3225	|| prev.st_mtime != w->attr.st_mtime
3067	|| w->prev.st_ctime != w->attr.st_ctime	3226	|| prev.st_ctime != w->attr.st_ctime
3068	) {	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
3069	#if EV_USE_INOTIFY	3233	#if EV_USE_INOTIFY
3070	if (fs_fd >= 0)	3234	if (fs_fd >= 0)
3071	{	3235	{
3072	infy_del (EV_A_ w);	3236	infy_del (EV_A_ w);
3073	infy_add (EV_A_ w);	3237	infy_add (EV_A_ w);
…		…
3098		3262
3099	if (fs_fd >= 0)	3263	if (fs_fd >= 0)
3100	infy_add (EV_A_ w);	3264	infy_add (EV_A_ w);
3101	else	3265	else
3102	#endif	3266	#endif
		3267	{
3103	ev_timer_again (EV_A_ &w->timer);	3268	ev_timer_again (EV_A_ &w->timer);
		3269	ev_unref (EV_A);
		3270	}
3104		3271
3105	ev_start (EV_A_ (W)w, 1);	3272	ev_start (EV_A_ (W)w, 1);
3106		3273
3107	EV_FREQUENT_CHECK;	3274	EV_FREQUENT_CHECK;
3108	}	3275	}
…		…
3117	EV_FREQUENT_CHECK;	3284	EV_FREQUENT_CHECK;
3118		3285
3119	#if EV_USE_INOTIFY	3286	#if EV_USE_INOTIFY
3120	infy_del (EV_A_ w);	3287	infy_del (EV_A_ w);
3121	#endif	3288	#endif
		3289
		3290	if (ev_is_active (&w->timer))
		3291	{
		3292	ev_ref (EV_A);
3122	ev_timer_stop (EV_A_ &w->timer);	3293	ev_timer_stop (EV_A_ &w->timer);
		3294	}
3123		3295
3124	ev_stop (EV_A_ (W)w);	3296	ev_stop (EV_A_ (W)w);
3125		3297
3126	EV_FREQUENT_CHECK;	3298	EV_FREQUENT_CHECK;
3127	}	3299	}
…		…
3172		3344
3173	EV_FREQUENT_CHECK;	3345	EV_FREQUENT_CHECK;
3174	}	3346	}
3175	#endif	3347	#endif
3176		3348
		3349	#if EV_PREPARE_ENABLE
3177	void	3350	void
3178	ev_prepare_start (EV_P_ ev_prepare *w)	3351	ev_prepare_start (EV_P_ ev_prepare *w)
3179	{	3352	{
3180	if (expect_false (ev_is_active (w)))	3353	if (expect_false (ev_is_active (w)))
3181	return;	3354	return;
…		…
3207		3380
3208	ev_stop (EV_A_ (W)w);	3381	ev_stop (EV_A_ (W)w);
3209		3382
3210	EV_FREQUENT_CHECK;	3383	EV_FREQUENT_CHECK;
3211	}	3384	}
		3385	#endif
3212		3386
		3387	#if EV_CHECK_ENABLE
3213	void	3388	void
3214	ev_check_start (EV_P_ ev_check *w)	3389	ev_check_start (EV_P_ ev_check *w)
3215	{	3390	{
3216	if (expect_false (ev_is_active (w)))	3391	if (expect_false (ev_is_active (w)))
3217	return;	3392	return;
…		…
3243		3418
3244	ev_stop (EV_A_ (W)w);	3419	ev_stop (EV_A_ (W)w);
3245		3420
3246	EV_FREQUENT_CHECK;	3421	EV_FREQUENT_CHECK;
3247	}	3422	}
		3423	#endif
3248		3424
3249	#if EV_EMBED_ENABLE	3425	#if EV_EMBED_ENABLE
3250	void noinline	3426	void noinline
3251	ev_embed_sweep (EV_P_ ev_embed *w)	3427	ev_embed_sweep (EV_P_ ev_embed *w)
3252	{	3428	{
…		…
3347		3523
3348	ev_io_stop (EV_A_ &w->io);	3524	ev_io_stop (EV_A_ &w->io);
3349	ev_prepare_stop (EV_A_ &w->prepare);	3525	ev_prepare_stop (EV_A_ &w->prepare);
3350	ev_fork_stop (EV_A_ &w->fork);	3526	ev_fork_stop (EV_A_ &w->fork);
3351		3527
		3528	ev_stop (EV_A_ (W)w);
		3529
3352	EV_FREQUENT_CHECK;	3530	EV_FREQUENT_CHECK;
3353	}	3531	}
3354	#endif	3532	#endif
3355		3533
3356	#if EV_FORK_ENABLE	3534	#if EV_FORK_ENABLE
…		…
3482	{	3660	{
3483	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));
3484		3662
3485	if (expect_false (!once))	3663	if (expect_false (!once))
3486	{	3664	{
3487	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3665	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3488	return;	3666	return;
3489	}	3667	}
3490		3668
3491	once->cb = cb;	3669	once->cb = cb;
3492	once->arg = arg;	3670	once->arg = arg;
…		…
3579	if (types & EV_ASYNC)	3757	if (types & EV_ASYNC)
3580	for (i = asynccnt; i--; )	3758	for (i = asynccnt; i--; )
3581	cb (EV_A_ EV_ASYNC, asyncs [i]);	3759	cb (EV_A_ EV_ASYNC, asyncs [i]);
3582	#endif	3760	#endif
3583		3761
		3762	#if EV_PREPARE_ENABLE
3584	if (types & EV_PREPARE)	3763	if (types & EV_PREPARE)
3585	for (i = preparecnt; i--; )	3764	for (i = preparecnt; i--; )
3586	#if EV_EMBED_ENABLE	3765	# if EV_EMBED_ENABLE
3587	if (ev_cb (prepares [i]) != embed_prepare_cb)	3766	if (ev_cb (prepares [i]) != embed_prepare_cb)
3588	#endif	3767	# endif
3589	cb (EV_A_ EV_PREPARE, prepares [i]);	3768	cb (EV_A_ EV_PREPARE, prepares [i]);
		3769	#endif
3590		3770
		3771	#if EV_CHECK_ENABLE
3591	if (types & EV_CHECK)	3772	if (types & EV_CHECK)
3592	for (i = checkcnt; i--; )	3773	for (i = checkcnt; i--; )
3593	cb (EV_A_ EV_CHECK, checks [i]);	3774	cb (EV_A_ EV_CHECK, checks [i]);
		3775	#endif
3594		3776
		3777	#if EV_SIGNAL_ENABLE
3595	if (types & EV_SIGNAL)	3778	if (types & EV_SIGNAL)
3596	for (i = 0; i < EV_NSIG - 1; ++i)	3779	for (i = 0; i < EV_NSIG - 1; ++i)
3597	for (wl = signals [i].head; wl; )	3780	for (wl = signals [i].head; wl; )
3598	{	3781	{
3599	wn = wl->next;	3782	wn = wl->next;
3600	cb (EV_A_ EV_SIGNAL, wl);	3783	cb (EV_A_ EV_SIGNAL, wl);
3601	wl = wn;	3784	wl = wn;
3602	}	3785	}
		3786	#endif
3603		3787
		3788	#if EV_CHILD_ENABLE
3604	if (types & EV_CHILD)	3789	if (types & EV_CHILD)
3605	for (i = EV_PID_HASHSIZE; i--; )	3790	for (i = (EV_PID_HASHSIZE); i--; )
3606	for (wl = childs [i]; wl; )	3791	for (wl = childs [i]; wl; )
3607	{	3792	{
3608	wn = wl->next;	3793	wn = wl->next;
3609	cb (EV_A_ EV_CHILD, wl);	3794	cb (EV_A_ EV_CHILD, wl);
3610	wl = wn;	3795	wl = wn;
3611	}	3796	}
		3797	#endif
3612	/* EV_STAT 0x00001000 /* stat data changed */	3798	/* EV_STAT 0x00001000 /* stat data changed */
3613	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3799	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3614	}	3800	}
3615	#endif	3801	#endif
3616		3802

Diff Legend

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