diff options
Diffstat (limited to 'winsup/testsuite/winsup.api/ltp/getpgid01.c')
| -rw-r--r-- | winsup/testsuite/winsup.api/ltp/getpgid01.c | 240 |
1 files changed, 240 insertions, 0 deletions
diff --git a/winsup/testsuite/winsup.api/ltp/getpgid01.c b/winsup/testsuite/winsup.api/ltp/getpgid01.c new file mode 100644 index 000000000..d1a39a087 --- /dev/null +++ b/winsup/testsuite/winsup.api/ltp/getpgid01.c @@ -0,0 +1,240 @@ +/* + * + * 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 + * getpgid01.c + * + * DESCRIPTION + * Testcase to check the basic functionality of getpgid(). + * + * ALGORITHM + * block1: Does getpgid(0), and checks for error. + * block2: Does getpgid(getpid()) and checks for error. + * block3: Does getpgid(getppid()) and checks for error. + * block4: Verifies that getpgid(getpgid(0)) == getpgid(0). + * block5: Does getpgid(1) and checks for error. + * + * USAGE + * getpgid01 + * + * HISTORY + * 07/2001 Ported by Wayne Boyer + * + * RESTRICTIONS + * Expects that there are no EPERM limitations on getting the + * process group ID from proc 1 (init). + */ + +#include <sys/types.h> +#include <errno.h> +#include <varargs.h> +#include <sys/wait.h> +#include <test.h> +#include <usctest.h> + +void setup(void); +void cleanup(void); + +char *TCID = "getpgid01"; +int TST_TOTAL = 1; +extern int Tst_count; + +main(int ac, char **av) +{ + int lc; /* loop counter */ + const char *msg; /* message returned by parse_opts */ + + register int pgid_0, pgid_1; + register int my_pid, my_ppid; + int ex_stat, fail = 0; + + /* 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(); + + /* check looping state if -i option given */ + for (lc = 0; TEST_LOOPING(lc); lc++) { + /* reset Tst_count in case we are looping */ + Tst_count = 0; + + if ((pgid_0 = fork()) < 0) { + tst_brkm(TBROK, cleanup, "fork() failed"); + } + if (pgid_0 > 0) { /* parent */ + /* + * parent process waits for child to exit, and then + * exits itself. + */ + while ((pgid_0 = wait(&ex_stat)) > 0); + + if (WEXITSTATUS(ex_stat) == 0) { + tst_resm(TINFO, "%s PASSED", TCID); + } else { + tst_resm(TINFO, "%s FAILED", TCID); + } + + /* let the child carry on */ + exit(0); + } + + /* child */ +block1: + tst_resm(TINFO, "Enter block 1"); + fail = 0; + if ((pgid_0 = getpgid(0)) < 0) { + perror("getpgid"); + tst_resm(TFAIL, "getpgid(0) failed"); + fail = 1; + } + + if (fail) { + tst_resm(TINFO, "Test block 1: getpgid(0) FAILED"); + } else { + tst_resm(TPASS, "Test block 1: getpgid(0) PASSED"); + } + tst_resm(TINFO, "Exit block 1"); + +block2: + tst_resm(TINFO, "Enter block 2"); + fail = 0; + + my_pid = getpid(); + if ((pgid_1 = getpgid(my_pid)) < 0) { + perror("getpgid"); + tst_resm(TFAIL, "getpgid(my_pid=%d) failed", my_pid); + tst_exit(); + } + if (pgid_0 != pgid_1) { + tst_resm(TFAIL, "getpgid(my_pid=%d) != getpgid(0) " + "[%d != %d]", my_pid, pgid_1, pgid_0); + fail = 1; + } + if (fail) { + tst_resm(TINFO, "Test block 2: getpgid(getpid()) " + "FAILED"); + } else { + tst_resm(TPASS, "Test blcok 2: getpgid(getpid()) " + "PASSED"); + } + tst_resm(TINFO, "Exit block 2"); + +block3: + tst_resm(TINFO, "Enter block 3"); + fail = 0; + + my_ppid = getppid(); + if ((pgid_1 = getpgid(my_ppid)) < 0) { + perror("getpgid"); + tst_resm(TFAIL, "getpgid(my_ppid=%d) failed", + my_ppid); + tst_exit(); + } + if (pgid_0 != pgid_1) { + tst_resm(TFAIL, "getpgid(my_ppid=%d) != getpgid(0) " + "[%d != %d]", my_ppid, pgid_1, pgid_0); + fail = 1; + } + + if (fail) { + tst_resm(TINFO, "Test block 3: getpgid(getppid()) " + "FAILED"); + } else { + tst_resm(TPASS, "Test block 3: getpgid(getppid()) " + "PASSED"); + } + tst_resm(TINFO, "Exit block 3"); + +block4: + tst_resm(TINFO, "Enter block 4"); + fail = 0; + + if ((pgid_1 = getpgid(pgid_0)) < 0) { + perror("getpgid"); + tst_resm(TFAIL, "getpgid(my_pgid=%d) failed", pgid_0); + tst_exit(); + } + if (pgid_0 != pgid_1) { + tst_resm(TFAIL, "getpgid(my_pgid=%d) != getpgid(0) " + "[%d != %d]", pgid_0, pgid_1, pgid_0); + fail = 1; + } + + if (fail) { + tst_resm(TINFO, "Test block 4: getpgid(1) FAILED"); + } else { + tst_resm(TPASS, "Test block 4: getpgid(1) PASSED"); + } + tst_resm(TINFO, "Exit block 4"); +#ifndef __CYGWIN__ +block5: + tst_resm(TINFO, "Enter block 5"); + fail = 0; + + if (getpgid(1) < 0) { + perror("getpgid"); + tst_resm(TFAIL, "getpgid(1) failed"); + fail = 1; + } + + if (fail) { + tst_resm(TINFO, "Test block 5: getpgid(1) FAILED"); + } else { + tst_resm(TPASS, "Test block 5: getpgid(1) PASSED"); + } + tst_resm(TINFO, "Exit block 5"); +#endif + } + cleanup(); +} + +/* + * 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(); +} + |