ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.400 by root, Sat Oct 15 09:05:03 2011 UTC vs.
Revision 1.479 by root, Sun Dec 20 01:31:17 2015 UTC

1	/*	1	/*
2	* libev event processing core, watcher management	2	* libev event processing core, watcher management
3	*	3	*
4	* Copyright (c) 2007,2008,2009,2010,2011 Marc Alexander Lehmann <libev@schmorp.de>	4	* Copyright (c) 2007,2008,2009,2010,2011,2012,2013 Marc Alexander Lehmann <libev@schmorp.de>
5	* All rights reserved.	5	* All rights reserved.
6	*	6	*
7	* Redistribution and use in source and binary forms, with or without modifica-	7	* Redistribution and use in source and binary forms, with or without modifica-
8	* tion, are permitted provided that the following conditions are met:	8	* tion, are permitted provided that the following conditions are met:
9	*	9	*
…		…
43	# include EV_CONFIG_H	43	# include EV_CONFIG_H
44	# else	44	# else
45	# include "config.h"	45	# include "config.h"
46	# endif	46	# endif
47		47
48	#if HAVE_FLOOR	48	# if HAVE_FLOOR
49	# ifndef EV_USE_FLOOR	49	# ifndef EV_USE_FLOOR
50	# define EV_USE_FLOOR 1	50	# define EV_USE_FLOOR 1
		51	# endif
51	# endif	52	# endif
52	#endif
53		53
54	# if HAVE_CLOCK_SYSCALL	54	# if HAVE_CLOCK_SYSCALL
55	# ifndef EV_USE_CLOCK_SYSCALL	55	# ifndef EV_USE_CLOCK_SYSCALL
56	# define EV_USE_CLOCK_SYSCALL 1	56	# define EV_USE_CLOCK_SYSCALL 1
57	# ifndef EV_USE_REALTIME	57	# ifndef EV_USE_REALTIME
…		…
59	# endif	59	# endif
60	# ifndef EV_USE_MONOTONIC	60	# ifndef EV_USE_MONOTONIC
61	# define EV_USE_MONOTONIC 1	61	# define EV_USE_MONOTONIC 1
62	# endif	62	# endif
63	# endif	63	# endif
64	# elif !defined(EV_USE_CLOCK_SYSCALL)	64	# elif !defined EV_USE_CLOCK_SYSCALL
65	# define EV_USE_CLOCK_SYSCALL 0	65	# define EV_USE_CLOCK_SYSCALL 0
66	# endif	66	# endif
67		67
68	# if HAVE_CLOCK_GETTIME	68	# if HAVE_CLOCK_GETTIME
69	# ifndef EV_USE_MONOTONIC	69	# ifndef EV_USE_MONOTONIC
…		…
183	# include EV_H	183	# include EV_H
184	#else	184	#else
185	# include "ev.h"	185	# include "ev.h"
186	#endif	186	#endif
187		187
		188	#if EV_NO_THREADS
		189	# undef EV_NO_SMP
		190	# define EV_NO_SMP 1
		191	# undef ECB_NO_THREADS
		192	# define ECB_NO_THREADS 1
		193	#endif
		194	#if EV_NO_SMP
		195	# undef EV_NO_SMP
		196	# define ECB_NO_SMP 1
		197	#endif
		198
188	#ifndef _WIN32	199	#ifndef _WIN32
189	# include <sys/time.h>	200	# include <sys/time.h>
190	# include <sys/wait.h>	201	# include <sys/wait.h>
191	# include <unistd.h>	202	# include <unistd.h>
192	#else	203	#else
193	# include <io.h>	204	# include <io.h>
194	# define WIN32_LEAN_AND_MEAN	205	# define WIN32_LEAN_AND_MEAN
		206	# include <winsock2.h>
195	# include <windows.h>	207	# include <windows.h>
196	# ifndef EV_SELECT_IS_WINSOCKET	208	# ifndef EV_SELECT_IS_WINSOCKET
197	# define EV_SELECT_IS_WINSOCKET 1	209	# define EV_SELECT_IS_WINSOCKET 1
198	# endif	210	# endif
199	# undef EV_AVOID_STDIO	211	# undef EV_AVOID_STDIO
…		…
208	#define _DARWIN_UNLIMITED_SELECT 1	220	#define _DARWIN_UNLIMITED_SELECT 1
209		221
210	/* this block tries to deduce configuration from header-defined symbols and defaults */	222	/* this block tries to deduce configuration from header-defined symbols and defaults */
211		223
212	/* try to deduce the maximum number of signals on this platform */	224	/* try to deduce the maximum number of signals on this platform */
213	#if defined (EV_NSIG)	225	#if defined EV_NSIG
214	/* use what's provided */	226	/* use what's provided */
215	#elif defined (NSIG)	227	#elif defined NSIG
216	# define EV_NSIG (NSIG)	228	# define EV_NSIG (NSIG)
217	#elif defined(_NSIG)	229	#elif defined _NSIG
218	# define EV_NSIG (_NSIG)	230	# define EV_NSIG (_NSIG)
219	#elif defined (SIGMAX)	231	#elif defined SIGMAX
220	# define EV_NSIG (SIGMAX+1)	232	# define EV_NSIG (SIGMAX+1)
221	#elif defined (SIG_MAX)	233	#elif defined SIG_MAX
222	# define EV_NSIG (SIG_MAX+1)	234	# define EV_NSIG (SIG_MAX+1)
223	#elif defined (_SIG_MAX)	235	#elif defined _SIG_MAX
224	# define EV_NSIG (_SIG_MAX+1)	236	# define EV_NSIG (_SIG_MAX+1)
225	#elif defined (MAXSIG)	237	#elif defined MAXSIG
226	# define EV_NSIG (MAXSIG+1)	238	# define EV_NSIG (MAXSIG+1)
227	#elif defined (MAX_SIG)	239	#elif defined MAX_SIG
228	# define EV_NSIG (MAX_SIG+1)	240	# define EV_NSIG (MAX_SIG+1)
229	#elif defined (SIGARRAYSIZE)	241	#elif defined SIGARRAYSIZE
230	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */	242	# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
231	#elif defined (_sys_nsig)	243	#elif defined _sys_nsig
232	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */	244	# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
233	#else	245	#else
234	# error "unable to find value for NSIG, please report"	246	# define EV_NSIG (8 * sizeof (sigset_t) + 1)
235	/* to make it compile regardless, just remove the above line, */
236	/* but consider reporting it, too! :) */
237	# define EV_NSIG 65
238	#endif	247	#endif
239		248
240	#ifndef EV_USE_FLOOR	249	#ifndef EV_USE_FLOOR
241	# define EV_USE_FLOOR 0	250	# define EV_USE_FLOOR 0
242	#endif	251	#endif
243		252
244	#ifndef EV_USE_CLOCK_SYSCALL	253	#ifndef EV_USE_CLOCK_SYSCALL
245	# if __linux && __GLIBC__ >= 2	254	# if __linux && __GLIBC__ == 2 && __GLIBC_MINOR__ < 17
246	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS	255	# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
247	# else	256	# else
248	# define EV_USE_CLOCK_SYSCALL 0	257	# define EV_USE_CLOCK_SYSCALL 0
249	# endif	258	# endif
250	#endif	259	#endif
251		260
		261	#if !(_POSIX_TIMERS > 0)
		262	# ifndef EV_USE_MONOTONIC
		263	# define EV_USE_MONOTONIC 0
		264	# endif
		265	# ifndef EV_USE_REALTIME
		266	# define EV_USE_REALTIME 0
		267	# endif
		268	#endif
		269
252	#ifndef EV_USE_MONOTONIC	270	#ifndef EV_USE_MONOTONIC
253	# if defined (_POSIX_MONOTONIC_CLOCK) && _POSIX_MONOTONIC_CLOCK >= 0	271	# if defined _POSIX_MONOTONIC_CLOCK && _POSIX_MONOTONIC_CLOCK >= 0
254	# define EV_USE_MONOTONIC EV_FEATURE_OS	272	# define EV_USE_MONOTONIC EV_FEATURE_OS
255	# else	273	# else
256	# define EV_USE_MONOTONIC 0	274	# define EV_USE_MONOTONIC 0
257	# endif	275	# endif
258	#endif	276	#endif
…		…
345		363
346	#ifndef EV_HEAP_CACHE_AT	364	#ifndef EV_HEAP_CACHE_AT
347	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA	365	# define EV_HEAP_CACHE_AT EV_FEATURE_DATA
348	#endif	366	#endif
349		367
		368	#ifdef ANDROID
		369	/* supposedly, android doesn't typedef fd_mask */
		370	# undef EV_USE_SELECT
		371	# define EV_USE_SELECT 0
		372	/* supposedly, we need to include syscall.h, not sys/syscall.h, so just disable */
		373	# undef EV_USE_CLOCK_SYSCALL
		374	# define EV_USE_CLOCK_SYSCALL 0
		375	#endif
		376
		377	/* aix's poll.h seems to cause lots of trouble */
		378	#ifdef _AIX
		379	/* AIX has a completely broken poll.h header */
		380	# undef EV_USE_POLL
		381	# define EV_USE_POLL 0
		382	#endif
		383
350	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */	384	/* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */
351	/* which makes programs even slower. might work on other unices, too. */	385	/* which makes programs even slower. might work on other unices, too. */
352	#if EV_USE_CLOCK_SYSCALL	386	#if EV_USE_CLOCK_SYSCALL
353	# include <syscall.h>	387	# include <sys/syscall.h>
354	# ifdef SYS_clock_gettime	388	# ifdef SYS_clock_gettime
355	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))	389	# define clock_gettime(id, ts) syscall (SYS_clock_gettime, (id), (ts))
356	# undef EV_USE_MONOTONIC	390	# undef EV_USE_MONOTONIC
357	# define EV_USE_MONOTONIC 1	391	# define EV_USE_MONOTONIC 1
358	# else	392	# else
…		…
361	# endif	395	# endif
362	#endif	396	#endif
363		397
364	/* this block fixes any misconfiguration where we know we run into trouble otherwise */	398	/* this block fixes any misconfiguration where we know we run into trouble otherwise */
365		399
366	#ifdef _AIX
367	/* AIX has a completely broken poll.h header */
368	# undef EV_USE_POLL
369	# define EV_USE_POLL 0
370	#endif
371
372	#ifndef CLOCK_MONOTONIC	400	#ifndef CLOCK_MONOTONIC
373	# undef EV_USE_MONOTONIC	401	# undef EV_USE_MONOTONIC
374	# define EV_USE_MONOTONIC 0	402	# define EV_USE_MONOTONIC 0
375	#endif	403	#endif
376		404
…		…
384	# define EV_USE_INOTIFY 0	412	# define EV_USE_INOTIFY 0
385	#endif	413	#endif
386		414
387	#if !EV_USE_NANOSLEEP	415	#if !EV_USE_NANOSLEEP
388	/* hp-ux has it in sys/time.h, which we unconditionally include above */	416	/* hp-ux has it in sys/time.h, which we unconditionally include above */
389	# if !defined(_WIN32) && !defined(__hpux)	417	# if !defined _WIN32 && !defined __hpux
390	# include <sys/select.h>	418	# include <sys/select.h>
391	# endif	419	# endif
392	#endif	420	#endif
393		421
394	#if EV_USE_INOTIFY	422	#if EV_USE_INOTIFY
…		…
397	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */	425	/* some very old inotify.h headers don't have IN_DONT_FOLLOW */
398	# ifndef IN_DONT_FOLLOW	426	# ifndef IN_DONT_FOLLOW
399	# undef EV_USE_INOTIFY	427	# undef EV_USE_INOTIFY
400	# define EV_USE_INOTIFY 0	428	# define EV_USE_INOTIFY 0
401	# endif	429	# endif
402	#endif
403
404	#if EV_SELECT_IS_WINSOCKET
405	# include <winsock.h>
406	#endif	430	#endif
407		431
408	#if EV_USE_EVENTFD	432	#if EV_USE_EVENTFD
409	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */	433	/* our minimum requirement is glibc 2.7 which has the stub, but not the header */
410	# include <stdint.h>	434	# include <stdint.h>
…		…
467	/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */	491	/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */
468	/* ECB.H BEGIN */	492	/* ECB.H BEGIN */
469	/*	493	/*
470	* libecb - http://software.schmorp.de/pkg/libecb	494	* libecb - http://software.schmorp.de/pkg/libecb
471	*	495	*
472	* Copyright (©) 2009-2011 Marc Alexander Lehmann <libecb@schmorp.de>	496	* Copyright (©) 2009-2015 Marc Alexander Lehmann <libecb@schmorp.de>
473	* Copyright (©) 2011 Emanuele Giaquinta	497	* Copyright (©) 2011 Emanuele Giaquinta
474	* All rights reserved.	498	* All rights reserved.
475	*	499	*
476	* Redistribution and use in source and binary forms, with or without modifica-	500	* Redistribution and use in source and binary forms, with or without modifica-
477	* tion, are permitted provided that the following conditions are met:	501	* tion, are permitted provided that the following conditions are met:
…		…
491	* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;	515	* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
492	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,	516	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
493	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-	517	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-
494	* ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED	518	* ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
495	* OF THE POSSIBILITY OF SUCH DAMAGE.	519	* OF THE POSSIBILITY OF SUCH DAMAGE.
		520	*
		521	* Alternatively, the contents of this file may be used under the terms of
		522	* the GNU General Public License ("GPL") version 2 or any later version,
		523	* in which case the provisions of the GPL are applicable instead of
		524	* the above. If you wish to allow the use of your version of this file
		525	* only under the terms of the GPL and not to allow others to use your
		526	* version of this file under the BSD license, indicate your decision
		527	* by deleting the provisions above and replace them with the notice
		528	* and other provisions required by the GPL. If you do not delete the
		529	* provisions above, a recipient may use your version of this file under
		530	* either the BSD or the GPL.
496	*/	531	*/
497		532
498	#ifndef ECB_H	533	#ifndef ECB_H
499	#define ECB_H	534	#define ECB_H
		535
		536	/* 16 bits major, 16 bits minor */
		537	#define ECB_VERSION 0x00010005
