ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.408 by root, Fri Jan 27 22:28:49 2012 UTC vs.
Revision 1.479 by root, Sun Dec 20 01:31:17 2015 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,2010,2011 Marc Alexander Lehmann <libev@schmorp.de>	4	* Copyright (c) 2007,2008,2009,2010,2011,2012,2013 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	*
…		…
43	# include EV_CONFIG_H	43	# include EV_CONFIG_H
44	# else	44	# else
45	# include "config.h"	45	# include "config.h"
46	# endif	46	# endif
47		47
48	#if HAVE_FLOOR	48	# if HAVE_FLOOR
49	# ifndef EV_USE_FLOOR	49	# ifndef EV_USE_FLOOR
50	# define EV_USE_FLOOR 1	50	# define EV_USE_FLOOR 1
		51	# endif
51	# endif	52	# endif
52	#endif
53		53
54	# if HAVE_CLOCK_SYSCALL	54	# if HAVE_CLOCK_SYSCALL
55	# ifndef EV_USE_CLOCK_SYSCALL	55	# ifndef EV_USE_CLOCK_SYSCALL
56	# define EV_USE_CLOCK_SYSCALL 1	56	# define EV_USE_CLOCK_SYSCALL 1
57	# ifndef EV_USE_REALTIME	57	# ifndef EV_USE_REALTIME
…		…
59	# endif	59	# endif
60	# ifndef EV_USE_MONOTONIC	60	# ifndef EV_USE_MONOTONIC
61	# define EV_USE_MONOTONIC 1	61	# define EV_USE_MONOTONIC 1
62	# endif	62	# endif
63	# endif	63	# endif
64	# elif !defined(EV_USE_CLOCK_SYSCALL)	64	# elif !defined EV_USE_CLOCK_SYSCALL
65	# define EV_USE_CLOCK_SYSCALL 0	65	# define EV_USE_CLOCK_SYSCALL 0
66	# endif	66	# endif
67		67
68	# if HAVE_CLOCK_GETTIME	68	# if HAVE_CLOCK_GETTIME
69	# ifndef EV_USE_MONOTONIC	69	# ifndef EV_USE_MONOTONIC
…		…
183	# include EV_H	183	# include EV_H
184	#else	184	#else
185	# include "ev.h"	185	# include "ev.h"
186	#endif	186	#endif
187		187
		188	#if EV_NO_THREADS
		189	# undef EV_NO_SMP
		190	# define EV_NO_SMP 1
		191	# undef ECB_NO_THREADS
		192	# define ECB_NO_THREADS 1
		193	#endif
		194	#if EV_NO_SMP
		195	# undef EV_NO_SMP
		196	# define ECB_NO_SMP 1
		197	#endif
		198
188	#ifndef _WIN32	199	#ifndef _WIN32
189	# include <sys/time.h>	200	# include <sys/time.h>
190	# include <sys/wait.h>	201	# include <sys/wait.h>
191	# include <unistd.h>	202	# include <unistd.h>
192	#else	203	#else
193	# include <io.h>	204	# include <io.h>
194	# define WIN32_LEAN_AND_MEAN	205	# define WIN32_LEAN_AND_MEAN
		206	# include <winsock2.h>
195	# include <windows.h>	207	# include <windows.h>
196	# ifndef EV_SELECT_IS_WINSOCKET	208	# ifndef EV_SELECT_IS_WINSOCKET
197	# define EV_SELECT_IS_WINSOCKET 1	209	# define EV_SELECT_IS_WINSOCKET 1
198	# endif	210	# endif
199	# undef EV_AVOID_STDIO	211	# undef EV_AVOID_STDIO
…		…
208	#define _DARWIN_UNLIMITED_SELECT 1	220	#define _DARWIN_UNLIMITED_SELECT 1
209		221
210	/* this block tries to deduce configuration from header-defined symbols and defaults */	222	/* this block tries to deduce configuration from header-defined symbols and defaults */
211		223
212	/* try to deduce the maximum number of signals on this platform */	224	/* try to deduce the maximum number of signals on this platform */
213	#if defined (EV_NSIG)	225	#if defined EV_NSIG
214	/* use what's provided */	226	/* use what's provided */
215	#elif defined (NSIG)	227	#elif defined NSIG
216	# define EV_NSIG (NSIG)	228	# define EV_NSIG (NSIG)
217	#elif defined(_NSIG)	229	#elif defined _NSIG
218	# define EV_NSIG (_NSIG)	230	# define EV_NSIG (_NSIG)
219	#elif defined (SIGMAX)	231	#elif defined SIGMAX
220	# define EV_NSIG (SIGMAX+1)	232	# define EV_NSIG (SIGMAX+1)
221	#elif defined (SIG_MAX)	233	#elif defined SIG_MAX
222	# define EV_NSIG (SIG_MAX+1)	234	# define EV_NSIG (SIG_MAX+1)
223	#elif defined (_SIG_MAX)	235	#elif defined _SIG_MAX
224	# define EV_NSIG (_SIG_MAX+1)	236	# define EV_NSIG (_SIG_MAX+1)
225	#elif defined (MAXSIG)	237	#elif defined MAXSIG
226	# define EV_NSIG (MAXSIG+1)	238	# define EV_NSIG (MAXSIG+1)
227	#elif defined (MAX_SIG)	239	#elif defined MAX_SIG
228	# define EV_NSIG (MAX_SIG+1)	240	# define EV_NSIG (MAX_SIG+1)
229	#elif defined (SIGARRAYSIZE)	241	#elif defined SIGARRAYSIZE
230	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */	242	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
231	#elif defined (_sys_nsig)	243	#elif defined _sys_nsig
232	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	244	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
233	#else	245	#else
234	# error "unable to find value for NSIG, please report"	246	# define EV_NSIG (8 * sizeof (sigset_t) + 1)
235	/* to make it compile regardless, just remove the above line, */
236	/* but consider reporting it, too! :) */
237	# define EV_NSIG 65
238	#endif	247	#endif
239		248
240	#ifndef EV_USE_FLOOR	249	#ifndef EV_USE_FLOOR
241	# define EV_USE_FLOOR 0	250	# define EV_USE_FLOOR 0
242	#endif	251	#endif
243		252
244	#ifndef EV_USE_CLOCK_SYSCALL	253	#ifndef EV_USE_CLOCK_SYSCALL
245	# if __linux && __GLIBC__ >= 2	254	# if __linux && __GLIBC__ == 2 && __GLIBC_MINOR__ < 17
246	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS	255	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
247	# else	256	# else
248	# define EV_USE_CLOCK_SYSCALL 0	257	# define EV_USE_CLOCK_SYSCALL 0
249	# endif	258	# endif
250	#endif	259	#endif
251		260
		261	#if !(_POSIX_TIMERS > 0)
		262	# ifndef EV_USE_MONOTONIC
		263	# define EV_USE_MONOTONIC 0
		264	# endif
		265	# ifndef EV_USE_REALTIME
		266	# define EV_USE_REALTIME 0
		267	# endif
		268	#endif
		269
252	#ifndef EV_USE_MONOTONIC	270	#ifndef EV_USE_MONOTONIC
253	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	271	# if defined _POSIX_MONOTONIC_CLOCK && _POSIX_MONOTONIC_CLOCK >= 0
254	# define EV_USE_MONOTONIC EV_FEATURE_OS	272	# define EV_USE_MONOTONIC EV_FEATURE_OS
255	# else	273	# else
256	# define EV_USE_MONOTONIC 0	274	# define EV_USE_MONOTONIC 0
257	# endif	275	# endif
258	#endif	276	#endif
…		…
345		363
346	#ifndef EV_HEAP_CACHE_AT	364	#ifndef EV_HEAP_CACHE_AT
347	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA	365	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
348	#endif	366	#endif
349		367
		368	#ifdef ANDROID
		369	/* supposedly, android doesn't typedef fd_mask */
		370	# undef EV_USE_SELECT
		371	# define EV_USE_SELECT 0
		372	/* supposedly, we need to include syscall.h, not sys/syscall.h, so just disable */
		373	# undef EV_USE_CLOCK_SYSCALL
		374	# define EV_USE_CLOCK_SYSCALL 0
		375	#endif
		376
		377	/* aix's poll.h seems to cause lots of trouble */
		378	#ifdef _AIX
		379	/* AIX has a completely broken poll.h header */
		380	# undef EV_USE_POLL
		381	# define EV_USE_POLL 0
		382	#endif
		383
350	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */	384	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */
351	/* which makes programs even slower. might work on other unices, too. */	385	/* which makes programs even slower. might work on other unices, too. */
352	#if EV_USE_CLOCK_SYSCALL	386	#if EV_USE_CLOCK_SYSCALL
353	# include <syscall.h>	387	# include <sys/syscall.h>
354	# ifdef SYS_clock_gettime	388	# ifdef SYS_clock_gettime
355	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))	389	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))
356	# undef EV_USE_MONOTONIC	390	# undef EV_USE_MONOTONIC
357	# define EV_USE_MONOTONIC 1	391	# define EV_USE_MONOTONIC 1
358	# else	392	# else
…		…
361	# endif	395	# endif
362	#endif	396	#endif
363		397
364	/* this block fixes any misconfiguration where we know we run into trouble otherwise */	398	/* this block fixes any misconfiguration where we know we run into trouble otherwise */
365		399
366	#ifdef _AIX
367	/* AIX has a completely broken poll.h header */
368	# undef EV_USE_POLL
369	# define EV_USE_POLL 0
370	#endif
371
372	#ifndef CLOCK_MONOTONIC	400	#ifndef CLOCK_MONOTONIC
373	# undef EV_USE_MONOTONIC	401	# undef EV_USE_MONOTONIC
374	# define EV_USE_MONOTONIC 0	402	# define EV_USE_MONOTONIC 0
375	#endif	403	#endif
376		404
…		…
384	# define EV_USE_INOTIFY 0	412	# define EV_USE_INOTIFY 0
385	#endif	413	#endif
386		414
387	#if !EV_USE_NANOSLEEP	415	#if !EV_USE_NANOSLEEP
388	/* hp-ux has it in sys/time.h, which we unconditionally include above */	416	/* hp-ux has it in sys/time.h, which we unconditionally include above */
389	# if !defined(_WIN32) && !defined(__hpux)	417	# if !defined _WIN32 && !defined __hpux
390	# include <sys/select.h>	418	# include <sys/select.h>
391	# endif	419	# endif
392	#endif	420	#endif
393		421
394	#if EV_USE_INOTIFY	422	#if EV_USE_INOTIFY
…		…
397	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */	425	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */
398	# ifndef IN_DONT_FOLLOW	426	# ifndef IN_DONT_FOLLOW
399	# undef EV_USE_INOTIFY	427	# undef EV_USE_INOTIFY
400	# define EV_USE_INOTIFY 0	428	# define EV_USE_INOTIFY 0
401	# endif	429	# endif
402	#endif
403
404	#if EV_SELECT_IS_WINSOCKET
405	# include <winsock.h>
406	#endif	430	#endif
407		431
408	#if EV_USE_EVENTFD	432	#if EV_USE_EVENTFD
409	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */	433	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */
410	# include <stdint.h>	434	# include <stdint.h>
…		…
467	/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */	491	/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */
468	/* ECB.H BEGIN */	492	/* ECB.H BEGIN */
469	/*	493	/*
470	* libecb - http://software.schmorp.de/pkg/libecb	494	* libecb - http://software.schmorp.de/pkg/libecb
471	*	495	*
472	* Copyright (©) 2009-2012 Marc Alexander Lehmann <libecb@schmorp.de>	496	* Copyright (©) 2009-2015 Marc Alexander Lehmann <libecb@schmorp.de>
473	* Copyright (©) 2011 Emanuele Giaquinta	497	* Copyright (©) 2011 Emanuele Giaquinta
474	* All rights reserved.	498	* All rights reserved.
475	*	499	*
476	* Redistribution and use in source and binary forms, with or without modifica-	500	* Redistribution and use in source and binary forms, with or without modifica-
477	* tion, are permitted provided that the following conditions are met:	501	* tion, are permitted provided that the following conditions are met:
…		…
491	* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;	515	* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
492	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,	516	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
493	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-	517	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-
494	* ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED	518	* ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
495	* OF THE POSSIBILITY OF SUCH DAMAGE.	519	* OF THE POSSIBILITY OF SUCH DAMAGE.
		520	*
		521	* Alternatively, the contents of this file may be used under the terms of
		522	* the GNU General Public License ("GPL") version 2 or any later version,
		523	* in which case the provisions of the GPL are applicable instead of
		524	* the above. If you wish to allow the use of your version of this file
		525	* only under the terms of the GPL and not to allow others to use your
		526	* version of this file under the BSD license, indicate your decision
		527	* by deleting the provisions above and replace them with the notice
		528	* and other provisions required by the GPL. If you do not delete the
		529	* provisions above, a recipient may use your version of this file under
		530	* either the BSD or the GPL.
496	*/	531	*/
497		532
498	#ifndef ECB_H	533	#ifndef ECB_H
499	#define ECB_H	534	#define ECB_H
		535
		536	/* 16 bits major, 16 bits minor */
		537	#define ECB_VERSION 0x00010005
500		538
501	#ifdef _WIN32	539	#ifdef _WIN32
502	typedef signed char int8_t;	540	typedef signed char int8_t;
503	typedef unsigned char uint8_t;	541	typedef unsigned char uint8_t;
504	typedef signed short int16_t;	542	typedef signed short int16_t;
…		…
510	typedef unsigned long long uint64_t;	548	typedef unsigned long long uint64_t;
511	#else /* _MSC_VER || __BORLANDC__ */	549	#else /* _MSC_VER || __BORLANDC__ */
512	typedef signed __int64 int64_t;	550	typedef signed __int64 int64_t;
513	typedef unsigned __int64 uint64_t;	551	typedef unsigned __int64 uint64_t;
514	#endif	552	#endif
		553	#ifdef _WIN64
		554	#define ECB_PTRSIZE 8
		555	typedef uint64_t uintptr_t;
		556	typedef int64_t intptr_t;
		557	#else
		558	#define ECB_PTRSIZE 4
		559	typedef uint32_t uintptr_t;
		560	typedef int32_t intptr_t;
		561	#endif
515	#else	562	#else
516	#include <inttypes.h>	563	#include <inttypes.h>
		564	#if (defined INTPTR_MAX ? INTPTR_MAX : ULONG_MAX) > 0xffffffffU
		565	#define ECB_PTRSIZE 8
		566	#else
		567	#define ECB_PTRSIZE 4
		568	#endif
		569	#endif
		570
		571	#define ECB_GCC_AMD64 (__amd64 || __amd64__ || __x86_64 || __x86_64__)
		572	#define ECB_MSVC_AMD64 (_M_AMD64 || _M_X64)
		573
		574	/* work around x32 idiocy by defining proper macros */
		575	#if ECB_GCC_AMD64 || ECB_MSVC_AMD64
		576	#if _ILP32
		577	#define ECB_AMD64_X32 1
		578	#else
		579	#define ECB_AMD64 1
		580	#endif
517	#endif	581	#endif
518		582
519	/* many compilers define _GNUC_ to some versions but then only implement	583	/* many compilers define _GNUC_ to some versions but then only implement
520	* what their idiot authors think are the "more important" extensions,	584	* what their idiot authors think are the "more important" extensions,
521	* causing enormous grief in return for some better fake benchmark numbers.	585	* causing enormous grief in return for some better fake benchmark numbers.
522	* or so.	586	* or so.
523	* we try to detect these and simply assume they are not gcc - if they have	587	* we try to detect these and simply assume they are not gcc - if they have
524	* an issue with that they should have done it right in the first place.	588	* an issue with that they should have done it right in the first place.
525	*/	589	*/
526	#ifndef ECB_GCC_VERSION
527	#if !defined(__GNUC_MINOR__) || defined(__INTEL_COMPILER) || defined(__SUNPRO_C) || defined(__SUNPRO_CC) || defined(__llvm__) || defined(__clang__)	590	#if !defined __GNUC_MINOR__ || defined __INTEL_COMPILER || defined __SUNPRO_C || defined __SUNPRO_CC || defined __llvm__ || defined __clang__
528	#define ECB_GCC_VERSION(major,minor) 0	591	#define ECB_GCC_VERSION(major,minor) 0
529	#else	592	#else
530	#define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))	593	#define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))
531	#endif	594	#endif
		595
		596	#define ECB_CLANG_VERSION(major,minor) (__clang_major__ > (major) || (__clang_major__ == (major) && __clang_minor__ >= (minor)))
		597
		598	#if __clang__ && defined __has_builtin
		599	#define ECB_CLANG_BUILTIN(x) __has_builtin (x)
		600	#else
		601	#define ECB_CLANG_BUILTIN(x) 0
		602	#endif
		603
		604	#if __clang__ && defined __has_extension
		605	#define ECB_CLANG_EXTENSION(x) __has_extension (x)
		606	#else
		607	#define ECB_CLANG_EXTENSION(x) 0
		608	#endif
		609
		610	#define ECB_CPP (__cplusplus+0)
		611	#define ECB_CPP11 (__cplusplus >= 201103L)
		612
		613	#if ECB_CPP
		614	#define ECB_C 0
		615	#define ECB_STDC_VERSION 0
		616	#else
		617	#define ECB_C 1
		618	#define ECB_STDC_VERSION __STDC_VERSION__
		619	#endif
		620
		621	#define ECB_C99 (ECB_STDC_VERSION >= 199901L)
		622	#define ECB_C11 (ECB_STDC_VERSION >= 201112L)
		623
		624	#if ECB_CPP
		625	#define ECB_EXTERN_C extern "C"
		626	#define ECB_EXTERN_C_BEG ECB_EXTERN_C {
		627	#define ECB_EXTERN_C_END }
		628	#else
		629	#define ECB_EXTERN_C extern
		630	#define ECB_EXTERN_C_BEG
		631	#define ECB_EXTERN_C_END
532	#endif	632	#endif
533		633
534	/*****************************************************************************/	634	/*****************************************************************************/
535		635
536	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */	636	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */
537	/* ECB_NO_SMP - ecb might be used in multiple threads, but only on a single cpu */	637	/* ECB_NO_SMP - ecb might be used in multiple threads, but only on a single cpu */
538		638
539	#if ECB_NO_THREADS || ECB_NO_SMP	639	#if ECB_NO_THREADS
		640	#define ECB_NO_SMP 1
		641	#endif
		642
		643	#if ECB_NO_SMP
540	#define ECB_MEMORY_FENCE do { } while (0)	644	#define ECB_MEMORY_FENCE do { } while (0)
541	#endif	645	#endif
542		646
		647	/* http://www-01.ibm.com/support/knowledgecenter/SSGH3R_13.1.0/com.ibm.xlcpp131.aix.doc/compiler_ref/compiler_builtins.html */
		648	#if __xlC__ && ECB_CPP
		649	#include <builtins.h>
		650	#endif
		651
		652	#if 1400 <= _MSC_VER
		653	#include <intrin.h> /* fence functions _ReadBarrier, also bit search functions _BitScanReverse */
		654	#endif
		655
543	#ifndef ECB_MEMORY_FENCE	656	#ifndef ECB_MEMORY_FENCE
544	#if ECB_GCC_VERSION(2,5) || defined(__INTEL_COMPILER) || defined(__clang__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110	657	#if ECB_GCC_VERSION(2,5) || defined __INTEL_COMPILER || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
545	#if __i386 || __i386__	658	#if __i386 || __i386__
546	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory")	659	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory")
547	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE /* non-lock xchg might be enough */	660	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
548	#define ECB_MEMORY_FENCE_RELEASE do { } while (0) /* unlikely to change in future cpus */	661	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
549	#elif __amd64 || __amd64__ || __x86_64 || __x86_64__	662	#elif ECB_GCC_AMD64
550	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")	663	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")
551	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("lfence" : : : "memory")	664	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
552	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("sfence") /* play safe - not needed in any current cpu */	665	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
553	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__	666	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__
554	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory")	667	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory")
		668	#elif defined __ARM_ARCH_2__ \
		669	|| defined __ARM_ARCH_3__ || defined __ARM_ARCH_3M__ \
		670	|| defined __ARM_ARCH_4__ || defined __ARM_ARCH_4T__ \
		671	|| defined __ARM_ARCH_5__ || defined __ARM_ARCH_5E__ \
		672	|| defined __ARM_ARCH_5T__ || defined __ARM_ARCH_5TE__ \
		673	|| defined __ARM_ARCH_5TEJ__
		674	/* should not need any, unless running old code on newer cpu - arm doesn't support that */
555	#elif defined(__ARM_ARCH_6__ ) || defined(__ARM_ARCH_6J__ ) \	675	#elif defined __ARM_ARCH_6__ || defined __ARM_ARCH_6J__ \
556	|| defined(__ARM_ARCH_6K__) || defined(__ARM_ARCH_6ZK__)	676	|| defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ \
		677	|| defined __ARM_ARCH_6T2__
557	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory")	678	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory")
558	#elif defined(__ARM_ARCH_7__ ) || defined(__ARM_ARCH_7A__ ) \	679	#elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \
559	|| defined(__ARM_ARCH_7M__) || defined(__ARM_ARCH_7R__ )	680	|| defined __ARM_ARCH_7R__ || defined __ARM_ARCH_7M__
560	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")	681	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")
561	#elif __sparc || __sparc__	682	#elif __aarch64__
		683	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb ish" : : : "memory")
		684	#elif (__sparc || __sparc__) && !(__sparc_v8__ || defined __sparcv8)
562	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad | " : : : "memory")	685	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory")
563	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")	686	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")
564	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")	687	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")
565	#elif defined(__s390__) || defined(__s390x__)	688	#elif defined __s390__ || defined __s390x__
566	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")	689	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")
		690	#elif defined __mips__
		691	/* GNU/Linux emulates sync on mips1 architectures, so we force its use */
		692	/* anybody else who still uses mips1 is supposed to send in their version, with detection code. */
		693	#define ECB_MEMORY_FENCE __asm__ __volatile__ (".set mips2; sync; .set mips0" : : : "memory")
		694	#elif defined __alpha__
		695	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory")
		696	#elif defined __hppa__
		697	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
		698	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
		699	#elif defined __ia64__
		700	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mf" : : : "memory")
		701	#elif defined __m68k__
		702	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
		703	#elif defined __m88k__
		704	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("tb1 0,%%r0,128" : : : "memory")
		705	#elif defined __sh__
		706	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
567	#endif	707	#endif
568	#endif	708	#endif
569	#endif	709	#endif
570		710
571	#ifndef ECB_MEMORY_FENCE	711	#ifndef ECB_MEMORY_FENCE
		712	#if ECB_GCC_VERSION(4,7)
		713	/* see comment below (stdatomic.h) about the C11 memory model. */
		714	#define ECB_MEMORY_FENCE __atomic_thread_fence (__ATOMIC_SEQ_CST)
		715	#define ECB_MEMORY_FENCE_ACQUIRE __atomic_thread_fence (__ATOMIC_ACQUIRE)
		716	#define ECB_MEMORY_FENCE_RELEASE __atomic_thread_fence (__ATOMIC_RELEASE)
		717
		718	#elif ECB_CLANG_EXTENSION(c_atomic)
		719	/* see comment below (stdatomic.h) about the C11 memory model. */
		720	#define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST)
		721	#define ECB_MEMORY_FENCE_ACQUIRE __c11_atomic_thread_fence (__ATOMIC_ACQUIRE)
		722	#define ECB_MEMORY_FENCE_RELEASE __c11_atomic_thread_fence (__ATOMIC_RELEASE)
		723
572	#if ECB_GCC_VERSION(4,4) || defined(__INTEL_COMPILER) || defined(__clang__)	724	#elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__
573	#define ECB_MEMORY_FENCE __sync_synchronize ()	725	#define ECB_MEMORY_FENCE __sync_synchronize ()
574	/*#define ECB_MEMORY_FENCE_ACQUIRE ({ char dummy = 0; __sync_lock_test_and_set (&dummy, 1); }) */	726	#elif _MSC_VER >= 1500 /* VC++ 2008 */
575	/*#define ECB_MEMORY_FENCE_RELEASE ({ char dummy = 1; __sync_lock_release (&dummy ); }) */	727	/* apparently, microsoft broke all the memory barrier stuff in Visual Studio 2008... */
		728	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
		729	#define ECB_MEMORY_FENCE _ReadWriteBarrier (); MemoryBarrier()
		730	#define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier (); MemoryBarrier() /* according to msdn, _ReadBarrier is not a load fence */
		731	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier (); MemoryBarrier()
576	#elif _MSC_VER >= 1400 /* VC++ 2005 */	732	#elif _MSC_VER >= 1400 /* VC++ 2005 */
577	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)	733	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
578	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()	734	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()
579	#define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */	735	#define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */
580	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()	736	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()
581	#elif defined(_WIN32)	737	#elif defined _WIN32
582	#include <WinNT.h>	738	#include <WinNT.h>
583	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */	739	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */
584	#elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110	740	#elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
585	#include <mbarrier.h>	741	#include <mbarrier.h>
586	#define ECB_MEMORY_FENCE __machine_rw_barrier ()	742	#define ECB_MEMORY_FENCE __machine_rw_barrier ()
587	#define ECB_MEMORY_FENCE_ACQUIRE __machine_r_barrier ()	743	#define ECB_MEMORY_FENCE_ACQUIRE __machine_r_barrier ()
588	#define ECB_MEMORY_FENCE_RELEASE __machine_w_barrier ()	744	#define ECB_MEMORY_FENCE_RELEASE __machine_w_barrier ()
		745	#elif __xlC__
		746	#define ECB_MEMORY_FENCE __sync ()
		747	#endif
		748	#endif
		749
		750	#ifndef ECB_MEMORY_FENCE
		751	#if ECB_C11 && !defined __STDC_NO_ATOMICS__
		752	/* we assume that these memory fences work on all variables/all memory accesses, */
		753	/* not just C11 atomics and atomic accesses */
		754	#include <stdatomic.h>
		755	/* Unfortunately, neither gcc 4.7 nor clang 3.1 generate any instructions for */
		756	/* any fence other than seq_cst, which isn't very efficient for us. */
		757	/* Why that is, we don't know - either the C11 memory model is quite useless */
		758	/* for most usages, or gcc and clang have a bug */
		759	/* I *currently* lean towards the latter, and inefficiently implement */
		760	/* all three of ecb's fences as a seq_cst fence */
		761	/* Update, gcc-4.8 generates mfence for all c++ fences, but nothing */
		762	/* for all __atomic_thread_fence's except seq_cst */
		763	#define ECB_MEMORY_FENCE atomic_thread_fence (memory_order_seq_cst)
589	#endif	764	#endif
590	#endif	765	#endif
591		766
592	#ifndef ECB_MEMORY_FENCE	767	#ifndef ECB_MEMORY_FENCE
593	#if !ECB_AVOID_PTHREADS	768	#if !ECB_AVOID_PTHREADS
…		…
605	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;	780	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;
606	#define ECB_MEMORY_FENCE do { pthread_mutex_lock (&ecb_mf_lock); pthread_mutex_unlock (&ecb_mf_lock); } while (0)	781	#define ECB_MEMORY_FENCE do { pthread_mutex_lock (&ecb_mf_lock); pthread_mutex_unlock (&ecb_mf_lock); } while (0)
607	#endif	782	#endif
608	#endif	783	#endif
609		784
610	#if !defined(ECB_MEMORY_FENCE_ACQUIRE) && defined(ECB_MEMORY_FENCE)	785	#if !defined ECB_MEMORY_FENCE_ACQUIRE && defined ECB_MEMORY_FENCE
611	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE	786	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE
612	#endif	787	#endif
613		788
614	#if !defined(ECB_MEMORY_FENCE_RELEASE) && defined(ECB_MEMORY_FENCE)	789	#if !defined ECB_MEMORY_FENCE_RELEASE && defined ECB_MEMORY_FENCE
615	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE	790	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE
616	#endif	791	#endif
617		792
618	/*****************************************************************************/	793	/*****************************************************************************/
619		794
620	#define ECB_C99 (__STDC_VERSION__ >= 199901L)	795	#if ECB_CPP
621
622	#if __cplusplus
623	#define ecb_inline static inline	796	#define ecb_inline static inline
624	#elif ECB_GCC_VERSION(2,5)	797	#elif ECB_GCC_VERSION(2,5)
625	#define ecb_inline static __inline__	798	#define ecb_inline static __inline__
626	#elif ECB_C99	799	#elif ECB_C99
627	#define ecb_inline static inline	800	#define ecb_inline static inline
…		…
641		814
642	#define ECB_CONCAT_(a, b) a ## b	815	#define ECB_CONCAT_(a, b) a ## b
643	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)	816	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)
644	#define ECB_STRINGIFY_(a) # a	817	#define ECB_STRINGIFY_(a) # a
645	#define ECB_STRINGIFY(a) ECB_STRINGIFY_(a)	818	#define ECB_STRINGIFY(a) ECB_STRINGIFY_(a)
		819	#define ECB_STRINGIFY_EXPR(expr) ((expr), ECB_STRINGIFY_ (expr))
646		820
647	#define ecb_function_ ecb_inline	821	#define ecb_function_ ecb_inline
648		822
649	#if ECB_GCC_VERSION(3,1)	823	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_VERSION(2,8)
650	#define ecb_attribute(attrlist) __attribute__(attrlist)	824	#define ecb_attribute(attrlist) __attribute__ (attrlist)
		825	#else
		826	#define ecb_attribute(attrlist)
		827	#endif
		828
		829	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_BUILTIN(__builtin_constant_p)
651	#define ecb_is_constant(expr) __builtin_constant_p (expr)	830	#define ecb_is_constant(expr) __builtin_constant_p (expr)
		831	#else
		832	/* possible C11 impl for integral types
		833	typedef struct ecb_is_constant_struct ecb_is_constant_struct;
		834	#define ecb_is_constant(expr) _Generic ((1 ? (struct ecb_is_constant_struct *)0 : (void *)((expr) - (expr)), ecb_is_constant_struct *: 0, default: 1)) */
		835
		836	#define ecb_is_constant(expr) 0
		837	#endif
		838
		839	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_BUILTIN(__builtin_expect)
652	#define ecb_expect(expr,value) __builtin_expect ((expr),(value))	840	#define ecb_expect(expr,value) __builtin_expect ((expr),(value))
		841	#else
		842	#define ecb_expect(expr,value) (expr)
		843	#endif
		844
		845	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_BUILTIN(__builtin_prefetch)
653	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)	846	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
654	#else	847	#else
655	#define ecb_attribute(attrlist)
656	#define ecb_is_constant(expr) 0
657	#define ecb_expect(expr,value) (expr)
658	#define ecb_prefetch(addr,rw,locality)	848	#define ecb_prefetch(addr,rw,locality)
659	#endif	849	#endif
660		850
661	/* no emulation for ecb_decltype */	851	/* no emulation for ecb_decltype */
662	#if ECB_GCC_VERSION(4,5)	852	#if ECB_CPP11
		853	// older implementations might have problems with decltype(x)::type, work around it
		854	template<class T> struct ecb_decltype_t { typedef T type; };
663	#define ecb_decltype(x) __decltype(x)	855	#define ecb_decltype(x) ecb_decltype_t<decltype (x)>::type
664	#elif ECB_GCC_VERSION(3,0)	856	#elif ECB_GCC_VERSION(3,0) || ECB_CLANG_VERSION(2,8)
665	#define ecb_decltype(x) __typeof(x)	857	#define ecb_decltype(x) __typeof__ (x)
666	#endif	858	#endif
667		859
		860	#if _MSC_VER >= 1300
		861	#define ecb_deprecated __declspec (deprecated)
		862	#else
		863	#define ecb_deprecated ecb_attribute ((__deprecated__))
		864	#endif
		865
		866	#if _MSC_VER >= 1500
		867	#define ecb_deprecated_message(msg) __declspec (deprecated (msg))
		868	#elif ECB_GCC_VERSION(4,5)
		869	#define ecb_deprecated_message(msg) ecb_attribute ((__deprecated__ (msg))
		870	#else
		871	#define ecb_deprecated_message(msg) ecb_deprecated
		872	#endif
		873
		874	#if _MSC_VER >= 1400
		875	#define ecb_noinline __declspec (noinline)
		876	#else
668	#define ecb_noinline ecb_attribute ((__noinline__))	877	#define ecb_noinline ecb_attribute ((__noinline__))
669	#define ecb_noreturn ecb_attribute ((__noreturn__))	878	#endif
		879
