glibc/libio/tst-fgetws.c

186 lines
3.8 KiB
C
Raw Normal View History

/* Taken from the Li18nux base test suite. */
#define _XOPEN_SOURCE 500
#include <errno.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <wchar.h>
#define WIDE_STR_LEN 32
int
main (int argc, char *argv[])
{
* catgets/open_catalog.c (__open_catalog): Don't use a value type as the __builtin_expect expression, just the Boolean value. * sysdeps/generic/wordexp.c (parse_glob): int -> size_t for counter. * sysdeps/unix/sysv/linux/opensock.c (__opensock): Likewise. * resolv/res_hconf.c (arg_service_list, parse_line): Likewise. * iconvdata/tst-loading.c (main): Likewise. * catgets/tst-catgets.c (main): Likewise. * stdlib/tst-xpg-basename.c (main): Likewise. * stdlib/tst-bsearch.c (main): Likewise. * stdio-common/test-vfprintf.c (main): Likewise. * stdio-common/tst-rndseek.c (do_test): Likewise. * libio/tst_swprintf.c (main): Likewise. * libio/tst-fgetws.c (main): Likewise. * wcsmbs/tst-mbrtowc.c (check_ascii): Likewise. * time/tst-posixtz.c (main): Likewise. * time/tst-strptime.c (test_tm): Likewise. * time/tst-strptime.c (main): Likewise. * time/tst-getdate.c (main): Likewise. * posix/tst-mmap.c (main): Likewise. * posix/tst-getaddrinfo.c (do_test): Likewise. * io/tst-getcwd.c (do_test): Likewise. * resolv/tst-aton.c (main): Likewise. * inet/tst-network.c (main): Likewise. * libio/tst-fgetws.c (main): Likewise. * sysdeps/posix/sprofil.c (add_region): int -> unsigned int for I. * sysdeps/unix/sysv/linux/ptsname.c (__ptsname_r): int -> unsigned int for PTYNO. * stdlib/msort.c (qsort): Add a cast to silence warning. * stdio-common/vfprintf.c (process_string_arg): Likewise. * libio/oldfileops.c (_IO_old_do_write): Likewise. * sysdeps/unix/sysv/linux/getcwd.c (__getcwd): Likewise. * sysdeps/unix/sysv/linux/ttyname.c (ttyname): Likewise. * sysdeps/unix/sysv/linux/gethostid.c (gethostid): Likewise. * argp/argp-fmtstream.c (__argp_fmtstream_printf): Likewise. * nscd/nscd_getgr_r.c (nscd_getgr_r): Likewise. * sysdeps/unix/grantpt.c (grantpt): Likewise. * libio/tst-widetext.c (main): Likewise. * libio/tst-mmap2-eofsync.c (do_test): Likewise. * rt/tst-aio.c (test_file): Likewise. * rt/tst-aio64.c (test_file): Likewise. * resolv/tst-aton.c (main): Likewise. * catgets/catgetsinfo.h (CATGETS_MAGIC): Use U suffix on the constant. * ctype/ctype.c (__ctype_tolower, __ctype_toupper): Cast to int32_t instead of uint32_t in these macros.
2002-09-24 04:24:25 +00:00
size_t i;
FILE *fp;
wchar_t *ret, wcs[WIDE_STR_LEN];
int result = 0;
const char il_str1[] = {0xe3, 0x81, '\0'};
const char il_str2[] = {'0', '\n', 'A', 'B', 0xe3, 0x81, 'E', '\0'};
char name1[] = "/tmp/tst-fgetws.out.XXXXXX";
char name2[] = "/tmp/tst-fgetws.out.XXXXXX";
int fd;
puts ("This program runs on de_DE.UTF-8 locale.");
if (setlocale (LC_ALL, "de_DE.UTF-8") == NULL)
{
fprintf (stderr, "Err: Cannot run on the de_DE.UTF-8 locale");
exit (EXIT_FAILURE);
}
/* Make a file `il_str1'. */
fd = mkstemp (name1);
if (fd == -1)
{
printf ("cannot open temp file: %m\n");
exit (EXIT_FAILURE);
}
if ((fp = fdopen (fd, "w")) == NULL)
{
printf ("Can't open %s.\n", argv[1]);
exit (EXIT_FAILURE);
}
fwrite (il_str1, sizeof (char), sizeof (il_str1), fp);
fclose (fp);
/* Make a file `il_str2'. */
fd = mkstemp (name2);
if (fd == -1)
{
printf ("cannot open temp file: %m\n");
exit (EXIT_FAILURE);
}
if ((fp = fdopen (fd, "w")) == NULL)
{
fprintf (stderr, "Can't open %s.\n", argv[1]);
exit (EXIT_FAILURE);
}
fwrite (il_str2, sizeof (char), sizeof (il_str2), fp);
fclose (fp);
/* Test for il_str1. */
if ((fp = fopen (name1, "r")) == NULL)
{
fprintf (stderr, "Can't open %s.\n", argv[1]);
exit (EXIT_FAILURE);
}
puts ("--");
puts ("Read a byte sequence which is invalid as a wide character string.");
puts (" bytes: 0xe3, 0x81, '\\0'");
errno = 0;
ret = fgetws (wcs, WIDE_STR_LEN, fp);
if (ret == NULL)
{
puts ("Return Value: NULL");
if (errno == EILSEQ)
puts ("errno = EILSEQ");
else
{
printf ("errno = %d\n", errno);
result = 1;
}
}
else
{
printf ("Return Value: %p\n", ret);
for (i = 0; i < wcslen (wcs) + 1; i++)
2002-09-30 07:47:16 +00:00
printf (" wcs[%zd] = %04x", i, (unsigned int)wcs[i]);
printf ("\n");
result = 1;
}
/* Test for il_str2. */
if ((fp = fopen (name2, "r")) == NULL)
{
fprintf (stderr, "Can't open %s.\n", argv[1]);
exit (EXIT_FAILURE);
}
puts ("--");
puts ("Read a byte sequence which is invalid as a wide character string.");
puts (" bytes: '0', '\\n', 'A', 'B', 0xe3, 0x81, 'c', '\\0'");
errno = 0;
ret = fgetws (wcs, WIDE_STR_LEN, fp);
if (ret == NULL)
{
puts ("Return Value: NULL");
if (errno == EILSEQ)
puts ("errno = EILSEQ");
else
printf ("errno = %d\n", errno);
result = 1;
}
else
{
* catgets/open_catalog.c (__open_catalog): Don't use a value type as the __builtin_expect expression, just the Boolean value. * sysdeps/generic/wordexp.c (parse_glob): int -> size_t for counter. * sysdeps/unix/sysv/linux/opensock.c (__opensock): Likewise. * resolv/res_hconf.c (arg_service_list, parse_line): Likewise. * iconvdata/tst-loading.c (main): Likewise. * catgets/tst-catgets.c (main): Likewise. * stdlib/tst-xpg-basename.c (main): Likewise. * stdlib/tst-bsearch.c (main): Likewise. * stdio-common/test-vfprintf.c (main): Likewise. * stdio-common/tst-rndseek.c (do_test): Likewise. * libio/tst_swprintf.c (main): Likewise. * libio/tst-fgetws.c (main): Likewise. * wcsmbs/tst-mbrtowc.c (check_ascii): Likewise. * time/tst-posixtz.c (main): Likewise. * time/tst-strptime.c (test_tm): Likewise. * time/tst-strptime.c (main): Likewise. * time/tst-getdate.c (main): Likewise. * posix/tst-mmap.c (main): Likewise. * posix/tst-getaddrinfo.c (do_test): Likewise. * io/tst-getcwd.c (do_test): Likewise. * resolv/tst-aton.c (main): Likewise. * inet/tst-network.c (main): Likewise. * libio/tst-fgetws.c (main): Likewise. * sysdeps/posix/sprofil.c (add_region): int -> unsigned int for I. * sysdeps/unix/sysv/linux/ptsname.c (__ptsname_r): int -> unsigned int for PTYNO. * stdlib/msort.c (qsort): Add a cast to silence warning. * stdio-common/vfprintf.c (process_string_arg): Likewise. * libio/oldfileops.c (_IO_old_do_write): Likewise. * sysdeps/unix/sysv/linux/getcwd.c (__getcwd): Likewise. * sysdeps/unix/sysv/linux/ttyname.c (ttyname): Likewise. * sysdeps/unix/sysv/linux/gethostid.c (gethostid): Likewise. * argp/argp-fmtstream.c (__argp_fmtstream_printf): Likewise. * nscd/nscd_getgr_r.c (nscd_getgr_r): Likewise. * sysdeps/unix/grantpt.c (grantpt): Likewise. * libio/tst-widetext.c (main): Likewise. * libio/tst-mmap2-eofsync.c (do_test): Likewise. * rt/tst-aio.c (test_file): Likewise. * rt/tst-aio64.c (test_file): Likewise. * resolv/tst-aton.c (main): Likewise. * catgets/catgetsinfo.h (CATGETS_MAGIC): Use U suffix on the constant. * ctype/ctype.c (__ctype_tolower, __ctype_toupper): Cast to int32_t instead of uint32_t in these macros.
2002-09-24 04:24:25 +00:00
size_t i;
printf ("Return Value: %p\n", ret);
for (i = 0; i < wcslen (wcs) + 1; i++)
2002-09-30 07:47:16 +00:00
printf (" wcs[%zd] = 0x%04x", i, (unsigned int)wcs[i]);
printf ("\n");
for (i = 0; il_str2[i] != '\n'; ++i)
if ((wchar_t) il_str2[i] != wcs[i])
{
puts ("read string not correct");
result = 1;
break;
}
if (il_str2[i] == '\n')
{
if (wcs[i] != L'\n')
{
puts ("newline missing");
result = 1;
}
else if (wcs[i + 1] != L'\0')
{
puts ("read string not NUL-terminated");
result = 1;
}
}
}
puts ("\nsecond line");
errno = 0;
ret = fgetws (wcs, WIDE_STR_LEN, fp);
if (ret == NULL)
{
puts ("Return Value: NULL");
if (errno == EILSEQ)
puts ("errno = EILSEQ");
else
{
printf ("errno = %d\n", errno);
result = 1;
}
}
else
{
printf ("Return Value: %p\n", ret);
for (i = 0; i < wcslen (wcs) + 1; i++)
2002-09-30 07:47:16 +00:00
printf (" wcs[%zd] = 0x%04x", i, (unsigned int)wcs[i]);
printf ("\n");
}
fclose (fp);
unlink (name1);
unlink (name2);
return result;
}