linux-micpower.c File Reference

Include dependency graph for linux-micpower.c:

Go to the source code of this file.

Macros
#define	REFRESH_LAT   50000
#define	INVALID_RESULT   -1000000L
#define	MICPOWER_NUMBER_OF_NATIVE_EVENTS   16

Functions
static int	read_sysfs_file (long long *counts)
static int	_micpower_init_thread (hwd_context_t *ctx)
static int	_micpower_init_component (int cidx)
static int	_micpower_init_control_state (hwd_control_state_t *ctl)
static int	_micpower_start (hwd_context_t *ctx, hwd_control_state_t *ctl)
static int	_micpower_read (hwd_context_t *ctx, hwd_control_state_t *ctl, long long **events, int flags)
static int	_micpower_stop (hwd_context_t *ctx, hwd_control_state_t *ctl)
static int	_micpower_shutdown_thread (hwd_context_t *ctx)
static int	_micpower_shutdown_component ()
static int	_micpower_ctl (hwd_context_t *ctx, int code, _papi_int_option_t *option)
static int	_micpower_update_control_state (hwd_control_state_t *ptr, NativeInfo_t *native, int count, hwd_context_t *ctx)
static int	_micpower_set_domain (hwd_control_state_t *cntl, int domain)
static int	_micpower_reset (hwd_context_t *ctx, hwd_control_state_t *ctl)
static int	_micpower_ntv_enum_events (unsigned int *EventCode, int modifier)
static int	_micpower_ntv_code_to_name (unsigned int EventCode, char *name, int len)
static int	_micpower_ntv_code_to_descr (unsigned int EventCode, char *name, int len)
static int	_micpower_ntv_code_to_info (unsigned int EventCode, PAPI_event_info_t *info)

Variables
papi_vector_t	_micpower_vector
static MICPOWER_native_event_entry_t	_micpower_native_events []
static int	num_events = 0
static int	is_initialized = 0

Macro Definition Documentation

INVALID_RESULT

#define INVALID_RESULT   -1000000L

Definition at line 21 of file linux-micpower.c.

MICPOWER_NUMBER_OF_NATIVE_EVENTS

#define MICPOWER_NUMBER_OF_NATIVE_EVENTS   16

Definition at line 22 of file linux-micpower.c.

REFRESH_LAT

#define REFRESH_LAT   50000

Definition at line 19 of file linux-micpower.c.

Function Documentation

_micpower_ctl()

static int _micpower_ctl ( hwd_context_t *  ctx, int  code, _papi_int_option_t *  option  )

static

Definition at line 323 of file linux-micpower.c.

{
        ( void ) ctx;
        ( void ) code;
        ( void ) option;
 
        return PAPI_OK;
}

_micpower_init_component()

static int _micpower_init_component ( int  cidx )

static

Definition at line 193 of file linux-micpower.c.

{
    int retval = PAPI_OK;
        if ( is_initialized )
                return (PAPI_OK );
 
        is_initialized = 1;
 
        /* Check that /sys/class/micras/power is readable */
        if ( 0 != access( "/sys/class/micras/power", R_OK ) ) {
                strncpy(_micpower_vector.cmp_info.disabled_reason,
                                "Cannot read /sys/class/micras/power",PAPI_MAX_STR_LEN);
                retval = PAPI_ECMP;
                goto fn_fail;
        }
 
 
        /* Export the total number of events available */
        num_events =
                _micpower_vector.cmp_info.num_native_events = MICPOWER_NUMBER_OF_NATIVE_EVENTS;
 
        /* Export the component id */
        _micpower_vector.cmp_info.CmpIdx = cidx;
 
  fn_exit:
    _papi_hwd[cidx]->cmp_info.disabled = retval;
    return retval;
  fn_fail:
    goto fn_exit;
}

_micpower_init_control_state()

static int _micpower_init_control_state ( hwd_control_state_t *  ctl )

static

Definition at line 232 of file linux-micpower.c.

{
        int retval = 0;
        MICPOWER_control_state_t *micpower_ctl = (MICPOWER_control_state_t *) ctl;
 
        retval = read_sysfs_file(micpower_ctl->counts);
 
        /* Set last access time for caching results */
        micpower_ctl->lastupdate = PAPI_get_real_usec();
 
        return (retval)?PAPI_OK:PAPI_ESYS;
}

Here is the call graph for this function:

_micpower_init_thread()

static int _micpower_init_thread ( hwd_context_t *  ctx )

static

Definition at line 180 of file linux-micpower.c.

{
        ( void ) ctx;
        return PAPI_OK;
}

_micpower_ntv_code_to_descr()

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

static

Definition at line 440 of file linux-micpower.c.

{
        int index = EventCode&PAPI_NATIVE_AND_MASK;
 
        if ( index >= 0 && index < num_events ) {
                strncpy( name, _micpower_native_events[index].description, len );
                return PAPI_OK;
        }
        return PAPI_ENOEVNT;
}

_micpower_ntv_code_to_info()

static int _micpower_ntv_code_to_info ( unsigned int  EventCode, PAPI_event_info_t *  info  )

static

Definition at line 452 of file linux-micpower.c.

{
 
        int index = EventCode&PAPI_NATIVE_AND_MASK;
 
        if ( ( index < 0) || (index >= num_events )) return PAPI_ENOEVNT;
 
        strncpy( info->symbol, _micpower_native_events[index].name, sizeof(info->symbol));
        strncpy( info->long_descr, _micpower_native_events[index].description, sizeof(info->long_descr));
        strncpy( info->units, _micpower_native_events[index].units, sizeof(info->units));
        info->units[sizeof(info->units)-1] = '\0';
 
        return PAPI_OK;
}

_micpower_ntv_code_to_name()

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

static

