ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.412 by root, Wed Feb 22 01:53:00 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
…		…
201	# include <sys/wait.h>	201	# include <sys/wait.h>
202	# include <unistd.h>	202	# include <unistd.h>
203	#else	203	#else
204	# include <io.h>	204	# include <io.h>
205	# define WIN32_LEAN_AND_MEAN	205	# define WIN32_LEAN_AND_MEAN
		206	# include <winsock2.h>
206	# include <windows.h>	207	# include <windows.h>
207	# ifndef EV_SELECT_IS_WINSOCKET	208	# ifndef EV_SELECT_IS_WINSOCKET
208	# define EV_SELECT_IS_WINSOCKET 1	209	# define EV_SELECT_IS_WINSOCKET 1
209	# endif	210	# endif
210	# undef EV_AVOID_STDIO	211	# undef EV_AVOID_STDIO
…		…
219	#define _DARWIN_UNLIMITED_SELECT 1	220	#define _DARWIN_UNLIMITED_SELECT 1
220		221
221	/* 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 */
222		223
223	/* try to deduce the maximum number of signals on this platform */	224	/* try to deduce the maximum number of signals on this platform */
224	#if defined (EV_NSIG)	225	#if defined EV_NSIG
225	/* use what's provided */	226	/* use what's provided */
226	#elif defined (NSIG)	227	#elif defined NSIG
227	# define EV_NSIG (NSIG)	228	# define EV_NSIG (NSIG)
228	#elif defined(_NSIG)	229	#elif defined _NSIG
229	# define EV_NSIG (_NSIG)	230	# define EV_NSIG (_NSIG)
230	#elif defined (SIGMAX)	231	#elif defined SIGMAX
231	# define EV_NSIG (SIGMAX+1)	232	# define EV_NSIG (SIGMAX+1)
232	#elif defined (SIG_MAX)	233	#elif defined SIG_MAX
233	# define EV_NSIG (SIG_MAX+1)	234	# define EV_NSIG (SIG_MAX+1)
234	#elif defined (_SIG_MAX)	235	#elif defined _SIG_MAX
235	# define EV_NSIG (_SIG_MAX+1)	236	# define EV_NSIG (_SIG_MAX+1)
236	#elif defined (MAXSIG)	237	#elif defined MAXSIG
237	# define EV_NSIG (MAXSIG+1)	238	# define EV_NSIG (MAXSIG+1)
238	#elif defined (MAX_SIG)	239	#elif defined MAX_SIG
239	# define EV_NSIG (MAX_SIG+1)	240	# define EV_NSIG (MAX_SIG+1)
240	#elif defined (SIGARRAYSIZE)	241	#elif defined SIGARRAYSIZE
241	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */	242	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
242	#elif defined (_sys_nsig)	243	#elif defined _sys_nsig
243	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	244	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
244	#else	245	#else
245	# error "unable to find value for NSIG, please report"	246	# define EV_NSIG (8 * sizeof (sigset_t) + 1)
246	/* to make it compile regardless, just remove the above line, */
247	/* but consider reporting it, too! :) */
248	# define EV_NSIG 65
249	#endif	247	#endif
250		248
251	#ifndef EV_USE_FLOOR	249	#ifndef EV_USE_FLOOR
252	# define EV_USE_FLOOR 0	250	# define EV_USE_FLOOR 0
253	#endif	251	#endif
254		252
255	#ifndef EV_USE_CLOCK_SYSCALL	253	#ifndef EV_USE_CLOCK_SYSCALL
256	# if __linux && __GLIBC__ >= 2	254	# if __linux && __GLIBC__ == 2 && __GLIBC_MINOR__ < 17
257	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS	255	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
258	# else	256	# else
259	# define EV_USE_CLOCK_SYSCALL 0	257	# define EV_USE_CLOCK_SYSCALL 0
260	# endif	258	# endif
261	#endif	259	#endif
262		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
263	#ifndef EV_USE_MONOTONIC	270	#ifndef EV_USE_MONOTONIC
264	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	271	# if defined _POSIX_MONOTONIC_CLOCK && _POSIX_MONOTONIC_CLOCK >= 0
265	# define EV_USE_MONOTONIC EV_FEATURE_OS	272	# define EV_USE_MONOTONIC EV_FEATURE_OS
266	# else	273	# else
267	# define EV_USE_MONOTONIC 0	274	# define EV_USE_MONOTONIC 0
268	# endif	275	# endif
269	#endif	276	#endif
…		…
356		363
357	#ifndef EV_HEAP_CACHE_AT	364	#ifndef EV_HEAP_CACHE_AT
358	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA	365	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
359	#endif	366	#endif
360		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
361	/* 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, */
362	/* which makes programs even slower. might work on other unices, too. */	385	/* which makes programs even slower. might work on other unices, too. */
363	#if EV_USE_CLOCK_SYSCALL	386	#if EV_USE_CLOCK_SYSCALL
364	# include <syscall.h>	387	# include <sys/syscall.h>
365	# ifdef SYS_clock_gettime	388	# ifdef SYS_clock_gettime
366	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))	389	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))
367	# undef EV_USE_MONOTONIC	390	# undef EV_USE_MONOTONIC
368	# define EV_USE_MONOTONIC 1	391	# define EV_USE_MONOTONIC 1
369	# else	392	# else
…		…
372	# endif	395	# endif
373	#endif	396	#endif
374		397
375	/* 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 */
376		399
377	#ifdef _AIX
378	/* AIX has a completely broken poll.h header */
379	# undef EV_USE_POLL
380	# define EV_USE_POLL 0
381	#endif
382
383	#ifndef CLOCK_MONOTONIC	400	#ifndef CLOCK_MONOTONIC
384	# undef EV_USE_MONOTONIC	401	# undef EV_USE_MONOTONIC
385	# define EV_USE_MONOTONIC 0	402	# define EV_USE_MONOTONIC 0
386	#endif	403	#endif
387		404
…		…
395	# define EV_USE_INOTIFY 0	412	# define EV_USE_INOTIFY 0
396	#endif	413	#endif
397		414
398	#if !EV_USE_NANOSLEEP	415	#if !EV_USE_NANOSLEEP
399	/* 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 */
400	# if !defined(_WIN32) && !defined(__hpux)	417	# if !defined _WIN32 && !defined __hpux
401	# include <sys/select.h>	418	# include <sys/select.h>
402	# endif	419	# endif
403	#endif	420	#endif
404		421
405	#if EV_USE_INOTIFY	422	#if EV_USE_INOTIFY
…		…
408	/* 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 */
409	# ifndef IN_DONT_FOLLOW	426	# ifndef IN_DONT_FOLLOW
410	# undef EV_USE_INOTIFY	427	# undef EV_USE_INOTIFY
411	# define EV_USE_INOTIFY 0	428	# define EV_USE_INOTIFY 0
412	# endif	429	# endif
413	#endif
414
415	#if EV_SELECT_IS_WINSOCKET
416	# include <winsock.h>
417	#endif	430	#endif
418		431
419	#if EV_USE_EVENTFD	432	#if EV_USE_EVENTFD
420	/* 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 */
421	# include <stdint.h>	434	# include <stdint.h>
…		…
478	/* 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 */
479	/* ECB.H BEGIN */	492	/* ECB.H BEGIN */
480	/*	493	/*
481	* libecb - http://software.schmorp.de/pkg/libecb	494	* libecb - http://software.schmorp.de/pkg/libecb
482	*	495	*
483	* Copyright (©) 2009-2012 Marc Alexander Lehmann <libecb@schmorp.de>	496	* Copyright (©) 2009-2015 Marc Alexander Lehmann <libecb@schmorp.de>
484	* Copyright (©) 2011 Emanuele Giaquinta	497	* Copyright (©) 2011 Emanuele Giaquinta
485	* All rights reserved.	498	* All rights reserved.
486	*	499	*
487	* 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-
488	* tion, are permitted provided that the following conditions are met:	501	* tion, are permitted provided that the following conditions are met:
…		…
502	* 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;
503	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,	516	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
504	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-	517	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-
505	* 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
506	* 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.
507	*/	531	*/
508		532
509	#ifndef ECB_H	533	#ifndef ECB_H
510	#define ECB_H	534	#define ECB_H
		535
		536	/* 16 bits major, 16 bits minor */
		537	#define ECB_VERSION 0x00010005
511		538
512	#ifdef _WIN32	539	#ifdef _WIN32
513	typedef signed char int8_t;	540	typedef signed char int8_t;
514	typedef unsigned char uint8_t;	541	typedef unsigned char uint8_t;
515	typedef signed short int16_t;	542	typedef signed short int16_t;
…		…
521	typedef unsigned long long uint64_t;	548	typedef unsigned long long uint64_t;
522	#else /* _MSC_VER || __BORLANDC__ */	549	#else /* _MSC_VER || __BORLANDC__ */
523	typedef signed __int64 int64_t;	550	typedef signed __int64 int64_t;
524	typedef unsigned __int64 uint64_t;	551	typedef unsigned __int64 uint64_t;
525	#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
526	#else	562	#else
527	#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
528	#endif	581	#endif
529		582
530	/* many compilers define _GNUC_ to some versions but then only implement	583	/* many compilers define _GNUC_ to some versions but then only implement
531	* what their idiot authors think are the "more important" extensions,	584	* what their idiot authors think are the "more important" extensions,
532	* causing enormous grief in return for some better fake benchmark numbers.	585	* causing enormous grief in return for some better fake benchmark numbers.
533	* or so.	586	* or so.
534	* 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
535	* 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.
536	*/	589	*/
537	#ifndef ECB_GCC_VERSION
538	#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__
539	#define ECB_GCC_VERSION(major,minor) 0	591	#define ECB_GCC_VERSION(major,minor) 0
540	#else	592	#else
541	#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)))
542	#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
543	#endif	632	#endif
544		633
545	/*****************************************************************************/	634	/*****************************************************************************/
546		635
547	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */	636	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */
548	/* 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 */
549		638
550	#if ECB_NO_THREADS	639	#if ECB_NO_THREADS
551	# define ECB_NO_SMP 1	640	#define ECB_NO_SMP 1
552	#endif	641	#endif
553		642
554	#if ECB_NO_THREADS || ECB_NO_SMP	643	#if ECB_NO_SMP
555	#define ECB_MEMORY_FENCE do { } while (0)	644	#define ECB_MEMORY_FENCE do { } while (0)
556	#endif	645	#endif
557		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
558	#ifndef ECB_MEMORY_FENCE	656	#ifndef ECB_MEMORY_FENCE
559	#if ECB_GCC_VERSION(2,5) || defined(__INTEL_COMPILER) || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110	657	#if ECB_GCC_VERSION(2,5) || defined __INTEL_COMPILER || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
560	#if __i386 || __i386__	658	#if __i386 || __i386__
561	#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")
562	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE /* non-lock xchg might be enough */	660	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
563	#define ECB_MEMORY_FENCE_RELEASE do { } while (0) /* unlikely to change in future cpus */	661	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
564	#elif __amd64 || __amd64__ || __x86_64 || __x86_64__	662	#elif ECB_GCC_AMD64
565	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")	663	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")
566	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("lfence" : : : "memory")	664	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
567	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("sfence") /* play safe - not needed in any current cpu */	665	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
568	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__	666	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__
569	#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 */
570	#elif defined(__ARM_ARCH_6__ ) || defined(__ARM_ARCH_6J__ ) \	675	#elif defined __ARM_ARCH_6__ || defined __ARM_ARCH_6J__ \
571	|| defined(__ARM_ARCH_6K__) || defined(__ARM_ARCH_6ZK__)	676	|| defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ \
		677	|| defined __ARM_ARCH_6T2__
