newlib/winsup/testsuite/winsup.api/ltp/getpgid01.c

237 lines
5.4 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
* 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 <sys/wait.h>
#include <test.h>
#include <usctest.h>
void setup(void);
void cleanup(void) __attribute__((noreturn));
const char *TCID = "getpgid01";
int TST_TOTAL = 1;
extern int Tst_count;
int
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 */
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");
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");
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");
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();
}