17 #ifndef __COMMON_UTILS_H__
18 #define __COMMON_UTILS_H__
22 #include <common/config.h>
31 #ifdef STARPU_HAVE_SCHED_YIELD
36 #ifdef STARPU_HAVE_HELGRIND_H
37 #include <valgrind/helgrind.h>
40 #pragma GCC visibility push(hidden)
42 #define _STARPU_STRINGIFY_(x) #x
43 #define _STARPU_STRINGIFY(x) _STARPU_STRINGIFY_(x)
46 #define DO_CREQ_v_WW(_creqF, _ty1F, _arg1F, _ty2F, _arg2F) ((void)0)
49 #define DO_CREQ_v_W(_creqF, _ty1F, _arg1F) ((void)0)
51 #ifndef ANNOTATE_HAPPENS_BEFORE
52 #define ANNOTATE_HAPPENS_BEFORE(obj) ((void)0)
54 #ifndef ANNOTATE_HAPPENS_BEFORE_FORGET_ALL
55 #define ANNOTATE_HAPPENS_BEFORE_FORGET_ALL(obj) ((void)0)
57 #ifndef ANNOTATE_HAPPENS_AFTER
58 #define ANNOTATE_HAPPENS_AFTER(obj) ((void)0)
60 #ifndef VALGRIND_HG_DISABLE_CHECKING
61 #define VALGRIND_HG_DISABLE_CHECKING(start, len) ((void)0)
63 #ifndef VALGRIND_HG_ENABLE_CHECKING
64 #define VALGRIND_HG_ENABLE_CHECKING(start, len) ((void)0)
66 #ifndef VALGRIND_STACK_REGISTER
67 #define VALGRIND_STACK_REGISTER(stackbottom, stacktop) 0
69 #ifndef VALGRIND_STACK_DEREGISTER
70 #define VALGRIND_STACK_DEREGISTER(id) ((void)0)
72 #ifndef RUNNING_ON_VALGRIND
73 #define RUNNING_ON_VALGRIND 0
75 #ifdef STARPU_SANITIZE_THREAD
76 #define STARPU_RUNNING_ON_VALGRIND 1
78 #define STARPU_RUNNING_ON_VALGRIND RUNNING_ON_VALGRIND
80 #define STARPU_HG_DISABLE_CHECKING(variable) VALGRIND_HG_DISABLE_CHECKING(&(variable), sizeof(variable))
81 #define STARPU_HG_ENABLE_CHECKING(variable) VALGRIND_HG_ENABLE_CHECKING(&(variable), sizeof(variable))
83 #define STARPU_DEBUG_PREFIX "[starpu]"
87 #if defined(__i386__) || defined(__x86_64__)
88 #define _STARPU_UYIELD() __asm__ __volatile("rep; nop")
90 #define _STARPU_UYIELD() ((void)0)
92 #if defined(STARPU_HAVE_SCHED_YIELD) && defined(STARPU_HAVE_HELGRIND_H)
93 #define STARPU_VALGRIND_YIELD() do { if (STARPU_RUNNING_ON_VALGRIND) sched_yield(); } while (0)
94 #define STARPU_UYIELD() do { if (STARPU_RUNNING_ON_VALGRIND) sched_yield(); else _STARPU_UYIELD(); } while (0)
96 #define STARPU_VALGRIND_YIELD() do { } while (0)
97 #define STARPU_UYIELD() _STARPU_UYIELD()
100 #ifdef STARPU_VERBOSE
101 # define _STARPU_DEBUG(fmt, ...) do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%s] " fmt ,__starpu_func__ ,## __VA_ARGS__); fflush(stderr); }} while(0)
102 # define _STARPU_DEBUG_NO_HEADER(fmt, ...) do { if (!_starpu_silent) {fprintf(stderr, fmt , ## __VA_ARGS__); fflush(stderr); }} while(0)
104 # define _STARPU_DEBUG(fmt, ...) do { } while (0)
105 # define _STARPU_DEBUG_NO_HEADER(fmt, ...) do { } while (0)
108 #ifdef STARPU_EXTRA_VERBOSE
109 # define _STARPU_EXTRA_DEBUG(fmt, ...) do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%s] " fmt ,__starpu_func__ ,## __VA_ARGS__); fflush(stderr); }} while(0)
111 # define _STARPU_EXTRA_DEBUG(fmt, ...) do { } while (0)
114 #ifdef STARPU_EXTRA_VERBOSE
115 # define _STARPU_LOG_IN() do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%ld][%s:%s@%d] -->\n", starpu_pthread_self(), __starpu_func__,__FILE__, __LINE__); }} while(0)
116 # define _STARPU_LOG_OUT() do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%ld][%s:%s@%d] <--\n", starpu_pthread_self(), __starpu_func__, __FILE__, __LINE__); }} while(0)
117 # define _STARPU_LOG_OUT_TAG(outtag) do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%ld][%s:%s@%d] <-- (%s)\n", starpu_pthread_self(), __starpu_func__, __FILE__, __LINE__, outtag); }} while(0)
119 # define _STARPU_LOG_IN()
120 # define _STARPU_LOG_OUT()
121 # define _STARPU_LOG_OUT_TAG(outtag)
125 #if defined(STARPU_USE_MPI)
126 #define _STARPU_MSG(fmt, ...) do { char _msghost[HOST_NAME_MAX]; gethostname(_msghost, HOST_NAME_MAX); fprintf(stderr, STARPU_DEBUG_PREFIX"[%s][%s] " fmt, _msghost, __starpu_func__, ## __VA_ARGS__); } while(0)
127 #define _STARPU_DISP(fmt, ...) do { if (!_starpu_silent) { char _disphost[HOST_NAME_MAX]; gethostname(_disphost, HOST_NAME_MAX); fprintf(stderr, STARPU_DEBUG_PREFIX"[%s][%s] " fmt, _disphost, __starpu_func__, ## __VA_ARGS__); }} while(0)
128 #define _STARPU_ERROR(fmt, ...) \
130 char _errorhost[HOST_NAME_MAX]; \
131 gethostname(_errorhost, HOST_NAME_MAX); \
132 fprintf(stderr, "\n\n[starpu][%s][%s] Error: " fmt, _errorhost, __starpu_func__, ## __VA_ARGS__); \
133 fprintf(stderr, "\n\n"); \
137 #define _STARPU_MSG(fmt, ...) do { fprintf(stderr, STARPU_DEBUG_PREFIX"[%s] " fmt ,__starpu_func__ ,## __VA_ARGS__); } while(0)
138 #define _STARPU_DISP(fmt, ...) do { if (!_starpu_silent) {fprintf(stderr, STARPU_DEBUG_PREFIX"[%s] " fmt ,__starpu_func__ ,## __VA_ARGS__); }} while(0)
139 #define _STARPU_ERROR(fmt, ...) \
141 fprintf(stderr, "\n\n[starpu][%s] Error: " fmt ,__starpu_func__ ,## __VA_ARGS__); \
142 fprintf(stderr, "\n\n"); \
148 # if defined(__cplusplus)
149 # define _STARPU_DECLTYPE(x) (decltype(x))
151 # define _STARPU_DECLTYPE(x)
154 # define _STARPU_DECLTYPE(x) (__typeof(x))
157 #define _STARPU_MALLOC(ptr, size) do { ptr = _STARPU_DECLTYPE(ptr) malloc(size); STARPU_ASSERT_MSG(ptr != NULL || size == 0, "Cannot allocate %ld bytes\n", (long) (size)); } while (0)
158 #define _STARPU_CALLOC(ptr, nmemb, size) do { ptr = _STARPU_DECLTYPE(ptr) calloc(nmemb, size); STARPU_ASSERT_MSG(ptr != NULL || size == 0, "Cannot allocate %ld bytes\n", (long) (nmemb*size)); } while (0)
159 #define _STARPU_REALLOC(ptr, size) do { void *_new_ptr = realloc(ptr, size); STARPU_ASSERT_MSG(_new_ptr != NULL || size == 0, "Cannot reallocate %ld bytes\n", (long) (size)); ptr = _STARPU_DECLTYPE(ptr) _new_ptr;} while (0)
162 #define _STARPU_IS_ZERO(a) (a == 0.0)
164 #define _STARPU_IS_ZERO(a) (fpclassify(a) == FP_ZERO)
167 char *_starpu_mkdtemp_internal(
char *tmpl) STARPU_ATTRIBUTE_VISIBILITY_DEFAULT;
168 char *_starpu_mkdtemp(
char *tmpl) STARPU_ATTRIBUTE_VISIBILITY_DEFAULT;
169 int _starpu_mkpath(
const char *s, mode_t mode);
170 void _starpu_mkpath_and_check(
const char *s, mode_t mode) STARPU_ATTRIBUTE_VISIBILITY_DEFAULT;
171 char *_starpu_mktemp(
const char *directory,
int flags,
int *fd);
175 void _starpu_rmtemp_many(
char *path,
int depth);
176 void _starpu_rmdir_many(
char *path,
int depth);
177 int _starpu_fftruncate(FILE *file,
size_t length);
178 int _starpu_ftruncate(
int fd,
size_t length);
179 int _starpu_frdlock(FILE *file);
180 int _starpu_frdunlock(FILE *file);
181 int _starpu_fwrlock(FILE *file);
182 int _starpu_fwrunlock(FILE *file);
183 char *_starpu_get_home_path(
void);
184 void _starpu_gethostname(
char *hostname,
size_t size) STARPU_ATTRIBUTE_VISIBILITY_DEFAULT;
195 struct starpu_codelet;
202 int _starpu_check_mutex_deadlock(starpu_pthread_mutex_t *mutex);
204 void _starpu_util_init(
void);
206 enum initialization { UNINITIALIZED = 0, CHANGING, INITIALIZED };
208 #pragma GCC visibility pop
const char * _starpu_codelet_get_name(struct starpu_codelet *cl)
char * _starpu_mktemp_many(const char *directory, int depth, int flags, int *fd)
const char * _starpu_job_get_task_name(struct _starpu_job *j)
const char * _starpu_job_get_model_name(struct _starpu_job *j)
void _starpu_drop_comments(FILE *f)
const char * _starpu_codelet_get_model_name(struct starpu_codelet *cl)