572	#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")
573	#elif defined(__ARM_ARCH_7__ ) || defined(__ARM_ARCH_7A__ ) \	679	#elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \
574	|| defined(__ARM_ARCH_7M__) || defined(__ARM_ARCH_7R__ )	680	|| defined __ARM_ARCH_7R__ || defined __ARM_ARCH_7M__
575	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")	681	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")
576	#elif __sparc || __sparc__	682	#elif __aarch64__
		683	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb ish" : : : "memory")
		684	#elif (__sparc || __sparc__) && !(__sparc_v8__ || defined __sparcv8)
577	#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")
578	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")	686	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")
579	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")	687	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")
580	#elif defined(__s390__) || defined(__s390x__)	688	#elif defined __s390__ || defined __s390x__
581	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")	689	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")
582	#elif defined(__mips__)	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__
583	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory")	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")
584	#endif	707	#endif
585	#endif	708	#endif
586	#endif	709	#endif
587		710
588	#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
589	#if ECB_GCC_VERSION(4,4) || defined(__INTEL_COMPILER) || defined(__clang__)	724	#elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__
590	#define ECB_MEMORY_FENCE __sync_synchronize ()	725	#define ECB_MEMORY_FENCE __sync_synchronize ()
591	/*#define ECB_MEMORY_FENCE_ACQUIRE ({ char dummy = 0; __sync_lock_test_and_set (&dummy, 1); }) */	726	#elif _MSC_VER >= 1500 /* VC++ 2008 */
592	/*#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()
593	#elif _MSC_VER >= 1400 /* VC++ 2005 */	732	#elif _MSC_VER >= 1400 /* VC++ 2005 */
594	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)	733	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
595	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()	734	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()
596	#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 */
597	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()	736	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()
598	#elif defined(_WIN32)	737	#elif defined _WIN32
599	#include <WinNT.h>	738	#include <WinNT.h>
600	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */	739	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */
601	#elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110	740	#elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
602	#include <mbarrier.h>	741	#include <mbarrier.h>
603	#define ECB_MEMORY_FENCE __machine_rw_barrier ()	742	#define ECB_MEMORY_FENCE __machine_rw_barrier ()
604	#define ECB_MEMORY_FENCE_ACQUIRE __machine_r_barrier ()	743	#define ECB_MEMORY_FENCE_ACQUIRE __machine_r_barrier ()
605	#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)
606	#endif	764	#endif
607	#endif	765	#endif
608		766
609	#ifndef ECB_MEMORY_FENCE	767	#ifndef ECB_MEMORY_FENCE
610	#if !ECB_AVOID_PTHREADS	768	#if !ECB_AVOID_PTHREADS
…		…
622	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;	780	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;
623	#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)
624	#endif	782	#endif
625	#endif	783	#endif
626		784
627	#if !defined(ECB_MEMORY_FENCE_ACQUIRE) && defined(ECB_MEMORY_FENCE)	785	#if !defined ECB_MEMORY_FENCE_ACQUIRE && defined ECB_MEMORY_FENCE
628	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE	786	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE
629	#endif	787	#endif
630		788
631	#if !defined(ECB_MEMORY_FENCE_RELEASE) && defined(ECB_MEMORY_FENCE)	789	#if !defined ECB_MEMORY_FENCE_RELEASE && defined ECB_MEMORY_FENCE
632	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE	790	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE
633	#endif	791	#endif
634		792
635	/*****************************************************************************/	793	/*****************************************************************************/
636		794
637	#define ECB_C99 (__STDC_VERSION__ >= 199901L)	795	#if ECB_CPP
638
639	#if __cplusplus
640	#define ecb_inline static inline	796	#define ecb_inline static inline
641	#elif ECB_GCC_VERSION(2,5)	797	#elif ECB_GCC_VERSION(2,5)
642	#define ecb_inline static __inline__	798	#define ecb_inline static __inline__
643	#elif ECB_C99	799	#elif ECB_C99
644	#define ecb_inline static inline	800	#define ecb_inline static inline
…		…
658		814
659	#define ECB_CONCAT_(a, b) a ## b	815	#define ECB_CONCAT_(a, b) a ## b
660	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)	816	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)
661	#define ECB_STRINGIFY_(a) # a	817	#define ECB_STRINGIFY_(a) # a
662	#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))
663		820
664	#define ecb_function_ ecb_inline	821	#define ecb_function_ ecb_inline
665		822
666	#if ECB_GCC_VERSION(3,1)	823	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_VERSION(2,8)
667	#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)
668	#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)
669	#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)
670	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)	846	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
671	#else	847	#else
672	#define ecb_attribute(attrlist)
673	#define ecb_is_constant(expr) 0
674	#define ecb_expect(expr,value) (expr)
675	#define ecb_prefetch(addr,rw,locality)	848	#define ecb_prefetch(addr,rw,locality)
676	#endif	849	#endif
677		850
678	/* no emulation for ecb_decltype */	851	/* no emulation for ecb_decltype */
679	#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; };
680	#define ecb_decltype(x) __decltype(x)	855	#define ecb_decltype(x) ecb_decltype_t<decltype (x)>::type
681	#elif ECB_GCC_VERSION(3,0)	856	#elif ECB_GCC_VERSION(3,0) || ECB_CLANG_VERSION(2,8)
682	#define ecb_decltype(x) __typeof(x)	857	#define ecb_decltype(x) __typeof__ (x)
683	#endif	858	#endif
684		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
685	#define ecb_noinline ecb_attribute ((__noinline__))	877	#define ecb_noinline ecb_attribute ((__noinline__))
686	#define ecb_noreturn ecb_attribute ((__noreturn__))	878	#endif
		879
687	#define ecb_unused ecb_attribute ((__unused__))	880	#define ecb_unused ecb_attribute ((__unused__))
688	#define ecb_const ecb_attribute ((__const__))	881	#define ecb_const ecb_attribute ((__const__))
689	#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
690		895
691	#if ECB_GCC_VERSION(4,3)	896	#if ECB_GCC_VERSION(4,3)
692	#define ecb_artificial ecb_attribute ((__artificial__))	897	#define ecb_artificial ecb_attribute ((__artificial__))
693	#define ecb_hot ecb_attribute ((__hot__))	898	#define ecb_hot ecb_attribute ((__hot__))
694	#define ecb_cold ecb_attribute ((__cold__))	899	#define ecb_cold ecb_attribute ((__cold__))
…		…
706	/* for compatibility to the rest of the world */	911	/* for compatibility to the rest of the world */
707	#define ecb_likely(expr) ecb_expect_true (expr)	912	#define ecb_likely(expr) ecb_expect_true (expr)
708	#define ecb_unlikely(expr) ecb_expect_false (expr)	913	#define ecb_unlikely(expr) ecb_expect_false (expr)
709		914
710	/* count trailing zero bits and count # of one bits */	915	/* count trailing zero bits and count # of one bits */
711	#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))
712	/* 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 */
713	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)	921	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)
714	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)	922	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)
715	#define ecb_ctz32(x) __builtin_ctz (x)	923	#define ecb_ctz32(x) __builtin_ctz (x)
716	#define ecb_ctz64(x) __builtin_ctzll (x)	924	#define ecb_ctz64(x) __builtin_ctzll (x)
717	#define ecb_popcount32(x) __builtin_popcount (x)	925	#define ecb_popcount32(x) __builtin_popcount (x)
718	/* no popcountll */	926	/* no popcountll */
719	#else	927	#else
720	ecb_function_ int ecb_ctz32 (uint32_t x) ecb_const;	928	ecb_function_ ecb_const int ecb_ctz32 (uint32_t x);
721	ecb_function_ int	929	ecb_function_ ecb_const int
722	ecb_ctz32 (uint32_t x)	930	ecb_ctz32 (uint32_t x)
723	{	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
724	int r = 0;	937	int r = 0;
725		938
726	x &= ~x + 1; /* this isolates the lowest bit */	939	x &= ~x + 1; /* this isolates the lowest bit */
727		940
728	#if ECB_branchless_on_i386	941	#if ECB_branchless_on_i386
…		…
738	if (x & 0xff00ff00) r += 8;	951	if (x & 0xff00ff00) r += 8;
739	if (x & 0xffff0000) r += 16;	952	if (x & 0xffff0000) r += 16;
740	#endif	953	#endif
741		954
742	return r;	955	return r;
		956	#endif
743	}	957	}
744		958
745	ecb_function_ int ecb_ctz64 (uint64_t x) ecb_const;	959	ecb_function_ ecb_const int ecb_ctz64 (uint64_t x);
746	ecb_function_ int	960	ecb_function_ ecb_const int
747	ecb_ctz64 (uint64_t x)	961	ecb_ctz64 (uint64_t x)
748	{	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
749	int shift = x & 0xffffffffU ? 0 : 32;	968	int shift = x & 0xffffffff ? 0 : 32;
750	return ecb_ctz32 (x >> shift) + shift;	969	return ecb_ctz32 (x >> shift) + shift;
		970	#endif
751	}	971	}
752		972
753	ecb_function_ int ecb_popcount32 (uint32_t x) ecb_const;	973	ecb_function_ ecb_const int ecb_popcount32 (uint32_t x);
754	ecb_function_ int	974	ecb_function_ ecb_const int
755	ecb_popcount32 (uint32_t x)	975	ecb_popcount32 (uint32_t x)
756	{	976	{
757	x -= (x >> 1) & 0x55555555;	977	x -= (x >> 1) & 0x55555555;
758	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);	978	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);
759	x = ((x >> 4) + x) & 0x0f0f0f0f;	979	x = ((x >> 4) + x) & 0x0f0f0f0f;
760	x *= 0x01010101;	980	x *= 0x01010101;
761		981
762	return x >> 24;	982	return x >> 24;
763	}	983	}
764		984
765	ecb_function_ int ecb_ld32 (uint32_t x) ecb_const;	985	ecb_function_ ecb_const int ecb_ld32 (uint32_t x);
766	ecb_function_ int ecb_ld32 (uint32_t x)	986	ecb_function_ ecb_const int ecb_ld32 (uint32_t x)
767	{	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
768	int r = 0;	993	int r = 0;
769		994
770	if (x >> 16) { x >>= 16; r += 16; }	995	if (x >> 16) { x >>= 16; r += 16; }
771	if (x >> 8) { x >>= 8; r += 8; }	996	if (x >> 8) { x >>= 8; r += 8; }
772	if (x >> 4) { x >>= 4; r += 4; }	997	if (x >> 4) { x >>= 4; r += 4; }
773	if (x >> 2) { x >>= 2; r += 2; }	998	if (x >> 2) { x >>= 2; r += 2; }
774	if (x >> 1) { r += 1; }	999	if (x >> 1) { r += 1; }
775		1000
776	return r;	1001	return r;
		1002	#endif
777	}	1003	}
778		1004
779	ecb_function_ int ecb_ld64 (uint64_t x) ecb_const;	1005	ecb_function_ ecb_const int ecb_ld64 (uint64_t x);
780	ecb_function_ int ecb_ld64 (uint64_t x)	1006	ecb_function_ ecb_const int ecb_ld64 (uint64_t x)
781	{	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
782	int r = 0;	1013	int r = 0;
783		1014
784	if (x >> 32) { x >>= 32; r += 32; }	1015	if (x >> 32) { x >>= 32; r += 32; }
785		1016
786	return r + ecb_ld32 (x);	1017	return r + ecb_ld32 (x);
		1018	#endif
787	}	1019	}
788	#endif	1020	#endif
789		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
790	ecb_function_ uint8_t ecb_bitrev8 (uint8_t x) ecb_const;	1027	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x);
791	ecb_function_ uint8_t ecb_bitrev8 (uint8_t x)	1028	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x)
792	{	1029	{
793	return ( (x * 0x0802U & 0x22110U)	1030	return ( (x * 0x0802U & 0x22110U)
794	| (x * 0x8020U & 0x88440U)) * 0x10101U >> 16;	1031	| (x * 0x8020U & 0x88440U)) * 0x10101U >> 16;
795	}	1032	}
796		1033
797	ecb_function_ uint16_t ecb_bitrev16 (uint16_t x) ecb_const;	1034	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x);
798	ecb_function_ uint16_t ecb_bitrev16 (uint16_t x)	1035	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x)
799	{	1036	{
800	x = ((x >> 1) & 0x5555) | ((x & 0x5555) << 1);	1037	x = ((x >> 1) & 0x5555) | ((x & 0x5555) << 1);
801	x = ((x >> 2) & 0x3333) | ((x & 0x3333) << 2);	1038	x = ((x >> 2) & 0x3333) | ((x & 0x3333) << 2);
802	x = ((x >> 4) & 0x0f0f) | ((x & 0x0f0f) << 4);	1039	x = ((x >> 4) & 0x0f0f) | ((x & 0x0f0f) << 4);
803	x = ( x >> 8 ) | ( x << 8);	1040	x = ( x >> 8 ) | ( x << 8);
804		1041
805	return x;	1042	return x;
806	}	1043	}
807		1044
808	ecb_function_ uint32_t ecb_bitrev32 (uint32_t x) ecb_const;	1045	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x);
809	ecb_function_ uint32_t ecb_bitrev32 (uint32_t x)	1046	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x)
810	{	1047	{
811	x = ((x >> 1) & 0x55555555) | ((x & 0x55555555) << 1);	1048	x = ((x >> 1) & 0x55555555) | ((x & 0x55555555) << 1);
812	x = ((x >> 2) & 0x33333333) | ((x & 0x33333333) << 2);	1049	x = ((x >> 2) & 0x33333333) | ((x & 0x33333333) << 2);
813	x = ((x >> 4) & 0x0f0f0f0f) | ((x & 0x0f0f0f0f) << 4);	1050	x = ((x >> 4) & 0x0f0f0f0f) | ((x & 0x0f0f0f0f) << 4);
814	x = ((x >> 8) & 0x00ff00ff) | ((x & 0x00ff00ff) << 8);	1051	x = ((x >> 8) & 0x00ff00ff) | ((x & 0x00ff00ff) << 8);
…		…
817	return x;	1054	return x;
818	}	1055	}
819		1056
820	/* popcount64 is only available on 64 bit cpus as gcc builtin */	1057	/* popcount64 is only available on 64 bit cpus as gcc builtin */
821	/* so for this version we are lazy */	1058	/* so for this version we are lazy */
822	ecb_function_ int ecb_popcount64 (uint64_t x) ecb_const;	1059	ecb_function_ ecb_const int ecb_popcount64 (uint64_t x);
823	ecb_function_ int	1060	ecb_function_ ecb_const int
824	ecb_popcount64 (uint64_t x)	1061	ecb_popcount64 (uint64_t x)
825	{	1062	{
826	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);	1063	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);
827	}	1064	}
828		1065
829	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);
830	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);
831	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);
832	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);
833	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);
834	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);
835	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);
836	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);
837		1074
838	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); }
839	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); }
840	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); }
841	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); }
842	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); }
843	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); }
844	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); }
845	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); }
846		1083
847	#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
848	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)	1088	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)
		1089	#endif
849	#define ecb_bswap32(x) __builtin_bswap32 (x)	1090	#define ecb_bswap32(x) __builtin_bswap32 (x)
850	#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)))
851	#else	1097	#else
852	ecb_function_ uint16_t ecb_bswap16 (uint16_t x) ecb_const;	1098	ecb_function_ ecb_const uint16_t ecb_bswap16 (uint16_t x);
853	ecb_function_ uint16_t	1099	ecb_function_ ecb_const uint16_t
854	ecb_bswap16 (uint16_t x)	1100	ecb_bswap16 (uint16_t x)
855	{	1101	{
856	return ecb_rotl16 (x, 8);	1102	return ecb_rotl16 (x, 8);
857	}	1103	}
858		1104
859	ecb_function_ uint32_t ecb_bswap32 (uint32_t x) ecb_const;	1105	ecb_function_ ecb_const uint32_t ecb_bswap32 (uint32_t x);
860	ecb_function_ uint32_t	1106	ecb_function_ ecb_const uint32_t
861	ecb_bswap32 (uint32_t x)	1107	ecb_bswap32 (uint32_t x)
862	{	1108	{
863	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);	1109	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);
864	}	1110	}
865		1111
866	ecb_function_ uint64_t ecb_bswap64 (uint64_t x) ecb_const;	1112	ecb_function_ ecb_const uint64_t ecb_bswap64 (uint64_t x);
867	ecb_function_ uint64_t	1113	ecb_function_ ecb_const uint64_t
868	ecb_bswap64 (uint64_t x)	1114	ecb_bswap64 (uint64_t x)
869	{	1115	{
870	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);	1116	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);
871	}	1117	}
872	#endif	1118	#endif
873		1119
874	#if ECB_GCC_VERSION(4,5)	1120	#if ECB_GCC_VERSION(4,5) || ECB_CLANG_BUILTIN(__builtin_unreachable)
875	#define ecb_unreachable() __builtin_unreachable ()	1121	#define ecb_unreachable() __builtin_unreachable ()
876	#else	1122	#else
877	/* 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 :/ */
878	ecb_inline void ecb_unreachable (void) ecb_noreturn;	1124	ecb_inline ecb_noreturn void ecb_unreachable (void);
879	ecb_inline void ecb_unreachable (void) { }	1125	ecb_inline ecb_noreturn void ecb_unreachable (void) { }
880	#endif	1126	#endif
881		1127
882	/* try to tell the compiler that some condition is definitely true */	1128	/* try to tell the compiler that some condition is definitely true */
883	#define ecb_assume(cond) do { if (!(cond)) ecb_unreachable (); } while (0)	1129	#define ecb_assume(cond) if (!(cond)) ecb_unreachable (); else 0
884		1130
885	ecb_inline unsigned char ecb_byteorder_helper (void) ecb_const;	1131	ecb_inline ecb_const uint32_t ecb_byteorder_helper (void);
886	ecb_inline unsigned char	1132	ecb_inline ecb_const uint32_t
887	ecb_byteorder_helper (void)	1133	ecb_byteorder_helper (void)
888	{	1134	{
889	const uint32_t u = 0x11223344;	1135	/* the union code still generates code under pressure in gcc, */
890	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
891	}	1157	}
892		1158
893	ecb_inline ecb_bool ecb_big_endian (void) ecb_const;	1159	ecb_inline ecb_const ecb_bool ecb_big_endian (void);
894	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; }
895	ecb_inline ecb_bool ecb_little_endian (void) ecb_const;	1161	ecb_inline ecb_const ecb_bool ecb_little_endian (void);
896	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; }
897		1163
898	#if ECB_GCC_VERSION(3,0) || ECB_C99	1164	#if ECB_GCC_VERSION(3,0) || ECB_C99
899	#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))
900	#else	1166	#else
901	#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)))
902	#endif	1168	#endif
903		1169
904	#if __cplusplus	1170	#if ECB_CPP
905	template<typename T>	1171	template<typename T>
906	static inline T ecb_div_rd (T val, T div)	1172	static inline T ecb_div_rd (T val, T div)
907	{	1173	{
908	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;	1174	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;
909	}	1175	}
…		…
926	}	1192	}
927	#else	1193	#else
928	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))	1194	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))
929	#endif	1195	#endif
930		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
931	#endif	1502	#endif
932		1503
933	/* ECB.H END */	1504	/* ECB.H END */
934		1505
935	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS	1506	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS
…		…
1101	{	1672	{
1102	write (STDERR_FILENO, msg, strlen (msg));	1673	write (STDERR_FILENO, msg, strlen (msg));
1103	}	1674	}
1104	#endif	1675	#endif
1105		1676
1106	static void (*syserr_cb)(const char *msg);	1677	static void (*syserr_cb)(const char *msg) EV_THROW;
1107		1678
1108	void ecb_cold	1679	void ecb_cold
1109	ev_set_syserr_cb (void (*cb)(const char *msg))	1680	ev_set_syserr_cb (void (*cb)(const char *msg) EV_THROW) EV_THROW
1110	{	1681	{
1111	syserr_cb = cb;	1682	syserr_cb = cb;
1112	}	1683	}
1113		1684
1114	static void noinline ecb_cold	1685	static void noinline ecb_cold
…		…
1132	abort ();	1703	abort ();
1133	}	1704	}
1134	}	1705	}
1135		1706
1136	static void *	1707	static void *
1137	ev_realloc_emul (void *ptr, long size)	1708	ev_realloc_emul (void *ptr, long size) EV_THROW
1138	{	1709	{
1139	#if __GLIBC__
1140	return realloc (ptr, size);
1141	#else
1142	/* some systems, notably openbsd and darwin, fail to properly	1710	/* some systems, notably openbsd and darwin, fail to properly
1143	* 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
1144	* 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.
1145	*/	1715	*/
1146		1716
1147	if (size)	1717	if (size)
1148	return realloc (ptr, size);	1718	return realloc (ptr, size);
1149		1719
1150	free (ptr);	1720	free (ptr);
1151	return 0;	1721	return 0;
1152	#endif
1153	}	1722	}
1154		1723
1155	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	1724	static void *(*alloc)(void *ptr, long size) EV_THROW = ev_realloc_emul;
1156		1725
1157	void ecb_cold	1726	void ecb_cold
1158	ev_set_allocator (void *(*cb)(void *ptr, long size))	1727	ev_set_allocator (void *(*cb)(void *ptr, long size) EV_THROW) EV_THROW
1159	{	1728	{
1160	alloc = cb;	1729	alloc = cb;
1161	}	1730	}
1162		1731
1163	inline_speed void *	1732	inline_speed void *
…		…
1280		1849
1281	/*****************************************************************************/	1850	/*****************************************************************************/
1282		1851
1283	#ifndef EV_HAVE_EV_TIME	1852	#ifndef EV_HAVE_EV_TIME
1284	ev_tstamp	1853	ev_tstamp
1285	ev_time (void)	1854	ev_time (void) EV_THROW
1286	{	1855	{
1287	#if EV_USE_REALTIME	1856	#if EV_USE_REALTIME
1288	if (expect_true (have_realtime))	1857	if (expect_true (have_realtime))
1289	{	1858	{
1290	struct timespec ts;	1859	struct timespec ts;
…		…
1314	return ev_time ();	1883	return ev_time ();
1315	}	1884	}
1316		1885
1317	#if EV_MULTIPLICITY	1886	#if EV_MULTIPLICITY
1318	ev_tstamp	1887	ev_tstamp
1319	ev_now (EV_P)	1888	ev_now (EV_P) EV_THROW
1320	{	1889	{
1321	return ev_rt_now;	1890	return ev_rt_now;
1322	}	1891	}
1323	#endif	1892	#endif
1324		1893
1325	void	1894	void
1326	ev_sleep (ev_tstamp delay)	1895	ev_sleep (ev_tstamp delay) EV_THROW
1327	{	1896	{
1328	if (delay > 0.)	1897	if (delay > 0.)
1329	{	1898	{
1330	#if EV_USE_NANOSLEEP	1899	#if EV_USE_NANOSLEEP
1331	struct timespec ts;	1900	struct timespec ts;
1332		1901
1333	EV_TS_SET (ts, delay);	1902	EV_TS_SET (ts, delay);
1334	nanosleep (&ts, 0);	1903	nanosleep (&ts, 0);
1335	#elif defined(_WIN32)	1904	#elif defined _WIN32
1336	Sleep ((unsigned long)(delay * 1e3));	1905	Sleep ((unsigned long)(delay * 1e3));
1337	#else	1906	#else
1338	struct timeval tv;	1907	struct timeval tv;
1339		1908
1340	/* 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 */
…		…
1412	pendingcb (EV_P_ ev_prepare *w, int revents)	1981	pendingcb (EV_P_ ev_prepare *w, int revents)
1413	{	1982	{
1414	}	1983	}
1415		1984
1416	void noinline	1985	void noinline
1417	ev_feed_event (EV_P_ void *w, int revents)	1986	ev_feed_event (EV_P_ void *w, int revents) EV_THROW
1418	{	1987	{
1419	W w_ = (W)w;	1988	W w_ = (W)w;
1420	int pri = ABSPRI (w_);	1989	int pri = ABSPRI (w_);
1421		1990
1422	if (expect_false (w_->pending))	1991	if (expect_false (w_->pending))
…		…
1426	w_->pending = ++pendingcnt [pri];	1995	w_->pending = ++pendingcnt [pri];
1427	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);	1996	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);
1428	pendings [pri][w_->pending - 1].w = w_;	1997	pendings [pri][w_->pending - 1].w = w_;
1429	pendings [pri][w_->pending - 1].events = revents;	1998	pendings [pri][w_->pending - 1].events = revents;
1430	}	1999	}
		2000
		2001	pendingpri = NUMPRI - 1;
1431	}	2002	}
1432		2003
1433	inline_speed void	2004	inline_speed void
1434	feed_reverse (EV_P_ W w)	2005	feed_reverse (EV_P_ W w)
1435	{	2006	{
…		…
1481	if (expect_true (!anfd->reify))	2052	if (expect_true (!anfd->reify))
1482	fd_event_nocheck (EV_A_ fd, revents);	2053	fd_event_nocheck (EV_A_ fd, revents);
1483	}	2054	}
1484		2055
1485	void	2056	void
1486	ev_feed_fd_event (EV_P_ int fd, int revents)	2057	ev_feed_fd_event (EV_P_ int fd, int revents) EV_THROW
1487	{	2058	{
1488	if (fd >= 0 && fd < anfdmax)	2059	if (fd >= 0 && fd < anfdmax)
1489	fd_event_nocheck (EV_A_ fd, revents);	2060	fd_event_nocheck (EV_A_ fd, revents);
1490	}	2061	}
1491		2062
…		…
1810	static void noinline ecb_cold	2381	static void noinline ecb_cold
1811	evpipe_init (EV_P)	2382	evpipe_init (EV_P)
1812	{	2383	{
1813	if (!ev_is_active (&pipe_w))	2384	if (!ev_is_active (&pipe_w))
1814	{	2385	{
		2386	int fds [2];
		2387
1815	# if EV_USE_EVENTFD	2388	# if EV_USE_EVENTFD
		2389	fds [0] = -1;
1816	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	2390	fds [1] = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1817	if (evfd < 0 && errno == EINVAL)	2391	if (fds [1] < 0 && errno == EINVAL)
1818	evfd = eventfd (0, 0);	2392	fds [1] = eventfd (0, 0);
1819		2393
1820	if (evfd >= 0)	2394	if (fds [1] < 0)
		2395	# endif
1821	{	2396	{
		2397	while (pipe (fds))
		2398	ev_syserr ("(libev) error creating signal/async pipe");
		2399
		2400	fd_intern (fds [0]);
		2401	}
		2402
1822	evpipe [0] = -1;	2403	evpipe [0] = fds [0];
1823	fd_intern (evfd); /* doing it twice doesn't hurt */	2404
1824	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));
1825	}	2455	}
1826	else	2456	else
1827	# endif	2457	#endif
1828	{	2458	{
1829	while (pipe (evpipe))	2459	#ifdef _WIN32
1830	ev_syserr ("(libev) error creating signal/async pipe");	2460	WSABUF buf;
1831		2461	DWORD sent;
1832	fd_intern (evpipe [0]);	2462	buf.buf = &buf;
1833	fd_intern (evpipe [1]);	2463	buf.len = 1;
1834	ev_io_set (&pipe_w, evpipe [0], EV_READ);	2464	WSASend (EV_FD_TO_WIN32_HANDLE (evpipe [1]), &buf, 1, &sent, 0, 0, 0);
1835	}	2465	#else
1836
1837	ev_io_start (EV_A_ &pipe_w);
1838	ev_unref (EV_A); /* watcher should not keep loop alive */
1839	}
1840	}
1841
1842	inline_speed void
1843	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1844	{
1845	if (expect_true (*flag))
1846	return;
1847
1848	*flag = 1;
1849
1850	ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */
1851
1852	pipe_write_skipped = 1;
1853
1854	ECB_MEMORY_FENCE; /* make sure pipe_write_skipped is visible before we check pipe_write_wanted */
1855
1856	if (pipe_write_wanted)
1857	{
1858	int old_errno;
1859
1860	pipe_write_skipped = 0; /* just an optimisation, no fence needed */
1861
1862	old_errno = errno; /* save errno because write will clobber it */
1863
1864	#if EV_USE_EVENTFD
1865	if (evfd >= 0)
1866	{
1867	uint64_t counter = 1;
1868	write (evfd, &counter, sizeof (uint64_t));
1869	}
1870	else
1871	#endif
1872	{
1873	/* win32 people keep sending patches that change this write() to send() */
1874	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
1875	/* so when you think this write should be a send instead, please find out */
1876	/* where your send() is from - it's definitely not the microsoft send, and */
1877	/* tell me. thank you. */
1878	/* it might be that your problem is that your environment needs EV_USE_WSASOCKET */
1879	/* check the ev documentation on how to use this flag */
1880	write (evpipe [1], &(evpipe [1]), 1);	2466	write (evpipe [1], &(evpipe [1]), 1);
		2467	#endif
1881	}	2468	}
1882		2469
1883	errno = old_errno;	2470	errno = old_errno;
1884	}	2471	}
1885	}	2472	}
…		…
1892	int i;	2479	int i;
1893		2480
1894	if (revents & EV_READ)	2481	if (revents & EV_READ)
1895	{	2482	{
1896	#if EV_USE_EVENTFD	2483	#if EV_USE_EVENTFD
1897	if (evfd >= 0)	2484	if (evpipe [0] < 0)
1898	{	2485	{
1899	uint64_t counter;	2486	uint64_t counter;
1900	read (evfd, &counter, sizeof (uint64_t));	2487	read (evpipe [1], &counter, sizeof (uint64_t));
1901	}	2488	}
1902	else	2489	else
1903	#endif	2490	#endif
1904	{	2491	{
1905	char dummy;	2492	char dummy[4];
1906	/* 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
1907	read (evpipe [0], &dummy, 1);	2501	read (evpipe [0], &dummy, sizeof (dummy));
		2502	#endif
1908	}	2503	}
1909	}	2504	}
1910		2505
1911	pipe_write_skipped = 0;	2506	pipe_write_skipped = 0;
		2507
		2508	ECB_MEMORY_FENCE; /* push out skipped, acquire flags */
1912		2509
1913	#if EV_SIGNAL_ENABLE	2510	#if EV_SIGNAL_ENABLE
1914	if (sig_pending)	2511	if (sig_pending)
1915	{	2512	{
1916	sig_pending = 0;	2513	sig_pending = 0;
		2514
		2515	ECB_MEMORY_FENCE;
1917		2516
1918	for (i = EV_NSIG - 1; i--; )	2517	for (i = EV_NSIG - 1; i--; )
1919	if (expect_false (signals [i].pending))	2518	if (expect_false (signals [i].pending))
1920	ev_feed_signal_event (EV_A_ i + 1);	2519	ev_feed_signal_event (EV_A_ i + 1);
1921	}	2520	}
…		…
1923		2522
1924	#if EV_ASYNC_ENABLE	2523	#if EV_ASYNC_ENABLE
1925	if (async_pending)	2524	if (async_pending)
1926	{	2525	{
1927	async_pending = 0;	2526	async_pending = 0;
		2527
		2528	ECB_MEMORY_FENCE;
1928		2529
1929	for (i = asynccnt; i--; )	2530	for (i = asynccnt; i--; )
1930	if (asyncs [i]->sent)	2531	if (asyncs [i]->sent)
1931	{	2532	{
1932	asyncs [i]->sent = 0;	2533	asyncs [i]->sent = 0;
		2534	ECB_MEMORY_FENCE_RELEASE;
1933	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);	2535	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);
1934	}	2536	}
1935	}	2537	}
1936	#endif	2538	#endif
1937	}	2539	}
1938		2540
1939	/*****************************************************************************/	2541	/*****************************************************************************/
1940		2542
1941	void	2543	void
1942	ev_feed_signal (int signum)	2544	ev_feed_signal (int signum) EV_THROW
1943	{	2545	{
1944	#if EV_MULTIPLICITY	2546	#if EV_MULTIPLICITY
		2547	EV_P;
		2548	ECB_MEMORY_FENCE_ACQUIRE;
1945	EV_P = signals [signum - 1].loop;	2549	EV_A = signals [signum - 1].loop;
1946		2550
1947	if (!EV_A)	2551	if (!EV_A)
1948	return;	2552	return;
1949	#endif	2553	#endif
1950		2554
1951	if (!ev_active (&pipe_w))
1952	return;
1953
1954	signals [signum - 1].pending = 1;	2555	signals [signum - 1].pending = 1;
1955	evpipe_write (EV_A_ &sig_pending);	2556	evpipe_write (EV_A_ &sig_pending);
1956	}	2557	}
1957		2558
1958	static void	2559	static void
…		…
1964		2565
1965	ev_feed_signal (signum);	2566	ev_feed_signal (signum);
1966	}	2567	}
1967		2568
1968	void noinline	2569	void noinline
1969	ev_feed_signal_event (EV_P_ int signum)	2570	ev_feed_signal_event (EV_P_ int signum) EV_THROW
1970	{	2571	{
1971	WL w;	2572	WL w;
1972		2573
1973	if (expect_false (signum <= 0 || signum > EV_NSIG))	2574	if (expect_false (signum <= 0 || signum >= EV_NSIG))
1974	return;	2575	return;
1975		2576
1976	--signum;	2577	--signum;
1977		2578
1978	#if EV_MULTIPLICITY	2579	#if EV_MULTIPLICITY
…		…
1982	if (expect_false (signals [signum].loop != EV_A))	2583	if (expect_false (signals [signum].loop != EV_A))
1983	return;	2584	return;
1984	#endif	2585	#endif
1985		2586
1986	signals [signum].pending = 0;	2587	signals [signum].pending = 0;
		2588	ECB_MEMORY_FENCE_RELEASE;
1987		2589
1988	for (w = signals [signum].head; w; w = w->next)	2590	for (w = signals [signum].head; w; w = w->next)
1989	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);	2591	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);
1990	}	2592	}
1991		2593
…		…
2090	#if EV_USE_SELECT	2692	#if EV_USE_SELECT
2091	# include "ev_select.c"	2693	# include "ev_select.c"
2092	#endif	2694	#endif
2093		2695
2094	int ecb_cold	2696	int ecb_cold
2095	ev_version_major (void)	2697	ev_version_major (void) EV_THROW
2096	{	2698	{
2097	return EV_VERSION_MAJOR;	2699	return EV_VERSION_MAJOR;
2098	}	2700	}
2099		2701
2100	int ecb_cold	2702	int ecb_cold
2101	ev_version_minor (void)	2703	ev_version_minor (void) EV_THROW
2102	{	2704	{
2103	return EV_VERSION_MINOR;	2705	return EV_VERSION_MINOR;
2104	}	2706	}
2105		2707
2106	/* 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 */
…		…
2114	|| getgid () != getegid ();	2716	|| getgid () != getegid ();
2115	#endif	2717	#endif
2116	}	2718	}
2117		2719
2118	unsigned int ecb_cold	2720	unsigned int ecb_cold
2119	ev_supported_backends (void)	2721	ev_supported_backends (void) EV_THROW
2120	{	2722	{
2121	unsigned int flags = 0;	2723	unsigned int flags = 0;
2122		2724
2123	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;	2725	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
2124	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;	2726	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;
…		…
2128		2730
2129	return flags;	2731	return flags;
2130	}	2732	}
2131		2733
2132	unsigned int ecb_cold	2734	unsigned int ecb_cold
2133	ev_recommended_backends (void)	2735	ev_recommended_backends (void) EV_THROW
2134	{	2736	{
2135	unsigned int flags = ev_supported_backends ();	2737	unsigned int flags = ev_supported_backends ();
2136		2738
2137	#ifndef __NetBSD__	2739	#ifndef __NetBSD__
2138	/* kqueue is borked on everything but netbsd apparently */	2740	/* kqueue is borked on everything but netbsd apparently */
…		…
2150		2752
2151	return flags;	2753	return flags;
2152	}	2754	}
2153		2755
2154	unsigned int ecb_cold	2756	unsigned int ecb_cold
2155	ev_embeddable_backends (void)	2757	ev_embeddable_backends (void) EV_THROW
2156	{	2758	{
2157	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;	2759	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
2158		2760
2159	/* 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 */
2160	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 */
…		…
2162		2764
2163	return flags;	2765	return flags;
2164	}	2766	}
2165		2767
2166	unsigned int	2768	unsigned int
2167	ev_backend (EV_P)	2769	ev_backend (EV_P) EV_THROW
2168	{	2770	{
2169	return backend;	2771	return backend;
2170	}	2772	}
2171		2773
2172	#if EV_FEATURE_API	2774	#if EV_FEATURE_API
2173	unsigned int	2775	unsigned int
2174	ev_iteration (EV_P)	2776	ev_iteration (EV_P) EV_THROW
2175	{	2777	{
2176	return loop_count;	2778	return loop_count;
2177	}	2779	}
2178		2780
2179	unsigned int	2781	unsigned int
2180	ev_depth (EV_P)	2782	ev_depth (EV_P) EV_THROW
2181	{	2783	{
2182	return loop_depth;	2784	return loop_depth;
2183	}	2785	}
2184		2786
2185	void	2787	void
2186	ev_set_io_collect_interval (EV_P_ ev_tstamp interval)	2788	ev_set_io_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2187	{	2789	{
2188	io_blocktime = interval;	2790	io_blocktime = interval;
2189	}	2791	}
2190		2792
2191	void	2793	void
2192	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval)	2794	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2193	{	2795	{
2194	timeout_blocktime = interval;	2796	timeout_blocktime = interval;
2195	}	2797	}
2196		2798
2197	void	2799	void
2198	ev_set_userdata (EV_P_ void *data)	2800	ev_set_userdata (EV_P_ void *data) EV_THROW
2199	{	2801	{
2200	userdata = data;	2802	userdata = data;
2201	}	2803	}
2202		2804
2203	void *	2805	void *
2204	ev_userdata (EV_P)	2806	ev_userdata (EV_P) EV_THROW
2205	{	2807	{
2206	return userdata;	2808	return userdata;
2207	}	2809	}
2208		2810
2209	void	2811	void
2210	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
2211	{	2813	{
2212	invoke_cb = invoke_pending_cb;	2814	invoke_cb = invoke_pending_cb;
2213	}	2815	}
2214		2816
2215	void	2817	void
2216	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
2217	{	2819	{
2218	release_cb = release;	2820	release_cb = release;
2219	acquire_cb = acquire;	2821	acquire_cb = acquire;
2220	}	2822	}
2221	#endif	2823	#endif
2222		2824
2223	/* initialise a loop structure, must be zero-initialised */	2825	/* initialise a loop structure, must be zero-initialised */
2224	static void noinline ecb_cold	2826	static void noinline ecb_cold
2225	loop_init (EV_P_ unsigned int flags)	2827	loop_init (EV_P_ unsigned int flags) EV_THROW
2226	{	2828	{
2227	if (!backend)	2829	if (!backend)
2228	{	2830	{
2229	origflags = flags;	2831	origflags = flags;
2230		2832
…		…
2275	#if EV_ASYNC_ENABLE	2877	#if EV_ASYNC_ENABLE
2276	async_pending = 0;	2878	async_pending = 0;
2277	#endif	2879	#endif
2278	pipe_write_skipped = 0;	2880	pipe_write_skipped = 0;
2279	pipe_write_wanted = 0;	2881	pipe_write_wanted = 0;
		2882	evpipe [0] = -1;
		2883	evpipe [1] = -1;
2280	#if EV_USE_INOTIFY	2884	#if EV_USE_INOTIFY
2281	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	2885	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
2282	#endif	2886	#endif
2283	#if EV_USE_SIGNALFD	2887	#if EV_USE_SIGNALFD
2284	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;	2888	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
…		…
2335	EV_INVOKE_PENDING;	2939	EV_INVOKE_PENDING;
2336	}	2940	}
2337	#endif	2941	#endif
2338		2942
2339	#if EV_CHILD_ENABLE	2943	#if EV_CHILD_ENABLE
2340	if (ev_is_active (&childev))	2944	if (ev_is_default_loop (EV_A) && ev_is_active (&childev))
2341	{	2945	{
2342	ev_ref (EV_A); /* child watcher */	2946	ev_ref (EV_A); /* child watcher */
2343	ev_signal_stop (EV_A_ &childev);	2947	ev_signal_stop (EV_A_ &childev);
2344	}	2948	}
2345	#endif	2949	#endif
…		…
2347	if (ev_is_active (&pipe_w))	2951	if (ev_is_active (&pipe_w))
2348	{	2952	{
2349	/*ev_ref (EV_A);*/	2953	/*ev_ref (EV_A);*/
2350	/*ev_io_stop (EV_A_ &pipe_w);*/	2954	/*ev_io_stop (EV_A_ &pipe_w);*/
2351		2955
2352	#if EV_USE_EVENTFD
2353	if (evfd >= 0)
2354	close (evfd);
2355	#endif
2356
2357	if (evpipe [0] >= 0)
2358	{
2359	EV_WIN32_CLOSE_FD (evpipe [0]);	2956	if (evpipe [0] >= 0) EV_WIN32_CLOSE_FD (evpipe [0]);
2360	EV_WIN32_CLOSE_FD (evpipe [1]);	2957	if (evpipe [1] >= 0) EV_WIN32_CLOSE_FD (evpipe [1]);
2361	}
2362	}	2958	}
2363		2959
2364	#if EV_USE_SIGNALFD	2960	#if EV_USE_SIGNALFD
2365	if (ev_is_active (&sigfd_w))	2961	if (ev_is_active (&sigfd_w))
2366	close (sigfd);	2962	close (sigfd);
…		…
2452	#endif	3048	#endif
2453	#if EV_USE_INOTIFY	3049	#if EV_USE_INOTIFY
2454	infy_fork (EV_A);	3050	infy_fork (EV_A);
2455	#endif	3051	#endif
2456		3052
		3053	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2457	if (ev_is_active (&pipe_w))	3054	if (ev_is_active (&pipe_w) && postfork != 2)
2458	{	3055	{
2459	/* 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 */
2460		3057
2461	ev_ref (EV_A);	3058	ev_ref (EV_A);
2462	ev_io_stop (EV_A_ &pipe_w);	3059	ev_io_stop (EV_A_ &pipe_w);
2463		3060
2464	#if EV_USE_EVENTFD
2465	if (evfd >= 0)
2466	close (evfd);
2467	#endif
2468
2469	if (evpipe [0] >= 0)	3061	if (evpipe [0] >= 0)
2470	{
2471	EV_WIN32_CLOSE_FD (evpipe [0]);	3062	EV_WIN32_CLOSE_FD (evpipe [0]);
2472	EV_WIN32_CLOSE_FD (evpipe [1]);
2473	}
2474		3063
2475	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2476	evpipe_init (EV_A);	3064	evpipe_init (EV_A);
2477	/* now iterate over everything, in case we missed something */	3065	/* iterate over everything, in case we missed something before */
2478	pipecb (EV_A_ &pipe_w, EV_READ);	3066	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
2479	#endif
2480	}	3067	}
		3068	#endif
2481		3069
2482	postfork = 0;	3070	postfork = 0;
2483	}	3071	}
2484		3072
2485	#if EV_MULTIPLICITY	3073	#if EV_MULTIPLICITY
2486		3074
2487	struct ev_loop * ecb_cold	3075	struct ev_loop * ecb_cold
2488	ev_loop_new (unsigned int flags)	3076	ev_loop_new (unsigned int flags) EV_THROW
2489	{	3077	{
2490	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));	3078	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));
2491		3079
2492	memset (EV_A, 0, sizeof (struct ev_loop));	3080	memset (EV_A, 0, sizeof (struct ev_loop));
2493	loop_init (EV_A_ flags);	3081	loop_init (EV_A_ flags);
…		…
2537	}	3125	}
2538	#endif	3126	#endif
2539		3127
2540	#if EV_FEATURE_API	3128	#if EV_FEATURE_API
2541	void ecb_cold	3129	void ecb_cold
2542	ev_verify (EV_P)	3130	ev_verify (EV_P) EV_THROW
2543	{	3131	{
2544	#if EV_VERIFY	3132	#if EV_VERIFY
2545	int i;	3133	int i;
2546	WL w;	3134	WL w, w2;
2547		3135
2548	assert (activecnt >= -1);	3136	assert (activecnt >= -1);
2549		3137
2550	assert (fdchangemax >= fdchangecnt);	3138	assert (fdchangemax >= fdchangecnt);
2551	for (i = 0; i < fdchangecnt; ++i)	3139	for (i = 0; i < fdchangecnt; ++i)
2552	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));	3140	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));
2553		3141
2554	assert (anfdmax >= 0);	3142	assert (anfdmax >= 0);
2555	for (i = 0; i < anfdmax; ++i)	3143	for (i = 0; i < anfdmax; ++i)
		3144	{
		3145	int j = 0;
		3146
2556	for (w = anfds [i].head; w; w = w->next)	3147	for (w = w2 = anfds [i].head; w; w = w->next)
2557	{	3148	{
2558	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
2559	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));
2560	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));
2561	}	3159	}
		3160	}
2562		3161
2563	assert (timermax >= timercnt);	3162	assert (timermax >= timercnt);
2564	verify_heap (EV_A_ timers, timercnt);	3163	verify_heap (EV_A_ timers, timercnt);
2565		3164
2566	#if EV_PERIODIC_ENABLE	3165	#if EV_PERIODIC_ENABLE
…		…
2616	#if EV_MULTIPLICITY	3215	#if EV_MULTIPLICITY
2617	struct ev_loop * ecb_cold	3216	struct ev_loop * ecb_cold
2618	#else	3217	#else
2619	int	3218	int
2620	#endif	3219	#endif
2621	ev_default_loop (unsigned int flags)	3220	ev_default_loop (unsigned int flags) EV_THROW
2622	{	3221	{
2623	if (!ev_default_loop_ptr)	3222	if (!ev_default_loop_ptr)
2624	{	3223	{
2625	#if EV_MULTIPLICITY	3224	#if EV_MULTIPLICITY
2626	EV_P = ev_default_loop_ptr = &default_loop_struct;	3225	EV_P = ev_default_loop_ptr = &default_loop_struct;
…		…
2645		3244
2646	return ev_default_loop_ptr;	3245	return ev_default_loop_ptr;
2647	}	3246	}
2648		3247
2649	void	3248	void
2650	ev_loop_fork (EV_P)	3249	ev_loop_fork (EV_P) EV_THROW
2651	{	3250	{
2652	postfork = 1; /* must be in line with ev_default_fork */	3251	postfork = 1;
2653	}	3252	}
2654		3253
2655	/*****************************************************************************/	3254	/*****************************************************************************/
2656		3255
2657	void	3256	void
…		…
2659	{	3258	{
2660	EV_CB_INVOKE ((W)w, revents);	3259	EV_CB_INVOKE ((W)w, revents);
2661	}	3260	}
2662		3261
2663	unsigned int	3262	unsigned int
2664	ev_pending_count (EV_P)	3263	ev_pending_count (EV_P) EV_THROW
2665	{	3264	{
2666	int pri;	3265	int pri;
2667	unsigned int count = 0;	3266	unsigned int count = 0;
2668		3267
2669	for (pri = NUMPRI; pri--; )	3268	for (pri = NUMPRI; pri--; )
…		…
2673	}	3272	}
2674		3273
2675	void noinline	3274	void noinline
2676	ev_invoke_pending (EV_P)	3275	ev_invoke_pending (EV_P)
2677	{	3276	{
2678	int pri;	3277	pendingpri = NUMPRI;
2679		3278
2680	for (pri = NUMPRI; pri--; )	3279	while (pendingpri) /* pendingpri possibly gets modified in the inner loop */
		3280	{
		3281	--pendingpri;
		3282
2681	while (pendingcnt [pri])	3283	while (pendingcnt [pendingpri])
2682	{	3284	{
2683	ANPENDING *p = pendings [pri] + --pendingcnt [pri];	3285	ANPENDING *p = pendings [pendingpri] + --pendingcnt [pendingpri];
2684		3286
2685	p->w->pending = 0;	3287	p->w->pending = 0;
2686	EV_CB_INVOKE (p->w, p->events);	3288	EV_CB_INVOKE (p->w, p->events);
2687	EV_FREQUENT_CHECK;	3289	EV_FREQUENT_CHECK;
2688	}	3290	}
		3291	}
2689	}	3292	}
2690		3293
2691	#if EV_IDLE_ENABLE	3294	#if EV_IDLE_ENABLE
2692	/* make idle watchers pending. this handles the "call-idle */	3295	/* make idle watchers pending. this handles the "call-idle */
2693	/* only when higher priorities are idle" logic */	3296	/* only when higher priorities are idle" logic */
…		…
2783	{	3386	{
2784	EV_FREQUENT_CHECK;	3387	EV_FREQUENT_CHECK;
2785		3388
2786	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)	3389	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)
2787	{	3390	{
2788	int feed_count = 0;
2789
2790	do	3391	do
2791	{	3392	{
2792	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);	3393	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);
2793		3394
2794	/*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)));*/
…		…
2928		3529
2929	mn_now = ev_rt_now;	3530	mn_now = ev_rt_now;
2930	}	3531	}
2931	}	3532	}
2932		3533
2933	void	3534	int
2934	ev_run (EV_P_ int flags)	3535	ev_run (EV_P_ int flags)
2935	{	3536	{
2936	#if EV_FEATURE_API	3537	#if EV_FEATURE_API
2937	++loop_depth;	3538	++loop_depth;
2938	#endif	3539	#endif
…		…
3053	backend_poll (EV_A_ waittime);	3654	backend_poll (EV_A_ waittime);
3054	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */	3655	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
3055		3656
3056	pipe_write_wanted = 0; /* just an optimisation, no fence needed */	3657	pipe_write_wanted = 0; /* just an optimisation, no fence needed */
3057		3658
		3659	ECB_MEMORY_FENCE_ACQUIRE;
3058	if (pipe_write_skipped)	3660	if (pipe_write_skipped)
3059	{	3661	{
3060	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)));
3061	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);	3663	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
3062	}	3664	}
…		…
3095	loop_done = EVBREAK_CANCEL;	3697	loop_done = EVBREAK_CANCEL;
3096		3698
3097	#if EV_FEATURE_API	3699	#if EV_FEATURE_API
3098	--loop_depth;	3700	--loop_depth;
3099	#endif	3701	#endif
		3702
		3703	return activecnt;
3100	}	3704	}
3101		3705
3102	void	3706	void
3103	ev_break (EV_P_ int how)	3707	ev_break (EV_P_ int how) EV_THROW
3104	{	3708	{
3105	loop_done = how;	3709	loop_done = how;
3106	}	3710	}
3107		3711
3108	void	3712	void
3109	ev_ref (EV_P)	3713	ev_ref (EV_P) EV_THROW
3110	{	3714	{
3111	++activecnt;	3715	++activecnt;
3112	}	3716	}
3113		3717
3114	void	3718	void
3115	ev_unref (EV_P)	3719	ev_unref (EV_P) EV_THROW
3116	{	3720	{
3117	--activecnt;	3721	--activecnt;
3118	}	3722	}
3119		3723
3120	void	3724	void
3121	ev_now_update (EV_P)	3725	ev_now_update (EV_P) EV_THROW
3122	{	3726	{
3123	time_update (EV_A_ 1e100);	3727	time_update (EV_A_ 1e100);
3124	}	3728	}
3125		3729
3126	void	3730	void
3127	ev_suspend (EV_P)	3731	ev_suspend (EV_P) EV_THROW
3128	{	3732	{
3129	ev_now_update (EV_A);	3733	ev_now_update (EV_A);
3130	}	3734	}
3131		3735
3132	void	3736	void
3133	ev_resume (EV_P)	3737	ev_resume (EV_P) EV_THROW
3134	{	3738	{
3135	ev_tstamp mn_prev = mn_now;	3739	ev_tstamp mn_prev = mn_now;
3136		3740
3137	ev_now_update (EV_A);	3741	ev_now_update (EV_A);
3138	timers_reschedule (EV_A_ mn_now - mn_prev);	3742	timers_reschedule (EV_A_ mn_now - mn_prev);
…		…
3177	w->pending = 0;	3781	w->pending = 0;
3178	}	3782	}
3179	}	3783	}
3180		3784
3181	int	3785	int
3182	ev_clear_pending (EV_P_ void *w)	3786	ev_clear_pending (EV_P_ void *w) EV_THROW
3183	{	3787	{
3184	W w_ = (W)w;	3788	W w_ = (W)w;
3185	int pending = w_->pending;	3789	int pending = w_->pending;
3186		3790
3187	if (expect_true (pending))	3791	if (expect_true (pending))
…		…
3220	}	3824	}
3221		3825
3222	/*****************************************************************************/	3826	/*****************************************************************************/
3223		3827
3224	void noinline	3828	void noinline
3225	ev_io_start (EV_P_ ev_io *w)	3829	ev_io_start (EV_P_ ev_io *w) EV_THROW
3226	{	3830	{
3227	int fd = w->fd;	3831	int fd = w->fd;
3228		3832
3229	if (expect_false (ev_is_active (w)))	3833	if (expect_false (ev_is_active (w)))
3230	return;	3834	return;
…		…
3236		3840
3237	ev_start (EV_A_ (W)w, 1);	3841	ev_start (EV_A_ (W)w, 1);
3238	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	3842	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
3239	wlist_add (&anfds[fd].head, (WL)w);	3843	wlist_add (&anfds[fd].head, (WL)w);
3240		3844
		3845	/* common bug, apparently */
		3846	assert (("libev: ev_io_start called with corrupted watcher", ((WL)w)->next != (WL)w));
		3847
3241	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);
3242	w->events &= ~EV__IOFDSET;	3849	w->events &= ~EV__IOFDSET;
3243		3850
3244	EV_FREQUENT_CHECK;	3851	EV_FREQUENT_CHECK;
3245	}	3852	}
3246		3853
3247	void noinline	3854	void noinline
3248	ev_io_stop (EV_P_ ev_io *w)	3855	ev_io_stop (EV_P_ ev_io *w) EV_THROW
3249	{	3856	{
3250	clear_pending (EV_A_ (W)w);	3857	clear_pending (EV_A_ (W)w);
3251	if (expect_false (!ev_is_active (w)))	3858	if (expect_false (!ev_is_active (w)))
3252	return;	3859	return;
3253		3860
…		…
3262		3869
3263	EV_FREQUENT_CHECK;	3870	EV_FREQUENT_CHECK;
3264	}	3871	}
3265		3872
3266	void noinline	3873	void noinline
3267	ev_timer_start (EV_P_ ev_timer *w)	3874	ev_timer_start (EV_P_ ev_timer *w) EV_THROW
3268	{	3875	{
3269	if (expect_false (ev_is_active (w)))	3876	if (expect_false (ev_is_active (w)))
3270	return;	3877	return;
3271		3878
3272	ev_at (w) += mn_now;	3879	ev_at (w) += mn_now;
…		…
3286		3893
3287	/*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));*/
3288	}	3895	}
3289		3896
3290	void noinline	3897	void noinline
3291	ev_timer_stop (EV_P_ ev_timer *w)	3898	ev_timer_stop (EV_P_ ev_timer *w) EV_THROW
3292	{	3899	{
3293	clear_pending (EV_A_ (W)w);	3900	clear_pending (EV_A_ (W)w);
3294	if (expect_false (!ev_is_active (w)))	3901	if (expect_false (!ev_is_active (w)))
3295	return;	3902	return;
3296		3903
…		…
3316		3923
3317	EV_FREQUENT_CHECK;	3924	EV_FREQUENT_CHECK;
3318	}	3925	}
3319		3926
3320	void noinline	3927	void noinline
3321	ev_timer_again (EV_P_ ev_timer *w)	3928	ev_timer_again (EV_P_ ev_timer *w) EV_THROW
3322	{	3929	{
3323	EV_FREQUENT_CHECK;	3930	EV_FREQUENT_CHECK;
3324		3931
3325	clear_pending (EV_A_ (W)w);	3932	clear_pending (EV_A_ (W)w);
3326		3933
…		…
3343		3950
3344	EV_FREQUENT_CHECK;	3951	EV_FREQUENT_CHECK;
3345	}	3952	}
3346		3953
3347	ev_tstamp	3954	ev_tstamp
3348	ev_timer_remaining (EV_P_ ev_timer *w)	3955	ev_timer_remaining (EV_P_ ev_timer *w) EV_THROW
3349	{	3956	{
3350	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);	3957	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);
3351	}	3958	}
3352		3959
3353	#if EV_PERIODIC_ENABLE	3960	#if EV_PERIODIC_ENABLE
3354	void noinline	3961	void noinline
3355	ev_periodic_start (EV_P_ ev_periodic *w)	3962	ev_periodic_start (EV_P_ ev_periodic *w) EV_THROW
3356	{	3963	{
3357	if (expect_false (ev_is_active (w)))	3964	if (expect_false (ev_is_active (w)))
3358	return;	3965	return;
3359		3966
3360	if (w->reschedule_cb)	3967	if (w->reschedule_cb)
…		…
3380		3987
3381	/*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));*/
3382	}	3989	}
3383		3990
3384	void noinline	3991	void noinline
3385	ev_periodic_stop (EV_P_ ev_periodic *w)	3992	ev_periodic_stop (EV_P_ ev_periodic *w) EV_THROW
3386	{	3993	{
3387	clear_pending (EV_A_ (W)w);	3994	clear_pending (EV_A_ (W)w);
3388	if (expect_false (!ev_is_active (w)))	3995	if (expect_false (!ev_is_active (w)))
3389	return;	3996	return;
3390		3997
…		…
3408		4015
3409	EV_FREQUENT_CHECK;	4016	EV_FREQUENT_CHECK;
3410	}	4017	}
3411		4018
3412	void noinline	4019	void noinline
3413	ev_periodic_again (EV_P_ ev_periodic *w)	4020	ev_periodic_again (EV_P_ ev_periodic *w) EV_THROW
3414	{	4021	{
3415	/* TODO: use adjustheap and recalculation */	4022	/* TODO: use adjustheap and recalculation */
3416	ev_periodic_stop (EV_A_ w);	4023	ev_periodic_stop (EV_A_ w);
3417	ev_periodic_start (EV_A_ w);	4024	ev_periodic_start (EV_A_ w);
3418	}	4025	}
…		…
3423	#endif	4030	#endif
3424		4031
3425	#if EV_SIGNAL_ENABLE	4032	#if EV_SIGNAL_ENABLE
3426		4033
3427	void noinline	4034	void noinline
3428	ev_signal_start (EV_P_ ev_signal *w)	4035	ev_signal_start (EV_P_ ev_signal *w) EV_THROW
3429	{	4036	{
3430	if (expect_false (ev_is_active (w)))	4037	if (expect_false (ev_is_active (w)))
3431	return;	4038	return;
3432		4039
3433	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));
…		…
3435	#if EV_MULTIPLICITY	4042	#if EV_MULTIPLICITY
3436	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",
3437	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));	4044	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));
3438		4045
3439	signals [w->signum - 1].loop = EV_A;	4046	signals [w->signum - 1].loop = EV_A;
		4047	ECB_MEMORY_FENCE_RELEASE;
3440	#endif	4048	#endif
3441		4049
3442	EV_FREQUENT_CHECK;	4050	EV_FREQUENT_CHECK;
3443		4051
3444	#if EV_USE_SIGNALFD	4052	#if EV_USE_SIGNALFD
…		…
3504		4112
3505	EV_FREQUENT_CHECK;	4113	EV_FREQUENT_CHECK;
3506	}	4114	}
3507		4115
3508	void noinline	4116	void noinline
3509	ev_signal_stop (EV_P_ ev_signal *w)	4117	ev_signal_stop (EV_P_ ev_signal *w) EV_THROW
3510	{	4118	{
3511	clear_pending (EV_A_ (W)w);	4119	clear_pending (EV_A_ (W)w);
3512	if (expect_false (!ev_is_active (w)))	4120	if (expect_false (!ev_is_active (w)))
3513	return;	4121	return;
3514		4122
…		…
3545	#endif	4153	#endif
3546		4154
3547	#if EV_CHILD_ENABLE	4155	#if EV_CHILD_ENABLE
3548		4156
3549	void	4157	void
3550	ev_child_start (EV_P_ ev_child *w)	4158	ev_child_start (EV_P_ ev_child *w) EV_THROW
3551	{	4159	{
3552	#if EV_MULTIPLICITY	4160	#if EV_MULTIPLICITY
3553	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));
3554	#endif	4162	#endif
3555	if (expect_false (ev_is_active (w)))	4163	if (expect_false (ev_is_active (w)))
…		…
3562		4170
3563	EV_FREQUENT_CHECK;	4171	EV_FREQUENT_CHECK;
3564	}	4172	}
3565		4173
3566	void	4174	void
3567	ev_child_stop (EV_P_ ev_child *w)	4175	ev_child_stop (EV_P_ ev_child *w) EV_THROW
3568	{	4176	{
3569	clear_pending (EV_A_ (W)w);	4177	clear_pending (EV_A_ (W)w);
3570	if (expect_false (!ev_is_active (w)))	4178	if (expect_false (!ev_is_active (w)))
3571	return;	4179	return;
3572		4180
…		…
3599	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)	4207	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
3600		4208
3601	static void noinline	4209	static void noinline
3602	infy_add (EV_P_ ev_stat *w)	4210	infy_add (EV_P_ ev_stat *w)
3603	{	4211	{
3604	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);
3605		4216
3606	if (w->wd >= 0)	4217	if (w->wd >= 0)
3607	{	4218	{
3608	struct statfs sfs;	4219	struct statfs sfs;
3609		4220
…		…
3613		4224
3614	if (!fs_2625)	4225	if (!fs_2625)
3615	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	4226	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
3616	else if (!statfs (w->path, &sfs)	4227	else if (!statfs (w->path, &sfs)
3617	&& (sfs.f_type == 0x1373 /* devfs */	4228	&& (sfs.f_type == 0x1373 /* devfs */
		4229	|| sfs.f_type == 0x4006 /* fat */
		4230	|| sfs.f_type == 0x4d44 /* msdos */
3618	|| 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 */
3619	|| sfs.f_type == 0x3153464a /* jfs */	4235	|| sfs.f_type == 0x3153464a /* jfs */
		4236	|| sfs.f_type == 0x9123683e /* btrfs */
3620	|| sfs.f_type == 0x52654973 /* reiser3 */	4237	|| sfs.f_type == 0x52654973 /* reiser3 */
3621	|| sfs.f_type == 0x01021994 /* tempfs */	4238	|| sfs.f_type == 0x01021994 /* tmpfs */
3622	|| sfs.f_type == 0x58465342 /* xfs */))	4239	|| sfs.f_type == 0x58465342 /* xfs */))
3623	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */	4240	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
3624	else	4241	else
3625	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 */
3626	}	4243	}
…		…
3739	}	4356	}
3740		4357
3741	inline_size int	4358	inline_size int
3742	infy_newfd (void)	4359	infy_newfd (void)
3743	{	4360	{
3744	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)	4361	#if defined IN_CLOEXEC && defined IN_NONBLOCK
3745	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);	4362	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
3746	if (fd >= 0)	4363	if (fd >= 0)
3747	return fd;	4364	return fd;
3748	#endif	4365	#endif
3749	return inotify_init ();	4366	return inotify_init ();
…		…
3824	#else	4441	#else
3825	# define EV_LSTAT(p,b) lstat (p, b)	4442	# define EV_LSTAT(p,b) lstat (p, b)
3826	#endif	4443	#endif
3827		4444
3828	void	4445	void
3829	ev_stat_stat (EV_P_ ev_stat *w)	4446	ev_stat_stat (EV_P_ ev_stat *w) EV_THROW
3830	{	4447	{
3831	if (lstat (w->path, &w->attr) < 0)	4448	if (lstat (w->path, &w->attr) < 0)
3832	w->attr.st_nlink = 0;	4449	w->attr.st_nlink = 0;
3833	else if (!w->attr.st_nlink)	4450	else if (!w->attr.st_nlink)
3834	w->attr.st_nlink = 1;	4451	w->attr.st_nlink = 1;
…		…
3873	ev_feed_event (EV_A_ w, EV_STAT);	4490	ev_feed_event (EV_A_ w, EV_STAT);
3874	}	4491	}
3875	}	4492	}
3876		4493
3877	void	4494	void
3878	ev_stat_start (EV_P_ ev_stat *w)	4495	ev_stat_start (EV_P_ ev_stat *w) EV_THROW
3879	{	4496	{
3880	if (expect_false (ev_is_active (w)))	4497	if (expect_false (ev_is_active (w)))
3881	return;	4498	return;
3882		4499
3883	ev_stat_stat (EV_A_ w);	4500	ev_stat_stat (EV_A_ w);
…		…
3904		4521
3905	EV_FREQUENT_CHECK;	4522	EV_FREQUENT_CHECK;
3906	}	4523	}
3907		4524
3908	void	4525	void
3909	ev_stat_stop (EV_P_ ev_stat *w)	4526	ev_stat_stop (EV_P_ ev_stat *w) EV_THROW
3910	{	4527	{
3911	clear_pending (EV_A_ (W)w);	4528	clear_pending (EV_A_ (W)w);
3912	if (expect_false (!ev_is_active (w)))	4529	if (expect_false (!ev_is_active (w)))
3913	return;	4530	return;
3914		4531
…		…
3930	}	4547	}
3931	#endif	4548	#endif
3932		4549
3933	#if EV_IDLE_ENABLE	4550	#if EV_IDLE_ENABLE
3934	void	4551	void
3935	ev_idle_start (EV_P_ ev_idle *w)	4552	ev_idle_start (EV_P_ ev_idle *w) EV_THROW
3936	{	4553	{
3937	if (expect_false (ev_is_active (w)))	4554	if (expect_false (ev_is_active (w)))
3938	return;	4555	return;
3939		4556
3940	pri_adjust (EV_A_ (W)w);	4557	pri_adjust (EV_A_ (W)w);
…		…
3953		4570
3954	EV_FREQUENT_CHECK;	4571	EV_FREQUENT_CHECK;
3955	}	4572	}
3956		4573
3957	void	4574	void
3958	ev_idle_stop (EV_P_ ev_idle *w)	4575	ev_idle_stop (EV_P_ ev_idle *w) EV_THROW
3959	{	4576	{
3960	clear_pending (EV_A_ (W)w);	4577	clear_pending (EV_A_ (W)w);
3961	if (expect_false (!ev_is_active (w)))	4578	if (expect_false (!ev_is_active (w)))
3962	return;	4579	return;
3963		4580
…		…
3977	}	4594	}
3978	#endif	4595	#endif
3979		4596
3980	#if EV_PREPARE_ENABLE	4597	#if EV_PREPARE_ENABLE
3981	void	4598	void
3982	ev_prepare_start (EV_P_ ev_prepare *w)	4599	ev_prepare_start (EV_P_ ev_prepare *w) EV_THROW
3983	{	4600	{
3984	if (expect_false (ev_is_active (w)))	4601	if (expect_false (ev_is_active (w)))
3985	return;	4602	return;
3986		4603
3987	EV_FREQUENT_CHECK;	4604	EV_FREQUENT_CHECK;
…		…
3992		4609
3993	EV_FREQUENT_CHECK;	4610	EV_FREQUENT_CHECK;
3994	}	4611	}
3995		4612
3996	void	4613	void
3997	ev_prepare_stop (EV_P_ ev_prepare *w)	4614	ev_prepare_stop (EV_P_ ev_prepare *w) EV_THROW
3998	{	4615	{
3999	clear_pending (EV_A_ (W)w);	4616	clear_pending (EV_A_ (W)w);
4000	if (expect_false (!ev_is_active (w)))	4617	if (expect_false (!ev_is_active (w)))
4001	return;	4618	return;
4002		4619
…		…
4015	}	4632	}
4016	#endif	4633	#endif
4017		4634
4018	#if EV_CHECK_ENABLE	4635	#if EV_CHECK_ENABLE
4019	void	4636	void
4020	ev_check_start (EV_P_ ev_check *w)	4637	ev_check_start (EV_P_ ev_check *w) EV_THROW
4021	{	4638	{
4022	if (expect_false (ev_is_active (w)))	4639	if (expect_false (ev_is_active (w)))
4023	return;	4640	return;
4024		4641
4025	EV_FREQUENT_CHECK;	4642	EV_FREQUENT_CHECK;
…		…
4030		4647
4031	EV_FREQUENT_CHECK;	4648	EV_FREQUENT_CHECK;
4032	}	4649	}
4033		4650
4034	void	4651	void
4035	ev_check_stop (EV_P_ ev_check *w)	4652	ev_check_stop (EV_P_ ev_check *w) EV_THROW
4036	{	4653	{
4037	clear_pending (EV_A_ (W)w);	4654	clear_pending (EV_A_ (W)w);
4038	if (expect_false (!ev_is_active (w)))	4655	if (expect_false (!ev_is_active (w)))
4039	return;	4656	return;
4040		4657
…		…
4053	}	4670	}
4054	#endif	4671	#endif
4055		4672
4056	#if EV_EMBED_ENABLE	4673	#if EV_EMBED_ENABLE
4057	void noinline	4674	void noinline
4058	ev_embed_sweep (EV_P_ ev_embed *w)	4675	ev_embed_sweep (EV_P_ ev_embed *w) EV_THROW
4059	{	4676	{
4060	ev_run (w->other, EVRUN_NOWAIT);	4677	ev_run (w->other, EVRUN_NOWAIT);
4061	}	4678	}
4062		4679
4063	static void	4680	static void
…		…
4111	ev_idle_stop (EV_A_ idle);	4728	ev_idle_stop (EV_A_ idle);
4112	}	4729	}
4113	#endif	4730	#endif
4114		4731
4115	void	4732	void
4116	ev_embed_start (EV_P_ ev_embed *w)	4733	ev_embed_start (EV_P_ ev_embed *w) EV_THROW
4117	{	4734	{
4118	if (expect_false (ev_is_active (w)))	4735	if (expect_false (ev_is_active (w)))
4119	return;	4736	return;
4120		4737
4121	{	4738	{
…		…
4142		4759
4143	EV_FREQUENT_CHECK;	4760	EV_FREQUENT_CHECK;
4144	}	4761	}
4145		4762
4146	void	4763	void
4147	ev_embed_stop (EV_P_ ev_embed *w)	4764	ev_embed_stop (EV_P_ ev_embed *w) EV_THROW
4148	{	4765	{
4149	clear_pending (EV_A_ (W)w);	4766	clear_pending (EV_A_ (W)w);
4150	if (expect_false (!ev_is_active (w)))	4767	if (expect_false (!ev_is_active (w)))
4151	return;	4768	return;
4152		4769
…		…
4162	}	4779	}
4163	#endif	4780	#endif
4164		4781
4165	#if EV_FORK_ENABLE	4782	#if EV_FORK_ENABLE
4166	void	4783	void
4167	ev_fork_start (EV_P_ ev_fork *w)	4784	ev_fork_start (EV_P_ ev_fork *w) EV_THROW
4168	{	4785	{
4169	if (expect_false (ev_is_active (w)))	4786	if (expect_false (ev_is_active (w)))
4170	return;	4787	return;
4171		4788
4172	EV_FREQUENT_CHECK;	4789	EV_FREQUENT_CHECK;
…		…
4177		4794
4178	EV_FREQUENT_CHECK;	4795	EV_FREQUENT_CHECK;
4179	}	4796	}
4180		4797
4181	void	4798	void
4182	ev_fork_stop (EV_P_ ev_fork *w)	4799	ev_fork_stop (EV_P_ ev_fork *w) EV_THROW
4183	{	4800	{
4184	clear_pending (EV_A_ (W)w);	4801	clear_pending (EV_A_ (W)w);
4185	if (expect_false (!ev_is_active (w)))	4802	if (expect_false (!ev_is_active (w)))
4186	return;	4803	return;
4187		4804
…		…
4200	}	4817	}
4201	#endif	4818	#endif
4202		4819
4203	#if EV_CLEANUP_ENABLE	4820	#if EV_CLEANUP_ENABLE
4204	void	4821	void
4205	ev_cleanup_start (EV_P_ ev_cleanup *w)	4822	ev_cleanup_start (EV_P_ ev_cleanup *w) EV_THROW
4206	{	4823	{
4207	if (expect_false (ev_is_active (w)))	4824	if (expect_false (ev_is_active (w)))
4208	return;	4825	return;
4209		4826
4210	EV_FREQUENT_CHECK;	4827	EV_FREQUENT_CHECK;
…		…
4217	ev_unref (EV_A);	4834	ev_unref (EV_A);
4218	EV_FREQUENT_CHECK;	4835	EV_FREQUENT_CHECK;
4219	}	4836	}
4220		4837
4221	void	4838	void
4222	ev_cleanup_stop (EV_P_ ev_cleanup *w)	4839	ev_cleanup_stop (EV_P_ ev_cleanup *w) EV_THROW
4223	{	4840	{
4224	clear_pending (EV_A_ (W)w);	4841	clear_pending (EV_A_ (W)w);
4225	if (expect_false (!ev_is_active (w)))	4842	if (expect_false (!ev_is_active (w)))
4226	return;	4843	return;
4227		4844
…		…
4241	}	4858	}
4242	#endif	4859	#endif
4243		4860
4244	#if EV_ASYNC_ENABLE	4861	#if EV_ASYNC_ENABLE
4245	void	4862	void
4246	ev_async_start (EV_P_ ev_async *w)	4863	ev_async_start (EV_P_ ev_async *w) EV_THROW
4247	{	4864	{
4248	if (expect_false (ev_is_active (w)))	4865	if (expect_false (ev_is_active (w)))
4249	return;	4866	return;
4250		4867
4251	w->sent = 0;	4868	w->sent = 0;
…		…
4260		4877
4261	EV_FREQUENT_CHECK;	4878	EV_FREQUENT_CHECK;
4262	}	4879	}
4263		4880
4264	void	4881	void
4265	ev_async_stop (EV_P_ ev_async *w)	4882	ev_async_stop (EV_P_ ev_async *w) EV_THROW
4266	{	4883	{
4267	clear_pending (EV_A_ (W)w);	4884	clear_pending (EV_A_ (W)w);
4268	if (expect_false (!ev_is_active (w)))	4885	if (expect_false (!ev_is_active (w)))
4269	return;	4886	return;
4270		4887
…		…
4281		4898
4282	EV_FREQUENT_CHECK;	4899	EV_FREQUENT_CHECK;
4283	}	4900	}
4284		4901
4285	void	4902	void
4286	ev_async_send (EV_P_ ev_async *w)	4903	ev_async_send (EV_P_ ev_async *w) EV_THROW
4287	{	4904	{
4288	w->sent = 1;	4905	w->sent = 1;
4289	evpipe_write (EV_A_ &async_pending);	4906	evpipe_write (EV_A_ &async_pending);
4290	}	4907	}
4291	#endif	4908	#endif
…		…
4328		4945
4329	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));
4330	}	4947	}
4331		4948
4332	void	4949	void
4333	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
4334	{	4951	{
4335	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));
4336		4953
4337	if (expect_false (!once))	4954	if (expect_false (!once))
4338	{	4955	{
…		…
4360		4977
4361	/*****************************************************************************/	4978	/*****************************************************************************/
4362		4979
4363	#if EV_WALK_ENABLE	4980	#if EV_WALK_ENABLE
4364	void ecb_cold	4981	void ecb_cold
4365	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
4366	{	4983	{
4367	int i, j;	4984	int i, j;
4368	ev_watcher_list *wl, *wn;	4985	ev_watcher_list *wl, *wn;
4369		4986
4370	if (types & (EV_IO | EV_EMBED))	4987	if (types & (EV_IO | EV_EMBED))

Diff Legend

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