500		538
501	#ifdef _WIN32	539	#ifdef _WIN32
502	typedef signed char int8_t;	540	typedef signed char int8_t;
503	typedef unsigned char uint8_t;	541	typedef unsigned char uint8_t;
504	typedef signed short int16_t;	542	typedef signed short int16_t;
…		…
510	typedef unsigned long long uint64_t;	548	typedef unsigned long long uint64_t;
511	#else /* _MSC_VER || __BORLANDC__ */	549	#else /* _MSC_VER || __BORLANDC__ */
512	typedef signed __int64 int64_t;	550	typedef signed __int64 int64_t;
513	typedef unsigned __int64 uint64_t;	551	typedef unsigned __int64 uint64_t;
514	#endif	552	#endif
		553	#ifdef _WIN64
		554	#define ECB_PTRSIZE 8
		555	typedef uint64_t uintptr_t;
		556	typedef int64_t intptr_t;
		557	#else
		558	#define ECB_PTRSIZE 4
		559	typedef uint32_t uintptr_t;
		560	typedef int32_t intptr_t;
		561	#endif
515	#else	562	#else
516	#include <inttypes.h>	563	#include <inttypes.h>
		564	#if (defined INTPTR_MAX ? INTPTR_MAX : ULONG_MAX) > 0xffffffffU
		565	#define ECB_PTRSIZE 8
		566	#else
		567	#define ECB_PTRSIZE 4
		568	#endif
		569	#endif
		570
		571	#define ECB_GCC_AMD64 (__amd64 || __amd64__ || __x86_64 || __x86_64__)
		572	#define ECB_MSVC_AMD64 (_M_AMD64 || _M_X64)
		573
		574	/* work around x32 idiocy by defining proper macros */
		575	#if ECB_GCC_AMD64 || ECB_MSVC_AMD64
		576	#if _ILP32
		577	#define ECB_AMD64_X32 1
		578	#else
		579	#define ECB_AMD64 1
		580	#endif
517	#endif	581	#endif
518		582
519	/* many compilers define _GNUC_ to some versions but then only implement	583	/* many compilers define _GNUC_ to some versions but then only implement
520	* what their idiot authors think are the "more important" extensions,	584	* what their idiot authors think are the "more important" extensions,
521	* causing enormous grief in return for some better fake benchmark numbers.	585	* causing enormous grief in return for some better fake benchmark numbers.
522	* or so.	586	* or so.
523	* we try to detect these and simply assume they are not gcc - if they have	587	* we try to detect these and simply assume they are not gcc - if they have
524	* an issue with that they should have done it right in the first place.	588	* an issue with that they should have done it right in the first place.
525	*/	589	*/
526	#ifndef ECB_GCC_VERSION
527	#if !defined(__GNUC_MINOR__) || defined(__INTEL_COMPILER) || defined(__SUNPRO_C) || defined(__SUNPRO_CC) || defined(__llvm__) || defined(__clang__)	590	#if !defined __GNUC_MINOR__ || defined __INTEL_COMPILER || defined __SUNPRO_C || defined __SUNPRO_CC || defined __llvm__ || defined __clang__
528	#define ECB_GCC_VERSION(major,minor) 0	591	#define ECB_GCC_VERSION(major,minor) 0
529	#else	592	#else
530	#define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))	593	#define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))
531	#endif	594	#endif
		595
		596	#define ECB_CLANG_VERSION(major,minor) (__clang_major__ > (major) || (__clang_major__ == (major) && __clang_minor__ >= (minor)))
		597
		598	#if __clang__ && defined __has_builtin
		599	#define ECB_CLANG_BUILTIN(x) __has_builtin (x)
		600	#else
		601	#define ECB_CLANG_BUILTIN(x) 0
		602	#endif
		603
		604	#if __clang__ && defined __has_extension
		605	#define ECB_CLANG_EXTENSION(x) __has_extension (x)
		606	#else
		607	#define ECB_CLANG_EXTENSION(x) 0
		608	#endif
		609
		610	#define ECB_CPP (__cplusplus+0)
		611	#define ECB_CPP11 (__cplusplus >= 201103L)
		612
		613	#if ECB_CPP
		614	#define ECB_C 0
		615	#define ECB_STDC_VERSION 0
		616	#else
		617	#define ECB_C 1
		618	#define ECB_STDC_VERSION __STDC_VERSION__
		619	#endif
		620
		621	#define ECB_C99 (ECB_STDC_VERSION >= 199901L)
		622	#define ECB_C11 (ECB_STDC_VERSION >= 201112L)
		623
		624	#if ECB_CPP
		625	#define ECB_EXTERN_C extern "C"
		626	#define ECB_EXTERN_C_BEG ECB_EXTERN_C {
		627	#define ECB_EXTERN_C_END }
		628	#else
		629	#define ECB_EXTERN_C extern
		630	#define ECB_EXTERN_C_BEG
		631	#define ECB_EXTERN_C_END
532	#endif	632	#endif
533		633
534	/*****************************************************************************/	634	/*****************************************************************************/
535		635
536	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */	636	/* ECB_NO_THREADS - ecb is not used by multiple threads, ever */
537	/* ECB_NO_SMP - ecb might be used in multiple threads, but only on a single cpu */	637	/* ECB_NO_SMP - ecb might be used in multiple threads, but only on a single cpu */
538		638
539	#if ECB_NO_THREADS || ECB_NO_SMP	639	#if ECB_NO_THREADS
		640	#define ECB_NO_SMP 1
		641	#endif
		642
		643	#if ECB_NO_SMP
540	#define ECB_MEMORY_FENCE do { } while (0)	644	#define ECB_MEMORY_FENCE do { } while (0)
541	#endif	645	#endif
542		646
		647	/* http://www-01.ibm.com/support/knowledgecenter/SSGH3R_13.1.0/com.ibm.xlcpp131.aix.doc/compiler_ref/compiler_builtins.html */
		648	#if __xlC__ && ECB_CPP
		649	#include <builtins.h>
		650	#endif
		651
		652	#if 1400 <= _MSC_VER
		653	#include <intrin.h> /* fence functions _ReadBarrier, also bit search functions _BitScanReverse */
		654	#endif
		655
543	#ifndef ECB_MEMORY_FENCE	656	#ifndef ECB_MEMORY_FENCE
544	#if ECB_GCC_VERSION(2,5) || defined(__INTEL_COMPILER) || defined(__clang__)	657	#if ECB_GCC_VERSION(2,5) || defined __INTEL_COMPILER || (__llvm__ && __GNUC__) || __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
545	#if __i386__	658	#if __i386 || __i386__
546	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory")	659	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("lock; orb $0, -1(%%esp)" : : : "memory")
547	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE /* non-lock xchg might be enough */	660	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
548	#define ECB_MEMORY_FENCE_RELEASE do { } while (0) /* unlikely to change in future cpus */	661	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
549	#elif __amd64	662	#elif ECB_GCC_AMD64
550	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")	663	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mfence" : : : "memory")
551	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("lfence" : : : "memory")	664	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("" : : : "memory")
552	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("sfence") /* play safe - not needed in any current cpu */	665	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
553	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__	666	#elif __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__
554	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory")	667	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory")
		668	#elif defined __ARM_ARCH_2__ \
		669	|| defined __ARM_ARCH_3__ || defined __ARM_ARCH_3M__ \
		670	|| defined __ARM_ARCH_4__ || defined __ARM_ARCH_4T__ \
		671	|| defined __ARM_ARCH_5__ || defined __ARM_ARCH_5E__ \
		672	|| defined __ARM_ARCH_5T__ || defined __ARM_ARCH_5TE__ \
		673	|| defined __ARM_ARCH_5TEJ__
		674	/* should not need any, unless running old code on newer cpu - arm doesn't support that */
555	#elif defined(__ARM_ARCH_6__ ) || defined(__ARM_ARCH_6J__ ) \	675	#elif defined __ARM_ARCH_6__ || defined __ARM_ARCH_6J__ \
556	|| defined(__ARM_ARCH_6K__) || defined(__ARM_ARCH_6ZK__)	676	|| defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ \
		677	|| defined __ARM_ARCH_6T2__
557	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory")	678	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory")
558	#elif defined(__ARM_ARCH_7__ ) || defined(__ARM_ARCH_7A__ ) \	679	#elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \
559	|| defined(__ARM_ARCH_7M__) || defined(__ARM_ARCH_7R__ )	680	|| defined __ARM_ARCH_7R__ || defined __ARM_ARCH_7M__
560	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")	681	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")
		682	#elif __aarch64__
		683	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb ish" : : : "memory")
		684	#elif (__sparc || __sparc__) && !(__sparc_v8__ || defined __sparcv8)
		685	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory")
		686	#define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")
		687	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")
		688	#elif defined __s390__ || defined __s390x__
		689	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")
		690	#elif defined __mips__
		691	/* GNU/Linux emulates sync on mips1 architectures, so we force its use */
		692	/* anybody else who still uses mips1 is supposed to send in their version, with detection code. */
		693	#define ECB_MEMORY_FENCE __asm__ __volatile__ (".set mips2; sync; .set mips0" : : : "memory")
		694	#elif defined __alpha__
		695	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory")
		696	#elif defined __hppa__
		697	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
		698	#define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("")
		699	#elif defined __ia64__
		700	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("mf" : : : "memory")
		701	#elif defined __m68k__
		702	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
		703	#elif defined __m88k__
		704	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("tb1 0,%%r0,128" : : : "memory")
		705	#elif defined __sh__
		706	#define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory")
561	#endif	707	#endif
562	#endif	708	#endif
563	#endif	709	#endif
564		710
565	#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
566	#if ECB_GCC_VERSION(4,4) || defined(__INTEL_COMPILER) || defined(__clang__)	724	#elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__
567	#define ECB_MEMORY_FENCE __sync_synchronize ()	725	#define ECB_MEMORY_FENCE __sync_synchronize ()
568	/*#define ECB_MEMORY_FENCE_ACQUIRE ({ char dummy = 0; __sync_lock_test_and_set (&dummy, 1); }) */	726	#elif _MSC_VER >= 1500 /* VC++ 2008 */
569	/*#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()
570	#elif _MSC_VER >= 1400 /* VC++ 2005 */	732	#elif _MSC_VER >= 1400 /* VC++ 2005 */
571	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)	733	#pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
572	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()	734	#define ECB_MEMORY_FENCE _ReadWriteBarrier ()
573	#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 */
574	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()	736	#define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()
575	#elif defined(_WIN32)	737	#elif defined _WIN32
576	#include <WinNT.h>	738	#include <WinNT.h>
577	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */	739	#define ECB_MEMORY_FENCE MemoryBarrier () /* actually just xchg on x86... scary */
		740	#elif __SUNPRO_C >= 0x5110 || __SUNPRO_CC >= 0x5110
		741	#include <mbarrier.h>
		742	#define ECB_MEMORY_FENCE __machine_rw_barrier ()
		743	#define ECB_MEMORY_FENCE_ACQUIRE __machine_r_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)
