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 |
… | |
… | |
355 | # define EV_USE_4HEAP EV_FEATURE_DATA |
352 | # define EV_USE_4HEAP EV_FEATURE_DATA |
356 | #endif |
353 | #endif |
357 | |
354 | |
358 | #ifndef EV_HEAP_CACHE_AT |
355 | #ifndef EV_HEAP_CACHE_AT |
359 | # define EV_HEAP_CACHE_AT EV_FEATURE_DATA |
356 | # define EV_HEAP_CACHE_AT EV_FEATURE_DATA |
|
|
357 | #endif |
|
|
358 | |
|
|
359 | #ifdef ANDROID |
|
|
360 | /* supposedly, android doesn't typedef fd_mask */ |
|
|
361 | # undef EV_USE_SELECT |
|
|
362 | # define EV_USE_SELECT 0 |
|
|
363 | /* supposedly, we need to include syscall.h, not sys/syscall.h, so just disable */ |
|
|
364 | # undef EV_USE_CLOCK_SYSCALL |
|
|
365 | # define EV_USE_CLOCK_SYSCALL 0 |
|
|
366 | #endif |
|
|
367 | |
|
|
368 | /* aix's poll.h seems to cause lots of trouble */ |
|
|
369 | #ifdef _AIX |
|
|
370 | /* AIX has a completely broken poll.h header */ |
|
|
371 | # undef EV_USE_POLL |
|
|
372 | # define EV_USE_POLL 0 |
360 | #endif |
373 | #endif |
361 | |
374 | |
362 | /* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */ |
375 | /* on linux, we can use a (slow) syscall to avoid a dependency on pthread, */ |
363 | /* which makes programs even slower. might work on other unices, too. */ |
376 | /* which makes programs even slower. might work on other unices, too. */ |
364 | #if EV_USE_CLOCK_SYSCALL |
377 | #if EV_USE_CLOCK_SYSCALL |
… | |
… | |
372 | # define EV_USE_CLOCK_SYSCALL 0 |
385 | # define EV_USE_CLOCK_SYSCALL 0 |
373 | # endif |
386 | # endif |
374 | #endif |
387 | #endif |
375 | |
388 | |
376 | /* this block fixes any misconfiguration where we know we run into trouble otherwise */ |
389 | /* this block fixes any misconfiguration where we know we run into trouble otherwise */ |
377 | |
|
|
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 | |
390 | |
384 | #ifndef CLOCK_MONOTONIC |
391 | #ifndef CLOCK_MONOTONIC |
385 | # undef EV_USE_MONOTONIC |
392 | # undef EV_USE_MONOTONIC |
386 | # define EV_USE_MONOTONIC 0 |
393 | # define EV_USE_MONOTONIC 0 |
387 | #endif |
394 | #endif |
… | |
… | |
475 | /* 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 */ |
476 | /* ECB.H BEGIN */ |
483 | /* ECB.H BEGIN */ |
477 | /* |
484 | /* |
478 | * libecb - http://software.schmorp.de/pkg/libecb |
485 | * libecb - http://software.schmorp.de/pkg/libecb |
479 | * |
486 | * |
480 | * Copyright (©) 2009-2012 Marc Alexander Lehmann <libecb@schmorp.de> |
487 | * Copyright (©) 2009-2013 Marc Alexander Lehmann <libecb@schmorp.de> |
481 | * Copyright (©) 2011 Emanuele Giaquinta |
488 | * Copyright (©) 2011 Emanuele Giaquinta |
482 | * All rights reserved. |
489 | * All rights reserved. |
483 | * |
490 | * |
484 | * 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- |
485 | * tion, are permitted provided that the following conditions are met: |
492 | * tion, are permitted provided that the following conditions are met: |
… | |
… | |
505 | |
512 | |
506 | #ifndef ECB_H |
513 | #ifndef ECB_H |
507 | #define ECB_H |
514 | #define ECB_H |
508 | |
515 | |
509 | /* 16 bits major, 16 bits minor */ |
516 | /* 16 bits major, 16 bits minor */ |
510 | #define ECB_VERSION 0x00010002 |
517 | #define ECB_VERSION 0x00010003 |
511 | |
518 | |
512 | #ifdef _WIN32 |
519 | #ifdef _WIN32 |
513 | typedef signed char int8_t; |
520 | typedef signed char int8_t; |
514 | typedef unsigned char uint8_t; |
521 | typedef unsigned char uint8_t; |
515 | typedef signed short int16_t; |
522 | typedef signed short int16_t; |
… | |
… | |
539 | #else |
546 | #else |
540 | #define ECB_PTRSIZE 4 |
547 | #define ECB_PTRSIZE 4 |
541 | #endif |
548 | #endif |
542 | #endif |
549 | #endif |
543 | |
550 | |
|
|
551 | /* work around x32 idiocy by defining proper macros */ |
|
|
552 | #if __amd64 || __x86_64 || _M_AMD64 || _M_X64 |
|
|
553 | #if _ILP32 |
|
|
554 | #define ECB_AMD64_X32 1 |
|
|
555 | #else |
|
|
556 | #define ECB_AMD64 1 |
|
|
557 | #endif |
|
|
558 | #endif |
|
|
559 | |
544 | /* many compilers define _GNUC_ to some versions but then only implement |
560 | /* many compilers define _GNUC_ to some versions but then only implement |
545 | * what their idiot authors think are the "more important" extensions, |
561 | * what their idiot authors think are the "more important" extensions, |
546 | * causing enormous grief in return for some better fake benchmark numbers. |
562 | * causing enormous grief in return for some better fake benchmark numbers. |
547 | * or so. |
563 | * or so. |
548 | * we try to detect these and simply assume they are not gcc - if they have |
564 | * we try to detect these and simply assume they are not gcc - if they have |
… | |
… | |
601 | || defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ |
617 | || defined __ARM_ARCH_6K__ || defined __ARM_ARCH_6ZK__ |
602 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory") |
618 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mcr p15,0,%0,c7,c10,5" : : "r" (0) : "memory") |
603 | #elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \ |
619 | #elif defined __ARM_ARCH_7__ || defined __ARM_ARCH_7A__ \ |
604 | || defined __ARM_ARCH_7M__ || defined __ARM_ARCH_7R__ |
620 | || defined __ARM_ARCH_7M__ || defined __ARM_ARCH_7R__ |
605 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory") |
621 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("dmb" : : : "memory") |
606 | #elif __sparc || __sparc__ |
622 | #elif (__sparc || __sparc__) && !__sparcv8 |
607 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory") |
623 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad | #StoreStore | #StoreLoad" : : : "memory") |
608 | #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory") |
624 | #define ECB_MEMORY_FENCE_ACQUIRE __asm__ __volatile__ ("membar #LoadStore | #LoadLoad" : : : "memory") |
609 | #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore") |
625 | #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("membar #LoadStore | #StoreStore") |
610 | #elif defined __s390__ || defined __s390x__ |
626 | #elif defined __s390__ || defined __s390x__ |
611 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory") |
627 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("bcr 15,0" : : : "memory") |
612 | #elif defined __mips__ |
628 | #elif defined __mips__ |
|
|
629 | /* GNU/Linux emulates sync on mips1 architectures, so we force its use */ |
|
|
630 | /* anybody else who still uses mips1 is supposed to send in their version, with detection code. */ |
613 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("sync" : : : "memory") |
631 | #define ECB_MEMORY_FENCE __asm__ __volatile__ (".set mips2; sync; .set mips0" : : : "memory") |
614 | #elif defined __alpha__ |
632 | #elif defined __alpha__ |
615 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory") |
633 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mb" : : : "memory") |
616 | #elif defined __hppa__ |
634 | #elif defined __hppa__ |
617 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory") |
635 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory") |
618 | #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("") |
636 | #define ECB_MEMORY_FENCE_RELEASE __asm__ __volatile__ ("") |
619 | #elif defined __ia64__ |
637 | #elif defined __ia64__ |
620 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mf" : : : "memory") |
638 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("mf" : : : "memory") |
|
|
639 | #elif defined __m68k__ |
|
|
640 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory") |
|
|
641 | #elif defined __m88k__ |
|
|
642 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("tb1 0,%%r0,128" : : : "memory") |
|
|
643 | #elif defined __sh__ |
|
|
644 | #define ECB_MEMORY_FENCE __asm__ __volatile__ ("" : : : "memory") |
621 | #endif |
645 | #endif |
622 | #endif |
646 | #endif |
623 | #endif |
647 | #endif |
624 | |
648 | |
625 | #ifndef ECB_MEMORY_FENCE |
649 | #ifndef ECB_MEMORY_FENCE |
… | |
… | |
636 | * #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST) |
660 | * #define ECB_MEMORY_FENCE __c11_atomic_thread_fence (__ATOMIC_SEQ_CST) |
637 | */ |
661 | */ |
638 | |
662 | |
639 | #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__ |
663 | #elif ECB_GCC_VERSION(4,4) || defined __INTEL_COMPILER || defined __clang__ |
640 | #define ECB_MEMORY_FENCE __sync_synchronize () |
664 | #define ECB_MEMORY_FENCE __sync_synchronize () |
|
|
665 | #elif _MSC_VER >= 1500 /* VC++ 2008 */ |
|
|
666 | /* apparently, microsoft broke all the memory barrier stuff in Visual Studio 2008... */ |
|
|
667 | #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier) |
|
|
668 | #define ECB_MEMORY_FENCE _ReadWriteBarrier (); MemoryBarrier() |
|
|
669 | #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier (); MemoryBarrier() /* according to msdn, _ReadBarrier is not a load fence */ |
|
|
670 | #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier (); MemoryBarrier() |
641 | #elif _MSC_VER >= 1400 /* VC++ 2005 */ |
671 | #elif _MSC_VER >= 1400 /* VC++ 2005 */ |
642 | #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier) |
672 | #pragma intrinsic(_ReadBarrier,_WriteBarrier,_ReadWriteBarrier) |
643 | #define ECB_MEMORY_FENCE _ReadWriteBarrier () |
673 | #define ECB_MEMORY_FENCE _ReadWriteBarrier () |
644 | #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */ |
674 | #define ECB_MEMORY_FENCE_ACQUIRE _ReadWriteBarrier () /* according to msdn, _ReadBarrier is not a load fence */ |
645 | #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier () |
675 | #define ECB_MEMORY_FENCE_RELEASE _WriteBarrier () |
… | |
… | |
1032 | || defined __s390__ || defined __s390x__ \ |
1062 | || defined __s390__ || defined __s390x__ \ |
1033 | || defined __mips__ \ |
1063 | || defined __mips__ \ |
1034 | || defined __alpha__ \ |
1064 | || defined __alpha__ \ |
1035 | || defined __hppa__ \ |
1065 | || defined __hppa__ \ |
1036 | || defined __ia64__ \ |
1066 | || defined __ia64__ \ |
|
|
1067 | || defined __m68k__ \ |
|
|
1068 | || defined __m88k__ \ |
|
|
1069 | || defined __sh__ \ |
1037 | || defined _M_IX86 || defined _M_AMD64 || defined _M_IA64 |
1070 | || defined _M_IX86 || defined _M_AMD64 || defined _M_IA64 |
1038 | #define ECB_STDFP 1 |
1071 | #define ECB_STDFP 1 |
1039 | #include <string.h> /* for memcpy */ |
1072 | #include <string.h> /* for memcpy */ |
1040 | #else |
1073 | #else |
1041 | #define ECB_STDFP 0 |
1074 | #define ECB_STDFP 0 |
1042 | #include <math.h> /* for frexp*, ldexp* */ |
|
|
1043 | #endif |
1075 | #endif |
1044 | |
1076 | |
1045 | #ifndef ECB_NO_LIBM |
1077 | #ifndef ECB_NO_LIBM |
|
|
1078 | |
|
|
1079 | #include <math.h> /* for frexp*, ldexp*, INFINITY, NAN */ |
|
|
1080 | |
|
|
1081 | /* only the oldest of old doesn't have this one. solaris. */ |
|
|
1082 | #ifdef INFINITY |
|
|
1083 | #define ECB_INFINITY INFINITY |
|
|
1084 | #else |
|
|
1085 | #define ECB_INFINITY HUGE_VAL |
|
|
1086 | #endif |
|
|
1087 | |
|
|
1088 | #ifdef NAN |
|
|
1089 | #define ECB_NAN NAN |
|
|
1090 | #else |
|
|
1091 | #define ECB_NAN ECB_INFINITY |
|
|
1092 | #endif |
|
|
1093 | |
|
|
1094 | /* converts an ieee half/binary16 to a float */ |
|
|
1095 | ecb_function_ float ecb_binary16_to_float (uint16_t x) ecb_const; |
|
|
1096 | ecb_function_ float |
|
|
1097 | ecb_binary16_to_float (uint16_t x) |
|
|
1098 | { |
|
|
1099 | int e = (x >> 10) & 0x1f; |
|
|
1100 | int m = x & 0x3ff; |
|
|
1101 | float r; |
|
|
1102 | |
|
|
1103 | if (!e ) r = ldexpf (m , -24); |
|
|
1104 | else if (e != 31) r = ldexpf (m + 0x400, e - 25); |
|
|
1105 | else if (m ) r = ECB_NAN; |
|
|
1106 | else r = ECB_INFINITY; |
|
|
1107 | |
|
|
1108 | return x & 0x8000 ? -r : r; |
|
|
1109 | } |
1046 | |
1110 | |
1047 | /* convert a float to ieee single/binary32 */ |
1111 | /* convert a float to ieee single/binary32 */ |
1048 | ecb_function_ uint32_t ecb_float_to_binary32 (float x) ecb_const; |
1112 | ecb_function_ uint32_t ecb_float_to_binary32 (float x) ecb_const; |
1049 | ecb_function_ uint32_t |
1113 | ecb_function_ uint32_t |
1050 | ecb_float_to_binary32 (float x) |
1114 | ecb_float_to_binary32 (float x) |
… | |
… | |
2085 | ev_syserr ("(libev) error creating signal/async pipe"); |
2149 | ev_syserr ("(libev) error creating signal/async pipe"); |
2086 | |
2150 | |
2087 | fd_intern (fds [0]); |
2151 | fd_intern (fds [0]); |
2088 | } |
2152 | } |
2089 | |
2153 | |
2090 | fd_intern (fds [1]); |
|
|
2091 | |
|
|
2092 | evpipe [0] = fds [0]; |
2154 | evpipe [0] = fds [0]; |
2093 | |
2155 | |
2094 | if (evpipe [1] < 0) |
2156 | if (evpipe [1] < 0) |
2095 | evpipe [1] = fds [1]; /* first call, set write fd */ |
2157 | evpipe [1] = fds [1]; /* first call, set write fd */ |
2096 | else |
2158 | else |
… | |
… | |
2101 | /* so must not be executed on windows */ |
2163 | /* so must not be executed on windows */ |
2102 | |
2164 | |
2103 | dup2 (fds [1], evpipe [1]); |
2165 | dup2 (fds [1], evpipe [1]); |
2104 | close (fds [1]); |
2166 | close (fds [1]); |
2105 | } |
2167 | } |
|
|
2168 | |
|
|
2169 | fd_intern (evpipe [1]); |
2106 | |
2170 | |
2107 | ev_io_set (&pipe_w, evpipe [0] < 0 ? evpipe [1] : evpipe [0], EV_READ); |
2171 | ev_io_set (&pipe_w, evpipe [0] < 0 ? evpipe [1] : evpipe [0], EV_READ); |
2108 | ev_io_start (EV_A_ &pipe_w); |
2172 | ev_io_start (EV_A_ &pipe_w); |
2109 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
2173 | ev_unref (EV_A); /* watcher should not keep loop alive */ |
2110 | } |
2174 | } |
… | |
… | |
2229 | |
2293 | |
2230 | void |
2294 | void |
2231 | ev_feed_signal (int signum) EV_THROW |
2295 | ev_feed_signal (int signum) EV_THROW |
2232 | { |
2296 | { |
2233 | #if EV_MULTIPLICITY |
2297 | #if EV_MULTIPLICITY |
|
|
2298 | EV_P; |
2234 | ECB_MEMORY_FENCE_ACQUIRE; |
2299 | ECB_MEMORY_FENCE_ACQUIRE; |
2235 | EV_P = signals [signum - 1].loop; |
2300 | EV_A = signals [signum - 1].loop; |
2236 | |
2301 | |
2237 | if (!EV_A) |
2302 | if (!EV_A) |
2238 | return; |
2303 | return; |
2239 | #endif |
2304 | #endif |
2240 | |
2305 | |
… | |
… | |
2493 | { |
2558 | { |
2494 | return userdata; |
2559 | return userdata; |
2495 | } |
2560 | } |
2496 | |
2561 | |
2497 | void |
2562 | void |
2498 | ev_set_invoke_pending_cb (EV_P_ void (*invoke_pending_cb)(EV_P)) EV_THROW |
2563 | ev_set_invoke_pending_cb (EV_P_ ev_loop_callback invoke_pending_cb) EV_THROW |
2499 | { |
2564 | { |
2500 | invoke_cb = invoke_pending_cb; |
2565 | invoke_cb = invoke_pending_cb; |
2501 | } |
2566 | } |
2502 | |
2567 | |
2503 | void |
2568 | void |
2504 | ev_set_loop_release_cb (EV_P_ void (*release)(EV_P) EV_THROW, void (*acquire)(EV_P) EV_THROW) EV_THROW |
2569 | ev_set_loop_release_cb (EV_P_ ev_loop_callback_nothrow release, ev_loop_callback_nothrow acquire) EV_THROW |
2505 | { |
2570 | { |
2506 | release_cb = release; |
2571 | release_cb = release; |
2507 | acquire_cb = acquire; |
2572 | acquire_cb = acquire; |
2508 | } |
2573 | } |
2509 | #endif |
2574 | #endif |