ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.305 by root, Sun Jul 19 03:49:04 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 64	236	# define EV_NSIG 65
216	#endif	237	#endif
217		238
218	/* Default to some arbitrary number that's big enough to get most
219	of the common signals.
220	*/
221	#ifndef NSIG
222	# define NSIG 50
223	#endif
224	/* <-- NSIG logic from Configure */
225	#ifndef EV_USE_CLOCK_SYSCALL	239	#ifndef EV_USE_CLOCK_SYSCALL
226	# if __linux && __GLIBC__ >= 2	240	# if __linux && __GLIBC__ >= 2
227	# define EV_USE_CLOCK_SYSCALL 1	241	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
228	# else	242	# else
229	# define EV_USE_CLOCK_SYSCALL 0	243	# define EV_USE_CLOCK_SYSCALL 0
230	# endif	244	# endif
231	#endif	245	#endif
232		246
233	#ifndef EV_USE_MONOTONIC	247	#ifndef EV_USE_MONOTONIC
234	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	248	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0
235	# define EV_USE_MONOTONIC 1	249	# define EV_USE_MONOTONIC EV_FEATURE_OS
236	# else	250	# else
237	# define EV_USE_MONOTONIC 0	251	# define EV_USE_MONOTONIC 0
238	# endif	252	# endif
239	#endif	253	#endif
240		254
…		…
242	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL	256	# define EV_USE_REALTIME !EV_USE_CLOCK_SYSCALL
243	#endif	257	#endif
244		258
245	#ifndef EV_USE_NANOSLEEP	259	#ifndef EV_USE_NANOSLEEP
246	# if _POSIX_C_SOURCE >= 199309L	260	# if _POSIX_C_SOURCE >= 199309L
247	# define EV_USE_NANOSLEEP 1	261	# define EV_USE_NANOSLEEP EV_FEATURE_OS
248	# else	262	# else
249	# define EV_USE_NANOSLEEP 0	263	# define EV_USE_NANOSLEEP 0
250	# endif	264	# endif
251	#endif	265	#endif
252		266
253	#ifndef EV_USE_SELECT	267	#ifndef EV_USE_SELECT
254	# define EV_USE_SELECT 1	268	# define EV_USE_SELECT EV_FEATURE_BACKENDS
255	#endif	269	#endif
256		270
257	#ifndef EV_USE_POLL	271	#ifndef EV_USE_POLL
258	# ifdef _WIN32	272	# ifdef _WIN32
259	# define EV_USE_POLL 0	273	# define EV_USE_POLL 0
260	# else	274	# else
261	# define EV_USE_POLL 1	275	# define EV_USE_POLL EV_FEATURE_BACKENDS
262	# endif	276	# endif
263	#endif	277	#endif
264		278
265	#ifndef EV_USE_EPOLL	279	#ifndef EV_USE_EPOLL
266	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	280	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
267	# define EV_USE_EPOLL 1	281	# define EV_USE_EPOLL EV_FEATURE_BACKENDS
268	# else	282	# else
269	# define EV_USE_EPOLL 0	283	# define EV_USE_EPOLL 0
270	# endif	284	# endif
271	#endif	285	#endif
272		286
…		…
278	# define EV_USE_PORT 0	292	# define EV_USE_PORT 0
279	#endif	293	#endif
280		294
281	#ifndef EV_USE_INOTIFY	295	#ifndef EV_USE_INOTIFY
282	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))	296	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 4))
283	# define EV_USE_INOTIFY 1	297	# define EV_USE_INOTIFY EV_FEATURE_OS
284	# else	298	# else
285	# define EV_USE_INOTIFY 0	299	# define EV_USE_INOTIFY 0
286	# endif	300	# endif
287	#endif	301	#endif
288		302
289	#ifndef EV_PID_HASHSIZE	303	#ifndef EV_PID_HASHSIZE
290	# if EV_MINIMAL	304	# define EV_PID_HASHSIZE EV_FEATURE_DATA ? 16 : 1
291	# define EV_PID_HASHSIZE 1
292	# else
293	# define EV_PID_HASHSIZE 16
294	# endif
295	#endif	305	#endif
296		306
297	#ifndef EV_INOTIFY_HASHSIZE	307	#ifndef EV_INOTIFY_HASHSIZE
298	# if EV_MINIMAL	308	# define EV_INOTIFY_HASHSIZE EV_FEATURE_DATA ? 16 : 1
299	# define EV_INOTIFY_HASHSIZE 1
300	# else
301	# define EV_INOTIFY_HASHSIZE 16
302	# endif
303	#endif	309	#endif
304		310
305	#ifndef EV_USE_EVENTFD	311	#ifndef EV_USE_EVENTFD
306	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))	312	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
307	# define EV_USE_EVENTFD 1	313	# define EV_USE_EVENTFD EV_FEATURE_OS
308	# else	314	# else
309	# define EV_USE_EVENTFD 0	315	# define EV_USE_EVENTFD 0
310	# endif	316	# endif
311	#endif	317	#endif
312		318
313	#ifndef EV_USE_SIGNALFD	319	#ifndef EV_USE_SIGNALFD
314	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 9))	320	# if __linux && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 7))
315	# define EV_USE_SIGNALFD 1	321	# define EV_USE_SIGNALFD EV_FEATURE_OS
316	# else	322	# else
317	# define EV_USE_SIGNALFD 0	323	# define EV_USE_SIGNALFD 0
318	# endif	324	# endif
319	#endif	325	#endif
320		326
…		…
323	# define EV_USE_4HEAP 1	329	# define EV_USE_4HEAP 1
324	# define EV_HEAP_CACHE_AT 1	330	# define EV_HEAP_CACHE_AT 1
325	#endif	331	#endif
326		332
327	#ifndef EV_VERIFY	333	#ifndef EV_VERIFY
328	# define EV_VERIFY !EV_MINIMAL	334	# define EV_VERIFY (EV_FEATURE_API ? 1 : 0)
329	#endif	335	#endif
330		336
331	#ifndef EV_USE_4HEAP	337	#ifndef EV_USE_4HEAP
332	# define EV_USE_4HEAP !EV_MINIMAL	338	# define EV_USE_4HEAP EV_FEATURE_DATA
333	#endif	339	#endif
334		340
335	#ifndef EV_HEAP_CACHE_AT	341	#ifndef EV_HEAP_CACHE_AT
336	# define EV_HEAP_CACHE_AT !EV_MINIMAL	342	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
337	#endif	343	#endif
338		344
339	/* 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, */
340	/* which makes programs even slower. might work on other unices, too. */	346	/* which makes programs even slower. might work on other unices, too. */
341	#if EV_USE_CLOCK_SYSCALL	347	#if EV_USE_CLOCK_SYSCALL
…		…
350	# endif	356	# endif
351	#endif	357	#endif
352		358
353	/* 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 */
354		360
		361	#ifdef _AIX
		362	/* AIX has a completely broken poll.h header */
		363	# undef EV_USE_POLL
		364	# define EV_USE_POLL 0
		365	#endif
		366
355	#ifndef CLOCK_MONOTONIC	367	#ifndef CLOCK_MONOTONIC
356	# undef EV_USE_MONOTONIC	368	# undef EV_USE_MONOTONIC
357	# define EV_USE_MONOTONIC 0	369	# define EV_USE_MONOTONIC 0
358	#endif	370	#endif
359		371
…		…
393	# include <stdint.h>	405	# include <stdint.h>
394	# ifndef EFD_NONBLOCK	406	# ifndef EFD_NONBLOCK
395	# define EFD_NONBLOCK O_NONBLOCK	407	# define EFD_NONBLOCK O_NONBLOCK
396	# endif	408	# endif
397	# ifndef EFD_CLOEXEC	409	# ifndef EFD_CLOEXEC
		410	# ifdef O_CLOEXEC
398	# define EFD_CLOEXEC O_CLOEXEC	411	# define EFD_CLOEXEC O_CLOEXEC
		412	# else
		413	# define EFD_CLOEXEC 02000000
		414	# endif
399	# endif	415	# endif
400	# ifdef __cplusplus	416	# ifdef __cplusplus
401	extern "C" {	417	extern "C" {
402	# endif	418	# endif
403	int eventfd (unsigned int initval, int flags);	419	int (eventfd) (unsigned int initval, int flags);
404	# ifdef __cplusplus	420	# ifdef __cplusplus
405	}	421	}
406	# endif	422	# endif
407	#endif	423	#endif
408		424
409	#if EV_USE_SIGNALFD	425	#if EV_USE_SIGNALFD
410	# 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
411	#endif	451	#endif
412		452
413	/**/	453	/**/
414		454
415	#if EV_VERIFY >= 3	455	#if EV_VERIFY >= 3
416	# define EV_FREQUENT_CHECK ev_loop_verify (EV_A)	456	# define EV_FREQUENT_CHECK ev_verify (EV_A)
417	#else	457	#else
418	# define EV_FREQUENT_CHECK do { } while (0)	458	# define EV_FREQUENT_CHECK do { } while (0)
419	#endif	459	#endif
420		460
421	/*	461	/*
…		…
428	*/	468	*/
429	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */	469	#define TIME_EPSILON 0.0001220703125 /* 1/8192 */
430		470
431	#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) */
432	#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) */
433	/*#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)
434		476
435	#if __GNUC__ >= 4	477	#if __GNUC__ >= 4
436	# define expect(expr,value) __builtin_expect ((expr),(value))	478	# define expect(expr,value) __builtin_expect ((expr),(value))
437	# define noinline __attribute__ ((noinline))	479	# define noinline __attribute__ ((noinline))
438	#else	480	#else
…		…
445		487
446	#define expect_false(expr) expect ((expr) != 0, 0)	488	#define expect_false(expr) expect ((expr) != 0, 0)
447	#define expect_true(expr) expect ((expr) != 0, 1)	489	#define expect_true(expr) expect ((expr) != 0, 1)
448	#define inline_size static inline	490	#define inline_size static inline
449		491
450	#if EV_MINIMAL	492	#if EV_FEATURE_CODE
		493	# define inline_speed static inline
		494	#else
451	# define inline_speed static noinline	495	# define inline_speed static noinline
452	#else
453	# define inline_speed static inline
454	#endif	496	#endif
455		497
456	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)	498	#define NUMPRI (EV_MAXPRI - EV_MINPRI + 1)
457		499
458	#if EV_MINPRI == EV_MAXPRI	500	#if EV_MINPRI == EV_MAXPRI
…		…
471	#define ev_active(w) ((W)(w))->active	513	#define ev_active(w) ((W)(w))->active
472	#define ev_at(w) ((WT)(w))->at	514	#define ev_at(w) ((WT)(w))->at
473		515
474	#if EV_USE_REALTIME	516	#if EV_USE_REALTIME
475	/* 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 */
476	/* giving it a reasonably high chance of working on typical architetcures */	518	/* giving it a reasonably high chance of working on typical architectures */
477	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? */
478	#endif	520	#endif
479		521
480	#if EV_USE_MONOTONIC	522	#if EV_USE_MONOTONIC
481	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? */
482	#endif	524	#endif
483		525
		526	#ifndef EV_FD_TO_WIN32_HANDLE
		527	# define EV_FD_TO_WIN32_HANDLE(fd) _get_osfhandle (fd)
		528	#endif
		529	#ifndef EV_WIN32_HANDLE_TO_FD
		530	# define EV_WIN32_HANDLE_TO_FD(handle) _open_osfhandle (handle, 0)
		531	#endif
		532	#ifndef EV_WIN32_CLOSE_FD
		533	# define EV_WIN32_CLOSE_FD(fd) close (fd)
		534	#endif
		535
484	#ifdef _WIN32	536	#ifdef _WIN32
485	# include "ev_win32.c"	537	# include "ev_win32.c"
486	#endif	538	#endif
487		539
488	/*****************************************************************************/	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
489		549
490	static void (*syserr_cb)(const char *msg);	550	static void (*syserr_cb)(const char *msg);
491		551
492	void	552	void
493	ev_set_syserr_cb (void (*cb)(const char *msg))	553	ev_set_syserr_cb (void (*cb)(const char *msg))
…		…
503		563
504	if (syserr_cb)	564	if (syserr_cb)
505	syserr_cb (msg);	565	syserr_cb (msg);
506	else	566	else
507	{	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
508	perror (msg);	576	perror (msg);
		577	#endif
509	abort ();	578	abort ();
510	}	579	}
511	}	580	}
512		581
513	static void *	582	static void *
514	ev_realloc_emul (void *ptr, long size)	583	ev_realloc_emul (void *ptr, long size)
515	{	584	{
		585	#if __GLIBC__
		586	return realloc (ptr, size);
		587	#else
516	/* some systems, notably openbsd and darwin, fail to properly	588	/* some systems, notably openbsd and darwin, fail to properly
517	* 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
518	* the single unix specification, so work around them here.	590	* the single unix specification, so work around them here.
519	*/	591	*/
520		592
521	if (size)	593	if (size)
522	return realloc (ptr, size);	594	return realloc (ptr, size);
523		595
524	free (ptr);	596	free (ptr);
525	return 0;	597	return 0;
		598	#endif
526	}	599	}
527		600
528	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	601	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;
529		602
530	void	603	void
…		…
538	{	611	{
539	ptr = alloc (ptr, size);	612	ptr = alloc (ptr, size);
540		613
541	if (!ptr && size)	614	if (!ptr && size)
542	{	615	{
		616	#if EV_AVOID_STDIO
		617	ev_printerr ("libev: memory allocation failed, aborting.\n");
		618	#else
543	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);	619	fprintf (stderr, "libev: cannot allocate %ld bytes, aborting.", size);
		620	#endif
544	abort ();	621	abort ();
545	}	622	}
546		623
547	return ptr;	624	return ptr;
548	}	625	}
…		…
630		707
631	static int ev_default_loop_ptr;	708	static int ev_default_loop_ptr;
632		709
633	#endif	710	#endif
634		711
635	#if EV_MINIMAL < 2	712	#if EV_FEATURE_API
636	# 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)
637	# 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)
638	# define EV_INVOKE_PENDING invoke_cb (EV_A)	715	# define EV_INVOKE_PENDING invoke_cb (EV_A)
639	#else	716	#else
640	# define EV_RELEASE_CB (void)0	717	# define EV_RELEASE_CB (void)0
…		…
694	if (delay > 0.)	771	if (delay > 0.)
695	{	772	{
696	#if EV_USE_NANOSLEEP	773	#if EV_USE_NANOSLEEP
697	struct timespec ts;	774	struct timespec ts;
698		775
699	ts.tv_sec = (time_t)delay;	776	EV_TS_SET (ts, delay);
700	ts.tv_nsec = (long)((delay - (ev_tstamp)(ts.tv_sec)) * 1e9);
701
702	nanosleep (&ts, 0);	777	nanosleep (&ts, 0);
703	#elif defined(_WIN32)	778	#elif defined(_WIN32)
704	Sleep ((unsigned long)(delay * 1e3));	779	Sleep ((unsigned long)(delay * 1e3));
705	#else	780	#else
706	struct timeval tv;	781	struct timeval tv;
707		782
708	tv.tv_sec = (time_t)delay;
709	tv.tv_usec = (long)((delay - (ev_tstamp)(tv.tv_sec)) * 1e6);
710
711	/* 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 */
712	/* something not guaranteed by newer posix versions, but guaranteed */	784	/* something not guaranteed by newer posix versions, but guaranteed */
713	/* by older ones */	785	/* by older ones */
		786	EV_TV_SET (tv, delay);
714	select (0, 0, 0, 0, &tv);	787	select (0, 0, 0, 0, &tv);
715	#endif	788	#endif
716	}	789	}
717	}	790	}
718		791
719	/*****************************************************************************/	792	/*****************************************************************************/
720		793
721	#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 */
722		795
723	/* find a suitable new size for the given array, */	796	/* find a suitable new size for the given array, */
724	/* hopefully by rounding to a ncie-to-malloc size */	797	/* hopefully by rounding to a nice-to-malloc size */
725	inline_size int	798	inline_size int
726	array_nextsize (int elem, int cur, int cnt)	799	array_nextsize (int elem, int cur, int cnt)
727	{	800	{
728	int ncur = cur + 1;	801	int ncur = cur + 1;
729		802
…		…
825	}	898	}
826		899
827	/*****************************************************************************/	900	/*****************************************************************************/
828		901
829	inline_speed void	902	inline_speed void
830	fd_event_nc (EV_P_ int fd, int revents)	903	fd_event_nocheck (EV_P_ int fd, int revents)
831	{	904	{
832	ANFD *anfd = anfds + fd;	905	ANFD *anfd = anfds + fd;
833	ev_io *w;	906	ev_io *w;
834		907
835	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)
…		…
847	fd_event (EV_P_ int fd, int revents)	920	fd_event (EV_P_ int fd, int revents)
848	{	921	{
849	ANFD *anfd = anfds + fd;	922	ANFD *anfd = anfds + fd;
850		923
851	if (expect_true (!anfd->reify))	924	if (expect_true (!anfd->reify))
852	fd_event_nc (EV_A_ fd, revents);	925	fd_event_nocheck (EV_A_ fd, revents);
853	}	926	}
854		927
855	void	928	void
856	ev_feed_fd_event (EV_P_ int fd, int revents)	929	ev_feed_fd_event (EV_P_ int fd, int revents)
857	{	930	{
858	if (fd >= 0 && fd < anfdmax)	931	if (fd >= 0 && fd < anfdmax)
859	fd_event_nc (EV_A_ fd, revents);	932	fd_event_nocheck (EV_A_ fd, revents);
860	}	933	}
861		934
862	/* make sure the external fd watch events are in-sync */	935	/* make sure the external fd watch events are in-sync */
863	/* with the kernel/libev internal state */	936	/* with the kernel/libev internal state */
864	inline_size void	937	inline_size void
…		…
870	{	943	{
871	int fd = fdchanges [i];	944	int fd = fdchanges [i];
872	ANFD *anfd = anfds + fd;	945	ANFD *anfd = anfds + fd;
873	ev_io *w;	946	ev_io *w;
874		947
875	unsigned char events = 0;	948	unsigned char o_events = anfd->events;
		949	unsigned char o_reify = anfd->reify;
876		950
877	for (w = (ev_io *)anfd->head; w; w = (ev_io *)((WL)w)->next)	951	anfd->reify = 0;
878	events |= (unsigned char)w->events;
879		952
880	#if EV_SELECT_IS_WINSOCKET	953	#if EV_SELECT_IS_WINSOCKET
881	if (events)	954	if (o_reify & EV__IOFDSET)
882	{	955	{
883	unsigned long arg;	956	unsigned long arg;
884	#ifdef EV_FD_TO_WIN32_HANDLE
885	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);	957	anfd->handle = EV_FD_TO_WIN32_HANDLE (fd);
886	#else
887	anfd->handle = _get_osfhandle (fd);
888	#endif
889	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));
890	}	959	}
891	#endif	960	#endif
892		961
		962	/*if (expect_true (o_reify & EV_ANFD_REIFY)) probably a deoptimisation */
893	{	963	{
894	unsigned char o_events = anfd->events;
895	unsigned char o_reify = anfd->reify;
896
897	anfd->reify = 0;
898	anfd->events = events;	964	anfd->events = 0;
899		965
900	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)
901	backend_modify (EV_A_ fd, o_events, events);	974	backend_modify (EV_A_ fd, o_events, anfd->events);
902	}
903	}	975	}
904		976
905	fdchangecnt = 0;	977	fdchangecnt = 0;
906	}	978	}
907		979
…		…
931	ev_io_stop (EV_A_ w);	1003	ev_io_stop (EV_A_ w);
932	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);
933	}	1005	}
934	}	1006	}
935		1007
936	/* check whether the given fd is atcually valid, for error recovery */	1008	/* check whether the given fd is actually valid, for error recovery */
937	inline_size int	1009	inline_size int
938	fd_valid (int fd)	1010	fd_valid (int fd)
939	{	1011	{
940	#ifdef _WIN32	1012	#ifdef _WIN32
941	return _get_osfhandle (fd) != -1;	1013	return EV_FD_TO_WIN32_HANDLE (fd) != -1;
942	#else	1014	#else
943	return fcntl (fd, F_GETFD) != -1;	1015	return fcntl (fd, F_GETFD) != -1;
944	#endif	1016	#endif
945	}	1017	}
946		1018
…		…
964		1036
965	for (fd = anfdmax; fd--; )	1037	for (fd = anfdmax; fd--; )
966	if (anfds [fd].events)	1038	if (anfds [fd].events)
967	{	1039	{
968	fd_kill (EV_A_ fd);	1040	fd_kill (EV_A_ fd);
969	return;	1041	break;
970	}	1042	}
971	}	1043	}
972		1044
973	/* usually called after fork if backend needs to re-arm all fds from scratch */	1045	/* usually called after fork if backend needs to re-arm all fds from scratch */
974	static void noinline	1046	static void noinline
…		…
983	anfds [fd].emask = 0;	1055	anfds [fd].emask = 0;
984	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);	1056	fd_change (EV_A_ fd, EV__IOFDSET | EV_ANFD_REIFY);
985	}	1057	}
986	}	1058	}
987		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
988	/*****************************************************************************/	1074	/*****************************************************************************/
989		1075
990	/*	1076	/*
991	* 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
992	* 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
993	* the branching factor of the d-tree.	1079	* the branching factor of the d-tree.
994	*/	1080	*/
995		1081
996	/*	1082	/*
…		…
1064		1150
1065	for (;;)	1151	for (;;)
1066	{	1152	{
1067	int c = k << 1;	1153	int c = k << 1;
1068		1154
1069	if (c > N + HEAP0 - 1)	1155	if (c >= N + HEAP0)
1070	break;	1156	break;
1071		1157
1072	c += c + 1 < N + HEAP0 && ANHE_at (heap [c]) > ANHE_at (heap [c + 1])	1158	c += c + 1 < N + HEAP0 && ANHE_at (heap [c]) > ANHE_at (heap [c + 1])
1073	? 1 : 0;	1159	? 1 : 0;
1074		1160
…		…
1110		1196
1111	/* move an element suitably so it is in a correct place */	1197	/* move an element suitably so it is in a correct place */
1112	inline_size void	1198	inline_size void
1113	adjustheap (ANHE *heap, int N, int k)	1199	adjustheap (ANHE *heap, int N, int k)
1114	{	1200	{
1115	if (k > HEAP0 && ANHE_at (heap [HPARENT (k)]) >= ANHE_at (heap [k]))	1201	if (k > HEAP0 && ANHE_at (heap [k]) <= ANHE_at (heap [HPARENT (k)]))
1116	upheap (heap, k);	1202	upheap (heap, k);
1117	else	1203	else
1118	downheap (heap, N, k);	1204	downheap (heap, N, k);
1119	}	1205	}
1120		1206
…		…
1133	/*****************************************************************************/	1219	/*****************************************************************************/
1134		1220
1135	/* associate signal watchers to a signal signal */	1221	/* associate signal watchers to a signal signal */
1136	typedef struct	1222	typedef struct
1137	{	1223	{
		1224	EV_ATOMIC_T pending;
		1225	#if EV_MULTIPLICITY
		1226	EV_P;
		1227	#endif
1138	WL head;	1228	WL head;
1139	EV_ATOMIC_T gotsig;
1140	} ANSIG;	1229	} ANSIG;
1141		1230
1142	static ANSIG *signals;	1231	static ANSIG signals [EV_NSIG - 1];
1143	static int signalmax;
1144
1145	static EV_ATOMIC_T gotsig;
1146		1232
1147	/*****************************************************************************/	1233	/*****************************************************************************/
1148		1234
1149	/* used to prepare libev internal fd's */	1235	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1150	/* this is not fork-safe */
1151	inline_speed void
1152	fd_intern (int fd)
1153	{
1154	#ifdef _WIN32
1155	unsigned long arg = 1;
1156	ioctlsocket (_get_osfhandle (fd), FIONBIO, &arg);
1157	#else
1158	fcntl (fd, F_SETFD, FD_CLOEXEC);
1159	fcntl (fd, F_SETFL, O_NONBLOCK);
1160	#endif
1161	}
1162		1236
1163	static void noinline	1237	static void noinline
1164	evpipe_init (EV_P)	1238	evpipe_init (EV_P)
1165	{	1239	{
1166	if (!ev_is_active (&pipe_w))	1240	if (!ev_is_active (&pipe_w))
1167	{	1241	{
1168	#if EV_USE_EVENTFD	1242	# if EV_USE_EVENTFD
1169	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	1243	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1170	if (evfd < 0 && errno == EINVAL)	1244	if (evfd < 0 && errno == EINVAL)
1171	evfd = eventfd (0, 0);	1245	evfd = eventfd (0, 0);
1172		1246
1173	if (evfd >= 0)	1247	if (evfd >= 0)
…		…
1175	evpipe [0] = -1;	1249	evpipe [0] = -1;
1176	fd_intern (evfd); /* doing it twice doesn't hurt */	1250	fd_intern (evfd); /* doing it twice doesn't hurt */
1177	ev_io_set (&pipe_w, evfd, EV_READ);	1251	ev_io_set (&pipe_w, evfd, EV_READ);
1178	}	1252	}
1179	else	1253	else
1180	#endif	1254	# endif
1181	{	1255	{
1182	while (pipe (evpipe))	1256	while (pipe (evpipe))
1183	ev_syserr ("(libev) error creating signal/async pipe");	1257	ev_syserr ("(libev) error creating signal/async pipe");
1184		1258
1185	fd_intern (evpipe [0]);	1259	fd_intern (evpipe [0]);
…		…
1196	evpipe_write (EV_P_ EV_ATOMIC_T *flag)	1270	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1197	{	1271	{
1198	if (!*flag)	1272	if (!*flag)
1199	{	1273	{
1200	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;
1201		1276
1202	*flag = 1;	1277	*flag = 1;
1203		1278
1204	#if EV_USE_EVENTFD	1279	#if EV_USE_EVENTFD
1205	if (evfd >= 0)	1280	if (evfd >= 0)
…		…
1207	uint64_t counter = 1;	1282	uint64_t counter = 1;
1208	write (evfd, &counter, sizeof (uint64_t));	1283	write (evfd, &counter, sizeof (uint64_t));
1209	}	1284	}
1210	else	1285	else
1211	#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. */
1212	write (evpipe [1], &old_errno, 1);	1292	write (evpipe [1], &dummy, 1);
1213		1293
1214	errno = old_errno;	1294	errno = old_errno;
1215	}	1295	}
1216	}	1296	}
1217		1297
1218	/* called whenever the libev signal pipe */	1298	/* called whenever the libev signal pipe */
1219	/* got some events (signal, async) */	1299	/* got some events (signal, async) */
1220	static void	1300	static void
1221	pipecb (EV_P_ ev_io *iow, int revents)	1301	pipecb (EV_P_ ev_io *iow, int revents)
1222	{	1302	{
		1303	int i;
		1304
1223	#if EV_USE_EVENTFD	1305	#if EV_USE_EVENTFD
1224	if (evfd >= 0)	1306	if (evfd >= 0)
1225	{	1307	{
1226	uint64_t counter;	1308	uint64_t counter;
1227	read (evfd, &counter, sizeof (uint64_t));	1309	read (evfd, &counter, sizeof (uint64_t));
1228	}	1310	}
1229	else	1311	else
1230	#endif	1312	#endif
1231	{	1313	{
1232	char dummy;	1314	char dummy;
		1315	/* see discussion in evpipe_write when you think this read should be recv in win32 */
1233	read (evpipe [0], &dummy, 1);	1316	read (evpipe [0], &dummy, 1);
1234	}	1317	}
1235		1318
1236	if (gotsig && ev_is_default_loop (EV_A))	1319	if (sig_pending)
1237	{	1320	{
1238	int signum;	1321	sig_pending = 0;
1239	gotsig = 0;
1240		1322
1241	for (signum = signalmax; signum--; )	1323	for (i = EV_NSIG - 1; i--; )
1242	if (signals [signum].gotsig)	1324	if (expect_false (signals [i].pending))
1243	ev_feed_signal_event (EV_A_ signum + 1);	1325	ev_feed_signal_event (EV_A_ i + 1);
1244	}	1326	}
1245		1327
1246	#if EV_ASYNC_ENABLE	1328	#if EV_ASYNC_ENABLE
1247	if (gotasync)	1329	if (async_pending)
1248	{	1330	{
1249	int i;	1331	async_pending = 0;
1250	gotasync = 0;
1251		1332
1252	for (i = asynccnt; i--; )	1333	for (i = asynccnt; i--; )
1253	if (asyncs [i]->sent)	1334	if (asyncs [i]->sent)
1254	{	1335	{
1255	asyncs [i]->sent = 0;	1336	asyncs [i]->sent = 0;
…		…
1263		1344
1264	static void	1345	static void
1265	ev_sighandler (int signum)	1346	ev_sighandler (int signum)
1266	{	1347	{
1267	#if EV_MULTIPLICITY	1348	#if EV_MULTIPLICITY
1268	struct ev_loop *loop = &default_loop_struct;	1349	EV_P = signals [signum - 1].loop;
1269	#endif	1350	#endif
1270		1351
1271	#if _WIN32	1352	#ifdef _WIN32
1272	signal (signum, ev_sighandler);	1353	signal (signum, ev_sighandler);
1273	#endif	1354	#endif
1274		1355
1275	signals [signum - 1].gotsig = 1;	1356	signals [signum - 1].pending = 1;
1276	evpipe_write (EV_A_ &gotsig);	1357	evpipe_write (EV_A_ &sig_pending);
1277	}	1358	}
1278		1359
1279	void noinline	1360	void noinline
1280	ev_feed_signal_event (EV_P_ int signum)	1361	ev_feed_signal_event (EV_P_ int signum)
1281	{	1362	{
1282	WL w;	1363	WL w;
1283		1364
		1365	if (expect_false (signum <= 0 || signum > EV_NSIG))
		1366	return;
		1367
		1368	--signum;
		1369
1284	#if EV_MULTIPLICITY	1370	#if EV_MULTIPLICITY
1285	assert (("libev: feeding signal events is only supported in the default loop", loop == ev_default_loop_ptr));	1371	/* it is permissible to try to feed a signal to the wrong loop */
1286	#endif	1372	/* or, likely more useful, feeding a signal nobody is waiting for */
1287		1373
1288	--signum;	1374	if (expect_false (signals [signum].loop != EV_A))
1289
1290	if (signum < 0 || signum >= signalmax)
1291	return;	1375	return;
		1376	#endif
1292		1377
1293	signals [signum].gotsig = 0;	1378	signals [signum].pending = 0;
1294		1379
1295	for (w = signals [signum].head; w; w = w->next)	1380	for (w = signals [signum].head; w; w = w->next)
1296	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);	1381	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);
1297	}	1382	}
1298		1383
1299	#if EV_USE_SIGNALFD	1384	#if EV_USE_SIGNALFD
1300	static void	1385	static void
1301	sigfdcb (EV_P_ ev_io *iow, int revents)	1386	sigfdcb (EV_P_ ev_io *iow, int revents)
1302	{	1387	{
1303	struct signalfd_siginfo si[4], *sip;	1388	struct signalfd_siginfo si[2], *sip; /* these structs are big */
1304		1389
1305	for (;;)	1390	for (;;)
1306	{	1391	{
1307	ssize_t res = read (sigfd, si, sizeof (si));	1392	ssize_t res = read (sigfd, si, sizeof (si));
1308		1393
…		…
1314	break;	1399	break;
1315	}	1400	}
1316	}	1401	}
1317	#endif	1402	#endif
1318		1403
		1404	#endif
		1405
1319	/*****************************************************************************/	1406	/*****************************************************************************/
1320		1407
		1408	#if EV_CHILD_ENABLE
1321	static WL childs [EV_PID_HASHSIZE];	1409	static WL childs [EV_PID_HASHSIZE];
1322
1323	#ifndef _WIN32
1324		1410
1325	static ev_signal childev;	1411	static ev_signal childev;
1326		1412
1327	#ifndef WIFCONTINUED	1413	#ifndef WIFCONTINUED
1328	# define WIFCONTINUED(status) 0	1414	# define WIFCONTINUED(status) 0
…		…
1333	child_reap (EV_P_ int chain, int pid, int status)	1419	child_reap (EV_P_ int chain, int pid, int status)
1334	{	1420	{
1335	ev_child *w;	1421	ev_child *w;
1336	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);	1422	int traced = WIFSTOPPED (status) || WIFCONTINUED (status);
1337		1423
1338	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)
1339	{	1425	{
1340	if ((w->pid == pid || !w->pid)	1426	if ((w->pid == pid || !w->pid)
1341	&& (!traced || (w->flags & 1)))	1427	&& (!traced || (w->flags & 1)))
1342	{	1428	{
1343	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 */
…		…
1368	/* 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 */
1369	/* 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 */
1370	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);	1456	ev_feed_event (EV_A_ (W)sw, EV_SIGNAL);
1371		1457
1372	child_reap (EV_A_ pid, pid, status);	1458	child_reap (EV_A_ pid, pid, status);
1373	if (EV_PID_HASHSIZE > 1)	1459	if ((EV_PID_HASHSIZE) > 1)
1374	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 */
1375	}	1461	}
1376		1462
1377	#endif	1463	#endif
1378		1464
…		…
1445	#ifdef __APPLE__	1531	#ifdef __APPLE__
1446	/* only select works correctly on that "unix-certified" platform */	1532	/* only select works correctly on that "unix-certified" platform */
1447	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */	1533	flags &= ~EVBACKEND_KQUEUE; /* horribly broken, even for sockets */
1448	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 */
1449	#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
1450		1539
1451	return flags;	1540	return flags;
1452	}	1541	}
1453		1542
1454	unsigned int	1543	unsigned int
…		…
1467	ev_backend (EV_P)	1556	ev_backend (EV_P)
1468	{	1557	{
1469	return backend;	1558	return backend;
1470	}	1559	}
1471		1560
1472	#if EV_MINIMAL < 2	1561	#if EV_FEATURE_API
1473	unsigned int	1562	unsigned int
1474	ev_loop_count (EV_P)	1563	ev_iteration (EV_P)
1475	{	1564	{
1476	return loop_count;	1565	return loop_count;
1477	}	1566	}
1478		1567
1479	unsigned int	1568	unsigned int
1480	ev_loop_depth (EV_P)	1569	ev_depth (EV_P)
1481	{	1570	{
1482	return loop_depth;	1571	return loop_depth;
1483	}	1572	}
1484		1573
1485	void	1574	void
…		…
1542	if (!clock_gettime (CLOCK_MONOTONIC, &ts))	1631	if (!clock_gettime (CLOCK_MONOTONIC, &ts))
1543	have_monotonic = 1;	1632	have_monotonic = 1;
1544	}	1633	}
1545	#endif	1634	#endif
1546		1635
		1636	/* pid check not overridable via env */
		1637	#ifndef _WIN32
		1638	if (flags & EVFLAG_FORKCHECK)
		1639	curpid = getpid ();
		1640	#endif
		1641
		1642	if (!(flags & EVFLAG_NOENV)
		1643	&& !enable_secure ()
		1644	&& getenv ("LIBEV_FLAGS"))
		1645	flags = atoi (getenv ("LIBEV_FLAGS"));
		1646
1547	ev_rt_now = ev_time ();	1647	ev_rt_now = ev_time ();
1548	mn_now = get_clock ();	1648	mn_now = get_clock ();
1549	now_floor = mn_now;	1649	now_floor = mn_now;
1550	rtmn_diff = ev_rt_now - mn_now;	1650	rtmn_diff = ev_rt_now - mn_now;
1551	#if EV_MINIMAL < 2	1651	#if EV_FEATURE_API
1552	invoke_cb = ev_invoke_pending;	1652	invoke_cb = ev_invoke_pending;
1553	#endif	1653	#endif
1554		1654
1555	io_blocktime = 0.;	1655	io_blocktime = 0.;
1556	timeout_blocktime = 0.;	1656	timeout_blocktime = 0.;
1557	backend = 0;	1657	backend = 0;
1558	backend_fd = -1;	1658	backend_fd = -1;
1559	gotasync = 0;	1659	sig_pending = 0;
		1660	#if EV_ASYNC_ENABLE
		1661	async_pending = 0;
		1662	#endif
1560	#if EV_USE_INOTIFY	1663	#if EV_USE_INOTIFY
1561	fs_fd = -2;	1664	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
1562	#endif	1665	#endif
1563	#if EV_USE_SIGNALFD	1666	#if EV_USE_SIGNALFD
1564	sigfd = -2;	1667	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
1565	#endif	1668	#endif
1566
1567	/* pid check not overridable via env */
1568	#ifndef _WIN32
1569	if (flags & EVFLAG_FORKCHECK)
1570	curpid = getpid ();
1571	#endif
1572
1573	if (!(flags & EVFLAG_NOENV)
1574	&& !enable_secure ()
1575	&& getenv ("LIBEV_FLAGS"))
1576	flags = atoi (getenv ("LIBEV_FLAGS"));
1577		1669
1578	if (!(flags & 0x0000ffffU))	1670	if (!(flags & 0x0000ffffU))
1579	flags |= ev_recommended_backends ();	1671	flags |= ev_recommended_backends ();
1580		1672
1581	#if EV_USE_PORT	1673	#if EV_USE_PORT
…		…
1594	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);	1686	if (!backend && (flags & EVBACKEND_SELECT)) backend = select_init (EV_A_ flags);
1595	#endif	1687	#endif
1596		1688
1597	ev_prepare_init (&pending_w, pendingcb);	1689	ev_prepare_init (&pending_w, pendingcb);
1598		1690
		1691	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1599	ev_init (&pipe_w, pipecb);	1692	ev_init (&pipe_w, pipecb);
1600	ev_set_priority (&pipe_w, EV_MAXPRI);	1693	ev_set_priority (&pipe_w, EV_MAXPRI);
		1694	#endif
1601	}	1695	}
1602	}	1696	}
1603		1697
1604	/* free up a loop structure */	1698	/* free up a loop structure */
1605	static void noinline	1699	static void noinline
…		…
1617	close (evfd);	1711	close (evfd);
1618	#endif	1712	#endif
1619		1713
1620	if (evpipe [0] >= 0)	1714	if (evpipe [0] >= 0)
1621	{	1715	{
1622	close (evpipe [0]);	1716	EV_WIN32_CLOSE_FD (evpipe [0]);
1623	close (evpipe [1]);	1717	EV_WIN32_CLOSE_FD (evpipe [1]);
1624	}	1718	}
1625	}	1719	}
1626		1720
1627	#if EV_USE_SIGNALFD	1721	#if EV_USE_SIGNALFD
1628	if (ev_is_active (&sigfd_w))	1722	if (ev_is_active (&sigfd_w))
1629	{
1630	/*ev_ref (EV_A);*/
1631	/*ev_io_stop (EV_A_ &sigfd_w);*/
1632
1633	close (sigfd);	1723	close (sigfd);
1634	}
1635	#endif	1724	#endif
1636		1725
1637	#if EV_USE_INOTIFY	1726	#if EV_USE_INOTIFY
1638	if (fs_fd >= 0)	1727	if (fs_fd >= 0)
1639	close (fs_fd);	1728	close (fs_fd);
…		…
1709		1798
1710	if (ev_is_active (&pipe_w))	1799	if (ev_is_active (&pipe_w))
1711	{	1800	{
1712	/* this "locks" the handlers against writing to the pipe */	1801	/* this "locks" the handlers against writing to the pipe */
1713	/* while we modify the fd vars */	1802	/* while we modify the fd vars */
1714	gotsig = 1;	1803	sig_pending = 1;
1715	#if EV_ASYNC_ENABLE	1804	#if EV_ASYNC_ENABLE
1716	gotasync = 1;	1805	async_pending = 1;
1717	#endif	1806	#endif
1718		1807
1719	ev_ref (EV_A);	1808	ev_ref (EV_A);
1720	ev_io_stop (EV_A_ &pipe_w);	1809	ev_io_stop (EV_A_ &pipe_w);
1721		1810
…		…
1724	close (evfd);	1813	close (evfd);
1725	#endif	1814	#endif
1726		1815
1727	if (evpipe [0] >= 0)	1816	if (evpipe [0] >= 0)
1728	{	1817	{
1729	close (evpipe [0]);	1818	EV_WIN32_CLOSE_FD (evpipe [0]);
1730	close (evpipe [1]);	1819	EV_WIN32_CLOSE_FD (evpipe [1]);
1731	}	1820	}
1732		1821
		1822	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
1733	evpipe_init (EV_A);	1823	evpipe_init (EV_A);
1734	/* now iterate over everything, in case we missed something */	1824	/* now iterate over everything, in case we missed something */
1735	pipecb (EV_A_ &pipe_w, EV_READ);	1825	pipecb (EV_A_ &pipe_w, EV_READ);
		1826	#endif
1736	}	1827	}
1737		1828
1738	postfork = 0;	1829	postfork = 0;
1739	}	1830	}
1740		1831
1741	#if EV_MULTIPLICITY	1832	#if EV_MULTIPLICITY
1742		1833
1743	struct ev_loop *	1834	struct ev_loop *
1744	ev_loop_new (unsigned int flags)	1835	ev_loop_new (unsigned int flags)
1745	{	1836	{
1746	struct ev_loop *loop = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));	1837	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));
1747		1838
1748	memset (loop, 0, sizeof (struct ev_loop));	1839	memset (EV_A, 0, sizeof (struct ev_loop));
1749	loop_init (EV_A_ flags);	1840	loop_init (EV_A_ flags);
1750		1841
1751	if (ev_backend (EV_A))	1842	if (ev_backend (EV_A))
1752	return loop;	1843	return EV_A;
1753		1844
1754	return 0;	1845	return 0;
1755	}	1846	}
1756		1847
1757	void	1848	void
…		…
1802	verify_watcher (EV_A_ ws [cnt]);	1893	verify_watcher (EV_A_ ws [cnt]);
1803	}	1894	}
1804	}	1895	}
1805	#endif	1896	#endif
1806		1897
1807	#if EV_MINIMAL < 2	1898	#if EV_FEATURE_API
1808	void	1899	void
1809	ev_loop_verify (EV_P)	1900	ev_verify (EV_P)
1810	{	1901	{
1811	#if EV_VERIFY	1902	#if EV_VERIFY
1812	int i;	1903	int i;
1813	WL w;	1904	WL w;
1814		1905
…		…
1853	#if EV_ASYNC_ENABLE	1944	#if EV_ASYNC_ENABLE
1854	assert (asyncmax >= asynccnt);	1945	assert (asyncmax >= asynccnt);
1855	array_verify (EV_A_ (W *)asyncs, asynccnt);	1946	array_verify (EV_A_ (W *)asyncs, asynccnt);
1856	#endif	1947	#endif
1857		1948
		1949	#if EV_PREPARE_ENABLE
1858	assert (preparemax >= preparecnt);	1950	assert (preparemax >= preparecnt);
1859	array_verify (EV_A_ (W *)prepares, preparecnt);	1951	array_verify (EV_A_ (W *)prepares, preparecnt);
		1952	#endif
1860		1953
		1954	#if EV_CHECK_ENABLE
1861	assert (checkmax >= checkcnt);	1955	assert (checkmax >= checkcnt);
1862	array_verify (EV_A_ (W *)checks, checkcnt);	1956	array_verify (EV_A_ (W *)checks, checkcnt);
		1957	#endif
1863		1958
1864	# if 0	1959	# if 0
		1960	#if EV_CHILD_ENABLE
1865	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)
1866	for (signum = signalmax; signum--; ) if (signals [signum].gotsig)	1962	for (signum = EV_NSIG; signum--; ) if (signals [signum].pending)
		1963	#endif
1867	# endif	1964	# endif
1868	#endif	1965	#endif
1869	}	1966	}
1870	#endif	1967	#endif
1871		1968
…		…
1878	#endif	1975	#endif
1879	{	1976	{
1880	if (!ev_default_loop_ptr)	1977	if (!ev_default_loop_ptr)
1881	{	1978	{
1882	#if EV_MULTIPLICITY	1979	#if EV_MULTIPLICITY
1883	struct ev_loop *loop = ev_default_loop_ptr = &default_loop_struct;	1980	EV_P = ev_default_loop_ptr = &default_loop_struct;
1884	#else	1981	#else
1885	ev_default_loop_ptr = 1;	1982	ev_default_loop_ptr = 1;
1886	#endif	1983	#endif
1887		1984
1888	loop_init (EV_A_ flags);	1985	loop_init (EV_A_ flags);
1889		1986
1890	if (ev_backend (EV_A))	1987	if (ev_backend (EV_A))
1891	{	1988	{
1892	#ifndef _WIN32	1989	#if EV_CHILD_ENABLE
1893	ev_signal_init (&childev, childcb, SIGCHLD);	1990	ev_signal_init (&childev, childcb, SIGCHLD);
1894	ev_set_priority (&childev, EV_MAXPRI);	1991	ev_set_priority (&childev, EV_MAXPRI);
1895	ev_signal_start (EV_A_ &childev);	1992	ev_signal_start (EV_A_ &childev);
1896	ev_unref (EV_A); /* child watcher should not keep loop alive */	1993	ev_unref (EV_A); /* child watcher should not keep loop alive */
1897	#endif	1994	#endif
…		…
1905		2002
1906	void	2003	void
1907	ev_default_destroy (void)	2004	ev_default_destroy (void)
1908	{	2005	{
1909	#if EV_MULTIPLICITY	2006	#if EV_MULTIPLICITY
1910	struct ev_loop *loop = ev_default_loop_ptr;	2007	EV_P = ev_default_loop_ptr;
1911	#endif	2008	#endif
1912		2009
1913	ev_default_loop_ptr = 0;	2010	ev_default_loop_ptr = 0;
1914		2011
1915	#ifndef _WIN32	2012	#if EV_CHILD_ENABLE
1916	ev_ref (EV_A); /* child watcher */	2013	ev_ref (EV_A); /* child watcher */
1917	ev_signal_stop (EV_A_ &childev);	2014	ev_signal_stop (EV_A_ &childev);
1918	#endif	2015	#endif
1919		2016
1920	loop_destroy (EV_A);	2017	loop_destroy (EV_A);
…		…
1922		2019
1923	void	2020	void
1924	ev_default_fork (void)	2021	ev_default_fork (void)
1925	{	2022	{
1926	#if EV_MULTIPLICITY	2023	#if EV_MULTIPLICITY
1927	struct ev_loop *loop = ev_default_loop_ptr;	2024	EV_P = ev_default_loop_ptr;
1928	#endif	2025	#endif
1929		2026
1930	postfork = 1; /* must be in line with ev_loop_fork */	2027	postfork = 1; /* must be in line with ev_loop_fork */
1931	}	2028	}
1932		2029
…		…
2026	EV_FREQUENT_CHECK;	2123	EV_FREQUENT_CHECK;
2027	feed_reverse (EV_A_ (W)w);	2124	feed_reverse (EV_A_ (W)w);
2028	}	2125	}
2029	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);	2126	while (timercnt && ANHE_at (timers [HEAP0]) < mn_now);
2030		2127
2031	feed_reverse_done (EV_A_ EV_TIMEOUT);	2128	feed_reverse_done (EV_A_ EV_TIMER);
2032	}	2129	}
2033	}	2130	}
2034		2131
2035	#if EV_PERIODIC_ENABLE	2132	#if EV_PERIODIC_ENABLE
2036	/* make periodics pending */	2133	/* make periodics pending */
…		…
2089	feed_reverse_done (EV_A_ EV_PERIODIC);	2186	feed_reverse_done (EV_A_ EV_PERIODIC);
2090	}	2187	}
2091	}	2188	}
2092		2189
2093	/* simply recalculate all periodics */	2190	/* simply recalculate all periodics */
2094	/* 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? */
2095	static void noinline	2192	static void noinline
2096	periodics_reschedule (EV_P)	2193	periodics_reschedule (EV_P)
2097	{	2194	{
2098	int i;	2195	int i;
2099		2196
…		…
2127	ANHE_at_cache (*he);	2224	ANHE_at_cache (*he);
2128	}	2225	}
2129	}	2226	}
2130		2227
2131	/* fetch new monotonic and realtime times from the kernel */	2228	/* fetch new monotonic and realtime times from the kernel */
2132	/* also detetc if there was a timejump, and act accordingly */	2229	/* also detect if there was a timejump, and act accordingly */
2133	inline_speed void	2230	inline_speed void
2134	time_update (EV_P_ ev_tstamp max_block)	2231	time_update (EV_P_ ev_tstamp max_block)
2135	{	2232	{
2136	#if EV_USE_MONOTONIC	2233	#if EV_USE_MONOTONIC
2137	if (expect_true (have_monotonic))	2234	if (expect_true (have_monotonic))
…		…
2197	}	2294	}
2198		2295
2199	void	2296	void
2200	ev_loop (EV_P_ int flags)	2297	ev_loop (EV_P_ int flags)
2201	{	2298	{
2202	#if EV_MINIMAL < 2	2299	#if EV_FEATURE_API
2203	++loop_depth;	2300	++loop_depth;
2204	#endif	2301	#endif
2205		2302
2206	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));
2207		2304
…		…
2210	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 */
2211		2308
2212	do	2309	do
2213	{	2310	{
2214	#if EV_VERIFY >= 2	2311	#if EV_VERIFY >= 2
2215	ev_loop_verify (EV_A);	2312	ev_verify (EV_A);
2216	#endif	2313	#endif
2217		2314
2218	#ifndef _WIN32	2315	#ifndef _WIN32
2219	if (expect_false (curpid)) /* penalise the forking check even more */	2316	if (expect_false (curpid)) /* penalise the forking check even more */
2220	if (expect_false (getpid () != curpid))	2317	if (expect_false (getpid () != curpid))
…		…
2232	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);	2329	queue_events (EV_A_ (W *)forks, forkcnt, EV_FORK);
2233	EV_INVOKE_PENDING;	2330	EV_INVOKE_PENDING;
2234	}	2331	}
2235	#endif	2332	#endif
2236		2333
		2334	#if EV_PREPARE_ENABLE
