#include <stdio.h>

#include <stdlib.h>

int

main (int argc, char *argv[])

{

  wchar_t w[10];

  char c[10];

  int i;

  int lose = 0;

  i = mbstowcs (w, "bar", 4);

  if (!(i == 3 && w[1] == 'a'))

    {

      puts ("mbstowcs FAILED!");

      lose = 1;

    }

  mbstowcs (w, "blah", 5);

  i = wcstombs (c, w, 10);

  if (i != 4)

    {

      puts ("wcstombs FAILED!");

      lose = 1;

    }

  if (mblen ("foobar", 7) != 1)

    {

      puts ("mblen 1 FAILED!");

      lose = 1;

    }

  if (mblen ("", 1) != 0)

    {

      puts ("mblen 2 FAILED!");

      lose = 1;

    }

  {

    int r;

    char c = 'x';

    wchar_t wc;

    char mbc[MB_CUR_MAX];

    if ((r = mbtowc (&wc, &c, MB_CUR_MAX)) <= 0)

      {

	printf ("conversion to wide failed, result: %d\n", r);

	lose = 1;

      }

    else

      {

	printf ("wide value: 0x%04lx\n", (unsigned long) wc);

	mbc[0] = '\0';

	if ((r = wctomb (mbc, wc)) <= 0)

	  {

	    printf ("conversion to multibyte failed, result: %d\n", r);

	    lose = 1;

	  }

      }

  }

  puts (lose ? "Test FAILED!" : "Test succeeded.");

  return lose;

}