Back to index

glibc  2.9
Defines | Functions
tst-fgetws.c File Reference
#include <errno.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <wchar.h>

Go to the source code of this file.

Defines

#define _XOPEN_SOURCE   500
#define WIDE_STR_LEN   32

Functions

int main (int argc, char *argv[])

Define Documentation

#define _XOPEN_SOURCE   500

Definition at line 3 of file tst-fgetws.c.

#define WIDE_STR_LEN   32

Definition at line 11 of file tst-fgetws.c.


Function Documentation

int main ( int  argc,
char *  argv[] 
)

Definition at line 14 of file tst-fgetws.c.

{
  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++)
       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
    {
      size_t i;

      printf ("Return Value: %p\n", ret);
      for (i = 0; i < wcslen (wcs) + 1; i++)
       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++)
       printf (" wcs[%zd] = 0x%04x", i, (unsigned int)wcs[i]);
      printf ("\n");
    }

  fclose (fp);

  unlink (name1);
  unlink (name2);

  return result;
}

Here is the call graph for this function: