amxmodx/plugins/testsuite/trietest.sma
Vincent Herbet 1dc1f1b9c4 Introduce Trie Iterators (#413)
* TrieIter: Add possibility to obtain a new'd HashTable iterator

* TrieIter: Add CellTrieIter and storage

* TrieIter: Implement TrieIterCreate

* TrieIter: Implement TrieIterEnded

* TrieIter: Implement TrieIterMore

* TrieIter: Implement TrieIterGetKey

* TrieIter: Implement TrieIterGetSize

* TrieIter: Implement TrieIterGetCell

* TrieIter: Implement TrieIterGetString

* TrieIter: Implement TrieIterGetArray

* TrieIter: Implement TrieIterDestroy

* TrieIter: Invalidate any mutating change that is key addition or key removal

* TrieIter: Clean up the handles at map change

* TrieITer; Add iter tests to trietest.sma

* TrieIter: Fix linux compilation

* TrieIter: Rename TrieIterMore to TrieIterNext

* TrieIter: Adjust documentation

* TrieITer; Adjust trietest.sma

* TrieIter: Create a custom StringHashMap class instead

+ used a copy of |iterator| instead of dynamic allocation
+ initialized vars directly in constructor
+ added a nested iteration test
2017-08-01 15:05:27 +02:00

542 lines
12 KiB
SourcePawn

// vim: set ts=4 sw=4 tw=99 noet:
//
// AMX Mod X, based on AMX Mod by Aleksander Naszko ("OLO").
// Copyright (C) The AMX Mod X Development Team.
//
// This software is licensed under the GNU General Public License, version 3 or higher.
// Additional exceptions apply. For full license details, see LICENSE.txt or visit:
// https://alliedmods.net/amxmodx-license
#include <amxmodx>
new failcount = 0;
new passcount = 0;
public plugin_init()
{
register_plugin("Trie Test", AMXX_VERSION_STR, "AMXX Dev Team");
register_srvcmd("trietest", "trietest");
}
stock fail(const testname[])
{
server_print("[FAIL] %s", testname);
failcount++;
}
stock pass(const testname[])
{
server_print("[PASS] %s", testname);
passcount++;
}
stock done()
{
server_print("Finished. %d tests, %d failed", failcount + passcount, failcount);
}
public trietest()
{
failcount = 0;
passcount = 0;
new bool:ok = true;
new Trie:t = TrieCreate();
new Trie:oldhandle = t; // Makes sure that the trie handle system recycles old handles
new key[32];
for (new i = 0; i < 100; i++)
{
formatex(key, charsmax(key), "K%dK", i);
if (!TrieSetCell(t, key, i))
{
server_print("TrieGetCell(%d, '%s', %d) failed", t, key, i);
ok = false;
}
}
for (new i = 0; i < 100; i++)
{
formatex(key, charsmax(key), "K%dK", i);
new val;
if (!TrieGetCell(t, key, val))
{
server_print("TrieGetCell(%d, '%s', %d) failed", t, key, val);
ok = false;
}
else if (val != i)
{
server_print("val mismatch, expected: %d got: %d", i, val);
ok = false;
}
}
// Setting K42K without replace should fail.
new value;
if (TrieSetCell(t, "K42K", 999, false)) { ok = false; server_print("set trie K42K should fail"); }
if (!TrieGetCell(t, "K42K", value) || value != 42) { ok = false; server_print("value at K42K not correct"); }
if (!TrieSetCell(t, "K42K", 999)) { ok = false; server_print("set trie K42K = 999 should succeed"); }
if (!TrieGetCell(t, "K42K", value) || value != 999) { ok = false; server_print("value at K42K not correct"); }
// Check size is 100.
if (TrieGetSize(t) != 100)
{
server_print("Map size mismatch (1), expected: %d got: %d", 100, TrieGetSize(t)); ok = false;
}
if (TrieGetCell(t, "cat", value))
{
server_print("trie should not have a cat."); ok = false;
}
// Check that "K42K" is not a string or array.
new array[32];
new string[32];
if (TrieGetArray(t, "K42K", array, sizeof(array)) ||
TrieGetString(t, "K42K", string, charsmax(string)))
{
server_print("entry K42K should not be an array or string"); ok = false;
}
TrieClear(t);
if (TrieGetSize(t) != 0)
{
server_print("Map size mismatch (2), expected: %d got: %d", 0, TrieGetSize(t)); ok = false;
}
TrieDestroy(t);
if (ok)
pass("Cell tests");
else
fail("Cell tests");
t = TrieCreate();
if (t == oldhandle)
pass("Recycle handles");
else
fail("Recycle handles");
ok = true;
for (new i = 0; i < 100; i++)
{
static val[32];
formatex(key, charsmax(key), "K%dK", i);
formatex(val, charsmax(val), "V%dV", i);
TrieSetString(t, key, val);
}
for (new i = 0; i < 100; i++)
{
formatex(key, charsmax(key), "K%dK", i);
static val[32];
static exp[32];
formatex(exp, charsmax(exp), "V%dV", i);
new size;
if (!TrieGetString(t, key, val, charsmax(val), size))
{
server_print("TrieGetString(%d, '%s', %s) failed", t, key, val);
ok = false;
}
else if (!equal(val, exp))
{
server_print("val mismatch, key: '%s' expected: '%s' got: '%s'", key, exp, val);
ok = false;
}
if (size != strlen(exp))
{
server_print("returned size mismatch, key: '%s' expected: '%s' got: '%s'", key, strlen(exp), size);
ok = false;
}
}
if (TrieGetCell(t, "K42K", value) ||
TrieGetArray(t, "K42K", array, sizeof(array)))
{
server_print("entry K42K should not be an array or string"); ok = false;
}
if (TrieGetString(t, "cat", string, charsmax(string)))
{
server_print("trie should not have a cat."); ok = false;
}
if (ok)
pass("String tests");
else
fail("String tests");
ok = true;
new data[5] = { 93, 1, 2, 3, 4 };
if (!TrieSetArray(t, "K42K", data, sizeof data))
{
server_print("K42K should be a string."); ok = false;
}
if (!TrieGetArray(t, "K42K", array, sizeof(array)))
{
server_print("K42K should be V42V."); ok = false;
}
for (new i = 0; i < sizeof data; i++)
{
if (data[i] != array[i])
{
server_print("K42K slot %d should be %d, got %d", i, data[i], array[i]); ok = false;
}
}
if (TrieGetCell(t, "K42K", value) ||
TrieGetString(t, "K42K", string, charsmax(string)))
{
server_print("entry K42K should not be an array or string"); ok = false;
}
if (!TrieSetArray(t, "K42K", data, 1))
{
server_print("couldn't set K42K to 1-entry array"); ok = false;
}
if (!TrieGetArray(t, "K42K", array, sizeof(array), value))
{
server_print("couldn't fetch 1-entry array"); ok = false;
}
if (value != 1)
{
server_print("array size mismatch (%d, expected %d)", value, 1); ok = false;
}
if (ok)
pass("Array tests");
else
fail("Array tests");
ok = true;
// Remove "K42K".
if (!TrieDeleteKey(t, "K42K"))
{
server_print("K42K should have been removed"); ok = false;
}
if (TrieDeleteKey(t, "K42K"))
{
server_print("K42K should not exist"); ok =false;
}
if (TrieGetCell(t, "K42K", value) ||
TrieGetArray(t, "K42K", array, sizeof(array)) ||
TrieGetString(t, "K42K", string, charsmax(string)))
{
server_print("map should not have a K42K"); ok = false;
}
TrieDestroy(t);
t = TrieCreate();
for (new i = 0; i < 1000; i++)
{
formatex(key, charsmax(key), "!%d!", i);
TrieSetString(t, key, key);
}
for (new i = 0; i < 1000; i++)
{
formatex(key, charsmax(key), "!%d!", i);
if (!TrieKeyExists(t, key))
{
server_print("Key '%s' does not exist", key); ok = false;
}
else if (!TrieDeleteKey(t, key))
{
server_print("Key '%s' could not be deleted", key); ok = false;
}
}
if (ok)
pass("Exists/Delete");
else
fail("Exists/Delete");
ok = true;
TrieClear(t);
if (TrieGetSize(t))
{
server_print("size should be 0"); ok = false
}
TrieSetString(t, "adventure", "time!");
TrieSetString(t, "butterflies", "bees");
TrieSetString(t, "egg", "egg");
new Snapshot:keys = TrieSnapshotCreate(t);
{
if (TrieSnapshotLength(keys) != 3)
{
server_print("trie snapshot length should be 3"); ok = false;
}
new bool:found[3], len = TrieSnapshotLength(keys);
new buffer[32];
for (new i = 0; i < len; i++)
{
new size = TrieSnapshotKeyBufferSize(keys, i); // Just to use it, otherwise you should use charsmax(buffer).
TrieSnapshotGetKey(keys, i, buffer, size);
if (strcmp(buffer, "adventure") == 0) found[0] = true;
else if (strcmp(buffer, "butterflies") == 0) found[1] = true;
else if (strcmp(buffer, "egg") == 0) found[2] = true;
else { server_print("unexpected key: %s", buffer); ok = false; }
}
if (!found[0] || !found[1] || !found[2])
{
server_print("did not find all keys"); ok = false;
}
}
TrieSnapshotDestroy(keys);
TrieDestroy(t);
if (ok)
pass("Snapshot");
else
fail("Snapshot");
ok = true;
t = TrieCreate();
TrieSetString(t, "full", "throttle");
TrieSetString(t, "brutal", "legend");
TrieSetString(t, "broken", "age");
new TrieIter:iter = TrieIterCreate(t);
{
if (TrieIterGetSize(iter) != 3)
{
server_print("Trie iterator size should be 3, is %d", TrieIterGetSize(iter));
ok = false;
}
if (TrieIterEnded(iter))
{
server_print("Trie iterator should have a next key/value pair at this point");
ok = false;
}
new key[32], value[32], bool:valid[4], klen, vlen;
if (!TrieIterGetKey(iter, key, charsmax(key)))
{
server_print("Trie iterator should not be empty at this point (no key retrieval)");
ok = false;
}
else
{
while (!TrieIterEnded(iter))
{
klen = TrieIterGetKey(iter, key, charsmax(key));
TrieIterGetString(iter, value, charsmax(value), vlen);
if (strcmp(key, "full") == 0 && strcmp(value, "throttle") == 0)
valid[0] = true;
else if (strcmp(key, "brutal") == 0 && strcmp(value, "legend") == 0)
valid[1] = true;
else if (strcmp(key, "broken") == 0 && strcmp(value, "age") == 0)
valid[2] = true;
if (strlen(key) != klen)
{
server_print("Key string length does not match. %d != %d", strlen(key), klen);
ok = false;
}
if (strlen(value) != vlen)
{
server_print("Value string length does not match. %d != %d", strlen(key), vlen);
ok = false;
}
// Should thrown an error
// TrieSetString(t, "monkey", "island");
// TrieDeleteKey(t, "full");
// TrieClear(t);
TrieIterNext(iter);
}
if (!valid[0] || !valid[1] || !valid[2])
{
server_print("Did not find all value pairs (1)");
ok = false;
}
}
TrieIterDestroy(iter);
if (iter)
{
server_print("Iterator handle should be null after being destroyed: %d", iter);
ok = false;
}
iter = TrieIterCreate(t);
{
TrieSetString(t, "full", "speed");
TrieSetString(t, "brutal", "uppercut");
TrieSetString(t, "broken", "sword");
arrayset(valid, false, sizeof(valid));
for (; !TrieIterEnded(iter); TrieIterNext(iter))
{
if (TrieIterGetCell(iter, value[0]) || TrieIterGetArray(iter, array, sizeof(array)))
{
server_print("Entries should not be an array or string");
ok = false;
}
else
{
TrieIterGetKey(iter, key, charsmax(key));
TrieIterGetString(iter, value, charsmax(value));
if (strcmp(key, "full") == 0)
TrieSetString(t, "full", "speed");
else if (strcmp(key, "brutal") == 0)
TrieSetString(t, "brutal", "uppercut");
else if (strcmp(key, "broken") == 0)
TrieSetString(t, "broken", "sword");
}
}
if (TrieGetString(t, "full", value, charsmax(value)) && strcmp(value, "speed") == 0)
valid[0] = true;
if (TrieGetString(t, "brutal", value, charsmax(value)) && strcmp(value, "uppercut") == 0)
valid[1] = true;
if (TrieGetString(t, "broken", value, charsmax(value)) && strcmp(value, "sword") == 0)
valid[2] = true;
if (!valid[0] || !valid[1] || !valid[2])
{
server_print("Did not set the new values (overwriting value is allowed)");
ok = false;
}
}
TrieIterDestroy(iter);
if (TrieIterDestroy(iter))
{
server_print("Iter should be null");
ok = false;
}
iter = TrieIterCreate(t);
{
TrieDestroy(t);
// Should throw an error
// TrieIterNext(iter)
}
if (!TrieIterDestroy(iter))
{
server_print("Iter should be valid");
ok = false;
}
t = TrieCreate();
TrieSetCell(t, "key_1", cellmin);
TrieSetArray(t, "key_2", data, sizeof data);
iter = TrieIterCreate(t);
if (TrieIterEnded(iter))
{
server_print("Iter should not be ended: %d", iter);
ok = false;
}
for (; !TrieIterEnded(iter); TrieIterNext(iter))
{
TrieIterGetKey(iter, key, charsmax(key));
if (strcmp(key, "key_1") == 0)
{
new val;
if (!TrieIterGetCell(iter, val) || val != cellmin)
{
server_print("Failed to retrieve value (%d)", val)
ok = false;
}
}
else if (strcmp(key, "key_2") == 0)
{
if (!TrieIterGetArray(iter, array, sizeof(array)))
{
server_print("Failed to retrieve array")
ok = false;
}
else
{
for (new i = 0; i < sizeof data; i++)
{
if (data[i] != array[i])
{
server_print("slot %d should be %d, got %d", i, data[i], array[i]);
ok = false;
}
}
}
}
}
TrieClear(t);
TrieSetCell(t, "1", 1);
TrieSetCell(t, "2", 2);
TrieSetCell(t, "3", 3);
new totalSum = 0;
new element1, element2;
new TrieIter:iter1, TrieIter:iter2;
iter1 = TrieIterCreate(t)
for (; !TrieIterEnded(iter1); TrieIterNext(iter1))
{
iter2 = TrieIterCreate(t);
for(; !TrieIterEnded(iter2); TrieIterNext(iter2))
{
TrieIterGetCell(iter1, element1);
TrieIterGetCell(iter2, element2);
totalSum += element1 * element2;
}
TrieIterDestroy(iter2);
}
TrieIterDestroy(iter1);
if (totalSum != 36)
{
server_print("Sum should be 36, got %d", totalSum);
ok = false;
}
TrieIterDestroy(iter);
TrieDestroy(t);
}
if (ok)
pass("Iterator");
else
fail("Iterator");
done();
}