#include <string.h>
#include "test.h"

static char buf[512];

static void *aligned(void *p)
{
	return (void*)(((uintptr_t)p + 63) & -64U);
}

static void *aligncpy(void *p, size_t len, size_t a)
{
	return memcpy((char*)aligned(buf)+a, p, len);
}

#define N(s, c) { \
	int align; \
	for (align=0; align<8; align++) { \
		char *p = aligncpy(s, sizeof s, align); \
		char *q = strchr(p, c); \
		if (q) \
			t_error("strchr(%s,%s) with align=%d returned str+%d, wanted 0\n", #s, #c, align, q-p); \
	} \
}

#define T(s, c, n) { \
	int align; \
	for (align=0; align<8; align++) { \
		char *p = aligncpy(s, sizeof s, align); \
		char *q = strchr(p, c); \
		if (q == 0) \
			t_error("strchr(%s,%s) with align=%d returned 0, wanted str+%d\n", #s, #c, align, n); \
		else if (q - p != n) \
			t_error("strchr(%s,%s) with align=%d returned str+%d, wanted str+%d\n", #s, #c, align, q-p, n); \
	} \
}

int main(void)
{
	int i;
	char a[128];
	char s[256];

	for (i = 0; i < 128; i++)
		a[i] = (i+1) & 127;
	for (i = 0; i < 256; i++)
		*((unsigned char*)s+i) = i+1;

	N("\0aaa", 'a')
	N("a\0bb", 'b')
	N("ab\0c", 'c')
	N("abc\0d", 'd')
	N("abc abc\0x", 'x')
	N(a, 128)
	N(a, 255)

	T("", 0, 0)
	T("a", 'a', 0)
	T("a", 'a'+256, 0)
	T("a", 0, 1)
	T("abb", 'b', 1)
	T("aabb", 'b', 2)
	T("aaabb", 'b', 3)
	T("aaaabb", 'b', 4)
	T("aaaaabb", 'b', 5)
	T("aaaaaabb", 'b', 6)
	T("abc abc", 'c', 2)
	T(s, 1, 0)
	T(s, 2, 1)
	T(s, 10, 9)
	T(s, 11, 10)
	T(s, 127, 126)
	T(s, 128, 127)
	T(s, 255, 254)
	T(s, 0, 255)

	return t_status;
}