cvs.zerfleddert.de Git - proxmark3-svn/blob - client/fpga_compress.c

   1 //-----------------------------------------------------------------------------
   2 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
   3 // at your option, any later version. See the LICENSE.txt file for the text of
   4 // the license.
   5 //-----------------------------------------------------------------------------
   6 // Compression tool for FPGA config files. Compress several *.bit files at
   7 // compile time. Decompression is done at run time (see fpgaloader.c).
   8 // This uses the zlib library tuned to this specific case. The small file sizes
   9 // allow to use "insane" parameters for optimum compression ratio.
  10 //-----------------------------------------------------------------------------
  11
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <stdint.h>
  16 #include <stdbool.h>
  17 #include "zlib.h"
  18
  19 #define MAX(a,b) ((a)>(b)?(a):(b))
  20
  21 // zlib configuration
  22 #define COMPRESS_LEVEL           9  // use best possible compression
  23 #define COMPRESS_WINDOW_BITS    15  // default = max = 15 for a window of 2^15 = 32KBytes
  24 #define COMPRESS_MEM_LEVEL       9  // determines the amount of memory allocated during compression. Default = 8.
  25 /* COMPRESS_STRATEGY can be
  26         Z_DEFAULT_STRATEGY (the default),
  27         Z_FILTERED (more huffmann, less string matching),
  28         Z_HUFFMAN_ONLY (huffman only, no string matching)
  29         Z_RLE (distances limited to one)
  30         Z_FIXED (prevents the use of dynamic Huffman codes)
  31 */
  32
  33 #define COMPRESS_STRATEGY       Z_DEFAULT_STRATEGY
  34 // zlib tuning parameters:
  35 #define COMPRESS_GOOD_LENGTH           258
  36 #define COMPRESS_MAX_LAZY              258
  37 #define COMPRESS_MAX_NICE_LENGTH       258
  38 #define COMPRESS_MAX_CHAIN            8192
  39
  40 #define FPGA_INTERLEAVE_SIZE           288  // (the FPGA's internal config frame size is 288 bits. Interleaving with 288 bytes should give best compression)
  41 #define FPGA_CONFIG_SIZE            42336L  // our current fpga_[lh]f.bit files are 42175 bytes. Rounded up to next multiple of FPGA_INTERLEAVE_SIZE
  42 #define HARDNESTED_TABLE_SIZE           (sizeof(uint32_t) * ((1L<<19)+1))
  43
  44 static void usage(void)
  45 {
  46         fprintf(stdout, "Usage: fpga_compress <infile1> <infile2> ... <infile_n> <outfile>\n");
  47         fprintf(stdout, "          Combine n FPGA bitstream files and compress them into one.\n\n");
  48         fprintf(stdout, "       fpga_compress -d <infile> <outfile>");
  49         fprintf(stdout, "          Decompress <infile>. Write result to <outfile>");
  50         fprintf(stdout, "       fpga_compress -t <infile> <outfile>");
  51         fprintf(stdout, "          Compress hardnested table <infile>. Write result to <outfile>");
  52 }
  53
  54
  55 static voidpf fpga_deflate_malloc(voidpf opaque, uInt items, uInt size)
  56 {
  57         return malloc(items*size);
  58 }
  59
  60
  61 static void fpga_deflate_free(voidpf opaque, voidpf address)
  62 {
  63         return free(address);
  64 }
  65
  66
  67 static bool all_feof(FILE *infile[], uint8_t num_infiles)
  68 {
  69         for (uint16_t i = 0; i < num_infiles; i++) {
  70                 if (!feof(infile[i])) {
  71                         return false;
  72                 }
  73         }
  74
  75         return true;
  76 }
  77
  78
  79 int zlib_compress(FILE *infile[], uint8_t num_infiles, FILE *outfile, bool hardnested_mode)
  80 {
  81         uint8_t *fpga_config;
  82         uint32_t i;
  83         int32_t ret;
  84         uint8_t c;
  85         z_stream compressed_fpga_stream;
  86
  87         if (hardnested_mode) {
  88                 fpga_config = malloc(num_infiles * HARDNESTED_TABLE_SIZE);
  89         } else {
  90                 fpga_config = malloc(num_infiles * FPGA_CONFIG_SIZE);
  91         }
  92         // read the input files. Interleave them into fpga_config[]
  93         i = 0;
  94         do {
  95
  96                 if (i >= num_infiles * (hardnested_mode?HARDNESTED_TABLE_SIZE:FPGA_CONFIG_SIZE)) {
  97                         if (hardnested_mode) {
  98                                 fprintf(stderr, "Input file too big (> %lu bytes). This is probably not a hardnested bitflip state table.\n", HARDNESTED_TABLE_SIZE);
  99                         } else {
 100                                 fprintf(stderr, "Input files too big (total > %lu bytes). These are probably not PM3 FPGA config files.\n", num_infiles*FPGA_CONFIG_SIZE);
 101                         }
 102                         for(uint16_t j = 0; j < num_infiles; j++) {
 103                                 fclose(infile[j]);
 104                         }
 105                         free(fpga_config);
 106                         return(EXIT_FAILURE);
 107                 }
 108
 109                 for(uint16_t j = 0; j < num_infiles; j++) {
 110                         for(uint16_t k = 0; k < FPGA_INTERLEAVE_SIZE; k++) {
 111                                 c = fgetc(infile[j]);
 112                                 if (!feof(infile[j])) {
 113                                         fpga_config[i++] = c;
 114                                 } else if (num_infiles > 1) {
 115                                         fpga_config[i++] = '\0';
 116                                 }
 117                         }
 118                 }
 119
 120         } while (!all_feof(infile, num_infiles));
 121
 122         // initialize zlib structures
 123         compressed_fpga_stream.next_in = fpga_config;
 124         compressed_fpga_stream.avail_in = i;
 125         compressed_fpga_stream.zalloc = fpga_deflate_malloc;
 126         compressed_fpga_stream.zfree = fpga_deflate_free;
 127         compressed_fpga_stream.opaque = Z_NULL;
 128         ret = deflateInit2(&compressed_fpga_stream,
 129                                                 COMPRESS_LEVEL,
 130                                                 Z_DEFLATED,
 131                                                 COMPRESS_WINDOW_BITS,
 132                                                 COMPRESS_MEM_LEVEL,
 133                                                 COMPRESS_STRATEGY);
 134
 135         // estimate the size of the compressed output
 136         uint32_t outsize_max = deflateBound(&compressed_fpga_stream, compressed_fpga_stream.avail_in);
 137         uint8_t *outbuf = malloc(outsize_max);
 138         compressed_fpga_stream.next_out = outbuf;
 139         compressed_fpga_stream.avail_out = outsize_max;
 140
 141         if (ret == Z_OK) {
 142                 ret = deflateTune(&compressed_fpga_stream,
 143                                                         COMPRESS_GOOD_LENGTH,
 144                                                         COMPRESS_MAX_LAZY,
 145                                                         COMPRESS_MAX_NICE_LENGTH,
 146                                                         COMPRESS_MAX_CHAIN);
 147         }
 148
 149         if (ret == Z_OK) {
 150                 ret = deflate(&compressed_fpga_stream, Z_FINISH);
 151         }
 152
 153         fprintf(stdout, "compressed %u input bytes to %lu output bytes\n", i, compressed_fpga_stream.total_out);
 154
 155         if (ret != Z_STREAM_END) {
 156                 fprintf(stderr, "Error in deflate(): %i %s\n", ret, compressed_fpga_stream.msg);
 157                 free(outbuf);
 158                 deflateEnd(&compressed_fpga_stream);
 159                 for(uint16_t j = 0; j < num_infiles; j++) {
 160                         fclose(infile[j]);
 161                 }
 162                 fclose(outfile);
 163                 free(infile);
 164                 free(fpga_config);
 165                 return(EXIT_FAILURE);
 166                 }
 167
 168         for (i = 0; i < compressed_fpga_stream.total_out; i++) {
 169                 fputc(outbuf[i], outfile);
 170         }
 171
 172         free(outbuf);
 173         deflateEnd(&compressed_fpga_stream);
 174         for(uint16_t j = 0; j < num_infiles; j++) {
 175                 fclose(infile[j]);
 176         }
 177         fclose(outfile);
 178         free(infile);
 179         free(fpga_config);
 180
 181         return(EXIT_SUCCESS);
 182
 183 }
 184
 185
 186 int zlib_decompress(FILE *infile, FILE *outfile)
 187 {
 188         #define DECOMPRESS_BUF_SIZE 1024
 189         uint8_t outbuf[DECOMPRESS_BUF_SIZE];
 190         uint8_t inbuf[DECOMPRESS_BUF_SIZE];
 191         int32_t ret;
 192
 193         z_stream compressed_fpga_stream;
 194
 195         // initialize zlib structures
 196         compressed_fpga_stream.next_in = inbuf;
 197         compressed_fpga_stream.avail_in = 0;
 198         compressed_fpga_stream.next_out = outbuf;
 199         compressed_fpga_stream.avail_out = DECOMPRESS_BUF_SIZE;
 200         compressed_fpga_stream.zalloc = fpga_deflate_malloc;
 201         compressed_fpga_stream.zfree = fpga_deflate_free;
 202         compressed_fpga_stream.opaque = Z_NULL;
 203
 204         ret = inflateInit2(&compressed_fpga_stream, 0);
 205
 206         do {
 207                 if (compressed_fpga_stream.avail_in == 0) {
 208                         compressed_fpga_stream.next_in = inbuf;
 209                         uint16_t i = 0;
 210                         do {
 211                                 int32_t c = fgetc(infile);
 212                                 if (!feof(infile)) {
 213                                         inbuf[i++] = c & 0xFF;
 214                                         compressed_fpga_stream.avail_in++;
 215                                 } else {
 216                                         break;
 217                                 }
 218                         } while (i < DECOMPRESS_BUF_SIZE);
 219                 }
 220
 221                 ret = inflate(&compressed_fpga_stream, Z_SYNC_FLUSH);
 222
 223                 if (ret != Z_OK && ret != Z_STREAM_END) {
 224                         break;
 225                 }
 226
 227                 if (compressed_fpga_stream.avail_out == 0) {
 228                         for (uint16_t i = 0; i < DECOMPRESS_BUF_SIZE; i++) {
 229                                 fputc(outbuf[i], outfile);
 230                         }
 231                         compressed_fpga_stream.avail_out = DECOMPRESS_BUF_SIZE;
 232                         compressed_fpga_stream.next_out = outbuf;
 233                 }
 234         } while (ret == Z_OK);
 235
 236         if (ret == Z_STREAM_END) {  // reached end of input
 237                 uint16_t i = 0;
 238                 while (compressed_fpga_stream.avail_out < DECOMPRESS_BUF_SIZE) {
 239                         fputc(outbuf[i++], outfile);
 240                         compressed_fpga_stream.avail_out++;
 241                 }
 242                 fclose(outfile);
 243                 fclose(infile);
 244                 return(EXIT_SUCCESS);
 245         } else {
 246                 fprintf(stderr, "Error. Inflate() returned error %i, %s", ret, compressed_fpga_stream.msg);
 247                 fclose(outfile);
 248                 fclose(infile);
 249                 return(EXIT_FAILURE);
 250         }
 251
 252 }
 253
 254
 255 int main(int argc, char **argv)
 256 {
 257         FILE **infiles;
 258         FILE *outfile;
 259
 260         if (argc == 1 || argc == 2) {
 261                 usage();
 262                 return(EXIT_FAILURE);
 263         }
 264
 265         if (!strcmp(argv[1], "-d")) { // Decompress
 266
 267                 infiles = calloc(1, sizeof(FILE*));
 268                 if (argc != 4) {
 269                         usage();
 270                         return(EXIT_FAILURE);
 271                 }
 272                 infiles[0] = fopen(argv[2], "rb");
 273                 if (infiles[0] == NULL) {
 274                         fprintf(stderr, "Error. Cannot open input file %s", argv[2]);
 275                         return(EXIT_FAILURE);
 276                 }
 277                 outfile = fopen(argv[3], "wb");
 278                 if (outfile == NULL) {
 279                         fprintf(stderr, "Error. Cannot open output file %s", argv[3]);
 280                         return(EXIT_FAILURE);
 281                 }
 282                 return zlib_decompress(infiles[0], outfile);
 283
 284         } else { // Compress
 285
 286                 bool hardnested_mode = false;
 287                 int num_input_files = 0;
 288                 if (!strcmp(argv[1], "-t")) { // hardnested table
 289                         if (argc != 4) {
 290                                 usage();
 291                                 return(EXIT_FAILURE);
 292                         }
 293                         hardnested_mode = true;
 294                         num_input_files = 1;
 295                 } else {
 296                         num_input_files = argc-2;
 297                 }
 298                 infiles = calloc(num_input_files, sizeof(FILE*));
 299                 for (uint16_t i = 0; i < num_input_files; i++) {
 300                         infiles[i] = fopen(argv[i+hardnested_mode?2:1], "rb");
 301                         if (infiles[i] == NULL) {
 302                                 fprintf(stderr, "Error. Cannot open input file %s", argv[i+hardnested_mode?2:1]);
 303                                 return(EXIT_FAILURE);
 304                         }
 305                 }
 306                 outfile = fopen(argv[argc-1], "wb");
 307                 if (outfile == NULL) {
 308                         fprintf(stderr, "Error. Cannot open output file %s", argv[argc-1]);
 309                         return(EXIT_FAILURE);
 310                 }
 311                 return zlib_compress(infiles, num_input_files, outfile, hardnested_mode);
 312         }
 313 }