stdio/test-popen.c

   1 #include <ansidecl.h>
   2 #include <stdio.h>
   3 #include <stdlib.h>
   4
   5 void
   6 DEFUN(write_data, (stream), FILE *stream)
   7 {
   8   int i;
   9   for (i=0; i<100; i++)
  10     fprintf (stream, "%d\n", i);
  11   if (ferror (stream))  {
  12     fprintf (stderr, "Output to stream failed.\n");
  13     exit (1);
  14     }
  15 }
  16
  17 void
  18 DEFUN(read_data, (stream), FILE *stream)
  19 {
  20   int i, j;
  21
  22   for (i=0; i<100; i++)
  23     {
  24       if (fscanf (stream, "%d\n", &j) != 1 || j != i)
  25         {
  26           if (ferror (stream))
  27             perror ("fscanf");
  28           puts ("Test FAILED!");
  29           exit (1);
  30         }
  31     }
  32 }
  33
  34 int
  35 DEFUN_VOID(main)
  36 {
  37   FILE *output, *input;
  38   int wstatus, rstatus;
  39
  40   output = popen ("/bin/cat >tstpopen.tmp", "w");
  41   if (output == NULL)
  42     {
  43       perror ("popen");
  44       puts ("Test FAILED!");
  45       exit (1);
  46     }
  47   write_data (output);
  48   wstatus = pclose (output);
  49   printf ("writing pclose returned %d\n", wstatus);
  50   input = popen ("/bin/cat tstpopen.tmp", "r");
  51   if (input == NULL)
  52     {
  53       perror ("tstpopen.tmp");
  54       puts ("Test FAILED!");
  55       exit (1);
  56     }
  57   read_data (input);
  58   rstatus = pclose (input);
  59   printf ("reading pclose returned %d\n", rstatus);
  60
  61   puts (wstatus | rstatus  ? "Test FAILED!" : "Test succeeded.");
  62   exit (wstatus | rstatus);
  63 }
  64
  65
  66
  67