Blame libio/bug-ftell.c

Packit 6c4009
#include <locale.h>
Packit 6c4009
#include <stdio.h>
Packit 6c4009
#include <wchar.h>
Packit 6c4009
#include <sys/types.h>
Packit 6c4009
Packit 6c4009
Packit 6c4009
static int
Packit 6c4009
do_test (void)
Packit 6c4009
{
Packit 6c4009
  if (setlocale (LC_ALL, "de_DE.UTF-8") == NULL)
Packit 6c4009
    {
Packit 6c4009
      puts ("setlocale failed");
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  FILE *fp = tmpfile ();
Packit 6c4009
  if (fp == NULL)
Packit 6c4009
    {
Packit 6c4009
      puts ("tmpfile failed");
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  if (fputws (L"hello", fp) == EOF)
Packit 6c4009
    {
Packit 6c4009
      puts ("fputws failed");
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  rewind (fp);
Packit 6c4009
Packit 6c4009
  const wchar_t *cp;
Packit 6c4009
  unsigned int cnt;
Packit 6c4009
  for (cp = L"hello", cnt = 1; *cp != L'\0'; ++cp, ++cnt)
Packit 6c4009
    {
Packit 6c4009
      wint_t wc = fgetwc (fp);
Packit 6c4009
      if (wc != (wint_t) *cp)
Packit 6c4009
	{
Packit 6c4009
	  printf ("fgetwc failed: got L'%lc', expected L'%lc'\n",
Packit 6c4009
		  wc, (wint_t) *cp);
Packit 6c4009
	  return 1;
Packit 6c4009
	}
Packit 6c4009
      off_t o = ftello (fp);
Packit 6c4009
      if (o != cnt)
Packit 6c4009
	{
Packit 6c4009
	  printf ("ftello failed: got %lu, expected %u\n",
Packit 6c4009
		  (unsigned long int) o, cnt);
Packit 6c4009
	  return 1;
Packit 6c4009
	}
Packit 6c4009
      printf ("round %u OK\n", cnt);
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  fclose (fp);
Packit 6c4009
Packit 6c4009
  return 0;
Packit 6c4009
}
Packit 6c4009
Packit 6c4009
#define TEST_FUNCTION do_test ()
Packit 6c4009
#include "../test-skeleton.c"