ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/libev/ev.c
(Generate patch)

Comparing libev/ev.c (file contents):
Revision 1.457 by root, Thu Sep 5 18:45:29 2013 UTC vs.
Revision 1.467 by root, Fri May 16 15:15:39 2014 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,2012 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 *
241#elif defined SIGARRAYSIZE 241#elif defined SIGARRAYSIZE
242# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */ 242# define EV_NSIG (SIGARRAYSIZE) /* Assume ary[SIGARRAYSIZE] */
243#elif defined _sys_nsig 243#elif defined _sys_nsig
244# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */ 244# define EV_NSIG (_sys_nsig) /* Solaris 2.5 */
245#else 245#else
246# error "unable to find value for NSIG, please report" 246# define EV_NSIG (8 * sizeof (sigset_t) + 1)
247/* to make it compile regardless, just remove the above line, */
248/* but consider reporting it, too! :) */
249# define EV_NSIG 65
250#endif 247#endif
251 248
252#ifndef EV_USE_FLOOR 249#ifndef EV_USE_FLOOR
253# define EV_USE_FLOOR 0 250# define EV_USE_FLOOR 0
254#endif 251#endif
255 252
256#ifndef EV_USE_CLOCK_SYSCALL 253#ifndef EV_USE_CLOCK_SYSCALL
257# if __linux && __GLIBC__ >= 2 254# if __linux && __GLIBC__ == 2 && __GLIBC_MINOR__ < 17
258# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS 255# define EV_USE_CLOCK_SYSCALL EV_FEATURE_OS
259# else 256# else
260# define EV_USE_CLOCK_SYSCALL 0 257# define EV_USE_CLOCK_SYSCALL 0
261# endif 258# endif
262#endif 259#endif
485/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */ 482/* the following is ecb.h embedded into libev - use update_ev_c to update from an external copy */
486/* ECB.H BEGIN */ 483/* ECB.H BEGIN */
487/* 484/*
488 * libecb - http://software.schmorp.de/pkg/libecb 485 * libecb - http://software.schmorp.de/pkg/libecb
489 * 486 *
490 * Copyright (©) 2009-2012 Marc Alexander Lehmann <libecb@schmorp.de> 487 * Copyright (©) 2009-2014 Marc Alexander Lehmann <libecb@schmorp.de>
491 * Copyright (©) 2011 Emanuele Giaquinta 488 * Copyright (©) 2011 Emanuele Giaquinta
492 * All rights reserved. 489 * All rights reserved.
493 * 490 *
494 * Redistribution and use in source and binary forms, with or without modifica- 491 * Redistribution and use in source and binary forms, with or without modifica-
495 * tion, are permitted provided that the following conditions are met: 492 * tion, are permitted provided that the following conditions are met:
509 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 506 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
510 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 507 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
511 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH- 508 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH-
512 * ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 509 * ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
513 * OF THE POSSIBILITY OF SUCH DAMAGE. 510 * OF THE POSSIBILITY OF SUCH DAMAGE.
511 *
512 * Alternatively, the contents of this file may be used under the terms of
513 * the GNU General Public License ("GPL") version 2 or any later version,
514 * in which case the provisions of the GPL are applicable instead of
515 * the above. If you wish to allow the use of your version of this file
516 * only under the terms of the GPL and not to allow others to use your
517 * version of this file under the BSD license, indicate your decision
518 * by deleting the provisions above and replace them with the notice
519 * and other provisions required by the GPL. If you do not delete the
520 * provisions above, a recipient may use your version of this file under
521 * either the BSD or the GPL.
514 */ 522 */
515 523
516#ifndef ECB_H 524#ifndef ECB_H
517#define ECB_H 525#define ECB_H
518 526
550 #define ECB_PTRSIZE 4 558 #define ECB_PTRSIZE 4
551 #endif 559 #endif
552#endif 560#endif
553 561
554/* work around x32 idiocy by defining proper macros */ 562/* work around x32 idiocy by defining proper macros */
555#if __x86_64 || _M_AMD64 563#if __amd64 || __x86_64 || _M_AMD64 || _M_X64
556 #if __ILP32 564 #if _ILP32
557 #define ECB_AMD64_X32 1 565 #define ECB_AMD64_X32 1
558 #else 566 #else
559 #define ECB_AMD64 1 567 #define ECB_AMD64 1
560 #endif 568 #endif
561#endif 569#endif
573 #else 581 #else
574 #define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor))) 582 #define ECB_GCC_VERSION(major,minor) (__GNUC__ > (major) || (__GNUC__ == (major) && __GNUC_MINOR__ >= (minor)))
575 #endif 583 #endif
576#endif 584#endif
577 585
578#define ECB_C (__STDC__+0) /* this assumes that __STDC__ is either empty or a number */
579#define ECB_C99 (__STDC_VERSION__ >= 199901L)
580#define ECB_C11 (__STDC_VERSION__ >= 201112L)
581#define ECB_CPP (__cplusplus+0) 586#define ECB_CPP (__cplusplus+0)
582#define ECB_CPP11 (__cplusplus >= 201103L) 587#define ECB_CPP11 (__cplusplus >= 201103L)
588
589#if ECB_CPP
590 #define ECB_C 0
591 #define ECB_STDC_VERSION 0
592#else
593 #define ECB_C 1
594 #define ECB_STDC_VERSION __STDC_VERSION__
595#endif
596
597#define ECB_C99 (ECB_STDC_VERSION >= 199901L)
598#define ECB_C11 (ECB_STDC_VERSION >= 201112L)
583 599
584#if ECB_CPP 600#if ECB_CPP
585 #define ECB_EXTERN_C extern "C" 601 #define ECB_EXTERN_C extern "C"
586 #define ECB_EXTERN_C_BEG ECB_EXTERN_C { 602 #define ECB_EXTERN_C_BEG ECB_EXTERN_C {
587 #define ECB_EXTERN_C_END } 603 #define ECB_EXTERN_C_END }
620 || defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ 636 || defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__
621 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory") 637 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory")
622 #elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \ 638 #elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \
623 || defined __ARM_ARCH_7M__ || defined __ARM_ARCH_7R__ 639 || defined __ARM_ARCH_7M__ || defined __ARM_ARCH_7R__
624 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory") 640 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory")
641 #elif __aarch64__
642 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb ish" : : : "memory")
625 #elif __sparc || __sparc__ 643 #elif (__sparc || __sparc__) && !__sparcv8
626 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory") 644 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory")
627 #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory") 645 #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory")
628 #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore") 646 #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore")
629 #elif defined __s390__ || defined __s390x__ 647 #elif defined __s390__ || defined __s390x__
630 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory") 648 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory")
631 #elif defined __mips__ 649 #elif defined __mips__
632 /* GNU/Linux emulates sync on mips1 architectures, so we force it's use */ 650 /* GNU/Linux emulates sync on mips1 architectures, so we force its use */
633 /* anybody else who still uses mips1 is supposed to send in their version, with detection code. */ 651 /* anybody else who still uses mips1 is supposed to send in their version, with detection code. */
634 #define ECB_MEMORY_FENCE __asm__ __volatile__ (".set mips2; sync; .set mips0" : : : "memory") 652 #define ECB_MEMORY_FENCE __asm__ __volatile__ (".set mips2; sync; .set mips0" : : : "memory")
635 #elif defined __alpha__ 653 #elif defined __alpha__
636 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory") 654 #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory")
637 #elif defined __hppa__ 655 #elif defined __hppa__
651 669
652#ifndef ECB_MEMORY_FENCE 670#ifndef ECB_MEMORY_FENCE
653 #if ECB_GCC_VERSION(4,7) 671 #if ECB_GCC_VERSION(4,7)
654 /* see comment below (stdatomic.h) about the C11 memory model. */ 672 /* see comment below (stdatomic.h) about the C11 memory model. */
655 #define ECB_MEMORY_FENCE __atomic_thread_fence (__ATOMIC_SEQ_CST) 673 #define ECB_MEMORY_FENCE __atomic_thread_fence (__ATOMIC_SEQ_CST)
674 #define ECB_MEMORY_FENCE_ACQUIRE __atomic_thread_fence (__ATOMIC_ACQUIRE)
675 #define ECB_MEMORY_FENCE_RELEASE __atomic_thread_fence (__ATOMIC_RELEASE)
656 676
657 /* The __has_feature syntax from clang is so misdesigned that we cannot use it 677 /* The __has_feature syntax from clang is so misdesigned that we cannot use it
658 * without risking compile time errors with other compilers. We *could* 678 * without risking compile time errors with other compilers. We *could*
659 * define our own ecb_clang_has_feature, but I just can't be bothered to work 679 * define our own ecb_clang_has_feature, but I just can't be bothered to work
660 * around this shit time and again. 680 * around this shit time and again.
661 * #elif defined __clang && __has_feature (cxx_atomic) 681 * #elif defined __clang && __has_feature (cxx_atomic)
662 * // see comment below (stdatomic.h) about the C11 memory model. 682 * // see comment below (stdatomic.h) about the C11 memory model.
663 * #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST) 683 * #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST)
684 * #define ECB_MEMORY_FENCE_ACQUIRE __c11_atomic_thread_fence (__ATOMIC_ACQUIRE)
685 * #define ECB_MEMORY_FENCE_RELEASE __c11_atomic_thread_fence (__ATOMIC_RELEASE)
664 */ 686 */
665 687
666 #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__ 688 #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__
667 #define ECB_MEMORY_FENCE __sync_synchronize () 689 #define ECB_MEMORY_FENCE __sync_synchronize ()
690 #elif _MSC_VER >= 1500 /* VC++ 2008 */
691 /* apparently, microsoft broke all the memory barrier stuff in Visual Studio 2008... */
692 #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
693 #define ECB_MEMORY_FENCE _ReadWriteBarrier (); MemoryBarrier()
694 #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier (); MemoryBarrier() /* according to msdn, _ReadBarrier is not a load fence */
695 #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier (); MemoryBarrier()
668 #elif _MSC_VER >= 1400 /* VC++ 2005 */ 696 #elif _MSC_VER >= 1400 /* VC++ 2005 */
669 #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier) 697 #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier)
670 #define ECB_MEMORY_FENCE _ReadWriteBarrier () 698 #define ECB_MEMORY_FENCE _ReadWriteBarrier ()
671 #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */ 699 #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */
672 #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier () 700 #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier ()
692 /* any fence other than seq_cst, which isn't very efficient for us. */ 720 /* any fence other than seq_cst, which isn't very efficient for us. */
693 /* Why that is, we don't know - either the C11 memory model is quite useless */ 721 /* Why that is, we don't know - either the C11 memory model is quite useless */
694 /* for most usages, or gcc and clang have a bug */ 722 /* for most usages, or gcc and clang have a bug */
695 /* I *currently* lean towards the latter, and inefficiently implement */ 723 /* I *currently* lean towards the latter, and inefficiently implement */
696 /* all three of ecb's fences as a seq_cst fence */ 724 /* all three of ecb's fences as a seq_cst fence */
725 /* Update, gcc-4.8 generates mfence for all c++ fences, but nothing */
726 /* for all __atomic_thread_fence's except seq_cst */
697 #define ECB_MEMORY_FENCE atomic_thread_fence (memory_order_seq_cst) 727 #define ECB_MEMORY_FENCE atomic_thread_fence (memory_order_seq_cst)
698 #endif 728 #endif
699#endif 729#endif
700 730
701#ifndef ECB_MEMORY_FENCE 731#ifndef ECB_MEMORY_FENCE
758 #define ecb_is_constant(expr) __builtin_constant_p (expr) 788 #define ecb_is_constant(expr) __builtin_constant_p (expr)
759 #define ecb_expect(expr,value) __builtin_expect ((expr),(value)) 789 #define ecb_expect(expr,value) __builtin_expect ((expr),(value))
760 #define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality) 790 #define ecb_prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
761#else 791#else
762 #define ecb_attribute(attrlist) 792 #define ecb_attribute(attrlist)
793
794 /* possible C11 impl for integral types
795 typedef struct ecb_is_constant_struct ecb_is_constant_struct;
796 #define ecb_is_constant(expr) _Generic ((1 ? (struct ecb_is_constant_struct *)0 : (void *)((expr) - (expr)), ecb_is_constant_struct *: 0, default: 1)) */
797
763 #define ecb_is_constant(expr) 0 798 #define ecb_is_constant(expr) 0
764 #define ecb_expect(expr,value) (expr) 799 #define ecb_expect(expr,value) (expr)
765 #define ecb_prefetch(addr,rw,locality) 800 #define ecb_prefetch(addr,rw,locality)
766#endif 801#endif
767 802
1053/* the only noteworthy exception is ancient armle, which uses order 43218765 */ 1088/* the only noteworthy exception is ancient armle, which uses order 43218765 */
1054#if 0 \ 1089#if 0 \
1055 || __i386 || __i386__ \ 1090 || __i386 || __i386__ \
1056 || __amd64 || __amd64__ || __x86_64 || __x86_64__ \ 1091 || __amd64 || __amd64__ || __x86_64 || __x86_64__ \
1057 || __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__ \ 1092 || __powerpc__ || __ppc__ || __powerpc64__ || __ppc64__ \
1058 || defined __arm__ && defined __ARM_EABI__ \
1059 || defined __s390__ || defined __s390x__ \ 1093 || defined __s390__ || defined __s390x__ \
1060 || defined __mips__ \ 1094 || defined __mips__ \
1061 || defined __alpha__ \ 1095 || defined __alpha__ \
1062 || defined __hppa__ \ 1096 || defined __hppa__ \
1063 || defined __ia64__ \ 1097 || defined __ia64__ \
1064 || defined __m68k__ \ 1098 || defined __m68k__ \
1065 || defined __m88k__ \ 1099 || defined __m88k__ \
1066 || defined __sh__ \ 1100 || defined __sh__ \
1067 || defined _M_IX86 || defined _M_AMD64 || defined _M_IA64 1101 || defined _M_IX86 || defined _M_AMD64 || defined _M_IA64 \
1102 || (defined __arm__ && (defined __ARM_EABI__ || defined __EABI__ || defined __VFP_FP__ || defined _WIN32_WCE || defined __ANDROID__)) \
1103 || defined __aarch64__
1068 #define ECB_STDFP 1 1104 #define ECB_STDFP 1
1069 #include <string.h> /* for memcpy */ 1105 #include <string.h> /* for memcpy */
1070#else 1106#else
1071 #define ECB_STDFP 0 1107 #define ECB_STDFP 0
1072 #include <math.h> /* for frexp*, ldexp* */
1073#endif 1108#endif
1074 1109
1075#ifndef ECB_NO_LIBM 1110#ifndef ECB_NO_LIBM
1111
1112 #include <math.h> /* for frexp*, ldexp*, INFINITY, NAN */
1113
1114 /* only the oldest of old doesn't have this one. solaris. */
1115 #ifdef INFINITY
1116 #define ECB_INFINITY INFINITY
1117 #else
1118 #define ECB_INFINITY HUGE_VAL
1119 #endif
1120
1121 #ifdef NAN
1122 #define ECB_NAN NAN
1123 #else
1124 #define ECB_NAN ECB_INFINITY
1125 #endif
1126
1127 /* converts an ieee half/binary16 to a float */
1128 ecb_function_ float ecb_binary16_to_float (uint16_t x) ecb_const;
1129 ecb_function_ float
1130 ecb_binary16_to_float (uint16_t x)
1131 {
1132 int e = (x >> 10) & 0x1f;
1133 int m = x & 0x3ff;
1134 float r;
1135
1136 if (!e ) r = ldexpf (m , -24);
1137 else if (e != 31) r = ldexpf (m + 0x400, e - 25);
1138 else if (m ) r = ECB_NAN;
1139 else r = ECB_INFINITY;
1140
1141 return x & 0x8000 ? -r : r;
1142 }
1076 1143
1077 /* convert a float to ieee single/binary32 */ 1144 /* convert a float to ieee single/binary32 */
1078 ecb_function_ uint32_t ecb_float_to_binary32 (float x) ecb_const; 1145 ecb_function_ uint32_t ecb_float_to_binary32 (float x) ecb_const;
1079 ecb_function_ uint32_t 1146 ecb_function_ uint32_t
1080 ecb_float_to_binary32 (float x) 1147 ecb_float_to_binary32 (float x)
2524{ 2591{
2525 return userdata; 2592 return userdata;
2526} 2593}
2527 2594
2528void 2595void
2529ev_set_invoke_pending_cb (EV_P_ void (*invoke_pending_cb)(EV_P)) EV_THROW 2596ev_set_invoke_pending_cb (EV_P_ ev_loop_callback invoke_pending_cb) EV_THROW
2530{ 2597{
2531 invoke_cb = invoke_pending_cb; 2598 invoke_cb = invoke_pending_cb;
2532} 2599}
2533 2600
2534void 2601void
2535ev_set_loop_release_cb (EV_P_ void (*release)(EV_P) EV_THROW, void (*acquire)(EV_P) EV_THROW) EV_THROW 2602ev_set_loop_release_cb (EV_P_ ev_loop_callback_nothrow release, ev_loop_callback_nothrow acquire) EV_THROW
2536{ 2603{
2537 release_cb = release; 2604 release_cb = release;
2538 acquire_cb = acquire; 2605 acquire_cb = acquire;
2539} 2606}
2540#endif 2607#endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines