.
[glibc/history.git] / libio / tst_putwc.c
blob1fd21e26c44a3100b97f92c5b0f33d0928821f01
1 /* Simple test of putwc in the C locale.
2 Copyright (C) 2000 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19 02111-1307 USA. */
21 #include <errno.h>
22 #include <error.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <wchar.h>
27 static const char outname[] = OBJPFX "tst_putwc.temp";
29 /* Prototype for our test function. */
30 int do_test (void);
31 #define TEST_FUNCTION do_test ()
33 /* This defines the `main' function and some more. */
34 #include <test-skeleton.c>
36 int
37 do_test (void)
39 const wchar_t str[] = L"This is a test of putwc\n";
40 wchar_t buf[100];
41 size_t n = 0;
42 FILE *fp;
43 int res = 0;
45 add_temp_file (outname);
47 fp = fopen (outname, "w+");
48 if (fp == NULL)
49 error (EXIT_FAILURE, errno, "cannot open temporary file");
51 for (n = 0; str[n] != L'\0'; ++n)
52 putwc (str[n], fp);
54 /* First try reading after rewinding. */
55 rewind (fp);
57 wmemset (buf, L'\0', sizeof (buf) / sizeof (buf[0]));
58 n = 0;
59 while (! feof (fp) && n < sizeof (buf) - 1)
61 buf[n] = getwc (fp);
62 if (buf[n] == WEOF)
63 break;
64 ++n;
66 buf[n] = L'\0';
68 if (wcscmp (buf, L"This is a test of putwc\n") != 0)
70 puts ("first comparison failed");
71 res = 1;
74 /* Now close the file, open it again, and read again. */
75 if (fclose (fp) != 0)
77 printf ("failure during fclose(): %m");
78 res = 1;
81 fp = fopen (outname, "r");
82 if (fp == NULL)
83 error (EXIT_FAILURE, errno, "cannot reopen file");
85 /* We can remove the file now. */
86 remove (outname);
88 wmemset (buf, L'\0', sizeof (buf) / sizeof (buf[0]));
89 n = 0;
90 while (! feof (fp) && n < sizeof (buf) - 1)
92 buf[n] = getwc (fp);
93 if (buf[n] == WEOF)
94 break;
95 ++n;
97 buf[n] = L'\0';
99 if (wcscmp (buf, L"This is a test of putwc\n") != 0)
101 puts ("second comparison failed");
102 res = 1;
105 if (fclose (fp) != 0)
107 puts ("failure during fclose()");
108 res = 1;
111 /* Next test: write a bit more than a few bytes. */
112 fp = fopen (outname, "w");
113 if (fp == NULL)
114 error (EXIT_FAILURE, errno, "cannot open temporary file");
116 for (n = 0; n < 4098; ++n)
117 putwc (n & 255, fp);
119 fclose (fp);
121 return res;