tests/test-spawn-pipe-child.c

   1 /* Child program invoked by test-spawn-pipe-main.
   2    Copyright (C) 2009-2020 Free Software Foundation, Inc.
   3
   4    This program is free software; you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3, or (at your option)
   7    any later version.
   8
   9    This program 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
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program; if not, see <https://www.gnu.org/licenses/>.  */
  16
  17 #include <config.h>
  18
  19 #include <errno.h>
  20 #include <fcntl.h>
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <unistd.h>
  24
  25 #if defined _WIN32 && ! defined __CYGWIN__
  26 /* Get declarations of the native Windows API functions.  */
  27 # define WIN32_LEAN_AND_MEAN
  28 # include <windows.h>
  29 #endif
  30
  31 /* Depending on arguments, this test intentionally closes stderr or
  32    starts life with stderr closed.  So, we arrange to have fd 10
  33    (outside the range of interesting fd's during the test) set up to
  34    duplicate the original stderr.  */
  35
  36 #define BACKUP_STDERR_FILENO 10
  37 #define ASSERT_STREAM myerr
  38 #include "macros.h"
  39
  40 static FILE *myerr;
  41
  42 /* In this file, we use only system functions, no overrides from gnulib.  */
  43 #undef atoi
  44 #undef close
  45 #undef fcntl
  46 #undef fdopen
  47 #undef fflush
  48 #undef fprintf
  49 #undef read
  50 #undef write
  51 #if defined _WIN32 && !defined __CYGWIN__
  52 # define fdopen _fdopen
  53 #endif
  54
  55 /* Return non-zero if FD is open.  */
  56 static int
  57 is_open (int fd)
  58 {
  59 #if defined _WIN32 && ! defined __CYGWIN__
  60   /* On native Windows, the initial state of unassigned standard file
  61      descriptors is that they are open but point to an
  62      INVALID_HANDLE_VALUE, and there is no fcntl.  */
  63   return (HANDLE) _get_osfhandle (fd) != INVALID_HANDLE_VALUE;
  64 #else
  65 # ifndef F_GETFL
  66 #  error Please port fcntl to your platform
  67 # endif
  68   return 0 <= fcntl (fd, F_GETFL);
  69 #endif
  70 }
  71
  72 int
  73 main (int argc, char *argv[])
  74 {
  75   char buffer[2] = { 's', 't' };
  76   int fd;
  77
  78   /* fd 2 might be closed, but fd BACKUP_STDERR_FILENO is the original
  79      stderr.  */
  80   myerr = fdopen (BACKUP_STDERR_FILENO, "w");
  81   if (!myerr)
  82     return 2;
  83
  84   ASSERT (argc == 2);
  85
  86   /* Read one byte from fd 0, and write its value plus one to fd 1.
  87      fd 2 should be closed iff the argument is 1.  Check that no other file
  88      descriptors leaked.  */
  89
  90   ASSERT (read (STDIN_FILENO, buffer, 2) == 1);
  91
  92   buffer[0]++;
  93   ASSERT (write (STDOUT_FILENO, buffer, 1) == 1);
  94
  95   switch (atoi (argv[1]))
  96     {
  97     case 0:
  98       /* Expect fd 2 is open.  */
  99       ASSERT (is_open (STDERR_FILENO));
 100       break;
 101     case 1:
 102       /* Expect fd 2 is closed.
 103          But on HP-UX 11, fd 2 gets automatically re-opened to /dev/null if it
 104          was closed.  Similarly on native Windows.  Future POSIX will allow
 105          this, see <http://austingroupbugs.net/view.php?id=173>.  */
 106 #if !(defined __hpux || (defined _WIN32 && ! defined __CYGWIN__))
 107       ASSERT (! is_open (STDERR_FILENO));
 108 #endif
 109       break;
 110     default:
 111       ASSERT (0);
 112     }
 113
 114   for (fd = 3; fd < 7; fd++)
 115     {
 116       errno = 0;
 117       ASSERT (close (fd) == -1);
 118       ASSERT (errno == EBADF);
 119     }
 120
 121   return 0;
 122 }