root/maint/gnulib/tests/test-fputc.c

/* */

DEFINITIONS

1. main

   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 }

/* */