[apple/xnu.git] / tools / tests / xnu_quick_test / sema_tests.c

/*
 *  sema_tests.c
 *  xnu_quick_test
 *
 *  Created by Jerry Cottingham on 6/2/2005.
 *  Copyright 2005 Apple Computer Inc. All rights reserved.
 *
 */

#include "tests.h"
#include <sys/sem.h> 
#include <semaphore.h>

/*  **************************************************************************************************************
 *	Test semctl, semget, semop system calls.
 *  **************************************************************************************************************
 */
int sema_tests( void * the_argp ) 
{
#if !TARGET_OS_EMBEDDED
	int				my_err, i;
	int				my_sem_id = -1;
 	union semun		my_sem_union;
	struct sembuf	my_sembuf;

	srand( (unsigned int)getpid() );
	my_sem_id = semget( (key_t)1234, 1, (0666 | IPC_CREAT) );
	if ( my_sem_id == -1 ) {
		printf( "semget failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}

 	my_sem_union.val = 1;
	my_err = semctl( my_sem_id, 0, SETVAL, my_sem_union );
	if ( my_sem_id == -1 ) {
		printf( "semget failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}

	/* verify semop failure for bad nsop values */
	my_err = semop( my_sem_id, &my_sembuf, 10000);
	if (my_err != -1 || errno != E2BIG) {
		printf( "semop did not fail with E2BIG - instead %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;

	}

	for ( i = 0; i < 10000; i++ ) {
		my_sembuf.sem_num = 0;
		my_sembuf.sem_op  = -1;
		my_sembuf.sem_flg = SEM_UNDO;
	
		my_err = semop( my_sem_id, &my_sembuf, 1 );
		if ( my_err == -1 ) {
			printf( "semop failed with error %d - \"%s\" \n", errno, strerror( errno) );
			goto test_failed_exit;
		}

		my_err = semctl( my_sem_id, 0, GETVAL, 0 );
		if ( my_err == -1 ) {
			printf( "semctl failed with error %d - \"%s\" \n", errno, strerror( errno) );
			goto test_failed_exit;
		}
		if ( my_err != 0 ) {
			printf( "semctl(getval) returned %d. it should be 0 (locked) here \n", my_err );
			goto test_failed_exit;
        }

		my_sembuf.sem_num = 0;
		my_sembuf.sem_op  = 1;
		my_sembuf.sem_flg = SEM_UNDO;
		
		my_err = semop( my_sem_id, &my_sembuf, 1 );
		if ( my_err == -1 ) {
			printf( "semop failed with error %d - \"%s\" \n", errno, strerror( errno) );
			goto test_failed_exit;
		}
	}

	my_err = semctl( my_sem_id, 0, IPC_RMID, my_sem_union );
	if ( my_err == -1 ) {
		printf( "semctl (IPC_RMID) failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}
	my_sem_id = -1;
	my_err = 0;
	goto test_passed_exit;

test_failed_exit:
	my_err = -1;
	
test_passed_exit:
	if ( my_sem_id != -1 ) {
		semctl( my_sem_id, 0, IPC_RMID, my_sem_union );
	}
	return( my_err );
#else
	printf( "\t--> Not supported on EMBEDDED TARGET\n" );
	return 0;
#endif
}


/*  **************************************************************************************************************
 *	Test sem_close, sem_open, sem_post, sem_trywait, sem_unlink, sem_wait system calls.
 *  **************************************************************************************************************
 */
int sema2_tests( void * the_argp ) 
{
	int				my_err;
	sem_t *			my_sem_t = (sem_t *)SEM_FAILED;
	char			my_sema_name[ 64 ];
	
	/* get a semaphore (initialized as locked) */
	sprintf( &my_sema_name[0], "sema_testing_%d", getpid( ) );
	my_sem_t = sem_open( &my_sema_name[0], (O_CREAT | O_EXCL), (S_IRUSR | S_IWUSR), 0 );
	if ( my_sem_t == (sem_t*)SEM_FAILED ) {
		printf( "sem_open failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}

	/* get the lock - should return EAGAIN (EWOULDBLOCK) */
	my_err = sem_trywait( my_sem_t );
	if ( my_err == -1 ) {
		my_err = errno;
		if ( my_err != EAGAIN ) {
			printf( "sem_trywait failed with error %d - \"%s\" \n", my_err, strerror( my_err) );
			goto test_failed_exit;
		} 
	}

	/* unlock our semaphore */
	my_err = sem_post( my_sem_t );
	if ( my_err == -1 ) {
		printf( "sem_post failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}

	/* get the lock again */
	my_err = sem_wait( my_sem_t );
	if ( my_err == -1 ) {
		printf( "sem_wait failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}
	
	my_err = sem_unlink( &my_sema_name[0] );
	if ( my_err == -1 ) {
		printf( "sem_unlink failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}
	
	my_err = sem_close( my_sem_t );
	if ( my_err == -1 ) {
		printf( "sem_close failed with error %d - \"%s\" \n", errno, strerror( errno) );
		goto test_failed_exit;
	}
	my_sem_t = (sem_t *)SEM_FAILED;

	my_err = 0;
	goto test_passed_exit;

test_failed_exit:
	my_err = -1;
	
test_passed_exit:
	if ( my_sem_t != (sem_t *)SEM_FAILED ) {
		sem_close( my_sem_t );
	}
	return( my_err );
}
Commit	Line	Data
2d21ac55 A	1	/*
	2	* sema_tests.c
	3	* xnu_quick_test
	4	*
	5	* Created by Jerry Cottingham on 6/2/2005.
	6	* Copyright 2005 Apple Computer Inc. All rights reserved.
	7	*
	8	*/
	9
	10	#include "tests.h"
	11	#include <sys/sem.h>
	12	#include <semaphore.h>
	13
	14	/* **************************************************************************************************************
	15	* Test semctl, semget, semop system calls.
	16	* **************************************************************************************************************
	17	*/
	18	int sema_tests( void * the_argp )
	19	{
cf7d32b8	20	#if !TARGET_OS_EMBEDDED
2d21ac55 A	21	int my_err, i;
	22	int my_sem_id = -1;
	23	union semun my_sem_union;
b0d623f7	24	struct sembuf my_sembuf;
2d21ac55 A	25
	26	srand( (unsigned int)getpid() );
	27	my_sem_id = semget( (key_t)1234, 1, (0666 \| IPC_CREAT) );
	28	if ( my_sem_id == -1 ) {
	29	printf( "semget failed with error %d - \"%s\" \n", errno, strerror( errno) );
	30	goto test_failed_exit;
	31	}
	32
2d21ac55 A	33	my_sem_union.val = 1;
	34	my_err = semctl( my_sem_id, 0, SETVAL, my_sem_union );
	35	if ( my_sem_id == -1 ) {
	36	printf( "semget failed with error %d - \"%s\" \n", errno, strerror( errno) );
	37	goto test_failed_exit;
	38	}
	39
b0d623f7 A	40	/* verify semop failure for bad nsop values */
	41	my_err = semop( my_sem_id, &my_sembuf, 10000);
	42	if (my_err != -1 \|\| errno != E2BIG) {
	43	printf( "semop did not fail with E2BIG - instead %d - \"%s\" \n", errno, strerror( errno) );
	44	goto test_failed_exit;
2d21ac55	45
b0d623f7 A	46	}
	47
	48	for ( i = 0; i < 10000; i++ ) {
2d21ac55 A	49	my_sembuf.sem_num = 0;
	50	my_sembuf.sem_op = -1;
	51	my_sembuf.sem_flg = SEM_UNDO;
	52
	53	my_err = semop( my_sem_id, &my_sembuf, 1 );
	54	if ( my_err == -1 ) {
	55	printf( "semop failed with error %d - \"%s\" \n", errno, strerror( errno) );
	56	goto test_failed_exit;
	57	}
	58
b0d623f7	59	my_err = semctl( my_sem_id, 0, GETVAL, 0 );
2d21ac55 A	60	if ( my_err == -1 ) {
	61	printf( "semctl failed with error %d - \"%s\" \n", errno, strerror( errno) );
	62	goto test_failed_exit;
	63	}
	64	if ( my_err != 0 ) {
	65	printf( "semctl(getval) returned %d. it should be 0 (locked) here \n", my_err );
	66	goto test_failed_exit;
	67	}
	68
	69	my_sembuf.sem_num = 0;
	70	my_sembuf.sem_op = 1;
	71	my_sembuf.sem_flg = SEM_UNDO;
	72
	73	my_err = semop( my_sem_id, &my_sembuf, 1 );
	74	if ( my_err == -1 ) {
	75	printf( "semop failed with error %d - \"%s\" \n", errno, strerror( errno) );
	76	goto test_failed_exit;
	77	}
	78	}
	79
	80	my_err = semctl( my_sem_id, 0, IPC_RMID, my_sem_union );
	81	if ( my_err == -1 ) {
	82	printf( "semctl (IPC_RMID) failed with error %d - \"%s\" \n", errno, strerror( errno) );
	83	goto test_failed_exit;
	84	}
	85	my_sem_id = -1;
	86	my_err = 0;
	87	goto test_passed_exit;
	88
	89	test_failed_exit:
	90	my_err = -1;
	91
	92	test_passed_exit:
	93	if ( my_sem_id != -1 ) {
	94	semctl( my_sem_id, 0, IPC_RMID, my_sem_union );
	95	}
	96	return( my_err );
cf7d32b8 A	97	#else
	98	printf( "\t--> Not supported on EMBEDDED TARGET\n" );
	99	return 0;
	100	#endif
2d21ac55 A	101	}
	102
	103
	104	/* **************************************************************************************************************
	105	* Test sem_close, sem_open, sem_post, sem_trywait, sem_unlink, sem_wait system calls.
	106	* **************************************************************************************************************
	107	*/
	108	int sema2_tests( void * the_argp )
	109	{
	110	int my_err;
	111	sem_t * my_sem_t = (sem_t *)SEM_FAILED;
	112	char my_sema_name[ 64 ];
	113
	114	/* get a semaphore (initialized as locked) */
	115	sprintf( &my_sema_name[0], "sema_testing_%d", getpid( ) );
	116	my_sem_t = sem_open( &my_sema_name[0], (O_CREAT \| O_EXCL), (S_IRUSR \| S_IWUSR), 0 );
	117	if ( my_sem_t == (sem_t*)SEM_FAILED ) {
	118	printf( "sem_open failed with error %d - \"%s\" \n", errno, strerror( errno) );
	119	goto test_failed_exit;
	120	}
	121
	122	/* get the lock - should return EAGAIN (EWOULDBLOCK) */
	123	my_err = sem_trywait( my_sem_t );
	124	if ( my_err == -1 ) {
	125	my_err = errno;
	126	if ( my_err != EAGAIN ) {
	127	printf( "sem_trywait failed with error %d - \"%s\" \n", my_err, strerror( my_err) );
	128	goto test_failed_exit;
	129	}
	130	}
	131
	132	/* unlock our semaphore */
	133	my_err = sem_post( my_sem_t );
	134	if ( my_err == -1 ) {
	135	printf( "sem_post failed with error %d - \"%s\" \n", errno, strerror( errno) );
	136	goto test_failed_exit;
	137	}
	138
	139	/* get the lock again */
	140	my_err = sem_wait( my_sem_t );
	141	if ( my_err == -1 ) {
	142	printf( "sem_wait failed with error %d - \"%s\" \n", errno, strerror( errno) );
	143	goto test_failed_exit;
	144	}
	145
	146	my_err = sem_unlink( &my_sema_name[0] );
	147	if ( my_err == -1 ) {
	148	printf( "sem_unlink failed with error %d - \"%s\" \n", errno, strerror( errno) );
	149	goto test_failed_exit;
	150	}
	151
	152	my_err = sem_close( my_sem_t );
	153	if ( my_err == -1 ) {
	154	printf( "sem_close failed with error %d - \"%s\" \n", errno, strerror( errno) );
	155	goto test_failed_exit;
	156	}
	157	my_sem_t = (sem_t *)SEM_FAILED;
	158
	159	my_err = 0;
	160	goto test_passed_exit;
	161
	162	test_failed_exit:
	163	my_err = -1;
	164
165	test_passed_exit:
166	if ( my_sem_t != (sem_t *)SEM_FAILED ) {
167	sem_close( my_sem_t );
168	}
169	return( my_err );
170	}