578	#endif	764	#endif
579	#endif	765	#endif
580		766
581	#ifndef ECB_MEMORY_FENCE	767	#ifndef ECB_MEMORY_FENCE
582	#if !ECB_AVOID_PTHREADS	768	#if !ECB_AVOID_PTHREADS
…		…
594	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;	780	static pthread_mutex_t ecb_mf_lock = PTHREAD_MUTEX_INITIALIZER;
595	#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)
596	#endif	782	#endif
597	#endif	783	#endif
598		784
599	#if !defined(ECB_MEMORY_FENCE_ACQUIRE) && defined(ECB_MEMORY_FENCE)	785	#if !defined ECB_MEMORY_FENCE_ACQUIRE && defined ECB_MEMORY_FENCE
600	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE	786	#define ECB_MEMORY_FENCE_ACQUIRE ECB_MEMORY_FENCE
601	#endif	787	#endif
602		788
603	#if !defined(ECB_MEMORY_FENCE_RELEASE) && defined(ECB_MEMORY_FENCE)	789	#if !defined ECB_MEMORY_FENCE_RELEASE && defined ECB_MEMORY_FENCE
604	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE	790	#define ECB_MEMORY_FENCE_RELEASE ECB_MEMORY_FENCE
605	#endif	791	#endif
606		792
607	/*****************************************************************************/	793	/*****************************************************************************/
608		794
609	#define ECB_C99 (__STDC_VERSION__ >= 199901L)	795	#if ECB_CPP
610
611	#if __cplusplus
612	#define ecb_inline static inline	796	#define ecb_inline static inline
613	#elif ECB_GCC_VERSION(2,5)	797	#elif ECB_GCC_VERSION(2,5)
614	#define ecb_inline static __inline__	798	#define ecb_inline static __inline__
615	#elif ECB_C99	799	#elif ECB_C99
616	#define ecb_inline static inline	800	#define ecb_inline static inline
…		…
630		814
631	#define ECB_CONCAT_(a, b) a ## b	815	#define ECB_CONCAT_(a, b) a ## b
632	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)	816	#define ECB_CONCAT(a, b) ECB_CONCAT_(a, b)
633	#define ECB_STRINGIFY_(a) # a	817	#define ECB_STRINGIFY_(a) # a
634	#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))
635		820
636	#define ecb_function_ ecb_inline	821	#define ecb_function_ ecb_inline
637		822
638	#if ECB_GCC_VERSION(3,1)	823	#if ECB_GCC_VERSION(3,1) || ECB_CLANG_VERSION(2,8)
639	#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)
640	#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)
641	#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)
642	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)	846	#define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
643	#else	847	#else
644	#define ecb_attribute(attrlist)
645	#define ecb_is_constant(expr) 0
646	#define ecb_expect(expr,value) (expr)
647	#define ecb_prefetch(addr,rw,locality)	848	#define ecb_prefetch(addr,rw,locality)
648	#endif	849	#endif
649		850
650	/* no emulation for ecb_decltype */	851	/* no emulation for ecb_decltype */
651	#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; };
652	#define ecb_decltype(x) __decltype(x)	855	#define ecb_decltype(x) ecb_decltype_t<decltype (x)>::type
653	#elif ECB_GCC_VERSION(3,0)	856	#elif ECB_GCC_VERSION(3,0) || ECB_CLANG_VERSION(2,8)
654	#define ecb_decltype(x) __typeof(x)	857	#define ecb_decltype(x) __typeof__ (x)
655	#endif	858	#endif
656		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
657	#define ecb_noinline ecb_attribute ((__noinline__))	877	#define ecb_noinline ecb_attribute ((__noinline__))
658	#define ecb_noreturn ecb_attribute ((__noreturn__))	878	#endif
		879
659	#define ecb_unused ecb_attribute ((__unused__))	880	#define ecb_unused ecb_attribute ((__unused__))
660	#define ecb_const ecb_attribute ((__const__))	881	#define ecb_const ecb_attribute ((__const__))
661	#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
662		895
663	#if ECB_GCC_VERSION(4,3)	896	#if ECB_GCC_VERSION(4,3)
664	#define ecb_artificial ecb_attribute ((__artificial__))	897	#define ecb_artificial ecb_attribute ((__artificial__))
665	#define ecb_hot ecb_attribute ((__hot__))	898	#define ecb_hot ecb_attribute ((__hot__))
666	#define ecb_cold ecb_attribute ((__cold__))	899	#define ecb_cold ecb_attribute ((__cold__))
…		…
678	/* for compatibility to the rest of the world */	911	/* for compatibility to the rest of the world */
679	#define ecb_likely(expr) ecb_expect_true (expr)	912	#define ecb_likely(expr) ecb_expect_true (expr)
680	#define ecb_unlikely(expr) ecb_expect_false (expr)	913	#define ecb_unlikely(expr) ecb_expect_false (expr)
681		914
682	/* count trailing zero bits and count # of one bits */	915	/* count trailing zero bits and count # of one bits */
683	#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))
684	/* 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 */
685	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)	921	#define ecb_ld32(x) (__builtin_clz (x) ^ 31)
686	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)	922	#define ecb_ld64(x) (__builtin_clzll (x) ^ 63)
687	#define ecb_ctz32(x) __builtin_ctz (x)	923	#define ecb_ctz32(x) __builtin_ctz (x)
688	#define ecb_ctz64(x) __builtin_ctzll (x)	924	#define ecb_ctz64(x) __builtin_ctzll (x)
689	#define ecb_popcount32(x) __builtin_popcount (x)	925	#define ecb_popcount32(x) __builtin_popcount (x)
690	/* no popcountll */	926	/* no popcountll */
691	#else	927	#else
692	ecb_function_ int ecb_ctz32 (uint32_t x) ecb_const;	928	ecb_function_ ecb_const int ecb_ctz32 (uint32_t x);
693	ecb_function_ int	929	ecb_function_ ecb_const int
694	ecb_ctz32 (uint32_t x)	930	ecb_ctz32 (uint32_t x)
695	{	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
696	int r = 0;	937	int r = 0;
697		938
698	x &= ~x + 1; /* this isolates the lowest bit */	939	x &= ~x + 1; /* this isolates the lowest bit */
699		940
700	#if ECB_branchless_on_i386	941	#if ECB_branchless_on_i386
…		…
710	if (x & 0xff00ff00) r += 8;	951	if (x & 0xff00ff00) r += 8;
711	if (x & 0xffff0000) r += 16;	952	if (x & 0xffff0000) r += 16;
712	#endif	953	#endif
713		954
714	return r;	955	return r;
		956	#endif
715	}	957	}
716		958
717	ecb_function_ int ecb_ctz64 (uint64_t x) ecb_const;	959	ecb_function_ ecb_const int ecb_ctz64 (uint64_t x);
718	ecb_function_ int	960	ecb_function_ ecb_const int
719	ecb_ctz64 (uint64_t x)	961	ecb_ctz64 (uint64_t x)
720	{	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
721	int shift = x & 0xffffffffU ? 0 : 32;	968	int shift = x & 0xffffffff ? 0 : 32;
722	return ecb_ctz32 (x >> shift) + shift;	969	return ecb_ctz32 (x >> shift) + shift;
		970	#endif
723	}	971	}
724		972
725	ecb_function_ int ecb_popcount32 (uint32_t x) ecb_const;	973	ecb_function_ ecb_const int ecb_popcount32 (uint32_t x);
726	ecb_function_ int	974	ecb_function_ ecb_const int
727	ecb_popcount32 (uint32_t x)	975	ecb_popcount32 (uint32_t x)
728	{	976	{
729	x -= (x >> 1) & 0x55555555;	977	x -= (x >> 1) & 0x55555555;
730	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);	978	x = ((x >> 2) & 0x33333333) + (x & 0x33333333);
731	x = ((x >> 4) + x) & 0x0f0f0f0f;	979	x = ((x >> 4) + x) & 0x0f0f0f0f;
732	x *= 0x01010101;	980	x *= 0x01010101;
733		981
734	return x >> 24;	982	return x >> 24;
735	}	983	}
736		984
737	ecb_function_ int ecb_ld32 (uint32_t x) ecb_const;	985	ecb_function_ ecb_const int ecb_ld32 (uint32_t x);
738	ecb_function_ int ecb_ld32 (uint32_t x)	986	ecb_function_ ecb_const int ecb_ld32 (uint32_t x)
739	{	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
740	int r = 0;	993	int r = 0;
741		994
742	if (x >> 16) { x >>= 16; r += 16; }	995	if (x >> 16) { x >>= 16; r += 16; }
743	if (x >> 8) { x >>= 8; r += 8; }	996	if (x >> 8) { x >>= 8; r += 8; }
744	if (x >> 4) { x >>= 4; r += 4; }	997	if (x >> 4) { x >>= 4; r += 4; }
745	if (x >> 2) { x >>= 2; r += 2; }	998	if (x >> 2) { x >>= 2; r += 2; }
746	if (x >> 1) { r += 1; }	999	if (x >> 1) { r += 1; }
747		1000
748	return r;	1001	return r;
		1002	#endif
749	}	1003	}
750		1004
751	ecb_function_ int ecb_ld64 (uint64_t x) ecb_const;	1005	ecb_function_ ecb_const int ecb_ld64 (uint64_t x);
752	ecb_function_ int ecb_ld64 (uint64_t x)	1006	ecb_function_ ecb_const int ecb_ld64 (uint64_t x)
753	{	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
754	int r = 0;	1013	int r = 0;
755		1014
756	if (x >> 32) { x >>= 32; r += 32; }	1015	if (x >> 32) { x >>= 32; r += 32; }
757		1016
758	return r + ecb_ld32 (x);	1017	return r + ecb_ld32 (x);
		1018	#endif
759	}	1019	}
760	#endif	1020	#endif
		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
		1027	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x);
		1028	ecb_function_ ecb_const uint8_t ecb_bitrev8 (uint8_t x)
		1029	{
		1030	return ( (x * 0x0802U & 0x22110U)
		1031	| (x * 0x8020U & 0x88440U)) * 0x10101U >> 16;
		1032	}
		1033
		1034	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x);
		1035	ecb_function_ ecb_const uint16_t ecb_bitrev16 (uint16_t x)
		1036	{
		1037	x = ((x >> 1) & 0x5555) | ((x & 0x5555) << 1);
		1038	x = ((x >> 2) & 0x3333) | ((x & 0x3333) << 2);
		1039	x = ((x >> 4) & 0x0f0f) | ((x & 0x0f0f) << 4);
		1040	x = ( x >> 8 ) | ( x << 8);
		1041
		1042	return x;
		1043	}
		1044
		1045	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x);
		1046	ecb_function_ ecb_const uint32_t ecb_bitrev32 (uint32_t x)
		1047	{
		1048	x = ((x >> 1) & 0x55555555) | ((x & 0x55555555) << 1);
		1049	x = ((x >> 2) & 0x33333333) | ((x & 0x33333333) << 2);
		1050	x = ((x >> 4) & 0x0f0f0f0f) | ((x & 0x0f0f0f0f) << 4);
		1051	x = ((x >> 8) & 0x00ff00ff) | ((x & 0x00ff00ff) << 8);
		1052	x = ( x >> 16 ) | ( x << 16);
		1053
		1054	return x;
		1055	}
761		1056
762	/* popcount64 is only available on 64 bit cpus as gcc builtin */	1057	/* popcount64 is only available on 64 bit cpus as gcc builtin */
763	/* so for this version we are lazy */	1058	/* so for this version we are lazy */
764	ecb_function_ int ecb_popcount64 (uint64_t x) ecb_const;	1059	ecb_function_ ecb_const int ecb_popcount64 (uint64_t x);
765	ecb_function_ int	1060	ecb_function_ ecb_const int
766	ecb_popcount64 (uint64_t x)	1061	ecb_popcount64 (uint64_t x)
767	{	1062	{
768	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);	1063	return ecb_popcount32 (x) + ecb_popcount32 (x >> 32);
769	}	1064	}
770		1065
771	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);
772	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);
773	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);
774	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);
775	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);
776	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);
777	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);
778	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);
779		1074
780	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); }
781	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); }
782	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); }
783	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); }
784	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); }
785	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); }
786	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); }
787	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); }
788		1083
789	#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
790	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)	1088	#define ecb_bswap16(x) (__builtin_bswap32 (x) >> 16)
		1089	#endif
