#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>

#include "runtest.h"
#include "token/cclass.h"


#define TEST_OK_CHAR		'.'
#define TEST_FAILED_CHAR	'F'
#define TEST_ERROR_CHAR		'E'


const char results[3] = {
    TEST_OK_CHAR,
    TEST_FAILED_CHAR,
    TEST_ERROR_CHAR
};

int
isObjectNull(void * _object)
{
    const struct CCLASS ** class = _object;

    ASSERT_OBJECT(_object);
    ASSERT_MEM_NULL(_object + CCLASS_PTR_SIZE, (*class)->size - CCLASS_PTR_SIZE);

    return TEST_OK;
}

int
isMemNull(void * _mem, size_t size)
{
    size_t index;

    ASSERT_NOT_NULL(_mem);

    for(index=0; index<size && 0 == ((char *)_mem)[index]; index++);

    ASSERT_EQUAL(size, index);

    return TEST_OK;
}

int
main(int argc, char * argv[])
{
    size_t errors     = 0;
    size_t failures   = 0;
    size_t assertions = 0;

    size_t index;

    printf("running tests for %s\n", testname);

    for (index=0; index<count; index++) {
        int result = TEST_ERROR, _setUp = 0;  // initialize setup to false

        if (NULL != setUp) {
            if (TEST_OK == (result = setUp())) {
                _setUp = 1;  // we successfully set up the test
            }
        }

        if (_setUp) {
            result = tests[index]();
        }

        if (_setUp && NULL != tearDown) {
            int _tearDown = tearDown();

            if ((! TEST_OK == _tearDown) && TEST_OK == result) {
                result = _tearDown;
            }
        }

        switch (result) {
            case TEST_FAILED: failures++; break;
            case TEST_ERROR:  errors++; break;
        }

        putchar(results[result]);

        if (79 == index%80) {
            putchar('\n');
        }

        fflush(stdout);
    }
    puts("\n");

    printf("running %lu tests: %lu - OK, %lu - FAILED, %lu - ERRORS\n",
            count,
            count - errors - failures,
            failures,
            errors);

    return failures + errors;
}

// vim: set et ts=4 sw=4: