#include <stdio.h>
#include <wchar.h>
#include <sys/types.h>

static wchar_t buf[100];
#define nbuf (sizeof (buf) / sizeof (buf[0]))
static const struct {
        size_t n;
        const char *str;
        ssize_t exp;
} tests[] = {
        { nbuf, "hello world", 11 },
        { 0, "hello world", -1 },
        { 0, "", -1 },
        { nbuf, "", 0 }
};


int
main(int argc, char *argv[])
{
        size_t n;
        int result = 0;

        puts("test 1");
        n = swprintf(buf, nbuf,L"Hello %s" , "world");
        if (n != 11)
        {
                printf ("incorrect return value: %zd instead of 11\n", n);
                result = 1;
        }
        else if (wcscmp(buf, L"Hello world") != 0)
        {
                printf("incorrect string: L\"%ls\" instead of L\"Hello world\"\n", buf);
                result = 1;
    }
        puts ("test 2");
        n = swprintf(buf, nbuf, L"Is this >%g< 3.1?", 3.1);
        if (n != 18) {
                printf("incorrect return value: %zd instead of 18\n", n);
                result = 1;
        } else if (wcscmp (buf, L"Is this >3.1< 3.1?") != 0) {
                printf("incorrect string: L\"%ls\" instead of L\"Is this >3.1< 3.1?\"\n",
                        buf);
                result = 1;
    }

        for (n = 0; n < sizeof(tests) / sizeof(tests[0]); ++n) {
                ssize_t res = swprintf(buf, tests[n].n, L"%s", tests[n].str);

                if (tests[n].exp < 0 && res >= 0) {
                        printf("swprintf (buf, %Zu, L\"%%s\", \"%s\") expected to fail\n",
                                tests[n].n, tests[n].str);
                        result = 1;
                } else if (tests[n].exp >= 0 && tests[n].exp != res) {
                        printf("swprintf (buf, %Zu, L\"%%s\", \"%s\") expected to return %Zd, but got %Zd\n",
                                tests[n].n, tests[n].str, tests[n].exp, res);
                        result = 1;
                } else {
                        printf("swprintf (buf, %Zu, L\"%%s\", \"%s\") OK\n", tests[n].n,
                                tests[n].str);
                }
        }

        if (swprintf(buf, nbuf, L"%.0s", "foo") != 0 || wcslen(buf) != 0) {
                printf("swprintf (buf, %Zu, L\"%%.0s\", \"foo\") create some output\n",
                        nbuf);
                result = 1;
        }

        if (swprintf(buf, nbuf, L"%.0ls", L"foo") != 0 || wcslen(buf) != 0) {
                printf("swprintf (buf, %Zu, L\"%%.0ls\", L\"foo\") create some output\n",
                        nbuf);
                result = 1;
        }

        return result;
}