instr.h

Go to the documentation of this file.

#ifndef GHOST_INSTR_H
#define GHOST_INSTR_H

#include "config.h"
#include <ghost/log.h>
#include <ghost/error.h>
#include <pthread.h>

#ifdef GHOST_INSTR_TIMING

#include <ghost/timing.h>

#endif

#ifdef GHOST_INSTR_LIKWID

#include <likwid.h>

#endif

extern pthread_key_t ghost_instr_enable_key;

#ifdef GHOST_INSTR_TIMING

#ifdef GHOST_INSTR_LIKWID

#define GHOST_INSTR_START(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Enter instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        ghost_timing_tick(region);\
        _Pragma("omp parallel")\
        likwid_markerStartRegion(region);\
    }\
}\

#define GHOST_INSTR_STOP(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Exit instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        ghost_timing_tock(region);\
        _Pragma("omp parallel")\
        likwid_markerStopRegion(region);\
    }\
}\
    
#else

#define GHOST_INSTR_START(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Enter instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        ghost_timing_tick(region);\
    }\
}\

#define GHOST_INSTR_STOP(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Exit instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        ghost_timing_tock(region);\
    }\
}\

#endif

#else //GHOST_INSTR_TIMING

#ifdef GHOST_INSTR_LIKWID

#define GHOST_INSTR_START(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Enter instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        _Pragma("omp parallel")\
        likwid_markerStartRegion(region);\
    }\
}\


#define GHOST_INSTR_STOP(tag) {\
    if (pthread_getspecific(ghost_instr_enable_key)) {\
        if (GHOST_VERBOSITY > 1) {\
            GHOST_DEBUG_LOG(1,"Exit instrumented region %s",tag);\
        }\
        char region[256] = "";\
        snprintf(region,256,"%s%s%s",ghost_instr_prefix_get(), tag, ghost_instr_suffix_get());\
        _Pragma("omp parallel")\
        likwid_markerStopRegion(region);\
    }\
}\
    
#else

#define GHOST_INSTR_START(tag)\
    if (GHOST_VERBOSITY > 1) {\
        GHOST_DEBUG_LOG(1,"Enter instrumented region %s",tag);\
    }\


#define GHOST_INSTR_STOP(tag) \
    if (GHOST_VERBOSITY > 1) {\
        GHOST_DEBUG_LOG(1,"Exit instrumented region %s",tag);\
    }\

#endif

#endif


#ifdef __cplusplus
extern "C" {
#endif

    void ghost_instr_prefix_set(const char *prefix);
    
    char *ghost_instr_prefix_get();
    void ghost_instr_suffix_set(const char *suffix);

    char *ghost_instr_suffix_get();
    ghost_error ghost_instr_create();
    ghost_error ghost_instr_destroy();

#ifdef __cplusplus
}
#endif

#endif