linux-rocm-smi.c File Reference

Include dependency graph for linux-rocm-smi.c:

Go to the source code of this file.

Data Structures
struct	rocmsmi_context_t
struct	rocmsmi_control_t

Functions
static int	_rocm_smi_init_private (void)
static int	_rocm_smi_check_n_initialize (void)
static int	_rocm_smi_init_thread (hwd_context_t *ctx)
static int	_rocm_smi_init_component (int cidx)
static int	evt_get_count (int *count)
static int	_rocm_smi_init_control_state (hwd_control_state_t *ctrl __attribute__((unused)))
static int	update_native_events (rocmsmi_control_t *, NativeInfo_t *, int)
static int	try_open_events (rocmsmi_control_t *)
static int	_rocm_smi_update_control_state (hwd_control_state_t *ctrl, NativeInfo_t *nativeInfo, int nativeCount, hwd_context_t *ctx)
int	try_open_events (rocmsmi_control_t *rocmsmi_ctl __attribute__((unused)))
static int	_rocm_smi_start (hwd_context_t *ctx, hwd_control_state_t *ctrl)
static int	_rocm_smi_read (hwd_context_t *ctx, hwd_control_state_t *ctrl, long long **values, int flags __attribute__((unused)))
static int	_rocm_smi_write (hwd_context_t *ctx, hwd_control_state_t *ctrl, long long *values)
static int	_rocm_smi_stop (hwd_context_t *ctx, hwd_control_state_t *ctrl)
static int	_rocm_smi_cleanup_eventset (hwd_control_state_t *ctrl)
static int	_rocm_smi_shutdown_thread (hwd_context_t *ctx)
static int	_rocm_smi_shutdown_component (void)
static int	_rocm_smi_reset (hwd_context_t *ctx, hwd_control_state_t *ctrl)
static int	_rocm_smi_ctrl (hwd_context_t *ctx __attribute__((unused)), int code __attribute__((unused)), _papi_int_option_t *option __attribute__((unused)))
static int	_rocm_smi_set_domain (hwd_control_state_t *ctrl __attribute__((unused)), int domain __attribute__((unused)))
static int	_rocm_smi_ntv_enum_events (unsigned int *EventCode, int modifier)
static int	_rocm_smi_ntv_code_to_name (unsigned int EventCode, char *name, int len)
static int	_rocm_smi_ntv_name_to_code (const char *name, unsigned int *EventCode)
static int	_rocm_smi_ntv_code_to_descr (unsigned int EventCode, char *desc, int len)

Variables
unsigned int	_rocm_smi_lock
papi_vector_t	_rocm_smi_vector

Function Documentation

_rocm_smi_check_n_initialize()

static int _rocm_smi_check_n_initialize ( void  )

static

Definition at line 45 of file linux-rocm-smi.c.

{
  if (!_rocm_smi_vector.cmp_info.initialized)
      return _rocm_smi_init_private();
  return _rocm_smi_vector.cmp_info.disabled;
}

Here is the call graph for this function:

Here is the caller graph for this function:

_rocm_smi_cleanup_eventset()

static int _rocm_smi_cleanup_eventset ( hwd_control_state_t *  ctrl )

static

Definition at line 285 of file linux-rocm-smi.c.

{
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (rocmsmi_ctl->rocs_ctx != NULL) {
        return PAPI_EMISC;
    }
 
    papi_free(rocmsmi_ctl->events_id);
    rocmsmi_ctl->events_id = NULL;
    rocmsmi_ctl->num_events = 0;
 
    return PAPI_OK;
}

_rocm_smi_ctrl()

static int _rocm_smi_ctrl ( hwd_context_t *ctx   __attribute__(unused), int code   __attribute__(unused), _papi_int_option_t *option   __attribute__(unused)  )

static

Definition at line 339 of file linux-rocm-smi.c.

{
    return PAPI_OK;
}

_rocm_smi_init_component()

static int _rocm_smi_init_component ( int  cidx )

static

Definition at line 64 of file linux-rocm-smi.c.

