minix/test/ipc/semop/semop01.c
2009-09-21 14:53:53 +00:00

217 lines
5.3 KiB
C

/*
*
* Copyright (c) International Business Machines Corp., 2001
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
* the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
/*
* NAME
* semop01.c
*
* DESCRIPTION
* semop01 - test that semop() basic functionality is correct
*
* ALGORITHM
* create a semaphore set and initialize some values
* loop if that option was specified
* call semop() to set values for the primitive semaphores
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* get the semaphore values and compare with expected values
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* else issue a PASS message
* call cleanup
*
* USAGE: <for command-line>
* semop01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
* 17/01/02 - Modified. Manoj Iyer, IBM Austin. TX. manjo@austin.ibm.com
* 4th argument to semctl() system call was modified according
* to man pages.
* In my opinion The test should not even have compiled but
* it was working due to some mysterious reason.
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#define NSEMS 4 /* the number of primitive semaphores to test */
char *TCID = "semop01";
int TST_TOTAL = 1;
extern int Tst_count;
int sem_id_1 = -1; /* a semaphore set with read & alter permissions */
struct sembuf sops[PSEMS]; /* an array of sembuf structures */
int main(int ac, char **av)
{
union semun get_arr;
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
int fail = 0;
get_arr.array = malloc(sizeof(unsigned short int) * PSEMS);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Use TEST macro to make the call
*/
TEST(semop(sem_id_1, sops, NSEMS));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d "
": %s", TCID, TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
if (STD_FUNCTIONAL_TEST) {
/* get the values and make sure they */
/* are the same as what was set */
if (semctl(sem_id_1, 0, GETALL, get_arr) ==
-1) {
tst_brkm(TBROK, cleanup, "semctl() "
"failed in functional test");
}
for (i=0; i<NSEMS; i++) {
if (get_arr.array[i] != i*i) {
fail = 1;
}
}
if (fail) {
tst_resm(TFAIL, "semaphore values"
" are not expected");
} else {
tst_resm(TPASS, "semaphore values"
" are correct");
}
} else {
tst_resm(TPASS, "call succeeded");
}
}
/*
* clean up things in case we are looping
*/
get_arr.val = 0;
for (i=0; i<NSEMS; i++) {
if(semctl(sem_id_1, i, SETVAL, get_arr) == -1) {
tst_brkm(TBROK, cleanup, "semctl failed");
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
int i;
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
/* set up some values for the first four primitive semaphores */
for (i=0; i<NSEMS; i++){
sops[i].sem_num = i;
sops[i].sem_op = i*i; /* 0, 1, 4, 9, */
sops[i].sem_flg = SEM_UNDO;
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}