791	#define ecb_bswap32(x) __builtin_bswap32 (x)	1090	#define ecb_bswap32(x) __builtin_bswap32 (x)
792	#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)))
793	#else	1097	#else
794	ecb_function_ uint16_t ecb_bswap16 (uint16_t x) ecb_const;	1098	ecb_function_ ecb_const uint16_t ecb_bswap16 (uint16_t x);
795	ecb_function_ uint16_t	1099	ecb_function_ ecb_const uint16_t
796	ecb_bswap16 (uint16_t x)	1100	ecb_bswap16 (uint16_t x)
797	{	1101	{
798	return ecb_rotl16 (x, 8);	1102	return ecb_rotl16 (x, 8);
799	}	1103	}
800		1104
801	ecb_function_ uint32_t ecb_bswap32 (uint32_t x) ecb_const;	1105	ecb_function_ ecb_const uint32_t ecb_bswap32 (uint32_t x);
802	ecb_function_ uint32_t	1106	ecb_function_ ecb_const uint32_t
803	ecb_bswap32 (uint32_t x)	1107	ecb_bswap32 (uint32_t x)
804	{	1108	{
805	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);	1109	return (((uint32_t)ecb_bswap16 (x)) << 16) | ecb_bswap16 (x >> 16);
806	}	1110	}
807		1111
808	ecb_function_ uint64_t ecb_bswap64 (uint64_t x) ecb_const;	1112	ecb_function_ ecb_const uint64_t ecb_bswap64 (uint64_t x);
809	ecb_function_ uint64_t	1113	ecb_function_ ecb_const uint64_t
810	ecb_bswap64 (uint64_t x)	1114	ecb_bswap64 (uint64_t x)
811	{	1115	{
812	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);	1116	return (((uint64_t)ecb_bswap32 (x)) << 32) | ecb_bswap32 (x >> 32);
813	}	1117	}
814	#endif	1118	#endif
815		1119
816	#if ECB_GCC_VERSION(4,5)	1120	#if ECB_GCC_VERSION(4,5) || ECB_CLANG_BUILTIN(__builtin_unreachable)
817	#define ecb_unreachable() __builtin_unreachable ()	1121	#define ecb_unreachable() __builtin_unreachable ()
818	#else	1122	#else
819	/* 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 :/ */
820	ecb_function_ void ecb_unreachable (void) ecb_noreturn;	1124	ecb_inline ecb_noreturn void ecb_unreachable (void);
821	ecb_function_ void ecb_unreachable (void) { }	1125	ecb_inline ecb_noreturn void ecb_unreachable (void) { }
822	#endif	1126	#endif
823		1127
824	/* try to tell the compiler that some condition is definitely true */	1128	/* try to tell the compiler that some condition is definitely true */
825	#define ecb_assume(cond) do { if (!(cond)) ecb_unreachable (); } while (0)	1129	#define ecb_assume(cond) if (!(cond)) ecb_unreachable (); else 0
826		1130
827	ecb_function_ unsigned char ecb_byteorder_helper (void) ecb_const;	1131	ecb_inline ecb_const uint32_t ecb_byteorder_helper (void);
828	ecb_function_ unsigned char	1132	ecb_inline ecb_const uint32_t
829	ecb_byteorder_helper (void)	1133	ecb_byteorder_helper (void)
830	{	1134	{
831	const uint32_t u = 0x11223344;	1135	/* the union code still generates code under pressure in gcc, */
832	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
833	}	1157	}
834		1158
835	ecb_function_ ecb_bool ecb_big_endian (void) ecb_const;	1159	ecb_inline ecb_const ecb_bool ecb_big_endian (void);
836	ecb_function_ 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; }
837	ecb_function_ ecb_bool ecb_little_endian (void) ecb_const;	1161	ecb_inline ecb_const ecb_bool ecb_little_endian (void);
838	ecb_function_ 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; }
839		1163
840	#if ECB_GCC_VERSION(3,0) || ECB_C99	1164	#if ECB_GCC_VERSION(3,0) || ECB_C99
841	#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))
842	#else	1166	#else
843	#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)))
844	#endif	1168	#endif
845		1169
846	#if __cplusplus	1170	#if ECB_CPP
847	template<typename T>	1171	template<typename T>
848	static inline T ecb_div_rd (T val, T div)	1172	static inline T ecb_div_rd (T val, T div)
849	{	1173	{
850	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;	1174	return val < 0 ? - ((-val + div - 1) / div) : (val ) / div;
851	}	1175	}
…		…
868	}	1192	}
869	#else	1193	#else
870	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))	1194	#define ecb_array_length(name) (sizeof (name) / sizeof (name [0]))
871	#endif	1195	#endif
872		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
873	#endif	1502	#endif
874		1503
875	/* ECB.H END */	1504	/* ECB.H END */
876		1505
877	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS	1506	#if ECB_MEMORY_FENCE_NEEDS_PTHREADS
878	/* if your architecture doesn't need memory fences, e.g. because it is	1507	/* if your architecture doesn't need memory fences, e.g. because it is
879	* single-cpu/core, or if you use libev in a project that doesn't use libev	1508	* single-cpu/core, or if you use libev in a project that doesn't use libev
880	* from multiple threads, then you can define ECB_AVOID_PTHREADS when compiling	1509	* from multiple threads, then you can define ECB_AVOID_PTHREADS when compiling
881	* libev, in which casess the memory fences become nops.	1510	* libev, in which cases the memory fences become nops.
882	* alternatively, you can remove this #error and link against libpthread,	1511	* alternatively, you can remove this #error and link against libpthread,
883	* which will then provide the memory fences.	1512	* which will then provide the memory fences.
884	*/	1513	*/
885	# error "memory fences not defined for your architecture, please report"	1514	# error "memory fences not defined for your architecture, please report"
886	#endif	1515	#endif
…		…
1043	{	1672	{
1044	write (STDERR_FILENO, msg, strlen (msg));	1673	write (STDERR_FILENO, msg, strlen (msg));
1045	}	1674	}
1046	#endif	1675	#endif
1047		1676
1048	static void (*syserr_cb)(const char *msg);	1677	static void (*syserr_cb)(const char *msg) EV_THROW;
1049		1678
1050	void ecb_cold	1679	void ecb_cold
1051	ev_set_syserr_cb (void (*cb)(const char *msg))	1680	ev_set_syserr_cb (void (*cb)(const char *msg) EV_THROW) EV_THROW
1052	{	1681	{
1053	syserr_cb = cb;	1682	syserr_cb = cb;
1054	}	1683	}
1055		1684
1056	static void noinline ecb_cold	1685	static void noinline ecb_cold
…		…
1074	abort ();	1703	abort ();
1075	}	1704	}
1076	}	1705	}
1077		1706
1078	static void *	1707	static void *
1079	ev_realloc_emul (void *ptr, long size)	1708	ev_realloc_emul (void *ptr, long size) EV_THROW
1080	{	1709	{
1081	#if __GLIBC__
1082	return realloc (ptr, size);
1083	#else
1084	/* some systems, notably openbsd and darwin, fail to properly	1710	/* some systems, notably openbsd and darwin, fail to properly
1085	* 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
1086	* 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.
1087	*/	1715	*/
1088		1716
1089	if (size)	1717	if (size)
1090	return realloc (ptr, size);	1718	return realloc (ptr, size);
1091		1719
1092	free (ptr);	1720	free (ptr);
1093	return 0;	1721	return 0;
1094	#endif
1095	}	1722	}
1096		1723
1097	static void *(*alloc)(void *ptr, long size) = ev_realloc_emul;	1724	static void *(*alloc)(void *ptr, long size) EV_THROW = ev_realloc_emul;
1098		1725
1099	void ecb_cold	1726	void ecb_cold
1100	ev_set_allocator (void *(*cb)(void *ptr, long size))	1727	ev_set_allocator (void *(*cb)(void *ptr, long size) EV_THROW) EV_THROW
1101	{	1728	{
1102	alloc = cb;	1729	alloc = cb;
1103	}	1730	}
1104		1731
1105	inline_speed void *	1732	inline_speed void *
…		…
1193	#undef VAR	1820	#undef VAR
1194	};	1821	};
1195	#include "ev_wrap.h"	1822	#include "ev_wrap.h"
1196		1823
1197	static struct ev_loop default_loop_struct;	1824	static struct ev_loop default_loop_struct;
1198	struct ev_loop *ev_default_loop_ptr;	1825	EV_API_DECL struct ev_loop *ev_default_loop_ptr = 0; /* needs to be initialised to make it a definition despite extern */
1199		1826
1200	#else	1827	#else
1201		1828
1202	ev_tstamp ev_rt_now;	1829	EV_API_DECL ev_tstamp ev_rt_now = 0; /* needs to be initialised to make it a definition despite extern */
1203	#define VAR(name,decl) static decl;	1830	#define VAR(name,decl) static decl;
1204	#include "ev_vars.h"	1831	#include "ev_vars.h"
1205	#undef VAR	1832	#undef VAR
1206		1833
1207	static int ev_default_loop_ptr;	1834	static int ev_default_loop_ptr;
…		…
1222		1849
1223	/*****************************************************************************/	1850	/*****************************************************************************/
1224		1851
1225	#ifndef EV_HAVE_EV_TIME	1852	#ifndef EV_HAVE_EV_TIME
1226	ev_tstamp	1853	ev_tstamp
1227	ev_time (void)	1854	ev_time (void) EV_THROW
1228	{	1855	{
1229	#if EV_USE_REALTIME	1856	#if EV_USE_REALTIME
1230	if (expect_true (have_realtime))	1857	if (expect_true (have_realtime))
1231	{	1858	{
1232	struct timespec ts;	1859	struct timespec ts;
…		…
1256	return ev_time ();	1883	return ev_time ();
1257	}	1884	}
1258		1885
1259	#if EV_MULTIPLICITY	1886	#if EV_MULTIPLICITY
1260	ev_tstamp	1887	ev_tstamp
1261	ev_now (EV_P)	1888	ev_now (EV_P) EV_THROW
1262	{	1889	{
1263	return ev_rt_now;	1890	return ev_rt_now;
1264	}	1891	}
1265	#endif	1892	#endif
1266		1893
1267	void	1894	void
1268	ev_sleep (ev_tstamp delay)	1895	ev_sleep (ev_tstamp delay) EV_THROW
1269	{	1896	{
1270	if (delay > 0.)	1897	if (delay > 0.)
1271	{	1898	{
1272	#if EV_USE_NANOSLEEP	1899	#if EV_USE_NANOSLEEP
1273	struct timespec ts;	1900	struct timespec ts;
1274		1901
1275	EV_TS_SET (ts, delay);	1902	EV_TS_SET (ts, delay);
1276	nanosleep (&ts, 0);	1903	nanosleep (&ts, 0);
1277	#elif defined(_WIN32)	1904	#elif defined _WIN32
1278	Sleep ((unsigned long)(delay * 1e3));	1905	Sleep ((unsigned long)(delay * 1e3));
1279	#else	1906	#else
1280	struct timeval tv;	1907	struct timeval tv;
1281		1908
1282	/* 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 */
…		…
1354	pendingcb (EV_P_ ev_prepare *w, int revents)	1981	pendingcb (EV_P_ ev_prepare *w, int revents)
1355	{	1982	{
1356	}	1983	}
1357		1984
1358	void noinline	1985	void noinline
1359	ev_feed_event (EV_P_ void *w, int revents)	1986	ev_feed_event (EV_P_ void *w, int revents) EV_THROW
1360	{	1987	{
1361	W w_ = (W)w;	1988	W w_ = (W)w;
1362	int pri = ABSPRI (w_);	1989	int pri = ABSPRI (w_);
1363		1990
1364	if (expect_false (w_->pending))	1991	if (expect_false (w_->pending))
…		…
1368	w_->pending = ++pendingcnt [pri];	1995	w_->pending = ++pendingcnt [pri];
1369	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);	1996	array_needsize (ANPENDING, pendings [pri], pendingmax [pri], w_->pending, EMPTY2);
1370	pendings [pri][w_->pending - 1].w = w_;	1997	pendings [pri][w_->pending - 1].w = w_;
1371	pendings [pri][w_->pending - 1].events = revents;	1998	pendings [pri][w_->pending - 1].events = revents;
1372	}	1999	}
		2000
		2001	pendingpri = NUMPRI - 1;
1373	}	2002	}
1374		2003
1375	inline_speed void	2004	inline_speed void
1376	feed_reverse (EV_P_ W w)	2005	feed_reverse (EV_P_ W w)
1377	{	2006	{
…		…
1423	if (expect_true (!anfd->reify))	2052	if (expect_true (!anfd->reify))
1424	fd_event_nocheck (EV_A_ fd, revents);	2053	fd_event_nocheck (EV_A_ fd, revents);
1425	}	2054	}
1426		2055
1427	void	2056	void
1428	ev_feed_fd_event (EV_P_ int fd, int revents)	2057	ev_feed_fd_event (EV_P_ int fd, int revents) EV_THROW
1429	{	2058	{
1430	if (fd >= 0 && fd < anfdmax)	2059	if (fd >= 0 && fd < anfdmax)
1431	fd_event_nocheck (EV_A_ fd, revents);	2060	fd_event_nocheck (EV_A_ fd, revents);
1432	}	2061	}
1433		2062
…		…
1752	static void noinline ecb_cold	2381	static void noinline ecb_cold
1753	evpipe_init (EV_P)	2382	evpipe_init (EV_P)
1754	{	2383	{
1755	if (!ev_is_active (&pipe_w))	2384	if (!ev_is_active (&pipe_w))
1756	{	2385	{
		2386	int fds [2];
		2387
1757	# if EV_USE_EVENTFD	2388	# if EV_USE_EVENTFD
		2389	fds [0] = -1;
1758	evfd = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);	2390	fds [1] = eventfd (0, EFD_NONBLOCK | EFD_CLOEXEC);
1759	if (evfd < 0 && errno == EINVAL)	2391	if (fds [1] < 0 && errno == EINVAL)
1760	evfd = eventfd (0, 0);	2392	fds [1] = eventfd (0, 0);
1761		2393
1762	if (evfd >= 0)	2394	if (fds [1] < 0)
		2395	# endif
1763	{	2396	{
		2397	while (pipe (fds))
		2398	ev_syserr ("(libev) error creating signal/async pipe");
		2399
		2400	fd_intern (fds [0]);
		2401	}
		2402
1764	evpipe [0] = -1;	2403	evpipe [0] = fds [0];
1765	fd_intern (evfd); /* doing it twice doesn't hurt */	2404
1766	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));
1767	}	2455	}
1768	else	2456	else
1769	# endif	2457	#endif
1770	{	2458	{
1771	while (pipe (evpipe))	2459	#ifdef _WIN32
1772	ev_syserr ("(libev) error creating signal/async pipe");	2460	WSABUF buf;
1773		2461	DWORD sent;
1774	fd_intern (evpipe [0]);	2462	buf.buf = &buf;
1775	fd_intern (evpipe [1]);	2463	buf.len = 1;
1776	ev_io_set (&pipe_w, evpipe [0], EV_READ);	2464	WSASend (EV_FD_TO_WIN32_HANDLE (evpipe [1]), &buf, 1, &sent, 0, 0, 0);
1777	}	2465	#else
1778
1779	ev_io_start (EV_A_ &pipe_w);
1780	ev_unref (EV_A); /* watcher should not keep loop alive */
1781	}
1782	}
1783
1784	inline_speed void
1785	evpipe_write (EV_P_ EV_ATOMIC_T *flag)
1786	{
1787	if (expect_true (*flag))
1788	return;
1789
1790	*flag = 1;
1791
1792	ECB_MEMORY_FENCE_RELEASE; /* make sure flag is visible before the wakeup */
1793
1794	pipe_write_skipped = 1;
1795
1796	ECB_MEMORY_FENCE; /* make sure pipe_write_skipped is visible before we check pipe_write_wanted */
1797
1798	if (pipe_write_wanted)
1799	{
1800	int old_errno;
1801
1802	pipe_write_skipped = 0; /* just an optimisation, no fence needed */
1803
1804	old_errno = errno; /* save errno because write will clobber it */
1805
1806	#if EV_USE_EVENTFD
1807	if (evfd >= 0)
1808	{
1809	uint64_t counter = 1;
1810	write (evfd, &counter, sizeof (uint64_t));
1811	}
1812	else
1813	#endif
1814	{
1815	/* win32 people keep sending patches that change this write() to send() */
1816	/* and then run away. but send() is wrong, it wants a socket handle on win32 */
1817	/* so when you think this write should be a send instead, please find out */
1818	/* where your send() is from - it's definitely not the microsoft send, and */
1819	/* tell me. thank you. */
1820	write (evpipe [1], &(evpipe [1]), 1);	2466	write (evpipe [1], &(evpipe [1]), 1);
		2467	#endif
1821	}	2468	}
1822		2469
1823	errno = old_errno;	2470	errno = old_errno;
1824	}	2471	}
1825	}	2472	}
…		…
1832	int i;	2479	int i;
1833		2480
1834	if (revents & EV_READ)	2481	if (revents & EV_READ)
1835	{	2482	{
1836	#if EV_USE_EVENTFD	2483	#if EV_USE_EVENTFD
1837	if (evfd >= 0)	2484	if (evpipe [0] < 0)
1838	{	2485	{
1839	uint64_t counter;	2486	uint64_t counter;
1840	read (evfd, &counter, sizeof (uint64_t));	2487	read (evpipe [1], &counter, sizeof (uint64_t));
1841	}	2488	}
1842	else	2489	else
1843	#endif	2490	#endif
1844	{	2491	{
1845	char dummy;	2492	char dummy[4];
1846	/* 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
1847	read (evpipe [0], &dummy, 1);	2501	read (evpipe [0], &dummy, sizeof (dummy));
		2502	#endif
1848	}	2503	}
1849	}	2504	}
1850		2505
1851	pipe_write_skipped = 0;	2506	pipe_write_skipped = 0;
		2507
		2508	ECB_MEMORY_FENCE; /* push out skipped, acquire flags */
1852		2509
1853	#if EV_SIGNAL_ENABLE	2510	#if EV_SIGNAL_ENABLE
1854	if (sig_pending)	2511	if (sig_pending)
1855	{	2512	{
1856	sig_pending = 0;	2513	sig_pending = 0;
		2514
		2515	ECB_MEMORY_FENCE;
1857		2516
1858	for (i = EV_NSIG - 1; i--; )	2517	for (i = EV_NSIG - 1; i--; )
1859	if (expect_false (signals [i].pending))	2518	if (expect_false (signals [i].pending))
1860	ev_feed_signal_event (EV_A_ i + 1);	2519	ev_feed_signal_event (EV_A_ i + 1);
1861	}	2520	}
…		…
1863		2522
1864	#if EV_ASYNC_ENABLE	2523	#if EV_ASYNC_ENABLE
1865	if (async_pending)	2524	if (async_pending)
1866	{	2525	{
1867	async_pending = 0;	2526	async_pending = 0;
		2527
		2528	ECB_MEMORY_FENCE;
1868		2529
1869	for (i = asynccnt; i--; )	2530	for (i = asynccnt; i--; )
1870	if (asyncs [i]->sent)	2531	if (asyncs [i]->sent)
1871	{	2532	{
1872	asyncs [i]->sent = 0;	2533	asyncs [i]->sent = 0;
		2534	ECB_MEMORY_FENCE_RELEASE;
1873	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);	2535	ev_feed_event (EV_A_ asyncs [i], EV_ASYNC);
1874	}	2536	}
1875	}	2537	}
1876	#endif	2538	#endif
1877	}	2539	}
1878		2540
1879	/*****************************************************************************/	2541	/*****************************************************************************/
1880		2542
1881	void	2543	void
1882	ev_feed_signal (int signum)	2544	ev_feed_signal (int signum) EV_THROW
1883	{	2545	{
1884	#if EV_MULTIPLICITY	2546	#if EV_MULTIPLICITY
		2547	EV_P;
		2548	ECB_MEMORY_FENCE_ACQUIRE;
1885	EV_P = signals [signum - 1].loop;	2549	EV_A = signals [signum - 1].loop;
1886		2550
1887	if (!EV_A)	2551	if (!EV_A)
1888	return;	2552	return;
1889	#endif	2553	#endif
1890		2554
1891	if (!ev_active (&pipe_w))
1892	return;
1893
1894	signals [signum - 1].pending = 1;	2555	signals [signum - 1].pending = 1;
1895	evpipe_write (EV_A_ &sig_pending);	2556	evpipe_write (EV_A_ &sig_pending);
1896	}	2557	}
1897		2558
1898	static void	2559	static void
…		…
1904		2565
1905	ev_feed_signal (signum);	2566	ev_feed_signal (signum);
1906	}	2567	}
1907		2568
1908	void noinline	2569	void noinline
1909	ev_feed_signal_event (EV_P_ int signum)	2570	ev_feed_signal_event (EV_P_ int signum) EV_THROW
1910	{	2571	{
1911	WL w;	2572	WL w;
1912		2573
1913	if (expect_false (signum <= 0 || signum > EV_NSIG))	2574	if (expect_false (signum <= 0 || signum >= EV_NSIG))
1914	return;	2575	return;
1915		2576
1916	--signum;	2577	--signum;
1917		2578
1918	#if EV_MULTIPLICITY	2579	#if EV_MULTIPLICITY
…		…
1922	if (expect_false (signals [signum].loop != EV_A))	2583	if (expect_false (signals [signum].loop != EV_A))
1923	return;	2584	return;
1924	#endif	2585	#endif
1925		2586
1926	signals [signum].pending = 0;	2587	signals [signum].pending = 0;
		2588	ECB_MEMORY_FENCE_RELEASE;
1927		2589
1928	for (w = signals [signum].head; w; w = w->next)	2590	for (w = signals [signum].head; w; w = w->next)
1929	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);	2591	ev_feed_event (EV_A_ (W)w, EV_SIGNAL);
1930	}	2592	}
1931		2593
…		…
2030	#if EV_USE_SELECT	2692	#if EV_USE_SELECT
2031	# include "ev_select.c"	2693	# include "ev_select.c"
2032	#endif	2694	#endif
2033		2695
2034	int ecb_cold	2696	int ecb_cold
2035	ev_version_major (void)	2697	ev_version_major (void) EV_THROW
2036	{	2698	{
2037	return EV_VERSION_MAJOR;	2699	return EV_VERSION_MAJOR;
2038	}	2700	}
2039		2701
2040	int ecb_cold	2702	int ecb_cold
2041	ev_version_minor (void)	2703	ev_version_minor (void) EV_THROW
2042	{	2704	{
2043	return EV_VERSION_MINOR;	2705	return EV_VERSION_MINOR;
2044	}	2706	}
2045		2707
2046	/* 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 */
…		…
2054	|| getgid () != getegid ();	2716	|| getgid () != getegid ();
2055	#endif	2717	#endif
2056	}	2718	}
2057		2719
2058	unsigned int ecb_cold	2720	unsigned int ecb_cold
2059	ev_supported_backends (void)	2721	ev_supported_backends (void) EV_THROW
2060	{	2722	{
2061	unsigned int flags = 0;	2723	unsigned int flags = 0;
2062		2724
2063	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;	2725	if (EV_USE_PORT ) flags |= EVBACKEND_PORT;
2064	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;	2726	if (EV_USE_KQUEUE) flags |= EVBACKEND_KQUEUE;
…		…
2068		2730
2069	return flags;	2731	return flags;
2070	}	2732	}
2071		2733
2072	unsigned int ecb_cold	2734	unsigned int ecb_cold
2073	ev_recommended_backends (void)	2735	ev_recommended_backends (void) EV_THROW
2074	{	2736	{
2075	unsigned int flags = ev_supported_backends ();	2737	unsigned int flags = ev_supported_backends ();
2076		2738
2077	#ifndef __NetBSD__	2739	#ifndef __NetBSD__
2078	/* kqueue is borked on everything but netbsd apparently */	2740	/* kqueue is borked on everything but netbsd apparently */
…		…
2090		2752
2091	return flags;	2753	return flags;
2092	}	2754	}
2093		2755
2094	unsigned int ecb_cold	2756	unsigned int ecb_cold
2095	ev_embeddable_backends (void)	2757	ev_embeddable_backends (void) EV_THROW
2096	{	2758	{
2097	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;	2759	int flags = EVBACKEND_EPOLL | EVBACKEND_KQUEUE | EVBACKEND_PORT;
2098		2760
2099	/* 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 */
2100	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 */
…		…
2102		2764
2103	return flags;	2765	return flags;
2104	}	2766	}
2105		2767
2106	unsigned int	2768	unsigned int
2107	ev_backend (EV_P)	2769	ev_backend (EV_P) EV_THROW
2108	{	2770	{
2109	return backend;	2771	return backend;
2110	}	2772	}
2111		2773
2112	#if EV_FEATURE_API	2774	#if EV_FEATURE_API
2113	unsigned int	2775	unsigned int
2114	ev_iteration (EV_P)	2776	ev_iteration (EV_P) EV_THROW
2115	{	2777	{
2116	return loop_count;	2778	return loop_count;
2117	}	2779	}
2118		2780
2119	unsigned int	2781	unsigned int
2120	ev_depth (EV_P)	2782	ev_depth (EV_P) EV_THROW
2121	{	2783	{
2122	return loop_depth;	2784	return loop_depth;
2123	}	2785	}
2124		2786
2125	void	2787	void
2126	ev_set_io_collect_interval (EV_P_ ev_tstamp interval)	2788	ev_set_io_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2127	{	2789	{
2128	io_blocktime = interval;	2790	io_blocktime = interval;
2129	}	2791	}
2130		2792
2131	void	2793	void
2132	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval)	2794	ev_set_timeout_collect_interval (EV_P_ ev_tstamp interval) EV_THROW
2133	{	2795	{
2134	timeout_blocktime = interval;	2796	timeout_blocktime = interval;
2135	}	2797	}
2136		2798
2137	void	2799	void
2138	ev_set_userdata (EV_P_ void *data)	2800	ev_set_userdata (EV_P_ void *data) EV_THROW
2139	{	2801	{
2140	userdata = data;	2802	userdata = data;
2141	}	2803	}
2142		2804
2143	void *	2805	void *
2144	ev_userdata (EV_P)	2806	ev_userdata (EV_P) EV_THROW
2145	{	2807	{
2146	return userdata;	2808	return userdata;
2147	}	2809	}
2148		2810
2149	void	2811	void
2150	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
2151	{	2813	{
2152	invoke_cb = invoke_pending_cb;	2814	invoke_cb = invoke_pending_cb;
2153	}	2815	}
2154		2816
2155	void	2817	void
2156	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
2157	{	2819	{
2158	release_cb = release;	2820	release_cb = release;
2159	acquire_cb = acquire;	2821	acquire_cb = acquire;
2160	}	2822	}
2161	#endif	2823	#endif
2162		2824
2163	/* initialise a loop structure, must be zero-initialised */	2825	/* initialise a loop structure, must be zero-initialised */
2164	static void noinline ecb_cold	2826	static void noinline ecb_cold
2165	loop_init (EV_P_ unsigned int flags)	2827	loop_init (EV_P_ unsigned int flags) EV_THROW
2166	{	2828	{
2167	if (!backend)	2829	if (!backend)
2168	{	2830	{
2169	origflags = flags;	2831	origflags = flags;
2170		2832
…		…
2215	#if EV_ASYNC_ENABLE	2877	#if EV_ASYNC_ENABLE
2216	async_pending = 0;	2878	async_pending = 0;
2217	#endif	2879	#endif
2218	pipe_write_skipped = 0;	2880	pipe_write_skipped = 0;
2219	pipe_write_wanted = 0;	2881	pipe_write_wanted = 0;
		2882	evpipe [0] = -1;
		2883	evpipe [1] = -1;
2220	#if EV_USE_INOTIFY	2884	#if EV_USE_INOTIFY
2221	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;	2885	fs_fd = flags & EVFLAG_NOINOTIFY ? -1 : -2;
2222	#endif	2886	#endif
2223	#if EV_USE_SIGNALFD	2887	#if EV_USE_SIGNALFD
2224	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;	2888	sigfd = flags & EVFLAG_SIGNALFD ? -2 : -1;
…		…
2275	EV_INVOKE_PENDING;	2939	EV_INVOKE_PENDING;
2276	}	2940	}
2277	#endif	2941	#endif
2278		2942
2279	#if EV_CHILD_ENABLE	2943	#if EV_CHILD_ENABLE
2280	if (ev_is_active (&childev))	2944	if (ev_is_default_loop (EV_A) && ev_is_active (&childev))
2281	{	2945	{
2282	ev_ref (EV_A); /* child watcher */	2946	ev_ref (EV_A); /* child watcher */
2283	ev_signal_stop (EV_A_ &childev);	2947	ev_signal_stop (EV_A_ &childev);
2284	}	2948	}
2285	#endif	2949	#endif
…		…
2287	if (ev_is_active (&pipe_w))	2951	if (ev_is_active (&pipe_w))
2288	{	2952	{
2289	/*ev_ref (EV_A);*/	2953	/*ev_ref (EV_A);*/
2290	/*ev_io_stop (EV_A_ &pipe_w);*/	2954	/*ev_io_stop (EV_A_ &pipe_w);*/
2291		2955
2292	#if EV_USE_EVENTFD
2293	if (evfd >= 0)
2294	close (evfd);
2295	#endif
2296
2297	if (evpipe [0] >= 0)
2298	{
2299	EV_WIN32_CLOSE_FD (evpipe [0]);	2956	if (evpipe [0] >= 0) EV_WIN32_CLOSE_FD (evpipe [0]);
2300	EV_WIN32_CLOSE_FD (evpipe [1]);	2957	if (evpipe [1] >= 0) EV_WIN32_CLOSE_FD (evpipe [1]);
2301	}
2302	}	2958	}
2303		2959
2304	#if EV_USE_SIGNALFD	2960	#if EV_USE_SIGNALFD
2305	if (ev_is_active (&sigfd_w))	2961	if (ev_is_active (&sigfd_w))
2306	close (sigfd);	2962	close (sigfd);
…		…
2392	#endif	3048	#endif
2393	#if EV_USE_INOTIFY	3049	#if EV_USE_INOTIFY
2394	infy_fork (EV_A);	3050	infy_fork (EV_A);
2395	#endif	3051	#endif
2396		3052
		3053	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2397	if (ev_is_active (&pipe_w))	3054	if (ev_is_active (&pipe_w) && postfork != 2)
2398	{	3055	{
2399	/* 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 */
2400		3057
2401	ev_ref (EV_A);	3058	ev_ref (EV_A);
2402	ev_io_stop (EV_A_ &pipe_w);	3059	ev_io_stop (EV_A_ &pipe_w);
2403		3060
2404	#if EV_USE_EVENTFD
2405	if (evfd >= 0)
2406	close (evfd);
2407	#endif
2408
2409	if (evpipe [0] >= 0)	3061	if (evpipe [0] >= 0)
2410	{
2411	EV_WIN32_CLOSE_FD (evpipe [0]);	3062	EV_WIN32_CLOSE_FD (evpipe [0]);
2412	EV_WIN32_CLOSE_FD (evpipe [1]);
2413	}
2414		3063
2415	#if EV_SIGNAL_ENABLE || EV_ASYNC_ENABLE
2416	evpipe_init (EV_A);	3064	evpipe_init (EV_A);
2417	/* now iterate over everything, in case we missed something */	3065	/* iterate over everything, in case we missed something before */
2418	pipecb (EV_A_ &pipe_w, EV_READ);	3066	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
2419	#endif
2420	}	3067	}
		3068	#endif
2421		3069
2422	postfork = 0;	3070	postfork = 0;
2423	}	3071	}
2424		3072
2425	#if EV_MULTIPLICITY	3073	#if EV_MULTIPLICITY
2426		3074
2427	struct ev_loop * ecb_cold	3075	struct ev_loop * ecb_cold
2428	ev_loop_new (unsigned int flags)	3076	ev_loop_new (unsigned int flags) EV_THROW
2429	{	3077	{
2430	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));	3078	EV_P = (struct ev_loop *)ev_malloc (sizeof (struct ev_loop));
2431		3079
2432	memset (EV_A, 0, sizeof (struct ev_loop));	3080	memset (EV_A, 0, sizeof (struct ev_loop));
2433	loop_init (EV_A_ flags);	3081	loop_init (EV_A_ flags);
…		…
2477	}	3125	}
2478	#endif	3126	#endif
2479		3127
2480	#if EV_FEATURE_API	3128	#if EV_FEATURE_API
2481	void ecb_cold	3129	void ecb_cold
2482	ev_verify (EV_P)	3130	ev_verify (EV_P) EV_THROW
2483	{	3131	{
2484	#if EV_VERIFY	3132	#if EV_VERIFY
2485	int i;	3133	int i;
2486	WL w;	3134	WL w, w2;
2487		3135
2488	assert (activecnt >= -1);	3136	assert (activecnt >= -1);
2489		3137
2490	assert (fdchangemax >= fdchangecnt);	3138	assert (fdchangemax >= fdchangecnt);
2491	for (i = 0; i < fdchangecnt; ++i)	3139	for (i = 0; i < fdchangecnt; ++i)
2492	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));	3140	assert (("libev: negative fd in fdchanges", fdchanges [i] >= 0));
2493		3141
2494	assert (anfdmax >= 0);	3142	assert (anfdmax >= 0);
2495	for (i = 0; i < anfdmax; ++i)	3143	for (i = 0; i < anfdmax; ++i)
		3144	{
		3145	int j = 0;
		3146
2496	for (w = anfds [i].head; w; w = w->next)	3147	for (w = w2 = anfds [i].head; w; w = w->next)
2497	{	3148	{
2498	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
2499	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));
2500	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));
2501	}	3159	}
		3160	}