670	#define ecb_unused ecb_attribute ((__unused__))	880	#define ecb_unused ecb_attribute ((__unused__))
671	#define ecb_const ecb_attribute ((__const__))	881	#define ecb_const ecb_attribute ((__const__))
672	#define ecb_pure ecb_attribute ((__pure__))	882	#define ecb_pure ecb_attribute ((__pure__))
		883
		884	#if ECB_C11 || __IBMC_NORETURN
		885	/* http://www-01.ibm.com/support/knowledgecenter/SSGH3R_13.1.0/com.ibm.xlcpp131.aix.doc/language_ref/noreturn.html */
		886	#define ecb_noreturn _Noreturn
		887	#elif ECB_CPP11
		888	#define ecb_noreturn [[noreturn]]
		889	#elif _MSC_VER >= 1200
		890	/* http://msdn.microsoft.com/en-us/library/k6ktzx3s.aspx */
		891	#define ecb_noreturn __declspec (noreturn)
		892	#else
		893	#define ecb_noreturn ecb_attribute ((__noreturn__))
		894	#endif
673		895
674	#if ECB_GCC_VERSION(4,3)	896	#if ECB_GCC_VERSION(4,3)
675	#define ecb_artificial ecb_attribute ((__artificial__))	897	#define ecb_artificial ecb_attribute ((__artificial__))
676	#define ecb_hot ecb_attribute ((__hot__))	898	#define ecb_hot ecb_attribute ((__hot__))
677	#define ecb_cold ecb_attribute ((__cold__))	899	#define ecb_cold ecb_attribute ((__cold__))
…		…
689	/* for compatibility to the rest of the world */	911	/* for compatibility to the rest of the world */
690	#define ecb_likely(expr) ecb_expect_true (expr)	912	#define ecb_likely(expr) ecb_expect_true (expr)
691	#define ecb_unlikely(expr) ecb_expect_false (expr)	913	#define ecb_unlikely(expr) ecb_expect_false (expr)
692		914
693	/* count trailing zero bits and count # of one bits */	915	/* count trailing zero bits and count # of one bits */
694	#if ECB_GCC_VERSION(3,4)	916	#if ECB_GCC_VERSION(3,4) \
		917	|| (ECB_CLANG_BUILTIN(__builtin_clz) && ECB_CLANG_BUILTIN(__builtin_clzll) \
		918	&& ECB_CLANG_BUILTIN(__builtin_ctz) && ECB_CLANG_BUILTIN(__builtin_ctzll) \
		919	&& ECB_CLANG_BUILTIN(__builtin_popcount))
695	/* we assume int == 32 bit, long == 32 or 64 bit and long long == 64 bit */	920	/* we assume int == 32 bit, long == 32 or 64 bit and long long == 64 bit */
696	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)	921	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)
697	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)	922	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)
698	#define ecb_ctz32(x) __builtin_ctz (x)	923	#define ecb_ctz32(x) __builtin_ctz (x)
699	#define ecb_ctz64(x) __builtin_ctzll (x)	924	#define ecb_ctz64(x) __builtin_ctzll (x)
700	#define ecb_popcount32(x) __builtin_popcount (x)	925	#define ecb_popcount32(x) __builtin_popcount (x)
701	/* no popcountll */	926	/* no popcountll */
702	#else	927	#else
703	ecb_function_ int ecb_ctz32 (uint32_t x) ecb_const;	928	ecb_function_ ecb_const int ecb_ctz32 (uint32_t x);
704	ecb_function_ int	929	ecb_function_ ecb_const int
705	ecb_ctz32 (uint32_t x)	930	ecb_ctz32 (uint32_t x)
706	{	931	{
		932	#if 1400 <= _MSC_VER && (_M_IX86 || _M_X64 || _M_IA64 || _M_ARM)
		933	unsigned long r;
		934	_BitScanForward (&r, x);
		935	return (int)r;
		936	#else
707	int r = 0;	937	int r = 0;
708		938
709	x &= ~x + 1; /* this isolates the lowest bit */	939	x &= ~x + 1; /* this isolates the lowest bit */
710		940
711	#if ECB_branchless_on_i386	941	#if ECB_branchless_on_i386
…		…
721	if (x & 0xff00ff00) r += 8;	951	if (x & 0xff00ff00) r += 8;
722	if (x & 0xffff0000) r += 16;	952	if (x & 0xffff0000) r += 16;
723	#endif	953	#endif
724		954
725	return r;	955	return r;
		956	#endif
726	}	957	}
727		958
728	ecb_function_ int ecb_ctz64 (uint64_t x) ecb_const;	959	ecb_function_ ecb_const int ecb_ctz64 (uint64_t x);
729	ecb_function_ int	960	ecb_function_ ecb_const int
730	ecb_ctz64 (uint64_t x)	961	ecb_ctz64 (uint64_t x)
731	{	962	{
		963	#if 1400 <= _MSC_VER && (_M_X64 || _M_IA64 || _M_ARM)
		964	unsigned long r;
		965	_BitScanForward64 (&r, x);
		966	return (int)r;
		967	#else
732	int shift = x & 0xffffffffU ? 0 : 32;	968	int shift = x & 0xffffffff ? 0 : 32;
733	return ecb_ctz32 (x >> shift) + shift;	969	return ecb_ctz32 (x >> shift) + shift;
		970	#endif
734	}	971	}
735		972
736	ecb_function_ int ecb_popcount32 (uint32_t x) ecb_const;	973	ecb_function_ ecb_const int ecb_popcount32 (uint32_t x);
737	ecb_function_ int	974	ecb_function_ ecb_const int
738	ecb_popcount32 (uint32_t x)	975	ecb_popcount32 (uint32_t x)
739	{	976	{
740	x -= (x >> 1) & 0x55555555;	977	x -= (x >> 1) & 0x55555555;
741	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);	978	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);
742	x = ((x >> 4) + x) & 0x0f0f0f0f;	979	x = ((x >> 4) + x) & 0x0f0f0f0f;
743	x *= 0x01010101;	980	x *= 0x01010101;
744		981
745	return x >> 24;	982	return x >> 24;
746	}	983	}
747		984
748	ecb_function_ int ecb_ld32 (uint32_t x) ecb_const;	985	ecb_function_ ecb_const int ecb_ld32 (uint32_t x);
749	ecb_function_ int ecb_ld32 (uint32_t x)	986	ecb_function_ ecb_const int ecb_ld32 (uint32_t x)
750	{	987	{
		988	#if 1400 <= _MSC_VER && (_M_IX86 || _M_X64 || _M_IA64 || _M_ARM)
		989	unsigned long r;
		990	_BitScanReverse (&r, x);
		991	return (int)r;
		992	#else
751	int r = 0;	993	int r = 0;
752		994
753	if (x >> 16) { x >>= 16; r += 16; }	995	if (x >> 16) { x >>= 16; r += 16; }
754	if (x >> 8) { x >>= 8; r += 8; }	996	if (x >> 8) { x >>= 8; r += 8; }
755	if (x >> 4) { x >>= 4; r += 4; }	997	if (x >> 4) { x >>= 4; r += 4; }
756	if (x >> 2) { x >>= 2; r += 2; }	998	if (x >> 2) { x >>= 2; r += 2; }
757	if (x >> 1) { r += 1; }	999	if (x >> 1) { r += 1; }
758		1000
759	return r;	1001	return r;
		1002	#endif
760	}	1003	}
761		1004
762	ecb_function_ int ecb_ld64 (uint64_t x) ecb_const;	1005	ecb_function_ ecb_const int ecb_ld64 (uint64_t x);
763	ecb_function_ int ecb_ld64 (uint64_t x)	1006	ecb_function_ ecb_const int ecb_ld64 (uint64_t x)
764	{	1007	{
		1008	#if 1400 <= _MSC_VER && (_M_X64 || _M_IA64 || _M_ARM)
		1009	unsigned long r;
		1010	_BitScanReverse64 (&r, x);
		1011	return (int)r;
		1012	#else
765	int r = 0;	1013	int r = 0;
766		1014
767	if (x >> 32) { x >>= 32; r += 32; }	1015	if (x >> 32) { x >>= 32; r += 32; }
768		1016
769	return r + ecb_ld32 (x);	1017	return r + ecb_ld32 (x);
		1018	#endif
770	}	1019	}
771	#endif	1020	#endif
772		1021
		1022	ecb_function_ ecb_const ecb_bool ecb_is_pot32 (uint32_t x);
		1023	ecb_function_ ecb_const ecb_bool ecb_is_pot32 (uint32_t x) { return !(x & (x - 1)); }
		1024	ecb_function_ ecb_const ecb_bool ecb_is_pot64 (uint64_t x);
		1025	ecb_function_ ecb_const ecb_bool ecb_is_pot64 (uint64_t x) { return !(x & (x - 1)); }
		1026
773	ecb_function_ uint8_t ecb_bitrev8 (uint8_t x) ecb_const;	1027	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x);
774	ecb_function_ uint8_t ecb_bitrev8 (uint8_t x)	1028	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x)
775	{	1029	{
776	return ( (x * 0x0802U & 0x22110U)	1030	return ( (x * 0x0802U & 0x22110U)
777	| (x * 0x8020U & 0x88440U)) * 0x10101U >> 16;	1031	| (x * 0x8020U & 0x88440U)) * 0x10101U >> 16;
778	}	1032	}
779		1033
780	ecb_function_ uint16_t ecb_bitrev16 (uint16_t x) ecb_const;	1034	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x);
781	ecb_function_ uint16_t ecb_bitrev16 (uint16_t x)	1035	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x)
782	{	1036	{
783	x = ((x >> 1) & 0x5555) | ((x & 0x5555) << 1);	1037	x = ((x >> 1) & 0x5555) | ((x & 0x5555) << 1);
784	x = ((x >> 2) & 0x3333) | ((x & 0x3333) << 2);	1038	x = ((x >> 2) & 0x3333) | ((x & 0x3333) << 2);
785	x = ((x >> 4) & 0x0f0f) | ((x & 0x0f0f) << 4);	1039	x = ((x >> 4) & 0x0f0f) | ((x & 0x0f0f) << 4);
786	x = ( x >> 8 ) | ( x << 8);	1040	x = ( x >> 8 ) | ( x << 8);
787		1041
788	return x;	1042	return x;
789	}	1043	}
790		1044
791	ecb_function_ uint32_t ecb_bitrev32 (uint32_t x) ecb_const;	1045	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x);
792	ecb_function_ uint32_t ecb_bitrev32 (uint32_t x)	1046	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x)
793	{	1047	{
794	x = ((x >> 1) & 0x55555555) | ((x & 0x55555555) << 1);	1048	x = ((x >> 1) & 0x55555555) | ((x & 0x55555555) << 1);
795	x = ((x >> 2) & 0x33333333) | ((x & 0x33333333) << 2);	1049	x = ((x >> 2) & 0x33333333) | ((x & 0x33333333) << 2);
796	x = ((x >> 4) & 0x0f0f0f0f) | ((x & 0x0f0f0f0f) << 4);	1050	x = ((x >> 4) & 0x0f0f0f0f) | ((x & 0x0f0f0f0f) << 4);
797	x = ((x >> 8) & 0x00ff00ff) | ((x & 0x00ff00ff) << 8);	1051	x = ((x >> 8) & 0x00ff00ff) | ((x & 0x00ff00ff) << 8);
…		…
800	return x;	1054	return x;
801	}	1055	}
802		1056
803	/* popcount64 is only available on 64 bit cpus as gcc builtin */	1057	/* popcount64 is only available on 64 bit cpus as gcc builtin */
804	/* so for this version we are lazy */	1058	/* so for this version we are lazy */
805	ecb_function_ int ecb_popcount64 (uint64_t x) ecb_const;	1059	ecb_function_ ecb_const int ecb_popcount64 (uint64_t x);
806	ecb_function_ int	1060	ecb_function_ ecb_const int
807	ecb_popcount64 (uint64_t x)	1061	ecb_popcount64 (uint64_t x)
808	{	1062	{
809	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);	1063	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);
810	}	1064	}
811		1065
812	ecb_inline uint8_t ecb_rotl8 (uint8_t x, unsigned int count) ecb_const;	1066	ecb_inline ecb_const uint8_t ecb_rotl8 (uint8_t x, unsigned int count);
813	ecb_inline uint8_t ecb_rotr8 (uint8_t x, unsigned int count) ecb_const;	1067	ecb_inline ecb_const uint8_t ecb_rotr8 (uint8_t x, unsigned int count);
814	ecb_inline uint16_t ecb_rotl16 (uint16_t x, unsigned int count) ecb_const;	1068	ecb_inline ecb_const uint16_t ecb_rotl16 (uint16_t x, unsigned int count);
815	ecb_inline uint16_t ecb_rotr16 (uint16_t x, unsigned int count) ecb_const;	1069	ecb_inline ecb_const uint16_t ecb_rotr16 (uint16_t x, unsigned int count);
816	ecb_inline uint32_t ecb_rotl32 (uint32_t x, unsigned int count) ecb_const;	1070	ecb_inline ecb_const uint32_t ecb_rotl32 (uint32_t x, unsigned int count);
817	ecb_inline uint32_t ecb_rotr32 (uint32_t x, unsigned int count) ecb_const;	1071	ecb_inline ecb_const uint32_t ecb_rotr32 (uint32_t x, unsigned int count);
818	ecb_inline uint64_t ecb_rotl64 (uint64_t x, unsigned int count) ecb_const;	1072	ecb_inline ecb_const uint64_t ecb_rotl64 (uint64_t x, unsigned int count);
819	ecb_inline uint64_t ecb_rotr64 (uint64_t x, unsigned int count) ecb_const;	1073	ecb_inline ecb_const uint64_t ecb_rotr64 (uint64_t x, unsigned int count);
820		1074
821	ecb_inline uint8_t ecb_rotl8 (uint8_t x, unsigned int count) { return (x >> ( 8 - count)) | (x << count); }	1075	ecb_inline ecb_const uint8_t ecb_rotl8 (uint8_t x, unsigned int count) { return (x >> ( 8 - count)) | (x << count); }
822	ecb_inline uint8_t ecb_rotr8 (uint8_t x, unsigned int count) { return (x << ( 8 - count)) | (x >> count); }	1076	ecb_inline ecb_const uint8_t ecb_rotr8 (uint8_t x, unsigned int count) { return (x << ( 8 - count)) | (x >> count); }
823	ecb_inline uint16_t ecb_rotl16 (uint16_t x, unsigned int count) { return (x >> (16 - count)) | (x << count); }	1077	ecb_inline ecb_const uint16_t ecb_rotl16 (uint16_t x, unsigned int count) { return (x >> (16 - count)) | (x << count); }
824	ecb_inline uint16_t ecb_rotr16 (uint16_t x, unsigned int count) { return (x << (16 - count)) | (x >> count); }	1078	ecb_inline ecb_const uint16_t ecb_rotr16 (uint16_t x, unsigned int count) { return (x << (16 - count)) | (x >> count); }
825	ecb_inline uint32_t ecb_rotl32 (uint32_t x, unsigned int count) { return (x >> (32 - count)) | (x << count); }	1079	ecb_inline ecb_const uint32_t ecb_rotl32 (uint32_t x, unsigned int count) { return (x >> (32 - count)) | (x << count); }
826	ecb_inline uint32_t ecb_rotr32 (uint32_t x, unsigned int count) { return (x << (32 - count)) | (x >> count); }	1080	ecb_inline ecb_const uint32_t ecb_rotr32 (uint32_t x, unsigned int count) { return (x << (32 - count)) | (x >> count); }
827	ecb_inline uint64_t ecb_rotl64 (uint64_t x, unsigned int count) { return (x >> (64 - count)) | (x << count); }	1081	ecb_inline ecb_const uint64_t ecb_rotl64 (uint64_t x, unsigned int count) { return (x >> (64 - count)) | (x << count); }
828	ecb_inline uint64_t ecb_rotr64 (uint64_t x, unsigned int count) { return (x << (64 - count)) | (x >> count); }	1082	ecb_inline ecb_const uint64_t ecb_rotr64 (uint64_t x, unsigned int count) { return (x << (64 - count)) | (x >> count); }
829		1083
830	#if ECB_GCC_VERSION(4,3)	1084	#if ECB_GCC_VERSION(4,3) || (ECB_CLANG_BUILTIN(__builtin_bswap32) && ECB_CLANG_BUILTIN(__builtin_bswap64))
		1085	#if ECB_GCC_VERSION(4,8) || ECB_CLANG_BUILTIN(__builtin_bswap16)
		1086	#define ecb_bswap16(x) __builtin_bswap16 (x)
		1087	#else
831	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)	1088	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)
		1089	#endif
