312 lines
6.7 KiB
C
312 lines
6.7 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
|
|
* semop05.c
|
|
*
|
|
* DESCRIPTION
|
|
* semop05 - test for EINTR and EIDRM errors
|
|
*
|
|
* ALGORITHM
|
|
* create a semaphore set with read and alter permissions
|
|
* loop if that option was specified
|
|
* set up the s_buf buffer
|
|
* initialize the primitive semaphores
|
|
* fork a child process
|
|
* child calls semop() and sleeps
|
|
* parent either removes the semaphore set or sends a signal to the child
|
|
* parent then exits
|
|
* child gets a return from the semop() call
|
|
* check the errno value
|
|
* issue a PASS message if we get EINTR or EIDRM
|
|
* otherwise, the tests fails
|
|
* issue a FAIL message
|
|
* call cleanup
|
|
*
|
|
* USAGE: <for command-line>
|
|
* semop05 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
|
|
* where, -c n : Run n copies concurrently.
|
|
* -e : Turn on errno logging.
|
|
* -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
|
|
*
|
|
* RESTRICTIONS
|
|
* none
|
|
*/
|
|
|
|
#include "ipcsem.h"
|
|
#include <sys/types.h>
|
|
#include <sys/wait.h>
|
|
|
|
void sighandler(int);
|
|
|
|
char *TCID = "semop05";
|
|
int TST_TOTAL = 4;
|
|
extern int Tst_count;
|
|
|
|
int exp_enos[] = {EINTR, EIDRM, 0}; /* 0 terminated list of expected errnos */
|
|
|
|
int sem_id_1 = -1;
|
|
|
|
struct sembuf s_buf;
|
|
|
|
struct test_case_t {
|
|
union semun semunptr;
|
|
short op;
|
|
short flg;
|
|
short num;
|
|
int error;
|
|
} TC[] = {
|
|
/* EIRDM sem_op = 0 */
|
|
{{1}, 0, 0, 2, EIDRM},
|
|
|
|
/* EIRDM sem_op = -1 */
|
|
{{0}, -1, 0, 3, EIDRM},
|
|
|
|
/* EINTR sem_op = 0 */
|
|
{{1}, 0, 0, 4, EINTR},
|
|
|
|
/* EINTR sem_op = -1 */
|
|
{{0}, -1, 0, 5, EINTR}
|
|
};
|
|
|
|
#ifdef UCLINUX
|
|
void do_child_uclinux();
|
|
static int i_uclinux;
|
|
#endif
|
|
|
|
int main(int ac, char **av)
|
|
{
|
|
int lc; /* loop counter */
|
|
char *msg; /* message returned from parse_opts */
|
|
int i;
|
|
pid_t pid;
|
|
void do_child(int);
|
|
|
|
/* parse standard options */
|
|
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
|
|
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
|
|
}
|
|
|
|
#ifdef UCLINUX
|
|
maybe_run_child(&do_child_uclinux, "dd", &i_uclinux, &sem_id_1);
|
|
#endif
|
|
|
|
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;
|
|
|
|
for (i=0; i<TST_TOTAL; i++) {
|
|
|
|
/* initialize the s_buf buffer */
|
|
s_buf.sem_op = TC[i].op;
|
|
s_buf.sem_flg = TC[i].flg;
|
|
s_buf.sem_num = TC[i].num;
|
|
|
|
/* initialize all of the primitive semaphores */
|
|
if (semctl(sem_id_1, TC[i].num, SETVAL, TC[i].semunptr)
|
|
== -1) {
|
|
tst_brkm(TBROK, cleanup, "semctl() failed");
|
|
}
|
|
|
|
if ((pid = fork()) == -1) {
|
|
tst_brkm(TBROK, cleanup, "could not fork");
|
|
}
|
|
|
|
if (pid == 0) { /* child */
|
|
#ifdef UCLINUX
|
|
if (self_exec(av[0], "dd", i, sem_id_1) < 0) {
|
|
tst_brkm(TBROK, cleanup,
|
|
"could not self_exec");
|
|
}
|
|
#else
|
|
do_child(i);
|
|
#endif
|
|
} else { /* parent */
|
|
usleep(250000);
|
|
|
|
/*
|
|
* If we are testing for EIDRM then remove
|
|
* the semaphore, else send a signal that
|
|
* must be caught as we are testing for
|
|
* EINTR.
|
|
*/
|
|
if (TC[i].error == EIDRM) {
|
|
/* remove the semaphore resource */
|
|
rm_sema(sem_id_1);
|
|
} else {
|
|
if (kill(pid, SIGHUP) == -1) {
|
|
tst_brkm(TBROK, cleanup,
|
|
"kill failed");
|
|
}
|
|
}
|
|
|
|
/* let the child carry on */
|
|
waitpid(pid,NULL,0);
|
|
}
|
|
|
|
/*
|
|
* recreate the semaphore resource if needed
|
|
*/
|
|
if (TC[i].error == EINTR) {
|
|
continue;
|
|
}
|
|
|
|
if ((sem_id_1 = semget(semkey, PSEMS, IPC_CREAT |
|
|
IPC_EXCL | SEM_RA)) == -1) {
|
|
tst_brkm(TBROK, cleanup, "couldn't recreate "
|
|
"semaphore");
|
|
}
|
|
}
|
|
}
|
|
|
|
cleanup();
|
|
|
|
/*NOTREACHED*/
|
|
return(0);
|
|
}
|
|
|
|
/*
|
|
* do_child()
|
|
*/
|
|
void
|
|
do_child(int i)
|
|
{
|
|
/*
|
|
* make the call with the TEST macro
|
|
*/
|
|
|
|
TEST(semop(sem_id_1, &s_buf, 1));
|
|
|
|
if (TEST_RETURN != -1) {
|
|
tst_resm(TFAIL, "call succeeded when error expected");
|
|
exit(-1);
|
|
}
|
|
|
|
TEST_ERROR_LOG(TEST_ERRNO);
|
|
|
|
if (TEST_ERRNO == TC[i].error) {
|
|
tst_resm(TPASS, "expected failure - errno = %d"
|
|
" : %s", TEST_ERRNO, strerror(TEST_ERRNO));
|
|
} else {
|
|
tst_resm(TFAIL, "unexpected error - "
|
|
"%d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
|
|
}
|
|
|
|
exit(0);
|
|
}
|
|
|
|
#ifdef UCLINUX
|
|
/*
|
|
* do_child_uclinux() - capture signals, re-initialize s_buf then call do_child
|
|
* with the appropriate argument
|
|
*/
|
|
void
|
|
do_child_uclinux()
|
|
{
|
|
int i = i_uclinux;
|
|
|
|
/* capture signals */
|
|
tst_sig(FORK, sighandler, cleanup);
|
|
|
|
/* initialize the s_buf buffer */
|
|
s_buf.sem_op = TC[i].op;
|
|
s_buf.sem_flg = TC[i].flg;
|
|
s_buf.sem_num = TC[i].num;
|
|
|
|
do_child(i);
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
* sighandler() - handle signals
|
|
*/
|
|
void
|
|
sighandler(int sig)
|
|
{
|
|
/* we don't need to do anything here */
|
|
}
|
|
|
|
/*
|
|
* setup() - performs all the ONE TIME setup for this test.
|
|
*/
|
|
void
|
|
setup(void)
|
|
{
|
|
/* capture signals */
|
|
tst_sig(FORK, sighandler, cleanup);
|
|
|
|
/* Set up the expected error numbers for -e option */
|
|
TEST_EXP_ENOS(exp_enos);
|
|
|
|
/* 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 */
|
|
/* and PSEMS "primitive" semaphores */
|
|
if ((sem_id_1 =
|
|
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
|
|
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
|
|
}
|
|
}
|
|
|
|
/*
|
|
* cleanup() - performs all the ONE TIME cleanup for this test at completion
|
|
* or premature exit.
|
|
*/
|
|
void
|
|
cleanup(void)
|
|
{
|
|
/* if it exists, remove the semaphore resource */
|
|
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();
|
|
}
|
|
|