{
    _rocm_smi_vector.cmp_info.CmpIdx = cidx;
    _rocm_smi_vector.cmp_info.num_native_events = -1;
    _rocm_smi_vector.cmp_info.num_cntrs = -1;
    _rocm_smi_lock = PAPI_NUM_LOCK + NUM_INNER_LOCK + cidx;
 
    sprintf(_rocm_smi_vector.cmp_info.disabled_reason,
            "Not initialized. Access component events to initialize it.");
    _rocm_smi_vector.cmp_info.disabled = PAPI_EDELAY_INIT;
 
    return PAPI_EDELAY_INIT;
}

_rocm_smi_init_control_state()

static int _rocm_smi_init_control_state ( hwd_control_state_t *ctrl   __attribute__(unused) )

static

Definition at line 132 of file linux-rocm-smi.c.

{
    return _rocm_smi_check_n_initialize();
}

Here is the call graph for this function:

_rocm_smi_init_private()

static int _rocm_smi_init_private ( void  )

static

Definition at line 95 of file linux-rocm-smi.c.

{
    int papi_errno = PAPI_OK;
 
    PAPI_lock(COMPONENT_LOCK);
 
    if (_rocm_smi_vector.cmp_info.initialized) {
        papi_errno = _rocm_smi_vector.cmp_info.disabled;
        goto fn_exit;
    }
 
    papi_errno = rocs_init();
    if (papi_errno != PAPI_OK) {
        _rocm_smi_vector.cmp_info.disabled = papi_errno;
        const char *error_str;
        rocs_err_get_last(&error_str);
        sprintf(_rocm_smi_vector.cmp_info.disabled_reason, "%s", error_str);
        goto fn_fail;
    }
 
    int count = 0;
    papi_errno = evt_get_count(&count);
    _rocm_smi_vector.cmp_info.num_native_events = count;
    _rocm_smi_vector.cmp_info.num_cntrs = count;
    _rocm_smi_vector.cmp_info.num_mpx_cntrs = count;
 
  fn_exit:
    _rocm_smi_vector.cmp_info.initialized = 1;
    _rocm_smi_vector.cmp_info.disabled = papi_errno;
    PAPI_unlock(COMPONENT_LOCK);
    return papi_errno;
  fn_fail:
    goto fn_exit;
}

Here is the call graph for this function:

Here is the caller graph for this function:

_rocm_smi_init_thread()

static int _rocm_smi_init_thread ( hwd_context_t *  ctx )

static

Definition at line 53 of file linux-rocm-smi.c.

{
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    memset(rocmsmi_ctx, 0, sizeof(*rocmsmi_ctx));
    rocmsmi_ctx->initialized = 1;
    rocmsmi_ctx->component_id = _rocm_smi_vector.cmp_info.CmpIdx;
    return PAPI_OK;
}

_rocm_smi_ntv_code_to_descr()

static int _rocm_smi_ntv_code_to_descr ( unsigned int  EventCode, char *  desc, int  len  )

static

Definition at line 381 of file linux-rocm-smi.c.

{
    int papi_errno =_rocm_smi_check_n_initialize();
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
    return rocs_evt_code_to_descr(EventCode, desc, len);
}

Here is the call graph for this function:

_rocm_smi_ntv_code_to_name()

static int _rocm_smi_ntv_code_to_name ( unsigned int  EventCode, char *  name, int  len  )

static

Definition at line 361 of file linux-rocm-smi.c.

{
    int papi_errno =_rocm_smi_check_n_initialize();
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
    return rocs_evt_code_to_name(EventCode, name, len);
}

Here is the call graph for this function:

_rocm_smi_ntv_enum_events()

static int _rocm_smi_ntv_enum_events ( unsigned int *  EventCode, int  modifier  )

static

Definition at line 351 of file linux-rocm-smi.c.

{
    int papi_errno =_rocm_smi_check_n_initialize();
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
    return rocs_evt_enum(EventCode, modifier);
}

Here is the call graph for this function:

_rocm_smi_ntv_name_to_code()

