Blame src/components/perf_event/tests/perf_event_offcore_response.c

Packit 577717
/*
Packit 577717
 * This tests the use of offcore_response events
Packit 577717
 */
Packit 577717
Packit 577717
#include <stdio.h>
Packit 577717
#include <string.h>
Packit 577717
Packit 577717
#include "papi.h"
Packit 577717
#include "papi_test.h"
Packit 577717
Packit 577717
#include "do_loops.h"
Packit 577717
Packit 577717
#include "event_name_lib.h"
Packit 577717
Packit 577717
int main( int argc, char **argv ) {
Packit 577717
Packit 577717
	int quiet;
Packit 577717
Packit 577717
	char *offcore_event=NULL;
Packit 577717
	char event_name[BUFSIZ];
Packit 577717
Packit 577717
	int retval;
Packit 577717
	int EventSet1 = PAPI_NULL;
Packit 577717
Packit 577717
	long long total_values[1];
Packit 577717
Packit 577717
	/* Set TESTS_QUIET variable */
Packit 577717
	quiet = tests_quiet( argc, argv );
Packit 577717
Packit 577717
	/* Init the PAPI library */
Packit 577717
	retval = PAPI_library_init( PAPI_VER_CURRENT );
Packit 577717
	if ( retval != PAPI_VER_CURRENT ) {
Packit 577717
		test_fail( __FILE__, __LINE__, "PAPI_library_init", retval );
Packit 577717
	}
Packit 577717
Packit 577717
	retval = PAPI_create_eventset(&EventSet1);
Packit 577717
	if (retval != PAPI_OK) {
Packit 577717
		test_fail(__FILE__, __LINE__, "PAPI_create_eventset",retval);
Packit 577717
	}
Packit 577717
Packit 577717
	/* Get a relevant event name */
Packit 577717
	offcore_event=get_offcore_event(event_name, BUFSIZ);
Packit 577717
	if (offcore_event==NULL) {
Packit 577717
		if (!quiet) {
Packit 577717
			printf("No test event available on this processor\n");
Packit 577717
		}
Packit 577717
		test_skip( __FILE__, __LINE__,
Packit 577717
                	"PAPI does not support offcore on this processor",
Packit 577717
			PAPI_ENOSUPP );
Packit 577717
	}
Packit 577717
Packit 577717
	retval = PAPI_add_named_event(EventSet1, offcore_event);
Packit 577717
	if (retval != PAPI_OK) {
Packit 577717
		if ( !quiet ) {
Packit 577717
			fprintf(stderr,"Error trying to add %s\n",offcore_event);
Packit 577717
		}
Packit 577717
		test_fail(__FILE__, __LINE__, "adding offcore event ",retval);
Packit 577717
	}
Packit 577717
Packit 577717
	retval = PAPI_start( EventSet1 );
Packit 577717
	if ( retval != PAPI_OK ) {
Packit 577717
		test_fail( __FILE__, __LINE__, "PAPI_start", retval );
Packit 577717
	}
Packit 577717
Packit 577717
	do_flops( NUM_FLOPS );
Packit 577717
Packit 577717
	retval = PAPI_stop( EventSet1, total_values );
Packit 577717
	if ( retval != PAPI_OK ) {
Packit 577717
		test_fail( __FILE__, __LINE__, "PAPI_stop", retval );
Packit 577717
	}
Packit 577717
Packit 577717
	if ( !quiet ) {
Packit 577717
		printf("\t%s count = %lld\n",offcore_event,total_values[0]);
Packit 577717
	}
Packit 577717
Packit 577717
	test_pass( __FILE__ );
Packit 577717
Packit 577717
	return 0;
Packit 577717
}