14 #ifndef __OMPT_INTERNAL_H__ 15 #define __OMPT_INTERNAL_H__ 17 #include "ompt-event-specific.h" 18 #include "omp-tools.h" 20 #define OMPT_VERSION 1 22 #define _OMP_EXTERN extern "C" 24 #define OMPT_INVOKER(x) \ 25 ((x == fork_context_gnu) ? ompt_parallel_invoker_program \ 26 : ompt_parallel_invoker_runtime) 28 #define ompt_callback(e) e##_callback 30 typedef struct ompt_callbacks_internal_s {
31 #define ompt_event_macro(event, callback, eventid) \ 32 callback ompt_callback(event); 34 FOREACH_OMPT_EVENT(ompt_event_macro)
36 #undef ompt_event_macro 37 } ompt_callbacks_internal_t;
39 typedef struct ompt_callbacks_active_s {
40 unsigned int enabled : 1;
41 #define ompt_event_macro(event, callback, eventid) unsigned int event : 1; 43 FOREACH_OMPT_EVENT(ompt_event_macro)
45 #undef ompt_event_macro 46 } ompt_callbacks_active_t;
48 #define TASK_TYPE_DETAILS_FORMAT(info) \ 49 ((info->td_flags.task_serial || info->td_flags.tasking_ser) \ 50 ? ompt_task_undeferred \ 52 ((!(info->td_flags.tiedness)) ? ompt_task_untied : 0x0) | \ 53 (info->td_flags.final ? ompt_task_final : 0x0) | \ 54 (info->td_flags.merged_if0 ? ompt_task_mergeable : 0x0) 58 ompt_data_t task_data;
59 struct kmp_taskdata *scheduling_parent;
63 ompt_dependence_t *deps;
68 ompt_data_t parallel_data;
69 void *master_return_address;
72 typedef struct ompt_lw_taskteam_s {
73 ompt_team_info_t ompt_team_info;
74 ompt_task_info_t ompt_task_info;
76 struct ompt_lw_taskteam_s *parent;
80 ompt_data_t thread_data;
81 ompt_data_t task_data;
85 ompt_wait_id_t wait_id;
86 int ompt_task_yielded;
90 extern ompt_callbacks_internal_t ompt_callbacks;
92 #if OMP_40_ENABLED && OMPT_SUPPORT && OMPT_OPTIONAL 94 #define KMP_OMPT_DEPS_ALLOC __kmp_fast_allocate 95 #define KMP_OMPT_DEPS_FREE __kmp_fast_free 97 #define KMP_OMPT_DEPS_ALLOC __kmp_thread_malloc 98 #define KMP_OMPT_DEPS_FREE __kmp_thread_free 106 void ompt_pre_init(
void);
107 void ompt_post_init(
void);
108 void ompt_fini(
void);
110 #define OMPT_GET_RETURN_ADDRESS(level) __builtin_return_address(level) 111 #define OMPT_GET_FRAME_ADDRESS(level) __builtin_frame_address(level) 113 int __kmp_control_tool(uint64_t command, uint64_t modifier,
void *arg);
115 extern ompt_callbacks_active_t ompt_enabled;
118 #define UNLIKELY(x) (x) 119 #define OMPT_NOINLINE __declspec(noinline) 121 #define UNLIKELY(x) __builtin_expect(!!(x), 0) 122 #define OMPT_NOINLINE __attribute__((noinline))