maint: update copyright
[gnulib.git] / tests / test-fwrite.c
1 /* Test of fwrite() function.
2    Copyright (C) 2011-2014 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 <http://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 #include "msvc-inval.h"
29
30 #include "macros.h"
31
32 int
33 main (int argc, char **argv)
34 {
35   const char *filename = "test-fwrite.txt";
36
37   /* We don't have an fwrite() function that installs an invalid parameter
38      handler so far.  So install that handler here, explicitly.  */
39 #if HAVE_MSVC_INVALID_PARAMETER_HANDLER \
40     && MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING
41   gl_msvc_inval_ensure_handler ();
42 #endif
43
44   /* Test that fwrite() on an unbuffered stream sets errno if someone else
45      closes the stream fd behind the back of stdio.  */
46   {
47     FILE *fp = fopen (filename, "w");
48     char buf[5] = "world";
49     ASSERT (fp != NULL);
50     setvbuf (fp, NULL, _IONBF, 0);
51     ASSERT (close (fileno (fp)) == 0);
52     errno = 0;
53     ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
54     ASSERT (errno == EBADF);
55     ASSERT (ferror (fp));
56     fclose (fp);
57   }
58
59   /* Test that fwrite() on an unbuffered stream sets errno if the stream
60      was constructed with an invalid file descriptor.  */
61   {
62     FILE *fp = fdopen (-1, "w");
63     if (fp != NULL)
64       {
65         char buf[5] = "world";
66         setvbuf (fp, NULL, _IONBF, 0);
67         errno = 0;
68         ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
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         char buf[5] = "world";
81         setvbuf (fp, NULL, _IONBF, 0);
82         errno = 0;
83         ASSERT (fwrite (buf, 1, sizeof (buf), fp) == 0);
84         ASSERT (errno == EBADF);
85         ASSERT (ferror (fp));
86         fclose (fp);
87       }
88   }
89
90   /* Clean up.  */
91   unlink (filename);
92
93   return 0;
94 }