void *POSIX_Init( void *argument ) { int sc; pthread_mutex_t mutex1; pthread_mutex_t mutex2; int prioceiling; TEST_BEGIN(); /* path using mutex get with interrupts disabled */ mutex1 = PTHREAD_MUTEX_INITIALIZER; mutex2 = PTHREAD_MUTEX_INITIALIZER; puts( "Init - pthread_mutex_lock - auto initialize - OK" ); sc = pthread_mutex_lock( &mutex1 ); fatal_posix_service_status( sc, 0, "mutex lock OK" ); puts( "Init - pthread_mutex_lock - auto initialize - EINVAL" ); sc = pthread_mutex_lock( &mutex2 ); fatal_posix_service_status( sc, EINVAL, "mutex lock EINVAL" ); puts( "Init - pthread_mutex_unlock - OK" ); sc = pthread_mutex_unlock( &mutex1 ); fatal_posix_service_status( sc, 0, "mutex unlock OK" ); puts( "Init - pthread_mutex_destroy - OK" ); sc = pthread_mutex_destroy( &mutex1 ); fatal_posix_service_status( sc, 0, "mutex destroy OK" ); /* path using mutex get with dispatching disabled */ mutex1 = PTHREAD_MUTEX_INITIALIZER; mutex2 = PTHREAD_MUTEX_INITIALIZER; puts( "Init - pthread_mutex_getprioceiling - auto initialize - OK" ); prioceiling = 1; sc = pthread_mutex_getprioceiling( &mutex1, &prioceiling ); fatal_posix_service_status( sc, 0, "mutex getprioceiling OK" ); rtems_test_assert( prioceiling == 0 ); puts( "Init - pthread_mutex_getprioceiling - auto initialize - EINVAL" ); prioceiling = 1; sc = pthread_mutex_getprioceiling( &mutex2, &prioceiling ); fatal_posix_service_status( sc, EINVAL, "mutex getprioceiling EINVAL" ); rtems_test_assert( prioceiling == 1 ); puts( "Init - pthread_mutex_destroy - OK" ); sc = pthread_mutex_destroy( &mutex1 ); fatal_posix_service_status( sc, 0, "mutex destroy OK" ); TEST_END(); rtems_test_exit( 0 ); return NULL; /* just so the compiler thinks we returned something */ }
static void *thread_b(void *arg) { test_context *ctx; rtems_id scheduler_b_id; rtems_status_code sc; rtems_task_priority prio; int prio_ceiling; int eno; ctx = arg; rtems_test_assert(rtems_get_current_processor() == 0); sc = rtems_scheduler_ident(SCHED_B, &scheduler_b_id); rtems_test_assert(sc == RTEMS_SUCCESSFUL); sc = rtems_task_set_priority(pthread_self(), RTEMS_CURRENT_PRIORITY, &prio); rtems_test_assert(sc == RTEMS_SUCCESSFUL); sc = rtems_task_set_scheduler(pthread_self(), scheduler_b_id, prio); rtems_test_assert(sc == RTEMS_SUCCESSFUL); rtems_test_assert(rtems_get_current_processor() == 1); eno = pthread_mutex_init(&ctx->mtx_b, &ctx->mtx_attr); rtems_test_assert(eno == 0); eno = pthread_mutex_getprioceiling(&ctx->mtx_b, &prio_ceiling); rtems_test_assert(eno == 0); rtems_test_assert(prio_ceiling == 254); eno = pthread_mutex_lock(&ctx->mtx_b); rtems_test_assert(eno == 0); eno = pthread_mutex_unlock(&ctx->mtx_b); rtems_test_assert(eno == 0); eno = pthread_mutex_destroy(&ctx->mtx_b); rtems_test_assert(eno == 0); eno = pthread_mutex_getprioceiling(&ctx->mtx_a, &prio_ceiling); rtems_test_assert(eno == 0); rtems_test_assert(prio_ceiling == 126); eno = pthread_mutex_lock(&ctx->mtx_a); rtems_test_assert(eno == EINVAL); return ctx; }
void test( void ) { pthread_mutex_t mutex; int prioceiling; int result; result = pthread_mutex_getprioceiling( &mutex, &prioceiling ); }
int main(void) { #if defined(_SC_PRIORITY_SCHEDULING) if (sysconf(_SC_PRIORITY_SCHEDULING) == -1) { printf("PRIORITY_SCHEDULING not supported\n"); return PTS_UNSUPPORTED; } pthread_mutexattr_t mutex_attr; pthread_mutex_t mutex; int error, prioceiling; error = pthread_mutexattr_init(&mutex_attr); if (error) { printf("pthread_mutexattr_init failed: %s\n", strerror(error)); return PTS_UNRESOLVED; } /* * Has to be something other than PTHREAD_PRIO_NONE, the default as per * pthread_mutexattr_getprotocol. */ error = pthread_mutexattr_setprotocol(&mutex_attr, PTHREAD_PRIO_PROTECT); if (error) { printf("pthread_mutexattr_setprotocol failed: %s\n", strerror(error)); return PTS_UNRESOLVED; } /* Initialize a mutex object */ error = pthread_mutex_init(&mutex, &mutex_attr); if (error) { printf("pthread_mutex_init failed: %s\n", strerror(error)); return PTS_UNRESOLVED; } /* Get the prioceiling of the mutex. */ error = pthread_mutex_getprioceiling(&mutex, &prioceiling); if (error) { printf("pthread_mutex_getprioceiling failed: %s\n", strerror(error)); return PTS_FAIL; } (void)pthread_mutexattr_destroy(&mutex_attr); (void)pthread_mutex_destroy(&mutex); printf("Prioceiling returned: %d\n", prioceiling); return PTS_PASS; #else printf("pthread_mutex_getprioceiling not supported"); return PTS_UNSUPPORTED; #endif }
static void test(test_context *ctx) { uint32_t cpu_count; int prio_ceiling; int eno; cpu_count = rtems_get_processor_count(); rtems_test_assert(rtems_get_current_processor() == 0); eno = pthread_mutexattr_init(&ctx->mtx_attr); rtems_test_assert(eno == 0); eno = pthread_mutexattr_setprotocol(&ctx->mtx_attr, PTHREAD_PRIO_PROTECT); rtems_test_assert(eno == 0); eno = pthread_mutex_init(&ctx->mtx_a, &ctx->mtx_attr); rtems_test_assert(eno == 0); eno = pthread_mutex_getprioceiling(&ctx->mtx_a, &prio_ceiling); rtems_test_assert(eno == 0); rtems_test_assert(prio_ceiling == 126); eno = pthread_mutex_lock(&ctx->mtx_a); rtems_test_assert(eno == 0); eno = pthread_mutex_unlock(&ctx->mtx_a); rtems_test_assert(eno == 0); if (cpu_count > 1) { void *exit_code; eno = pthread_create(&ctx->thread_b, NULL, thread_b, ctx); rtems_test_assert(eno == 0); exit_code = NULL; eno = pthread_join(ctx->thread_b, &exit_code); rtems_test_assert(eno == 0); rtems_test_assert(exit_code == ctx); } eno = pthread_mutex_destroy(&ctx->mtx_a); rtems_test_assert(eno == 0); eno = pthread_mutexattr_destroy(&ctx->mtx_attr); rtems_test_assert(eno == 0); }
void test_mutex_getprioceiling(void) { benchmark_timer_t end_time; int status; int current_ceiling; benchmark_timer_initialize(); status = pthread_mutex_getprioceiling( &MutexId, ¤t_ceiling ); end_time = benchmark_timer_read(); rtems_test_assert( status == 0 ); put_time( "pthread_mutex_getprioceiling: only case", end_time, 1, /* Only executed once */ 0, 0 ); }
static int do_test (void) { int ret = 0; init_tpp_test (); pthread_mutexattr_t ma; if (pthread_mutexattr_init (&ma)) { puts ("mutexattr_init failed"); return 1; } if (pthread_mutexattr_setprotocol (&ma, PTHREAD_PRIO_PROTECT)) { puts ("mutexattr_setprotocol failed"); return 1; } int prioceiling; if (pthread_mutexattr_getprioceiling (&ma, &prioceiling)) { puts ("mutexattr_getprioceiling failed"); return 1; } if (prioceiling < fifo_min || prioceiling > fifo_max) { printf ("prioceiling %d not in %d..%d range\n", prioceiling, fifo_min, fifo_max); return 1; } if (fifo_max < INT_MAX && pthread_mutexattr_setprioceiling (&ma, fifo_max + 1) != EINVAL) { printf ("mutexattr_setprioceiling %d did not fail with EINVAL\n", fifo_max + 1); return 1; } if (fifo_min > 0 && pthread_mutexattr_setprioceiling (&ma, fifo_min - 1) != EINVAL) { printf ("mutexattr_setprioceiling %d did not fail with EINVAL\n", fifo_min - 1); return 1; } if (pthread_mutexattr_setprioceiling (&ma, fifo_min)) { puts ("mutexattr_setprioceiling failed"); return 1; } if (pthread_mutexattr_setprioceiling (&ma, fifo_max)) { puts ("mutexattr_setprioceiling failed"); return 1; } if (pthread_mutexattr_setprioceiling (&ma, 6)) { puts ("mutexattr_setprioceiling failed"); return 1; } if (pthread_mutexattr_getprioceiling (&ma, &prioceiling)) { puts ("mutexattr_getprioceiling failed"); return 1; } if (prioceiling != 6) { printf ("mutexattr_getprioceiling returned %d != 6\n", prioceiling); return 1; } pthread_mutex_t m1, m2, m3; int e = pthread_mutex_init (&m1, &ma); if (e == ENOTSUP) { puts ("cannot support selected type of mutexes"); return 0; } else if (e != 0) { puts ("mutex_init failed"); return 1; } if (pthread_mutexattr_setprioceiling (&ma, 8)) { puts ("mutexattr_setprioceiling failed"); return 1; } if (pthread_mutex_init (&m2, &ma)) { puts ("mutex_init failed"); return 1; } if (pthread_mutexattr_setprioceiling (&ma, 5)) { puts ("mutexattr_setprioceiling failed"); return 1; } if (pthread_mutex_init (&m3, &ma)) { puts ("mutex_init failed"); return 1; } CHECK_TPP_PRIORITY (4, 4); if (pthread_mutex_lock (&m1) != 0) { puts ("mutex_lock failed"); return 1; } CHECK_TPP_PRIORITY (4, 6); if (pthread_mutex_trylock (&m2) != 0) { puts ("mutex_lock failed"); return 1; } CHECK_TPP_PRIORITY (4, 8); if (pthread_mutex_lock (&m3) != 0) { puts ("mutex_lock failed"); return 1; } CHECK_TPP_PRIORITY (4, 8); if (pthread_mutex_unlock (&m2) != 0) { puts ("mutex_unlock failed"); return 1; } CHECK_TPP_PRIORITY (4, 6); if (pthread_mutex_unlock (&m1) != 0) { puts ("mutex_unlock failed"); return 1; } CHECK_TPP_PRIORITY (4, 5); if (pthread_mutex_lock (&m2) != 0) { puts ("mutex_lock failed"); return 1; } CHECK_TPP_PRIORITY (4, 8); if (pthread_mutex_unlock (&m2) != 0) { puts ("mutex_unlock failed"); return 1; } CHECK_TPP_PRIORITY (4, 5); if (pthread_mutex_getprioceiling (&m1, &prioceiling)) { puts ("mutex_getprioceiling m1 failed"); return 1; } else if (prioceiling != 6) { printf ("unexpected m1 prioceiling %d != 6\n", prioceiling); return 1; } if (pthread_mutex_getprioceiling (&m2, &prioceiling)) { puts ("mutex_getprioceiling m2 failed"); return 1; } else if (prioceiling != 8) { printf ("unexpected m2 prioceiling %d != 8\n", prioceiling); return 1; } if (pthread_mutex_getprioceiling (&m3, &prioceiling)) { puts ("mutex_getprioceiling m3 failed"); return 1; } else if (prioceiling != 5) { printf ("unexpected m3 prioceiling %d != 5\n", prioceiling); return 1; } if (pthread_mutex_setprioceiling (&m1, 7, &prioceiling)) { printf ("mutex_setprioceiling failed"); return 1; } else if (prioceiling != 6) { printf ("unexpected m1 old prioceiling %d != 6\n", prioceiling); return 1; } if (pthread_mutex_getprioceiling (&m1, &prioceiling)) { puts ("mutex_getprioceiling m1 failed"); return 1; } else if (prioceiling != 7) { printf ("unexpected m1 prioceiling %d != 7\n", prioceiling); return 1; } CHECK_TPP_PRIORITY (4, 5); if (pthread_mutex_unlock (&m3) != 0) { puts ("mutex_unlock failed"); return 1; } CHECK_TPP_PRIORITY (4, 4); if (pthread_mutex_trylock (&m1) != 0) { puts ("mutex_lock failed"); return 1; } CHECK_TPP_PRIORITY (4, 7); struct sched_param sp; memset (&sp, 0, sizeof (sp)); sp.sched_priority = 8; if (pthread_setschedparam (pthread_self (), SCHED_FIFO, &sp)) { puts ("cannot set scheduling params"); return 1; } CHECK_TPP_PRIORITY (8, 8); if (pthread_mutex_unlock (&m1) != 0) { puts ("mutex_unlock failed"); return 1; } CHECK_TPP_PRIORITY (8, 8); if (pthread_mutex_lock (&m3) != EINVAL) { puts ("pthread_mutex_lock didn't fail with EINVAL"); return 1; } CHECK_TPP_PRIORITY (8, 8); if (pthread_mutex_destroy (&m1) != 0) { puts ("mutex_destroy failed"); return 1; } if (pthread_mutex_destroy (&m2) != 0) { puts ("mutex_destroy failed"); return 1; } if (pthread_mutex_destroy (&m3) != 0) { puts ("mutex_destroy failed"); return 1; } if (pthread_mutexattr_destroy (&ma) != 0) { puts ("mutexattr_destroy failed"); return 1; } return ret; }
void *POSIX_Init( void *argument ) { int status; pthread_mutexattr_t attr; pthread_mutexattr_t destroyed_attr; struct timespec times; struct sched_param param; int pshared; int policy; int protocol; int ceiling; int old_ceiling; int priority; rtems_test_assert( MUTEX_BAD_ID != PTHREAD_MUTEX_INITIALIZER ); Mutex_bad_id = MUTEX_BAD_ID; TEST_BEGIN(); /* set the time of day, and print our buffer in multiple ways */ set_time( TM_FRIDAY, TM_MAY, 24, 96, 11, 5, 0 ); /* get id of this thread */ Init_id = pthread_self(); printf( "Init's ID is 0x%08" PRIxpthread_t "\n", Init_id ); /* test pthread_mutex_attr_init */ puts( "Init: pthread_mutexattr_init - EINVAL (NULL attr)" ); status = pthread_mutexattr_init( NULL ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_init - SUCCESSFUL" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); Print_mutexattr( "Init: ", &attr ); /* create an "uninitialized" attribute structure */ status = pthread_mutexattr_init( &destroyed_attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutexattr_destroy - SUCCESSFUL" ); status = pthread_mutexattr_destroy( &destroyed_attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutexattr_destroy - EINVAL (NULL attr)" ); status = pthread_mutexattr_destroy( NULL ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_destroy - EINVAL (not initialized)" ); status = pthread_mutexattr_destroy( &destroyed_attr ); rtems_test_assert( status == EINVAL ); /* error cases for set and get pshared attribute */ empty_line(); puts( "Init: pthread_mutexattr_getpshared - EINVAL (NULL attr)" ); status = pthread_mutexattr_getpshared( NULL, &pshared ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getpshared - EINVAL (NULL pshared)" ); status = pthread_mutexattr_getpshared( &attr, NULL ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getpshared - EINVAL (not initialized)" ); status = pthread_mutexattr_getpshared( &destroyed_attr, &pshared ); rtems_test_assert( status == EINVAL ); pshared = PTHREAD_PROCESS_PRIVATE; puts( "Init: pthread_mutexattr_setpshared - EINVAL (NULL attr)" ); status = pthread_mutexattr_setpshared( NULL, pshared ); rtems_test_assert( status == EINVAL ); pshared = PTHREAD_PROCESS_PRIVATE; puts( "Init: pthread_mutexattr_setpshared - EINVAL (not initialized)" ); status = pthread_mutexattr_setpshared( &destroyed_attr, pshared ); rtems_test_assert( status == EINVAL ); /* error cases for set and get protocol attribute */ empty_line(); puts( "Init: pthread_mutexattr_getprotocol - EINVAL (NULL attr)" ); status = pthread_mutexattr_getprotocol( NULL, &protocol ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getprotocol - EINVAL (NULL protocol)" ); status = pthread_mutexattr_getprotocol( &attr, NULL ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getprotocol - EINVAL (not initialized)" ); status = pthread_mutexattr_getprotocol( &destroyed_attr, &protocol ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprotocol - EINVAL (NULL attr)" ); status = pthread_mutexattr_setprotocol( NULL, PTHREAD_PRIO_NONE ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprotocol - EINVAL (invalid protocol)" ); status = pthread_mutexattr_setprotocol( &attr, -1 ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprotocol - EINVAL (not initialized)" ); status = pthread_mutexattr_setprotocol( &destroyed_attr, -1 ); rtems_test_assert( status == EINVAL ); /* error cases for set and get prioceiling attribute */ empty_line(); puts( "Init: pthread_mutexattr_getprioceiling - EINVAL (NULL attr)" ); status = pthread_mutexattr_getprioceiling( NULL, &ceiling ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getprioceiling - EINVAL (NULL prioceiling)" ); status = pthread_mutexattr_getprioceiling( &attr, NULL ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_getprioceiling - EINVAL (not initialized)" ); status = pthread_mutexattr_getprioceiling( &destroyed_attr, &ceiling ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprioceiling - EINVAL (NULL attr)" ); status = pthread_mutexattr_setprioceiling( NULL, 128 ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprioceiling - EINVAL (invalid priority)" ); status = pthread_mutexattr_setprioceiling( &attr, 512 ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutexattr_setprioceiling - EINVAL (not initialized)" ); status = pthread_mutexattr_setprioceiling( &destroyed_attr, -1 ); rtems_test_assert( status == EINVAL ); /* create a thread */ status = pthread_create( &Task_id, NULL, Task_1, NULL ); rtems_test_assert( !status ); /* now try some basic mutex operations */ empty_line(); puts( "Init: pthread_mutex_init - EINVAL (NULL mutex_id)" ); status = pthread_mutex_init( NULL, &attr ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_init - EINVAL (not initialized attr)" ); status = pthread_mutex_init( &Mutex_id, &destroyed_attr ); rtems_test_assert( status == EINVAL ); /* must get around error checks in attribute set routines */ attr.protocol = -1; puts( "Init: pthread_mutex_init - EINVAL (bad protocol)" ); status = pthread_mutex_init( &Mutex_id, &attr ); rtems_test_assert( status == EINVAL ); /* must get around error checks in attribute set routines */ attr.protocol = PTHREAD_PRIO_INHERIT; attr.prio_ceiling = -1; puts( "Init: pthread_mutex_init - EINVAL (bad priority ceiling)" ); status = pthread_mutex_init( &Mutex_id, &attr ); rtems_test_assert( status == EINVAL ); /* must get around various error checks before checking bad scope */ puts( "Init: Resetting mutex attributes" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - ENOSYS (process wide scope)" ); attr.process_shared = PTHREAD_PROCESS_SHARED; status = pthread_mutex_init( &Mutex_id, &attr ); rtems_test_assert( status == ENOSYS ); puts( "Init: pthread_mutex_init - EINVAL (invalid scope)" ); attr.process_shared = -1; status = pthread_mutex_init( &Mutex_id, &attr ); rtems_test_assert( status == EINVAL ); /* bad kind */ status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - EINVAL (invalid type)" ); attr.type = -1; status = pthread_mutex_init( &Mutex_id, &attr ); rtems_test_assert( status == EINVAL ); /* now set up for a success pthread_mutex_init */ puts( "Init: Resetting mutex attributes" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: Changing mutex attributes" ); status = pthread_mutexattr_setprotocol( &attr, PTHREAD_PRIO_INHERIT ); rtems_test_assert( !status ); status = pthread_mutexattr_setprioceiling( &attr, (sched_get_priority_max(SCHED_FIFO) / 2) + 1 ); rtems_test_assert( !status ); status = pthread_mutexattr_setpshared( &attr, PTHREAD_PROCESS_SHARED ); rtems_test_assert( !status ); Print_mutexattr( "Init: ", &attr ); puts( "Init: Resetting mutex attributes" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); /* * Set the protocol to priority ceiling so the owner check happens * and the EPERM test (later) will work. */ status = pthread_mutexattr_setprotocol( &attr, PTHREAD_PRIO_INHERIT ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - SUCCESSFUL" ); status = pthread_mutex_init( &Mutex_id, &attr ); if ( status ) printf( "status = %d\n", status ); rtems_test_assert( !status ); /* * This is not required to be an error and when it is, there are * behavioral conflicts with other implementations. */ puts( "Init: pthread_mutex_init - EBUSY (reinitialize an existing mutex) - skipped" ); #if 0 status = pthread_mutex_init( &Mutex_id, &attr ); if ( !status ) printf( "status = %d\n", status ); rtems_test_assert( status == EBUSY ); #endif puts( "Init: pthread_mutex_trylock - EINVAL (illegal ID)" ); status = pthread_mutex_trylock( &Mutex_bad_id ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_trylock - SUCCESSFUL" ); status = pthread_mutex_trylock( &Mutex_id ); if ( status ) printf( "status = %d\n", status ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_trylock - EDEADLK (already locked)" ); status = pthread_mutex_trylock( &Mutex_id ); if ( status != EBUSY ) printf( "status = %d\n", status ); rtems_test_assert( status == EBUSY ); puts( "Init: pthread_mutex_lock - EINVAL (NULL id)" ); status = pthread_mutex_lock( NULL ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_unlock - EINVAL (NULL id)" ); status = pthread_mutex_unlock( NULL ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_lock - EDEADLK (already locked)" ); status = pthread_mutex_lock( &Mutex_id ); if ( status != EDEADLK ) printf( "status = %d\n", status ); rtems_test_assert( status == EDEADLK ); puts( "Init: Sleep 1 second" ); sleep( 1 ); /* switch to task 1 */ puts( "Init: pthread_mutex_unlock - EINVAL (invalid id)" ); status = pthread_mutex_unlock( &Mutex_bad_id ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_unlock - SUCCESSFUL" ); status = pthread_mutex_unlock( &Mutex_id ); if ( status ) printf( "status = %d\n", status ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_unlock - EPERM (not owner)" ); status = pthread_mutex_unlock( &Mutex_id ); if ( status != EPERM ) printf( "status = %d\n", status ); rtems_test_assert( status == EPERM ); puts( "Init: pthread_mutex_timedlock - time out in 1/2 second" ); calculate_abstimeout( ×, 0, (TOD_NANOSECONDS_PER_SECOND / 2) ); status = pthread_mutex_timedlock( &Mutex_id, × ); if ( status != ETIMEDOUT ) printf( "status = %d\n", status ); rtems_test_assert( status == ETIMEDOUT ); puts( "Init: pthread_mutex_timedlock - time out in the past" ); calculate_abstimeout( ×, -1, (TOD_NANOSECONDS_PER_SECOND / 2) ); status = pthread_mutex_timedlock( &Mutex_id, × ); if ( status != ETIMEDOUT ) printf( "status = %d\n", status ); rtems_test_assert( status == ETIMEDOUT ); /* switch to idle */ puts( "Init: pthread_mutex_timedlock - EAGAIN (timeout)" ); /* destroy a mutex */ empty_line(); puts( "Init: pthread_mutex_init - SUCCESSFUL" ); status = pthread_mutex_init( &Mutex2_id, &attr ); if ( status ) printf( "status = %d\n", status ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - EAGAIN (too many)" ); status = pthread_mutex_init( &Mutex3_id, &attr ); rtems_test_assert( status == EAGAIN ); puts( "Init: pthread_mutexattr_destroy - SUCCESSFUL" ); status = pthread_mutexattr_destroy( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_destroy - SUCCESSFUL" ); status = pthread_mutex_destroy( &Mutex2_id ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_destroy - EINVAL (invalid id)" ); status = pthread_mutex_destroy( &Mutex_bad_id ); rtems_test_assert( status == EINVAL ); /* destroy a busy mutex */ empty_line(); puts( "Init: pthread_mutexattr_init - SUCCESSFUL" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - SUCCESSFUL" ); status = pthread_mutex_init( &Mutex2_id, &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_trylock - SUCCESSFUL" ); status = pthread_mutex_trylock( &Mutex2_id ); if ( status ) printf( "status = %d\n", status ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_destroy - EBUSY (already locked)" ); status = pthread_mutex_destroy( &Mutex2_id ); if ( status != EBUSY ) printf( "status = %d\n", status ); rtems_test_assert( status == EBUSY ); puts( "Init: pthread_mutex_unlock - SUCCESSFUL" ); status = pthread_mutex_unlock( &Mutex2_id ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_destroy - SUCCESSFUL" ); status = pthread_mutex_destroy( &Mutex2_id ); rtems_test_assert( !status ); /* priority inherit mutex */ empty_line(); puts( "Init: pthread_mutexattr_init - SUCCESSFUL" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutexattr_setprotocol - SUCCESSFUL (PTHREAD_PRIO_INHERIT)" ); status = pthread_mutexattr_setprotocol( &attr, PTHREAD_PRIO_INHERIT ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - SUCCESSFUL" ); status = pthread_mutex_init( &Mutex2_id, &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_trylock - SUCCESSFUL" ); status = pthread_mutex_trylock( &Mutex2_id ); rtems_test_assert( !status ); /* create a thread at a lower priority */ status = pthread_create( &Task2_id, NULL, Task_2, NULL ); rtems_test_assert( !status ); /* set priority of Task2 to highest priority */ param.sched_priority = sched_get_priority_max( SCHED_FIFO ); puts( "Init: pthread_setschedparam - Setting Task2 priority to highest" ); status = pthread_setschedparam( Task2_id, SCHED_FIFO, ¶m ); rtems_test_assert( !status ); /* switching to Task2 */ status = pthread_getschedparam( pthread_self(), &policy, ¶m ); rtems_test_assert( !status ); printf( "Init: pthread_getschedparam - priority = %d\n", param.sched_priority); puts( "Init: pthread_mutex_unlock - SUCCESSFUL" ); status = pthread_mutex_unlock( &Mutex2_id ); rtems_test_assert( !status ); puts( "Init: pthread_mutexattr_destroy - SUCCESSFUL" ); status = pthread_mutexattr_destroy( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_destroy - SUCCESSFUL" ); status = pthread_mutex_destroy( &Mutex2_id ); rtems_test_assert( !status ); /* priority ceiling mutex */ empty_line(); puts( "Init: pthread_mutexattr_init - SUCCESSFUL" ); status = pthread_mutexattr_init( &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutexattr_setprotocol - SUCCESSFUL (PTHREAD_PRIO_PROTECT)" ); status = pthread_mutexattr_setprotocol( &attr, PTHREAD_PRIO_PROTECT ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_init - SUCCESSFUL" ); status = pthread_mutex_init( &Mutex2_id, &attr ); rtems_test_assert( !status ); puts( "Init: pthread_mutex_getprioceiling - EINVAL (invalid id)" ); status = pthread_mutex_getprioceiling( &Mutex_bad_id, &ceiling ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_getprioceiling - EINVAL (NULL ceiling)" ); status = pthread_mutex_getprioceiling( &Mutex2_id, NULL ); rtems_test_assert( status == EINVAL ); status = pthread_mutex_getprioceiling( &Mutex2_id, &ceiling ); rtems_test_assert( !status ); printf( "Init: pthread_mutex_getprioceiling - %d\n", ceiling ); puts( "Init: pthread_mutex_setprioceiling - EINVAL (invalid id)" ); status = pthread_mutex_setprioceiling( &Mutex_bad_id, 200, &old_ceiling ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_setprioceiling - EINVAL (illegal priority)" ); status = pthread_mutex_setprioceiling( &Mutex2_id, 512, &old_ceiling ); rtems_test_assert( status == EINVAL ); puts( "Init: pthread_mutex_setprioceiling - EINVAL (NULL ceiling)" ); status = pthread_mutex_setprioceiling( &Mutex2_id, 128, NULL ); rtems_test_assert( status == EINVAL ); /* normal cases of set priority ceiling */ priority = sched_get_priority_max( SCHED_FIFO ); priority = (priority == 254) ? 200 : 13; printf( "Init: pthread_mutex_setprioceiling - new ceiling = %d\n", priority ); status = pthread_mutex_setprioceiling( &Mutex2_id, priority, &old_ceiling ); rtems_test_assert( !status ); printf( "Init: pthread_mutex_setprioceiling - old ceiling = %d\n",old_ceiling ); status = pthread_getschedparam( pthread_self(), &policy, ¶m ); rtems_test_assert( !status ); printf( "Init: pthread_getschedparam - priority = %d\n", param.sched_priority ); puts( "Init: pthread_mutex_trylock - SUCCESSFUL" ); status = pthread_mutex_trylock( &Mutex2_id ); rtems_test_assert( !status ); status = pthread_getschedparam( pthread_self(), &policy, ¶m ); rtems_test_assert( !status ); printf( "Init: pthread_getschedparam - priority = %d\n", param.sched_priority ); /* create a thread at a higher priority */ status = pthread_create( &Task3_id, NULL, Task_3, NULL ); rtems_test_assert( !status ); /* set priority of Task3 to highest priority */ param.sched_priority = --priority; status = pthread_setschedparam( Task3_id, SCHED_FIFO, ¶m ); rtems_test_assert( !status ); puts( "Init: pthread_setschedparam - set Task3 priority to highest" ); /* DOES NOT SWITCH to Task3 */ puts( "Init: Sleep 1 second" ); rtems_test_assert( !status ); sleep( 1 ); /* switch to task 3 */ puts( "Init: pthread_mutex_unlock - SUCCESSFUL" ); status = pthread_mutex_unlock( &Mutex2_id ); rtems_test_assert( !status ); status = pthread_mutex_getprioceiling( &Mutex2_id, &ceiling ); rtems_test_assert( !status ); printf( "Init: pthread_mutex_getprioceiling- ceiling = %d\n", ceiling ); /* set priority of Init to highest priority */ param.sched_priority = sched_get_priority_max(SCHED_FIFO); status = pthread_setschedparam( Init_id, SCHED_FIFO, ¶m ); rtems_test_assert( !status ); puts( "Init: pthread_setschedparam - set Init priority to highest" ); puts( "Init: pthread_mutex_lock - EINVAL (priority ceiling violation)" ); status = pthread_mutex_lock( &Mutex2_id ); if ( status != EINVAL ) printf( "status = %d\n", status ); rtems_test_assert( status == EINVAL ); /* mutexinit.c: Initialising recursive mutex */ puts( "Init: Recursive Mutex" ); status = pthread_mutex_destroy( &Mutex2_id ); if( status ) printf( "status mutex destroy:%d\n", status ); status = pthread_mutexattr_init( &attr ); if( status ) printf( "status mutexattr:%d\n", status ); attr.recursive=true; status = pthread_mutex_init( &Mutex2_id, &attr ); if ( status ) printf( "status recursive mutex :%d\n", status ); rtems_test_assert( !status ); TEST_END(); rtems_test_exit( 0 ); return NULL; /* just so the compiler thinks we returned something */ }