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

73 lines
1.2 KiB
C

/* test 13 */
/* File: pipes.c - created by Marty Leisner */
/* Leisner.Henr 1-Dec-87 8:55:04 */
/* Copyright (C) 1987 by Martin Leisner. All rights reserved. */
/* Used by permission. */
#include <sys/types.h>
#include <sys/wait.h>
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#define BLOCK_SIZE 1000
#define NUM_BLOCKS 1000
int errct = 0;
char buffer[BLOCK_SIZE];
_PROTOTYPE(int main, (void));
_PROTOTYPE(void quit, (void));
int main()
{
int stat_loc, pipefd[2];
register int i;
pipe(pipefd);
printf("Test 13 ");
fflush(stdout); /* have to flush for child's benefit */
system("rm -rf DIR_13; mkdir DIR_13");
chdir("DIR_13");
pipe(pipefd);
switch (fork()) {
case 0:
/* Child code */
for (i = 0; i < NUM_BLOCKS; i++)
if (read(pipefd[0], buffer, BLOCK_SIZE) != BLOCK_SIZE) break;
exit(0);
case -1:
perror("fork broke");
exit(1);
default:
/* Parent code */
for (i = 0; i < NUM_BLOCKS; i++) write(pipefd[1], buffer, BLOCK_SIZE);
wait(&stat_loc);
break;
}
quit();
return(-1); /* impossible */
}
void quit()
{
chdir("..");
system("rm -rf DIR*");
if (errct == 0) {
printf("ok\n");
exit(0);
} else {
printf("%d errors\n", errct);
exit(1);
}
}