Files
rtems/testsuites/psxtests/psx01/init.c
Chris Johns 6e4c01e3a2 posix: Update to the pthread_once changes.
Implement the reeview changes.
Add a POSIX Fatal error domain.
Fix confdefs.h to correctly handle the internal POSIX mutexes.
2013-08-23 14:56:36 +10:00

142 lines
3.9 KiB
C

/*
* COPYRIGHT (c) 1989-2009.
* On-Line Applications Research Corporation (OAR).
*
* The license and distribution terms for this file may be
* found in the file LICENSE in this distribution or at
* http://www.rtems.com/license/LICENSE.
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <sched.h>
#include <sys/utsname.h>
#define CONFIGURE_INIT
#include "system.h"
#include "pritime.h"
#include <rtems/score/todimpl.h>
pthread_once_t nesting_once = PTHREAD_ONCE_INIT;
void Test_init_routine_nesting( void );
void Test_init_routine_nesting( void )
{
int status;
puts( "Test_init_routine_nesting: invoked" );
status = pthread_once( &nesting_once, Test_init_routine_nesting );
rtems_test_assert( status == EINVAL );
}
void *POSIX_Init(
void *argument
)
{
struct timespec tr;
int status;
int priority;
pthread_t thread_id;
struct utsname uts;
puts( "\n\n*** POSIX TEST 1 ***" );
/* print some system information */
puts( "Init: uname - EFAULT (invalid uts pointer argument)" );
status = uname( NULL );
rtems_test_assert( status == -1 );
rtems_test_assert( errno == EFAULT );
status = uname( &uts );
rtems_test_assert( !status );
printf( "Init: uts.sysname: %s\n", uts.sysname );
printf( "Init: uts.nodename: %s\n", uts.nodename );
printf( "Init: uts.release: %s\n", uts.release );
printf( "Init: uts.version: %s\n", uts.version );
printf( "Init: uts.machine: %s\n", uts.machine );
puts("");
/* get id of this thread */
Init_id = pthread_self();
printf( "Init: ID is 0x%08" PRIxpthread_t "\n", Init_id );
/* exercise get minimum priority */
priority = sched_get_priority_min( SCHED_FIFO );
printf( "Init: sched_get_priority_min (SCHED_FIFO) -- %d\n", priority );
rtems_test_assert( priority != -1 );
puts( "Init: sched_get_priority_min -- EINVAL (invalid policy)" );
priority = sched_get_priority_min( -1 );
rtems_test_assert( priority == -1 );
rtems_test_assert( errno == EINVAL );
/* exercise get maximum priority */
priority = sched_get_priority_max( SCHED_FIFO );
printf( "Init: sched_get_priority_max (SCHED_FIFO) -- %d\n", priority );
rtems_test_assert( priority != -1 );
puts( "Init: sched_get_priority_max -- EINVAL (invalid policy)" );
priority = sched_get_priority_max( -1 );
rtems_test_assert( priority == -1 );
rtems_test_assert( errno == EINVAL );
puts( "Init: sched_rr_get_interval -- ESRCH (invalid PID)" );
status = sched_rr_get_interval( 4, &tr );
rtems_test_assert( status == -1 );
rtems_test_assert( errno == ESRCH );
puts( "Init: sched_rr_get_interval -- EINVAL (invalid interval pointer)" );
status = sched_rr_get_interval( getpid(), NULL );
rtems_test_assert( status == -1 );
rtems_test_assert( errno == EINVAL );
/* print the round robin time quantum */
status = sched_rr_get_interval( getpid(), &tr );
printf(
"Init: Round Robin quantum is %" PRIdtime_t " seconds, %ld nanoseconds\n",
tr.tv_sec,
tr.tv_nsec
);
rtems_test_assert( !status );
/* once nesting */
puts( "Init: pthread_once - SUCCESSFUL (init_routine_nesting executes)" );
status = pthread_once( &nesting_once, Test_init_routine_nesting );
rtems_test_assert( !status );
/* create a thread */
puts( "Init: pthread_create - SUCCESSFUL" );
status = pthread_create( &thread_id, NULL, Task_1_through_3, NULL );
rtems_test_assert( !status );
/* too may threads error */
puts( "Init: pthread_create - EAGAIN (too many threads)" );
status = pthread_create( &thread_id, NULL, Task_1_through_3, NULL );
rtems_test_assert( status == EAGAIN );
puts( "Init: sched_yield to Task_1" );
status = sched_yield();
rtems_test_assert( !status );
/* switch to Task_1 */
/* exit this thread */
puts( "Init: pthread_exit" );
pthread_exit( NULL );
/* switch to Task_1 */
return NULL; /* just so the compiler thinks we returned something */
}