static int _rocm_smi_ntv_name_to_code ( const char *  name, unsigned int *  EventCode  )

static

Definition at line 371 of file linux-rocm-smi.c.

{
    int papi_errno =_rocm_smi_check_n_initialize();
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
    return rocs_evt_name_to_code(name, EventCode);
}

Here is the call graph for this function:

_rocm_smi_read()

static int _rocm_smi_read ( hwd_context_t *  ctx, hwd_control_state_t *  ctrl, long long **  values, int flags   __attribute__(unused)  )

static

Definition at line 233 of file linux-rocm-smi.c.

{
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (!(rocmsmi_ctx->state & ROCS_EVENTS_RUNNING)) {
        return PAPI_EMISC;
    }
 
    return rocs_ctx_read(rocmsmi_ctl->rocs_ctx, values);
}

Here is the call graph for this function:

_rocm_smi_reset()

static int _rocm_smi_reset ( hwd_context_t *  ctx, hwd_control_state_t *  ctrl  )

static

Definition at line 326 of file linux-rocm-smi.c.

{
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (!(rocmsmi_ctx->state & ROCS_EVENTS_RUNNING)) {
        return PAPI_EMISC;
    }
 
    return rocs_ctx_reset(rocmsmi_ctl->rocs_ctx);
}

Here is the call graph for this function:

_rocm_smi_set_domain()

static int _rocm_smi_set_domain ( hwd_control_state_t *ctrl   __attribute__(unused), int domain   __attribute__(unused)  )

static

Definition at line 345 of file linux-rocm-smi.c.

{
    return PAPI_OK;
}

_rocm_smi_shutdown_component()

static int _rocm_smi_shutdown_component ( void  )

static

Definition at line 310 of file linux-rocm-smi.c.

{
    if (!_rocm_smi_vector.cmp_info.initialized) {
        return PAPI_EMISC;
    }
 
    if (_rocm_smi_vector.cmp_info.disabled != PAPI_OK) {
        return PAPI_EMISC;
    }
 
    int papi_errno = rocs_shutdown();
    _rocm_smi_vector.cmp_info.initialized = 0;
    return papi_errno;
}

Here is the call graph for this function:

_rocm_smi_shutdown_thread()

static int _rocm_smi_shutdown_thread ( hwd_context_t *  ctx )

static

Definition at line 301 of file linux-rocm-smi.c.

{
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_ctx->state = 0;
    rocmsmi_ctx->initialized = 0;
    return PAPI_OK;
}

_rocm_smi_start()

static int _rocm_smi_start ( hwd_context_t *  ctx, hwd_control_state_t *  ctrl  )

static

Definition at line 198 of file linux-rocm-smi.c.

{
    int papi_errno = PAPI_OK;
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (rocmsmi_ctx->state & ROCS_EVENTS_OPENED) {
        return PAPI_EMISC;
    }
 
    papi_errno = rocs_ctx_open(rocmsmi_ctl->events_id, rocmsmi_ctl->num_events, &rocmsmi_ctl->rocs_ctx);
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    rocmsmi_ctx->state = ROCS_EVENTS_OPENED;
 
    papi_errno = rocs_ctx_start(rocmsmi_ctl->rocs_ctx);
    if (papi_errno != PAPI_OK) {
        goto fn_fail;
    }
 
    rocmsmi_ctx->state |= ROCS_EVENTS_RUNNING;
 
  fn_exit:
    return papi_errno;
  fn_fail:
    if (rocmsmi_ctx->state & ROCS_EVENTS_OPENED) {
        rocs_ctx_close(rocmsmi_ctl->rocs_ctx);
    }
    rocmsmi_ctx->state = 0;
    goto fn_exit;
}

Here is the call graph for this function:

_rocm_smi_stop()

static int _rocm_smi_stop ( hwd_context_t *  ctx, hwd_control_state_t *  ctrl  )

static

Definition at line 259 of file linux-rocm-smi.c.

{
    int papi_errno = PAPI_OK;
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (!(rocmsmi_ctx->state & ROCS_EVENTS_RUNNING)) {
        return PAPI_EMISC;
    }
 
    papi_errno = rocs_ctx_stop(rocmsmi_ctl->rocs_ctx);
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    rocmsmi_ctx->state &= ~ROCS_EVENTS_RUNNING;
 
    papi_errno = rocs_ctx_close(rocmsmi_ctl->rocs_ctx);
 
    rocmsmi_ctx->state = 0;
    rocmsmi_ctl->rocs_ctx = NULL;
 
    return papi_errno;
}

Here is the call graph for this function:

_rocm_smi_update_control_state()

static int _rocm_smi_update_control_state ( hwd_control_state_t *  ctrl, NativeInfo_t *  nativeInfo, int  nativeCount, hwd_context_t *  ctx  )

static

Definition at line 141 of file linux-rocm-smi.c.

{
    int papi_errno =_rocm_smi_check_n_initialize();
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
 
    if (rocmsmi_ctx->state & ROCS_EVENTS_RUNNING) {
        return PAPI_EMISC;
    }
 
    papi_errno = update_native_events(rocmsmi_ctl, nativeInfo, nativeCount);
    if (papi_errno != PAPI_OK) {
        return papi_errno;
    }
 
    return try_open_events(rocmsmi_ctl);
}

Here is the call graph for this function:

_rocm_smi_write()

static int _rocm_smi_write ( hwd_context_t *  ctx, hwd_control_state_t *  ctrl, long long *  values  )

static

Definition at line 246 of file linux-rocm-smi.c.

{
    rocmsmi_context_t *rocmsmi_ctx = (rocmsmi_context_t *) ctx;
    rocmsmi_control_t *rocmsmi_ctl = (rocmsmi_control_t *) ctrl;
 
    if (!(rocmsmi_ctx->state & ROCS_EVENTS_RUNNING)) {
        return PAPI_EMISC;
    }
 
    return rocs_ctx_write(rocmsmi_ctl->rocs_ctx, values);
}

Here is the call graph for this function:

evt_get_count()

static int evt_get_count ( int *  count )

static

Definition at line 79 of file linux-rocm-smi.c.

{
    unsigned int event_code = 0;
 
    if (rocs_evt_enum(&event_code, PAPI_ENUM_FIRST) == PAPI_OK) {
        ++(*count);
    }
 
    while (rocs_evt_enum(&event_code, PAPI_ENUM_EVENTS) == PAPI_OK) {
        ++(*count);
    }
 
    return PAPI_OK;
}

Here is the call graph for this function:

Here is the caller graph for this function:

try_open_events() [1/2]

static int try_open_events ( rocmsmi_control_t *  )

static

Here is the caller graph for this function:

try_open_events() [2/2]

int try_open_events

(

rocmsmi_control_t *rocmsmi_ctl

__attribute__(unused)

)

Definition at line 192 of file linux-rocm-smi.c.

{
    return PAPI_OK;
}

update_native_events()

int update_native_events ( rocmsmi_control_t *  ctl, NativeInfo_t *  ntv_info, int  ntv_count  )

static

Definition at line 164 of file linux-rocm-smi.c.

{
    int papi_errno = PAPI_OK;
 
    unsigned int *events = papi_calloc(ntv_count, sizeof(*events));
    if (events == NULL) {
        papi_errno = PAPI_ENOMEM;
        goto fn_fail;
    }
 
    int i;
    for (i = 0; i < ntv_count; ++i) {
        events[i] = ntv_info[i].ni_event;
        ntv_info[i].ni_position = i;
    }
 
    papi_free(ctl->events_id);
    ctl->events_id = events;
    ctl->num_events = ntv_count;
 
  fn_exit:
    return papi_errno;
  fn_fail:
    ctl->num_events = 0;
    goto fn_exit;
}

Here is the caller graph for this function:

Variable Documentation

_rocm_smi_lock

unsigned int _rocm_smi_lock

extern

Definition at line 11 of file rocs.c.

_rocm_smi_vector

papi_vector_t _rocm_smi_vector

Definition at line 40 of file linux-rocm-smi.c.