1/* Copyright (C) 1997-2022 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, see
16 <https://www.gnu.org/licenses/>. */
17
18#include <errno.h>
19#include <stdio.h>
20#include <stdlib.h>
21
22static void
23write_data (FILE *stream)
24{
25 int i;
26 for (i=0; i<100; i++)
27 fprintf (stream, "%d\n", i);
28 if (ferror (stream: stream))
29 {
30 fprintf (stderr, "Output to stream failed.\n");
31 exit (1);
32 }
33}
34
35static void
36read_data (FILE *stream)
37{
38 int i, j;
39
40 for (i=0; i<100; i++)
41 {
42 if (fscanf (stream: stream, format: "%d\n", &j) != 1 || j != i)
43 {
44 if (ferror (stream: stream))
45 perror ("fscanf");
46 puts (s: "Test FAILED!");
47 exit (1);
48 }
49 }
50}
51
52static int
53do_test (void)
54{
55 FILE *output, *input;
56 int wstatus, rstatus;
57
58 /* We must remove this entry to assure the `cat' binary does not use
59 the perhaps incompatible new shared libraries. */
60 unsetenv (name: "LD_LIBRARY_PATH");
61
62 output = popen ("/bin/cat >" OBJPFX "tstpopen.tmp", "w");
63 if (output == NULL)
64 {
65 perror ("popen");
66 puts (s: "Test FAILED!");
67 exit (1);
68 }
69 write_data (stream: output);
70 wstatus = pclose (stream: output);
71 printf (format: "writing pclose returned %d\n", wstatus);
72 input = popen ("/bin/cat " OBJPFX "tstpopen.tmp", "r");
73 if (input == NULL)
74 {
75 perror (OBJPFX "tstpopen.tmp");
76 puts (s: "Test FAILED!");
77 exit (1);
78 }
79 read_data (stream: input);
80 rstatus = pclose (stream: input);
81 printf (format: "reading pclose returned %d\n", rstatus);
82
83 remove (OBJPFX "tstpopen.tmp");
84
85 errno = 0;
86 output = popen (command: "/bin/cat", modes: "m");
87 if (output != NULL)
88 {
89 puts (s: "popen called with illegal mode does not return NULL");
90 puts (s: "Test FAILED!");
91 exit (1);
92 }
93 if (errno != EINVAL)
94 {
95 puts (s: "popen called with illegal mode does not set errno to EINVAL");
96 puts (s: "Test FAILED!");
97 exit (1);
98 }
99
100 puts (s: wstatus | rstatus ? "Test FAILED!" : "Test succeeded.");
101 return (wstatus | rstatus);
102}
103
104#define TEST_FUNCTION do_test ()
105#include "../test-skeleton.c"
106

source code of glibc/stdio-common/test-popen.c