[ViewVC] Diff of: cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.315 by root, Wed Aug 26 17:46:22 2009 UTC vs.
Revision 1.350 by root, Sat Oct 16 00:59:56 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__ >= 7))	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
…		…
429	# ifdef __cplusplus	448	# ifdef __cplusplus
430	}	449	}
431	# endif	450	# endif
432	#endif	451	#endif
433		452
434
435	/**/	453	/**/
436		454
437	#if EV_VERIFY >= 3	455	#if EV_VERIFY >= 3
438	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	456	# define EV_FREQUENT_CHECK ev_verify (EV_A)
439	#else	457	#else
440	# define EV_FREQUENT_CHECK do { } while (0)	458	# define EV_FREQUENT_CHECK do { } while (0)
441	#endif	459	#endif
442		460
443	/*	461	/*
…		…
450	*/	468	*/
451	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	469	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
452		470
453	#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) */
454	#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) */
455	/#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)
456		476
457	#if __GNUC__ >= 4	477	#if __GNUC__ >= 4
458	# define expect(expr,value) __builtin_expect ((expr),(value))	478	# define expect(expr,value) __builtin_expect ((expr),(value))
459	# define noinline __attribute__ ((noinline))	479	# define noinline __attribute__ ((noinline))
460	#else	480	#else
…		…
467		487
468	#define expect_false(expr) expect ((expr) != 0, 0)	488	#define expect_false(expr) expect ((expr) != 0, 0)
469	#define expect_true(expr) expect ((expr) != 0, 1)	489	#define expect_true(expr) expect ((expr) != 0, 1)
470	#define inline_size static inline	490	#define inline_size static inline
471		491
472	#if EV_MINIMAL	492	#if EV_FEATURE_CODE
		493	# define inline_speed static inline
		494	#else
473	# define inline_speed static noinline	495	# define inline_speed static noinline
474	#else
475	# define inline_speed static inline
476	#endif	496	#endif
477		497
478	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	498	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
479		499
480	#if EV_MINPRI == EV_MAXPRI	500	#if EV_MINPRI == EV_MAXPRI
…		…
493	#define ev_active(w) ((W)(w))->active	513	#define ev_active(w) ((W)(w))->active
494	#define ev_at(w) ((WT)(w))->at	514	#define ev_at(w) ((WT)(w))->at
495		515
496	#if EV_USE_REALTIME	516	#if EV_USE_REALTIME
497	/* 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 */
498	/* giving it a reasonably high chance of working on typical architetcures */	518	/* giving it a reasonably high chance of working on typical architectures */
499	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? */
500	#endif	520	#endif
501		521
502	#if EV_USE_MONOTONIC	522	#if EV_USE_MONOTONIC
503	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? */
…		…
505		525
506	#ifndef EV_FD_TO_WIN32_HANDLE	526	#ifndef EV_FD_TO_WIN32_HANDLE
507	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)	527	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
508	#endif	528	#endif
509	#ifndef EV_WIN32_HANDLE_TO_FD	529	#ifndef EV_WIN32_HANDLE_TO_FD
510	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (fd, 0)	530	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
511	#endif	531	#endif
512	#ifndef EV_WIN32_CLOSE_FD	532	#ifndef EV_WIN32_CLOSE_FD
513	# define EV_WIN32_CLOSE_FD(fd) close (fd)	533	# define EV_WIN32_CLOSE_FD(fd) close (fd)
514	#endif	534	#endif
515		535
516	#ifdef _WIN32	536	#ifdef _WIN32
517	# include "ev_win32.c"	537	# include "ev_win32.c"
518	#endif	538	#endif
519		539
520	/*****************************************************************************/	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
521		549
522	static void (syserr_cb)(const char msg);	550	static void (syserr_cb)(const char msg);
523		551
524	void	552	void
525	ev_set_syserr_cb (void (cb)(const char msg))	553	ev_set_syserr_cb (void (cb)(const char msg))
…		…
535		563
536	if (syserr_cb)	564	if (syserr_cb)
537	syserr_cb (msg);	565	syserr_cb (msg);
538	else	566	else
539	{	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
540	perror (msg);	576	perror (msg);
		577	#endif
541	abort ();	578	abort ();
542	}	579	}
543	}	580	}
544		581
545	static void *	582	static void *
546	ev_realloc_emul (void *ptr, long size)	583	ev_realloc_emul (void *ptr, long size)
547	{	584	{
		585	#if __GLIBC__
		586	return realloc (ptr, size);
		587	#else
548	/* some systems, notably openbsd and darwin, fail to properly	588	/* some systems, notably openbsd and darwin, fail to properly
549	* 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
550	* the single unix specification, so work around them here.	590	* the single unix specification, so work around them here.
551	*/	591	*/
552		592
553	if (size)	593	if (size)
554	return realloc (ptr, size);	594	return realloc (ptr, size);
555		595
556	free (ptr);	596	free (ptr);
557	return 0;	597	return 0;
		598	#endif
558	}	599	}
559		600
560	static void (alloc)(void *ptr, long size) = ev_realloc_emul;	601	static void (alloc)(void *ptr, long size) = ev_realloc_emul;
561		602
562	void	603	void
…		…
570	{	611	{
571	ptr = alloc (ptr, size);	612	ptr = alloc (ptr, size);
572		613
573	if (!ptr && size)	614	if (!ptr && size)
574	{	615	{
		616	#if EV_AVOID_STDIO
		617	ev_printerr ("libev: memory allocation failed, aborting.\n");
		618	#else
575	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	619	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		620	#endif
576	abort ();	621	abort ();
577	}	622	}
578		623
579	return ptr;	624	return ptr;
580	}	625	}
…		…
662		707
663	static int ev_default_loop_ptr;	708	static int ev_default_loop_ptr;
664		709
665	#endif	710	#endif
666		711
667	#if EV_MINIMAL < 2	712	#if EV_FEATURE_API
668	# 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)
669	# 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)
670	# define EV_INVOKE_PENDING invoke_cb (EV_A)	715	# define EV_INVOKE_PENDING invoke_cb (EV_A)
671	#else	716	#else
672	# define EV_RELEASE_CB (void)0	717	# define EV_RELEASE_CB (void)0
…		…
726	if (delay > 0.)	771	if (delay > 0.)
727	{	772	{
728	#if EV_USE_NANOSLEEP	773	#if EV_USE_NANOSLEEP
729	struct timespec ts;	774	struct timespec ts;
730		775
731	ts.tv_sec = (time_t)delay;	776	EV_TS_SET (ts, delay);
732	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
733
734	nanosleep (&ts, 0);	777	nanosleep (&ts, 0);
735	#elif defined(_WIN32)	778	#elif defined(_WIN32)
736	Sleep ((unsigned long)(delay * 1e3));	779	Sleep ((unsigned long)(delay * 1e3));
737	#else	780	#else
738	struct timeval tv;	781	struct timeval tv;
739		782
740	tv.tv_sec = (time_t)delay;
741	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
742
743	/* 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 */
744	/* something not guaranteed by newer posix versions, but guaranteed */	784	/* something not guaranteed by newer posix versions, but guaranteed */
745	/* by older ones */	785	/* by older ones */
		786	EV_TV_SET (tv, delay);
746	select (0, 0, 0, 0, &tv);	787	select (0, 0, 0, 0, &tv);
747	#endif	788	#endif
748	}	789	}
749	}	790	}
750		791
751	/*****************************************************************************/	792	/*****************************************************************************/
752		793
753	#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 /
754		795
755	/* find a suitable new size for the given array, */	796	/* find a suitable new size for the given array, */
756	/* hopefully by rounding to a ncie-to-malloc size */	797	/* hopefully by rounding to a nice-to-malloc size */
757	inline_size int	798	inline_size int
758	array_nextsize (int elem, int cur, int cnt)	799	array_nextsize (int elem, int cur, int cnt)
759	{	800	{
760	int ncur = cur + 1;	801	int ncur = cur + 1;
761		802
…		…
857	}	898	}
858		899
859	/*****************************************************************************/	900	/*****************************************************************************/
860		901
861	inline_speed void	902	inline_speed void
862	fd_event_nc (EV_P_ int fd, int revents)	903	fd_event_nocheck (EV_P_ int fd, int revents)
863	{	904	{
864	ANFD *anfd = anfds + fd;	905	ANFD *anfd = anfds + fd;
865	ev_io *w;	906	ev_io *w;
866		907
867	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)
…		…
879	fd_event (EV_P_ int fd, int revents)	920	fd_event (EV_P_ int fd, int revents)
880	{	921	{
881	ANFD *anfd = anfds + fd;	922	ANFD *anfd = anfds + fd;
882		923
883	if (expect_true (!anfd->reify))	924	if (expect_true (!anfd->reify))
884	fd_event_nc (EV_A_ fd, revents);	925	fd_event_nocheck (EV_A_ fd, revents);
885	}	926	}
886		927
887	void	928	void
888	ev_feed_fd_event (EV_P_ int fd, int revents)	929	ev_feed_fd_event (EV_P_ int fd, int revents)
889	{	930	{
890	if (fd >= 0 && fd < anfdmax)	931	if (fd >= 0 && fd < anfdmax)
891	fd_event_nc (EV_A_ fd, revents);	932	fd_event_nocheck (EV_A_ fd, revents);
892	}	933	}
893		934
894	/* make sure the external fd watch events are in-sync */	935	/* make sure the external fd watch events are in-sync */
895	/* with the kernel/libev internal state */	936	/* with the kernel/libev internal state */
896	inline_size void	937	inline_size void
…		…
902	{	943	{
903	int fd = fdchanges [i];	944	int fd = fdchanges [i];
904	ANFD *anfd = anfds + fd;	945	ANFD *anfd = anfds + fd;
905	ev_io *w;	946	ev_io *w;
906		947
907	unsigned char events = 0;	948	unsigned char o_events = anfd->events;
		949	unsigned char o_reify = anfd->reify;
908		950
909	for (w = (ev_io )anfd->head; w; w = (ev_io )((WL)w)->next)	951	anfd->reify = 0;
910	events \|= (unsigned char)w->events;
911		952
912	#if EV_SELECT_IS_WINSOCKET	953	#if EV_SELECT_IS_WINSOCKET
913	if (events)	954	if (o_reify & EV__IOFDSET)
914	{	955	{
915	unsigned long arg;	956	unsigned long arg;
916	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	957	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);
917	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));	958	assert (("libev: only socket fds supported in this configuration", ioctlsocket (anfd->handle, FIONREAD, &arg) == 0));
918	}	959	}
919	#endif	960	#endif
920		961
		962	/if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation /
921	{	963	{
922	unsigned char o_events = anfd->events;
923	unsigned char o_reify = anfd->reify;
924
925	anfd->reify = 0;
926	anfd->events = events;	964	anfd->events = 0;
927		965
928	if (o_events != events \|\| o_reify & EV__IOFDSET)	966	for (w = (ev_io )anfd->head; w; w = (ev_io )((WL)w)->next)
		967	anfd->events \|= (unsigned char)w->events;
		968
		969	if (o_events !=anfd-> events)
		970	o_reify = EV__IOFDSET; /* actually \|= */
		971	}
		972
		973	if (o_reify & EV__IOFDSET)
929	backend_modify (EV_A_ fd, o_events, events);	974	backend_modify (EV_A_ fd, o_events, anfd->events);
930	}
931	}	975	}
932		976
933	fdchangecnt = 0;	977	fdchangecnt = 0;
934	}	978	}
935		979
…		…
959	ev_io_stop (EV_A_ w);	1003	ev_io_stop (EV_A_ w);
960	ev_feed_event (EV_A_ (W)w, EV_ERROR \| EV_READ \| EV_WRITE);	1004	ev_feed_event (EV_A_ (W)w, EV_ERROR \| EV_READ \| EV_WRITE);
961	}	1005	}
962	}	1006	}
963		1007
964	/* check whether the given fd is atcually valid, for error recovery */	1008	/* check whether the given fd is actually valid, for error recovery */
965	inline_size int	1009	inline_size int
966	fd_valid (int fd)	1010	fd_valid (int fd)
967	{	1011	{
968	#ifdef _WIN32	1012	#ifdef _WIN32
969	return _get_osfhandle (fd) != -1;	1013	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
970	#else	1014	#else
971	return fcntl (fd, F_GETFD) != -1;	1015	return fcntl (fd, F_GETFD) != -1;
972	#endif	1016	#endif
973	}	1017	}
974		1018
…		…
1011	anfds [fd].emask = 0;	1055	anfds [fd].emask = 0;
1012	fd_change (EV_A_ fd, EV__IOFDSET \| EV_ANFD_REIFY);	1056	fd_change (EV_A_ fd, EV__IOFDSET \| EV_ANFD_REIFY);
1013	}	1057	}
1014	}	1058	}
1015		1059
		1060	/* used to prepare libev internal fd's */
		1061	/* this is not fork-safe */
		1062	inline_speed void
		1063	fd_intern (int fd)
		1064	{
		1065	#ifdef _WIN32
		1066	unsigned long arg = 1;
		1067	ioctlsocket (EV_FD_TO_WIN32_HANDLE (fd), FIONBIO, &arg);
		1068	#else
		1069	fcntl (fd, F_SETFD, FD_CLOEXEC);
		1070	fcntl (fd, F_SETFL, O_NONBLOCK);
		1071	#endif
		1072	}
		1073
1016	/*****************************************************************************/	1074	/*****************************************************************************/
1017		1075
1018	/*	1076	/*
1019	* the heap functions want a real array index. array index 0 uis guaranteed to not	1077	* the heap functions want a real array index. array index 0 is guaranteed to not
1020	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives	1078	* be in-use at any time. the first heap entry is at array [HEAP0]. DHEAP gives
1021	* the branching factor of the d-tree.	1079	* the branching factor of the d-tree.
1022	*/	1080	*/
1023		1081
1024	/*	1082	/*
…		…
1172		1230
1173	static ANSIG signals [EV_NSIG - 1];	1231	static ANSIG signals [EV_NSIG - 1];
1174		1232
1175	/*****************************************************************************/	1233	/*****************************************************************************/
1176		1234
1177	/* used to prepare libev internal fd's */	1235	#if EV_SIGNAL_ENABLE \|\| EV_ASYNC_ENABLE
1178	/* this is not fork-safe */
1179	inline_speed void
1180	fd_intern (int fd)
1181	{
1182	#ifdef _WIN32
1183	unsigned long arg = 1;
1184	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1185	#else
1186	fcntl (fd, F_SETFD, FD_CLOEXEC);
1187	fcntl (fd, F_SETFL, O_NONBLOCK);
1188	#endif
1189	}
1190		1236
1191	static void noinline	1237	static void noinline
1192	evpipe_init (EV_P)	1238	evpipe_init (EV_P)
1193	{	1239	{
1194	if (!ev_is_active (&pipe_w))	1240	if (!ev_is_active (&pipe_w))
1195	{	1241	{
1196	#if EV_USE_EVENTFD	1242	# if EV_USE_EVENTFD
1197	evfd = eventfd (0, EFD_NONBLOCK \| EFD_CLOEXEC);	1243	evfd = eventfd (0, EFD_NONBLOCK \| EFD_CLOEXEC);
1198	if (evfd < 0 && errno == EINVAL)	1244	if (evfd < 0 && errno == EINVAL)
1199	evfd = eventfd (0, 0);	1245	evfd = eventfd (0, 0);
1200		1246
1201	if (evfd >= 0)	1247	if (evfd >= 0)
…		…
1203	evpipe [0] = -1;	1249	evpipe [0] = -1;
1204	fd_intern (evfd); /* doing it twice doesn't hurt */	1250	fd_intern (evfd); /* doing it twice doesn't hurt */
1205	ev_io_set (&pipe_w, evfd, EV_READ);	1251	ev_io_set (&pipe_w, evfd, EV_READ);
1206	}	1252	}
1207	else	1253	else
1208	#endif	1254	# endif
1209	{	1255	{
1210	while (pipe (evpipe))	1256	while (pipe (evpipe))
1211	ev_syserr ("(libev) error creating signal/async pipe");	1257	ev_syserr ("(libev) error creating signal/async pipe");
1212		1258
1213	fd_intern (evpipe [0]);	1259	fd_intern (evpipe [0]);
…		…
1224	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1270	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1225	{	1271	{
1226	if (!*flag)	1272	if (!*flag)
1227	{	1273	{
1228	int old_errno = errno; /* save errno because write might clobber it */	1274	int old_errno = errno; /* save errno because write might clobber it */
		1275	char dummy;
1229		1276
1230	*flag = 1;	1277	*flag = 1;
1231		1278
1232	#if EV_USE_EVENTFD	1279	#if EV_USE_EVENTFD
1233	if (evfd >= 0)	1280	if (evfd >= 0)
…		…
1235	uint64_t counter = 1;	1282	uint64_t counter = 1;
1236	write (evfd, &counter, sizeof (uint64_t));	1283	write (evfd, &counter, sizeof (uint64_t));
1237	}	1284	}
1238	else	1285	else
1239	#endif	1286	#endif
		1287	/* win32 people keep sending patches that change this write() to send() */
		1288	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
		1289	/* so when you think this write should be a send instead, please find out */
		1290	/* where your send() is from - it's definitely not the microsoft send, and */
		1291	/* tell me. thank you. */
1240	write (evpipe [1], &old_errno, 1);	1292	write (evpipe [1], &dummy, 1);
1241		1293
1242	errno = old_errno;	1294	errno = old_errno;
1243	}	1295	}
1244	}	1296	}
1245		1297
…		…
1258	}	1310	}
1259	else	1311	else
1260	#endif	1312	#endif
1261	{	1313	{
1262	char dummy;	1314	char dummy;
		1315	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1263	read (evpipe [0], &dummy, 1);	1316	read (evpipe [0], &dummy, 1);
1264	}	1317	}
1265		1318
1266	if (sig_pending)	1319	if (sig_pending)
1267	{	1320	{
…		…
1294	{	1347	{
1295	#if EV_MULTIPLICITY	1348	#if EV_MULTIPLICITY
1296	EV_P = signals [signum - 1].loop;	1349	EV_P = signals [signum - 1].loop;
1297	#endif	1350	#endif
1298		1351
1299	#if _WIN32	1352	#ifdef _WIN32
1300	signal (signum, ev_sighandler);	1353	signal (signum, ev_sighandler);
1301	#endif	1354	#endif
1302		1355
1303	signals [signum - 1].pending = 1;	1356	signals [signum - 1].pending = 1;
1304	evpipe_write (EV_A_ &sig_pending);	1357	evpipe_write (EV_A_ &sig_pending);
…		…
1346	break;	1399	break;
1347	}	1400	}
1348	}	1401	}
1349	#endif	1402	#endif
1350		1403
		1404	#endif
		1405
1351	/*****************************************************************************/	1406	/*****************************************************************************/
1352		1407
		1408	#if EV_CHILD_ENABLE
1353	static WL childs [EV_PID_HASHSIZE];	1409	static WL childs [EV_PID_HASHSIZE];
1354
1355	#ifndef _WIN32
1356		1410
1357	static ev_signal childev;	1411	static ev_signal childev;
1358		1412
1359	#ifndef WIFCONTINUED	1413	#ifndef WIFCONTINUED
1360	# define WIFCONTINUED(status) 0	1414	# define WIFCONTINUED(status) 0
…		…
1365	child_reap (EV_P_ int chain, int pid, int status)	1419	child_reap (EV_P_ int chain, int pid, int status)
1366	{	1420	{
1367	ev_child *w;	1421	ev_child *w;
1368	int traced = WIFSTOPPED (status) \|\| WIFCONTINUED (status);	1422	int traced = WIFSTOPPED (status) \|\| WIFCONTINUED (status);
1369		1423
1370	for (w = (ev_child )childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child )((WL)w)->next)	1424	for (w = (ev_child )childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child )((WL)w)->next)
1371	{	1425	{
1372	if ((w->pid == pid \|\| !w->pid)	1426	if ((w->pid == pid \|\| !w->pid)
1373	&& (!traced \|\| (w->flags & 1)))	1427	&& (!traced \|\| (w->flags & 1)))
1374	{	1428	{
1375	ev_set_priority (w, EV_MAXPRI); /* need to do it now, this must be the same prio as the signal watcher itself */	1429	ev_set_priority (w, EV_MAXPRI); /* need to do it now, this must be the same prio as the signal watcher itself */
…		…
1400	/* make sure we are called again until all children have been reaped */	1454	/* make sure we are called again until all children have been reaped */
1401	/* we need to do it this way so that the callback gets called before we continue */	1455	/* we need to do it this way so that the callback gets called before we continue */
1402	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1456	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1403		1457
1404	child_reap (EV_A_ pid, pid, status);	1458	child_reap (EV_A_ pid, pid, status);
1405	if (EV_PID_HASHSIZE > 1)	1459	if ((EV_PID_HASHSIZE) > 1)
1406	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */	1460	child_reap (EV_A_ 0, pid, status); /* this might trigger a watcher twice, but feed_event catches that */
1407	}	1461	}
1408		1462
1409	#endif	1463	#endif
1410		1464
…		…
1477	#ifdef __APPLE__	1531	#ifdef __APPLE__
1478	/* only select works correctly on that "unix-certified" platform */	1532	/* only select works correctly on that "unix-certified" platform */
1479	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1533	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1480	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */	1534	flags &= ~EVBACKEND_POLL; /* poll is based on kqueue from 10.5 onwards */
1481	#endif	1535	#endif
		1536	#ifdef __FreeBSD__
		1537	flags &= ~EVBACKEND_POLL; /* poll return value is unusable (http://forums.freebsd.org/archive/index.php/t-10270.html) */
		1538	#endif
1482		1539
1483	return flags;	1540	return flags;
1484	}	1541	}
1485		1542
1486	unsigned int	1543	unsigned int
…		…
1499	ev_backend (EV_P)	1556	ev_backend (EV_P)
1500	{	1557	{
1501	return backend;	1558	return backend;
1502	}	1559	}
1503		1560
1504	#if EV_MINIMAL < 2	1561	#if EV_FEATURE_API
1505	unsigned int	1562	unsigned int
1506	ev_loop_count (EV_P)	1563	ev_iteration (EV_P)
1507	{	1564	{
1508	return loop_count;	1565	return loop_count;
1509	}	1566	}
1510		1567
1511	unsigned int	1568	unsigned int
1512	ev_loop_depth (EV_P)	1569	ev_depth (EV_P)
1513	{	1570	{
1514	return loop_depth;	1571	return loop_depth;
1515	}	1572	}
1516		1573
1517	void	1574	void
…		…
1589		1646
1590	ev_rt_now = ev_time ();	1647	ev_rt_now = ev_time ();
1591	mn_now = get_clock ();	1648	mn_now = get_clock ();
1592	now_floor = mn_now;	1649	now_floor = mn_now;
1593	rtmn_diff = ev_rt_now - mn_now;	1650	rtmn_diff = ev_rt_now - mn_now;
1594	#if EV_MINIMAL < 2	1651	#if EV_FEATURE_API
1595	invoke_cb = ev_invoke_pending;	1652	invoke_cb = ev_invoke_pending;
1596	#endif	1653	#endif
1597		1654
1598	io_blocktime = 0.;	1655	io_blocktime = 0.;
1599	timeout_blocktime = 0.;	1656	timeout_blocktime = 0.;
…		…
1605	#endif	1662	#endif
1606	#if EV_USE_INOTIFY	1663	#if EV_USE_INOTIFY
1607	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	1664	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1608	#endif	1665	#endif
1609	#if EV_USE_SIGNALFD	1666	#if EV_USE_SIGNALFD
1610	sigfd = flags & EVFLAG_NOSIGFD ? -1 : -2;	1667	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1611	#endif	1668	#endif
1612		1669
1613	if (!(flags & 0x0000ffffU))	1670	if (!(flags & 0x0000ffffU))
1614	flags \|= ev_recommended_backends ();	1671	flags \|= ev_recommended_backends ();
1615		1672
…		…
1629	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1686	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1630	#endif	1687	#endif
1631		1688
1632	ev_prepare_init (&pending_w, pendingcb);	1689	ev_prepare_init (&pending_w, pendingcb);
1633		1690
		1691	#if EV_SIGNAL_ENABLE \|\| EV_ASYNC_ENABLE
1634	ev_init (&pipe_w, pipecb);	1692	ev_init (&pipe_w, pipecb);
1635	ev_set_priority (&pipe_w, EV_MAXPRI);	1693	ev_set_priority (&pipe_w, EV_MAXPRI);
		1694	#endif