2237	/* queue prepare watchers (and execute them) */	2335	/* queue prepare watchers (and execute them) */
2238	if (expect_false (preparecnt))	2336	if (expect_false (preparecnt))
2239	{	2337	{
2240	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);	2338	queue_events (EV_A_ (W *)prepares, preparecnt, EV_PREPARE);
2241	EV_INVOKE_PENDING;	2339	EV_INVOKE_PENDING;
2242	}	2340	}
		2341	#endif
2243		2342
2244	if (expect_false (loop_done))	2343	if (expect_false (loop_done))
2245	break;	2344	break;
2246		2345
2247	/* we might have forked, so reify kernel state if necessary */	2346	/* we might have forked, so reify kernel state if necessary */
…		…
2298	waittime -= sleeptime;	2397	waittime -= sleeptime;
2299	}	2398	}
2300	}	2399	}
2301	}	2400	}
2302		2401
2303	#if EV_MINIMAL < 2	2402	#if EV_FEATURE_API
2304	++loop_count;	2403	++loop_count;
2305	#endif	2404	#endif
2306	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */	2405	assert ((loop_done = EVUNLOOP_RECURSE, 1)); /* assert for side effect */
2307	backend_poll (EV_A_ waittime);	2406	backend_poll (EV_A_ waittime);
2308	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */	2407	assert ((loop_done = EVUNLOOP_CANCEL, 1)); /* assert for side effect */
…		…
2320	#if EV_IDLE_ENABLE	2419	#if EV_IDLE_ENABLE
2321	/* queue idle watchers unless other events are pending */	2420	/* queue idle watchers unless other events are pending */
2322	idle_reify (EV_A);	2421	idle_reify (EV_A);
2323	#endif	2422	#endif
2324		2423
		2424	#if EV_CHECK_ENABLE
2325	/* queue check watchers, to be executed first */	2425	/* queue check watchers, to be executed first */
2326	if (expect_false (checkcnt))	2426	if (expect_false (checkcnt))
2327	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);	2427	queue_events (EV_A_ (W *)checks, checkcnt, EV_CHECK);
		2428	#endif
2328		2429
2329	EV_INVOKE_PENDING;	2430	EV_INVOKE_PENDING;
2330	}	2431	}
2331	while (expect_true (	2432	while (expect_true (
2332	activecnt	2433	activecnt
…		…
2335	));	2436	));
2336		2437
2337	if (loop_done == EVUNLOOP_ONE)	2438	if (loop_done == EVUNLOOP_ONE)
2338	loop_done = EVUNLOOP_CANCEL;	2439	loop_done = EVUNLOOP_CANCEL;
2339		2440
2340	#if EV_MINIMAL < 2	2441	#if EV_FEATURE_API
2341	--loop_depth;	2442	--loop_depth;
2342	#endif	2443	#endif
2343	}	2444	}
2344		2445
2345	void	2446	void
…		…
2398	inline_size void	2499	inline_size void
2399	wlist_del (WL *head, WL elem)	2500	wlist_del (WL *head, WL elem)
2400	{	2501	{
2401	while (*head)	2502	while (*head)
2402	{	2503	{
2403	if (*head == elem)	2504	if (expect_true (*head == elem))
2404	{	2505	{
2405	*head = elem->next;	2506	*head = elem->next;
2406	return;	2507	break;
2407	}	2508	}
2408		2509
2409	head = &(*head)->next;	2510	head = &(*head)->next;
2410	}	2511	}
2411	}	2512	}
…		…
2471		2572
2472	if (expect_false (ev_is_active (w)))	2573	if (expect_false (ev_is_active (w)))
2473	return;	2574	return;
2474		2575
2475	assert (("libev: ev_io_start called with negative fd", fd >= 0));	2576	assert (("libev: ev_io_start called with negative fd", fd >= 0));
2476	assert (("libev: ev_io start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));	2577	assert (("libev: ev_io_start called with illegal event mask", !(w->events & ~(EV__IOFDSET | EV_READ | EV_WRITE))));
2477		2578
2478	EV_FREQUENT_CHECK;	2579	EV_FREQUENT_CHECK;
2479		2580
2480	ev_start (EV_A_ (W)w, 1);	2581	ev_start (EV_A_ (W)w, 1);
2481	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	2582	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
…		…
2499	EV_FREQUENT_CHECK;	2600	EV_FREQUENT_CHECK;
2500		2601
2501	wlist_del (&anfds[w->fd].head, (WL)w);	2602	wlist_del (&anfds[w->fd].head, (WL)w);
2502	ev_stop (EV_A_ (W)w);	2603	ev_stop (EV_A_ (W)w);
2503		2604
2504	fd_change (EV_A_ w->fd, 1);	2605	fd_change (EV_A_ w->fd, EV_ANFD_REIFY);
2505		2606
2506	EV_FREQUENT_CHECK;	2607	EV_FREQUENT_CHECK;
2507	}	2608	}
2508		2609
2509	void noinline	2610	void noinline
…		…
2551	timers [active] = timers [timercnt + HEAP0];	2652	timers [active] = timers [timercnt + HEAP0];
2552	adjustheap (timers, timercnt, active);	2653	adjustheap (timers, timercnt, active);
2553	}	2654	}
2554	}	2655	}
2555		2656
2556	EV_FREQUENT_CHECK;
2557
2558	ev_at (w) -= mn_now;	2657	ev_at (w) -= mn_now;
2559		2658
2560	ev_stop (EV_A_ (W)w);	2659	ev_stop (EV_A_ (W)w);
		2660
		2661	EV_FREQUENT_CHECK;
