diff options
author | pacien | 2018-11-29 12:41:59 +0100 |
---|---|---|
committer | pacien | 2018-11-29 12:42:25 +0100 |
commit | 1524ab71168b7c214a531f796c94962776e9d88a (patch) | |
tree | 9d4e7342ea0a0d8a534e474f40d6eabd0c108b91 /tests/thuffmantree.nim | |
parent | d661132528d5c27148a0b55d52709ce97124000a (diff) | |
download | gziplike-1524ab71168b7c214a531f796c94962776e9d88a.tar.gz |
add generic huffman tree builder
Diffstat (limited to 'tests/thuffmantree.nim')
-rw-r--r-- | tests/thuffmantree.nim | 33 |
1 files changed, 31 insertions, 2 deletions
diff --git a/tests/thuffmantree.nim b/tests/thuffmantree.nim index ec40bdb..705ac17 100644 --- a/tests/thuffmantree.nim +++ b/tests/thuffmantree.nim | |||
@@ -14,24 +14,43 @@ | |||
14 | # You should have received a copy of the GNU Affero General Public License | 14 | # You should have received a copy of the GNU Affero General Public License |
15 | # along with this program. If not, see <https://www.gnu.org/licenses/>. | 15 | # along with this program. If not, see <https://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | import unittest, streams | 17 | import unittest, streams, sequtils, tables, heapqueue |
18 | import bitreader, bitwriter, huffmantree | 18 | import bitreader, bitwriter, huffmantree |
19 | 19 | ||
20 | suite "huffmantree": | 20 | suite "huffmantree": |
21 | let stats = newCountTable(concat(repeat(1'u, 3), repeat(2'u, 1), repeat(3'u, 2))) | ||
21 | let tree = huffmanBranch( | 22 | let tree = huffmanBranch( |
22 | huffmanLeaf(1'u), | 23 | huffmanLeaf(1'u), |
23 | huffmanBranch( | 24 | huffmanBranch( |
24 | huffmanLeaf(2'u), | 25 | huffmanLeaf(2'u), |
25 | huffmanLeaf(3'u))) | 26 | huffmanLeaf(3'u))) |
26 | 27 | ||
28 | test "equivalence": | ||
29 | check huffmanLeaf(12'u) ~= huffmanLeaf(12'u) | ||
30 | check huffmanLeaf(12'u) ~= huffmanLeaf(12'u, 2) | ||
31 | check huffmanLeaf(12'u) !~ huffmanLeaf(21'u) | ||
32 | check huffmanLeaf(12'u) !~ huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(12'u)) | ||
33 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) ~= huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) | ||
34 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) !~ huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(1'u)) | ||
35 | check huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) ~= huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 2)) | ||
36 | check huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) !~ huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(12'u, 2)) | ||
37 | |||
27 | test "equality": | 38 | test "equality": |
28 | check huffmanLeaf(12'u) == huffmanLeaf(12'u) | 39 | check huffmanLeaf(12'u) == huffmanLeaf(12'u) |
29 | check huffmanLeaf(12'u) != huffmanLeaf(21'u) | 40 | check huffmanLeaf(12'u) != huffmanLeaf(21'u) |
30 | check huffmanLeaf(12'u) != huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(12'u)) | 41 | check huffmanLeaf(12'u) != huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(12'u)) |
31 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) == huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) | 42 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) == huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) |
32 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) != huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(1'u)) | 43 | check huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(21'u)) != huffmanBranch(huffmanLeaf(12'u), huffmanLeaf(1'u)) |
44 | check huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) == huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) | ||
45 | check huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) != huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 2)) | ||
33 | check tree == tree | 46 | check tree == tree |
34 | 47 | ||
48 | test "weight comparison": | ||
49 | check huffmanLeaf(12'u, 1) < huffmanLeaf(12'u, 2) | ||
50 | check huffmanLeaf(12'u, 2) > huffmanLeaf(12'u, 1) | ||
51 | check huffmanLeaf(12'u, 1) < huffmanLeaf(12'u, 1) == false | ||
52 | check huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 1)) < huffmanBranch(huffmanLeaf(12'u, 1), huffmanLeaf(21'u, 2)) | ||
53 | |||
35 | test "maxValue": | 54 | test "maxValue": |
36 | check tree.maxValue() == 3 | 55 | check tree.maxValue() == 3 |
37 | 56 | ||
@@ -52,7 +71,7 @@ suite "huffmantree": | |||
52 | 71 | ||
53 | stream.setPosition(0) | 72 | stream.setPosition(0) |
54 | let bitReader = stream.bitReader() | 73 | let bitReader = stream.bitReader() |
55 | check huffmantree.deserialise(bitReader, uint) == tree | 74 | check huffmantree.deserialise(bitReader, uint) ~= tree |
56 | 75 | ||
57 | test "serialise": | 76 | test "serialise": |
58 | let stream = newStringStream() | 77 | let stream = newStringStream() |
@@ -72,3 +91,13 @@ suite "huffmantree": | |||
72 | check bitReader.readBits(2, uint8) == 2 | 91 | check bitReader.readBits(2, uint8) == 2 |
73 | check bitReader.readBool() == true # 3 leaf | 92 | check bitReader.readBool() == true # 3 leaf |
74 | check bitReader.readBits(2, uint8) == 3 | 93 | check bitReader.readBits(2, uint8) == 3 |
94 | |||
95 | test "symbolQueue": | ||
96 | var symbolQueue = symbolQueue(stats) | ||
97 | check symbolQueue.len == 3 | ||
98 | check symbolQueue.pop() == huffmanLeaf(2'u, 1) | ||
99 | check symbolQueue.pop() == huffmanLeaf(3'u, 2) | ||
100 | check symbolQueue.pop() == huffmanLeaf(1'u, 3) | ||
101 | |||
102 | test "buildHuffmanTree": | ||
103 | check buildHuffmanTree(stats) ~= tree | ||