|
Packit |
6c4009 |
/* Taken from the Li18nux base test suite. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#define _XOPEN_SOURCE 500
|
|
Packit |
6c4009 |
#include <errno.h>
|
|
Packit |
6c4009 |
#include <locale.h>
|
|
Packit |
6c4009 |
#include <stdio.h>
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
#include <unistd.h>
|
|
Packit |
6c4009 |
#include <wchar.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#define WIDE_STR_LEN 32
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
main (int argc, char *argv[])
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
size_t i;
|
|
Packit |
6c4009 |
FILE *fp;
|
|
Packit |
6c4009 |
wchar_t *ret, wcs[WIDE_STR_LEN];
|
|
Packit |
6c4009 |
int result = 0;
|
|
Packit |
6c4009 |
const char il_str1[] = {0xe3, 0x81, '\0'};
|
|
Packit |
6c4009 |
const char il_str2[] = {'0', '\n', 'A', 'B', 0xe3, 0x81, 'E', '\0'};
|
|
Packit |
6c4009 |
char name1[] = "/tmp/tst-fgetws.out.XXXXXX";
|
|
Packit |
6c4009 |
char name2[] = "/tmp/tst-fgetws.out.XXXXXX";
|
|
Packit |
6c4009 |
int fd;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
puts ("This program runs on de_DE.UTF-8 locale.");
|
|
Packit |
6c4009 |
if (setlocale (LC_ALL, "de_DE.UTF-8") == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fprintf (stderr, "Err: Cannot run on the de_DE.UTF-8 locale");
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Make a file `il_str1'. */
|
|
Packit |
6c4009 |
fd = mkstemp (name1);
|
|
Packit |
6c4009 |
if (fd == -1)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("cannot open temp file: %m\n");
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if ((fp = fdopen (fd, "w")) == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("Can't open %s.\n", argv[1]);
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fwrite (il_str1, sizeof (char), sizeof (il_str1), fp);
|
|
Packit |
6c4009 |
fclose (fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Make a file `il_str2'. */
|
|
Packit |
6c4009 |
fd = mkstemp (name2);
|
|
Packit |
6c4009 |
if (fd == -1)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("cannot open temp file: %m\n");
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if ((fp = fdopen (fd, "w")) == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fprintf (stderr, "Can't open %s.\n", argv[1]);
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fwrite (il_str2, sizeof (char), sizeof (il_str2), fp);
|
|
Packit |
6c4009 |
fclose (fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Test for il_str1. */
|
|
Packit |
6c4009 |
if ((fp = fopen (name1, "r")) == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fprintf (stderr, "Can't open %s.\n", argv[1]);
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
puts ("--");
|
|
Packit |
6c4009 |
puts ("Read a byte sequence which is invalid as a wide character string.");
|
|
Packit |
6c4009 |
puts (" bytes: 0xe3, 0x81, '\\0'");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
errno = 0;
|
|
Packit |
6c4009 |
ret = fgetws (wcs, WIDE_STR_LEN, fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (ret == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("Return Value: NULL");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (errno == EILSEQ)
|
|
Packit |
6c4009 |
puts ("errno = EILSEQ");
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("errno = %d\n", errno);
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("Return Value: %p\n", ret);
|
|
Packit |
6c4009 |
for (i = 0; i < wcslen (wcs) + 1; i++)
|
|
Packit |
6c4009 |
printf (" wcs[%zd] = %04x", i, (unsigned int)wcs[i]);
|
|
Packit |
6c4009 |
printf ("\n");
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Test for il_str2. */
|
|
Packit |
6c4009 |
if ((fp = fopen (name2, "r")) == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fprintf (stderr, "Can't open %s.\n", argv[1]);
|
|
Packit |
6c4009 |
exit (EXIT_FAILURE);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
puts ("--");
|
|
Packit |
6c4009 |
puts ("Read a byte sequence which is invalid as a wide character string.");
|
|
Packit |
6c4009 |
puts (" bytes: '0', '\\n', 'A', 'B', 0xe3, 0x81, 'c', '\\0'");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
errno = 0;
|
|
Packit |
6c4009 |
ret = fgetws (wcs, WIDE_STR_LEN, fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (ret == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("Return Value: NULL");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (errno == EILSEQ)
|
|
Packit |
6c4009 |
puts ("errno = EILSEQ");
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
printf ("errno = %d\n", errno);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
size_t i;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
printf ("Return Value: %p\n", ret);
|
|
Packit |
6c4009 |
for (i = 0; i < wcslen (wcs) + 1; i++)
|
|
Packit |
6c4009 |
printf (" wcs[%zd] = 0x%04x", i, (unsigned int)wcs[i]);
|
|
Packit |
6c4009 |
printf ("\n");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
for (i = 0; il_str2[i] != '\n'; ++i)
|
|
Packit |
6c4009 |
if ((wchar_t) il_str2[i] != wcs[i])
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("read string not correct");
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if (il_str2[i] == '\n')
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (wcs[i] != L'\n')
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("newline missing");
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (wcs[i + 1] != L'\0')
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("read string not NUL-terminated");
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
puts ("\nsecond line");
|
|
Packit |
6c4009 |
errno = 0;
|
|
Packit |
6c4009 |
ret = fgetws (wcs, WIDE_STR_LEN, fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (ret == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
puts ("Return Value: NULL");
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (errno == EILSEQ)
|
|
Packit |
6c4009 |
puts ("errno = EILSEQ");
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("errno = %d\n", errno);
|
|
Packit |
6c4009 |
result = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("Return Value: %p\n", ret);
|
|
Packit |
6c4009 |
for (i = 0; i < wcslen (wcs) + 1; i++)
|
|
Packit |
6c4009 |
printf (" wcs[%zd] = 0x%04x", i, (unsigned int)wcs[i]);
|
|
Packit |
6c4009 |
printf ("\n");
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fclose (fp);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
unlink (name1);
|
|
Packit |
6c4009 |
unlink (name2);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return result;
|
|
Packit |
6c4009 |
}
|