45   ompd_rc_t ret = ompd_rc_ok;  in ompd_initialize()  local
59   return ret;  in ompd_initialize()
74   ompd_rc_t ret = initTypeSizes(context);  in ompd_process_initialize()  local
75   if (ret != ompd_rc_ok)  in ompd_process_initialize()
76     return ret;  in ompd_process_initialize()
78   ret = TValue(context, "ompd_state")  in ompd_process_initialize()
81   if (ret != ompd_rc_ok)  in ompd_process_initialize()
82     return ret;  in ompd_process_initialize()
83   ret = callbacks->alloc_memory(sizeof(ompd_address_space_handle_t),  in ompd_process_initialize()
85   if (ret != ompd_rc_ok)  in ompd_process_initialize()
86     return ret;  in ompd_process_initialize()
106   ompd_rc_t ret;  in ompd_get_omp_version()  local
115   ret = TValue(context, "__kmp_openmp_version")  in ompd_get_omp_version()
118   return ret;  in ompd_get_omp_version()
131   ompd_rc_t ret;  in ompd_get_omp_version_string()  local
133   ret = callbacks->alloc_memory(10, /* max digit can be store on int*/  in ompd_get_omp_version_string()
136   if (ret != ompd_rc_ok)  in ompd_get_omp_version_string()
137     return ret;  in ompd_get_omp_version_string()
139   ret = TValue(context, "__kmp_openmp_version")  in ompd_get_omp_version_string()
142   if (ret != ompd_rc_ok)  in ompd_get_omp_version_string()
143     return ret;  in ompd_get_omp_version_string()
147   return ret;  in ompd_get_omp_version_string()
157   ompd_rc_t ret = callbacks->free_memory((void *)(addr_handle));  in ompd_rel_address_space_handle()  local
159   return ret;  in ompd_rel_address_space_handle()
187   ompd_rc_t ret;  in ompd_get_thread_in_parallel()  local
197   ret = ompd_get_num_threads(parallel_handle, &team_size_var);  in ompd_get_thread_in_parallel()
198   if (ret != ompd_rc_ok)  in ompd_get_thread_in_parallel()
199     return ret;  in ompd_get_thread_in_parallel()
205   ret = TValue(context, parallel_handle->th) /* t */  in ompd_get_thread_in_parallel()
213   if (ret != ompd_rc_ok)  in ompd_get_thread_in_parallel()
214     return ret;  in ompd_get_thread_in_parallel()
216   ret = callbacks->alloc_memory(sizeof(ompd_thread_handle_t),  in ompd_get_thread_in_parallel()
218   if (ret != ompd_rc_ok)  in ompd_get_thread_in_parallel()
219     return ret;  in ompd_get_thread_in_parallel()
223   return ret;  in ompd_get_thread_in_parallel()
232   ompd_rc_t ret = callbacks->free_memory((void *)(thread_handle));  in ompd_rel_thread_handle()  local
233   if (ret != ompd_rc_ok)  in ompd_rel_thread_handle()
234     return ret;  in ompd_rel_thread_handle()
275   ompd_rc_t ret;  in ompd_get_curr_parallel_handle()  local
286   ret = teamdata.getAddress(&taddr);  in ompd_get_curr_parallel_handle()
287   if (ret != ompd_rc_ok)  in ompd_get_curr_parallel_handle()
288     return ret;  in ompd_get_curr_parallel_handle()
291   ret = teamdata.cast("kmp_base_team_t", 0)  in ompd_get_curr_parallel_handle()
295   if (ret != ompd_rc_ok)  in ompd_get_curr_parallel_handle()
296     return ret;  in ompd_get_curr_parallel_handle()
298   ret = callbacks->alloc_memory(sizeof(ompd_parallel_handle_t),  in ompd_get_curr_parallel_handle()
300   if (ret != ompd_rc_ok)  in ompd_get_curr_parallel_handle()
301     return ret;  in ompd_get_curr_parallel_handle()
329   ompd_rc_t ret;  in ompd_get_enclosing_parallel_handle()  local
331   ret = ompd_rc_stale_handle;  in ompd_get_enclosing_parallel_handle()
335     ret = lwtValue.cast("ompt_lw_taskteam_t", 0)  in ompd_get_enclosing_parallel_handle()
341   if (ret != ompd_rc_ok) { // no lwt or parent==0x0  in ompd_get_enclosing_parallel_handle()
350     ret = teamdata.getAddress(&taddr);  in ompd_get_enclosing_parallel_handle()
351     if (ret != ompd_rc_ok)  in ompd_get_enclosing_parallel_handle()
352       return ret;  in ompd_get_enclosing_parallel_handle()
355     ret = teamdata.cast("kmp_base_team_t", 0)  in ompd_get_enclosing_parallel_handle()
359     if (ret != ompd_rc_ok)  in ompd_get_enclosing_parallel_handle()
360       return ret;  in ompd_get_enclosing_parallel_handle()
363   ret = callbacks->alloc_memory(sizeof(ompd_parallel_handle_t),  in ompd_get_enclosing_parallel_handle()
365   if (ret != ompd_rc_ok)  in ompd_get_enclosing_parallel_handle()
366     return ret;  in ompd_get_enclosing_parallel_handle()
393   ompd_rc_t ret;  in ompd_get_task_parallel_handle()  local
395   ret = TValue(context, task_handle->th)  in ompd_get_task_parallel_handle()
402   if (ret != ompd_rc_ok)  in ompd_get_task_parallel_handle()
403     return ret;  in ompd_get_task_parallel_handle()
405   ret = callbacks->alloc_memory(sizeof(ompd_parallel_handle_t),  in ompd_get_task_parallel_handle()
407   if (ret != ompd_rc_ok)  in ompd_get_task_parallel_handle()
408     return ret;  in ompd_get_task_parallel_handle()
421   ompd_rc_t ret = callbacks->free_memory((void *)(parallel_handle));  in ompd_rel_parallel_handle()  local
422   if (ret != ompd_rc_ok)  in ompd_rel_parallel_handle()
423     return ret;  in ompd_rel_parallel_handle()
474   ompd_rc_t ret = ompd_rc_ok;  in ompd_get_curr_task_handle()  local
484   ret = taskdata.dereference().getAddress(&taddr);  in ompd_get_curr_task_handle()
485   if (ret != ompd_rc_ok)  in ompd_get_curr_task_handle()
486     return ret;  in ompd_get_curr_task_handle()
488   ret = taskdata  in ompd_get_curr_task_handle()
497   if (ret != ompd_rc_ok)  in ompd_get_curr_task_handle()
498     return ret;  in ompd_get_curr_task_handle()
500   ret = callbacks->alloc_memory(sizeof(ompd_task_handle_t),  in ompd_get_curr_task_handle()
502   if (ret != ompd_rc_ok)  in ompd_get_curr_task_handle()
503     return ret;  in ompd_get_curr_task_handle()
529   ompd_rc_t ret = ompd_rc_stale_handle;  in ompd_get_generating_task_handle()  local
533     ret = lwtValue.cast("ompt_lw_taskteam_t", 0)  in ompd_get_generating_task_handle()
539   if (ret != ompd_rc_ok) { // no lwt or parent==0x0  in ompd_get_generating_task_handle()
546     ret = taskdata.dereference().getAddress(&taddr);  in ompd_get_generating_task_handle()
547     if (ret != ompd_rc_ok)  in ompd_get_generating_task_handle()
548       return ret;  in ompd_get_generating_task_handle()
551     ret = taskdata  in ompd_get_generating_task_handle()
559     if (ret != ompd_rc_ok)  in ompd_get_generating_task_handle()
560       return ret;  in ompd_get_generating_task_handle()
563   ret = callbacks->alloc_memory(sizeof(ompd_task_handle_t),  in ompd_get_generating_task_handle()
565   if (ret != ompd_rc_ok)  in ompd_get_generating_task_handle()
566     return ret;  in ompd_get_generating_task_handle()
571   return ret;  in ompd_get_generating_task_handle()
591   ompd_rc_t ret;  in ompd_get_scheduling_task_handle()  local
593   ret = TValue(context, task_handle->th)  in ompd_get_scheduling_task_handle()
605   if (ret != ompd_rc_ok)  in ompd_get_scheduling_task_handle()
606     return ret;  in ompd_get_scheduling_task_handle()
607   ret = callbacks->alloc_memory(sizeof(ompd_task_handle_t),  in ompd_get_scheduling_task_handle()
609   if (ret != ompd_rc_ok)  in ompd_get_scheduling_task_handle()
610     return ret;  in ompd_get_scheduling_task_handle()
615   return ret;  in ompd_get_scheduling_task_handle()
635   ompd_rc_t ret;  in ompd_get_task_in_parallel()  local
637   ret = ompd_get_num_threads(parallel_handle, &team_size_var);  in ompd_get_task_in_parallel()
638   if (ret != ompd_rc_ok)  in ompd_get_task_in_parallel()
639     return ret;  in ompd_get_task_in_parallel()
645   ret = TValue(context, parallel_handle->th) /* t */  in ompd_get_task_in_parallel()
653   if (ret != ompd_rc_ok)  in ompd_get_task_in_parallel()
654     return ret;  in ompd_get_task_in_parallel()
655   ret = callbacks->alloc_memory(sizeof(ompd_task_handle_t),  in ompd_get_task_in_parallel()
657   if (ret != ompd_rc_ok)  in ompd_get_task_in_parallel()
658     return ret;  in ompd_get_task_in_parallel()
663   return ret;  in ompd_get_task_in_parallel()
671   ompd_rc_t ret = callbacks->free_memory((void *)(task_handle));  in ompd_rel_task_handle()  local
672   if (ret != ompd_rc_ok)  in ompd_rel_task_handle()
673     return ret;  in ompd_rel_task_handle()
702   ompd_rc_t ret;  in ompd_get_thread_handle()  local
711   ret = callbacks->get_thread_context_for_thread_id(  in ompd_get_thread_handle()
713   if (ret != ompd_rc_ok)  in ompd_get_thread_handle()
714     return ret;  in ompd_get_thread_handle()
718   ret = TValue(context, tcontext, "__kmp_gtid")  in ompd_get_thread_handle()
721   if (ret != ompd_rc_ok)  in ompd_get_thread_handle()
722     return ret;  in ompd_get_thread_handle()
733   ret = th.getAddress(&taddr);  in ompd_get_thread_handle()
734   if (ret != ompd_rc_ok)  in ompd_get_thread_handle()
735     return ret;  in ompd_get_thread_handle()
736   ret = callbacks->alloc_memory(sizeof(ompd_thread_handle_t),  in ompd_get_thread_handle()
738   if (ret != ompd_rc_ok)  in ompd_get_thread_handle()
739     return ret;  in ompd_get_thread_handle()
744   if (ret != ompd_rc_ok)  in ompd_get_thread_handle()
745     return ret;  in ompd_get_thread_handle()
763   return ret;  in ompd_get_thread_handle()
780   ompd_rc_t ret;  in ompd_get_thread_id()  local
783   ret = tf.getType(context, "kmp_thread_t").getSize(&size);  in ompd_get_thread_id()
784   if (ret != ompd_rc_ok)  in ompd_get_thread_id()
785     return ret;  in ompd_get_thread_id()
793   ret = TValue(context, thread_handle->th) /*__kmp_threads[t]->th*/  in ompd_get_thread_id()
803   return ret;  in ompd_get_thread_id()
828   ompd_rc_t ret;  in ompd_get_state()  local
837   ret = ompt_thread_info  in ompd_get_state()
841   if (ret != ompd_rc_ok)  in ompd_get_state()
842     return ret;  in ompd_get_state()
844     ret = ompt_thread_info  in ompd_get_state()
849   return ret;  in ompd_get_state()
878   ompd_rc_t ret;  in ompd_get_task_frame()  local
892   ret = frame  in ompd_get_task_frame()
897   if (ret != ompd_rc_ok)  in ompd_get_task_frame()
898     return ret;  in ompd_get_task_frame()
901   ret = frame  in ompd_get_task_frame()
906   return ret;  in ompd_get_task_frame()
928   ompd_rc_t ret;  in ompd_get_task_function()  local
936     ret = TValue(context, task_handle->th)  in ompd_get_task_function()
942     if (ret != ompd_rc_ok)  in ompd_get_task_function()
943       return ret;  in ompd_get_task_function()
947       ret = TValue(context, task_handle->th)  in ompd_get_task_function()
959       ret = TValue(context, task_handle->th)  in ompd_get_task_function()
971   return ret;  in ompd_get_task_function()
1080   static ompd_rc_t ret;  in initTypeSizes()  local
1082     return ret;  in initTypeSizes()
1083   ret = callbacks->sizeof_type(context, &type_sizes);  in initTypeSizes()
1084   if (ret != ompd_rc_ok)  in initTypeSizes()
1085     return ret;  in initTypeSizes()
1088   ret = callbacks->sizeof_type(context, &TValue::type_sizes);  in initTypeSizes()
1089   if (ret != ompd_rc_ok)  in initTypeSizes()
1090     return ret;  in initTypeSizes()
1092   return ret;  in initTypeSizes()