ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/libev/ev.c

Comparing libev/ev.c (file contents):
Revision 1.411 by root, Tue Feb 21 04:34:02 2012 UTC vs.
Revision 1.479 by root, Sun Dec 20 01:31:17 2015 UTC

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

Diff Legend

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