#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;

}