| /* 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, 2018 Mark Adler |
| * Version 1.5 1 August 2018 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 |
| 1.5 1 Aug 2018 Clean up code style and formatting |
| */ |
| |
| /* |
| 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 zlib'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 |
| #define PRIbig "llu" // printf format for big_t |
| 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 map() 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. |
| struct { |
| int max; // maximum allowed bit length for the codes |
| int root; // size of base code table in bits |
| int large; // largest code table so far |
| size_t size; // number of elements in num and done |
| int *code; // number of symbols assigned to each bit length |
| big_t *num; // saved results array for code counting |
| struct tab *done; // states already evaluated array |
| } g; |
| |
| // Index function for num[] and done[]. |
| #define INDEX(i,j,k) (((size_t)((i-1)>>1)*((i-2)>>1)+(j>>1)-1)*(g.max-1)+k-1) |
| |
| // Free allocated space. Uses globals code, num, and done. |
| local void cleanup(void) { |
| size_t n; |
| |
| if (g.done != NULL) { |
| for (n = 0; n < g.size; n++) |
| if (g.done[n].len) |
| free(g.done[n].vec); |
| free(g.done); |
| } |
| if (g.num != NULL) |
| free(g.num); |
| if (g.code != NULL) |
| free(g.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 < g.max); |
| |
| // see if we've done this one already |
| index = INDEX(syms, left, len); |
| got = g.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 << (g.max - len)) - syms) / |
| (((code_t)1 << (g.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 |
| g.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 << g.root; |
| offset = (mem >> 3) + rem; |
| offset = ((offset * (offset + 1)) >> 1) + rem; |
| bit = 1 << (mem & 7); |
| |
| // see if we've been here |
| length = g.done[index].len; |
| if (offset < length && (g.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(g.done[index].vec, length); |
| if (vector != NULL) |
| memset(vector + g.done[index].len, 0, |
| length - g.done[index].len); |
| } |
| |
| // otherwise we need to make a new vector and zero it out |
| else { |
| length = 1 << (len - g.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 |
| g.done[index].len = length; |
| g.done[index].vec = vector; |
| } |
| |
| // set the bit |
| g.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 |
| g.code[len] = left; |
| |
| // complete computation of memory used by this code |
| while (rem < left) { |
| left -= rem; |
| rem = 1 << (len - g.root); |
| mem += rem; |
| } |
| assert(rem == left); |
| |
| // if this is a new maximum, show the entries used and the sub-code |
| if (mem > g.large) { |
| g.large = mem; |
| printf("max %d: ", mem); |
| for (use = g.root + 1; use <= g.max; use++) |
| if (g.code[use]) |
| printf("%d[%d] ", g.code[use], use); |
| putchar('\n'); |
| fflush(stdout); |
| } |
| |
| // remove entries as we drop back down in the recursion |
| g.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 << (g.max - len)) - syms) / |
| (((code_t)1 << (g.max - len)) - 1); |
| |
| // occupy least table spaces, creating new sub-tables as needed |
| use = least; |
| while (rem < use) { |
| use -= rem; |
| rem = 1 << (len - g.root); |
| mem += rem; |
| } |
| rem -= use; |
| |
| // examine codes from here, updating table space as we go |
| for (use = least; use <= most; use++) { |
| g.code[len] = use; |
| examine(syms - use, len + 1, (left - use) << 1, |
| mem + (rem ? 1 << (len - g.root) : 0), rem << 1); |
| if (rem == 0) { |
| rem = 1 << (len - g.root); |
| mem += rem; |
| } |
| rem--; |
| } |
| |
| // remove entries as we drop back down in the recursion |
| g.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 <= g.max; n++) |
| g.code[n] = 0; |
| |
| // look at all (root + 1) bit and longer codes |
| g.large = 1 << g.root; // base table |
| if (g.root < g.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, g.root + 1); |
| if (g.root + 1 < g.max && g.num[index]) // reachable node |
| examine(n, g.root + 1, left, 1 << g.root, 0); |
| |
| // also look at root bit codes with completions at root + 1 |
| // bits (not saved in num, since complete), just in case |
| if (g.num[index - 1] && n <= left << 1) |
| examine((n - left) << 1, g.root + 1, (n - left) << 1, |
| 1 << g.root, 0); |
| } |
| |
| // done |
| printf("done: maximum of %d table entries\n", g.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". |
| 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() |
| g.code = NULL; |
| g.num = NULL; |
| g.done = NULL; |
| |
| // get arguments -- default to the deflate literal/length code |
| syms = 286; |
| g.root = 9; |
| g.max = 15; |
| if (argc > 1) { |
| syms = atoi(argv[1]); |
| if (argc > 2) { |
| g.root = atoi(argv[2]); |
| if (argc > 3) |
| g.max = atoi(argv[3]); |
| } |
| } |
| if (argc > 4 || syms < 2 || g.root < 1 || g.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 (g.max > syms - 1) |
| g.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 (g.max > n || (code_t)(syms - 2) >= (((code_t)0 - 1) >> (g.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 << g.max) - 1) { |
| fprintf(stderr, "%d symbols cannot be coded in %d bits\n", |
| syms, g.max); |
| return 1; |
| } |
| |
| // allocate code vector |
| g.code = calloc(g.max + 1, sizeof(int)); |
| if (g.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 |
| g.num = NULL; // won't be saving any results |
| else { |
| g.size = syms >> 1; |
| if (g.size > ((size_t)0 - 1) / (n = (syms - 1) >> 1) || |
| (g.size *= n, g.size > ((size_t)0 - 1) / (n = g.max - 1)) || |
| (g.size *= n, g.size > ((size_t)0 - 1) / sizeof(big_t)) || |
| (g.num = calloc(g.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("%"PRIbig" %d-codes\n", got, n); |
| } |
| printf("%"PRIbig" total codes for 2 to %d symbols", sum, syms); |
| if (g.max < syms - 1) |
| printf(" (%d-bit length limit)\n", g.max); |
| else |
| puts(" (no length limit)"); |
| |
| // allocate and clear done array for beenhere() |
| if (syms == 2) |
| g.done = NULL; |
| else if (g.size > ((size_t)0 - 1) / sizeof(struct tab) || |
| (g.done = calloc(g.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 (g.root > g.max) // reduce root to max length |
| g.root = g.max; |
| if ((code_t)syms < ((code_t)1 << (g.root + 1))) |
| enough(syms); |
| else |
| puts("cannot handle minimum code lengths > root"); |
| |
| // done |
| cleanup(); |
| return 0; |
| } |