#include "../src/fchash.c"
#include "../src/fcstr.c"

FcChar8 *
FcLangNormalize (const FcChar8 *lang)
{
    return NULL;
}

FcChar8 *
FcConfigHome (void)
{
    return NULL;
}

typedef struct _Test
{
    FcHashTable *table;
} Test;

static Test *
init (void)
{
    Test *ret;

    ret = malloc (sizeof (Test));
    if (ret)
    {
	ret->table = FcHashTableCreate ((FcHashFunc) FcStrHashIgnoreCase,
					(FcCompareFunc) FcStrCmp,
					FcHashStrCopy,
					FcHashUuidCopy,
					(FcDestroyFunc) FcStrFree,
					FcHashUuidFree);
    }

    return ret;
}

static void
fini (Test *test)
{
    FcHashTableDestroy (test->table);
    free (test);
}

static FcBool
test_add (Test *test, FcChar8 *key, FcBool replace)
{
    uuid_t uuid;
    void *u;
    FcBool (*hash_add) (FcHashTable *, void *, void *);
    FcBool ret = FcFalse;

    uuid_generate_random (uuid);
    if (replace)
	hash_add = FcHashTableReplace;
    else
	hash_add = FcHashTableAdd;
    if (!hash_add (test->table, key, uuid))
	return FcFalse;
    if (!FcHashTableFind (test->table, key, &u))
	return FcFalse;
    ret = (uuid_compare (uuid, u) == 0);
    FcHashUuidFree (u);

    return ret;
}

static FcBool
test_remove (Test *test, FcChar8 *key)
{
    void *u;

    if (!FcHashTableFind (test->table, key, &u))
	return FcFalse;
    FcHashUuidFree (u);
    if (!FcHashTableRemove (test->table, key))
	return FcFalse;
    if (FcHashTableFind (test->table, key, &u))
	return FcFalse;

    return FcTrue;
}

int
main (void)
{
    Test *test;
    uuid_t uuid;
    int ret = 0;

    test = init ();
    /* first op to add */
    if (!test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    /* second op to add */
    if (!test_add (test, "bar", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    /* dup not allowed */
    if (test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    /* replacement */
    if (!test_add (test, "foo", FcTrue))
    {
	ret = 1;
	goto bail;
    }
    /* removal */
    if (!test_remove (test, "foo"))
    {
	ret = 1;
	goto bail;
    }
    /* not found to remove */
    if (test_remove (test, "foo"))
    {
	ret = 1;
	goto bail;
    }
    /* complex op in pointer */
    if (!test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    if (test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    if (!test_remove (test, "foo"))
    {
	ret = 1;
	goto bail;
    }
    if (!test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    if (!test_remove (test, "bar"))
    {
	ret = 1;
	goto bail;
    }
    /* completely remove */
    if (!test_remove (test, "foo"))
    {
	ret = 1;
	goto bail;
    }
    /* completely remove from the last one */
    if (!test_add (test, "foo", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    if (!test_add (test, "bar", FcFalse))
    {
	ret = 1;
	goto bail;
    }
    if (!test_remove (test, "bar"))
    {
	ret = 1;
	goto bail;
    }
    if (!test_remove (test, "foo"))
    {
	ret = 1;
	goto bail;
    }
bail:
    fini (test);

    return ret;
}