1636	}	1695	}
1637	}	1696	}
1638		1697
1639	/* free up a loop structure */	1698	/* free up a loop structure */
1640	static void noinline	1699	static void noinline
…		…
1659	}	1718	}
1660	}	1719	}
1661		1720
1662	#if EV_USE_SIGNALFD	1721	#if EV_USE_SIGNALFD
1663	if (ev_is_active (&sigfd_w))	1722	if (ev_is_active (&sigfd_w))
1664	{
1665	/ev_ref (EV_A);/
1666	/ev_io_stop (EV_A_ &sigfd_w);/
1667
1668	close (sigfd);	1723	close (sigfd);
1669	}
1670	#endif	1724	#endif
1671		1725
1672	#if EV_USE_INOTIFY	1726	#if EV_USE_INOTIFY
1673	if (fs_fd >= 0)	1727	if (fs_fd >= 0)
1674	close (fs_fd);	1728	close (fs_fd);
…		…
1763	{	1817	{
1764	EV_WIN32_CLOSE_FD (evpipe [0]);	1818	EV_WIN32_CLOSE_FD (evpipe [0]);
1765	EV_WIN32_CLOSE_FD (evpipe [1]);	1819	EV_WIN32_CLOSE_FD (evpipe [1]);
1766	}	1820	}
1767		1821
		1822	#if EV_SIGNAL_ENABLE \|\| EV_ASYNC_ENABLE
1768	evpipe_init (EV_A);	1823	evpipe_init (EV_A);
1769	/* now iterate over everything, in case we missed something */	1824	/* now iterate over everything, in case we missed something */
1770	pipecb (EV_A_ &pipe_w, EV_READ);	1825	pipecb (EV_A_ &pipe_w, EV_READ);
		1826	#endif
1771	}	1827	}
1772		1828
1773	postfork = 0;	1829	postfork = 0;
1774	}	1830	}
1775		1831
…		…
1837	verify_watcher (EV_A_ ws [cnt]);	1893	verify_watcher (EV_A_ ws [cnt]);
1838	}	1894	}
1839	}	1895	}
1840	#endif	1896	#endif
1841		1897
1842	#if EV_MINIMAL < 2	1898	#if EV_FEATURE_API
1843	void	1899	void
1844	ev_loop_verify (EV_P)	1900	ev_verify (EV_P)
1845	{	1901	{
1846	#if EV_VERIFY	1902	#if EV_VERIFY
1847	int i;	1903	int i;
1848	WL w;	1904	WL w;
1849		1905
…		…
1888	#if EV_ASYNC_ENABLE	1944	#if EV_ASYNC_ENABLE
1889	assert (asyncmax >= asynccnt);	1945	assert (asyncmax >= asynccnt);
1890	array_verify (EV_A_ (W *)asyncs, asynccnt);	1946	array_verify (EV_A_ (W *)asyncs, asynccnt);
1891	#endif	1947	#endif
1892		1948
		1949	#if EV_PREPARE_ENABLE
1893	assert (preparemax >= preparecnt);	1950	assert (preparemax >= preparecnt);
1894	array_verify (EV_A_ (W *)prepares, preparecnt);	1951	array_verify (EV_A_ (W *)prepares, preparecnt);
		1952	#endif
1895		1953
		1954	#if EV_CHECK_ENABLE
1896	assert (checkmax >= checkcnt);	1955	assert (checkmax >= checkcnt);
1897	array_verify (EV_A_ (W *)checks, checkcnt);	1956	array_verify (EV_A_ (W *)checks, checkcnt);
		1957	#endif
1898		1958
1899	# if 0	1959	# if 0
		1960	#if EV_CHILD_ENABLE
1900	for (w = (ev_child )childs [chain & (EV_PID_HASHSIZE - 1)]; w; w = (ev_child )((WL)w)->next)	1961	for (w = (ev_child )childs [chain & ((EV_PID_HASHSIZE) - 1)]; w; w = (ev_child )((WL)w)->next)
1901	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)	1962	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1963	#endif
1902	# endif	1964	# endif
1903	#endif	1965	#endif
1904	}	1966	}
1905	#endif	1967	#endif
1906		1968
…		…
1922		1984
1923	loop_init (EV_A_ flags);	1985	loop_init (EV_A_ flags);
1924		1986
1925	if (ev_backend (EV_A))	1987	if (ev_backend (EV_A))
1926	{	1988	{
1927	#ifndef _WIN32	1989	#if EV_CHILD_ENABLE
1928	ev_signal_init (&childev, childcb, SIGCHLD);	1990	ev_signal_init (&childev, childcb, SIGCHLD);
1929	ev_set_priority (&childev, EV_MAXPRI);	1991	ev_set_priority (&childev, EV_MAXPRI);
1930	ev_signal_start (EV_A_ &childev);	1992	ev_signal_start (EV_A_ &childev);
1931	ev_unref (EV_A); /* child watcher should not keep loop alive */	1993	ev_unref (EV_A); /* child watcher should not keep loop alive */
1932	#endif	1994	#endif
…		…
1945	EV_P = ev_default_loop_ptr;	2007	EV_P = ev_default_loop_ptr;
1946	#endif	2008	#endif
1947		2009
1948	ev_default_loop_ptr = 0;	2010	ev_default_loop_ptr = 0;
1949		2011
1950	#ifndef _WIN32	2012	#if EV_CHILD_ENABLE
1951	ev_ref (EV_A); /* child watcher */	2013	ev_ref (EV_A); /* child watcher */
1952	ev_signal_stop (EV_A_ &childev);	2014	ev_signal_stop (EV_A_ &childev);
1953	#endif	2015	#endif
1954		2016
1955	loop_destroy (EV_A);	2017	loop_destroy (EV_A);
…		…
2061	EV_FREQUENT_CHECK;	2123	EV_FREQUENT_CHECK;
2062	feed_reverse (EV_A_ (W)w);	2124	feed_reverse (EV_A_ (W)w);
2063	}	2125	}
2064	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2126	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2065		2127
2066	feed_reverse_done (EV_A_ EV_TIMEOUT);	2128	feed_reverse_done (EV_A_ EV_TIMER);
2067	}	2129	}
2068	}	2130	}
2069		2131
2070	#if EV_PERIODIC_ENABLE	2132	#if EV_PERIODIC_ENABLE
2071	/* make periodics pending */	2133	/* make periodics pending */
…		…
2124	feed_reverse_done (EV_A_ EV_PERIODIC);	2186	feed_reverse_done (EV_A_ EV_PERIODIC);
2125	}	2187	}
2126	}	2188	}
2127		2189
2128	/* simply recalculate all periodics */	2190	/* simply recalculate all periodics */
2129	/* TODO: maybe ensure that at leats one event happens when jumping forward? */	2191	/* TODO: maybe ensure that at least one event happens when jumping forward? */
2130	static void noinline	2192	static void noinline
2131	periodics_reschedule (EV_P)	2193	periodics_reschedule (EV_P)
2132	{	2194	{
2133	int i;	2195	int i;
2134		2196
…		…
2162	ANHE_at_cache (*he);	2224	ANHE_at_cache (*he);
2163	}	2225	}
2164	}	2226	}
2165		2227
2166	/* fetch new monotonic and realtime times from the kernel */	2228	/* fetch new monotonic and realtime times from the kernel */
2167	/* also detetc if there was a timejump, and act accordingly */	2229	/* also detect if there was a timejump, and act accordingly */
2168	inline_speed void	2230	inline_speed void
2169	time_update (EV_P_ ev_tstamp max_block)	2231	time_update (EV_P_ ev_tstamp max_block)
2170	{	2232	{
2171	#if EV_USE_MONOTONIC	2233	#if EV_USE_MONOTONIC
2172	if (expect_true (have_monotonic))	2234	if (expect_true (have_monotonic))
…		…
2232	}	2294	}
2233		2295
2234	void	2296	void
2235	ev_loop (EV_P_ int flags)	2297	ev_loop (EV_P_ int flags)
2236	{	2298	{
2237	#if EV_MINIMAL < 2	2299	#if EV_FEATURE_API
2238	++loop_depth;	2300	++loop_depth;
2239	#endif	2301	#endif
2240		2302
2241	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));	2303	assert (("libev: ev_loop recursion during release detected", loop_done != EVUNLOOP_RECURSE));
2242		2304
…		…
2245	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */	2307	EV_INVOKE_PENDING; /* in case we recurse, ensure ordering stays nice and clean */
2246		2308
2247	do	2309	do
2248	{	2310	{
2249	#if EV_VERIFY >= 2	2311	#if EV_VERIFY >= 2
2250	ev_loop_verify (EV_A);	2312	ev_verify (EV_A);
2251	#endif	2313	#endif
2252		2314
2253	#ifndef _WIN32	2315	#ifndef _WIN32
2254	if (expect_false (curpid)) /* penalise the forking check even more */	2316	if (expect_false (curpid)) /* penalise the forking check even more */
2255	if (expect_false (getpid () != curpid))	2317	if (expect_false (getpid () != curpid))
…		…
2267	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2329	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2268	EV_INVOKE_PENDING;	2330	EV_INVOKE_PENDING;
2269	}	2331	}
2270	#endif	2332	#endif
2271		2333
		2334	#if EV_PREPARE_ENABLE