2561	}	2662	}
2562		2663
2563	void noinline	2664	void noinline
2564	ev_timer_again (EV_P_ ev_timer *w)	2665	ev_timer_again (EV_P_ ev_timer *w)
2565	{	2666	{
…		…
2644	periodics [active] = periodics [periodiccnt + HEAP0];	2745	periodics [active] = periodics [periodiccnt + HEAP0];
2645	adjustheap (periodics, periodiccnt, active);	2746	adjustheap (periodics, periodiccnt, active);
2646	}	2747	}
2647	}	2748	}
2648		2749
2649	EV_FREQUENT_CHECK;
2650
2651	ev_stop (EV_A_ (W)w);	2750	ev_stop (EV_A_ (W)w);
		2751
		2752	EV_FREQUENT_CHECK;
2652	}	2753	}
2653		2754
2654	void noinline	2755	void noinline
2655	ev_periodic_again (EV_P_ ev_periodic *w)	2756	ev_periodic_again (EV_P_ ev_periodic *w)
2656	{	2757	{
…		…
2662		2763
2663	#ifndef SA_RESTART	2764	#ifndef SA_RESTART
2664	# define SA_RESTART 0	2765	# define SA_RESTART 0
2665	#endif	2766	#endif
2666		2767
		2768	#if EV_SIGNAL_ENABLE
		2769
2667	void noinline	2770	void noinline
2668	ev_signal_start (EV_P_ ev_signal *w)	2771	ev_signal_start (EV_P_ ev_signal *w)
2669	{	2772	{
2670	#if EV_MULTIPLICITY
2671	assert (("libev: signal watchers are only supported in the default loop", loop == ev_default_loop_ptr));
2672	#endif
2673	if (expect_false (ev_is_active (w)))	2773	if (expect_false (ev_is_active (w)))
2674	return;	2774	return;
2675		2775
2676	assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0));	2776	assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0 && w->signum < EV_NSIG));
		2777
		2778	#if EV_MULTIPLICITY
		2779	assert (("libev: a signal must not be attached to two different loops",
		2780	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));
		2781
		2782	signals [w->signum - 1].loop = EV_A;
		2783	#endif
2677		2784
2678	EV_FREQUENT_CHECK;	2785	EV_FREQUENT_CHECK;
2679		2786
2680	#if EV_USE_SIGNALFD	2787	#if EV_USE_SIGNALFD
2681	if (sigfd == -2)	2788	if (sigfd == -2)
…		…
2703	sigaddset (&sigfd_set, w->signum);	2810	sigaddset (&sigfd_set, w->signum);
2704	sigprocmask (SIG_BLOCK, &sigfd_set, 0);	2811	sigprocmask (SIG_BLOCK, &sigfd_set, 0);
2705		2812
2706	signalfd (sigfd, &sigfd_set, 0);	2813	signalfd (sigfd, &sigfd_set, 0);
2707	}	2814	}
2708	else
2709	#endif
2710	evpipe_init (EV_A);
2711
2712	{
2713	#ifndef _WIN32
2714	sigset_t full, prev;
2715	sigfillset (&full);
2716	sigprocmask (SIG_SETMASK, &full, &prev);
2717	#endif
2718
2719	array_needsize (ANSIG, signals, signalmax, w->signum, array_init_zero);
2720
2721	#ifndef _WIN32
2722	# if EV_USE_SIGNALFD
2723	if (sigfd < 0)/*TODO*/
2724	# endif	2815	#endif
2725	sigdelset (&prev, w->signum);
2726	sigprocmask (SIG_SETMASK, &prev, 0);
2727	#endif
2728	}
2729		2816
2730	ev_start (EV_A_ (W)w, 1);	2817	ev_start (EV_A_ (W)w, 1);
2731	wlist_add (&signals [w->signum - 1].head, (WL)w);	2818	wlist_add (&signals [w->signum - 1].head, (WL)w);
2732		2819
2733	if (!((WL)w)->next)	2820	if (!((WL)w)->next)
2734	{
2735	#if _WIN32
2736	signal (w->signum, ev_sighandler);
2737	#else
2738	# if EV_USE_SIGNALFD	2821	# if EV_USE_SIGNALFD
2739	if (sigfd < 0) /*TODO*/	2822	if (sigfd < 0) /*TODO*/
2740	# endif	2823	# endif
2741	{	2824	{
		2825	# ifdef _WIN32
		2826	evpipe_init (EV_A);
		2827
		2828	signal (w->signum, ev_sighandler);
		2829	# else
2742	struct sigaction sa = { };	2830	struct sigaction sa;
		2831
		2832	evpipe_init (EV_A);
		2833
2743	sa.sa_handler = ev_sighandler;	2834	sa.sa_handler = ev_sighandler;
2744	sigfillset (&sa.sa_mask);	2835	sigfillset (&sa.sa_mask);
2745	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */	2836	sa.sa_flags = SA_RESTART; /* if restarting works we save one iteration */
2746	sigaction (w->signum, &sa, 0);	2837	sigaction (w->signum, &sa, 0);
		2838
		2839	sigemptyset (&sa.sa_mask);
		2840	sigaddset (&sa.sa_mask, w->signum);
		2841	sigprocmask (SIG_UNBLOCK, &sa.sa_mask, 0);
		2842	#endif
2747	}	2843	}
2748	#endif
2749	}
2750		2844
2751	EV_FREQUENT_CHECK;	2845	EV_FREQUENT_CHECK;
2752	}	2846	}
2753		2847
2754	void noinline	2848	void noinline
…		…
2762		2856
2763	wlist_del (&signals [w->signum - 1].head, (WL)w);	2857	wlist_del (&signals [w->signum - 1].head, (WL)w);
2764	ev_stop (EV_A_ (W)w);	2858	ev_stop (EV_A_ (W)w);
2765		2859
2766	if (!signals [w->signum - 1].head)	2860	if (!signals [w->signum - 1].head)
		2861	{
		2862	#if EV_MULTIPLICITY
		2863	signals [w->signum - 1].loop = 0; /* unattach from signal */
		2864	#endif
2767	#if EV_USE_SIGNALFD	2865	#if EV_USE_SIGNALFD
2768	if (sigfd >= 0)	2866	if (sigfd >= 0)
2769	{	2867	{
2770	sigprocmask (SIG_UNBLOCK, &sigfd_set, 0);//D	2868	sigset_t ss;
		2869
		2870	sigemptyset (&ss);
		2871	sigaddset (&ss, w->signum);
2771	sigdelset (&sigfd_set, w->signum);	2872	sigdelset (&sigfd_set, w->signum);
		2873
2772	signalfd (sigfd, &sigfd_set, 0);	2874	signalfd (sigfd, &sigfd_set, 0);
2773	sigprocmask (SIG_BLOCK, &sigfd_set, 0);//D	2875	sigprocmask (SIG_UNBLOCK, &ss, 0);
2774	/*TODO: maybe unblock signal? */
2775	}	2876	}
2776	else	2877	else
2777	#endif	2878	#endif
2778	signal (w->signum, SIG_DFL);	2879	signal (w->signum, SIG_DFL);
		2880	}
2779		2881
2780	EV_FREQUENT_CHECK;	2882	EV_FREQUENT_CHECK;
2781	}	2883	}
		2884
		2885	#endif
		2886
		2887	#if EV_CHILD_ENABLE
2782		2888
2783	void	2889	void
2784	ev_child_start (EV_P_ ev_child *w)	2890	ev_child_start (EV_P_ ev_child *w)
2785	{	2891	{
2786	#if EV_MULTIPLICITY	2892	#if EV_MULTIPLICITY
…		…
2790	return;	2896	return;
2791		2897
2792	EV_FREQUENT_CHECK;	2898	EV_FREQUENT_CHECK;
2793		2899
2794	ev_start (EV_A_ (W)w, 1);	2900	ev_start (EV_A_ (W)w, 1);
2795	wlist_add (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2901	wlist_add (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2796		2902
2797	EV_FREQUENT_CHECK;	2903	EV_FREQUENT_CHECK;
2798	}	2904	}
2799		2905
2800	void	2906	void
…		…
2804	if (expect_false (!ev_is_active (w)))	2910	if (expect_false (!ev_is_active (w)))
2805	return;	2911	return;
2806		2912
2807	EV_FREQUENT_CHECK;	2913	EV_FREQUENT_CHECK;
2808		2914
2809	wlist_del (&childs [w->pid & (EV_PID_HASHSIZE - 1)], (WL)w);	2915	wlist_del (&childs [w->pid & ((EV_PID_HASHSIZE) - 1)], (WL)w);
2810	ev_stop (EV_A_ (W)w);	2916	ev_stop (EV_A_ (W)w);
2811		2917
2812	EV_FREQUENT_CHECK;	2918	EV_FREQUENT_CHECK;
2813	}	2919	}
		2920
		2921	#endif
