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

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

static int is_string_equal(string255 s1, string255 s2)
{
	return (s1.len == s2.len) && (strcmp(s1.str, s2.str) == 0);
}

START_TEST (test_trim)
{
	string255 t;

	t = fpcrtl_trim(make_string(""));
	fail_if(strcmp(t.str, ""), "trim(\"\")");

	t = fpcrtl_trim(make_string("ab"));
	fail_if(strcmp(t.str, "ab"), "trim(\"ab\")");

	t = fpcrtl_trim(make_string(" "));
	fail_if(strcmp(t.str, ""), "trim(\" \")");

	t = fpcrtl_trim(make_string("   "));
	fail_if(strcmp(t.str, ""), "trim(\"   \")");

	t = fpcrtl_trim(make_string(" ab"));
	fail_if(strcmp(t.str, "ab"), "trim(\" ab\")");

	t = fpcrtl_trim(make_string("ab  "));
	fail_if(strcmp(t.str, "ab"), "trim(\"ab  \")");

	t = fpcrtl_trim(make_string("  ab  "));
	fail_if(strcmp(t.str, "ab"), "trim(\"  ab  \")");

}
END_TEST

START_TEST (test_strToInt)
{
	fail_unless(fpcrtl_strToInt(make_string("123")) == 123, "strToInt(\"123\")");
	fail_unless(fpcrtl_strToInt(make_string("0")) == 0, "strToInt(\"0\")");
	fail_unless(fpcrtl_strToInt(make_string("-123")) == -123, "strToInt(\"-123\")");
}
END_TEST

START_TEST (test_extractFileName)
{
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("abc")), make_string("abc")), "extractFileName(\"abc\")");
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("a:abc")), make_string("abc")), "extractFileName(\"a:abc\")");
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("/abc")), make_string("abc")), "extractFileName(\"/abc\")");
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("\\abc")), make_string("abc")), "extractFileName(\"\\abc\")");
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("/usr/bin/abc")), make_string("abc")), "extractFileName(\"/usr/bin/abc\")");
	fail_unless(is_string_equal(fpcrtl_extractFileName(make_string("c:\\def\\abc")), make_string("abc")), "extractFileName(\"c:\\def\\abc\")");
}
END_TEST

Suite* sysutils_suite(void)
{
	Suite *s = suite_create("sysutils");

	TCase *tc_core = tcase_create("Core");

	tcase_add_test(tc_core, test_trim);
	tcase_add_test(tc_core, test_strToInt);
	tcase_add_test(tc_core, test_extractFileName);

	suite_add_tcase(s, tc_core);

	return s;
}