122 lines
2.8 KiB
C
122 lines
2.8 KiB
C
/* $Id: test06.c,v 2.1 2000/05/29 13:10:55 cibrario Rel $
|
|
Chf test program.
|
|
Structured condition handling - single and multithreaded
|
|
|
|
$Log: test06.c,v $
|
|
Revision 2.1 2000/05/29 13:10:55 cibrario
|
|
*** empty log message ***
|
|
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <errno.h>
|
|
#include <setjmp.h>
|
|
|
|
#ifdef _REENTRANT
|
|
# include <pthread.h>
|
|
#endif
|
|
|
|
#define CHF_MODULE_ID 255
|
|
#define CHF_EXTENDED_INFO
|
|
#include "Chf.h"
|
|
|
|
#define H_STACK_SIZE 10
|
|
#define C_STACK_SIZE 30
|
|
|
|
void* task( void* arg )
|
|
{
|
|
volatile int phase = 0;
|
|
|
|
ChfTry
|
|
{
|
|
phase = 1;
|
|
ChfCondition 20, CHF_SUCCESS ChfEnd;
|
|
ChfSignal();
|
|
|
|
phase = 2;
|
|
ChfCondition 20, CHF_INFO ChfEnd;
|
|
ChfSignal();
|
|
|
|
phase = 3;
|
|
ChfCondition 20, CHF_WARNING ChfEnd;
|
|
ChfSignal();
|
|
|
|
phase = 4;
|
|
ChfCondition 20, CHF_ERROR ChfEnd;
|
|
ChfSignal();
|
|
|
|
phase = 5;
|
|
ChfCondition 20, CHF_FATAL ChfEnd;
|
|
ChfSignal();
|
|
|
|
/* Should not be reached */
|
|
return ( void* )EXIT_FAILURE;
|
|
}
|
|
ChfCatch
|
|
{
|
|
/* Catched an exception; check descriptor */
|
|
const ChfDescriptor* d = ChfGetTopCondition();
|
|
if ( d == NULL || ChfGetNextDescriptor( d ) != NULL || ChfGetModuleId( d ) != CHF_MODULE_ID || ChfGetConditionCode( d ) != 20 )
|
|
return ( void* )EXIT_FAILURE;
|
|
}
|
|
ChfEndTry;
|
|
|
|
/* Check that the condition stack actually is empty after catch */
|
|
ChfTry { const volatile ChfDescriptor* e = ChfGetTopCondition(); }
|
|
ChfCatch
|
|
{
|
|
const ChfDescriptor* d = ChfGetTopCondition();
|
|
if ( d == NULL || ChfGetNextDescriptor( d ) != NULL || ChfGetModuleId( d ) != CHF_SET ||
|
|
ChfGetConditionCode( d ) != CHF_F_BAD_STATE )
|
|
return ( void* )EXIT_FAILURE;
|
|
}
|
|
ChfEndTry;
|
|
|
|
return ( void* )EXIT_SUCCESS;
|
|
}
|
|
|
|
#define N_THREADS 50
|
|
|
|
int main( int argc, char* argv[] )
|
|
{
|
|
int st;
|
|
int i;
|
|
void* ret;
|
|
|
|
#ifdef _REENTRANT
|
|
pthread_t t[ N_THREADS ];
|
|
#endif
|
|
|
|
puts( "test06" );
|
|
|
|
/* Initialization */
|
|
if ( st = ChfMsgcatInit( argv[ 0 ], CHF_DEFAULT, "./test01.cat", C_STACK_SIZE, H_STACK_SIZE, EXIT_FAILURE ) )
|
|
exit( st );
|
|
|
|
#ifdef _REENTRANT
|
|
/* Create */
|
|
for ( i = 0; i < N_THREADS; i++ )
|
|
if ( pthread_create( &( t[ i ] ), NULL, task, ( void* )i ) ) {
|
|
perror( "pthread_create" );
|
|
exit( EXIT_FAILURE );
|
|
}
|
|
|
|
/* Join */
|
|
for ( i = 0; i < N_THREADS; i++ ) {
|
|
if ( pthread_join( t[ i ], &ret ) ) {
|
|
perror( "pthread_join" );
|
|
exit( EXIT_FAILURE );
|
|
} else if ( ( int )ret != EXIT_SUCCESS )
|
|
exit( ( int )ret );
|
|
}
|
|
|
|
st = EXIT_SUCCESS;
|
|
#else
|
|
st = ( int )task( ( void* )0 );
|
|
#endif
|
|
|
|
/* Exit Chf */
|
|
ChfExit();
|
|
exit( st );
|
|
}
|