2502		3161
2503	assert (timermax >= timercnt);	3162	assert (timermax >= timercnt);
2504	verify_heap (EV_A_ timers, timercnt);	3163	verify_heap (EV_A_ timers, timercnt);
2505		3164
2506	#if EV_PERIODIC_ENABLE	3165	#if EV_PERIODIC_ENABLE
…		…
2556	#if EV_MULTIPLICITY	3215	#if EV_MULTIPLICITY
2557	struct ev_loop * ecb_cold	3216	struct ev_loop * ecb_cold
2558	#else	3217	#else
2559	int	3218	int
2560	#endif	3219	#endif
2561	ev_default_loop (unsigned int flags)	3220	ev_default_loop (unsigned int flags) EV_THROW
2562	{	3221	{
2563	if (!ev_default_loop_ptr)	3222	if (!ev_default_loop_ptr)
2564	{	3223	{
2565	#if EV_MULTIPLICITY	3224	#if EV_MULTIPLICITY
2566	EV_P = ev_default_loop_ptr = &default_loop_struct;	3225	EV_P = ev_default_loop_ptr = &default_loop_struct;
…		…
2585		3244
2586	return ev_default_loop_ptr;	3245	return ev_default_loop_ptr;
2587	}	3246	}
2588		3247
2589	void	3248	void
2590	ev_loop_fork (EV_P)	3249	ev_loop_fork (EV_P) EV_THROW
2591	{	3250	{
2592	postfork = 1; /* must be in line with ev_default_fork */	3251	postfork = 1;
2593	}	3252	}
2594		3253
2595	/*****************************************************************************/	3254	/*****************************************************************************/
2596		3255
2597	void	3256	void
…		…
2599	{	3258	{
2600	EV_CB_INVOKE ((W)w, revents);	3259	EV_CB_INVOKE ((W)w, revents);
2601	}	3260	}
2602		3261
2603	unsigned int	3262	unsigned int
2604	ev_pending_count (EV_P)	3263	ev_pending_count (EV_P) EV_THROW
2605	{	3264	{
2606	int pri;	3265	int pri;
2607	unsigned int count = 0;	3266	unsigned int count = 0;
2608		3267
2609	for (pri = NUMPRI; pri--; )	3268	for (pri = NUMPRI; pri--; )
…		…
2613	}	3272	}
2614		3273
2615	void noinline	3274	void noinline
2616	ev_invoke_pending (EV_P)	3275	ev_invoke_pending (EV_P)
2617	{	3276	{
2618	int pri;	3277	pendingpri = NUMPRI;
2619		3278
2620	for (pri = NUMPRI; pri--; )	3279	while (pendingpri) /* pendingpri possibly gets modified in the inner loop */
		3280	{
		3281	--pendingpri;
		3282
2621	while (pendingcnt [pri])	3283	while (pendingcnt [pendingpri])
2622	{	3284	{
2623	ANPENDING *p = pendings [pri] + --pendingcnt [pri];	3285	ANPENDING *p = pendings [pendingpri] + --pendingcnt [pendingpri];
2624		3286
2625	p->w->pending = 0;	3287	p->w->pending = 0;
2626	EV_CB_INVOKE (p->w, p->events);	3288	EV_CB_INVOKE (p->w, p->events);
2627	EV_FREQUENT_CHECK;	3289	EV_FREQUENT_CHECK;
2628	}	3290	}
		3291	}
2629	}	3292	}
2630		3293
2631	#if EV_IDLE_ENABLE	3294	#if EV_IDLE_ENABLE
2632	/* make idle watchers pending. this handles the "call-idle */	3295	/* make idle watchers pending. this handles the "call-idle */
2633	/* only when higher priorities are idle" logic */	3296	/* only when higher priorities are idle" logic */
…		…
2723	{	3386	{
2724	EV_FREQUENT_CHECK;	3387	EV_FREQUENT_CHECK;
2725		3388
2726	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)	3389	while (periodiccnt && ANHE_at (periodics [HEAP0]) < ev_rt_now)
2727	{	3390	{
2728	int feed_count = 0;
2729
2730	do	3391	do
2731	{	3392	{
2732	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);	3393	ev_periodic *w = (ev_periodic *)ANHE_w (periodics [HEAP0]);
2733		3394
2734	/*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)));*/
…		…
2868		3529
2869	mn_now = ev_rt_now;	3530	mn_now = ev_rt_now;
2870	}	3531	}
2871	}	3532	}
2872		3533
2873	void	3534	int
2874	ev_run (EV_P_ int flags)	3535	ev_run (EV_P_ int flags)
2875	{	3536	{
2876	#if EV_FEATURE_API	3537	#if EV_FEATURE_API
2877	++loop_depth;	3538	++loop_depth;
2878	#endif	3539	#endif
…		…
2991	#endif	3652	#endif
2992	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */	3653	assert ((loop_done = EVBREAK_RECURSE, 1)); /* assert for side effect */
2993	backend_poll (EV_A_ waittime);	3654	backend_poll (EV_A_ waittime);
2994	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */	3655	assert ((loop_done = EVBREAK_CANCEL, 1)); /* assert for side effect */
2995		3656
2996	pipe_write_wanted = 0; /* just an optimsiation, no fence needed */	3657	pipe_write_wanted = 0; /* just an optimisation, no fence needed */
2997		3658
		3659	ECB_MEMORY_FENCE_ACQUIRE;
2998	if (pipe_write_skipped)	3660	if (pipe_write_skipped)
2999	{	3661	{
3000	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)));
3001	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);	3663	ev_feed_event (EV_A_ &pipe_w, EV_CUSTOM);
3002	}	3664	}
…		…
3035	loop_done = EVBREAK_CANCEL;	3697	loop_done = EVBREAK_CANCEL;
3036		3698
3037	#if EV_FEATURE_API	3699	#if EV_FEATURE_API
3038	--loop_depth;	3700	--loop_depth;
3039	#endif	3701	#endif
		3702
		3703	return activecnt;
