minix/test/test4.c
Ben Gras 6a73e85ad1 retire _PROTOTYPE
. only good for obsolete K&R support
	. also remove a stray ansi.h and the proto cmd
2012-03-25 16:17:10 +02:00

90 lines
1.4 KiB
C

/* test 4 */
#include <sys/types.h>
#include <sys/wait.h>
#include <fcntl.h>
#include <signal.h>
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
pid_t pid0, pid1, pid2, pid3;
int s, i, fd, nextb;
char *tempfile = "test4.temp";
char buf[1024];
#define MAX_ERROR 2
#include "common.c"
int main(void);
void subr(void);
void nofork(void);
void quit(void);
int main()
{
int k;
start(4);
creat(tempfile, 0777);
for (k = 0; k < 20; k++) {
subr();
}
unlink(tempfile);
quit();
return(-1); /* impossible */
}
void subr()
{
if ( (pid0 = fork()) != 0) {
/* Parent 0 */
if (pid0 < 0) nofork();
if ( (pid1 = fork()) != 0) {
/* Parent 1 */
if (pid1 < 0) nofork();
if ( (pid2 = fork()) != 0) {
/* Parent 2 */
if (pid2 < 0) nofork();
if ( (pid3 = fork()) != 0) {
/* Parent 3 */
if (pid3 < 0) nofork();
for (i = 0; i < 10000; i++);
kill(pid2, 9);
kill(pid1, 9);
kill(pid0, 9);
wait(&s);
wait(&s);
wait(&s);
wait(&s);
} else {
fd = open(tempfile, O_RDONLY);
lseek(fd, 20480L * nextb, 0);
for (i = 0; i < 10; i++) read(fd, buf, 1024);
nextb++;
close(fd);
exit(0);
}
} else {
while (1) getpid();
}
} else {
while (1) getpid();
}
} else {
while (1) getpid();
}
}
void nofork()
{
int e = errno;
printf("Fork failed: %s (%d)\n",strerror(e),e);
exit(1);
}