1  /* Test of fputc() function.
       2     Copyright (C) 2011-2021 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 <stdio.h>
      20  
      21  #include "signature.h"
      22  SIGNATURE_CHECK (fputc, int, (int, FILE *));
      23  
      24  #include <errno.h>
      25  #include <fcntl.h>
      26  #include <unistd.h>
      27  
      28  #if HAVE_MSVC_INVALID_PARAMETER_HANDLER
      29  # include "msvc-inval.h"
      30  #endif
      31  
      32  #include "macros.h"
      33  
      34  int
      35  main (int argc, char **argv)
      36  {
      37    const char *filename = "test-fputc.txt";
      38  
      39    /* We don't have an fputc() function that installs an invalid parameter
      40       handler so far.  So install that handler here, explicitly.  */
      41  #if HAVE_MSVC_INVALID_PARAMETER_HANDLER \
      42      && MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING
      43    gl_msvc_inval_ensure_handler ();
      44  #endif
      45  
      46    /* Test that fputc() on an unbuffered stream sets errno if someone else
      47       closes the stream fd behind the back of stdio.  */
      48    {
      49      FILE *fp = fopen (filename, "w");
      50      ASSERT (fp != NULL);
      51      setvbuf (fp, NULL, _IONBF, 0);
      52      ASSERT (close (fileno (fp)) == 0);
      53      errno = 0;
      54      ASSERT (fputc ('x', fp) == EOF);
      55      ASSERT (errno == EBADF);
      56      ASSERT (ferror (fp));
      57      fclose (fp);
      58    }
      59  
      60    /* Test that fputc() on an unbuffered stream sets errno if the stream
      61       was constructed with an invalid file descriptor.  */
      62    {
      63      FILE *fp = fdopen (-1, "w");
      64      if (fp != NULL)
      65        {
      66          setvbuf (fp, NULL, _IONBF, 0);
      67          errno = 0;
      68          ASSERT (fputc ('x', fp) == EOF);
      69          ASSERT (errno == EBADF);
      70          ASSERT (ferror (fp));
      71          fclose (fp);
      72        }
      73    }
      74    {
      75      FILE *fp;
      76      close (99);
      77      fp = fdopen (99, "w");
      78      if (fp != NULL)
      79        {
      80          setvbuf (fp, NULL, _IONBF, 0);
      81          errno = 0;
      82          ASSERT (fputc ('x', fp) == EOF);
      83          ASSERT (errno == EBADF);
      84          ASSERT (ferror (fp));
      85          fclose (fp);
      86        }
      87    }
      88  
      89    /* Clean up.  */
      90    unlink (filename);
      91  
      92    return 0;
      93  }