Line data    Source code

       1             : /* Test of fwrite() function.
       2             :    Copyright (C) 2011-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 <stdio.h>
      20             : 
      21             : #include "signature.h"
      22             : SIGNATURE_CHECK (fwrite, size_t, (const void *, size_t, size_t, 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           1 : main (int argc, char **argv)
      36             : {
      37           1 :   const char *filename = "test-fwrite.txt";
      38             : 
      39             :   /* We don't have an fwrite() 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 fwrite() on an unbuffered stream sets errno if someone else
      47             :      closes the stream fd behind the back of stdio.  */
      48             :   {
      49           1 :     FILE *fp = fopen (filename, "w");
      50           1 :     char buf[5] = "world";
      51           1 :     ASSERT (fp != NULL);
      52           1 :     setvbuf (fp, NULL, _IONBF, 0);
      53           1 :     ASSERT (close (fileno (fp)) == 0);
      54           1 :     errno = 0;
      55           1 :     ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
      56           1 :     ASSERT (errno == EBADF);
      57           1 :     ASSERT (ferror (fp));
      58           1 :     fclose (fp);
      59             :   }
      60             : 
      61             :   /* Test that fwrite() on an unbuffered stream sets errno if the stream
      62             :      was constructed with an invalid file descriptor.  */
      63             :   {
      64           1 :     FILE *fp = fdopen (-1, "w");
      65           1 :     if (fp != NULL)
      66             :       {
      67           0 :         char buf[5] = "world";
      68           0 :         setvbuf (fp, NULL, _IONBF, 0);
      69           0 :         errno = 0;
      70           0 :         ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
      71           0 :         ASSERT (errno == EBADF);
      72           0 :         ASSERT (ferror (fp));
      73           0 :         fclose (fp);
      74             :       }
      75             :   }
      76             :   {
      77             :     FILE *fp;
      78           1 :     close (99);
      79           1 :     fp = fdopen (99, "w");
      80           1 :     if (fp != NULL)
      81             :       {
      82           0 :         char buf[5] = "world";
      83           0 :         setvbuf (fp, NULL, _IONBF, 0);
      84           0 :         errno = 0;
      85           0 :         ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
      86           0 :         ASSERT (errno == EBADF);
      87           0 :         ASSERT (ferror (fp));
      88           0 :         fclose (fp);
      89             :       }
      90             :   }
      91             : 
      92             :   /* Clean up.  */
      93           1 :   unlink (filename);
      94             : 
      95           1 :   return 0;
      96             : }