832	#define ecb_bswap32(x) __builtin_bswap32 (x)	1090	#define ecb_bswap32(x) __builtin_bswap32 (x)
833	#define ecb_bswap64(x) __builtin_bswap64 (x)	1091	#define ecb_bswap64(x) __builtin_bswap64 (x)
		1092	#elif _MSC_VER
		1093	#include <stdlib.h>
		1094	#define ecb_bswap16(x) ((uint16_t)_byteswap_ushort ((uint16_t)(x)))
		1095	#define ecb_bswap32(x) ((uint32_t)_byteswap_ulong ((uint32_t)(x)))
		1096	#define ecb_bswap64(x) ((uint64_t)_byteswap_uint64 ((uint64_t)(x)))
834	#else	1097	#else
835	ecb_function_ uint16_t ecb_bswap16 (uint16_t x) ecb_const;	1098	ecb_function_ ecb_const uint16_t ecb_bswap16 (uint16_t x);
836	ecb_function_ uint16_t	1099	ecb_function_ ecb_const uint16_t
837	ecb_bswap16 (uint16_t x)	1100	ecb_bswap16 (uint16_t x)
838	{	1101	{
839	return ecb_rotl16 (x, 8);	1102	return ecb_rotl16 (x, 8);
840	}	1103	}
841		1104
842	ecb_function_ uint32_t ecb_bswap32 (uint32_t x) ecb_const;	1105	ecb_function_ ecb_const uint32_t ecb_bswap32 (uint32_t x);
843	ecb_function_ uint32_t	1106	ecb_function_ ecb_const uint32_t
844	ecb_bswap32 (uint32_t x)	1107	ecb_bswap32 (uint32_t x)
845	{	1108	{
846	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);	1109	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);
847	}	1110	}
848		1111
849	ecb_function_ uint64_t ecb_bswap64 (uint64_t x) ecb_const;	1112	ecb_function_ ecb_const uint64_t ecb_bswap64 (uint64_t x);
850	ecb_function_ uint64_t	1113	ecb_function_ ecb_const uint64_t
851	ecb_bswap64 (uint64_t x)	1114	ecb_bswap64 (uint64_t x)
852	{	1115	{
853	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);	1116	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);
854	}	1117	}
855	#endif	1118	#endif
856		1119
857	#if ECB_GCC_VERSION(4,5)	1120	#if ECB_GCC_VERSION(4,5) || ECB_CLANG_BUILTIN(__builtin_unreachable)
858	#define ecb_unreachable() __builtin_unreachable ()	1121	#define ecb_unreachable() __builtin_unreachable ()
859	#else	1122	#else
860	/* this seems to work fine, but gcc always emits a warning for it :/ */	1123	/* this seems to work fine, but gcc always emits a warning for it :/ */
861	ecb_inline void ecb_unreachable (void) ecb_noreturn;	1124	ecb_inline ecb_noreturn void ecb_unreachable (void);
862	ecb_inline void ecb_unreachable (void) { }	1125	ecb_inline ecb_noreturn void ecb_unreachable (void) { }
863	#endif	1126	#endif
864		1127
865	/* try to tell the compiler that some condition is definitely true */	1128	/* try to tell the compiler that some condition is definitely true */
866	#define ecb_assume(cond) do { if (!(cond)) ecb_unreachable (); } while (0)	1129	#define ecb_assume(cond) if (!(cond)) ecb_unreachable (); else 0
867		1130
868	ecb_inline unsigned char ecb_byteorder_helper (void) ecb_const;	1131	ecb_inline ecb_const uint32_t ecb_byteorder_helper (void);
869	ecb_inline unsigned char	1132	ecb_inline ecb_const uint32_t
870	ecb_byteorder_helper (void)	1133	ecb_byteorder_helper (void)
871	{	1134	{
872	const uint32_t u = 0x11223344;	1135	/* the union code still generates code under pressure in gcc, */
873	return *(unsigned char *)&u;	1136	/* but less than using pointers, and always seems to */
		1137	/* successfully return a constant. */
		1138	/* the reason why we have this horrible preprocessor mess */
		1139	/* is to avoid it in all cases, at least on common architectures */
		1140	/* or when using a recent enough gcc version (>= 4.6) */
		1141	#if (defined __BYTE_ORDER__ && __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__) \
		1142	|| ((__i386 || __i386__ || _M_IX86 || ECB_GCC_AMD64 || ECB_MSVC_AMD64) && !__VOS__)
		1143	#define ECB_LITTLE_ENDIAN 1
		1144	return 0x44332211;
		1145	#elif (defined __BYTE_ORDER__ && __BYTE_ORDER__ == __ORDER_BIG_ENDIAN__) \
		1146	|| ((__AARCH64EB__ || __MIPSEB__ || __ARMEB__) && !__VOS__)
		1147	#define ECB_BIG_ENDIAN 1
		1148	return 0x11223344;
		1149	#else
		1150	union
		1151	{
		1152	uint8_t c[4];
		1153	uint32_t u;
		1154	} u = { 0x11, 0x22, 0x33, 0x44 };
		1155	return u.u;
		1156	#endif
874	}	1157	}
875		1158
876	ecb_inline ecb_bool ecb_big_endian (void) ecb_const;	1159	ecb_inline ecb_const ecb_bool ecb_big_endian (void);
877	ecb_inline ecb_bool ecb_big_endian (void) { return ecb_byteorder_helper () == 0x11; }	1160	ecb_inline ecb_const ecb_bool ecb_big_endian (void) { return ecb_byteorder_helper () == 0x11223344; }
878	ecb_inline ecb_bool ecb_little_endian (void) ecb_const;	1161	ecb_inline ecb_const ecb_bool ecb_little_endian (void);
879	ecb_inline ecb_bool ecb_little_endian (void) { return ecb_byteorder_helper () == 0x44; }	1162	ecb_inline ecb_const ecb_bool ecb_little_endian (void) { return ecb_byteorder_helper () == 0x44332211; }
880		1163
881	#if ECB_GCC_VERSION(3,0) || ECB_C99	1164	#if ECB_GCC_VERSION(3,0) || ECB_C99
882	#define ecb_mod(m,n) ((m) % (n) + ((m) % (n) < 0 ? (n) : 0))	1165	#define ecb_mod(m,n) ((m) % (n) + ((m) % (n) < 0 ? (n) : 0))
883	#else	1166	#else
884	#define ecb_mod(m,n) ((m) < 0 ? ((n) - 1 - ((-1 - (m)) % (n))) : ((m) % (n)))	1167	#define ecb_mod(m,n) ((m) < 0 ? ((n) - 1 - ((-1 - (m)) % (n))) : ((m) % (n)))
885	#endif	1168	#endif
886		1169
887	#if __cplusplus	1170	#if ECB_CPP
888	template<typename T>	1171	template<typename T>
889	static inline T ecb_div_rd (T val, T div)	1172	static inline T ecb_div_rd (T val, T div)
890	{	1173	{
891	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;	1174	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;
892	}	1175	}
…		…
909	}	1192	}
910	#else	1193	#else
911	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))	1194	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))
912	#endif	1195	#endif
913		1196
		1197	ecb_function_ ecb_const uint32_t ecb_binary16_to_binary32 (uint32_t x);
		1198	ecb_function_ ecb_const uint32_t
		1199	ecb_binary16_to_binary32 (uint32_t x)
		1200	{
		1201	unsigned int s = (x & 0x8000) << (31 - 15);
		1202	int e = (x >> 10) & 0x001f;
		1203	unsigned int m = x & 0x03ff;
		1204
		1205	if (ecb_expect_false (e == 31))
		1206	/* infinity or NaN */
		1207	e = 255 - (127 - 15);
		1208	else if (ecb_expect_false (!e))
		1209	{
		1210	if (ecb_expect_true (!m))
		1211	/* zero, handled by code below by forcing e to 0 */
		1212	e = 0 - (127 - 15);
		1213	else
		1214	{
		1215	/* subnormal, renormalise */
		1216	unsigned int s = 10 - ecb_ld32 (m);
		1217
		1218	m = (m << s) & 0x3ff; /* mask implicit bit */
		1219	e -= s - 1;
		1220	}
		1221	}
		1222
		1223	/* e and m now are normalised, or zero, (or inf or nan) */
		1224	e += 127 - 15;
		1225
		1226	return s | (e << 23) | (m << (23 - 10));
		1227	}
		1228
		1229	ecb_function_ ecb_const uint16_t ecb_binary32_to_binary16 (uint32_t x);
		1230	ecb_function_ ecb_const uint16_t
		1231	ecb_binary32_to_binary16 (uint32_t x)
		1232	{
		1233	unsigned int s = (x >> 16) & 0x00008000; /* sign bit, the easy part */
		1234	unsigned int e = ((x >> 23) & 0x000000ff) - (127 - 15); /* the desired exponent */
		1235	unsigned int m = x & 0x007fffff;
		1236
		1237	x &= 0x7fffffff;
		1238
		1239	/* if it's within range of binary16 normals, use fast path */
		1240	if (ecb_expect_true (0x38800000 <= x && x <= 0x477fefff))
		1241	{
		1242	/* mantissa round-to-even */
		1243	m += 0x00000fff + ((m >> (23 - 10)) & 1);
		1244
		1245	/* handle overflow */
		1246	if (ecb_expect_false (m >= 0x00800000))
		1247	{
		1248	m >>= 1;
		1249	e += 1;
		1250	}
		1251
		1252	return s | (e << 10) | (m >> (23 - 10));
		1253	}
		1254
		1255	/* handle large numbers and infinity */
		1256	if (ecb_expect_true (0x477fefff < x && x <= 0x7f800000))
		1257	return s | 0x7c00;
		1258
		1259	/* handle zero, subnormals and small numbers */
		1260	if (ecb_expect_true (x < 0x38800000))
		1261	{
		1262	/* zero */
		1263	if (ecb_expect_true (!x))
		1264	return s;
		1265
		1266	/* handle subnormals */
		1267
		1268	/* too small, will be zero */
		1269	if (e < (14 - 24)) /* might not be sharp, but is good enough */
		1270	return s;
		1271
		1272	m |= 0x00800000; /* make implicit bit explicit */
		1273
		1274	/* very tricky - we need to round to the nearest e (+10) bit value */
		1275	{
		1276	unsigned int bits = 14 - e;
		1277	unsigned int half = (1 << (bits - 1)) - 1;
		1278	unsigned int even = (m >> bits) & 1;
		1279
		1280	/* if this overflows, we will end up with a normalised number */
		1281	m = (m + half + even) >> bits;
		1282	}
		1283
		1284	return s | m;
		1285	}
		1286
		1287	/* handle NaNs, preserve leftmost nan bits, but make sure we don't turn them into infinities */
		1288	m >>= 13;
		1289
		1290	return s | 0x7c00 | m | !m;
		1291	}
		1292
		1293	/*******************************************************************************/
		1294	/* floating point stuff, can be disabled by defining ECB_NO_LIBM */
		1295
		1296	/* basically, everything uses "ieee pure-endian" floating point numbers */
		1297	/* the only noteworthy exception is ancient armle, which uses order 43218765 */
		1298	#if 0 \
		1299	|| __i386 || __i386__ \
		1300	|| ECB_GCC_AMD64 \
		1301	|| __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__ \
		1302	|| defined __s390__ || defined __s390x__ \
		1303	|| defined __mips__ \
		1304	|| defined __alpha__ \
		1305	|| defined __hppa__ \
		1306	|| defined __ia64__ \
		1307	|| defined __m68k__ \
		1308	|| defined __m88k__ \
		1309	|| defined __sh__ \
		1310	|| defined _M_IX86 || defined ECB_MSVC_AMD64 || defined _M_IA64 \
		1311	|| (defined __arm__ && (defined __ARM_EABI__ || defined __EABI__ || defined __VFP_FP__ || defined _WIN32_WCE || defined __ANDROID__)) \
		1312	|| defined __aarch64__
		1313	#define ECB_STDFP 1
		1314	#include <string.h> /* for memcpy */
		1315	#else
		1316	#define ECB_STDFP 0
		1317	#endif
		1318
		1319	#ifndef ECB_NO_LIBM
		1320
		1321	#include <math.h> /* for frexp*, ldexp*, INFINITY, NAN */
		1322
		1323	/* only the oldest of old doesn't have this one. solaris. */
		1324	#ifdef INFINITY
		1325	#define ECB_INFINITY INFINITY
		1326	#else
		1327	#define ECB_INFINITY HUGE_VAL
		1328	#endif
		1329
		1330	#ifdef NAN
		1331	#define ECB_NAN NAN
		1332	#else
		1333	#define ECB_NAN ECB_INFINITY
		1334	#endif
		1335
		1336	#if ECB_C99 || _XOPEN_VERSION >= 600 || _POSIX_VERSION >= 200112L
		1337	#define ecb_ldexpf(x,e) ldexpf ((x), (e))
		1338	#define ecb_frexpf(x,e) frexpf ((x), (e))
		1339	#else
		1340	#define ecb_ldexpf(x,e) (float) ldexp ((double) (x), (e))
		1341	#define ecb_frexpf(x,e) (float) frexp ((double) (x), (e))
		1342	#endif
		1343
		1344	/* convert a float to ieee single/binary32 */
		1345	ecb_function_ ecb_const uint32_t ecb_float_to_binary32 (float x);
		1346	ecb_function_ ecb_const uint32_t
		1347	ecb_float_to_binary32 (float x)
		1348	{
		1349	uint32_t r;
		1350
		1351	#if ECB_STDFP
		1352	memcpy (&r, &x, 4);
		1353	#else
		1354	/* slow emulation, works for anything but -0 */
		1355	uint32_t m;
		1356	int e;
		1357
		1358	if (x == 0e0f ) return 0x00000000U;
		1359	if (x > +3.40282346638528860e+38f) return 0x7f800000U;
		1360	if (x < -3.40282346638528860e+38f) return 0xff800000U;
		1361	if (x != x ) return 0x7fbfffffU;
		1362
		1363	m = ecb_frexpf (x, &e) * 0x1000000U;
		1364
		1365	r = m & 0x80000000U;
		1366
		1367	if (r)
		1368	m = -m;
		1369
		1370	if (e <= -126)
		1371	{
		1372	m &= 0xffffffU;
		1373	m >>= (-125 - e);
		1374	e = -126;
		1375	}
		1376
		1377	r |= (e + 126) << 23;
		1378	r |= m & 0x7fffffU;
		1379	#endif
		1380
		1381	return r;
		1382	}
		1383
		1384	/* converts an ieee single/binary32 to a float */
		1385	ecb_function_ ecb_const float ecb_binary32_to_float (uint32_t x);
		1386	ecb_function_ ecb_const float
		1387	ecb_binary32_to_float (uint32_t x)
		1388	{
		1389	float r;
		1390
		1391	#if ECB_STDFP
		1392	memcpy (&r, &x, 4);
		1393	#else
		1394	/* emulation, only works for normals and subnormals and +0 */
		1395	int neg = x >> 31;
		1396	int e = (x >> 23) & 0xffU;
		1397
		1398	x &= 0x7fffffU;
		1399
		1400	if (e)
		1401	x |= 0x800000U;
		1402	else
		1403	e = 1;
		1404
		1405	/* we distrust ldexpf a bit and do the 2**-24 scaling by an extra multiply */
		1406	r = ecb_ldexpf (x * (0.5f / 0x800000U), e - 126);
		1407
		1408	r = neg ? -r : r;
		1409	#endif
		1410
		1411	return r;
		1412	}
		1413
		1414	/* convert a double to ieee double/binary64 */
		1415	ecb_function_ ecb_const uint64_t ecb_double_to_binary64 (double x);
		1416	ecb_function_ ecb_const uint64_t
		1417	ecb_double_to_binary64 (double x)
		1418	{
		1419	uint64_t r;
		1420
		1421	#if ECB_STDFP
		1422	memcpy (&r, &x, 8);
		1423	#else
		1424	/* slow emulation, works for anything but -0 */
		1425	uint64_t m;
		1426	int e;
		1427
		1428	if (x == 0e0 ) return 0x0000000000000000U;
		1429	if (x > +1.79769313486231470e+308) return 0x7ff0000000000000U;
		1430	if (x < -1.79769313486231470e+308) return 0xfff0000000000000U;
		1431	if (x != x ) return 0X7ff7ffffffffffffU;
		1432
		1433	m = frexp (x, &e) * 0x20000000000000U;
		1434
		1435	r = m & 0x8000000000000000;;
		1436
		1437	if (r)
		1438	m = -m;
		1439
		1440	if (e <= -1022)
		1441	{
		1442	m &= 0x1fffffffffffffU;
		1443	m >>= (-1021 - e);
		1444	e = -1022;
		1445	}
		1446
		1447	r |= ((uint64_t)(e + 1022)) << 52;
		1448	r |= m & 0xfffffffffffffU;
		1449	#endif
		1450
		1451	return r;
		1452	}
		1453
		1454	/* converts an ieee double/binary64 to a double */
		1455	ecb_function_ ecb_const double ecb_binary64_to_double (uint64_t x);
		1456	ecb_function_ ecb_const double
		1457	ecb_binary64_to_double (uint64_t x)
		1458	{
		1459	double r;
		1460
		1461	#if ECB_STDFP
		1462	memcpy (&r, &x, 8);
		1463	#else
		1464	/* emulation, only works for normals and subnormals and +0 */
		1465	int neg = x >> 63;
		1466	int e = (x >> 52) & 0x7ffU;
		1467
		1468	x &= 0xfffffffffffffU;
		1469
		1470	if (e)
		1471	x |= 0x10000000000000U;
		1472	else
		1473	e = 1;
		1474
		1475	/* we distrust ldexp a bit and do the 2**-53 scaling by an extra multiply */
		1476	r = ldexp (x * (0.5 / 0x10000000000000U), e - 1022);
		1477
		1478	r = neg ? -r : r;
		1479	#endif
		1480
		1481	return r;
		1482	}
		1483
		1484	/* convert a float to ieee half/binary16 */
		1485	ecb_function_ ecb_const uint16_t ecb_float_to_binary16 (float x);
		1486	ecb_function_ ecb_const uint16_t
		1487	ecb_float_to_binary16 (float x)
		1488	{
		1489	return ecb_binary32_to_binary16 (ecb_float_to_binary32 (x));
		1490	}
		1491
		1492	/* convert an ieee half/binary16 to float */
		1493	ecb_function_ ecb_const float ecb_binary16_to_float (uint16_t x);
		1494	ecb_function_ ecb_const float
		1495	ecb_binary16_to_float (uint16_t x)
		1496	{
		1497	return ecb_binary32_to_float (ecb_binary16_to_binary32 (x));
		1498	}
		1499
		1500	#endif
		1501
914	#endif	1502	#endif
915		1503
916	/* ECB.H END */	1504	/* ECB.H END */
917		1505
918	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS	1506	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS
…		…
1084	{	1672	{
1085	write (STDERR_FILENO, msg, strlen (msg));	1673	write (STDERR_FILENO, msg, strlen (msg));
1086	}	1674	}
1087	#endif	1675	#endif
1088		1676
1089	static void (*syserr_cb)(const char *msg);	1677	static void (*syserr_cb)(const char *msg) EV_THROW;
1090		1678
1091	void ecb_cold	1679	void ecb_cold
1092	ev_set_syserr_cb (void (*cb)(const char *msg))	1680	ev_set_syserr_cb (void (*cb)(const char *msg) EV_THROW) EV_THROW
1093	{	1681	{
1094	syserr_cb = cb;	1682	syserr_cb = cb;
1095	}	1683	}
1096		1684
1097	static void noinline ecb_cold	1685	static void noinline ecb_cold
…		…
1115	abort ();	1703	abort ();
1116	}	1704	}
1117	}	1705	}
1118		1706
1119	static void *	1707	static void *
1120	ev_realloc_emul (void *ptr, long size)	1708	ev_realloc_emul (void *ptr, long size) EV_THROW
1121	{	1709	{
1122	#if __GLIBC__
1123	return realloc (ptr, size);
1124	#else
1125	/* some systems, notably openbsd and darwin, fail to properly	1710	/* some systems, notably openbsd and darwin, fail to properly
1126	* implement realloc (x, 0) (as required by both ansi c-89 and	1711	* implement realloc (x, 0) (as required by both ansi c-89 and
1127	* the single unix specification, so work around them here.	1712	* the single unix specification, so work around them here.
		1713	* recently, also (at least) fedora and debian started breaking it,
		1714	* despite documenting it otherwise.
1128	*/	1715	*/
1129		1716
1130	if (size)	1717	if (size)
1131	return realloc (ptr, size);	1718	return realloc (ptr, size);
1132		1719
1133	free (ptr);	1720	free (ptr);
1134	return 0;	1721	return 0;
1135	#endif
1136	}	1722	}
1137		1723
1138	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	1724	static void *(*alloc)(void *ptr, long size) EV_THROW = ev_realloc_emul;
1139		1725
1140	void ecb_cold	1726	void ecb_cold
1141	ev_set_allocator (void *(*cb)(void *ptr, long size))	1727	ev_set_allocator (void *(*cb)(void *ptr, long size) EV_THROW) EV_THROW
1142	{	1728	{
1143	alloc = cb;	1729	alloc = cb;
1144	}	1730	}
1145		1731
1146	inline_speed void *	1732	inline_speed void *
…		…
1263		1849
1264	/*****************************************************************************/	1850	/*****************************************************************************/
1265		1851
1266	#ifndef EV_HAVE_EV_TIME	1852	#ifndef EV_HAVE_EV_TIME
1267	ev_tstamp	1853	ev_tstamp
1268	ev_time (void)	1854	ev_time (void) EV_THROW
1269	{	1855	{
1270	#if EV_USE_REALTIME	1856	#if EV_USE_REALTIME
1271	if (expect_true (have_realtime))	1857	if (expect_true (have_realtime))
1272	{	1858	{
1273	struct timespec ts;	1859	struct timespec ts;
…		…
1297	return ev_time ();	1883	return ev_time ();
1298	}	1884	}
1299		1885
1300	#if EV_MULTIPLICITY	1886	#if EV_MULTIPLICITY
1301	ev_tstamp	1887	ev_tstamp
1302	ev_now (EV_P)	1888	ev_now (EV_P) EV_THROW
1303	{	1889	{
1304	return ev_rt_now;	1890	return ev_rt_now;
1305	}	1891	}
1306	#endif	1892	#endif
1307		1893
1308	void	1894	void
1309	ev_sleep (ev_tstamp delay)	1895	ev_sleep (ev_tstamp delay) EV_THROW
1310	{	1896	{
1311	if (delay > 0.)	1897	if (delay > 0.)
1312	{	1898	{
1313	#if EV_USE_NANOSLEEP	1899	#if EV_USE_NANOSLEEP
1314	struct timespec ts;	1900	struct timespec ts;
1315		1901
1316	EV_TS_SET (ts, delay);	1902	EV_TS_SET (ts, delay);
1317	nanosleep (&ts, 0);	1903	nanosleep (&ts, 0);
1318	#elif defined(_WIN32)	1904	#elif defined _WIN32
1319	Sleep ((unsigned long)(delay * 1e3));	1905	Sleep ((unsigned long)(delay * 1e3));
1320	#else	1906	#else
1321	struct timeval tv;	1907	struct timeval tv;
1322		1908
1323	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */	1909	/* here we rely on sys/time.h + sys/types.h + unistd.h providing select */
…		…
1395	pendingcb (EV_P_ ev_prepare *w, int revents)	1981	pendingcb (EV_P_ ev_prepare *w, int revents)
1396	{	1982	{
1397	}	1983	}
1398		1984
1399	void noinline	1985	void noinline
1400	ev_feed_event (EV_P_ void *w, int revents)	1986	ev_feed_event (EV_P_ void *w, int revents) EV_THROW
1401	{	1987	{
1402	W w_ = (W)w;	1988	W w_ = (W)w;
1403	int pri = ABSPRI (w_);	1989	int pri = ABSPRI (w_);
1404		1990
1405	if (expect_false (w_->pending))	1991	if (expect_false (w_->pending))
…		…
1409	w_->pending = ++pendingcnt [pri];	1995	w_->pending = ++pendingcnt [pri];
1410	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);	1996	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);
1411	pendings [pri][w_->pending - 1].w = w_;	1997	pendings [pri][w_->pending - 1].w = w_;
1412	pendings [pri][w_->pending - 1].events = revents;	1998	pendings [pri][w_->pending - 1].events = revents;
1413	}	1999	}
		2000
		2001	pendingpri = NUMPRI - 1;
1414	}	2002	}
1415		2003
1416	inline_speed void	2004	inline_speed void
1417	feed_reverse (EV_P_ W w)	2005	feed_reverse (EV_P_ W w)
1418	{	2006	{
…		…
1464	if (expect_true (!anfd->reify))	2052	if (expect_true (!anfd->reify))
1465	fd_event_nocheck (EV_A_ fd, revents);	2053	fd_event_nocheck (EV_A_ fd, revents);
1466	}	2054	}
1467		2055
1468	void	2056	void
1469	ev_feed_fd_event (EV_P_ int fd, int revents)	2057	ev_feed_fd_event (EV_P_ int fd, int revents) EV_THROW
1470	{	2058	{
1471	if (fd >= 0 && fd < anfdmax)	2059	if (fd >= 0 && fd < anfdmax)
1472	fd_event_nocheck (EV_A_ fd, revents);	2060	fd_event_nocheck (EV_A_ fd, revents);
1473	}	2061	}
1474		2062
…		…
1793	static void noinline ecb_cold	2381	static void noinline ecb_cold
1794	evpipe_init (EV_P)	2382	evpipe_init (EV_P)
1795	{	2383	{
1796	if (!ev_is_active (&pipe_w))	2384	if (!ev_is_active (&pipe_w))
1797	{	2385	{
		2386	int fds [2];
		2387
1798	# if EV_USE_EVENTFD	2388	# if EV_USE_EVENTFD
		2389	fds [0] = -1;
1799	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	2390	fds [1] = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1800	if (evfd < 0 && errno == EINVAL)	2391	if (fds [1] < 0 && errno == EINVAL)
1801	evfd = eventfd (0, 0);	2392	fds [1] = eventfd (0, 0);
1802		2393
1803	if (evfd >= 0)	2394	if (fds [1] < 0)
		2395	# endif
1804	{	2396	{
		2397	while (pipe (fds))
		2398	ev_syserr ("(libev) error creating signal/async pipe");
		2399
		2400	fd_intern (fds [0]);
		2401	}
		2402
1805	evpipe [0] = -1;	2403	evpipe [0] = fds [0];
1806	fd_intern (evfd); /* doing it twice doesn't hurt */	2404
1807	ev_io_set (&pipe_w, evfd, EV_READ);	2405	if (evpipe [1] < 0)
		2406	evpipe [1] = fds [1]; /* first call, set write fd */
		2407	else
		2408	{
		2409	/* on subsequent calls, do not change evpipe [1] */
		2410	/* so that evpipe_write can always rely on its value. */
		2411	/* this branch does not do anything sensible on windows, */
		2412	/* so must not be executed on windows */
		2413
		2414	dup2 (fds [1], evpipe [1]);
		2415	close (fds [1]);
		2416	}
		2417
		2418	fd_intern (evpipe [1]);
		2419
		2420	ev_io_set (&pipe_w, evpipe [0] < 0 ? evpipe [1] : evpipe [0], EV_READ);
		2421	ev_io_start (EV_A_ &pipe_w);
		2422	ev_unref (EV_A); /* watcher should not keep loop alive */
		2423	}
		2424	}
		2425
		2426	inline_speed void
		2427	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
		2428	{
		2429	ECB_MEMORY_FENCE; /* push out the write before this function was called, acquire flag */
		2430
		2431	if (expect_true (*flag))
		2432	return;
		2433
		2434	*flag = 1;
		2435	ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */
		2436
		2437	pipe_write_skipped = 1;
		2438
		2439	ECB_MEMORY_FENCE; /* make sure pipe_write_skipped is visible before we check pipe_write_wanted */
		2440
		2441	if (pipe_write_wanted)
		2442	{
		2443	int old_errno;
		2444
		2445	pipe_write_skipped = 0;
		2446	ECB_MEMORY_FENCE_RELEASE;
		2447
		2448	old_errno = errno; /* save errno because write will clobber it */
		2449
		2450	#if EV_USE_EVENTFD
		2451	if (evpipe [0] < 0)
		2452	{
		2453	uint64_t counter = 1;
		2454	write (evpipe [1], &counter, sizeof (uint64_t));
1808	}	2455	}
1809	else	2456	else
1810	# endif	2457	#endif
1811	{	2458	{
1812	while (pipe (evpipe))	2459	#ifdef _WIN32
1813	ev_syserr ("(libev) error creating signal/async pipe");	2460	WSABUF buf;
1814		2461	DWORD sent;
1815	fd_intern (evpipe [0]);	2462	buf.buf = &buf;
1816	fd_intern (evpipe [1]);	2463	buf.len = 1;
1817	ev_io_set (&pipe_w, evpipe [0], EV_READ);	2464	WSASend (EV_FD_TO_WIN32_HANDLE (evpipe [1]), &buf, 1, &sent, 0, 0, 0);
1818	}	2465	#else
1819
1820	ev_io_start (EV_A_ &pipe_w);
1821	ev_unref (EV_A); /* watcher should not keep loop alive */
1822	}
1823	}
1824
1825	inline_speed void
1826	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1827	{
1828	if (expect_true (*flag))
1829	return;
1830
1831	*flag = 1;
1832
1833	ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */
1834
1835	pipe_write_skipped = 1;
1836
1837	ECB_MEMORY_FENCE; /* make sure pipe_write_skipped is visible before we check pipe_write_wanted */
1838
1839	if (pipe_write_wanted)
1840	{
1841	int old_errno;
1842
1843	pipe_write_skipped = 0; /* just an optimisation, no fence needed */
1844
1845	old_errno = errno; /* save errno because write will clobber it */
1846
1847	#if EV_USE_EVENTFD
1848	if (evfd >= 0)
1849	{
1850	uint64_t counter = 1;
1851	write (evfd, &counter, sizeof (uint64_t));
1852	}
1853	else
1854	#endif
1855	{
1856	/* win32 people keep sending patches that change this write() to send() */
1857	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
1858	/* so when you think this write should be a send instead, please find out */
1859	/* where your send() is from - it's definitely not the microsoft send, and */
1860	/* tell me. thank you. */
1861	write (evpipe [1], &(evpipe [1]), 1);	2466	write (evpipe [1], &(evpipe [1]), 1);
		2467	#endif
1862	}	2468	}
1863		2469
1864	errno = old_errno;	2470	errno = old_errno;
1865	}	2471	}
1866	}	2472	}
…		…
1873	int i;	2479	int i;
1874		2480
1875	if (revents & EV_READ)	2481	if (revents & EV_READ)
1876	{	2482	{
1877	#if EV_USE_EVENTFD	2483	#if EV_USE_EVENTFD
1878	if (evfd >= 0)	2484	if (evpipe [0] < 0)
1879	{	2485	{
1880	uint64_t counter;	2486	uint64_t counter;
1881	read (evfd, &counter, sizeof (uint64_t));	2487	read (evpipe [1], &counter, sizeof (uint64_t));
1882	}	2488	}
1883	else	2489	else
1884	#endif	2490	#endif
1885	{	2491	{
1886	char dummy;	2492	char dummy[4];
1887	/* see discussion in evpipe_write when you think this read should be recv in win32 */	2493	#ifdef _WIN32
		2494	WSABUF buf;
		2495	DWORD recvd;
		2496	DWORD flags = 0;
		2497	buf.buf = dummy;
		2498	buf.len = sizeof (dummy);
		2499	WSARecv (EV_FD_TO_WIN32_HANDLE (evpipe [0]), &buf, 1, &recvd, &flags, 0, 0);
		2500	#else
1888	read (evpipe [0], &dummy, 1);	2501	read (evpipe [0], &dummy, sizeof (dummy));
		2502	#endif
1889	}	2503	}
1890	}	2504	}
1891		2505
1892	pipe_write_skipped = 0;	2506	pipe_write_skipped = 0;
		2507
		2508	ECB_MEMORY_FENCE; /* push out skipped, acquire flags */
1893		2509
1894	#if EV_SIGNAL_ENABLE	2510	#if EV_SIGNAL_ENABLE
1895	if (sig_pending)	2511	if (sig_pending)
1896	{	2512	{
1897	sig_pending = 0;	2513	sig_pending = 0;
		2514
		2515	ECB_MEMORY_FENCE;
1898		2516
1899	for (i = EV_NSIG - 1; i--; )	2517	for (i = EV_NSIG - 1; i--; )
1900	if (expect_false (signals [i].pending))	2518	if (expect_false (signals [i].pending))
1901	ev_feed_signal_event (EV_A_ i + 1);	2519	ev_feed_signal_event (EV_A_ i + 1);
1902	}	2520	}
…		…
1904		2522
1905	#if EV_ASYNC_ENABLE	2523	#if EV_ASYNC_ENABLE
1906	if (async_pending)	2524	if (async_pending)
1907	{	2525	{
1908	async_pending = 0;	2526	async_pending = 0;
		2527
		2528	ECB_MEMORY_FENCE;
1909		2529
1910	for (i = asynccnt; i--; )	2530	for (i = asynccnt; i--; )
1911	if (asyncs [i]->sent)	2531	if (asyncs [i]->sent)
1912	{	2532	{
1913	asyncs [i]->sent = 0;	2533	asyncs [i]->sent = 0;
		2534	ECB_MEMORY_FENCE_RELEASE;
1914	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);	2535	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);
1915	}	2536	}
1916	}	2537	}
1917	#endif	2538	#endif
1918	}	2539	}
1919		2540
1920	/*****************************************************************************/	2541	/*****************************************************************************/
1921		2542
1922	void	2543	void
1923	ev_feed_signal (int signum)	2544	ev_feed_signal (int signum) EV_THROW
1924	{	2545	{
1925	#if EV_MULTIPLICITY	2546	#if EV_MULTIPLICITY
		2547	EV_P;
		2548	ECB_MEMORY_FENCE_ACQUIRE;
1926	EV_P = signals [signum - 1].loop;	2549	EV_A = signals [signum - 1].loop;
1927		2550
1928	if (!EV_A)	2551	if (!EV_A)
1929	return;	2552	return;
1930	#endif	2553	#endif
1931		2554
1932	if (!ev_active (&pipe_w))
1933	return;
1934
1935	signals [signum - 1].pending = 1;	2555	signals [signum - 1].pending = 1;
1936	evpipe_write (EV_A_ &sig_pending);	2556	evpipe_write (EV_A_ &sig_pending);
1937	}	2557	}
1938		2558
1939	static void	2559	static void
…		…
1945		2565
1946	ev_feed_signal (signum);	2566	ev_feed_signal (signum);
1947	}	2567	}
1948		2568
1949	void noinline	2569	void noinline
1950	ev_feed_signal_event (EV_P_ int signum)	2570	ev_feed_signal_event (EV_P_ int signum) EV_THROW
1951	{	2571	{
1952	WL w;	2572	WL w;
1953		2573
1954	if (expect_false (signum <= 0 || signum > EV_NSIG))	2574	if (expect_false (signum <= 0 || signum >= EV_NSIG))
1955	return;	2575	return;
1956		2576
1957	--signum;	2577	--signum;
1958		2578
1959	#if EV_MULTIPLICITY	2579	#if EV_MULTIPLICITY
…		…
1963	if (expect_false (signals [signum].loop != EV_A))	2583	if (expect_false (signals [signum].loop != EV_A))
1964	return;	2584	return;
1965	#endif	2585	#endif
1966		2586
1967	signals [signum].pending = 0;	2587	signals [signum].pending = 0;
		2588	ECB_MEMORY_FENCE_RELEASE;
1968		2589
1969	for (w = signals [signum].head; w; w = w->next)	2590	for (w = signals [signum].head; w; w = w->next)
1970	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);	2591	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);
1971	}	2592	}
1972		2593
…		…
2071	#if EV_USE_SELECT	2692	#if EV_USE_SELECT
2072	# include "ev_select.c"	2693	# include "ev_select.c"
2073	#endif	2694	#endif
2074		2695
2075	int ecb_cold	2696	int ecb_cold
2076	ev_version_major (void)	2697	ev_version_major (void) EV_THROW
2077	{	2698	{
2078	return EV_VERSION_MAJOR;	2699	return EV_VERSION_MAJOR;
2079	}	2700	}
2080		2701
2081	int ecb_cold	2702	int ecb_cold
2082	ev_version_minor (void)	2703	ev_version_minor (void) EV_THROW
2083	{	2704	{
2084	return EV_VERSION_MINOR;	2705	return EV_VERSION_MINOR;
2085	}	2706	}
2086		2707
2087	/* return true if we are running with elevated privileges and should ignore env variables */	2708	/* return true if we are running with elevated privileges and should ignore env variables */
…		…
2095	|| getgid () != getegid ();	2716	|| getgid () != getegid ();
2096	#endif	2717	#endif
2097	}	2718	}
2098		2719
2099	unsigned int ecb_cold	2720	unsigned int ecb_cold
2100	ev_supported_backends (void)	2721	ev_supported_backends (void) EV_THROW
2101	{	2722	{
2102	unsigned int flags = 0;	2723	unsigned int flags = 0;
2103		2724
2104	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;	2725	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
2105	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;	2726	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;
…		…
2109		2730
2110	return flags;	2731	return flags;
2111	}	2732	}
2112		2733
2113	unsigned int ecb_cold	2734	unsigned int ecb_cold
2114	ev_recommended_backends (void)	2735	ev_recommended_backends (void) EV_THROW
2115	{	2736	{
2116	unsigned int flags = ev_supported_backends ();	2737	unsigned int flags = ev_supported_backends ();
2117		2738
2118	#ifndef __NetBSD__	2739	#ifndef __NetBSD__
2119	/* kqueue is borked on everything but netbsd apparently */	2740	/* kqueue is borked on everything but netbsd apparently */
…		…
2131		2752
2132	return flags;	2753	return flags;
2133	}	2754	}
2134		2755
2135	unsigned int ecb_cold	2756	unsigned int ecb_cold
2136	ev_embeddable_backends (void)	2757	ev_embeddable_backends (void) EV_THROW
2137	{	2758	{
2138	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;	2759	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
2139		2760
2140	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */	2761	/* epoll embeddability broken on all linux versions up to at least 2.6.23 */
2141	if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */	2762	if (ev_linux_version () < 0x020620) /* disable it on linux < 2.6.32 */
…		…
2143		2764
2144	return flags;	2765	return flags;
2145	}	2766	}
2146		2767
2147	unsigned int	2768	unsigned int
2148	ev_backend (EV_P)	2769	ev_backend (EV_P) EV_THROW
2149	{	2770	{
2150	return backend;	2771	return backend;
2151	}	2772	}
2152		2773
2153	#if EV_FEATURE_API	2774	#if EV_FEATURE_API
2154	unsigned int	2775	unsigned int
2155	ev_iteration (EV_P)	2776	ev_iteration (EV_P) EV_THROW
2156	{	2777	{
2157	return loop_count;	2778	return loop_count;
2158	}	2779	}
2159		2780
2160	unsigned int	2781	unsigned int
2161	ev_depth (EV_P)	2782	ev_depth (EV_P) EV_THROW
2162	{	2783	{
2163	return loop_depth;	2784	return loop_depth;
2164	}	2785	}
2165		2786
2166	void	2787	void
2167	ev_set_io_collect_interval (EV_P_ ev_tstamp interval)	2788	ev_set_io_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2168	{	2789	{
2169	io_blocktime = interval;	2790	io_blocktime = interval;
2170	}	2791	}
2171		2792
2172	void	2793	void
2173	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval)	2794	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2174	{	2795	{
2175	timeout_blocktime = interval;	2796	timeout_blocktime = interval;
2176	}	2797	}
2177		2798
2178	void	2799	void
2179	ev_set_userdata (EV_P_ void *data)	2800	ev_set_userdata (EV_P_ void *data) EV_THROW
2180	{	2801	{
2181	userdata = data;	2802	userdata = data;
2182	}	2803	}
2183		2804
2184	void *	2805	void *
2185	ev_userdata (EV_P)	2806	ev_userdata (EV_P) EV_THROW
2186	{	2807	{
2187	return userdata;	2808	return userdata;
2188	}	2809	}
2189		2810
2190	void	2811	void
2191	ev_set_invoke_pending_cb (EV_P_ void (*invoke_pending_cb)(EV_P))	2812	ev_set_invoke_pending_cb (EV_P_ ev_loop_callback invoke_pending_cb) EV_THROW
2192	{	2813	{
2193	invoke_cb = invoke_pending_cb;	2814	invoke_cb = invoke_pending_cb;
2194	}	2815	}
2195		2816
2196	void	2817	void
2197	ev_set_loop_release_cb (EV_P_ void (*release)(EV_P), void (*acquire)(EV_P))	2818	ev_set_loop_release_cb (EV_P_ void (*release)(EV_P) EV_THROW, void (*acquire)(EV_P) EV_THROW) EV_THROW
2198	{	2819	{
2199	release_cb = release;	2820	release_cb = release;
2200	acquire_cb = acquire;	2821	acquire_cb = acquire;
2201	}	2822	}
2202	#endif	2823	#endif
2203		2824
2204	/* initialise a loop structure, must be zero-initialised */	2825	/* initialise a loop structure, must be zero-initialised */
2205	static void noinline ecb_cold	2826	static void noinline ecb_cold
2206	loop_init (EV_P_ unsigned int flags)	2827	loop_init (EV_P_ unsigned int flags) EV_THROW
2207	{	2828	{
2208	if (!backend)	2829	if (!backend)
2209	{	2830	{
2210	origflags = flags;	2831	origflags = flags;
2211		2832
…		…
2256	#if EV_ASYNC_ENABLE	2877	#if EV_ASYNC_ENABLE
2257	async_pending = 0;	2878	async_pending = 0;
2258	#endif	2879	#endif
2259	pipe_write_skipped = 0;	2880	pipe_write_skipped = 0;
2260	pipe_write_wanted = 0;	2881	pipe_write_wanted = 0;
		2882	evpipe [0] = -1;
		2883	evpipe [1] = -1;
2261	#if EV_USE_INOTIFY	2884	#if EV_USE_INOTIFY
2262	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	2885	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
2263	#endif	2886	#endif
2264	#if EV_USE_SIGNALFD	2887	#if EV_USE_SIGNALFD
2265	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;	2888	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
…		…
2316	EV_INVOKE_PENDING;	2939	EV_INVOKE_PENDING;
2317	}	2940	}
2318	#endif	2941	#endif
2319		2942
2320	#if EV_CHILD_ENABLE	2943	#if EV_CHILD_ENABLE
2321	if (ev_is_active (&childev))	2944	if (ev_is_default_loop (EV_A) && ev_is_active (&childev))
2322	{	2945	{
2323	ev_ref (EV_A); /* child watcher */	2946	ev_ref (EV_A); /* child watcher */
2324	ev_signal_stop (EV_A_ &childev);	2947	ev_signal_stop (EV_A_ &childev);
2325	}	2948	}
2326	#endif	2949	#endif
…		…
2328	if (ev_is_active (&pipe_w))	2951	if (ev_is_active (&pipe_w))
2329	{	2952	{
2330	/*ev_ref (EV_A);*/	2953	/*ev_ref (EV_A);*/
2331	/*ev_io_stop (EV_A_ &pipe_w);*/	2954	/*ev_io_stop (EV_A_ &pipe_w);*/
2332		2955
2333	#if EV_USE_EVENTFD
2334	if (evfd >= 0)
2335	close (evfd);
2336	#endif
2337
2338	if (evpipe [0] >= 0)
2339	{
2340	EV_WIN32_CLOSE_FD (evpipe [0]);	2956	if (evpipe [0] >= 0) EV_WIN32_CLOSE_FD (evpipe [0]);
2341	EV_WIN32_CLOSE_FD (evpipe [1]);	2957	if (evpipe [1] >= 0) EV_WIN32_CLOSE_FD (evpipe [1]);
2342	}
2343	}	2958	}
2344		2959
2345	#if EV_USE_SIGNALFD	2960	#if EV_USE_SIGNALFD
2346	if (ev_is_active (&sigfd_w))	2961	if (ev_is_active (&sigfd_w))
2347	close (sigfd);	2962	close (sigfd);
…		…
2433	#endif	3048	#endif
2434	#if EV_USE_INOTIFY	3049	#if EV_USE_INOTIFY
2435	infy_fork (EV_A);	3050	infy_fork (EV_A);
2436	#endif	3051	#endif
2437		3052
		3053	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2438	if (ev_is_active (&pipe_w))	3054	if (ev_is_active (&pipe_w) && postfork != 2)
2439	{	3055	{
2440	/* pipe_write_wanted must be false now, so modifying fd vars should be safe */	3056	/* pipe_write_wanted must be false now, so modifying fd vars should be safe */
2441		3057
2442	ev_ref (EV_A);	3058	ev_ref (EV_A);
2443	ev_io_stop (EV_A_ &pipe_w);	3059	ev_io_stop (EV_A_ &pipe_w);
2444		3060
2445	#if EV_USE_EVENTFD
2446	if (evfd >= 0)
2447	close (evfd);
2448	#endif
2449
2450	if (evpipe [0] >= 0)	3061	if (evpipe [0] >= 0)
2451	{
2452	EV_WIN32_CLOSE_FD (evpipe [0]);	3062	EV_WIN32_CLOSE_FD (evpipe [0]);
2453	EV_WIN32_CLOSE_FD (evpipe [1]);
2454	}
2455		3063
2456	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2457	evpipe_init (EV_A);	3064	evpipe_init (EV_A);
2458	/* now iterate over everything, in case we missed something */	3065	/* iterate over everything, in case we missed something before */
2459	pipecb (EV_A_ &pipe_w, EV_READ);	3066	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
2460	#endif
2461	}	3067	}
		3068	#endif
2462		3069
2463	postfork = 0;	3070	postfork = 0;
2464	}	3071	}
2465		3072
2466	#if EV_MULTIPLICITY	3073	#if EV_MULTIPLICITY
2467		3074
2468	struct ev_loop * ecb_cold	3075	struct ev_loop * ecb_cold
2469	ev_loop_new (unsigned int flags)	3076	ev_loop_new (unsigned int flags) EV_THROW
2470	{	3077	{
2471	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));	3078	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));
2472		3079
2473	memset (EV_A, 0, sizeof (struct ev_loop));	3080	memset (EV_A, 0, sizeof (struct ev_loop));
2474	loop_init (EV_A_ flags);	3081	loop_init (EV_A_ flags);
…		…
2518	}	3125	}
2519	#endif	3126	#endif
2520		3127
2521	#if EV_FEATURE_API	3128	#if EV_FEATURE_API
2522	void ecb_cold	3129	void ecb_cold
2523	ev_verify (EV_P)	3130	ev_verify (EV_P) EV_THROW
2524	{	3131	{
2525	#if EV_VERIFY	3132	#if EV_VERIFY
2526	int i;	3133	int i;
2527	WL w;	3134	WL w, w2;
2528		3135
2529	assert (activecnt >= -1);	3136	assert (activecnt >= -1);
2530		3137
2531	assert (fdchangemax >= fdchangecnt);	3138	assert (fdchangemax >= fdchangecnt);
2532	for (i = 0; i < fdchangecnt; ++i)	3139	for (i = 0; i < fdchangecnt; ++i)
2533	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));	3140	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));
2534		3141
2535	assert (anfdmax >= 0);	3142	assert (anfdmax >= 0);
2536	for (i = 0; i < anfdmax; ++i)	3143	for (i = 0; i < anfdmax; ++i)
		3144	{
		3145	int j = 0;
		3146
2537	for (w = anfds [i].head; w; w = w->next)	3147	for (w = w2 = anfds [i].head; w; w = w->next)
2538	{	3148	{
2539	verify_watcher (EV_A_ (W)w);	3149	verify_watcher (EV_A_ (W)w);
		3150
		3151	if (j++ & 1)
		3152	{
		3153	assert (("libev: io watcher list contains a loop", w != w2));
		3154	w2 = w2->next;
		3155	}
		3156
2540	assert (("libev: inactive fd watcher on anfd list", ev_active (w) == 1));	3157	assert (("libev: inactive fd watcher on anfd list", ev_active (w) == 1));
2541	assert (("libev: fd mismatch between watcher and anfd", ((ev_io *)w)->fd == i));	3158	assert (("libev: fd mismatch between watcher and anfd", ((ev_io *)w)->fd == i));
2542	}	3159	}
		3160	}