3040	}	3704	}
3041		3705
3042	void	3706	void
3043	ev_break (EV_P_ int how)	3707	ev_break (EV_P_ int how) EV_THROW
3044	{	3708	{
3045	loop_done = how;	3709	loop_done = how;
3046	}	3710	}
3047		3711
3048	void	3712	void
3049	ev_ref (EV_P)	3713	ev_ref (EV_P) EV_THROW
3050	{	3714	{
3051	++activecnt;	3715	++activecnt;
3052	}	3716	}
3053		3717
3054	void	3718	void
3055	ev_unref (EV_P)	3719	ev_unref (EV_P) EV_THROW
3056	{	3720	{
3057	--activecnt;	3721	--activecnt;
3058	}	3722	}
3059		3723
3060	void	3724	void
3061	ev_now_update (EV_P)	3725	ev_now_update (EV_P) EV_THROW
3062	{	3726	{
3063	time_update (EV_A_ 1e100);	3727	time_update (EV_A_ 1e100);
3064	}	3728	}
3065		3729
3066	void	3730	void
3067	ev_suspend (EV_P)	3731	ev_suspend (EV_P) EV_THROW
3068	{	3732	{
3069	ev_now_update (EV_A);	3733	ev_now_update (EV_A);
3070	}	3734	}
3071		3735
3072	void	3736	void
3073	ev_resume (EV_P)	3737	ev_resume (EV_P) EV_THROW
3074	{	3738	{
3075	ev_tstamp mn_prev = mn_now;	3739	ev_tstamp mn_prev = mn_now;
3076		3740
3077	ev_now_update (EV_A);	3741	ev_now_update (EV_A);
3078	timers_reschedule (EV_A_ mn_now - mn_prev);	3742	timers_reschedule (EV_A_ mn_now - mn_prev);
…		…
3117	w->pending = 0;	3781	w->pending = 0;
3118	}	3782	}
3119	}	3783	}
3120		3784
3121	int	3785	int
3122	ev_clear_pending (EV_P_ void *w)	3786	ev_clear_pending (EV_P_ void *w) EV_THROW
3123	{	3787	{
3124	W w_ = (W)w;	3788	W w_ = (W)w;
3125	int pending = w_->pending;	3789	int pending = w_->pending;
3126		3790
3127	if (expect_true (pending))	3791	if (expect_true (pending))
…		…
3160	}	3824	}
3161		3825
3162	/*****************************************************************************/	3826	/*****************************************************************************/
3163		3827
3164	void noinline	3828	void noinline
3165	ev_io_start (EV_P_ ev_io *w)	3829	ev_io_start (EV_P_ ev_io *w) EV_THROW
3166	{	3830	{
3167	int fd = w->fd;	3831	int fd = w->fd;
3168		3832
3169	if (expect_false (ev_is_active (w)))	3833	if (expect_false (ev_is_active (w)))
3170	return;	3834	return;
…		…
3176		3840
3177	ev_start (EV_A_ (W)w, 1);	3841	ev_start (EV_A_ (W)w, 1);
3178	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);	3842	array_needsize (ANFD, anfds, anfdmax, fd + 1, array_init_zero);
3179	wlist_add (&anfds[fd].head, (WL)w);	3843	wlist_add (&anfds[fd].head, (WL)w);
3180		3844
		3845	/* common bug, apparently */
		3846	assert (("libev: ev_io_start called with corrupted watcher", ((WL)w)->next != (WL)w));
		3847
3181	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);
3182	w->events &= ~EV__IOFDSET;	3849	w->events &= ~EV__IOFDSET;
3183		3850
3184	EV_FREQUENT_CHECK;	3851	EV_FREQUENT_CHECK;
3185	}	3852	}
3186		3853
3187	void noinline	3854	void noinline
3188	ev_io_stop (EV_P_ ev_io *w)	3855	ev_io_stop (EV_P_ ev_io *w) EV_THROW
3189	{	3856	{
3190	clear_pending (EV_A_ (W)w);	3857	clear_pending (EV_A_ (W)w);
3191	if (expect_false (!ev_is_active (w)))	3858	if (expect_false (!ev_is_active (w)))
3192	return;	3859	return;
3193		3860
…		…
3202		3869
3203	EV_FREQUENT_CHECK;	3870	EV_FREQUENT_CHECK;
3204	}	3871	}
3205		3872
3206	void noinline	3873	void noinline
3207	ev_timer_start (EV_P_ ev_timer *w)	3874	ev_timer_start (EV_P_ ev_timer *w) EV_THROW
3208	{	3875	{
3209	if (expect_false (ev_is_active (w)))	3876	if (expect_false (ev_is_active (w)))
3210	return;	3877	return;
3211		3878
3212	ev_at (w) += mn_now;	3879	ev_at (w) += mn_now;
…		…
3226		3893
3227	/*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));*/
3228	}	3895	}
3229		3896
3230	void noinline	3897	void noinline
3231	ev_timer_stop (EV_P_ ev_timer *w)	3898	ev_timer_stop (EV_P_ ev_timer *w) EV_THROW
3232	{	3899	{
3233	clear_pending (EV_A_ (W)w);	3900	clear_pending (EV_A_ (W)w);
3234	if (expect_false (!ev_is_active (w)))	3901	if (expect_false (!ev_is_active (w)))
3235	return;	3902	return;
3236		3903
…		…
3256		3923
3257	EV_FREQUENT_CHECK;	3924	EV_FREQUENT_CHECK;
3258	}	3925	}
3259		3926
3260	void noinline	3927	void noinline
3261	ev_timer_again (EV_P_ ev_timer *w)	3928	ev_timer_again (EV_P_ ev_timer *w) EV_THROW
3262	{	3929	{
3263	EV_FREQUENT_CHECK;	3930	EV_FREQUENT_CHECK;
		3931
		3932	clear_pending (EV_A_ (W)w);
3264		3933
3265	if (ev_is_active (w))	3934	if (ev_is_active (w))
3266	{	3935	{
3267	if (w->repeat)	3936	if (w->repeat)
3268	{	3937	{
…		…
3281		3950
3282	EV_FREQUENT_CHECK;	3951	EV_FREQUENT_CHECK;
3283	}	3952	}
3284		3953
3285	ev_tstamp	3954	ev_tstamp
3286	ev_timer_remaining (EV_P_ ev_timer *w)	3955	ev_timer_remaining (EV_P_ ev_timer *w) EV_THROW
3287	{	3956	{
3288	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);	3957	return ev_at (w) - (ev_is_active (w) ? mn_now : 0.);
3289	}	3958	}
3290		3959
3291	#if EV_PERIODIC_ENABLE	3960	#if EV_PERIODIC_ENABLE
3292	void noinline	3961	void noinline
3293	ev_periodic_start (EV_P_ ev_periodic *w)	3962	ev_periodic_start (EV_P_ ev_periodic *w) EV_THROW
3294	{	3963	{
3295	if (expect_false (ev_is_active (w)))	3964	if (expect_false (ev_is_active (w)))
3296	return;	3965	return;
3297		3966
3298	if (w->reschedule_cb)	3967	if (w->reschedule_cb)
…		…
3318		3987
3319	/*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));*/
3320	}	3989	}
3321		3990
3322	void noinline	3991	void noinline
3323	ev_periodic_stop (EV_P_ ev_periodic *w)	3992	ev_periodic_stop (EV_P_ ev_periodic *w) EV_THROW
3324	{	3993	{
3325	clear_pending (EV_A_ (W)w);	3994	clear_pending (EV_A_ (W)w);
3326	if (expect_false (!ev_is_active (w)))	3995	if (expect_false (!ev_is_active (w)))
3327	return;	3996	return;
3328		3997
…		…
3346		4015
3347	EV_FREQUENT_CHECK;	4016	EV_FREQUENT_CHECK;
3348	}	4017	}
3349		4018
3350	void noinline	4019	void noinline
3351	ev_periodic_again (EV_P_ ev_periodic *w)	4020	ev_periodic_again (EV_P_ ev_periodic *w) EV_THROW
3352	{	4021	{
3353	/* TODO: use adjustheap and recalculation */	4022	/* TODO: use adjustheap and recalculation */
3354	ev_periodic_stop (EV_A_ w);	4023	ev_periodic_stop (EV_A_ w);
3355	ev_periodic_start (EV_A_ w);	4024	ev_periodic_start (EV_A_ w);
3356	}	4025	}
…		…
3361	#endif	4030	#endif
3362		4031
3363	#if EV_SIGNAL_ENABLE	4032	#if EV_SIGNAL_ENABLE
3364		4033
3365	void noinline	4034	void noinline
3366	ev_signal_start (EV_P_ ev_signal *w)	4035	ev_signal_start (EV_P_ ev_signal *w) EV_THROW
3367	{	4036	{
3368	if (expect_false (ev_is_active (w)))	4037	if (expect_false (ev_is_active (w)))
3369	return;	4038	return;
3370		4039
3371	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));
…		…
3373	#if EV_MULTIPLICITY	4042	#if EV_MULTIPLICITY
3374	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",
3375	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));	4044	!signals [w->signum - 1].loop || signals [w->signum - 1].loop == loop));
3376		4045
3377	signals [w->signum - 1].loop = EV_A;	4046	signals [w->signum - 1].loop = EV_A;
		4047	ECB_MEMORY_FENCE_RELEASE;
