roc_profiler.h File Reference

Include dependency graph for roc_profiler.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
int	rocp_init_environment (void)
int	rocp_init (void)
int	rocp_shutdown (void)
int	rocp_evt_enum (uint64_t *event_code, int modifier)
int	rocp_evt_code_to_descr (uint64_t event_code, char *descr, int len)
int	rocp_evt_name_to_code (const char *name, uint64_t *event_code)
int	rocp_evt_code_to_name (uint64_t event_code, char *name, int len)
int	rocp_evt_code_to_info (uint64_t event_code, PAPI_event_info_t *info)
int	rocp_ctx_open (uint64_t *events_id, int num_events, rocp_ctx_t *ctx)
int	rocp_ctx_close (rocp_ctx_t ctx)
int	rocp_ctx_start (rocp_ctx_t ctx)
int	rocp_ctx_stop (rocp_ctx_t ctx)
int	rocp_ctx_read (rocp_ctx_t ctx, long long **counts)
int	rocp_ctx_reset (rocp_ctx_t ctx)

Detailed Description

Author

Giuseppe Congiu gcong.nosp@m.iu@i.nosp@m.cl.ut.nosp@m.k.ed.nosp@m.u

Definition in file roc_profiler.h.

Function Documentation

rocp_ctx_close()

int rocp_ctx_close

(

rocp_ctx_t

ctx

)

Definition at line 401 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_close(rocp_ctx);
    }
 
    return intercept_ctx_close(rocp_ctx);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_ctx_open()

int rocp_ctx_open	(	uint64_t *	events_id,
		int	num_events,
		rocp_ctx_t *	ctx
	)

Definition at line 390 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_open(events_id, num_events, rocp_ctx);
    }
 
    return intercept_ctx_open(events_id, num_events, rocp_ctx);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_ctx_read()

int rocp_ctx_read	(	rocp_ctx_t	ctx,
		long long **	counts
	)

Definition at line 434 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_read(rocp_ctx, counts);
    }
 
    return intercept_ctx_read(rocp_ctx, counts);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_ctx_reset()

int rocp_ctx_reset

(

rocp_ctx_t

ctx

)

Definition at line 445 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_reset(rocp_ctx);
    }
 
    return intercept_ctx_reset(rocp_ctx);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_ctx_start()

int rocp_ctx_start

(

rocp_ctx_t

ctx

)

Definition at line 412 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_start(rocp_ctx);
    }
 
    return intercept_ctx_start(rocp_ctx);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_ctx_stop()

int rocp_ctx_stop

(

rocp_ctx_t

ctx

)

Definition at line 423 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_ctx_stop(rocp_ctx);
    }
 
    return intercept_ctx_stop(rocp_ctx);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_evt_code_to_descr()

int rocp_evt_code_to_descr	(	uint64_t	event_code,
		char *	descr,
		int	len
	)

Definition at line 260 of file roc_profiler.c.

{
    int papi_errno;
 
    event_info_t info;
    papi_errno = evt_id_to_info(event_code, &info);
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    snprintf(descr, (size_t) len, "%s", ntv_table_p->events[info.nameid].descr);
    return papi_errno;
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_evt_code_to_info()

int rocp_evt_code_to_info	(	uint64_t	event_code,
		PAPI_event_info_t *	info
	)

Definition at line 331 of file roc_profiler.c.

{
    int papi_errno;
 
    event_info_t inf;
    papi_errno = evt_id_to_info(event_code, &inf);
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    switch (inf.flags) {
        case 0:
            sprintf(info->symbol, "%s", ntv_table_p->events[inf.nameid].name);
            sprintf(info->long_descr, "%s", ntv_table_p->events[inf.nameid].descr);
            break;
        case (DEVICE_FLAG | INSTAN_FLAG):
        {
            int i;
            char devices[PAPI_MAX_STR_LEN] = { 0 };
            for (i = 0; i < device_table_p->count; ++i) {
                if (rocc_dev_check(ntv_table_p->events[inf.nameid].device_map, i)) {
                    sprintf(devices + strlen(devices), "%i,", i);
                }
            }
            *(devices + strlen(devices) - 1) = 0;
            sprintf(info->symbol, "%s:device=%i:instance=%i", ntv_table_p->events[inf.nameid].name, inf.device, inf.instance);
            sprintf(info->long_descr, "%s, masks:Mandatory device qualifier [%s]:Mandatory instance qualifier in range [0-%i]",
                    ntv_table_p->events[inf.nameid].descr, devices, ntv_table_p->events[inf.nameid].instances - 1);
            break;
        }
        case DEVICE_FLAG:
        {
            int i;
            char devices[PAPI_MAX_STR_LEN] = { 0 };
            for (i = 0; i < device_table_p->count; ++i) {
                if (rocc_dev_check(ntv_table_p->events[inf.nameid].device_map, i)) {
                    sprintf(devices + strlen(devices), "%i,", i);
                }
            }
            *(devices + strlen(devices) - 1) = 0;
            sprintf(info->symbol, "%s:device=%i", ntv_table_p->events[inf.nameid].name, inf.device);
            sprintf(info->long_descr, "%s, masks:Mandatory device qualifier [%s]",
                    ntv_table_p->events[inf.nameid].descr, devices);
            break;
        }
        case INSTAN_FLAG:
            sprintf(info->symbol, "%s:instance=%i", ntv_table_p->events[inf.nameid].name, inf.instance);
            sprintf(info->long_descr, "%s, masks:Mandatory instance qualifier in range [0-%i]",
                    ntv_table_p->events[inf.nameid].descr, ntv_table_p->events[inf.nameid].instances - 1);
            break;
        default:
            papi_errno = PAPI_EINVAL;
    }
 
    return papi_errno;
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_evt_code_to_name()

int rocp_evt_code_to_name	(	uint64_t	event_code,
		char *	name,
		int	len
	)

Definition at line 324 of file roc_profiler.c.

{
    return evt_code_to_name(event_code, name, len);
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_evt_enum()

int rocp_evt_enum	(	uint64_t *	event_code,
		int	modifier
	)

Definition at line 193 of file roc_profiler.c.

{
    int papi_errno = PAPI_OK;
    event_info_t info;
    SUBDBG("ENTER: event_code: %lu, modifier: %d\n", *event_code, modifier);
 
 
    switch(modifier) {
        case PAPI_ENUM_FIRST:
            if (ntv_table_p->count == 0) {
                papi_errno = PAPI_ENOEVNT;
                break;
            }
            info.device = 0;
            info.instance = 0;
            info.flags = 0;
            info.nameid = 0;
            papi_errno = evt_id_create(&info, event_code);
            break;
        case PAPI_ENUM_EVENTS:
            papi_errno = evt_id_to_info(*event_code, &info);
            if (papi_errno != PAPI_OK) {
                break;
            }
            if (ntv_table_p->count > info.nameid + 1) {
                info.device = 0;
                info.instance = 0;
                info.flags = 0;
                info.nameid++;
                papi_errno = evt_id_create(&info, event_code);
                break;
            }
            papi_errno = PAPI_END;
            break;
        case PAPI_NTV_ENUM_UMASKS:
            papi_errno = evt_id_to_info(*event_code, &info);
            if (papi_errno != PAPI_OK) {
                break;
            }
            if (info.flags == 0) {
                info.device = 0;
                info.instance = 0;
                info.flags = DEVICE_FLAG;
                papi_errno = evt_id_create(&info, event_code);
                break;
            }
            if (info.flags & DEVICE_FLAG) {
                if (ntv_table_p->events[info.nameid].instances > 1) {
                    info.device = 0;
                    info.instance = 0;
                    info.flags = INSTAN_FLAG;
                    papi_errno = evt_id_create(&info, event_code);
                    break;
                }
            }
            papi_errno = PAPI_END;
            break;
        default:
            papi_errno = PAPI_EINVAL;
    }
 
    SUBDBG("EXIT: %s\n", PAPI_strerror(papi_errno));
    return papi_errno;
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_evt_name_to_code()

int rocp_evt_name_to_code	(	const char *	name,
		uint64_t *	event_code
	)

Definition at line 276 of file roc_profiler.c.

{
    int papi_errno = PAPI_OK;
    int htable_errno;
    SUBDBG("ENTER: name: %s, event_code: %p\n", name, event_code);
 
    int device;
    papi_errno = evt_name_to_device(name, &device);
    if (papi_errno != PAPI_OK) {
        goto fn_exit;
    }
 
    int instance;
    papi_errno = evt_name_to_instance(name, &instance);
    if (papi_errno != PAPI_OK) {
        goto fn_exit;
    }
 
    char base[PAPI_MAX_STR_LEN] = { 0 };
    papi_errno = evt_name_to_basename(name, base, PAPI_MAX_STR_LEN);
    if (papi_errno != PAPI_OK) {
        goto fn_exit;
    }
 
    ntv_event_t *event;
    htable_errno = htable_find(htable, base, (void **) &event);
    if (htable_errno != HTABLE_SUCCESS) {
        papi_errno = (htable_errno == HTABLE_ENOVAL) ? PAPI_ENOEVNT : PAPI_ECMP;
        goto fn_exit;
    }
 
    int flags = (event->instances > 1) ? (DEVICE_FLAG | INSTAN_FLAG) : DEVICE_FLAG;
    int nameid = (int) (event - ntv_table_p->events);
    event_info_t info = { device, instance, flags, nameid };
    papi_errno = evt_id_create(&info, event_code);
    if (papi_errno != PAPI_OK) {
        goto fn_exit;
    }
 
    papi_errno = evt_id_to_info(*event_code, &info);
 
  fn_exit:
    SUBDBG("EXIT: %s\n", PAPI_strerror(papi_errno));
    return papi_errno;
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_init()

int rocp_init

(

void

)

Definition at line 159 of file roc_profiler.c.

{
    int papi_errno = PAPI_OK;
    SUBDBG("ENTER\n");
 
    papi_errno = load_rocp_sym();
    if (papi_errno != PAPI_OK) {
        goto fn_fail;
    }
 
    htable_init(&htable);
 
    if (rocm_prof_mode != ROCM_PROFILE_SAMPLING_MODE) {
        htable_init(&htable_intercept);
    }
 
    papi_errno = init_event_table();
    if (papi_errno != PAPI_OK) {
        (*hsa_shut_down_p)();
        goto fn_fail;
    }
 
    ntv_table_p = &ntv_table;
 
  fn_exit:
    SUBDBG("EXIT: %s\n", PAPI_strerror(papi_errno));
    return papi_errno;
  fn_fail:
    unload_rocp_sym();
    goto fn_exit;
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_init_environment()

int rocp_init_environment

(

void

)

Definition at line 152 of file roc_profiler.c.

{
    return init_rocp_env();
}

Here is the call graph for this function:

Here is the caller graph for this function:

rocp_shutdown()

int rocp_shutdown

(

void

)

Definition at line 456 of file roc_profiler.c.

{
    if (rocm_prof_mode == ROCM_PROFILE_SAMPLING_MODE) {
        return sampling_shutdown();
    }
 
    return intercept_shutdown();
}

Here is the call graph for this function:

Here is the caller graph for this function: