1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
#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;
}
|
