155 lines
3.1 KiB
C
155 lines
3.1 KiB
C
/* Test of perror.
|
|
Contributed by Ulrich Drepper <drepper@redhat.com>, 2001.
|
|
To be used only for testing glibc. */
|
|
|
|
#include <errno.h>
|
|
#include <error.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <wchar.h>
|
|
|
|
|
|
#define MB_EXP \
|
|
"null mode test 1: Invalid or incomplete multibyte or wide character\n" \
|
|
"multibyte string\n" \
|
|
"<0 mode test: Invalid argument\n"
|
|
#define MB_EXP_LEN (sizeof (MB_EXP) - 1)
|
|
|
|
#define WC_EXP \
|
|
"null mode test 2: Invalid or incomplete multibyte or wide character\n" \
|
|
"wide string\n" \
|
|
">0 mode test: Invalid argument\n"
|
|
#define WC_EXP_LEN (sizeof (WC_EXP) - 1)
|
|
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
int fd;
|
|
char fname[] = "/tmp/tst-perror.XXXXXX";
|
|
int result = 0;
|
|
char buf[200];
|
|
ssize_t n;
|
|
|
|
fd = mkstemp (fname);
|
|
if (fd == -1)
|
|
error (EXIT_FAILURE, errno, "cannot create temporary file");
|
|
|
|
/* Make sure the file gets removed. */
|
|
unlink (fname);
|
|
|
|
fclose (stderr);
|
|
|
|
if (dup2 (fd, 2) == -1)
|
|
{
|
|
printf ("cannot create file descriptor 2: %m\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
stderr = fdopen (2, "w");
|
|
if (stderr == NULL)
|
|
{
|
|
printf ("fdopen failed: %m\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
if (fwide (stderr, 0) != 0)
|
|
{
|
|
printf ("stderr not initially in mode 0\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
errno = EILSEQ;
|
|
perror ("null mode test 1");
|
|
|
|
if (fwide (stderr, 0) != 0)
|
|
{
|
|
puts ("perror changed the mode from 0");
|
|
result = 1;
|
|
}
|
|
|
|
fputs ("multibyte string\n", stderr);
|
|
|
|
if (fwide (stderr, 0) >= 0)
|
|
{
|
|
puts ("fputs didn't set orientation to narrow");
|
|
result = 1;
|
|
}
|
|
|
|
errno = EINVAL;
|
|
perror ("<0 mode test");
|
|
|
|
fclose (stderr);
|
|
|
|
lseek (fd, 0, SEEK_SET);
|
|
n = read (fd, buf, sizeof (buf));
|
|
if (n != MB_EXP_LEN || memcmp (buf, MB_EXP, MB_EXP_LEN) != 0)
|
|
{
|
|
printf ("multibyte test failed. Expected:\n%s\nGot:\n%.*s\n",
|
|
MB_EXP, (int) n, buf);
|
|
result = 1;
|
|
}
|
|
else
|
|
puts ("multibyte test succeeded");
|
|
|
|
lseek (fd, 0, SEEK_SET);
|
|
ftruncate (fd, 0);
|
|
|
|
if (dup2 (fd, 2) == -1)
|
|
{
|
|
printf ("cannot create file descriptor 2: %m\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
stderr = fdopen (2, "w");
|
|
if (stderr == NULL)
|
|
{
|
|
printf ("fdopen failed: %m\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
if (fwide (stderr, 0) != 0)
|
|
{
|
|
printf ("stderr not initially in mode 0\n");
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
errno = EILSEQ;
|
|
perror ("null mode test 2");
|
|
|
|
if (fwide (stderr, 0) != 0)
|
|
{
|
|
puts ("perror changed the mode from 0");
|
|
result = 1;
|
|
}
|
|
|
|
fputws (L"wide string\n", stderr);
|
|
|
|
if (fwide (stderr, 0) <= 0)
|
|
{
|
|
puts ("fputws didn't set orientation to wide");
|
|
result = 1;
|
|
}
|
|
|
|
errno = EINVAL;
|
|
perror (">0 mode test");
|
|
|
|
fclose (stderr);
|
|
|
|
lseek (fd, 0, SEEK_SET);
|
|
n = read (fd, buf, sizeof (buf));
|
|
if (n != WC_EXP_LEN || memcmp (buf, WC_EXP, WC_EXP_LEN) != 0)
|
|
{
|
|
printf ("wide test failed. Expected:\n%s\nGot:\n%.*s\n",
|
|
WC_EXP, (int) n, buf);
|
|
result = 1;
|
|
}
|
|
else
|
|
puts ("wide test succeeded");
|
|
|
|
close (fd);
|
|
|
|
return result;
|
|
}
|