| /* |
| * |
| * 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 |
| * 14/03/2008 Matthieu Fertré (Matthieu.Fertre@irisa.fr) |
| * - Fix concurrency issue. Due to the use of usleep function to |
| * synchronize processes, synchronization issues can occur on a loaded |
| * system. Fix this by using pipes to synchronize processes. |
| * |
| * RESTRICTIONS |
| * none |
| */ |
| |
| #include "ipcsem.h" |
| #include "libtestsuite.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; |
| |
| int sync_pipes[2]; |
| |
| 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 |
| #define PIPE_NAME "semop05" |
| 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(); |
| |
| /* 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++) { |
| |
| if (sync_pipe_create(sync_pipes, PIPE_NAME) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_create failed"); |
| |
| /* 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_OR_VFORK()) == -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 */ |
| |
| if (sync_pipe_wait(sync_pipes) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_wait failed: %d", errno); |
| |
| if (sync_pipe_close(sync_pipes, PIPE_NAME) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_close failed: %d", errno); |
| |
| /* After son has been created, give it a chance to execute the |
| * semop command before we continue. Without this sleep, on SMP machine |
| * the father rm_sema/kill could be executed before the son semop. |
| */ |
| sleep(1); |
| |
| /* |
| * 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) |
| { |
| #ifdef UCLINUX |
| if (sync_pipe_create(sync_pipes, PIPE_NAME) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_create failed"); |
| #endif |
| if (sync_pipe_notify(sync_pipes) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_notify failed: %d", errno); |
| |
| if (sync_pipe_close(sync_pipes, PIPE_NAME) == -1) |
| tst_brkm(TBROK, cleanup, "sync_pipe_close failed: %d", errno); |
| |
| /* |
| * 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(); |
| } |
| |