Update NOTES.opensolaris with scheduling details
[kopensolaris-gnu/glibc.git] / stdio-common / test-popen.c
1 /* Copyright (C) 1997, 1998, 2000 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
8
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
13
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
18
19 #include <errno.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22
23 static void
24 write_data (FILE *stream)
25 {
26   int i;
27   for (i=0; i<100; i++)
28     fprintf (stream, "%d\n", i);
29   if (ferror (stream))
30     {
31       fprintf (stderr, "Output to stream failed.\n");
32       exit (1);
33     }
34 }
35
36 static void
37 read_data (FILE *stream)
38 {
39   int i, j;
40
41   for (i=0; i<100; i++)
42     {
43       if (fscanf (stream, "%d\n", &j) != 1 || j != i)
44         {
45           if (ferror (stream))
46             perror ("fscanf");
47           puts ("Test FAILED!");
48           exit (1);
49         }
50     }
51 }
52
53 int
54 main (void)
55 {
56   FILE *output, *input;
57   int wstatus, rstatus;
58
59   /* We must remove this entry to assure the `cat' binary does not use
60      the perhaps incompatible new shared libraries.  */
61   unsetenv ("LD_LIBRARY_PATH");
62
63   output = popen ("/bin/cat >/tmp/tstpopen.tmp", "w");
64   if (output == NULL)
65     {
66       perror ("popen");
67       puts ("Test FAILED!");
68       exit (1);
69     }
70   write_data (output);
71   wstatus = pclose (output);
72   printf ("writing pclose returned %d\n", wstatus);
73   input = popen ("/bin/cat /tmp/tstpopen.tmp", "r");
74   if (input == NULL)
75     {
76       perror ("/tmp/tstpopen.tmp");
77       puts ("Test FAILED!");
78       exit (1);
79     }
80   read_data (input);
81   rstatus = pclose (input);
82   printf ("reading pclose returned %d\n", rstatus);
83
84   remove ("/tmp/tstpopen.tmp");
85
86   errno = 0;
87   output = popen ("/bin/cat", "m");
88   if (output != NULL)
89     {
90       puts ("popen called with illegal mode does not return NULL");
91       puts ("Test FAILED!");
92       exit (1);
93     }
94   if (errno != EINVAL)
95     {
96       puts ("popen called with illegal mode does not set errno to EINVAL");
97       puts ("Test FAILED!");
98       exit (1);
99     }
100
101   puts (wstatus | rstatus  ? "Test FAILED!" : "Test succeeded.");
102   return (wstatus | rstatus);
103 }