mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-07 13:54:33 +00:00
573 lines
24 KiB
C
573 lines
24 KiB
C
/* enough.c -- determine the maximum size of inflate's Huffman code tables over
|
|
* all possible valid and complete Huffman codes, subject to a length limit.
|
|
* Copyright (C) 2007, 2008, 2012 Mark Adler
|
|
* Version 1.4 18 August 2012 Mark Adler
|
|
*/
|
|
|
|
/* Version history:
|
|
1.0 3 Jan 2007 First version (derived from codecount.c version 1.4)
|
|
1.1 4 Jan 2007 Use faster incremental table usage computation
|
|
Prune examine() search on previously visited states
|
|
1.2 5 Jan 2007 Comments clean up
|
|
As inflate does, decrease root for short codes
|
|
Refuse cases where inflate would increase root
|
|
1.3 17 Feb 2008 Add argument for initial root table size
|
|
Fix bug for initial root table size == max - 1
|
|
Use a macro to compute the history index
|
|
1.4 18 Aug 2012 Avoid shifts more than bits in type (caused endless loop!)
|
|
Clean up comparisons of different types
|
|
Clean up code indentation
|
|
*/
|
|
|
|
/*
|
|
Examine all possible Huffman codes for a given number of symbols and a
|
|
maximum code length in bits to determine the maximum table size for zilb's
|
|
inflate. Only complete Huffman codes are counted.
|
|
|
|
Two codes are considered distinct if the vectors of the number of codes per
|
|
length are not identical. So permutations of the symbol assignments result
|
|
in the same code for the counting, as do permutations of the assignments of
|
|
the bit values to the codes (i.e. only canonical codes are counted).
|
|
|
|
We build a code from shorter to longer lengths, determining how many symbols
|
|
are coded at each length. At each step, we have how many symbols remain to
|
|
be coded, what the last code length used was, and how many bit patterns of
|
|
that length remain unused. Then we add one to the code length and double the
|
|
number of unused patterns to graduate to the next code length. We then
|
|
assign all portions of the remaining symbols to that code length that
|
|
preserve the properties of a correct and eventually complete code. Those
|
|
properties are: we cannot use more bit patterns than are available; and when
|
|
all the symbols are used, there are exactly zero possible bit patterns
|
|
remaining.
|
|
|
|
The inflate Huffman decoding algorithm uses two-level lookup tables for
|
|
speed. There is a single first-level table to decode codes up to root bits
|
|
in length (root == 9 in the current inflate implementation). The table
|
|
has 1 << root entries and is indexed by the next root bits of input. Codes
|
|
shorter than root bits have replicated table entries, so that the correct
|
|
entry is pointed to regardless of the bits that follow the short code. If
|
|
the code is longer than root bits, then the table entry points to a second-
|
|
level table. The size of that table is determined by the longest code with
|
|
that root-bit prefix. If that longest code has length len, then the table
|
|
has size 1 << (len - root), to index the remaining bits in that set of
|
|
codes. Each subsequent root-bit prefix then has its own sub-table. The
|
|
total number of table entries required by the code is calculated
|
|
incrementally as the number of codes at each bit length is populated. When
|
|
all of the codes are shorter than root bits, then root is reduced to the
|
|
longest code length, resulting in a single, smaller, one-level table.
|
|
|
|
The inflate algorithm also provides for small values of root (relative to
|
|
the log2 of the number of symbols), where the shortest code has more bits
|
|
than root. In that case, root is increased to the length of the shortest
|
|
code. This program, by design, does not handle that case, so it is verified
|
|
that the number of symbols is less than 2^(root + 1).
|
|
|
|
In order to speed up the examination (by about ten orders of magnitude for
|
|
the default arguments), the intermediate states in the build-up of a code
|
|
are remembered and previously visited branches are pruned. The memory
|
|
required for this will increase rapidly with the total number of symbols and
|
|
the maximum code length in bits. However this is a very small price to pay
|
|
for the vast speedup.
|
|
|
|
First, all of the possible Huffman codes are counted, and reachable
|
|
intermediate states are noted by a non-zero count in a saved-results array.
|
|
Second, the intermediate states that lead to (root + 1) bit or longer codes
|
|
are used to look at all sub-codes from those junctures for their inflate
|
|
memory usage. (The amount of memory used is not affected by the number of
|
|
codes of root bits or less in length.) Third, the visited states in the
|
|
construction of those sub-codes and the associated calculation of the table
|
|
size is recalled in order to avoid recalculating from the same juncture.
|
|
Beginning the code examination at (root + 1) bit codes, which is enabled by
|
|
identifying the reachable nodes, accounts for about six of the orders of
|
|
magnitude of improvement for the default arguments. About another four
|
|
orders of magnitude come from not revisiting previous states. Out of
|
|
approximately 2x10^16 possible Huffman codes, only about 2x10^6 sub-codes
|
|
need to be examined to cover all of the possible table memory usage cases
|
|
for the default arguments of 286 symbols limited to 15-bit codes.
|
|
|
|
Note that an unsigned long long type is used for counting. It is quite easy
|
|
to exceed the capacity of an eight-byte integer with a large number of
|
|
symbols and a large maximum code length, so multiple-precision arithmetic
|
|
would need to replace the unsigned long long arithmetic in that case. This
|
|
program will abort if an overflow occurs. The big_t type identifies where
|
|
the counting takes place.
|
|
|
|
An unsigned long long type is also used for calculating the number of
|
|
possible codes remaining at the maximum length. This limits the maximum
|
|
code length to the number of bits in a long long minus the number of bits
|
|
needed to represent the symbols in a flat code. The code_t type identifies
|
|
where the bit pattern counting takes place.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
|
|
#define local static
|
|
|
|
/* special data types */
|
|
typedef unsigned long long big_t; /* type for code counting */
|
|
typedef unsigned long long code_t; /* type for bit pattern counting */
|
|
struct tab { /* type for been here check */
|
|
size_t len; /* length of bit vector in char's */
|
|
char *vec; /* allocated bit vector */
|
|
};
|
|
|
|
/* The array for saving results, num[], is indexed with this triplet:
|
|
|
|
syms: number of symbols remaining to code
|
|
left: number of available bit patterns at length len
|
|
len: number of bits in the codes currently being assigned
|
|
|
|
Those indices are constrained thusly when saving results:
|
|
|
|
syms: 3..totsym (totsym == total symbols to code)
|
|
left: 2..syms - 1, but only the evens (so syms == 8 -> 2, 4, 6)
|
|
len: 1..max - 1 (max == maximum code length in bits)
|
|
|
|
syms == 2 is not saved since that immediately leads to a single code. left
|
|
must be even, since it represents the number of available bit patterns at
|
|
the current length, which is double the number at the previous length.
|
|
left ends at syms-1 since left == syms immediately results in a single code.
|
|
(left > sym is not allowed since that would result in an incomplete code.)
|
|
len is less than max, since the code completes immediately when len == max.
|
|
|
|
The offset into the array is calculated for the three indices with the
|
|
first one (syms) being outermost, and the last one (len) being innermost.
|
|
We build the array with length max-1 lists for the len index, with syms-3
|
|
of those for each symbol. There are totsym-2 of those, with each one
|
|
varying in length as a function of sym. See the calculation of index in
|
|
count() for the index, and the calculation of size in main() for the size
|
|
of the array.
|
|
|
|
For the deflate example of 286 symbols limited to 15-bit codes, the array
|
|
has 284,284 entries, taking up 2.17 MB for an 8-byte big_t. More than
|
|
half of the space allocated for saved results is actually used -- not all
|
|
possible triplets are reached in the generation of valid Huffman codes.
|
|
*/
|
|
|
|
/* The array for tracking visited states, done[], is itself indexed identically
|
|
to the num[] array as described above for the (syms, left, len) triplet.
|
|
Each element in the array is further indexed by the (mem, rem) doublet,
|
|
where mem is the amount of inflate table space used so far, and rem is the
|
|
remaining unused entries in the current inflate sub-table. Each indexed
|
|
element is simply one bit indicating whether the state has been visited or
|
|
not. Since the ranges for mem and rem are not known a priori, each bit
|
|
vector is of a variable size, and grows as needed to accommodate the visited
|
|
states. mem and rem are used to calculate a single index in a triangular
|
|
array. Since the range of mem is expected in the default case to be about
|
|
ten times larger than the range of rem, the array is skewed to reduce the
|
|
memory usage, with eight times the range for mem than for rem. See the
|
|
calculations for offset and bit in beenhere() for the details.
|
|
|
|
For the deflate example of 286 symbols limited to 15-bit codes, the bit
|
|
vectors grow to total approximately 21 MB, in addition to the 4.3 MB done[]
|
|
array itself.
|
|
*/
|
|
|
|
/* Globals to avoid propagating constants or constant pointers recursively */
|
|
local int max; /* maximum allowed bit length for the codes */
|
|
local int root; /* size of base code table in bits */
|
|
local int large; /* largest code table so far */
|
|
local size_t size; /* number of elements in num and done */
|
|
local int *code; /* number of symbols assigned to each bit length */
|
|
local big_t *num; /* saved results array for code counting */
|
|
local struct tab *done; /* states already evaluated array */
|
|
|
|
/* Index function for num[] and done[] */
|
|
#define INDEX(i,j,k) (((size_t)((i-1)>>1)*((i-2)>>1)+(j>>1)-1)*(max-1)+k-1)
|
|
|
|
/* Free allocated space. Uses globals code, num, and done. */
|
|
local void cleanup(void)
|
|
{
|
|
size_t n;
|
|
|
|
if (done != NULL) {
|
|
for (n = 0; n < size; n++)
|
|
if (done[n].len)
|
|
free(done[n].vec);
|
|
free(done);
|
|
}
|
|
if (num != NULL)
|
|
free(num);
|
|
if (code != NULL)
|
|
free(code);
|
|
}
|
|
|
|
/* Return the number of possible Huffman codes using bit patterns of lengths
|
|
len through max inclusive, coding syms symbols, with left bit patterns of
|
|
length len unused -- return -1 if there is an overflow in the counting.
|
|
Keep a record of previous results in num to prevent repeating the same
|
|
calculation. Uses the globals max and num. */
|
|
local big_t count(int syms, int len, int left)
|
|
{
|
|
big_t sum; /* number of possible codes from this juncture */
|
|
big_t got; /* value returned from count() */
|
|
int least; /* least number of syms to use at this juncture */
|
|
int most; /* most number of syms to use at this juncture */
|
|
int use; /* number of bit patterns to use in next call */
|
|
size_t index; /* index of this case in *num */
|
|
|
|
/* see if only one possible code */
|
|
if (syms == left)
|
|
return 1;
|
|
|
|
/* note and verify the expected state */
|
|
assert(syms > left && left > 0 && len < max);
|
|
|
|
/* see if we've done this one already */
|
|
index = INDEX(syms, left, len);
|
|
got = num[index];
|
|
if (got)
|
|
return got; /* we have -- return the saved result */
|
|
|
|
/* we need to use at least this many bit patterns so that the code won't be
|
|
incomplete at the next length (more bit patterns than symbols) */
|
|
least = (left << 1) - syms;
|
|
if (least < 0)
|
|
least = 0;
|
|
|
|
/* we can use at most this many bit patterns, lest there not be enough
|
|
available for the remaining symbols at the maximum length (if there were
|
|
no limit to the code length, this would become: most = left - 1) */
|
|
most = (((code_t)left << (max - len)) - syms) /
|
|
(((code_t)1 << (max - len)) - 1);
|
|
|
|
/* count all possible codes from this juncture and add them up */
|
|
sum = 0;
|
|
for (use = least; use <= most; use++) {
|
|
got = count(syms - use, len + 1, (left - use) << 1);
|
|
sum += got;
|
|
if (got == (big_t)0 - 1 || sum < got) /* overflow */
|
|
return (big_t)0 - 1;
|
|
}
|
|
|
|
/* verify that all recursive calls are productive */
|
|
assert(sum != 0);
|
|
|
|
/* save the result and return it */
|
|
num[index] = sum;
|
|
return sum;
|
|
}
|
|
|
|
/* Return true if we've been here before, set to true if not. Set a bit in a
|
|
bit vector to indicate visiting this state. Each (syms,len,left) state
|
|
has a variable size bit vector indexed by (mem,rem). The bit vector is
|
|
lengthened if needed to allow setting the (mem,rem) bit. */
|
|
local int beenhere(int syms, int len, int left, int mem, int rem)
|
|
{
|
|
size_t index; /* index for this state's bit vector */
|
|
size_t offset; /* offset in this state's bit vector */
|
|
int bit; /* mask for this state's bit */
|
|
size_t length; /* length of the bit vector in bytes */
|
|
char *vector; /* new or enlarged bit vector */
|
|
|
|
/* point to vector for (syms,left,len), bit in vector for (mem,rem) */
|
|
index = INDEX(syms, left, len);
|
|
mem -= 1 << root;
|
|
offset = (mem >> 3) + rem;
|
|
offset = ((offset * (offset + 1)) >> 1) + rem;
|
|
bit = 1 << (mem & 7);
|
|
|
|
/* see if we've been here */
|
|
length = done[index].len;
|
|
if (offset < length && (done[index].vec[offset] & bit) != 0)
|
|
return 1; /* done this! */
|
|
|
|
/* we haven't been here before -- set the bit to show we have now */
|
|
|
|
/* see if we need to lengthen the vector in order to set the bit */
|
|
if (length <= offset) {
|
|
/* if we have one already, enlarge it, zero out the appended space */
|
|
if (length) {
|
|
do {
|
|
length <<= 1;
|
|
} while (length <= offset);
|
|
vector = realloc(done[index].vec, length);
|
|
if (vector != NULL)
|
|
memset(vector + done[index].len, 0, length - done[index].len);
|
|
}
|
|
|
|
/* otherwise we need to make a new vector and zero it out */
|
|
else {
|
|
length = 1 << (len - root);
|
|
while (length <= offset)
|
|
length <<= 1;
|
|
vector = calloc(length, sizeof(char));
|
|
}
|
|
|
|
/* in either case, bail if we can't get the memory */
|
|
if (vector == NULL) {
|
|
fputs("abort: unable to allocate enough memory\n", stderr);
|
|
cleanup();
|
|
exit(1);
|
|
}
|
|
|
|
/* install the new vector */
|
|
done[index].len = length;
|
|
done[index].vec = vector;
|
|
}
|
|
|
|
/* set the bit */
|
|
done[index].vec[offset] |= bit;
|
|
return 0;
|
|
}
|
|
|
|
/* Examine all possible codes from the given node (syms, len, left). Compute
|
|
the amount of memory required to build inflate's decoding tables, where the
|
|
number of code structures used so far is mem, and the number remaining in
|
|
the current sub-table is rem. Uses the globals max, code, root, large, and
|
|
done. */
|
|
local void examine(int syms, int len, int left, int mem, int rem)
|
|
{
|
|
int least; /* least number of syms to use at this juncture */
|
|
int most; /* most number of syms to use at this juncture */
|
|
int use; /* number of bit patterns to use in next call */
|
|
|
|
/* see if we have a complete code */
|
|
if (syms == left) {
|
|
/* set the last code entry */
|
|
code[len] = left;
|
|
|
|
/* complete computation of memory used by this code */
|
|
while (rem < left) {
|
|
left -= rem;
|
|
rem = 1 << (len - root);
|
|
mem += rem;
|
|
}
|
|
assert(rem == left);
|
|
|
|
/* if this is a new maximum, show the entries used and the sub-code */
|
|
if (mem > large) {
|
|
large = mem;
|
|
printf("max %d: ", mem);
|
|
for (use = root + 1; use <= max; use++)
|
|
if (code[use])
|
|
printf("%d[%d] ", code[use], use);
|
|
putchar('\n');
|
|
fflush(stdout);
|
|
}
|
|
|
|
/* remove entries as we drop back down in the recursion */
|
|
code[len] = 0;
|
|
return;
|
|
}
|
|
|
|
/* prune the tree if we can */
|
|
if (beenhere(syms, len, left, mem, rem))
|
|
return;
|
|
|
|
/* we need to use at least this many bit patterns so that the code won't be
|
|
incomplete at the next length (more bit patterns than symbols) */
|
|
least = (left << 1) - syms;
|
|
if (least < 0)
|
|
least = 0;
|
|
|
|
/* we can use at most this many bit patterns, lest there not be enough
|
|
available for the remaining symbols at the maximum length (if there were
|
|
no limit to the code length, this would become: most = left - 1) */
|
|
most = (((code_t)left << (max - len)) - syms) /
|
|
(((code_t)1 << (max - len)) - 1);
|
|
|
|
/* occupy least table spaces, creating new sub-tables as needed */
|
|
use = least;
|
|
while (rem < use) {
|
|
use -= rem;
|
|
rem = 1 << (len - root);
|
|
mem += rem;
|
|
}
|
|
rem -= use;
|
|
|
|
/* examine codes from here, updating table space as we go */
|
|
for (use = least; use <= most; use++) {
|
|
code[len] = use;
|
|
examine(syms - use, len + 1, (left - use) << 1,
|
|
mem + (rem ? 1 << (len - root) : 0), rem << 1);
|
|
if (rem == 0) {
|
|
rem = 1 << (len - root);
|
|
mem += rem;
|
|
}
|
|
rem--;
|
|
}
|
|
|
|
/* remove entries as we drop back down in the recursion */
|
|
code[len] = 0;
|
|
}
|
|
|
|
/* Look at all sub-codes starting with root + 1 bits. Look at only the valid
|
|
intermediate code states (syms, left, len). For each completed code,
|
|
calculate the amount of memory required by inflate to build the decoding
|
|
tables. Find the maximum amount of memory required and show the code that
|
|
requires that maximum. Uses the globals max, root, and num. */
|
|
local void enough(int syms)
|
|
{
|
|
int n; /* number of remaing symbols for this node */
|
|
int left; /* number of unused bit patterns at this length */
|
|
size_t index; /* index of this case in *num */
|
|
|
|
/* clear code */
|
|
for (n = 0; n <= max; n++)
|
|
code[n] = 0;
|
|
|
|
/* look at all (root + 1) bit and longer codes */
|
|
large = 1 << root; /* base table */
|
|
if (root < max) /* otherwise, there's only a base table */
|
|
for (n = 3; n <= syms; n++)
|
|
for (left = 2; left < n; left += 2)
|
|
{
|
|
/* look at all reachable (root + 1) bit nodes, and the
|
|
resulting codes (complete at root + 2 or more) */
|
|
index = INDEX(n, left, root + 1);
|
|
if (root + 1 < max && num[index]) /* reachable node */
|
|
examine(n, root + 1, left, 1 << root, 0);
|
|
|
|
/* also look at root bit codes with completions at root + 1
|
|
bits (not saved in num, since complete), just in case */
|
|
if (num[index - 1] && n <= left << 1)
|
|
examine((n - left) << 1, root + 1, (n - left) << 1,
|
|
1 << root, 0);
|
|
}
|
|
|
|
/* done */
|
|
printf("done: maximum of %d table entries\n", large);
|
|
}
|
|
|
|
/*
|
|
Examine and show the total number of possible Huffman codes for a given
|
|
maximum number of symbols, initial root table size, and maximum code length
|
|
in bits -- those are the command arguments in that order. The default
|
|
values are 286, 9, and 15 respectively, for the deflate literal/length code.
|
|
The possible codes are counted for each number of coded symbols from two to
|
|
the maximum. The counts for each of those and the total number of codes are
|
|
shown. The maximum number of inflate table entires is then calculated
|
|
across all possible codes. Each new maximum number of table entries and the
|
|
associated sub-code (starting at root + 1 == 10 bits) is shown.
|
|
|
|
To count and examine Huffman codes that are not length-limited, provide a
|
|
maximum length equal to the number of symbols minus one.
|
|
|
|
For the deflate literal/length code, use "enough". For the deflate distance
|
|
code, use "enough 30 6".
|
|
|
|
This uses the %llu printf format to print big_t numbers, which assumes that
|
|
big_t is an unsigned long long. If the big_t type is changed (for example
|
|
to a multiple precision type), the method of printing will also need to be
|
|
updated.
|
|
*/
|
|
int main(int argc, char **argv)
|
|
{
|
|
int syms; /* total number of symbols to code */
|
|
int n; /* number of symbols to code for this run */
|
|
big_t got; /* return value of count() */
|
|
big_t sum; /* accumulated number of codes over n */
|
|
code_t word; /* for counting bits in code_t */
|
|
|
|
/* set up globals for cleanup() */
|
|
code = NULL;
|
|
num = NULL;
|
|
done = NULL;
|
|
|
|
/* get arguments -- default to the deflate literal/length code */
|
|
syms = 286;
|
|
root = 9;
|
|
max = 15;
|
|
if (argc > 1) {
|
|
syms = atoi(argv[1]);
|
|
if (argc > 2) {
|
|
root = atoi(argv[2]);
|
|
if (argc > 3)
|
|
max = atoi(argv[3]);
|
|
}
|
|
}
|
|
if (argc > 4 || syms < 2 || root < 1 || max < 1) {
|
|
fputs("invalid arguments, need: [sym >= 2 [root >= 1 [max >= 1]]]\n",
|
|
stderr);
|
|
return 1;
|
|
}
|
|
|
|
/* if not restricting the code length, the longest is syms - 1 */
|
|
if (max > syms - 1)
|
|
max = syms - 1;
|
|
|
|
/* determine the number of bits in a code_t */
|
|
for (n = 0, word = 1; word; n++, word <<= 1)
|
|
;
|
|
|
|
/* make sure that the calculation of most will not overflow */
|
|
if (max > n || (code_t)(syms - 2) >= (((code_t)0 - 1) >> (max - 1))) {
|
|
fputs("abort: code length too long for internal types\n", stderr);
|
|
return 1;
|
|
}
|
|
|
|
/* reject impossible code requests */
|
|
if ((code_t)(syms - 1) > ((code_t)1 << max) - 1) {
|
|
fprintf(stderr, "%d symbols cannot be coded in %d bits\n",
|
|
syms, max);
|
|
return 1;
|
|
}
|
|
|
|
/* allocate code vector */
|
|
code = calloc(max + 1, sizeof(int));
|
|
if (code == NULL) {
|
|
fputs("abort: unable to allocate enough memory\n", stderr);
|
|
return 1;
|
|
}
|
|
|
|
/* determine size of saved results array, checking for overflows,
|
|
allocate and clear the array (set all to zero with calloc()) */
|
|
if (syms == 2) /* iff max == 1 */
|
|
num = NULL; /* won't be saving any results */
|
|
else {
|
|
size = syms >> 1;
|
|
if (size > ((size_t)0 - 1) / (n = (syms - 1) >> 1) ||
|
|
(size *= n, size > ((size_t)0 - 1) / (n = max - 1)) ||
|
|
(size *= n, size > ((size_t)0 - 1) / sizeof(big_t)) ||
|
|
(num = calloc(size, sizeof(big_t))) == NULL) {
|
|
fputs("abort: unable to allocate enough memory\n", stderr);
|
|
cleanup();
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/* count possible codes for all numbers of symbols, add up counts */
|
|
sum = 0;
|
|
for (n = 2; n <= syms; n++) {
|
|
got = count(n, 1, 2);
|
|
sum += got;
|
|
if (got == (big_t)0 - 1 || sum < got) { /* overflow */
|
|
fputs("abort: can't count that high!\n", stderr);
|
|
cleanup();
|
|
return 1;
|
|
}
|
|
printf("%llu %d-codes\n", got, n);
|
|
}
|
|
printf("%llu total codes for 2 to %d symbols", sum, syms);
|
|
if (max < syms - 1)
|
|
printf(" (%d-bit length limit)\n", max);
|
|
else
|
|
puts(" (no length limit)");
|
|
|
|
/* allocate and clear done array for beenhere() */
|
|
if (syms == 2)
|
|
done = NULL;
|
|
else if (size > ((size_t)0 - 1) / sizeof(struct tab) ||
|
|
(done = calloc(size, sizeof(struct tab))) == NULL) {
|
|
fputs("abort: unable to allocate enough memory\n", stderr);
|
|
cleanup();
|
|
return 1;
|
|
}
|
|
|
|
/* find and show maximum inflate table usage */
|
|
if (root > max) /* reduce root to max length */
|
|
root = max;
|
|
if ((code_t)syms < ((code_t)1 << (root + 1)))
|
|
enough(syms);
|
|
else
|
|
puts("cannot handle minimum code lengths > root");
|
|
|
|
/* done */
|
|
cleanup();
|
|
return 0;
|
|
}
|