2814		2922
2815	#if EV_STAT_ENABLE	2923	#if EV_STAT_ENABLE
2816		2924
2817	# ifdef _WIN32	2925	# ifdef _WIN32
2818	# undef lstat	2926	# undef lstat
…		…
2824	#define MIN_STAT_INTERVAL 0.1074891	2932	#define MIN_STAT_INTERVAL 0.1074891
2825		2933
2826	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);
2827		2935
2828	#if EV_USE_INOTIFY	2936	#if EV_USE_INOTIFY
2829	# 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)
2830		2940
2831	static void noinline	2941	static void noinline
2832	infy_add (EV_P_ ev_stat *w)	2942	infy_add (EV_P_ ev_stat *w)
2833	{	2943	{
2834	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);
2835		2945
2836	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 */
2837	{	2966	}
		2967	else
		2968	{
		2969	/* can't use inotify, continue to stat */
2838	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	2970	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
2839	ev_timer_again (EV_A_ &w->timer); /* this is not race-free, so we still need to recheck periodically */
2840		2971
2841	/* monitor some parent directory for speedup hints */	2972	/* if path is not there, monitor some parent directory for speedup hints */
2842	/* 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, */
2843	/* but an efficiency issue only */	2974	/* but an efficiency issue only */
2844	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)	2975	if ((errno == ENOENT || errno == EACCES) && strlen (w->path) < 4096)
2845	{	2976	{
2846	char path [4096];	2977	char path [4096];
…		…
2862	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));	2993	while (w->wd < 0 && (errno == ENOENT || errno == EACCES));
2863	}	2994	}
2864	}	2995	}
2865		2996
2866	if (w->wd >= 0)	2997	if (w->wd >= 0)
2867	{
2868	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);
2869		2999
2870	/* now local changes will be tracked by inotify, but remote changes won't */	3000	/* now re-arm timer, if required */
2871	/* unless the filesystem it known to be local, we therefore still poll */	3001	if (ev_is_active (&w->timer)) ev_ref (EV_A);
2872	/* also do poll on <2.6.25, but with normal frequency */
2873	struct statfs sfs;
2874
2875	if (fs_2625 && !statfs (w->path, &sfs))
2876	if (sfs.f_type == 0x1373 /* devfs */
2877	|| sfs.f_type == 0xEF53 /* ext2/3 */
2878	|| sfs.f_type == 0x3153464a /* jfs */
2879	|| sfs.f_type == 0x52654973 /* reiser3 */
2880	|| sfs.f_type == 0x01021994 /* tempfs */
2881	|| sfs.f_type == 0x58465342 /* xfs */)
2882	return;
2883
2884	w->timer.repeat = w->interval ? w->interval : fs_2625 ? NFS_STAT_INTERVAL : DEF_STAT_INTERVAL;
2885	ev_timer_again (EV_A_ &w->timer);	3002	ev_timer_again (EV_A_ &w->timer);
2886	}	3003	if (ev_is_active (&w->timer)) ev_unref (EV_A);
2887	}	3004	}
2888		3005
2889	static void noinline	3006	static void noinline
2890	infy_del (EV_P_ ev_stat *w)	3007	infy_del (EV_P_ ev_stat *w)
2891	{	3008	{
…		…
2894		3011
2895	if (wd < 0)	3012	if (wd < 0)
2896	return;	3013	return;
2897		3014
2898	w->wd = -2;	3015	w->wd = -2;
2899	slot = wd & (EV_INOTIFY_HASHSIZE - 1);	3016	slot = wd & ((EV_INOTIFY_HASHSIZE) - 1);
2900	wlist_del (&fs_hash [slot].head, (WL)w);	3017	wlist_del (&fs_hash [slot].head, (WL)w);
2901		3018
2902	/* remove this watcher, if others are watching it, they will rearm */	3019	/* remove this watcher, if others are watching it, they will rearm */
2903	inotify_rm_watch (fs_fd, wd);	3020	inotify_rm_watch (fs_fd, wd);
2904	}	3021	}
…		…
2906	static void noinline	3023	static void noinline
2907	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)
2908	{	3025	{
2909	if (slot < 0)	3026	if (slot < 0)
2910	/* overflow, need to check for all hash slots */	3027	/* overflow, need to check for all hash slots */
2911	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3028	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
2912	infy_wd (EV_A_ slot, wd, ev);	3029	infy_wd (EV_A_ slot, wd, ev);
2913	else	3030	else
2914	{	3031	{
2915	WL w_;	3032	WL w_;
2916		3033
2917	for (w_ = fs_hash [slot & (EV_INOTIFY_HASHSIZE - 1)].head; w_; )	3034	for (w_ = fs_hash [slot & ((EV_INOTIFY_HASHSIZE) - 1)].head; w_; )
2918	{	3035	{
2919	ev_stat *w = (ev_stat *)w_;	3036	ev_stat *w = (ev_stat *)w_;
2920	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 */
2921		3038
2922	if (w->wd == wd || wd == -1)	3039	if (w->wd == wd || wd == -1)
2923	{	3040	{
2924	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))	3041	if (ev->mask & (IN_IGNORED | IN_UNMOUNT | IN_DELETE_SELF))
2925	{	3042	{
2926	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);
2927	w->wd = -1;	3044	w->wd = -1;
2928	infy_add (EV_A_ w); /* re-add, no matter what */	3045	infy_add (EV_A_ w); /* re-add, no matter what */
2929	}	3046	}
2930		3047
2931	stat_timer_cb (EV_A_ &w->timer, 0);	3048	stat_timer_cb (EV_A_ &w->timer, 0);
…		…
2936		3053
2937	static void	3054	static void
2938	infy_cb (EV_P_ ev_io *w, int revents)	3055	infy_cb (EV_P_ ev_io *w, int revents)
2939	{	3056	{
2940	char buf [EV_INOTIFY_BUFSIZE];	3057	char buf [EV_INOTIFY_BUFSIZE];
2941	struct inotify_event *ev = (struct inotify_event *)buf;
2942	int ofs;	3058	int ofs;
2943	int len = read (fs_fd, buf, sizeof (buf));	3059	int len = read (fs_fd, buf, sizeof (buf));
2944		3060
2945	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);
2946	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;
2947	}	3099	}
2948		3100
2949	inline_size void	3101	inline_size void
2950	check_2625 (EV_P)	3102	ev_check_2625 (EV_P)
2951	{	3103	{
2952	/* kernels < 2.6.25 are borked	3104	/* kernels < 2.6.25 are borked
2953	* 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
2954	*/	3106	*/
2955	struct utsname buf;	3107	if (ev_linux_version () < 0x020619)
2956	int major, minor, micro;
2957
2958	if (uname (&buf))
2959	return;	3108	return;
2960		3109
2961	if (sscanf (buf.release, "%d.%d.%d", &major, &minor, &micro) != 3)
2962	return;
2963
2964	if (major < 2
2965	|| (major == 2 && minor < 6)
2966	|| (major == 2 && minor == 6 && micro < 25))
2967	return;
2968
2969	fs_2625 = 1;	3110	fs_2625 = 1;
		3111	}
		3112
		3113	inline_size int
		3114	infy_newfd (void)
		3115	{
		3116	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)
		3117	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
		3118	if (fd >= 0)
		3119	return fd;
		3120	#endif
		3121	return inotify_init ();
2970	}	3122	}
2971		3123
2972	inline_size void	3124	inline_size void
2973	infy_init (EV_P)	3125	infy_init (EV_P)
2974	{	3126	{
2975	if (fs_fd != -2)	3127	if (fs_fd != -2)
2976	return;	3128	return;
2977		3129
2978	fs_fd = -1;	3130	fs_fd = -1;
2979		3131
2980	check_2625 (EV_A);	3132	ev_check_2625 (EV_A);
2981		3133
2982	fs_fd = inotify_init ();	3134	fs_fd = infy_newfd ();
2983		3135
2984	if (fs_fd >= 0)	3136	if (fs_fd >= 0)
2985	{	3137	{
		3138	fd_intern (fs_fd);
2986	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);	3139	ev_io_init (&fs_w, infy_cb, fs_fd, EV_READ);
2987	ev_set_priority (&fs_w, EV_MAXPRI);	3140	ev_set_priority (&fs_w, EV_MAXPRI);
2988	ev_io_start (EV_A_ &fs_w);	3141	ev_io_start (EV_A_ &fs_w);
		3142	ev_unref (EV_A);
2989	}	3143	}
2990	}	3144	}
2991		3145
2992	inline_size void	3146	inline_size void
2993	infy_fork (EV_P)	3147	infy_fork (EV_P)
…		…
2995	int slot;	3149	int slot;
2996		3150
2997	if (fs_fd < 0)	3151	if (fs_fd < 0)
2998	return;	3152	return;
2999		3153
		3154	ev_ref (EV_A);
		3155	ev_io_stop (EV_A_ &fs_w);
3000	close (fs_fd);	3156	close (fs_fd);
3001	fs_fd = inotify_init ();	3157	fs_fd = infy_newfd ();
3002		3158
		3159	if (fs_fd >= 0)
		3160	{
		3161	fd_intern (fs_fd);
		3162	ev_io_set (&fs_w, fs_fd, EV_READ);
		3163	ev_io_start (EV_A_ &fs_w);
		3164	ev_unref (EV_A);
		3165	}
		3166
3003	for (slot = 0; slot < EV_INOTIFY_HASHSIZE; ++slot)	3167	for (slot = 0; slot < (EV_INOTIFY_HASHSIZE); ++slot)
3004	{	3168	{
3005	WL w_ = fs_hash [slot].head;	3169	WL w_ = fs_hash [slot].head;
3006	fs_hash [slot].head = 0;	3170	fs_hash [slot].head = 0;
3007		3171
3008	while (w_)	3172	while (w_)
…		…
3013	w->wd = -1;	3177	w->wd = -1;
3014		3178
3015	if (fs_fd >= 0)	3179	if (fs_fd >= 0)
3016	infy_add (EV_A_ w); /* re-add, no matter what */	3180	infy_add (EV_A_ w); /* re-add, no matter what */
3017	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);
3018	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	}
3019	}	3188	}
3020	}	3189	}
3021	}	3190	}
3022		3191
3023	#endif	3192	#endif
…		…
3040	static void noinline	3209	static void noinline
3041	stat_timer_cb (EV_P_ ev_timer *w_, int revents)	3210	stat_timer_cb (EV_P_ ev_timer *w_, int revents)
3042	{	3211	{
3043	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));	3212	ev_stat *w = (ev_stat *)(((char *)w_) - offsetof (ev_stat, timer));
3044		3213
3045	/* we copy this here each the time so that */	3214	ev_statdata prev = w->attr;
3046	/* prev has the old value when the callback gets invoked */
3047	w->prev = w->attr;
3048	ev_stat_stat (EV_A_ w);	3215	ev_stat_stat (EV_A_ w);
3049		3216
3050	/* 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 */
3051	if (	3218	if (
3052	w->prev.st_dev != w->attr.st_dev	3219	prev.st_dev != w->attr.st_dev
3053	|| w->prev.st_ino != w->attr.st_ino	3220	|| prev.st_ino != w->attr.st_ino
3054	|| w->prev.st_mode != w->attr.st_mode	3221	|| prev.st_mode != w->attr.st_mode
3055	|| w->prev.st_nlink != w->attr.st_nlink	3222	|| prev.st_nlink != w->attr.st_nlink
3056	|| w->prev.st_uid != w->attr.st_uid	3223	|| prev.st_uid != w->attr.st_uid
3057	|| w->prev.st_gid != w->attr.st_gid	3224	|| prev.st_gid != w->attr.st_gid
3058	|| w->prev.st_rdev != w->attr.st_rdev	3225	|| prev.st_rdev != w->attr.st_rdev
3059	|| w->prev.st_size != w->attr.st_size	3226	|| prev.st_size != w->attr.st_size
3060	|| w->prev.st_atime != w->attr.st_atime	3227	|| prev.st_atime != w->attr.st_atime
3061	|| w->prev.st_mtime != w->attr.st_mtime	3228	|| prev.st_mtime != w->attr.st_mtime
3062	|| w->prev.st_ctime != w->attr.st_ctime	3229	|| prev.st_ctime != w->attr.st_ctime
3063	) {	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
3064	#if EV_USE_INOTIFY	3236	#if EV_USE_INOTIFY
3065	if (fs_fd >= 0)	3237	if (fs_fd >= 0)
3066	{	3238	{
3067	infy_del (EV_A_ w);	3239	infy_del (EV_A_ w);
3068	infy_add (EV_A_ w);	3240	infy_add (EV_A_ w);
…		…
3093		3265
3094	if (fs_fd >= 0)	3266	if (fs_fd >= 0)
3095	infy_add (EV_A_ w);	3267	infy_add (EV_A_ w);
3096	else	3268	else
3097	#endif	3269	#endif
		3270	{
3098	ev_timer_again (EV_A_ &w->timer);	3271	ev_timer_again (EV_A_ &w->timer);
		3272	ev_unref (EV_A);
		3273	}
3099		3274
3100	ev_start (EV_A_ (W)w, 1);	3275	ev_start (EV_A_ (W)w, 1);
3101		3276
3102	EV_FREQUENT_CHECK;	3277	EV_FREQUENT_CHECK;
3103	}	3278	}
…		…
3112	EV_FREQUENT_CHECK;	3287	EV_FREQUENT_CHECK;
3113		3288
3114	#if EV_USE_INOTIFY	3289	#if EV_USE_INOTIFY
3115	infy_del (EV_A_ w);	3290	infy_del (EV_A_ w);
3116	#endif	3291	#endif
		3292
		3293	if (ev_is_active (&w->timer))
		3294	{
		3295	ev_ref (EV_A);
3117	ev_timer_stop (EV_A_ &w->timer);	3296	ev_timer_stop (EV_A_ &w->timer);
		3297	}
3118		3298
3119	ev_stop (EV_A_ (W)w);	3299	ev_stop (EV_A_ (W)w);
3120		3300
3121	EV_FREQUENT_CHECK;	3301	EV_FREQUENT_CHECK;
3122	}	3302	}
…		…
3167		3347
3168	EV_FREQUENT_CHECK;	3348	EV_FREQUENT_CHECK;
3169	}	3349	}
3170	#endif	3350	#endif
3171		3351
		3352	#if EV_PREPARE_ENABLE
