ompt-general.c File Reference

#include <assert.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "ompt-internal.h"
#include "ompt-specific.c"
#include "ompt-state.h"
#include "ompt-event.h"

Go to the source code of this file.

Data Structures
struct	ompt_state_info_t
Defines
#define	get_failure 0
#define	get_success 1
#define	no_tool_present 0
#define	ompt_event(event_name, callback_type, event_id, is_impl)
#define	ompt_event(event_name, callback_type, event_id, is_impl)
#define	ompt_state(state, code) { # state, state },
#define	set_failure 0
#define	set_success 3
Functions
_OMP_EXTERN	__attribute__ ((weak))
_OMP_EXTERN void	ompt_control (uint64_t command, uint64_t modifier)
_OMP_EXTERN int	ompt_enumerate_state (int current_state, int next_state, const char *next_state_name)
void	ompt_fini ()
_OMP_EXTERN int	ompt_get_callback (ompt_event_t evid, ompt_callback_t *cb)
_OMP_EXTERN void *	ompt_get_idle_frame ()
_OMP_EXTERN int	ompt_get_ompt_version ()
_OMP_EXTERN void *	ompt_get_parallel_function (int ancestor_level)
_OMP_EXTERN ompt_parallel_id_t	ompt_get_parallel_id (int ancestor_level)
_OMP_EXTERN int	ompt_get_runtime_version (char *buffer, int length)
_OMP_EXTERN ompt_state_t	ompt_get_state (ompt_wait_id_t *ompt_wait_id)
_OMP_EXTERN ompt_frame_t *	ompt_get_task_frame (int ancestor_level)
_OMP_EXTERN void *	ompt_get_task_function (int ancestor_level)
_OMP_EXTERN ompt_task_id_t	ompt_get_task_id (int ancestor_level)
void	ompt_init ()
_OMP_EXTERN int	ompt_set_callback (ompt_event_t evid, ompt_callback_t cb)
Variables
_OMP_EXTERN char **	ompd_dll_locations
ompt_callbacks_t	ompt_callbacks
ompt_state_info_t	ompt_state_info []
ompt_status_t	ompt_status = ompt_status_ready

Define Documentation

#define get_failure 0

Definition at line 33 of file ompt-general.c.

Referenced by ompt_get_callback().

#define get_success 1

Definition at line 32 of file ompt-general.c.

#define no_tool_present 0

Definition at line 35 of file ompt-general.c.

Referenced by __attribute__().

#define ompt_event	(	event_name,
		callback_type,
		event_id,
		is_impl	)

Value:

case event_name:  \
    if (is_impl) { \
      ompt_callback_t mycb = \
        (ompt_callback_t) ompt_callbacks.ompt_callback(event_name); \
      if (mycb) { \
        *cb = mycb; \
         return get_success; \
      } \
    } \
    return get_failure;

#define ompt_event	(	event_name,
		callback_type,
		event_id,
		is_impl	)

Value:

case event_name: \
    if (is_impl) { \
      ompt_callbacks.ompt_callback(event_name) = (callback_type) cb; \
      return set_success; \
    } \
    return set_failure;