Mercurial Mercurial > hedgewars / file revision
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
project_files/hwc/rtl/tests/check_sysutils.c
author sheepluva
Mon, 05 Aug 2019 00:20:45 +0200
changeset 15295 f382ec6dba11
parent 10015 4feced261c68
permissions -rw-r--r--
In hindsight my emscripten-ifdef (70d416a8f63f) is nonsense. As fpcrtl_glShaderSource() would not be defined and lead to compiling issues. So either it's 3 ifdefs (in pas2cRedo, pas2cSystem and misc.c), in order to toggle between fpcrtl_ and the native function, or alternatively have no ifdef for it at all. I'm going with none at all, which means emscripten will compile with the original (const) function prototype, being wrapped by the fpcrtl_ function, same as non-emscripten builds.

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