test/test12.c

   1 /* test 12 */
   2
   3 /* Copyright (C) 1987 by Martin Leisner. All rights reserved. */
   4 /* Used by permission. */
   5
   6 #include <sys/types.h>
   7 #include <sys/wait.h>
   8 #include <stdlib.h>
   9 #include <unistd.h>
  10 #include <stdio.h>
  11
  12 #define NUM_TIMES       1000
  13
  14 int errct = 0;
  15
  16 _PROTOTYPE(int main, (void));
  17 _PROTOTYPE(void quit, (void));
  18
  19 int main()
  20 {
  21   register int i;
  22   int k;
  23
  24   printf("Test 12 ");
  25   fflush(stdout);               /* have to flush for child's benefit */
  26
  27   system("rm -rf DIR_12; mkdir DIR_12");
  28   chdir("DIR_12");
  29
  30   for (i = 0; i < NUM_TIMES; i++) switch (fork()) {
  31             case 0:     exit(1);                        break;
  32             case -1:
  33                 printf("fork broke\n");
  34                 exit(1);
  35             default:    wait(&k);                       break;
  36         }
  37
  38   quit();
  39   return(-1);                   /* impossible */
  40 }
  41
  42 void quit()
  43 {
  44
  45   chdir("..");
  46   system("rm -rf DIR*");
  47
  48   if (errct == 0) {
  49         printf("ok\n");
  50         exit(0);
  51   } else {
  52         printf("%d errors\n", errct);
  53         exit(1);
  54   }
  55 }