Simple_CountingSet_Driver.c

Go to the documentation of this file.

#include <stdio.h>
#include <string.h>
#include "sde_lib.h"
#include "papi.h"
#include "papi_test.h"
 
void libCSet_do_simple_work(void);
void libCSet_dump_set( cset_list_object_t *list_head );
int  libCSet_count_set_elements( cset_list_object_t *list_head );
int  libCSet_finalize(void);
 
 
void setup_PAPI(int *event_set);
 
int main(int argc, char **argv){
    int cnt, ret, event_set = PAPI_NULL;
    long long counter_values[1];
 
    (void)argc;
    (void)argv;
 
    setup_PAPI(&event_set);
 
    // --- Start PAPI
    if((ret=PAPI_start(event_set)) != PAPI_OK){
        test_fail( __FILE__, __LINE__, "PAPI_start", ret );
    }
 
    libCSet_do_simple_work();
 
    // --- Stop PAPI
    if((ret=PAPI_stop(event_set, counter_values)) != PAPI_OK){
        test_fail( __FILE__, __LINE__, "PAPI_stop", ret );
    }
 
    if( (argc > 1) && !strcmp(argv[1], "-verbose") ){
        libCSet_dump_set( (cset_list_object_t *)counter_values[0] );
    }
 
    cnt = libCSet_count_set_elements( (cset_list_object_t *)counter_values[0] );
    if( 5222 == cnt )
        test_pass(__FILE__);
    else
        test_fail( __FILE__, __LINE__, "CountingSet contains wrong number of elements", ret );
 
    return 0;
}
 
 
void setup_PAPI(int *event_set){
    int ret;
 
    if((ret=PAPI_library_init(PAPI_VER_CURRENT)) != PAPI_VER_CURRENT){
        test_fail( __FILE__, __LINE__, "PAPI_library_init", ret );
    }
 
    if((ret=PAPI_create_eventset(event_set)) != PAPI_OK){
        test_fail( __FILE__, __LINE__, "PAPI_create_eventset", ret );
    }
 
    if((ret=PAPI_add_named_event(*event_set, "sde:::CSET_LIB::test counting set")) != PAPI_OK){
        test_fail( __FILE__, __LINE__, "PAPI_add_named_event", ret );
    }
 
    return;
}