2543		3161
2544	assert (timermax >= timercnt);	3162	assert (timermax >= timercnt);
2545	verify_heap (EV_A_ timers, timercnt);	3163	verify_heap (EV_A_ timers, timercnt);
2546		3164
2547	#if EV_PERIODIC_ENABLE	3165	#if EV_PERIODIC_ENABLE
…		…
2597	#if EV_MULTIPLICITY	3215	#if EV_MULTIPLICITY
2598	struct ev_loop * ecb_cold	3216	struct ev_loop * ecb_cold
2599	#else	3217	#else
2600	int	3218	int
2601	#endif	3219	#endif
2602	ev_default_loop (unsigned int flags)	3220	ev_default_loop (unsigned int flags) EV_THROW
2603	{	3221	{
2604	if (!ev_default_loop_ptr)	3222	if (!ev_default_loop_ptr)
2605	{	3223	{
2606	#if EV_MULTIPLICITY	3224	#if EV_MULTIPLICITY
2607	EV_P = ev_default_loop_ptr = &default_loop_struct;	3225	EV_P = ev_default_loop_ptr = &default_loop_struct;
…		…
2626		3244
2627	return ev_default_loop_ptr;	3245	return ev_default_loop_ptr;
2628	}	3246	}
2629		3247
2630	void	3248	void
2631	ev_loop_fork (EV_P)	3249	ev_loop_fork (EV_P) EV_THROW
2632	{	3250	{
2633	postfork = 1; /* must be in line with ev_default_fork */	3251	postfork = 1;
2634	}	3252	}
2635		3253
2636	/*****************************************************************************/	3254	/*****************************************************************************/
2637		3255
2638	void	3256	void
…		…
2640	{	3258	{
2641	EV_CB_INVOKE ((W)w, revents);	3259	EV_CB_INVOKE ((W)w, revents);
2642	}	3260	}
2643		3261
2644	unsigned int	3262	unsigned int
2645	ev_pending_count (EV_P)	3263	ev_pending_count (EV_P) EV_THROW
2646	{	3264	{
2647	int pri;	3265	int pri;
2648	unsigned int count = 0;	3266	unsigned int count = 0;
2649		3267
2650	for (pri = NUMPRI; pri--; )	3268	for (pri = NUMPRI; pri--; )
…		…
2654	}	3272	}
2655		3273
2656	void noinline	3274	void noinline
2657	ev_invoke_pending (EV_P)	3275	ev_invoke_pending (EV_P)
2658	{	3276	{
2659	int pri;	3277	pendingpri = NUMPRI;
2660		3278
2661	for (pri = NUMPRI; pri--; )	3279	while (pendingpri) /* pendingpri possibly gets modified in the inner loop */
		3280	{
		3281	--pendingpri;
		3282
2662	while (pendingcnt [pri])	3283	while (pendingcnt [pendingpri])
2663	{	3284	{
2664	ANPENDING *p = pendings [pri] + --pendingcnt [pri];	3285	ANPENDING *p = pendings [pendingpri] + --pendingcnt [pendingpri];
2665		3286
2666	p->w->pending = 0;	3287	p->w->pending = 0;
2667	EV_CB_INVOKE (p->w, p->events);	3288	EV_CB_INVOKE (p->w, p->events);
2668	EV_FREQUENT_CHECK;	3289	EV_FREQUENT_CHECK;
2669	}	3290	}
		3291	}
2670	}	3292	}
2671		3293
2672	#if EV_IDLE_ENABLE	3294	#if EV_IDLE_ENABLE
2673	/* make idle watchers pending. this handles the "call-idle */	3295	/* make idle watchers pending. this handles the "call-idle */
2674	/* only when higher priorities are idle" logic */	3296	/* only when higher priorities are idle" logic */
…		…
2764	{	3386	{
2765	EV_FREQUENT_CHECK;	3387	EV_FREQUENT_CHECK;
2766		3388
2767	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)	3389	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)
2768	{	3390	{
2769	int feed_count = 0;
2770
2771	do	3391	do
2772	{	3392	{
2773	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);	3393	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);
2774		3394
2775	/*assert (("libev: inactive timer on periodic heap detected", ev_is_active (w)));*/	3395	/*assert (("libev: inactive timer on periodic heap detected", ev_is_active (w)));*/
…		…
2909		3529
2910	mn_now = ev_rt_now;	3530	mn_now = ev_rt_now;
2911	}	3531	}
2912	}	3532	}
2913		3533
2914	void	3534	int
2915	ev_run (EV_P_ int flags)	3535	ev_run (EV_P_ int flags)
2916	{	3536	{
2917	#if EV_FEATURE_API	3537	#if EV_FEATURE_API
2918	++loop_depth;	3538	++loop_depth;
2919	#endif	3539	#endif
…		…
3034	backend_poll (EV_A_ waittime);	3654	backend_poll (EV_A_ waittime);
3035	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */	3655	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
3036		3656
3037	pipe_write_wanted = 0; /* just an optimisation, no fence needed */	3657	pipe_write_wanted = 0; /* just an optimisation, no fence needed */
3038		3658
		3659	ECB_MEMORY_FENCE_ACQUIRE;
3039	if (pipe_write_skipped)	3660	if (pipe_write_skipped)
3040	{	3661	{
3041	assert (("libev: pipe_w not active, but pipe not written", ev_is_active (&pipe_w)));	3662	assert (("libev: pipe_w not active, but pipe not written", ev_is_active (&pipe_w)));
3042	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);	3663	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
3043	}	3664	}
…		…
3076	loop_done = EVBREAK_CANCEL;	3697	loop_done = EVBREAK_CANCEL;
3077		3698
3078	#if EV_FEATURE_API	3699	#if EV_FEATURE_API
3079	--loop_depth;	3700	--loop_depth;
3080	#endif	3701	#endif
		3702
		3703	return activecnt;
3081	}	3704	}
3082		3705
3083	void	3706	void
3084	ev_break (EV_P_ int how)	3707	ev_break (EV_P_ int how) EV_THROW
3085	{	3708	{
3086	loop_done = how;	3709	loop_done = how;
3087	}	3710	}
3088		3711
3089	void	3712	void
3090	ev_ref (EV_P)	3713	ev_ref (EV_P) EV_THROW
3091	{	3714	{
3092	++activecnt;	3715	++activecnt;
3093	}	3716	}
3094		3717
3095	void	3718	void
3096	ev_unref (EV_P)	3719	ev_unref (EV_P) EV_THROW
3097	{	3720	{
3098	--activecnt;	3721	--activecnt;
3099	}	3722	}
3100		3723
3101	void	3724	void
3102	ev_now_update (EV_P)	3725	ev_now_update (EV_P) EV_THROW
3103	{	3726	{
3104	time_update (EV_A_ 1e100);	3727	time_update (EV_A_ 1e100);
3105	}	3728	}
3106		3729
3107	void	3730	void
3108	ev_suspend (EV_P)	3731	ev_suspend (EV_P) EV_THROW
3109	{	3732	{
3110	ev_now_update (EV_A);	3733	ev_now_update (EV_A);
3111	}	3734	}
3112		3735
3113	void	3736	void
3114	ev_resume (EV_P)	3737	ev_resume (EV_P) EV_THROW
3115	{	3738	{
3116	ev_tstamp mn_prev = mn_now;	3739	ev_tstamp mn_prev = mn_now;
3117		3740
3118	ev_now_update (EV_A);	3741	ev_now_update (EV_A);
3119	timers_reschedule (EV_A_ mn_now - mn_prev);	3742	timers_reschedule (EV_A_ mn_now - mn_prev);
…		…
3158	w->pending = 0;	3781	w->pending = 0;
3159	}	3782	}
3160	}	3783	}
3161		3784
3162	int	3785	int
3163	ev_clear_pending (EV_P_ void *w)	3786	ev_clear_pending (EV_P_ void *w) EV_THROW
3164	{	3787	{
3165	W w_ = (W)w;	3788	W w_ = (W)w;
3166	int pending = w_->pending;	3789	int pending = w_->pending;
3167		3790
3168	if (expect_true (pending))	3791	if (expect_true (pending))
…		…
3201	}	3824	}
3202		3825
3203	/*****************************************************************************/	3826	/*****************************************************************************/
3204		3827
3205	void noinline	3828	void noinline
3206	ev_io_start (EV_P_ ev_io *w)	3829	ev_io_start (EV_P_ ev_io *w) EV_THROW
3207	{	3830	{
3208	int fd = w->fd;	3831	int fd = w->fd;
3209		3832
3210	if (expect_false (ev_is_active (w)))	3833	if (expect_false (ev_is_active (w)))
3211	return;	3834	return;
…		…
3217		3840
3218	ev_start (EV_A_ (W)w, 1);	3841	ev_start (EV_A_ (W)w, 1);
3219	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	3842	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
3220	wlist_add (&anfds[fd].head, (WL)w);	3843	wlist_add (&anfds[fd].head, (WL)w);
3221		3844
		3845	/* common bug, apparently */
		3846	assert (("libev: ev_io_start called with corrupted watcher", ((WL)w)->next != (WL)w));
		3847
3222	fd_change (EV_A_ fd, w->events & EV__IOFDSET | EV_ANFD_REIFY);	3848	fd_change (EV_A_ fd, w->events & EV__IOFDSET | EV_ANFD_REIFY);
3223	w->events &= ~EV__IOFDSET;	3849	w->events &= ~EV__IOFDSET;
3224		3850
3225	EV_FREQUENT_CHECK;	3851	EV_FREQUENT_CHECK;
3226	}	3852	}
3227		3853
3228	void noinline	3854	void noinline
3229	ev_io_stop (EV_P_ ev_io *w)	3855	ev_io_stop (EV_P_ ev_io *w) EV_THROW
3230	{	3856	{
3231	clear_pending (EV_A_ (W)w);	3857	clear_pending (EV_A_ (W)w);
3232	if (expect_false (!ev_is_active (w)))	3858	if (expect_false (!ev_is_active (w)))
3233	return;	3859	return;
3234		3860
…		…
3243		3869
3244	EV_FREQUENT_CHECK;	3870	EV_FREQUENT_CHECK;
3245	}	3871	}
3246		3872
3247	void noinline	3873	void noinline
3248	ev_timer_start (EV_P_ ev_timer *w)	3874	ev_timer_start (EV_P_ ev_timer *w) EV_THROW
3249	{	3875	{
3250	if (expect_false (ev_is_active (w)))	3876	if (expect_false (ev_is_active (w)))
3251	return;	3877	return;
3252		3878
3253	ev_at (w) += mn_now;	3879	ev_at (w) += mn_now;
…		…
3267		3893
3268	/*assert (("libev: internal timer heap corruption", timers [ev_active (w)] == (WT)w));*/	3894	/*assert (("libev: internal timer heap corruption", timers [ev_active (w)] == (WT)w));*/
3269	}	3895	}
3270		3896
3271	void noinline	3897	void noinline
3272	ev_timer_stop (EV_P_ ev_timer *w)	3898	ev_timer_stop (EV_P_ ev_timer *w) EV_THROW
3273	{	3899	{
3274	clear_pending (EV_A_ (W)w);	3900	clear_pending (EV_A_ (W)w);
3275	if (expect_false (!ev_is_active (w)))	3901	if (expect_false (!ev_is_active (w)))
3276	return;	3902	return;
3277		3903
…		…
3297		3923
3298	EV_FREQUENT_CHECK;	3924	EV_FREQUENT_CHECK;
3299	}	3925	}
3300		3926
3301	void noinline	3927	void noinline
3302	ev_timer_again (EV_P_ ev_timer *w)	3928	ev_timer_again (EV_P_ ev_timer *w) EV_THROW
3303	{	3929	{
3304	EV_FREQUENT_CHECK;	3930	EV_FREQUENT_CHECK;
3305		3931
3306	clear_pending (EV_A_ (W)w);	3932	clear_pending (EV_A_ (W)w);
3307		3933
…		…
3324		3950
3325	EV_FREQUENT_CHECK;	3951	EV_FREQUENT_CHECK;
3326	}	3952	}
3327		3953
3328	ev_tstamp	3954	ev_tstamp
3329	ev_timer_remaining (EV_P_ ev_timer *w)	3955	ev_timer_remaining (EV_P_ ev_timer *w) EV_THROW
3330	{	3956	{
3331	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);	3957	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);
3332	}	3958	}
3333		3959
3334	#if EV_PERIODIC_ENABLE	3960	#if EV_PERIODIC_ENABLE
3335	void noinline	3961	void noinline
3336	ev_periodic_start (EV_P_ ev_periodic *w)	3962	ev_periodic_start (EV_P_ ev_periodic *w) EV_THROW
3337	{	3963	{
3338	if (expect_false (ev_is_active (w)))	3964	if (expect_false (ev_is_active (w)))
3339	return;	3965	return;
3340		3966
3341	if (w->reschedule_cb)	3967	if (w->reschedule_cb)
…		…
3361		3987
3362	/*assert (("libev: internal periodic heap corruption", ANHE_w (periodics [ev_active (w)]) == (WT)w));*/	3988	/*assert (("libev: internal periodic heap corruption", ANHE_w (periodics [ev_active (w)]) == (WT)w));*/
3363	}	3989	}
3364		3990
3365	void noinline	3991	void noinline
3366	ev_periodic_stop (EV_P_ ev_periodic *w)	3992	ev_periodic_stop (EV_P_ ev_periodic *w) EV_THROW
3367	{	3993	{
3368	clear_pending (EV_A_ (W)w);	3994	clear_pending (EV_A_ (W)w);
3369	if (expect_false (!ev_is_active (w)))	3995	if (expect_false (!ev_is_active (w)))
3370	return;	3996	return;
3371		3997
…		…
3389		4015
3390	EV_FREQUENT_CHECK;	4016	EV_FREQUENT_CHECK;
3391	}	4017	}
3392		4018
3393	void noinline	4019	void noinline
3394	ev_periodic_again (EV_P_ ev_periodic *w)	4020	ev_periodic_again (EV_P_ ev_periodic *w) EV_THROW
3395	{	4021	{
3396	/* TODO: use adjustheap and recalculation */	4022	/* TODO: use adjustheap and recalculation */
3397	ev_periodic_stop (EV_A_ w);	4023	ev_periodic_stop (EV_A_ w);
3398	ev_periodic_start (EV_A_ w);	4024	ev_periodic_start (EV_A_ w);
3399	}	4025	}
…		…
3404	#endif	4030	#endif
3405		4031
3406	#if EV_SIGNAL_ENABLE	4032	#if EV_SIGNAL_ENABLE
3407		4033
3408	void noinline	4034	void noinline
3409	ev_signal_start (EV_P_ ev_signal *w)	4035	ev_signal_start (EV_P_ ev_signal *w) EV_THROW
3410	{	4036	{
3411	if (expect_false (ev_is_active (w)))	4037	if (expect_false (ev_is_active (w)))
3412	return;	4038	return;
3413		4039
3414	assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0 && w->signum < EV_NSIG));	4040	assert (("libev: ev_signal_start called with illegal signal number", w->signum > 0 && w->signum < EV_NSIG));
…		…
3416	#if EV_MULTIPLICITY	4042	#if EV_MULTIPLICITY
3417	assert (("libev: a signal must not be attached to two different loops",	4043	assert (("libev: a signal must not be attached to two different loops",
3418	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));	4044	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));
3419		4045
3420	signals [w->signum - 1].loop = EV_A;	4046	signals [w->signum - 1].loop = EV_A;
		4047	ECB_MEMORY_FENCE_RELEASE;
3421	#endif	4048	#endif
3422		4049
3423	EV_FREQUENT_CHECK;	4050	EV_FREQUENT_CHECK;
3424		4051
3425	#if EV_USE_SIGNALFD	4052	#if EV_USE_SIGNALFD
…		…
3485		4112
3486	EV_FREQUENT_CHECK;	4113	EV_FREQUENT_CHECK;
3487	}	4114	}
3488		4115
3489	void noinline	4116	void noinline
3490	ev_signal_stop (EV_P_ ev_signal *w)	4117	ev_signal_stop (EV_P_ ev_signal *w) EV_THROW
3491	{	4118	{
3492	clear_pending (EV_A_ (W)w);	4119	clear_pending (EV_A_ (W)w);
3493	if (expect_false (!ev_is_active (w)))	4120	if (expect_false (!ev_is_active (w)))
3494	return;	4121	return;
3495		4122
…		…
3526	#endif	4153	#endif
3527		4154
3528	#if EV_CHILD_ENABLE	4155	#if EV_CHILD_ENABLE
3529		4156
3530	void	4157	void
3531	ev_child_start (EV_P_ ev_child *w)	4158	ev_child_start (EV_P_ ev_child *w) EV_THROW
3532	{	4159	{
3533	#if EV_MULTIPLICITY	4160	#if EV_MULTIPLICITY
3534	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));	4161	assert (("libev: child watchers are only supported in the default loop", loop == ev_default_loop_ptr));
3535	#endif	4162	#endif
3536	if (expect_false (ev_is_active (w)))	4163	if (expect_false (ev_is_active (w)))
…		…
3543		4170
3544	EV_FREQUENT_CHECK;	4171	EV_FREQUENT_CHECK;
3545	}	4172	}
3546		4173
3547	void	4174	void
3548	ev_child_stop (EV_P_ ev_child *w)	4175	ev_child_stop (EV_P_ ev_child *w) EV_THROW
3549	{	4176	{
3550	clear_pending (EV_A_ (W)w);	4177	clear_pending (EV_A_ (W)w);
3551	if (expect_false (!ev_is_active (w)))	4178	if (expect_false (!ev_is_active (w)))
3552	return;	4179	return;
3553		4180
…		…
3580	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)	4207	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
3581		4208
3582	static void noinline	4209	static void noinline
3583	infy_add (EV_P_ ev_stat *w)	4210	infy_add (EV_P_ ev_stat *w)
3584	{	4211	{
3585	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);	4212	w->wd = inotify_add_watch (fs_fd, w->path,
		4213	IN_ATTRIB | IN_DELETE_SELF | IN_MOVE_SELF | IN_MODIFY
		4214	| IN_CREATE | IN_DELETE | IN_MOVED_FROM | IN_MOVED_TO
		4215	| IN_DONT_FOLLOW | IN_MASK_ADD);
3586		4216
3587	if (w->wd >= 0)	4217	if (w->wd >= 0)
3588	{	4218	{
3589	struct statfs sfs;	4219	struct statfs sfs;
3590		4220
…		…
3594		4224
3595	if (!fs_2625)	4225	if (!fs_2625)
3596	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	4226	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
3597	else if (!statfs (w->path, &sfs)	4227	else if (!statfs (w->path, &sfs)
3598	&& (sfs.f_type == 0x1373 /* devfs */	4228	&& (sfs.f_type == 0x1373 /* devfs */
		4229	|| sfs.f_type == 0x4006 /* fat */
		4230	|| sfs.f_type == 0x4d44 /* msdos */
3599	|| sfs.f_type == 0xEF53 /* ext2/3 */	4231	|| sfs.f_type == 0xEF53 /* ext2/3 */
		4232	|| sfs.f_type == 0x72b6 /* jffs2 */
		4233	|| sfs.f_type == 0x858458f6 /* ramfs */
		4234	|| sfs.f_type == 0x5346544e /* ntfs */
3600	|| sfs.f_type == 0x3153464a /* jfs */	4235	|| sfs.f_type == 0x3153464a /* jfs */
		4236	|| sfs.f_type == 0x9123683e /* btrfs */
3601	|| sfs.f_type == 0x52654973 /* reiser3 */	4237	|| sfs.f_type == 0x52654973 /* reiser3 */
3602	|| sfs.f_type == 0x01021994 /* tempfs */	4238	|| sfs.f_type == 0x01021994 /* tmpfs */
3603	|| sfs.f_type == 0x58465342 /* xfs */))	4239	|| sfs.f_type == 0x58465342 /* xfs */))
3604	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */	4240	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
3605	else	4241	else
3606	w->timer.repeat = w->interval ? w->interval : NFS_STAT_INTERVAL; /* remote, use reduced frequency */	4242	w->timer.repeat = w->interval ? w->interval : NFS_STAT_INTERVAL; /* remote, use reduced frequency */
3607	}	4243	}
…		…
3720	}	4356	}
3721		4357
3722	inline_size int	4358	inline_size int
3723	infy_newfd (void)	4359	infy_newfd (void)
3724	{	4360	{
3725	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)	4361	#if defined IN_CLOEXEC && defined IN_NONBLOCK
3726	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);	4362	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
3727	if (fd >= 0)	4363	if (fd >= 0)
3728	return fd;	4364	return fd;
3729	#endif	4365	#endif
3730	return inotify_init ();	4366	return inotify_init ();
…		…
3805	#else	4441	#else
3806	# define EV_LSTAT(p,b) lstat (p, b)	4442	# define EV_LSTAT(p,b) lstat (p, b)
3807	#endif	4443	#endif
3808		4444
3809	void	4445	void
3810	ev_stat_stat (EV_P_ ev_stat *w)	4446	ev_stat_stat (EV_P_ ev_stat *w) EV_THROW
3811	{	4447	{
3812	if (lstat (w->path, &w->attr) < 0)	4448	if (lstat (w->path, &w->attr) < 0)
3813	w->attr.st_nlink = 0;	4449	w->attr.st_nlink = 0;
3814	else if (!w->attr.st_nlink)	4450	else if (!w->attr.st_nlink)
3815	w->attr.st_nlink = 1;	4451	w->attr.st_nlink = 1;
…		…
3854	ev_feed_event (EV_A_ w, EV_STAT);	4490	ev_feed_event (EV_A_ w, EV_STAT);
3855	}	4491	}
3856	}	4492	}
3857		4493
3858	void	4494	void
3859	ev_stat_start (EV_P_ ev_stat *w)	4495	ev_stat_start (EV_P_ ev_stat *w) EV_THROW
3860	{	4496	{
3861	if (expect_false (ev_is_active (w)))	4497	if (expect_false (ev_is_active (w)))
3862	return;	4498	return;
3863		4499
3864	ev_stat_stat (EV_A_ w);	4500	ev_stat_stat (EV_A_ w);
…		…
3885		4521
3886	EV_FREQUENT_CHECK;	4522	EV_FREQUENT_CHECK;
3887	}	4523	}
3888		4524
3889	void	4525	void
3890	ev_stat_stop (EV_P_ ev_stat *w)	4526	ev_stat_stop (EV_P_ ev_stat *w) EV_THROW
3891	{	4527	{
3892	clear_pending (EV_A_ (W)w);	4528	clear_pending (EV_A_ (W)w);
3893	if (expect_false (!ev_is_active (w)))	4529	if (expect_false (!ev_is_active (w)))
3894	return;	4530	return;
3895		4531
…		…
3911	}	4547	}
3912	#endif	4548	#endif
3913		4549
3914	#if EV_IDLE_ENABLE	4550	#if EV_IDLE_ENABLE
3915	void	4551	void
3916	ev_idle_start (EV_P_ ev_idle *w)	4552	ev_idle_start (EV_P_ ev_idle *w) EV_THROW
3917	{	4553	{
3918	if (expect_false (ev_is_active (w)))	4554	if (expect_false (ev_is_active (w)))
3919	return;	4555	return;
3920		4556
3921	pri_adjust (EV_A_ (W)w);	4557	pri_adjust (EV_A_ (W)w);
…		…
3934		4570
3935	EV_FREQUENT_CHECK;	4571	EV_FREQUENT_CHECK;
3936	}	4572	}
3937		4573
3938	void	4574	void
3939	ev_idle_stop (EV_P_ ev_idle *w)	4575	ev_idle_stop (EV_P_ ev_idle *w) EV_THROW
3940	{	4576	{
3941	clear_pending (EV_A_ (W)w);	4577	clear_pending (EV_A_ (W)w);
3942	if (expect_false (!ev_is_active (w)))	4578	if (expect_false (!ev_is_active (w)))
3943	return;	4579	return;
3944		4580
…		…
3958	}	4594	}
3959	#endif	4595	#endif
3960		4596
3961	#if EV_PREPARE_ENABLE	4597	#if EV_PREPARE_ENABLE
3962	void	4598	void
3963	ev_prepare_start (EV_P_ ev_prepare *w)	4599	ev_prepare_start (EV_P_ ev_prepare *w) EV_THROW
3964	{	4600	{
3965	if (expect_false (ev_is_active (w)))	4601	if (expect_false (ev_is_active (w)))
3966	return;	4602	return;
3967		4603
3968	EV_FREQUENT_CHECK;	4604	EV_FREQUENT_CHECK;
…		…
3973		4609
3974	EV_FREQUENT_CHECK;	4610	EV_FREQUENT_CHECK;
3975	}	4611	}
3976		4612
3977	void	4613	void
3978	ev_prepare_stop (EV_P_ ev_prepare *w)	4614	ev_prepare_stop (EV_P_ ev_prepare *w) EV_THROW
3979	{	4615	{
3980	clear_pending (EV_A_ (W)w);	4616	clear_pending (EV_A_ (W)w);
3981	if (expect_false (!ev_is_active (w)))	4617	if (expect_false (!ev_is_active (w)))
3982	return;	4618	return;
3983		4619
…		…
3996	}	4632	}
3997	#endif	4633	#endif
3998		4634
3999	#if EV_CHECK_ENABLE	4635	#if EV_CHECK_ENABLE
4000	void	4636	void
4001	ev_check_start (EV_P_ ev_check *w)	4637	ev_check_start (EV_P_ ev_check *w) EV_THROW
4002	{	4638	{
4003	if (expect_false (ev_is_active (w)))	4639	if (expect_false (ev_is_active (w)))
4004	return;	4640	return;
4005		4641
4006	EV_FREQUENT_CHECK;	4642	EV_FREQUENT_CHECK;
…		…
4011		4647
4012	EV_FREQUENT_CHECK;	4648	EV_FREQUENT_CHECK;
4013	}	4649	}
4014		4650
4015	void	4651	void
4016	ev_check_stop (EV_P_ ev_check *w)	4652	ev_check_stop (EV_P_ ev_check *w) EV_THROW
4017	{	4653	{
4018	clear_pending (EV_A_ (W)w);	4654	clear_pending (EV_A_ (W)w);
4019	if (expect_false (!ev_is_active (w)))	4655	if (expect_false (!ev_is_active (w)))
4020	return;	4656	return;
4021		4657
…		…
4034	}	4670	}
4035	#endif	4671	#endif
4036		4672
4037	#if EV_EMBED_ENABLE	4673	#if EV_EMBED_ENABLE
4038	void noinline	4674	void noinline
4039	ev_embed_sweep (EV_P_ ev_embed *w)	4675	ev_embed_sweep (EV_P_ ev_embed *w) EV_THROW
4040	{	4676	{
4041	ev_run (w->other, EVRUN_NOWAIT);	4677	ev_run (w->other, EVRUN_NOWAIT);
4042	}	4678	}
4043		4679
4044	static void	4680	static void
…		…
4092	ev_idle_stop (EV_A_ idle);	4728	ev_idle_stop (EV_A_ idle);
4093	}	4729	}
4094	#endif	4730	#endif
4095		4731
4096	void	4732	void
4097	ev_embed_start (EV_P_ ev_embed *w)	4733	ev_embed_start (EV_P_ ev_embed *w) EV_THROW
4098	{	4734	{
4099	if (expect_false (ev_is_active (w)))	4735	if (expect_false (ev_is_active (w)))
4100	return;	4736	return;
4101		4737
4102	{	4738	{
…		…
4123		4759
4124	EV_FREQUENT_CHECK;	4760	EV_FREQUENT_CHECK;
4125	}	4761	}
4126		4762
4127	void	4763	void
4128	ev_embed_stop (EV_P_ ev_embed *w)	4764	ev_embed_stop (EV_P_ ev_embed *w) EV_THROW
4129	{	4765	{
4130	clear_pending (EV_A_ (W)w);	4766	clear_pending (EV_A_ (W)w);
4131	if (expect_false (!ev_is_active (w)))	4767	if (expect_false (!ev_is_active (w)))
4132	return;	4768	return;
4133		4769
…		…
4143	}	4779	}
4144	#endif	4780	#endif
4145		4781
4146	#if EV_FORK_ENABLE	4782	#if EV_FORK_ENABLE
4147	void	4783	void
4148	ev_fork_start (EV_P_ ev_fork *w)	4784	ev_fork_start (EV_P_ ev_fork *w) EV_THROW
4149	{	4785	{
4150	if (expect_false (ev_is_active (w)))	4786	if (expect_false (ev_is_active (w)))
4151	return;	4787	return;
4152		4788
4153	EV_FREQUENT_CHECK;	4789	EV_FREQUENT_CHECK;
…		…
4158		4794
4159	EV_FREQUENT_CHECK;	4795	EV_FREQUENT_CHECK;
4160	}	4796	}
4161		4797
4162	void	4798	void
4163	ev_fork_stop (EV_P_ ev_fork *w)	4799	ev_fork_stop (EV_P_ ev_fork *w) EV_THROW
4164	{	4800	{
4165	clear_pending (EV_A_ (W)w);	4801	clear_pending (EV_A_ (W)w);
4166	if (expect_false (!ev_is_active (w)))	4802	if (expect_false (!ev_is_active (w)))
4167	return;	4803	return;
4168		4804
…		…
4181	}	4817	}
4182	#endif	4818	#endif
4183		4819
4184	#if EV_CLEANUP_ENABLE	4820	#if EV_CLEANUP_ENABLE
4185	void	4821	void
4186	ev_cleanup_start (EV_P_ ev_cleanup *w)	4822	ev_cleanup_start (EV_P_ ev_cleanup *w) EV_THROW
4187	{	4823	{
4188	if (expect_false (ev_is_active (w)))	4824	if (expect_false (ev_is_active (w)))
4189	return;	4825	return;
4190		4826
4191	EV_FREQUENT_CHECK;	4827	EV_FREQUENT_CHECK;
…		…
4198	ev_unref (EV_A);	4834	ev_unref (EV_A);
4199	EV_FREQUENT_CHECK;	4835	EV_FREQUENT_CHECK;
4200	}	4836	}
4201		4837
4202	void	4838	void
4203	ev_cleanup_stop (EV_P_ ev_cleanup *w)	4839	ev_cleanup_stop (EV_P_ ev_cleanup *w) EV_THROW
4204	{	4840	{
4205	clear_pending (EV_A_ (W)w);	4841	clear_pending (EV_A_ (W)w);
4206	if (expect_false (!ev_is_active (w)))	4842	if (expect_false (!ev_is_active (w)))
4207	return;	4843	return;
4208		4844
…		…
4222	}	4858	}
4223	#endif	4859	#endif
4224		4860
4225	#if EV_ASYNC_ENABLE	4861	#if EV_ASYNC_ENABLE
4226	void	4862	void
4227	ev_async_start (EV_P_ ev_async *w)	4863	ev_async_start (EV_P_ ev_async *w) EV_THROW
4228	{	4864	{
4229	if (expect_false (ev_is_active (w)))	4865	if (expect_false (ev_is_active (w)))
4230	return;	4866	return;
4231		4867
4232	w->sent = 0;	4868	w->sent = 0;
…		…
4241		4877
4242	EV_FREQUENT_CHECK;	4878	EV_FREQUENT_CHECK;
4243	}	4879	}
4244		4880
4245	void	4881	void
4246	ev_async_stop (EV_P_ ev_async *w)	4882	ev_async_stop (EV_P_ ev_async *w) EV_THROW
4247	{	4883	{
4248	clear_pending (EV_A_ (W)w);	4884	clear_pending (EV_A_ (W)w);
4249	if (expect_false (!ev_is_active (w)))	4885	if (expect_false (!ev_is_active (w)))
4250	return;	4886	return;
4251		4887
…		…
4262		4898
4263	EV_FREQUENT_CHECK;	4899	EV_FREQUENT_CHECK;
4264	}	4900	}
4265		4901
4266	void	4902	void
4267	ev_async_send (EV_P_ ev_async *w)	4903	ev_async_send (EV_P_ ev_async *w) EV_THROW
4268	{	4904	{
4269	w->sent = 1;	4905	w->sent = 1;
4270	evpipe_write (EV_A_ &async_pending);	4906	evpipe_write (EV_A_ &async_pending);
4271	}	4907	}
4272	#endif	4908	#endif
…		…
4309		4945
4310	once_cb (EV_A_ once, revents | ev_clear_pending (EV_A_ &once->io));	4946	once_cb (EV_A_ once, revents | ev_clear_pending (EV_A_ &once->io));
4311	}	4947	}
4312		4948
4313	void	4949	void
4314	ev_once (EV_P_ int fd, int events, ev_tstamp timeout, void (*cb)(int revents, void *arg), void *arg)	4950	ev_once (EV_P_ int fd, int events, ev_tstamp timeout, void (*cb)(int revents, void *arg), void *arg) EV_THROW
4315	{	4951	{
4316	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));	4952	struct ev_once *once = (struct ev_once *)ev_malloc (sizeof (struct ev_once));
4317		4953
4318	if (expect_false (!once))	4954	if (expect_false (!once))
4319	{	4955	{
…		…
4341		4977
4342	/*****************************************************************************/	4978	/*****************************************************************************/
4343		4979
4344	#if EV_WALK_ENABLE	4980	#if EV_WALK_ENABLE
4345	void ecb_cold	4981	void ecb_cold
4346	ev_walk (EV_P_ int types, void (*cb)(EV_P_ int type, void *w))	4982	ev_walk (EV_P_ int types, void (*cb)(EV_P_ int type, void *w)) EV_THROW
4347	{	4983	{
4348	int i, j;	4984	int i, j;
4349	ev_watcher_list *wl, *wn;	4985	ev_watcher_list *wl, *wn;
4350		4986
4351	if (types & (EV_IO | EV_EMBED))	4987	if (types & (EV_IO | EV_EMBED))

Diff Legend

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