2272	/* queue prepare watchers (and execute them) */	2335	/* queue prepare watchers (and execute them) */
2273	if (expect_false (preparecnt))	2336	if (expect_false (preparecnt))
2274	{	2337	{
2275	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2338	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2276	EV_INVOKE_PENDING;	2339	EV_INVOKE_PENDING;
2277	}	2340	}
		2341	#endif
2278		2342
2279	if (expect_false (loop_done))	2343	if (expect_false (loop_done))
2280	break;	2344	break;
2281		2345
2282	/* we might have forked, so reify kernel state if necessary */	2346	/* we might have forked, so reify kernel state if necessary */
…		…
2333	waittime -= sleeptime;	2397	waittime -= sleeptime;
2334	}	2398	}
2335	}	2399	}
2336	}	2400	}
2337		2401
2338	#if EV_MINIMAL < 2	2402	#if EV_FEATURE_API
2339	++loop_count;	2403	++loop_count;
2340	#endif	2404	#endif
2341	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2405	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */
2342	backend_poll (EV_A_ waittime);	2406	backend_poll (EV_A_ waittime);
2343	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2407	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */
…		…
2355	#if EV_IDLE_ENABLE	2419	#if EV_IDLE_ENABLE
2356	/* queue idle watchers unless other events are pending */	2420	/* queue idle watchers unless other events are pending */
2357	idle_reify (EV_A);	2421	idle_reify (EV_A);
2358	#endif	2422	#endif
2359		2423
		2424	#if EV_CHECK_ENABLE
2360	/* queue check watchers, to be executed first */	2425	/* queue check watchers, to be executed first */
2361	if (expect_false (checkcnt))	2426	if (expect_false (checkcnt))
2362	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2427	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2428	#endif
2363		2429
2364	EV_INVOKE_PENDING;	2430	EV_INVOKE_PENDING;
2365	}	2431	}
2366	while (expect_true (	2432	while (expect_true (
2367	activecnt	2433	activecnt
…		…
2370	));	2436	));
2371		2437
2372	if (loop_done == EVUNLOOP_ONE)	2438	if (loop_done == EVUNLOOP_ONE)
2373	loop_done = EVUNLOOP_CANCEL;	2439	loop_done = EVUNLOOP_CANCEL;
2374		2440
2375	#if EV_MINIMAL < 2	2441	#if EV_FEATURE_API
2376	--loop_depth;	2442	--loop_depth;
2377	#endif	2443	#endif
2378	}	2444	}
2379		2445
2380	void	2446	void
…		…
2506		2572
2507	if (expect_false (ev_is_active (w)))	2573	if (expect_false (ev_is_active (w)))
2508	return;	2574	return;
2509		2575
2510	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2576	assert (("libev: ev_io_start called with negative fd", fd >= 0));
2511	assert (("libev: ev_io start called with illegal event mask", !(w->events & ~(EV__IOFDSET \| EV_READ \| EV_WRITE))));	2577	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET \| EV_READ \| EV_WRITE))));
2512		2578
2513	EV_FREQUENT_CHECK;	2579	EV_FREQUENT_CHECK;
2514		2580
2515	ev_start (EV_A_ (W)w, 1);	2581	ev_start (EV_A_ (W)w, 1);
2516	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2582	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2534	EV_FREQUENT_CHECK;	2600	EV_FREQUENT_CHECK;
2535		2601
2536	wlist_del (&anfds[w->fd].head, (WL)w);	2602	wlist_del (&anfds[w->fd].head, (WL)w);
2537	ev_stop (EV_A_ (W)w);	2603	ev_stop (EV_A_ (W)w);
2538		2604
2539	fd_change (EV_A_ w->fd, 1);	2605	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2540		2606
2541	EV_FREQUENT_CHECK;	2607	EV_FREQUENT_CHECK;
2542	}	2608	}
2543		2609
2544	void noinline	2610	void noinline
…		…
2586	timers [active] = timers [timercnt + HEAP0];	2652	timers [active] = timers [timercnt + HEAP0];
2587	adjustheap (timers, timercnt, active);	2653	adjustheap (timers, timercnt, active);
2588	}	2654	}
2589	}	2655	}
2590		2656
2591	EV_FREQUENT_CHECK;
2592
2593	ev_at (w) -= mn_now;	2657	ev_at (w) -= mn_now;
2594		2658
2595	ev_stop (EV_A_ (W)w);	2659	ev_stop (EV_A_ (W)w);
		2660
		2661	EV_FREQUENT_CHECK;
2596	}	2662	}
2597		2663
2598	void noinline	2664	void noinline
2599	ev_timer_again (EV_P_ ev_timer *w)	2665	ev_timer_again (EV_P_ ev_timer *w)
2600	{	2666	{
…		…
2679	periodics [active] = periodics [periodiccnt + HEAP0];	2745	periodics [active] = periodics [periodiccnt + HEAP0];
2680	adjustheap (periodics, periodiccnt, active);	2746	adjustheap (periodics, periodiccnt, active);
2681	}	2747	}
2682	}	2748	}
2683		2749
2684	EV_FREQUENT_CHECK;
2685
2686	ev_stop (EV_A_ (W)w);	2750	ev_stop (EV_A_ (W)w);
		2751
		2752	EV_FREQUENT_CHECK;
2687	}	2753	}
2688		2754
2689	void noinline	2755	void noinline
2690	ev_periodic_again (EV_P_ ev_periodic *w)	2756	ev_periodic_again (EV_P_ ev_periodic *w)
2691	{	2757	{
…		…
2696	#endif	2762	#endif
2697		2763
2698	#ifndef SA_RESTART	2764	#ifndef SA_RESTART
2699	# define SA_RESTART 0	2765	# define SA_RESTART 0
2700	#endif	2766	#endif
		2767
		2768	#if EV_SIGNAL_ENABLE
2701		2769
2702	void noinline	2770	void noinline
2703	ev_signal_start (EV_P_ ev_signal *w)	2771	ev_signal_start (EV_P_ ev_signal *w)
2704	{	2772	{
2705	if (expect_false (ev_is_active (w)))	2773	if (expect_false (ev_is_active (w)))
…		…
2752	if (!((WL)w)->next)	2820	if (!((WL)w)->next)
2753	# if EV_USE_SIGNALFD	2821	# if EV_USE_SIGNALFD
2754	if (sigfd < 0) /TODO/	2822	if (sigfd < 0) /TODO/
2755	# endif	2823	# endif
2756	{	2824	{
2757	# if _WIN32	2825	# ifdef _WIN32
		2826	evpipe_init (EV_A);
		2827
2758	signal (w->signum, ev_sighandler);	2828	signal (w->signum, ev_sighandler);
2759	# else	2829	# else
2760	struct sigaction sa;	2830	struct sigaction sa;
2761		2831
2762	evpipe_init (EV_A);	2832	evpipe_init (EV_A);
…		…
2793	signals [w->signum - 1].loop = 0; /* unattach from signal */	2863	signals [w->signum - 1].loop = 0; /* unattach from signal */
2794	#endif	2864	#endif
2795	#if EV_USE_SIGNALFD	2865	#if EV_USE_SIGNALFD
2796	if (sigfd >= 0)	2866	if (sigfd >= 0)
2797	{	2867	{
2798	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2868	sigset_t ss;
		2869
		2870	sigemptyset (&ss);
		2871	sigaddset (&ss, w->signum);
2799	sigdelset (&sigfd_set, w->signum);	2872	sigdelset (&sigfd_set, w->signum);
		2873
2800	signalfd (sigfd, &sigfd_set, 0);	2874	signalfd (sigfd, &sigfd_set, 0);
2801	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2875	sigprocmask (SIG_UNBLOCK, &ss, 0);
2802	/TODO: maybe unblock signal? /
2803	}	2876	}
2804	else	2877	else
2805	#endif	2878	#endif
2806	signal (w->signum, SIG_DFL);	2879	signal (w->signum, SIG_DFL);
2807	}	2880	}
2808		2881
2809	EV_FREQUENT_CHECK;	2882	EV_FREQUENT_CHECK;
2810	}	2883	}
2811		2884
		2885	#endif
		2886
		2887	#if EV_CHILD_ENABLE
		2888
2812	void	2889	void
2813	ev_child_start (EV_P_ ev_child *w)	2890	ev_child_start (EV_P_ ev_child *w)
2814	{	2891	{
2815	#if EV_MULTIPLICITY	2892	#if EV_MULTIPLICITY
2816	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	2893	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
…		…
2819	return;	2896	return;
2820		2897
2821	EV_FREQUENT_CHECK;	2898	EV_FREQUENT_CHECK;
2822		2899
2823	ev_start (EV_A_ (W)w, 1);	2900	ev_start (EV_A_ (W)w, 1);
2824	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2901	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2825		2902
2826	EV_FREQUENT_CHECK;	2903	EV_FREQUENT_CHECK;
2827	}	2904	}
2828		2905
2829	void	2906	void
…		…
2833	if (expect_false (!ev_is_active (w)))	2910	if (expect_false (!ev_is_active (w)))
2834	return;	2911	return;
2835		2912
2836	EV_FREQUENT_CHECK;	2913	EV_FREQUENT_CHECK;
2837		2914
2838	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2915	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2839	ev_stop (EV_A_ (W)w);	2916	ev_stop (EV_A_ (W)w);
2840		2917
2841	EV_FREQUENT_CHECK;	2918	EV_FREQUENT_CHECK;
2842	}	2919	}
		2920
		2921	#endif
2843		2922
2844	#if EV_STAT_ENABLE	2923	#if EV_STAT_ENABLE
2845		2924
2846	# ifdef _WIN32	2925	# ifdef _WIN32
2847	# undef lstat	2926	# undef lstat
…		…
2853	#define MIN_STAT_INTERVAL 0.1074891	2932	#define MIN_STAT_INTERVAL 0.1074891
2854		2933
2855	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);	2934	static void noinline stat_timer_cb (EV_P_ ev_timer *w_, int revents);
2856		2935
2857	#if EV_USE_INOTIFY	2936	#if EV_USE_INOTIFY
2858	# define EV_INOTIFY_BUFSIZE 8192	2937
		2938	/* the * 2 is to allow for alignment padding, which for some reason is >> 8 */
		2939	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
2859		2940
2860	static void noinline	2941	static void noinline
2861	infy_add (EV_P_ ev_stat *w)	2942	infy_add (EV_P_ ev_stat *w)
2862	{	2943	{
2863	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);	2944	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);
2864		2945
2865	if (w->wd < 0)	2946	if (w->wd >= 0)
		2947	{
		2948	struct statfs sfs;
		2949
		2950	/* now local changes will be tracked by inotify, but remote changes won't */
		2951	/* unless the filesystem is known to be local, we therefore still poll */
		2952	/* also do poll on <2.6.25, but with normal frequency */
		2953
		2954	if (!fs_2625)
		2955	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		2956	else if (!statfs (w->path, &sfs)
		2957	&& (sfs.f_type == 0x1373 /* devfs */
		2958	\|\| sfs.f_type == 0xEF53 /* ext2/3 */
		2959	\|\| sfs.f_type == 0x3153464a /* jfs */
		2960	\|\| sfs.f_type == 0x52654973 /* reiser3 */
		2961	\|\| sfs.f_type == 0x01021994 /* tempfs */
		2962	\|\| sfs.f_type == 0x58465342 /* xfs */))
		2963	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
		2964	else
		2965	w->timer.repeat = w->interval ? w->interval : NFS_STAT_INTERVAL; /* remote, use reduced frequency */
2866	{	2966	}
		2967	else
		2968	{
		2969	/* can't use inotify, continue to stat */
2867	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	2970	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
2868	ev_timer_again (EV_A_ &w->timer); /* this is not race-free, so we still need to recheck periodically */
2869		2971
2870	/* monitor some parent directory for speedup hints */	2972	/* if path is not there, monitor some parent directory for speedup hints */
2871	/* note that exceeding the hardcoded path limit is not a correctness issue, */	2973	/* note that exceeding the hardcoded path limit is not a correctness issue, */
2872	/* but an efficiency issue only */	2974	/* but an efficiency issue only */
2873	if ((errno == ENOENT \|\| errno == EACCES) && strlen (w->path) < 4096)	2975	if ((errno == ENOENT \|\| errno == EACCES) && strlen (w->path) < 4096)
2874	{	2976	{
2875	char path [4096];	2977	char path [4096];
…		…
2891	while (w->wd < 0 && (errno == ENOENT \|\| errno == EACCES));	2993	while (w->wd < 0 && (errno == ENOENT \|\| errno == EACCES));
2892	}	2994	}
2893	}	2995	}
2894		2996
2895	if (w->wd >= 0)	2997	if (w->wd >= 0)
2896	{
2897	struct statfs sfs;
2898
2899	wlist_add (&fs_hash [w->wd & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	2998	wlist_add (&fs_hash [w->wd & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2900		2999
2901	/* now local changes will be tracked by inotify, but remote changes won't */	3000	/* now re-arm timer, if required */
2902	/* unless the filesystem it known to be local, we therefore still poll */	3001	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2903	/* also do poll on <2.6.25, but with normal frequency */
2904
2905	if (fs_2625 && !statfs (w->path, &sfs))
2906	if (sfs.f_type == 0x1373 /* devfs */
2907	\|\| sfs.f_type == 0xEF53 /* ext2/3 */
2908	\|\| sfs.f_type == 0x3153464a /* jfs */
2909	\|\| sfs.f_type == 0x52654973 /* reiser3 */
2910	\|\| sfs.f_type == 0x01021994 /* tempfs */
2911	\|\| sfs.f_type == 0x58465342 /* xfs */)
2912	return;
2913
2914	w->timer.repeat = w->interval ? w->interval : fs_2625 ? NFS_STAT_INTERVAL : DEF_STAT_INTERVAL;
2915	ev_timer_again (EV_A_ &w->timer);	3002	ev_timer_again (EV_A_ &w->timer);
2916	}	3003	if (ev_is_active (&w->timer)) ev_unref (EV_A);
2917	}	3004	}
2918		3005
2919	static void noinline	3006	static void noinline
2920	infy_del (EV_P_ ev_stat *w)	3007	infy_del (EV_P_ ev_stat *w)
2921	{	3008	{
…		…
2924		3011
2925	if (wd < 0)	3012	if (wd < 0)
2926	return;	3013	return;
2927		3014
2928	w->wd = -2;	3015	w->wd = -2;
2929	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3016	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2930	wlist_del (&fs_hash [slot].head, (WL)w);	3017	wlist_del (&fs_hash [slot].head, (WL)w);
2931		3018
2932	/* remove this watcher, if others are watching it, they will rearm */	3019	/* remove this watcher, if others are watching it, they will rearm */
2933	inotify_rm_watch (fs_fd, wd);	3020	inotify_rm_watch (fs_fd, wd);
2934	}	3021	}
…		…
2936	static void noinline	3023	static void noinline
2937	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)	3024	infy_wd (EV_P_ int slot, int wd, struct inotify_event *ev)
2938	{	3025	{
2939	if (slot < 0)	3026	if (slot < 0)
2940	/* overflow, need to check for all hash slots */	3027	/* overflow, need to check for all hash slots */
2941	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3028	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2942	infy_wd (EV_A_ slot, wd, ev);	3029	infy_wd (EV_A_ slot, wd, ev);
2943	else	3030	else
2944	{	3031	{
2945	WL w_;	3032	WL w_;
2946		3033
2947	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3034	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2948	{	3035	{
2949	ev_stat w = (ev_stat )w_;	3036	ev_stat w = (ev_stat )w_;
2950	w_ = w_->next; /* lets us remove this watcher and all before it */	3037	w_ = w_->next; /* lets us remove this watcher and all before it */
2951		3038
2952	if (w->wd == wd \|\| wd == -1)	3039	if (w->wd == wd \|\| wd == -1)
2953	{	3040	{
2954	if (ev->mask & (IN_IGNORED \| IN_UNMOUNT \| IN_DELETE_SELF))	3041	if (ev->mask & (IN_IGNORED \| IN_UNMOUNT \| IN_DELETE_SELF))
2955	{	3042	{
2956	wlist_del (&fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head, (WL)w);	3043	wlist_del (&fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head, (WL)w);
2957	w->wd = -1;	3044	w->wd = -1;
2958	infy_add (EV_A_ w); /* re-add, no matter what */	3045	infy_add (EV_A_ w); /* re-add, no matter what */
2959	}	3046	}
2960		3047
2961	stat_timer_cb (EV_A_ &w->timer, 0);	3048	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2966		3053
2967	static void	3054	static void
2968	infy_cb (EV_P_ ev_io *w, int revents)	3055	infy_cb (EV_P_ ev_io *w, int revents)
2969	{	3056	{
2970	char buf [EV_INOTIFY_BUFSIZE];	3057	char buf [EV_INOTIFY_BUFSIZE];
2971	struct inotify_event ev = (struct inotify_event )buf;
2972	int ofs;	3058	int ofs;
2973	int len = read (fs_fd, buf, sizeof (buf));	3059	int len = read (fs_fd, buf, sizeof (buf));
2974		3060
2975	for (ofs = 0; ofs < len; ofs += sizeof (struct inotify_event) + ev->len)	3061	for (ofs = 0; ofs < len; )
		3062	{
		3063	struct inotify_event ev = (struct inotify_event )(buf + ofs);
2976	infy_wd (EV_A_ ev->wd, ev->wd, ev);	3064	infy_wd (EV_A_ ev->wd, ev->wd, ev);
		3065	ofs += sizeof (struct inotify_event) + ev->len;
		3066	}
		3067	}
		3068
		3069	inline_size unsigned int
		3070	ev_linux_version (void)
		3071	{
		3072	struct utsname buf;
		3073	unsigned int v;
		3074	int i;
		3075	char *p = buf.release;
		3076
		3077	if (uname (&buf))
		3078	return 0;
		3079
		3080	for (i = 3+1; --i; )
		3081	{
		3082	unsigned int c = 0;
		3083
		3084	for (;;)
		3085	{
		3086	if (p >= '0' && p <= '9')
		3087	c = c * 10 + *p++ - '0';
		3088	else
		3089	{
		3090	p += *p == '.';
		3091	break;
		3092	}
		3093	}
		3094
		3095	v = (v << 8) \| c;
		3096	}
		3097
		3098	return v;
2977	}	3099	}
2978		3100
2979	inline_size void	3101	inline_size void
2980	check_2625 (EV_P)	3102	ev_check_2625 (EV_P)
2981	{	3103	{
2982	/* kernels < 2.6.25 are borked	3104	/* kernels < 2.6.25 are borked
2983	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html	3105	* http://www.ussg.indiana.edu/hypermail/linux/kernel/0711.3/1208.html
2984	*/	3106	*/
2985	struct utsname buf;	3107	if (ev_linux_version () < 0x020619)
2986	int major, minor, micro;
2987
2988	if (uname (&buf))
2989	return;
2990
2991	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2992	return;
2993
2994	if (major < 2
2995	\|\| (major == 2 && minor < 6)
2996	\|\| (major == 2 && minor == 6 && micro < 25))
2997	return;	3108	return;
2998		3109
2999	fs_2625 = 1;	3110	fs_2625 = 1;
3000	}	3111	}
3001		3112
…		…
3016	if (fs_fd != -2)	3127	if (fs_fd != -2)
3017	return;	3128	return;
3018		3129
3019	fs_fd = -1;	3130	fs_fd = -1;
3020		3131
3021	check_2625 (EV_A);	3132	ev_check_2625 (EV_A);
3022		3133
3023	fs_fd = infy_newfd ();	3134	fs_fd = infy_newfd ();
3024		3135
3025	if (fs_fd >= 0)	3136	if (fs_fd >= 0)
3026	{	3137	{
3027	fd_intern (fs_fd);	3138	fd_intern (fs_fd);
3028	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);	3139	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);
3029	ev_set_priority (&fs_w, EV_MAXPRI);	3140	ev_set_priority (&fs_w, EV_MAXPRI);
3030	ev_io_start (EV_A_ &fs_w);	3141	ev_io_start (EV_A_ &fs_w);
		3142	ev_unref (EV_A);
3031	}	3143	}
3032	}	3144	}
3033		3145
3034	inline_size void	3146	inline_size void
3035	infy_fork (EV_P)	3147	infy_fork (EV_P)
…		…
3037	int slot;	3149	int slot;
3038		3150
3039	if (fs_fd < 0)	3151	if (fs_fd < 0)
3040	return;	3152	return;
3041		3153
		3154	ev_ref (EV_A);
3042	ev_io_stop (EV_A_ &fs_w);	3155	ev_io_stop (EV_A_ &fs_w);
3043	close (fs_fd);	3156	close (fs_fd);
3044	fs_fd = infy_newfd ();	3157	fs_fd = infy_newfd ();
3045		3158
3046	if (fs_fd >= 0)	3159	if (fs_fd >= 0)
3047	{	3160	{
3048	fd_intern (fs_fd);	3161	fd_intern (fs_fd);
3049	ev_io_set (&fs_w, fs_fd, EV_READ);	3162	ev_io_set (&fs_w, fs_fd, EV_READ);
3050	ev_io_start (EV_A_ &fs_w);	3163	ev_io_start (EV_A_ &fs_w);
		3164	ev_unref (EV_A);
3051	}	3165	}
3052		3166
3053	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3167	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3054	{	3168	{
3055	WL w_ = fs_hash [slot].head;	3169	WL w_ = fs_hash [slot].head;
3056	fs_hash [slot].head = 0;	3170	fs_hash [slot].head = 0;
3057		3171
3058	while (w_)	3172	while (w_)
…		…
3063	w->wd = -1;	3177	w->wd = -1;
3064		3178
3065	if (fs_fd >= 0)	3179	if (fs_fd >= 0)
3066	infy_add (EV_A_ w); /* re-add, no matter what */	3180	infy_add (EV_A_ w); /* re-add, no matter what */
3067	else	3181	else
		3182	{
		3183	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
		3184	if (ev_is_active (&w->timer)) ev_ref (EV_A);
3068	ev_timer_again (EV_A_ &w->timer);	3185	ev_timer_again (EV_A_ &w->timer);
		3186	if (ev_is_active (&w->timer)) ev_unref (EV_A);
		3187	}
3069	}	3188	}
3070	}	3189	}
3071	}	3190	}
3072		3191
3073	#endif	3192	#endif
…		…
3090	static void noinline	3209	static void noinline
3091	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3210	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3092	{	3211	{
3093	ev_stat w = (ev_stat )(((char *)w_) - offsetof (ev_stat, timer));	3212	ev_stat w = (ev_stat )(((char *)w_) - offsetof (ev_stat, timer));
3094		3213
3095	/* we copy this here each the time so that */	3214	ev_statdata prev = w->attr;
3096	/* prev has the old value when the callback gets invoked */
3097	w->prev = w->attr;
3098	ev_stat_stat (EV_A_ w);	3215	ev_stat_stat (EV_A_ w);
3099		3216
3100	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */	3217	/* memcmp doesn't work on netbsd, they.... do stuff to their struct stat */
3101	if (	3218	if (
3102	w->prev.st_dev != w->attr.st_dev	3219	prev.st_dev != w->attr.st_dev
3103	\|\| w->prev.st_ino != w->attr.st_ino	3220	\|\| prev.st_ino != w->attr.st_ino
3104	\|\| w->prev.st_mode != w->attr.st_mode	3221	\|\| prev.st_mode != w->attr.st_mode
3105	\|\| w->prev.st_nlink != w->attr.st_nlink	3222	\|\| prev.st_nlink != w->attr.st_nlink
3106	\|\| w->prev.st_uid != w->attr.st_uid	3223	\|\| prev.st_uid != w->attr.st_uid
3107	\|\| w->prev.st_gid != w->attr.st_gid	3224	\|\| prev.st_gid != w->attr.st_gid
3108	\|\| w->prev.st_rdev != w->attr.st_rdev	3225	\|\| prev.st_rdev != w->attr.st_rdev
3109	\|\| w->prev.st_size != w->attr.st_size	3226	\|\| prev.st_size != w->attr.st_size
3110	\|\| w->prev.st_atime != w->attr.st_atime	3227	\|\| prev.st_atime != w->attr.st_atime
3111	\|\| w->prev.st_mtime != w->attr.st_mtime	3228	\|\| prev.st_mtime != w->attr.st_mtime
3112	\|\| w->prev.st_ctime != w->attr.st_ctime	3229	\|\| prev.st_ctime != w->attr.st_ctime
3113	) {	3230	) {
		3231	/* we only update w->prev on actual differences */
		3232	/* in case we test more often than invoke the callback, */
		3233	/* to ensure that prev is always different to attr */
		3234	w->prev = prev;
		3235
3114	#if EV_USE_INOTIFY	3236	#if EV_USE_INOTIFY
3115	if (fs_fd >= 0)	3237	if (fs_fd >= 0)
3116	{	3238	{
3117	infy_del (EV_A_ w);	3239	infy_del (EV_A_ w);
3118	infy_add (EV_A_ w);	3240	infy_add (EV_A_ w);
…		…
3143		3265
3144	if (fs_fd >= 0)	3266	if (fs_fd >= 0)
3145	infy_add (EV_A_ w);	3267	infy_add (EV_A_ w);
3146	else	3268	else
3147	#endif	3269	#endif
		3270	{
3148	ev_timer_again (EV_A_ &w->timer);	3271	ev_timer_again (EV_A_ &w->timer);
		3272	ev_unref (EV_A);
		3273	}
3149		3274
3150	ev_start (EV_A_ (W)w, 1);	3275	ev_start (EV_A_ (W)w, 1);
3151		3276
3152	EV_FREQUENT_CHECK;	3277	EV_FREQUENT_CHECK;
3153	}	3278	}
…		…
3162	EV_FREQUENT_CHECK;	3287	EV_FREQUENT_CHECK;
3163		3288
3164	#if EV_USE_INOTIFY	3289	#if EV_USE_INOTIFY
3165	infy_del (EV_A_ w);	3290	infy_del (EV_A_ w);
3166	#endif	3291	#endif
		3292
		3293	if (ev_is_active (&w->timer))
		3294	{
		3295	ev_ref (EV_A);
3167	ev_timer_stop (EV_A_ &w->timer);	3296	ev_timer_stop (EV_A_ &w->timer);
		3297	}
3168		3298
3169	ev_stop (EV_A_ (W)w);	3299	ev_stop (EV_A_ (W)w);
3170		3300
3171	EV_FREQUENT_CHECK;	3301	EV_FREQUENT_CHECK;
3172	}	3302	}
…		…
3217		3347
3218	EV_FREQUENT_CHECK;	3348	EV_FREQUENT_CHECK;
3219	}	3349	}
3220	#endif	3350	#endif
3221		3351
		3352	#if EV_PREPARE_ENABLE
3222	void	3353	void
3223	ev_prepare_start (EV_P_ ev_prepare *w)	3354	ev_prepare_start (EV_P_ ev_prepare *w)
3224	{	3355	{
3225	if (expect_false (ev_is_active (w)))	3356	if (expect_false (ev_is_active (w)))
3226	return;	3357	return;
…		…
3252		3383
3253	ev_stop (EV_A_ (W)w);	3384	ev_stop (EV_A_ (W)w);
3254		3385
3255	EV_FREQUENT_CHECK;	3386	EV_FREQUENT_CHECK;
3256	}	3387	}
		3388	#endif
3257		3389
		3390	#if EV_CHECK_ENABLE
3258	void	3391	void
3259	ev_check_start (EV_P_ ev_check *w)	3392	ev_check_start (EV_P_ ev_check *w)
3260	{	3393	{
3261	if (expect_false (ev_is_active (w)))	3394	if (expect_false (ev_is_active (w)))
3262	return;	3395	return;
…		…
3288		3421
3289	ev_stop (EV_A_ (W)w);	3422	ev_stop (EV_A_ (W)w);
3290		3423
3291	EV_FREQUENT_CHECK;	3424	EV_FREQUENT_CHECK;
3292	}	3425	}
		3426	#endif
3293		3427
3294	#if EV_EMBED_ENABLE	3428	#if EV_EMBED_ENABLE
3295	void noinline	3429	void noinline
3296	ev_embed_sweep (EV_P_ ev_embed *w)	3430	ev_embed_sweep (EV_P_ ev_embed *w)
3297	{	3431	{
…		…
3392		3526
3393	ev_io_stop (EV_A_ &w->io);	3527	ev_io_stop (EV_A_ &w->io);
3394	ev_prepare_stop (EV_A_ &w->prepare);	3528	ev_prepare_stop (EV_A_ &w->prepare);
3395	ev_fork_stop (EV_A_ &w->fork);	3529	ev_fork_stop (EV_A_ &w->fork);
3396		3530
		3531	ev_stop (EV_A_ (W)w);
		3532
3397	EV_FREQUENT_CHECK;	3533	EV_FREQUENT_CHECK;
3398	}	3534	}
3399	#endif	3535	#endif
3400		3536
3401	#if EV_FORK_ENABLE	3537	#if EV_FORK_ENABLE
…		…
3527	{	3663	{
3528	struct ev_once once = (struct ev_once )ev_malloc (sizeof (struct ev_once));	3664	struct ev_once once = (struct ev_once )ev_malloc (sizeof (struct ev_once));
3529		3665
3530	if (expect_false (!once))	3666	if (expect_false (!once))
3531	{	3667	{
3532	cb (EV_ERROR \| EV_READ \| EV_WRITE \| EV_TIMEOUT, arg);	3668	cb (EV_ERROR \| EV_READ \| EV_WRITE \| EV_TIMER, arg);
3533	return;	3669	return;
3534	}	3670	}
3535		3671
3536	once->cb = cb;	3672	once->cb = cb;
3537	once->arg = arg;	3673	once->arg = arg;
…		…
3624	if (types & EV_ASYNC)	3760	if (types & EV_ASYNC)
3625	for (i = asynccnt; i--; )	3761	for (i = asynccnt; i--; )
3626	cb (EV_A_ EV_ASYNC, asyncs [i]);	3762	cb (EV_A_ EV_ASYNC, asyncs [i]);
3627	#endif	3763	#endif
3628		3764
		3765	#if EV_PREPARE_ENABLE
3629	if (types & EV_PREPARE)	3766	if (types & EV_PREPARE)
3630	for (i = preparecnt; i--; )	3767	for (i = preparecnt; i--; )
3631	#if EV_EMBED_ENABLE	3768	# if EV_EMBED_ENABLE
3632	if (ev_cb (prepares [i]) != embed_prepare_cb)	3769	if (ev_cb (prepares [i]) != embed_prepare_cb)
3633	#endif	3770	# endif
3634	cb (EV_A_ EV_PREPARE, prepares [i]);	3771	cb (EV_A_ EV_PREPARE, prepares [i]);
		3772	#endif
3635		3773
		3774	#if EV_CHECK_ENABLE
3636	if (types & EV_CHECK)	3775	if (types & EV_CHECK)
3637	for (i = checkcnt; i--; )	3776	for (i = checkcnt; i--; )
3638	cb (EV_A_ EV_CHECK, checks [i]);	3777	cb (EV_A_ EV_CHECK, checks [i]);
		3778	#endif
3639		3779
		3780	#if EV_SIGNAL_ENABLE
3640	if (types & EV_SIGNAL)	3781	if (types & EV_SIGNAL)
3641	for (i = 0; i < EV_NSIG - 1; ++i)	3782	for (i = 0; i < EV_NSIG - 1; ++i)
3642	for (wl = signals [i].head; wl; )	3783	for (wl = signals [i].head; wl; )
3643	{	3784	{
3644	wn = wl->next;	3785	wn = wl->next;
3645	cb (EV_A_ EV_SIGNAL, wl);	3786	cb (EV_A_ EV_SIGNAL, wl);
3646	wl = wn;	3787	wl = wn;
3647	}	3788	}
		3789	#endif
3648		3790
		3791	#if EV_CHILD_ENABLE
3649	if (types & EV_CHILD)	3792	if (types & EV_CHILD)
3650	for (i = EV_PID_HASHSIZE; i--; )	3793	for (i = (EV_PID_HASHSIZE); i--; )
3651	for (wl = childs [i]; wl; )	3794	for (wl = childs [i]; wl; )
3652	{	3795	{
3653	wn = wl->next;	3796	wn = wl->next;
3654	cb (EV_A_ EV_CHILD, wl);	3797	cb (EV_A_ EV_CHILD, wl);
3655	wl = wn;	3798	wl = wn;
3656	}	3799	}
		3800	#endif
3657	/* EV_STAT 0x00001000 /* stat data changed */	3801	/* EV_STAT 0x00001000 /* stat data changed */
3658	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3802	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3659	}	3803	}
3660	#endif	3804	#endif
3661		3805

Diff Legend

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

Comparing libev/ev.c (file contents): Revision 1.315 by root, Wed Aug 26 17:46:22 2009 UTC vs. Revision 1.350 by root, Sat Oct 16 00:59:56 2010 UTC

Diff Legend

Comparing libev/ev.c (file contents):
Revision 1.315 by root, Wed Aug 26 17:46:22 2009 UTC vs.
Revision 1.350 by root, Sat Oct 16 00:59:56 2010 UTC