infiniband_umad_list_events.c File Reference

Include dependency graph for infiniband_umad_list_events.c:

Go to the source code of this file.

Functions
int	main (int argc, char **argv)
	List all net events codes and names. More...

Function Documentation

main()

int main	(	int	argc,
		char **	argv
	)

Author

Jose Pedro Oliveira

test case for the linux-infiniband component Adapted from its counterpart in the net component.

Author

Tony Castaldo Corrected missing include file for the strstr() function to be used.

Definition at line 25 of file infiniband_umad_list_events.c.

{
    int retval,cid,numcmp;
    int total_events=0;
    int code;
    char event_name[PAPI_MAX_STR_LEN];
    int r;
    const PAPI_component_info_t *cmpinfo = NULL;

    /* Set TESTS_QUIET variable */
    tests_quiet( argc, argv );

    /* PAPI Initialization */
    retval = PAPI_library_init( PAPI_VER_CURRENT );
    if ( retval != PAPI_VER_CURRENT ) {
        test_fail(__FILE__, __LINE__,"PAPI_library_init failed\n",retval);
    }

    if (!TESTS_QUIET) {
        printf("Listing all net events\n");
    }

    numcmp = PAPI_num_components();

    for(cid=0; cid<numcmp; cid++) {

        if ( (cmpinfo = PAPI_get_component_info(cid)) == NULL) {
            test_fail(__FILE__, __LINE__,"PAPI_get_component_info failed\n",-1);
        }

        if ( strstr(cmpinfo->name, "infiniband") == NULL) {
            continue;
        }

        if (!TESTS_QUIET) {
            printf("Component %d (%d) - %d events - %s\n",
                cid, cmpinfo->CmpIdx,
                cmpinfo->num_native_events, cmpinfo->name);
        }

        code = PAPI_NATIVE_MASK;

        r = PAPI_enum_cmp_event( &code, PAPI_ENUM_FIRST, cid );
        while ( r == PAPI_OK ) {

            retval = PAPI_event_code_to_name( code, event_name );
            if ( retval != PAPI_OK ) {
                test_fail( __FILE__, __LINE__, "PAPI_event_code_to_name", retval );
            }

            if (!TESTS_QUIET) {
                printf("%#x %s\n", code, event_name);
            }

            total_events++;

            r = PAPI_enum_cmp_event( &code, PAPI_ENUM_EVENTS, cid );
        }

    }

    if (total_events==0) {
        test_skip(__FILE__,__LINE__,"No net events found", 0);
    }

    test_pass( __FILE__ );

    return 0;
}

Here is the call graph for this function: