|
Packit |
6c4009 |
#define _XOPEN_SOURCE 500
|
|
Packit |
6c4009 |
#include <stdio.h>
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
#include <locale.h>
|
|
Packit |
6c4009 |
#include <wchar.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
const char write_chars[] = "ABC"; /* Characters on testfile. */
|
|
Packit |
6c4009 |
const wint_t unget_wchar = L'A'; /* Ungotten wide character. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
char *fname;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
static int do_test (void);
|
|
Packit |
6c4009 |
#define TEST_FUNCTION do_test ()
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include "../test-skeleton.c"
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
static int
|
|
Packit |
6c4009 |
do_test (void)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wint_t wc;
|
|
Packit |
6c4009 |
FILE *fp;
|
|
Packit |
6c4009 |
int fd;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fname = (char *) malloc (strlen (test_dir) + sizeof "/bug-ungetwc1.XXXXXX");
|
|
Packit |
6c4009 |
if (fname == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("no memory");
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
strcpy (stpcpy (fname, test_dir), "/bug-ungetwc1.XXXXXX");
|
|
Packit |
6c4009 |
fd = mkstemp (fname);
|
|
Packit |
6c4009 |
if (fd == -1)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("cannot open temporary file: %m\n");
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
add_temp_file (fname);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
setlocale(LC_ALL, "");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Output to the file. */
|
|
Packit |
6c4009 |
if ((fp = fdopen (fd, "w")) == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fprintf (stderr, "Cannot make `%s' file\n", fname);
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fprintf (fp, "%s", write_chars);
|
|
Packit |
6c4009 |
fclose (fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Read from the file. */
|
|
Packit |
6c4009 |
fp = fopen (fname, "r");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
size_t i = 0;
|
|
Packit |
6c4009 |
while (!feof (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wc = getwc (fp);
|
|
Packit |
6c4009 |
if (i >= sizeof (write_chars))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("Did not get end-of-file when expected.\n");
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (wc != (write_chars[i] ? write_chars[i] : WEOF))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("Unexpected %lu from getwc.\n", (unsigned long int) wc);
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
i++;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf ("\nThe end-of-file indicator is set.\n");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Unget a wide character. */
|
|
Packit |
6c4009 |
ungetwc (unget_wchar, fp);
|
|
Packit |
6c4009 |
printf ("< `%lc' is ungotten.\n", unget_wchar);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Check the end-of-file indicator. */
|
|
Packit |
6c4009 |
if (feof (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("The end-of-file indicator is still set.\n");
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
printf ("The end-of-file flag is cleared.\n");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fflush (stdout);
|
|
Packit |
6c4009 |
fclose (fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return 0;
|
|
Packit |
6c4009 |
}
|