int
_raise_r (struct _reent *ptr,
int sig)
{
_sig_func_ptr func;
if (sig < 0 || sig >= NSIG)
{
__errno_r(ptr) = EINVAL;
return -1;
}
if (ptr->_sig_func == NULL)
func = SIG_DFL;
else
func = ptr->_sig_func[sig];
if (func == SIG_DFL)
return _kill_r (ptr, _getpid_r (ptr), sig);
else if (func == SIG_IGN)
return 0;
else if (func == SIG_ERR)
{
__errno_r(ptr) = EINVAL;
return 1;
}
else
{
ptr->_sig_func[sig] = SIG_DFL;
func (sig);
return 0;
}
}
int kill(int pid, int sig)
{
#ifdef REENTRANT_SYSCALLS_PROVIDED
return _kill_r(_REENT, pid, sig);
#else
return _kill(pid, sig);
#endif
}
void *POSIX_Init(
void *argument
)
{
int status;
struct sigaction act;
sigset_t mask;
sighandler_t oldHandler;
sighandler_t newHandler;
rtems_interval start, end;
puts( "\n\n*** POSIX TEST SIGNAL ***" );
/* 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 );
Signal_occurred = 0;
Signal_count = 0;
act.sa_handler = Handler_1;
act.sa_flags = 0;
sigaction( SIGUSR1, &act, NULL );
sigaction( SIGFPE, &act, NULL );
sigaction( SIGILL, &act, NULL );
sigaction( SIGSEGV, &act, NULL );
/*
* If we have the signal pending with default, we will die.
*/
puts("Validate signal with SIG_DFL");
signal( SIGUSR1, SIG_DFL );
status = kill( getpid(), SIGUSR1 );
status = sleep( 1 );
puts("Validate signal with SIG_IGN");
signal( SIGUSR1, SIG_IGN );
status = kill( getpid(), SIGUSR1 );
status = sleep( 1 );
/* unblock Signal and see if it happened */
status = sigemptyset( &mask );
rtems_test_assert( !status );
status = sigaddset( &mask, SIGUSR1 );
rtems_test_assert( !status );
status = sigaddset( &mask, SIGFPE );
rtems_test_assert( !status );
status = sigaddset( &mask, SIGILL );
rtems_test_assert( !status );
status = sigaddset( &mask, SIGSEGV );
rtems_test_assert( !status );
puts( "Init: Unblock SIGUSR1 SIGFPE SIGILL SIGSEGV" );
status = sigprocmask( SIG_UNBLOCK, &mask, NULL );
rtems_test_assert( !status );
/* install a signal handler for SIGUSR1 */
Signal_occurred = 0;
Signal_count = 0;
act.sa_handler = Handler_1;
act.sa_flags = 0;
sigaction( SIGUSR1, &act, NULL );
Signal_count = 0;
Signal_occurred = 0;
newHandler = Signal_handler;
oldHandler = signal( SIGUSR1, newHandler );
if (oldHandler == Handler_1 )
puts("Init: signal return value verified");
else
puts("Init: ERROR==> signal unexpected return value" );
status = sleep( 1 );
puts( "Init: send SIGUSR1 to process" );
status = kill( getpid(), SIGUSR1 );
status = sleep( 5 );
puts( "Init: send SIGFPE to process" );
status = _kill_r( NULL, getpid(), SIGFPE );
status = sleep(5);
puts( "Init: send SIGILL to process" );
status = _kill_r( NULL, getpid(), SIGILL );
status = sleep(5);
puts( "Init: send SIGSEGV to process" );
status = _kill_r( NULL, getpid(), SIGSEGV );
status = sleep(5);
Timer_name[0]= rtems_build_name( 'T', 'M', '1', ' ' );
status = rtems_timer_create( Timer_name[0], &Timer_id[0]);
Signal_count = 0;
Signal_occurred = 0;
puts( "Init: send SIGUSR1 to process from a TSR (interruptible sleep)" );
status = rtems_timer_fire_after(
Timer_id[ 0 ],
1,
Signal_duringISR_TSR,
NULL
);
sleep(5);
/* signal occurs during interruptible sleep */
/* now schedule another one to fire but do not sleep */
puts( "Init: send SIGUSR1 to process from a TSR (spin)" );
start = rtems_clock_get_ticks_since_boot();
Signal_count = 0;
Signal_occurred = 0;
status = rtems_timer_fire_after(
Timer_id[ 0 ],
10,
Signal_duringISR_TSR,
NULL
);
do {
end = rtems_clock_get_ticks_since_boot();
} while ( !Signal_occurred && ((end - start) <= 800));
if ( !Signal_occurred ) {
puts( "Signal did not occur" );
rtems_test_exit(0);
}
/* end of install a signal handler for SIGUSR1 */
Signal_occurred = 0;
puts("*** Validate unexpected program termination ***");
puts( "*** END OF POSIX TEST SIGNAL ***" );
_POSIX_signals_Abnormal_termination_handler( SIGUSR1 );
status = sleep( 1 );
puts( "ERROR==> Expected program termination");
rtems_test_exit(0);
return NULL; /* just so the compiler thinks we returned something */
}
