minix/test/test1.c
2005-04-21 14:53:53 +00:00

150 lines
2 KiB
C

/* test 1 */
#include <sys/types.h>
#include <sys/wait.h>
#include <errno.h>
#include <signal.h>
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#define SIGNUM 10
#define MAX_ERROR 4
#define ITERATIONS 10
_VOLATILE int glov, gct;
int errct;
int subtest;
_PROTOTYPE(int main, (int argc, char *argv []));
_PROTOTYPE(void test1a, (void));
_PROTOTYPE(void parent, (void));
_PROTOTYPE(void child, (int i));
_PROTOTYPE(void test1b, (void));
_PROTOTYPE(void parent1, (int childpid));
_PROTOTYPE(void func, (int s));
_PROTOTYPE(void child1, (void));
_PROTOTYPE(void e, (int n));
_PROTOTYPE(void quit, (void));
int main(argc, argv)
int argc;
char *argv[];
{
int i, m = 0xFFFF;
sync();
if (argc == 2) m = atoi(argv[1]);
printf("Test 1 ");
fflush(stdout); /* have to flush for child's benefit */
system("rm -rf DIR_01; mkdir DIR_01");
chdir("DIR_01");
for (i = 0; i < ITERATIONS; i++) {
if (m & 00001) test1a();
if (m & 00002) test1b();
}
quit();
return(-1); /* impossible */
}
void test1a()
{
int i, n, pid;
subtest = 1;
n = 4;
for (i = 0; i < n; i++) {
if ((pid = fork())) {
if (pid < 0) {
printf("\nTest 1 fork failed\n");
exit(1);
}
parent();
} else
child(i);
}
}
void parent()
{
int n;
n = getpid();
wait(&n);
}
void child(i)
int i;
{
int n;
n = getpid();
exit(100+i);
}
void test1b()
{
int i, k;
subtest = 2;
for (i = 0; i < 4; i++) {
glov = 0;
signal(SIGNUM, func);
if ((k = fork())) {
if (k < 0) {
printf("Test 1 fork failed\n");
exit(1);
}
parent1(k);
} else
child1();
}
}
void parent1(childpid)
int childpid;
{
int n;
for (n = 0; n < 5000; n++);
while (kill(childpid, SIGNUM) < 0) /* null statement */
;
wait(&n);
}
void func(s)
int s; /* for ANSI */
{
glov++;
gct++;
}
void child1()
{
while (glov == 0);
exit(gct);
}
void quit()
{
chdir("..");
system("rm -rf DIR*");
if (errct == 0) {
printf("ok\n");
exit(0);
} else {
printf("%d errors\n", errct);
exit(1);
}
}