3172	void	3353	void
3173	ev_prepare_start (EV_P_ ev_prepare *w)	3354	ev_prepare_start (EV_P_ ev_prepare *w)
3174	{	3355	{
3175	if (expect_false (ev_is_active (w)))	3356	if (expect_false (ev_is_active (w)))
3176	return;	3357	return;
…		…
3202		3383
3203	ev_stop (EV_A_ (W)w);	3384	ev_stop (EV_A_ (W)w);
3204		3385
3205	EV_FREQUENT_CHECK;	3386	EV_FREQUENT_CHECK;
3206	}	3387	}
		3388	#endif
3207		3389
		3390	#if EV_CHECK_ENABLE
3208	void	3391	void
3209	ev_check_start (EV_P_ ev_check *w)	3392	ev_check_start (EV_P_ ev_check *w)
3210	{	3393	{
3211	if (expect_false (ev_is_active (w)))	3394	if (expect_false (ev_is_active (w)))
3212	return;	3395	return;
…		…
3238		3421
3239	ev_stop (EV_A_ (W)w);	3422	ev_stop (EV_A_ (W)w);
3240		3423
3241	EV_FREQUENT_CHECK;	3424	EV_FREQUENT_CHECK;
3242	}	3425	}
		3426	#endif
3243		3427
3244	#if EV_EMBED_ENABLE	3428	#if EV_EMBED_ENABLE
3245	void noinline	3429	void noinline
3246	ev_embed_sweep (EV_P_ ev_embed *w)	3430	ev_embed_sweep (EV_P_ ev_embed *w)
3247	{	3431	{
…		…
3263	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)	3447	embed_prepare_cb (EV_P_ ev_prepare *prepare, int revents)
3264	{	3448	{
3265	ev_embed *w = (ev_embed *)(((char *)prepare) - offsetof (ev_embed, prepare));	3449	ev_embed *w = (ev_embed *)(((char *)prepare) - offsetof (ev_embed, prepare));
3266		3450
3267	{	3451	{
3268	struct ev_loop *loop = w->other;	3452	EV_P = w->other;
3269		3453
3270	while (fdchangecnt)	3454	while (fdchangecnt)
3271	{	3455	{
3272	fd_reify (EV_A);	3456	fd_reify (EV_A);
3273	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3457	ev_loop (EV_A_ EVLOOP_NONBLOCK);
…		…
3281	ev_embed *w = (ev_embed *)(((char *)fork_w) - offsetof (ev_embed, fork));	3465	ev_embed *w = (ev_embed *)(((char *)fork_w) - offsetof (ev_embed, fork));
3282		3466
3283	ev_embed_stop (EV_A_ w);	3467	ev_embed_stop (EV_A_ w);
3284		3468
3285	{	3469	{
3286	struct ev_loop *loop = w->other;	3470	EV_P = w->other;
3287		3471
3288	ev_loop_fork (EV_A);	3472	ev_loop_fork (EV_A);
3289	ev_loop (EV_A_ EVLOOP_NONBLOCK);	3473	ev_loop (EV_A_ EVLOOP_NONBLOCK);
3290	}	3474	}
3291		3475
…		…
3305	{	3489	{
3306	if (expect_false (ev_is_active (w)))	3490	if (expect_false (ev_is_active (w)))
3307	return;	3491	return;
3308		3492
3309	{	3493	{
3310	struct ev_loop *loop = w->other;	3494	EV_P = w->other;
3311	assert (("libev: loop to be embedded is not embeddable", backend & ev_embeddable_backends ()));	3495	assert (("libev: loop to be embedded is not embeddable", backend & ev_embeddable_backends ()));
3312	ev_io_init (&w->io, embed_io_cb, backend_fd, EV_READ);	3496	ev_io_init (&w->io, embed_io_cb, backend_fd, EV_READ);
3313	}	3497	}
3314		3498
3315	EV_FREQUENT_CHECK;	3499	EV_FREQUENT_CHECK;
…		…
3342		3526
3343	ev_io_stop (EV_A_ &w->io);	3527	ev_io_stop (EV_A_ &w->io);
3344	ev_prepare_stop (EV_A_ &w->prepare);	3528	ev_prepare_stop (EV_A_ &w->prepare);
3345	ev_fork_stop (EV_A_ &w->fork);	3529	ev_fork_stop (EV_A_ &w->fork);
3346		3530
		3531	ev_stop (EV_A_ (W)w);
		3532
3347	EV_FREQUENT_CHECK;	3533	EV_FREQUENT_CHECK;
3348	}	3534	}
3349	#endif	3535	#endif
3350		3536
3351	#if EV_FORK_ENABLE	3537	#if EV_FORK_ENABLE
…		…
3427		3613
3428	void	3614	void
3429	ev_async_send (EV_P_ ev_async *w)	3615	ev_async_send (EV_P_ ev_async *w)
3430	{	3616	{
3431	w->sent = 1;	3617	w->sent = 1;
3432	evpipe_write (EV_A_ &gotasync);	3618	evpipe_write (EV_A_ &async_pending);
3433	}	3619	}
3434	#endif	3620	#endif
3435		3621
3436	/*****************************************************************************/	3622	/*****************************************************************************/
3437		3623
…		…
3477	{	3663	{
3478	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));
3479		3665
3480	if (expect_false (!once))	3666	if (expect_false (!once))
3481	{	3667	{
3482	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMEOUT, arg);	3668	cb (EV_ERROR | EV_READ | EV_WRITE | EV_TIMER, arg);
3483	return;	3669	return;
3484	}	3670	}
3485		3671
3486	once->cb = cb;	3672	once->cb = cb;
3487	once->arg = arg;	3673	once->arg = arg;
…		…
3574	if (types & EV_ASYNC)	3760	if (types & EV_ASYNC)
3575	for (i = asynccnt; i--; )	3761	for (i = asynccnt; i--; )
3576	cb (EV_A_ EV_ASYNC, asyncs [i]);	3762	cb (EV_A_ EV_ASYNC, asyncs [i]);
3577	#endif	3763	#endif
3578		3764
		3765	#if EV_PREPARE_ENABLE
3579	if (types & EV_PREPARE)	3766	if (types & EV_PREPARE)
3580	for (i = preparecnt; i--; )	3767	for (i = preparecnt; i--; )
3581	#if EV_EMBED_ENABLE	3768	# if EV_EMBED_ENABLE
3582	if (ev_cb (prepares [i]) != embed_prepare_cb)	3769	if (ev_cb (prepares [i]) != embed_prepare_cb)
3583	#endif	3770	# endif
3584	cb (EV_A_ EV_PREPARE, prepares [i]);	3771	cb (EV_A_ EV_PREPARE, prepares [i]);
		3772	#endif
3585		3773
		3774	#if EV_CHECK_ENABLE
3586	if (types & EV_CHECK)	3775	if (types & EV_CHECK)
3587	for (i = checkcnt; i--; )	3776	for (i = checkcnt; i--; )
3588	cb (EV_A_ EV_CHECK, checks [i]);	3777	cb (EV_A_ EV_CHECK, checks [i]);
		3778	#endif
3589		3779
		3780	#if EV_SIGNAL_ENABLE
3590	if (types & EV_SIGNAL)	3781	if (types & EV_SIGNAL)
3591	for (i = 0; i < signalmax; ++i)	3782	for (i = 0; i < EV_NSIG - 1; ++i)
3592	for (wl = signals [i].head; wl; )	3783	for (wl = signals [i].head; wl; )
3593	{	3784	{
3594	wn = wl->next;	3785	wn = wl->next;
3595	cb (EV_A_ EV_SIGNAL, wl);	3786	cb (EV_A_ EV_SIGNAL, wl);
3596	wl = wn;	3787	wl = wn;
3597	}	3788	}
		3789	#endif
3598		3790
		3791	#if EV_CHILD_ENABLE
3599	if (types & EV_CHILD)	3792	if (types & EV_CHILD)
3600	for (i = EV_PID_HASHSIZE; i--; )	3793	for (i = (EV_PID_HASHSIZE); i--; )
3601	for (wl = childs [i]; wl; )	3794	for (wl = childs [i]; wl; )
3602	{	3795	{
3603	wn = wl->next;	3796	wn = wl->next;
3604	cb (EV_A_ EV_CHILD, wl);	3797	cb (EV_A_ EV_CHILD, wl);
3605	wl = wn;	3798	wl = wn;
3606	}	3799	}
		3800	#endif
3607	/* EV_STAT 0x00001000 /* stat data changed */	3801	/* EV_STAT 0x00001000 /* stat data changed */
3608	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */	3802	/* EV_EMBED 0x00010000 /* embedded event loop needs sweep */
3609	}	3803	}
3610	#endif	3804	#endif
3611		3805

Diff Legend

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