pthrtough.c File Reference

Include dependency graph for pthrtough.c:

Go to the source code of this file.

Defines
#define	NITER   1000
Functions
void *	Thread (void *data)
int	main (int argc, char *argv[])

---

Define Documentation

#define NITER   1000

Definition at line 6 of file pthrtough.c.

---

Function Documentation

int main	(	int	argc,
		char *	argv[]
	)

Definition at line 33 of file pthrtough.c.

{
    int j;
    pthread_t *th = NULL;
    pthread_attr_t attr;
    int ret;
    long nthr;
    const PAPI_hw_info_t *hwinfo;

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

    ret = PAPI_library_init( PAPI_VER_CURRENT );
    if ( ret != PAPI_VER_CURRENT )
        test_fail( __FILE__, __LINE__, "PAPI_library_init", ret );

    if ( ( ret =
           PAPI_thread_init( ( unsigned
                               long ( * )( void ) ) ( pthread_self ) ) ) !=
         PAPI_OK )
        test_fail( __FILE__, __LINE__, "PAPI_thread_init", ret );

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

#endif

    if ( ( hwinfo = PAPI_get_hardware_info(  ) ) == NULL )
        test_fail( __FILE__, __LINE__, "PAPI_get_hardware_info", 0 );

    nthr = hwinfo->ncpu;

    if ( !TESTS_QUIET ) {
        printf( "Creating %ld threads for %d iterations each of:\n", nthr,
                NITER );
        printf( "\tregister\n" );
        printf( "\tcreate_eventset\n" );
        printf( "\tdestroy_eventset\n" );
        printf( "\tunregister\n" );
    }

    th = ( pthread_t * ) malloc( ( size_t ) nthr * sizeof ( pthread_t ) );
    if ( th == NULL )
        test_fail( __FILE__, __LINE__, "malloc", PAPI_ESYS );

    for ( j = 0; j < nthr; j++ ) {
        ret = pthread_create( &th[j], &attr, &Thread, NULL );
        if ( ret )
            test_fail( __FILE__, __LINE__, "pthread_create", PAPI_ESYS );
    }

    for ( j = 0; j < nthr; j++ ) {
        pthread_join( th[j], NULL );
    }

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

Here is the call graph for this function:

void* Thread

(

void *

data

)

Definition at line 9 of file pthrtough.c.

{
    int i, ret, evtset;

    ( void ) data;

    for ( i = 0; i < NITER; i++ ) {
        if ( ( ret = PAPI_register_thread(  ) ) != PAPI_OK )
            test_fail( __FILE__, __LINE__, "PAPI_thread_init", ret );

        evtset = PAPI_NULL;
        if ( ( ret = PAPI_create_eventset( &evtset ) ) != PAPI_OK )
            test_fail( __FILE__, __LINE__, "PAPI_create_eventset", ret );

        if ( ( ret = PAPI_destroy_eventset( &evtset ) ) != PAPI_OK )
            test_fail( __FILE__, __LINE__, "PAPI_destroy_eventset", ret );

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

Here is the call graph for this function: