diff options
Diffstat (limited to 'winsup/testsuite/winsup.api/ltp/pipe09.c')
| -rw-r--r-- | winsup/testsuite/winsup.api/ltp/pipe09.c | 232 |
1 files changed, 232 insertions, 0 deletions
diff --git a/winsup/testsuite/winsup.api/ltp/pipe09.c b/winsup/testsuite/winsup.api/ltp/pipe09.c new file mode 100644 index 000000000..2c7d9f4c2 --- /dev/null +++ b/winsup/testsuite/winsup.api/ltp/pipe09.c @@ -0,0 +1,232 @@ +/* + * + * 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 + * pipe09.c + * + * DESCRIPTION + * Check that two processes can use the same pipe at the same time. + * + * ALGORITHM + * 1. Open a pipe + * 2. Fork a child which writes to the pipe + * 3. Fork another child which writes a different character to the pipe + * 4. Have the parent read from the pipe + * 5. It should get the characters from both children. + * + * USAGE: <for command-line> + * pipe09 [-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 + * 07/2001 Ported by Wayne Boyer + * + * RESTRICTIONS + * None + */ +#include <unistd.h> +#include <signal.h> +#include <sys/wait.h> +#include <errno.h> +#include "test.h" +#include "usctest.h" + +#define PIPEWRTCNT 100 /* must be an even number */ + +char *TCID = "pipe09"; +int TST_TOTAL = 1; +extern int Tst_count; + +void setup(void); +void cleanup(void); + +main(int ac, char **av) +{ + int lc; /* loop counter */ + const char *msg; /* message returned from parse_opts */ + + int i, red, wtstatus, ret_val; + int pipe_ret; /* exit stat of pipe */ + int pipefd[2]; /* fds for pipe read/write */ + char synbuf[BUFSIZ]; + char rebuf[BUFSIZ]; + int Acnt = 0, Bcnt = 0; /* count 'A' and 'B' */ + int fork_1, fork_2; /* ret values in parent */ + + /* parse standard options */ + if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){ + tst_brkm(TBROK, tst_exit, "OPTION PARSING ERROR - %s", msg); + /*NOTREACHED*/ + } + + setup(); + + for (lc = 0; TEST_LOOPING(lc); lc++) { + + /* reset Tst_count in case we are looping */ + Tst_count = 0; + + TEST(pipe(pipefd)); + + if (TEST_RETURN == -1) { + tst_resm(TFAIL, "pipe() call failed"); + continue; + } + + if (!STD_FUNCTIONAL_TEST) { + tst_resm(TWARN, "-f option should not be used"); + tst_resm(TPASS, "call succeeded"); + continue; + } + + if ((fork_1 = fork()) == -1) { + tst_brkm(TBROK, cleanup, "fork() #1 failed"); + /*NOTREACHED*/ + } + + if (fork_1 == 0) { /* 1st child */ + if (close(pipefd[0]) != 0) { + tst_resm(TWARN, "pipefd[0] close failed, " + "errno = %d", errno); + exit(1); + } + + for (i = 0; i < PIPEWRTCNT / 2; ++i) { + if (write(pipefd[1], "A", 1) != 1) { + tst_resm(TWARN, "write to pipe failed"); + exit(1); + } + } + exit(0); + } + + /* parent */ + + waitpid(fork_1, &wtstatus, 0); + if (WEXITSTATUS(wtstatus) != 0) { + tst_brkm(TBROK, cleanup, "problem detected in child, " + "wait status %d, errno = %d", wtstatus, errno); + } + + if ((fork_2 = fork()) == -1) { + tst_brkm(TBROK, cleanup, "fork() #2 failed"); + /*NOTREACHED*/ + } + + if (fork_2 == 0) { /* 2nd child */ + if (close(pipefd[0]) != 0) { + tst_resm(TWARN, "pipefd[0] close " + "failed, errno = %d", errno); + exit(1); + } + + for (i = 0; i < PIPEWRTCNT / 2; ++i) { + if (write(pipefd[1], "B", 1) != 1) { + tst_resm(TWARN, "write to pipe failed"); + exit(1); + } + } + exit(0); + } + + /* parent */ + + waitpid(fork_2, &wtstatus, 0); + if (WEXITSTATUS(wtstatus) != 0) { + tst_brkm(TBROK, cleanup, "problem detected in child, " + "wait status %d, errno = %d", wtstatus, errno); + } + + if (close(pipefd[1]) != 0) { + tst_brkm(TBROK, cleanup, "pipefd[1] close failed, " + "errno = %d", errno); + /*NOTREACHED*/ + } + + while ((red = read(pipefd[0], rebuf, 100)) > 0) { + for (i = 0; i < red; i++) { + if (rebuf[i] == 'A') { + Acnt++; + continue; + } + if (rebuf[i] == 'B') { + Bcnt++; + continue; + } + tst_resm(TFAIL, "got bogus '%c' character", + rebuf[i]); + break; + } + } + + if (red == -1) { + tst_brkm(TBROK, cleanup, "Failure reading pipefd pipe, " + "errno = %d", errno); + } + + if (Bcnt == Acnt && Bcnt == (PIPEWRTCNT / 2)) { + tst_resm(TPASS, "functionality appears to be correct"); + } else { + tst_resm(TFAIL, "functionality is not correct - Acnt " + "= %d, Bcnt = %d", Acnt, Bcnt); + } + + /* clean up things in case we are looping */ + Acnt = Bcnt = 0; + } + cleanup(); + + /*NOTREACHED*/ +} + +/* + * setup() - performs all ONE TIME setup for this test. + */ +void +setup() +{ + /* capture signals */ + tst_sig(FORK, DEF_HANDLER, cleanup); + + /* Pause if that option was specified */ + TEST_PAUSE; +} + +/* + * cleanup() - performs all ONE TIME cleanup for this test at + * completion or premature exit. + */ +void +cleanup() +{ + /* + * 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(); +} |