3378	#endif	4048	#endif
3379		4049
3380	EV_FREQUENT_CHECK;	4050	EV_FREQUENT_CHECK;
3381		4051
3382	#if EV_USE_SIGNALFD	4052	#if EV_USE_SIGNALFD
…		…
3442		4112
3443	EV_FREQUENT_CHECK;	4113	EV_FREQUENT_CHECK;
3444	}	4114	}
3445		4115
3446	void noinline	4116	void noinline
3447	ev_signal_stop (EV_P_ ev_signal *w)	4117	ev_signal_stop (EV_P_ ev_signal *w) EV_THROW
3448	{	4118	{
3449	clear_pending (EV_A_ (W)w);	4119	clear_pending (EV_A_ (W)w);
3450	if (expect_false (!ev_is_active (w)))	4120	if (expect_false (!ev_is_active (w)))
3451	return;	4121	return;
3452		4122
…		…
3483	#endif	4153	#endif
3484		4154
3485	#if EV_CHILD_ENABLE	4155	#if EV_CHILD_ENABLE
3486		4156
3487	void	4157	void
3488	ev_child_start (EV_P_ ev_child *w)	4158	ev_child_start (EV_P_ ev_child *w) EV_THROW
3489	{	4159	{
3490	#if EV_MULTIPLICITY	4160	#if EV_MULTIPLICITY
3491	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));
3492	#endif	4162	#endif
3493	if (expect_false (ev_is_active (w)))	4163	if (expect_false (ev_is_active (w)))
…		…
3500		4170
3501	EV_FREQUENT_CHECK;	4171	EV_FREQUENT_CHECK;
3502	}	4172	}
3503		4173
3504	void	4174	void
3505	ev_child_stop (EV_P_ ev_child *w)	4175	ev_child_stop (EV_P_ ev_child *w) EV_THROW
3506	{	4176	{
3507	clear_pending (EV_A_ (W)w);	4177	clear_pending (EV_A_ (W)w);
3508	if (expect_false (!ev_is_active (w)))	4178	if (expect_false (!ev_is_active (w)))
3509	return;	4179	return;
3510		4180
…		…
3537	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)	4207	# define EV_INOTIFY_BUFSIZE (sizeof (struct inotify_event) * 2 + NAME_MAX)
3538		4208
3539	static void noinline	4209	static void noinline
3540	infy_add (EV_P_ ev_stat *w)	4210	infy_add (EV_P_ ev_stat *w)
3541	{	4211	{
3542	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);
3543		4216
3544	if (w->wd >= 0)	4217	if (w->wd >= 0)
3545	{	4218	{
3546	struct statfs sfs;	4219	struct statfs sfs;
3547		4220
…		…
3551		4224
3552	if (!fs_2625)	4225	if (!fs_2625)
3553	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;	4226	w->timer.repeat = w->interval ? w->interval : DEF_STAT_INTERVAL;
3554	else if (!statfs (w->path, &sfs)	4227	else if (!statfs (w->path, &sfs)
3555	&& (sfs.f_type == 0x1373 /* devfs */	4228	&& (sfs.f_type == 0x1373 /* devfs */
		4229	|| sfs.f_type == 0x4006 /* fat */
		4230	|| sfs.f_type == 0x4d44 /* msdos */
3556	|| 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 */
3557	|| sfs.f_type == 0x3153464a /* jfs */	4235	|| sfs.f_type == 0x3153464a /* jfs */
		4236	|| sfs.f_type == 0x9123683e /* btrfs */
3558	|| sfs.f_type == 0x52654973 /* reiser3 */	4237	|| sfs.f_type == 0x52654973 /* reiser3 */
3559	|| sfs.f_type == 0x01021994 /* tempfs */	4238	|| sfs.f_type == 0x01021994 /* tmpfs */
3560	|| sfs.f_type == 0x58465342 /* xfs */))	4239	|| sfs.f_type == 0x58465342 /* xfs */))
3561	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */	4240	w->timer.repeat = 0.; /* filesystem is local, kernel new enough */
3562	else	4241	else
3563	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 */
3564	}	4243	}
…		…
3677	}	4356	}
3678		4357
3679	inline_size int	4358	inline_size int
3680	infy_newfd (void)	4359	infy_newfd (void)
3681	{	4360	{
3682	#if defined (IN_CLOEXEC) && defined (IN_NONBLOCK)	4361	#if defined IN_CLOEXEC && defined IN_NONBLOCK
3683	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);	4362	int fd = inotify_init1 (IN_CLOEXEC | IN_NONBLOCK);
3684	if (fd >= 0)	4363	if (fd >= 0)
3685	return fd;	4364	return fd;
3686	#endif	4365	#endif
3687	return inotify_init ();	4366	return inotify_init ();
…		…
3762	#else	4441	#else
3763	# define EV_LSTAT(p,b) lstat (p, b)	4442	# define EV_LSTAT(p,b) lstat (p, b)
3764	#endif	4443	#endif
3765		4444
3766	void	4445	void
3767	ev_stat_stat (EV_P_ ev_stat *w)	4446	ev_stat_stat (EV_P_ ev_stat *w) EV_THROW
3768	{	4447	{
3769	if (lstat (w->path, &w->attr) < 0)	4448	if (lstat (w->path, &w->attr) < 0)
3770	w->attr.st_nlink = 0;	4449	w->attr.st_nlink = 0;
3771	else if (!w->attr.st_nlink)	4450	else if (!w->attr.st_nlink)
3772	w->attr.st_nlink = 1;	4451	w->attr.st_nlink = 1;
…		…
3811	ev_feed_event (EV_A_ w, EV_STAT);	4490	ev_feed_event (EV_A_ w, EV_STAT);
3812	}	4491	}
3813	}	4492	}
3814		4493
3815	void	4494	void
3816	ev_stat_start (EV_P_ ev_stat *w)	4495	ev_stat_start (EV_P_ ev_stat *w) EV_THROW
3817	{	4496	{
3818	if (expect_false (ev_is_active (w)))	4497	if (expect_false (ev_is_active (w)))
3819	return;	4498	return;
3820		4499
3821	ev_stat_stat (EV_A_ w);	4500	ev_stat_stat (EV_A_ w);
…		…
3842		4521
3843	EV_FREQUENT_CHECK;	4522	EV_FREQUENT_CHECK;
3844	}	4523	}
3845		4524
3846	void	4525	void
3847	ev_stat_stop (EV_P_ ev_stat *w)	4526	ev_stat_stop (EV_P_ ev_stat *w) EV_THROW
3848	{	4527	{
3849	clear_pending (EV_A_ (W)w);	4528	clear_pending (EV_A_ (W)w);
3850	if (expect_false (!ev_is_active (w)))	4529	if (expect_false (!ev_is_active (w)))
3851	return;	4530	return;
3852		4531
…		…
3868	}	4547	}
3869	#endif	4548	#endif
3870		4549
3871	#if EV_IDLE_ENABLE	4550	#if EV_IDLE_ENABLE
3872	void	4551	void
3873	ev_idle_start (EV_P_ ev_idle *w)	4552	ev_idle_start (EV_P_ ev_idle *w) EV_THROW
3874	{	4553	{
3875	if (expect_false (ev_is_active (w)))	4554	if (expect_false (ev_is_active (w)))
3876	return;	4555	return;
3877		4556
3878	pri_adjust (EV_A_ (W)w);	4557	pri_adjust (EV_A_ (W)w);
…		…
3891		4570
3892	EV_FREQUENT_CHECK;	4571	EV_FREQUENT_CHECK;
3893	}	4572	}
3894		4573
3895	void	4574	void
3896	ev_idle_stop (EV_P_ ev_idle *w)	4575	ev_idle_stop (EV_P_ ev_idle *w) EV_THROW
3897	{	4576	{
3898	clear_pending (EV_A_ (W)w);	4577	clear_pending (EV_A_ (W)w);
3899	if (expect_false (!ev_is_active (w)))	4578	if (expect_false (!ev_is_active (w)))
3900	return;	4579	return;
3901		4580
…		…
3915	}	4594	}
3916	#endif	4595	#endif
3917		4596
3918	#if EV_PREPARE_ENABLE	4597	#if EV_PREPARE_ENABLE
3919	void	4598	void
3920	ev_prepare_start (EV_P_ ev_prepare *w)	4599	ev_prepare_start (EV_P_ ev_prepare *w) EV_THROW
3921	{	4600	{
3922	if (expect_false (ev_is_active (w)))	4601	if (expect_false (ev_is_active (w)))
3923	return;	4602	return;
3924		4603
3925	EV_FREQUENT_CHECK;	4604	EV_FREQUENT_CHECK;
…		…
3930		4609
3931	EV_FREQUENT_CHECK;	4610	EV_FREQUENT_CHECK;
3932	}	4611	}
3933		4612
3934	void	4613	void
3935	ev_prepare_stop (EV_P_ ev_prepare *w)	4614	ev_prepare_stop (EV_P_ ev_prepare *w) EV_THROW
3936	{	4615	{
3937	clear_pending (EV_A_ (W)w);	4616	clear_pending (EV_A_ (W)w);
3938	if (expect_false (!ev_is_active (w)))	4617	if (expect_false (!ev_is_active (w)))
3939	return;	4618	return;
3940		4619
…		…
3953	}	4632	}
3954	#endif	4633	#endif
3955		4634
3956	#if EV_CHECK_ENABLE	4635	#if EV_CHECK_ENABLE
3957	void	4636	void
3958	ev_check_start (EV_P_ ev_check *w)	4637	ev_check_start (EV_P_ ev_check *w) EV_THROW
3959	{	4638	{
3960	if (expect_false (ev_is_active (w)))	4639	if (expect_false (ev_is_active (w)))
3961	return;	4640	return;
3962		4641
3963	EV_FREQUENT_CHECK;	4642	EV_FREQUENT_CHECK;
…		…
3968		4647
3969	EV_FREQUENT_CHECK;	4648	EV_FREQUENT_CHECK;
3970	}	4649	}
3971		4650
3972	void	4651	void
3973	ev_check_stop (EV_P_ ev_check *w)	4652	ev_check_stop (EV_P_ ev_check *w) EV_THROW
3974	{	4653	{
3975	clear_pending (EV_A_ (W)w);	4654	clear_pending (EV_A_ (W)w);
3976	if (expect_false (!ev_is_active (w)))	4655	if (expect_false (!ev_is_active (w)))
3977	return;	4656	return;
3978		4657
…		…
3991	}	4670	}
3992	#endif	4671	#endif
3993		4672
3994	#if EV_EMBED_ENABLE	4673	#if EV_EMBED_ENABLE
3995	void noinline	4674	void noinline
3996	ev_embed_sweep (EV_P_ ev_embed *w)	4675	ev_embed_sweep (EV_P_ ev_embed *w) EV_THROW
3997	{	4676	{
3998	ev_run (w->other, EVRUN_NOWAIT);	4677	ev_run (w->other, EVRUN_NOWAIT);
3999	}	4678	}
4000		4679
4001	static void	4680	static void
…		…
4049	ev_idle_stop (EV_A_ idle);	4728	ev_idle_stop (EV_A_ idle);
4050	}	4729	}
4051	#endif	4730	#endif
4052		4731
4053	void	4732	void
4054	ev_embed_start (EV_P_ ev_embed *w)	4733	ev_embed_start (EV_P_ ev_embed *w) EV_THROW
4055	{	4734	{
4056	if (expect_false (ev_is_active (w)))	4735	if (expect_false (ev_is_active (w)))
4057	return;	4736	return;
4058		4737
4059	{	4738	{
…		…
4080		4759
4081	EV_FREQUENT_CHECK;	4760	EV_FREQUENT_CHECK;
4082	}	4761	}
4083		4762
4084	void	4763	void
4085	ev_embed_stop (EV_P_ ev_embed *w)	4764	ev_embed_stop (EV_P_ ev_embed *w) EV_THROW
4086	{	4765	{
4087	clear_pending (EV_A_ (W)w);	4766	clear_pending (EV_A_ (W)w);
4088	if (expect_false (!ev_is_active (w)))	4767	if (expect_false (!ev_is_active (w)))
4089	return;	4768	return;
4090		4769
…		…
4100	}	4779	}
4101	#endif	4780	#endif
4102		4781
4103	#if EV_FORK_ENABLE	4782	#if EV_FORK_ENABLE
4104	void	4783	void
4105	ev_fork_start (EV_P_ ev_fork *w)	4784	ev_fork_start (EV_P_ ev_fork *w) EV_THROW
4106	{	4785	{
4107	if (expect_false (ev_is_active (w)))	4786	if (expect_false (ev_is_active (w)))
4108	return;	4787	return;
4109		4788
4110	EV_FREQUENT_CHECK;	4789	EV_FREQUENT_CHECK;
…		…
4115		4794
4116	EV_FREQUENT_CHECK;	4795	EV_FREQUENT_CHECK;
4117	}	4796	}
4118		4797
4119	void	4798	void
4120	ev_fork_stop (EV_P_ ev_fork *w)	4799	ev_fork_stop (EV_P_ ev_fork *w) EV_THROW
4121	{	4800	{
4122	clear_pending (EV_A_ (W)w);	4801	clear_pending (EV_A_ (W)w);
4123	if (expect_false (!ev_is_active (w)))	4802	if (expect_false (!ev_is_active (w)))
4124	return;	4803	return;
4125		4804
…		…
4138	}	4817	}
4139	#endif	4818	#endif
4140		4819
4141	#if EV_CLEANUP_ENABLE	4820	#if EV_CLEANUP_ENABLE
4142	void	4821	void
4143	ev_cleanup_start (EV_P_ ev_cleanup *w)	4822	ev_cleanup_start (EV_P_ ev_cleanup *w) EV_THROW
4144	{	4823	{
4145	if (expect_false (ev_is_active (w)))	4824	if (expect_false (ev_is_active (w)))
4146	return;	4825	return;
4147		4826
4148	EV_FREQUENT_CHECK;	4827	EV_FREQUENT_CHECK;
…		…
4155	ev_unref (EV_A);	4834	ev_unref (EV_A);
4156	EV_FREQUENT_CHECK;	4835	EV_FREQUENT_CHECK;
4157	}	4836	}
4158		4837
4159	void	4838	void
4160	ev_cleanup_stop (EV_P_ ev_cleanup *w)	4839	ev_cleanup_stop (EV_P_ ev_cleanup *w) EV_THROW
4161	{	4840	{
4162	clear_pending (EV_A_ (W)w);	4841	clear_pending (EV_A_ (W)w);
4163	if (expect_false (!ev_is_active (w)))	4842	if (expect_false (!ev_is_active (w)))
4164	return;	4843	return;
4165		4844
…		…
4179	}	4858	}
4180	#endif	4859	#endif
4181		4860
4182	#if EV_ASYNC_ENABLE	4861	#if EV_ASYNC_ENABLE
4183	void	4862	void
4184	ev_async_start (EV_P_ ev_async *w)	4863	ev_async_start (EV_P_ ev_async *w) EV_THROW
4185	{	4864	{
4186	if (expect_false (ev_is_active (w)))	4865	if (expect_false (ev_is_active (w)))
4187	return;	4866	return;
4188		4867
4189	w->sent = 0;	4868	w->sent = 0;
…		…
4198		4877
4199	EV_FREQUENT_CHECK;	4878	EV_FREQUENT_CHECK;
4200	}	4879	}
4201		4880
4202	void	4881	void
4203	ev_async_stop (EV_P_ ev_async *w)	4882	ev_async_stop (EV_P_ ev_async *w) EV_THROW
4204	{	4883	{
4205	clear_pending (EV_A_ (W)w);	4884	clear_pending (EV_A_ (W)w);
4206	if (expect_false (!ev_is_active (w)))	4885	if (expect_false (!ev_is_active (w)))
4207	return;	4886	return;
4208		4887
…		…
4219		4898
4220	EV_FREQUENT_CHECK;	4899	EV_FREQUENT_CHECK;
4221	}	4900	}
4222		4901
4223	void	4902	void
4224	ev_async_send (EV_P_ ev_async *w)	4903	ev_async_send (EV_P_ ev_async *w) EV_THROW
4225	{	4904	{
4226	w->sent = 1;	4905	w->sent = 1;
4227	evpipe_write (EV_A_ &async_pending);	4906	evpipe_write (EV_A_ &async_pending);
4228	}	4907	}
4229	#endif	4908	#endif
…		…
4266		4945
4267	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));
4268	}	4947	}
4269		4948
4270	void	4949	void
4271	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
4272	{	4951	{
4273	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));
4274		4953
4275	if (expect_false (!once))	4954	if (expect_false (!once))
4276	{	4955	{
…		…
4298		4977
4299	/*****************************************************************************/	4978	/*****************************************************************************/
4300		4979
4301	#if EV_WALK_ENABLE	4980	#if EV_WALK_ENABLE
4302	void ecb_cold	4981	void ecb_cold
4303	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
4304	{	4983	{
4305	int i, j;	4984	int i, j;
4306	ev_watcher_list *wl, *wn;	4985	ev_watcher_list *wl, *wn;
4307		4986
4308	if (types & (EV_IO | EV_EMBED))	4987	if (types & (EV_IO | EV_EMBED))

Diff Legend

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