#include <wchar.h>

#include "test.h"

#define N(s, sub) { \

	wchar_t *p = s; \

	wchar_t *q = wcsstr(p, sub); \

	if (q) \

		t_error("wcsstr(%s,%s) returned str+%d, wanted 0\n", #s, #sub, q-p); \

}

#define T(s, sub, n) { \

	wchar_t *p = s; \

	wchar_t *q = wcsstr(p, sub); \

	if (q == 0) \

		t_error("wcsstr(%s,%s) returned 0, wanted str+%d\n", #s, #sub, n); \

	else if (q - p != n) \

		t_error("wcsstr(%s,%s) returned str+%d, wanted str+%d\n", #s, #sub, q-p, n); \

}

int main(void)

{

	N(L"", L"a")

	N(L"a", L"aa")

	N(L"a", L"b")

	N(L"aa", L"ab")

	N(L"aa", L"aaa")

	N(L"abba", L"aba")

	N(L"abc abc", L"abcd")

	N(L"0-1-2-3-4-5-6-7-8-9", L"-3-4-56-7-8-")

	N(L"0-1-2-3-4-5-6-7-8-9", L"-3-4-5+6-7-8-")

	N(L"_ _ _\xff_ _ _", L"_\x7f_")

	N(L"_ _ _\x7f_ _ _", L"_\xff_")

	T(L"", L"", 0)

	T(L"abcd", L"", 0)

	T(L"abcd", L"a", 0)

	T(L"abcd", L"b", 1)

	T(L"abcd", L"c", 2)

	T(L"abcd", L"d", 3)

	T(L"abcd", L"ab", 0)

	T(L"abcd", L"bc", 1)

	T(L"abcd", L"cd", 2)

	T(L"ababa", L"baba", 1)

	T(L"ababab", L"babab", 1)

	T(L"abababa", L"bababa", 1)

	T(L"abababab", L"bababab", 1)

	T(L"ababababa", L"babababa", 1)

	T(L"abbababab", L"bababa", 2)

	T(L"abbababab", L"ababab", 3)

	T(L"abacabcabcab", L"abcabcab", 4)

	T(L"nanabanabanana", L"aba", 3)

	T(L"nanabanabanana", L"ban", 4)

	T(L"nanabanabanana", L"anab", 1)

	T(L"nanabanabanana", L"banana", 8)

	T(L"_ _\xff_ _", L"_\xff_", 2)

	return t_status;

}