#include <check.h>
#include <stdint.h>
#include <canutil/read.h>

const uint64_t BIG_ENDIAN_TEST_DATA = __builtin_bswap64(0xEB00000000000000);
const uint8_t ARRAY_TEST_DATA[] = {0xEB, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0};

START_TEST (test_eightbyte_parse_float)
{
    float result = eightbyte_parse_float(BIG_ENDIAN_TEST_DATA, 2, 4, 1001.0,
            -30000.0);
    float correctResult = 0xA * 1001.0 - 30000.0;
    fail_unless(result == correctResult,
            "parse is incorrect: %f but should be %f", result, correctResult);
}
END_TEST

START_TEST (test_eightbyte_parse_bool)
{
    bool result = eightbyte_parse_bool(BIG_ENDIAN_TEST_DATA, 0, 1, 1.0, 0);
    bool correctResult = true;
    fail_unless(result == correctResult,
            "parse is incorrect: %d but should be %d", result, correctResult);
}
END_TEST

START_TEST (test_bitfield_parse_float)
{
    float result = bitfield_parse_float(ARRAY_TEST_DATA,
            sizeof(ARRAY_TEST_DATA), 2, 4, 1001.0, -30000.0);
    float correctResult = 0xA * 1001.0 - 30000.0;
    fail_unless(result == correctResult,
            "parse is incorrect: %f but should be %f", result, correctResult);
}
END_TEST

START_TEST (test_bitfield_parse_bool)
{
    fail_unless(bitfield_parse_bool(ARRAY_TEST_DATA, sizeof(ARRAY_TEST_DATA),
            0, 1, 1.0, 0));
}
END_TEST

Suite* canreadSuite(void) {
    Suite* s = suite_create("read");
    TCase *tc_core = tcase_create("core");
    tcase_add_checked_fixture(tc_core, NULL, NULL);
    tcase_add_test(tc_core, test_eightbyte_parse_float);
    tcase_add_test(tc_core, test_eightbyte_parse_bool);
    tcase_add_test(tc_core, test_bitfield_parse_float);
    tcase_add_test(tc_core, test_bitfield_parse_bool);
    suite_add_tcase(s, tc_core);

    return s;
}

int main(void) {
    int numberFailed;
    Suite* s = canreadSuite();
    SRunner *sr = srunner_create(s);
    // Don't fork so we can actually use gdb
    srunner_set_fork_status(sr, CK_NOFORK);
    srunner_run_all(sr, CK_NORMAL);
    numberFailed = srunner_ntests_failed(sr);
    srunner_free(sr);
    return (numberFailed == 0) ? 0 : 1;
}