about summary refs log tree commit diff
path: root/stdio/test-popen.c
diff options
context:
space:
mode:
Diffstat (limited to 'stdio/test-popen.c')
-rw-r--r--stdio/test-popen.c67
1 files changed, 0 insertions, 67 deletions
diff --git a/stdio/test-popen.c b/stdio/test-popen.c
deleted file mode 100644
index b452f3f63c..0000000000
--- a/stdio/test-popen.c
+++ /dev/null
@@ -1,67 +0,0 @@
-#include <ansidecl.h>
-#include <stdio.h>
-#include <stdlib.h>
-
-void
-DEFUN(write_data, (stream), FILE *stream)
-{
-  int i;
-  for (i=0; i<100; i++)
-    fprintf (stream, "%d\n", i);
-  if (ferror (stream))  {
-    fprintf (stderr, "Output to stream failed.\n");
-    exit (1);
-    }
-}
-
-void
-DEFUN(read_data, (stream), FILE *stream)
-{
-  int i, j;
-
-  for (i=0; i<100; i++)
-    {
-      if (fscanf (stream, "%d\n", &j) != 1 || j != i)
-	{
-	  if (ferror (stream))
-	    perror ("fscanf");
-	  puts ("Test FAILED!");
-	  exit (1);
-	}
-    }
-}
-
-int
-DEFUN_VOID(main)
-{
-  FILE *output, *input;
-  int wstatus, rstatus;
-
-  output = popen ("/bin/cat >/tmp/tstpopen.tmp", "w");
-  if (output == NULL)
-    {
-      perror ("popen");
-      puts ("Test FAILED!");
-      exit (1);
-    }
-  write_data (output);
-  wstatus = pclose (output);
-  printf ("writing pclose returned %d\n", wstatus);
-  input = popen ("/bin/cat /tmp/tstpopen.tmp", "r");
-  if (input == NULL)
-    {
-      perror ("/tmp/tstpopen.tmp");
-      puts ("Test FAILED!");
-      exit (1);
-    }
-  read_data (input);
-  rstatus = pclose (input);
-  printf ("reading pclose returned %d\n", rstatus);
-
-  puts (wstatus | rstatus  ? "Test FAILED!" : "Test succeeded.");
-  exit (wstatus | rstatus);
-}
-
-  
-
-