6e009d85d238d800f3164e6b742ca0c6cd168034
[gnulib.git] / tests / test-fputc.c
1 /* Test of fputc() function.
2    Copyright (C) 2011 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, write to the Free Software Foundation,
16    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
17
18 #include <config.h>
19
20 #include <stdio.h>
21
22 #include "signature.h"
23 SIGNATURE_CHECK (fputc, int, (int, FILE *));
24
25 #include <errno.h>
26 #include <fcntl.h>
27 #include <unistd.h>
28
29 #include "msvc-inval.h"
30
31 #include "macros.h"
32
33 int
34 main (int argc, char **argv)
35 {
36   const char *filename = "test-fputc.txt";
37
38   /* We don't have an fputc() function that installs an invalid parameter
39      handler so far.  So install that handler here, explicitly.  */
40 #if MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING
41   gl_msvc_inval_ensure_handler ();
42 #endif
43
44   /* Test that fputc() 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     ASSERT (fp != NULL);
49     setvbuf (fp, NULL, _IONBF, 0);
50     ASSERT (close (fileno (fp)) == 0);
51     errno = 0;
52     ASSERT (fputc ('x', fp) == EOF);
53     ASSERT (errno == EBADF);
54     ASSERT (ferror (fp));
55     fclose (fp);
56   }
57
58   /* Test that fputc() on an unbuffered stream sets errno if the stream
59      was constructed with an invalid file descriptor.  */
60   {
61     FILE *fp = fdopen (-1, "w");
62     if (fp != NULL)
63       {
64         setvbuf (fp, NULL, _IONBF, 0);
65         errno = 0;
66         ASSERT (fputc ('x', fp) == EOF);
67         ASSERT (errno == EBADF);
68         ASSERT (ferror (fp));
69         fclose (fp);
70       }
71   }
72   {
73     FILE *fp = fdopen (99, "w");
74     if (fp != NULL)
75       {
76         setvbuf (fp, NULL, _IONBF, 0);
77         errno = 0;
78         ASSERT (fputc ('x', fp) == EOF);
79         ASSERT (errno == EBADF);
80         ASSERT (ferror (fp));
81         fclose (fp);
82       }
83   }
84
85   /* Clean up.  */
86   unlink (filename);
87
88   return 0;
89 }