Esempio n. 1
0
/* This function sets various options in the substrate
 * The valid codes being passed in are PAPI_SET_DEFDOM,
 * PAPI_SET_DOMAIN, PAPI_SETDEFGRN, PAPI_SET_GRANUL
 * and PAPI_SET_INHERIT
 */
int
_papi_hwd_ctl( EventSetInfo_t * zero, int code, _papi_int_option_t * option )
{
	switch ( code ) {
	case PAPI_SET_DEFDOM:
		return ( set_default_domain( zero, option->domain.domain ) );
	case PAPI_SET_DOMAIN:
		return ( set_domain
				 ( option->domain.ESI->machdep, option->domain.domain ) );
	case PAPI_SET_DEFGRN:
		return ( set_default_granularity
				 ( zero, option->granularity.granularity ) );
	case PAPI_SET_GRANUL:
		return ( set_granularity
				 ( option->granularity.ESI->machdep,
				   option->granularity.g ranularity ) );
	case PAPI_SET_INHERIT:
		return ( set_inherit( option->inherit.inherit ) );
	default:
		return ( PAPI_EINVAL );
	}
}
Esempio n. 2
0
int
_ultra_hwd_ctl( hwd_context_t * ctx, int code, _papi_int_option_t * option )
{

	switch ( code ) {
	case PAPI_DEFDOM:
		return ( set_default_domain
				 ( option->domain.ESI->ctl_state, option->domain.domain ) );
	case PAPI_DOMAIN:
		return ( _ultra_set_domain
				 ( option->domain.ESI->ctl_state, option->domain.domain ) );
	case PAPI_DEFGRN:
		return ( set_default_granularity
				 ( option->domain.ESI->ctl_state,
				   option->granularity.granularity ) );
	case PAPI_GRANUL:
		return ( set_granularity
				 ( option->granularity.ESI->ctl_state,
				   option->granularity.granularity ) );
	default:
		return ( PAPI_EINVAL );
	}
}