PAPI  5.0.1.0
zero_pthreads.c File Reference
Include dependency graph for zero_pthreads.c:

Go to the source code of this file.

Functions

void * Thread (void *arg)
int main (int argc, char **argv)

Function Documentation

int main ( int  argc,
char **  argv 
)

Definition at line 107 of file zero_pthreads.c.

{
    pthread_t e_th, f_th, g_th, h_th;
    int flops1, flops2, flops3, flops4;
    int retval, rc;
    pthread_attr_t attr;
    long long elapsed_us, elapsed_cyc;

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

    /* Init PAPI library */
    retval = PAPI_library_init( PAPI_VER_CURRENT );
    if ( retval != PAPI_VER_CURRENT ) {
       test_fail( __FILE__, __LINE__, "PAPI_library_init", retval );
    }

    retval = PAPI_thread_init( ( unsigned long ( * )( void ) ) 
                   ( pthread_self ) );
    if ( retval != PAPI_OK ) {
       if ( retval == PAPI_ECMP ) {
          test_skip( __FILE__, __LINE__, "PAPI_thread_init", retval );
       }
       else {
          test_fail( __FILE__, __LINE__, "PAPI_thread_init", retval );
       }
    }

    elapsed_us = PAPI_get_real_usec(  );

    elapsed_cyc = PAPI_get_real_cyc(  );

    pthread_attr_init( &attr );
#ifdef PTHREAD_CREATE_UNDETACHED
    pthread_attr_setdetachstate( &attr, PTHREAD_CREATE_UNDETACHED );
#endif
#ifdef PTHREAD_SCOPE_SYSTEM
    retval = pthread_attr_setscope( &attr, PTHREAD_SCOPE_SYSTEM );
    if ( retval != 0 )
        test_skip( __FILE__, __LINE__, "pthread_attr_setscope", retval );
#endif

    flops1 = 1000000;
    rc = pthread_create( &e_th, &attr, Thread, ( void * ) &flops1 );
    if ( rc ) {
        retval = PAPI_ESYS;
        test_fail( __FILE__, __LINE__, "pthread_create", retval );
    }
    flops2 = 2000000;
    rc = pthread_create( &f_th, &attr, Thread, ( void * ) &flops2 );
    if ( rc ) {
        retval = PAPI_ESYS;
        test_fail( __FILE__, __LINE__, "pthread_create", retval );
    }

    flops3 = 4000000;
    rc = pthread_create( &g_th, &attr, Thread, ( void * ) &flops3 );
    if ( rc ) {
        retval = PAPI_ESYS;
        test_fail( __FILE__, __LINE__, "pthread_create", retval );
    }

    flops4 = 8000000;
    rc = pthread_create( &h_th, &attr, Thread, ( void * ) &flops4 );
    if ( rc ) {
        retval = PAPI_ESYS;
        test_fail( __FILE__, __LINE__, "pthread_create", retval );
    }

    pthread_attr_destroy( &attr );
    flops1 = 500000;
    Thread( &flops1 );
    pthread_join( h_th, NULL );
    pthread_join( g_th, NULL );
    pthread_join( f_th, NULL );
    pthread_join( e_th, NULL );

    elapsed_cyc = PAPI_get_real_cyc(  ) - elapsed_cyc;
    elapsed_us = PAPI_get_real_usec(  ) - elapsed_us;

    if ( !TESTS_QUIET ) {
        printf( "Master real usec   : \t%lld\n", elapsed_us );
        printf( "Master real cycles : \t%lld\n", elapsed_cyc );
    }

    test_pass( __FILE__, NULL, 0 );
    pthread_exit( NULL );
    exit( 1 );
}

Here is the call graph for this function:

void* Thread ( void *  arg)

Definition at line 36 of file zero_pthreads.c.

{
    int retval, num_tests = 1;
    int EventSet1 = PAPI_NULL;
    int PAPI_event, mask1;
    int num_events1;
    long long **values;
    long long elapsed_us, elapsed_cyc;
    char event_name[PAPI_MAX_STR_LEN];

    retval = PAPI_register_thread(  );
    if ( retval != PAPI_OK ) {
       test_fail( __FILE__, __LINE__, "PAPI_register_thread", retval );
    }

    printf( "Thread 0x%x started\n", ( int ) pthread_self(  ) );

    /* add PAPI_TOT_CYC and one of the events in 
       PAPI_FP_INS, PAPI_FP_OPS or PAPI_TOT_INS, 
       depending on the availability of the event 
       on the platform                              */
    EventSet1 = add_two_events( &num_events1, &PAPI_event, &mask1 );

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

    values = allocate_test_space( num_tests, num_events1 );

    elapsed_us = PAPI_get_real_usec(  );
    elapsed_cyc = PAPI_get_real_cyc(  );

    retval = PAPI_start( EventSet1 );
    if ( retval != PAPI_OK ) {
        test_fail( __FILE__, __LINE__, "PAPI_start", retval );
    }

    do_flops( *( int * ) arg );

    retval = PAPI_stop( EventSet1, values[0] );
    if ( retval != PAPI_OK ) {
        test_fail( __FILE__, __LINE__, "PAPI_stop", retval );
    }

    elapsed_us = PAPI_get_real_usec(  ) - elapsed_us;
    elapsed_cyc = PAPI_get_real_cyc(  ) - elapsed_cyc;

    remove_test_events( &EventSet1, mask1 );

    if ( !TESTS_QUIET ) {
       printf( "Thread 0x%x %-12s : \t%lld\n", ( int ) pthread_self(  ),
                event_name, values[0][1] );
       printf( "Thread 0x%x PAPI_TOT_CYC : \t%lld\n", (int) pthread_self(),
                values[0][0] );
       printf( "Thread 0x%x Real usec    : \t%lld\n", 
            ( int ) pthread_self(  ),
                elapsed_us );
       printf( "Thread 0x%x Real cycles  : \t%lld\n", (int) pthread_self(),
                elapsed_cyc );
    }

    free_test_space( values, num_tests );

    retval = PAPI_unregister_thread(  );
    if ( retval != PAPI_OK )
        test_fail( __FILE__, __LINE__, "PAPI_unregister_thread", retval );
    return NULL;
}

Here is the call graph for this function:

 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Defines