18 #ifndef __STARPU_UTIL_H__ 
   19 #define __STARPU_UTIL_H__ 
   37 #if defined __GNUC__ && defined __GNUC_MINOR__ 
   38 # define STARPU_GNUC_PREREQ(maj, min) \ 
   39         ((__GNUC__ << 16) + __GNUC_MINOR__ >= ((maj) << 16) + (min)) 
   41 # define STARPU_GNUC_PREREQ(maj, min) 0 
   45 #  define STARPU_UNLIKELY(expr)          (__builtin_expect(!!(expr),0)) 
   46 #  define STARPU_LIKELY(expr)            (__builtin_expect(!!(expr),1)) 
   47 #  define STARPU_ATTRIBUTE_UNUSED                  __attribute__((unused)) 
   48 #  define STARPU_ATTRIBUTE_NORETURN                  __attribute__((noreturn)) 
   49 #  define STARPU_ATTRIBUTE_INTERNAL      __attribute__ ((visibility ("internal"))) 
   50 #  define STARPU_ATTRIBUTE_MALLOC                  __attribute__((malloc)) 
   51 #  define STARPU_ATTRIBUTE_WARN_UNUSED_RESULT      __attribute__((warn_unused_result)) 
   52 #  define STARPU_ATTRIBUTE_PURE                    __attribute__((pure)) 
   53 #  define STARPU_ATTRIBUTE_ALIGNED(size)           __attribute__((aligned(size))) 
   55 #  define STARPU_UNLIKELY(expr)          (expr) 
   56 #  define STARPU_LIKELY(expr)            (expr) 
   57 #  define STARPU_ATTRIBUTE_UNUSED 
   58 #  define STARPU_ATTRIBUTE_NORETURN 
   59 #  define STARPU_ATTRIBUTE_INTERNAL 
   60 #  define STARPU_ATTRIBUTE_MALLOC 
   61 #  define STARPU_ATTRIBUTE_WARN_UNUSED_RESULT 
   62 #  define STARPU_ATTRIBUTE_PURE 
   63 #  define STARPU_ATTRIBUTE_ALIGNED(size) 
   68 #if defined(c_plusplus) || defined(__cplusplus) 
   69 #  define STARPU_INLINE inline 
   70 #elif defined(_MSC_VER) || defined(__HP_cc) 
   71 #  define STARPU_INLINE __inline 
   73 #  define STARPU_INLINE __inline__ 
   76 #if STARPU_GNUC_PREREQ(3, 1) && !defined(BUILDING_STARPU) && !defined(STARPU_USE_DEPRECATED_API) && !defined(STARPU_USE_DEPRECATED_ONE_ZERO_API) 
   77 #define STARPU_DEPRECATED  __attribute__((__deprecated__)) 
   79 #define STARPU_DEPRECATED 
   82 #if STARPU_GNUC_PREREQ(3,3) 
   83 #define STARPU_WARN_UNUSED_RESULT __attribute__((__warn_unused_result__)) 
   85 #define STARPU_WARN_UNUSED_RESULT 
   88 #define STARPU_POISON_PTR       ((void *)0xdeadbeef) 
   90 #define STARPU_MIN(a,b) ((a)<(b)?(a):(b)) 
   91 #define STARPU_MAX(a,b) ((a)<(b)?(b):(a)) 
   93 #define STARPU_BACKTRACE_LENGTH 32 
   95 #  define STARPU_DUMP_BACKTRACE() do { \ 
   96         void *__ptrs[STARPU_BACKTRACE_LENGTH]; \ 
   97         int __n = backtrace(__ptrs, STARPU_BACKTRACE_LENGTH); \ 
   98         backtrace_symbols_fd(__ptrs, __n, 2); \ 
  101 #  define STARPU_DUMP_BACKTRACE() do { } while (0) 
  104 #ifdef STARPU_NO_ASSERT 
  105 #define STARPU_ASSERT(x)                do { } while(0) 
  106 #define STARPU_ASSERT_MSG(x, msg, ...)  do { } while(0) 
  108 #  if defined(__CUDACC__) && defined(STARPU_HAVE_WINDOWS) 
  109 #    define STARPU_ASSERT(x)            do { if (STARPU_UNLIKELY(!(x))) *(int*)NULL = 0; } while(0) 
  110 #    define STARPU_ASSERT_MSG(x, msg, ...)      do { if (STARPU_UNLIKELY(!(x))) { fprintf(stderr, "[starpu][%s][assert failure] " msg "\n", __starpu_func__, ## __VA_ARGS__); *(int*)NULL = 0; }} while(0) 
  112 #    define STARPU_ASSERT(x)            do { if (STARPU_UNLIKELY(!(x))) { STARPU_DUMP_BACKTRACE(); assert(x); } } while (0) 
  113 #    define STARPU_ASSERT_MSG(x, msg, ...)      do { if (STARPU_UNLIKELY(!(x))) { fprintf(stderr, "[starpu][%s][assert failure] " msg "\n", __starpu_func__, ## __VA_ARGS__); STARPU_DUMP_BACKTRACE(); assert(x); } } while(0) 
  118 #define STARPU_ABORT() do {                                          \ 
  119         fprintf(stderr, "[starpu][abort][%s()@%s:%d]\n", __starpu_func__, __FILE__, __LINE__); \ 
  123 #define STARPU_ABORT_MSG(msg, ...) do {                                 \ 
  124         fprintf(stderr, "[starpu][abort][%s()@%s:%d] " msg "\n", __starpu_func__, __FILE__, __LINE__, ## __VA_ARGS__); \ 
  128 #if defined(STARPU_HAVE_STRERROR_R) 
  129 #  define STARPU_CHECK_RETURN_VALUE(err, message, ...) {if (STARPU_UNLIKELY(err != 0)) { \ 
  130                         char xmessage[256]; strerror_r(-err, xmessage, 256); \ 
  131                         fprintf(stderr, "[starpu] Unexpected value: <%d:%s> returned for " message "\n", err, xmessage, ## __VA_ARGS__); \ 
  133 #  define STARPU_CHECK_RETURN_VALUE_IS(err, value, message, ...) {if (STARPU_UNLIKELY(err != value)) { \ 
  134                         char xmessage[256]; strerror_r(-err, xmessage, 256); \ 
  135                         fprintf(stderr, "[starpu] Unexpected value: <%d!=%d:%s> returned for " message "\n", err, value, xmessage, ## __VA_ARGS__); \ 
  138 #  define STARPU_CHECK_RETURN_VALUE(err, message, ...) {if (STARPU_UNLIKELY(err != 0)) { \ 
  139                         fprintf(stderr, "[starpu] Unexpected value: <%d> returned for " message "\n", err, ## __VA_ARGS__); \ 
  141 #  define STARPU_CHECK_RETURN_VALUE_IS(err, value, message, ...) {if (STARPU_UNLIKELY(err != value)) { \ 
  142                         fprintf(stderr, "[starpu] Unexpected value: <%d != %d> returned for " message "\n", err, value, ## __VA_ARGS__); \ 
  146 #if defined(__i386__) || defined(__x86_64__) 
  148 static __starpu_inline 
unsigned starpu_cmpxchg(
unsigned *ptr, 
unsigned old, 
unsigned next)
 
  150         __asm__ __volatile__(
"lock cmpxchgl %2,%1": 
"+a" (old), 
"+m" (*ptr) : 
"q" (next) : 
"memory");
 
  153 static __starpu_inline 
unsigned starpu_xchg(
unsigned *ptr, 
unsigned next)
 
  156         __asm__ __volatile__(
"xchgl %1,%0": 
"+m" (*ptr), 
"+q" (next) : : 
"memory");
 
  159 #define STARPU_HAVE_XCHG 
  162 #define STARPU_ATOMIC_SOMETHING(name,expr) \ 
  163 static __starpu_inline unsigned starpu_atomic_##name(unsigned *ptr, unsigned value) \ 
  165         unsigned old, next; \ 
  170                 if (starpu_cmpxchg(ptr, old, next) == old) \ 
  176 #ifdef STARPU_HAVE_SYNC_FETCH_AND_ADD 
  177 #define STARPU_ATOMIC_ADD(ptr, value)  (__sync_fetch_and_add ((ptr), (value)) + (value)) 
  178 #elif defined(STARPU_HAVE_XCHG) 
  179 STARPU_ATOMIC_SOMETHING(add, old + 
value)
 
  180 #define STARPU_ATOMIC_ADD(ptr, value) starpu_atomic_add(ptr, value) 
  183 #ifdef STARPU_HAVE_SYNC_FETCH_AND_OR 
  184 #define STARPU_ATOMIC_OR(ptr, value)  (__sync_fetch_and_or ((ptr), (value))) 
  185 #elif defined(STARPU_HAVE_XCHG) 
  186 STARPU_ATOMIC_SOMETHING(or, old | 
value)
 
  187 #define STARPU_ATOMIC_OR(ptr, value) starpu_atomic_or(ptr, value) 
  190 #ifdef STARPU_HAVE_SYNC_BOOL_COMPARE_AND_SWAP 
  191 #define STARPU_BOOL_COMPARE_AND_SWAP(ptr, old, value)  (__sync_bool_compare_and_swap ((ptr), (old), (value))) 
  192 #elif defined(STARPU_HAVE_XCHG) 
  193 #define STARPU_BOOL_COMPARE_AND_SWAP(ptr, old, value) (starpu_cmpxchg((ptr), (old), (value)) == (old)) 
  196 #ifdef STARPU_HAVE_SYNC_LOCK_TEST_AND_SET 
  197 #define STARPU_TEST_AND_SET(ptr, value) (__sync_lock_test_and_set ((ptr), (value))) 
  198 #define STARPU_RELEASE(ptr) (__sync_lock_release ((ptr))) 
  199 #elif defined(STARPU_HAVE_XCHG) 
  200 #define STARPU_TEST_AND_SET(ptr, value) (starpu_xchg((ptr), (value))) 
  201 #define STARPU_RELEASE(ptr) (starpu_xchg((ptr), 0)) 
  204 #ifdef STARPU_HAVE_SYNC_SYNCHRONIZE 
  205 #define STARPU_SYNCHRONIZE() __sync_synchronize() 
  206 #elif defined(__i386__) 
  207 #define STARPU_SYNCHRONIZE() __asm__ __volatile__("lock; addl $0,0(%%esp)" ::: "memory") 
  208 #elif defined(__x86_64__) 
  209 #define STARPU_SYNCHRONIZE() __asm__ __volatile__("mfence" ::: "memory") 
  210 #elif defined(__ppc__) || defined(__ppc64__) 
  211 #define STARPU_SYNCHRONIZE() __asm__ __volatile__("sync" ::: "memory") 
  214 #if defined(__i386__) || defined(__KNC__) || defined(__KNF__) 
  215 #define STARPU_RMB() __asm__ __volatile__("lock; addl $0,0(%%esp)" ::: "memory") 
  216 #define STARPU_WMB() __asm__ __volatile__("lock; addl $0,0(%%esp)" ::: "memory") 
  217 #elif defined(__x86_64__) 
  218 #define STARPU_RMB() __asm__ __volatile__("lfence" ::: "memory") 
  219 #define STARPU_WMB() __asm__ __volatile__("sfence" ::: "memory") 
  220 #elif defined(__ppc__) || defined(__ppc64__) 
  221 #define STARPU_RMB() __asm__ __volatile__("sync" ::: "memory") 
  222 #define STARPU_WMB() __asm__ __volatile__("sync" ::: "memory") 
  224 #define STARPU_RMB() STARPU_SYNCHRONIZE() 
  225 #define STARPU_WMB() STARPU_SYNCHRONIZE() 
  241 extern int _starpu_silent;
 
  243 char *starpu_getenv(
const char *str);
 
  250         strval = starpu_getenv(str);
 
  257                 val = strtol(strval, &check, 10);
 
  259                         fprintf(stderr,
"The %s environment variable must contain an integer\n", str);
 
  274 static __starpu_inline 
int starpu_get_env_number_default(
const char *str, 
int defval)
 
  283 void starpu_trace_user_event(
unsigned long code);
 
  288 void starpu_execute_on_each_worker_ex(
void (*func)(
void *), 
void *arg, uint32_t where, 
const char * 
name);
 
  294 void starpu_execute_on_specific_workers(
void (*func)(
void*), 
void * arg, 
unsigned num_workers, 
unsigned * workers, 
const char * 
name);
 
  303 #include <sys/types.h> 
  304 #include <sys/stat.h> 
  309 #if !defined(_MSC_VER) || defined(BUILDING_STARPU) 
  312 #if !defined(STARPU_HAVE_STRUCT_TIMESPEC) || defined(_MSC_VER) 
  314 #ifndef STARPU_TIMESPEC_DEFINED 
  315 #define STARPU_TIMESPEC_DEFINED 1 
  323 #if defined(__MINGW32__) || defined(__CYGWIN__) 
  324 #include <sys/time.h> 
  327 #include <sys/time.h>