Definition at line 425 of file linux-micpower.c.

{
        int index = EventCode&PAPI_NATIVE_AND_MASK;
 
        if ( index >= 0 && index < num_events ) {
                strncpy( name, _micpower_native_events[index].name, len );
                return PAPI_OK;
        }
        return PAPI_ENOEVNT;
}

_micpower_ntv_enum_events()

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

static

Definition at line 386 of file linux-micpower.c.

{
 
        int index;
 
        switch ( modifier ) {
 
                case PAPI_ENUM_FIRST:
 
                        if (num_events==0) {
                                return PAPI_ENOEVNT;
                        }
                        *EventCode = 0;
 
                        return PAPI_OK;
 
 
                case PAPI_ENUM_EVENTS:
 
                        index = *EventCode&PAPI_NATIVE_AND_MASK;
 
                        if ( index < num_events - 1 ) {
                                *EventCode = *EventCode + 1;
                                return PAPI_OK;
                        } else {
                                return PAPI_ENOEVNT;
                        }
                        break;
 
                default:
                        return PAPI_EINVAL;
        }
        return PAPI_EINVAL;
}

_micpower_read()

static int _micpower_read ( hwd_context_t *  ctx, hwd_control_state_t *  ctl, long long **  events, int  flags  )

static

Definition at line 255 of file linux-micpower.c.

{
        (void) flags;
        (void) ctx;
        int retval = 1;
 
        MICPOWER_control_state_t* control = (MICPOWER_control_state_t*) ctl;
        long long now = PAPI_get_real_usec();
 
        /* Only read the values from the kernel if enough time has passed */
        /* since the last read.  Otherwise return cached values.          */
 
        if ( now - control->lastupdate > REFRESH_LAT ) {
                retval = read_sysfs_file(control->counts);
                control->lastupdate = now;
        }
 
        /* Pass back a pointer to our results */
        *events = control->counts;
 
        return (retval)?PAPI_OK:PAPI_ESYS;
}

Here is the call graph for this function:

_micpower_reset()

static int _micpower_reset ( hwd_context_t *  ctx, hwd_control_state_t *  ctl  )

static

Definition at line 373 of file linux-micpower.c.

{
        ( void ) ctx;
        ( void ) ctl;
 
        return PAPI_OK;
}

_micpower_set_domain()

static int _micpower_set_domain ( hwd_control_state_t *  cntl, int  domain  )

static

Definition at line 361 of file linux-micpower.c.

{
        ( void ) cntl;
 
        if ( PAPI_DOM_ALL != domain )
            return PAPI_EINVAL;
 
        return PAPI_OK;
}

_micpower_shutdown_component()

static int _micpower_shutdown_component ( )

static

Definition at line 308 of file linux-micpower.c.

{
        if ( is_initialized ) {
                is_initialized = 0;
                num_events = 0;
        }
        return PAPI_OK;
}

_micpower_shutdown_thread()

static int _micpower_shutdown_thread ( hwd_context_t *  ctx )

static

Definition at line 297 of file linux-micpower.c.

{
        ( void ) ctx;
        return PAPI_OK;
}

_micpower_start()

static int _micpower_start ( hwd_context_t *  ctx, hwd_control_state_t *  ctl  )

static

Definition at line 246 of file linux-micpower.c.

{
        ( void ) ctx;
        ( void ) ctl;
 
        return PAPI_OK;
}

_micpower_stop()

static int _micpower_stop ( hwd_context_t *  ctx, hwd_control_state_t *  ctl  )

static

Definition at line 280 of file linux-micpower.c.

{
        (void) ctx;
        int retval = 1;
        long long now = PAPI_get_real_usec();
        /* read values */
        MICPOWER_control_state_t* control = (MICPOWER_control_state_t*) ctl;
 
        if ( now - control->lastupdate > REFRESH_LAT ) {
                retval = read_sysfs_file(control->counts);
                control->lastupdate = now;
        }
        return (retval)?PAPI_OK:PAPI_ESYS;
}

Here is the call graph for this function:

_micpower_update_control_state()

static int _micpower_update_control_state ( hwd_control_state_t *  ptr, NativeInfo_t *  native, int  count, hwd_context_t *  ctx  )

static

Definition at line 334 of file linux-micpower.c.

{
        int i, index;
        ( void ) ctx;
        ( void ) ptr;
 
        for ( i = 0; i < count; i++ ) {
                index = native[i].ni_event&PAPI_NATIVE_AND_MASK;
                native[i].ni_position = _micpower_native_events[index].resources.selector - 1;
        }
        return PAPI_OK;
}

read_sysfs_file()

static int read_sysfs_file ( long long *  counts )

static

Definition at line 152 of file linux-micpower.c.

{
        FILE* fp = NULL;
        int i;
        int retval = 1;
        fp = fopen( "/sys/class/micras/power", "r" );
        if (!fp)
            return 0;
 
        for (i=0; i < MICPOWER_MAX_COUNTERS-9; i++) {
                retval&= fscanf(fp, "%lld", &counts[i]);
        }
        for (i=MICPOWER_MAX_COUNTERS-9; i < MICPOWER_MAX_COUNTERS; i+=3) {
                retval&= fscanf(fp, "%lld %lld %lld", &counts[i], &counts[i+1], &counts[i+2] );
        }
 
        fclose(fp);
        return retval;
}

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

_micpower_native_events

MICPOWER_native_event_entry_t _micpower_native_events[]

static

Definition at line 26 of file linux-micpower.c.

_micpower_vector

papi_vector_t _micpower_vector

Definition at line 24 of file linux-micpower.c.

is_initialized

int is_initialized = 0

static

Definition at line 110 of file linux-micpower.c.

num_events

int num_events = 0

static

Definition at line 109 of file linux-micpower.c.