#include <check.h>
#include <stdlib.h>
#include <stdio.h>
#include "check_check.h"
#include "../src/misc.h"

static string255 make_string(const char* str)
{
	string255 s;
	s.len = strlen(str);
	memcpy(s.str, str, s.len + 1);
	return s;
}

START_TEST(test_strconcat)
{
	string255 t;
	t = fpcrtl_strconcat(make_string(""), make_string(""));
	fail_if(strcmp(t.str, ""), "strconcat(\"\", \"\")");

	t = fpcrtl_strconcat(make_string(""), make_string("a"));
	fail_if(strcmp(t.str, "a"), "strconcat(\"\", \"a\")");

	t = fpcrtl_strconcat(make_string("a"), make_string(""));
	fail_if(strcmp(t.str, "a"), "strconcat(\"a\", \"\")");

	t = fpcrtl_strconcat(make_string("ab"), make_string(""));
	fail_if(strcmp(t.str, "ab"), "strconcat(\"ab\", \"\")");

	t = fpcrtl_strconcat(make_string("ab"), make_string("cd"));
	fail_if(strcmp(t.str, "abcd"), "strconcat(\"ab\", \"cd\")");
}
END_TEST

START_TEST (test_strappend)
{
	string255 t;

	t = fpcrtl_strappend(make_string(""), 'c');
	fail_if(strcmp(t.str, "c"), "strappend(\"\", 'c')");

	t = fpcrtl_strappend(make_string("ab"), 'c');
	fail_if(strcmp(t.str, "abc"), "strappend(\"ab\", 'c')");
}
END_TEST

START_TEST (test_strprepend)
{
	string255 t;

	t = fpcrtl_strprepend('c', make_string(""));
	fail_if(strcmp(t.str, "c"), "strprepend('c', \"\")");

	t = fpcrtl_strprepend('c', make_string("ab"));
	fail_if(strcmp(t.str, "cab"), "strprepend('c', \"ab\")");
}
END_TEST

START_TEST (test_strcompare)
{
	fail_unless(fpcrtl_strcompare(make_string(""), make_string("")), "strcompare(\"\", \"\")");
	fail_unless(fpcrtl_strcompare(make_string("a"), make_string("a")), "strcompare(\"a\", \"a\"");
	fail_unless(!fpcrtl_strcompare(make_string("a"), make_string("b")), "strcompare(\"a\", \"b\")");
	fail_unless(!fpcrtl_strcompare(make_string("a"), make_string("ab")), "strcompare(\"a\", \"ab\")");

	fail_unless(fpcrtl_strcomparec(make_string(" "), ' '), "strcomparec(\" \", ' ')");
	fail_unless(fpcrtl_strcomparec(make_string("a"), 'a'), "strcomparec(\"a\", 'a')");
	fail_unless(!fpcrtl_strcomparec(make_string("  "), ' '), "strcomparec(\"  \", ' '");
	fail_unless(!fpcrtl_strcomparec(make_string(""), ' '), "strcomparec(\"\", ' ')");

}
END_TEST

Suite* misc_suite(void)
{
	Suite *s = suite_create("misc");

	TCase *tc_core = tcase_create("Core");

	tcase_add_test(tc_core, test_strconcat);
	tcase_add_test(tc_core, test_strappend);
	tcase_add_test(tc_core, test_strprepend);
	tcase_add_test(tc_core, test_strcompare);

	suite_add_tcase(s, tc_core);

	return s;
}