Added deflater.c module from Piotr

git-svn-id: svn://svn.cc65.org/cc65/trunk@2456 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/util/zlib/deflater.c b/util/zlib/deflater.c
new file mode 100644 (file)
index 0000000..59ee3f7
--- /dev/null
+++ b/util/zlib/deflater.c
@@ -0,0 +1,90 @@
+/*
+ * Compresses data to the DEFLATE format.
+ * The compressed data is ready to use with inflatemem().
+ * Compile using e.g.
+ * gcc -O2 -o deflater deflater.c -lz
+ *
+ * Author: Piotr Fusik <fox@scene.pl>
+ */
+#include <stdio.h>
+#include <stdlib.h>
+#include <zlib.h>
+
+#define IN_SIZE_MAX 60000U
+#define OUT_SIZE_MAX 60000U
+
+int main(int argc, char* argv[])
+{
+       FILE* fp;
+       char* inbuf;
+       char* outbuf;
+       size_t inlen;
+       size_t outlen;
+       z_stream stream;
+
+       /* check command line */
+       if (argc != 3) {
+               fprintf(stderr,
+                       "Compresses a file to the DEFLATE format.\n"
+                       "24 Aug 2002, Piotr Fusik <fox@scene.pl>\n"
+                       "Usage: deflater input_file deflated_file\n"
+               );
+               return 3;
+       }
+
+       /* alloc buffers */
+       inbuf = malloc(IN_SIZE_MAX);
+       outbuf = malloc(OUT_SIZE_MAX);
+       if (inbuf == NULL || outbuf == NULL) {
+               fprintf(stderr, "deflater: Out of memory!\n");
+               return 1;
+       }
+
+       /* read input file */
+       fp = fopen(argv[1], "rb");
+       if (fp == NULL) {
+               perror(argv[1]);
+               return 1;
+       }
+       inlen = fread(inbuf, 1, IN_SIZE_MAX, fp);
+       fclose(fp);
+
+       /* compress */
+       stream.next_in = inbuf;
+       stream.avail_in = inlen;
+       stream.next_out = outbuf;
+       stream.avail_out = OUT_SIZE_MAX;
+       stream.zalloc = (alloc_func) 0;
+       stream.zfree = (free_func) 0;
+       if (deflateInit2(&stream, Z_BEST_COMPRESSION, Z_DEFLATED,
+               -MAX_WBITS, 9, Z_DEFAULT_STRATEGY) != Z_OK) {
+               fprintf(stderr, "deflater: deflateInit2 failed\n");
+               return 1;
+       }
+       if (deflate(&stream, Z_FINISH) != Z_STREAM_END) {
+               fprintf(stderr, "deflater: deflate failed\n");
+               return 1;
+       }
+       if (deflateEnd(&stream) != Z_OK) {
+               fprintf(stderr, "deflater: deflateEnd failed\n");
+               return 1;
+       }
+
+       /* write output */
+       fp = fopen(argv[2], "wb");
+       if (fp == NULL) {
+               perror(argv[2]);
+               return 1;
+       }
+       outlen = fwrite(outbuf, 1, stream.total_out, fp);
+       fclose(fp);
+       if (outlen != stream.total_out) {
+               perror(argv[2]);
+               return 1;
+       }
+
+       /* display summary */
+       printf("Compressed %s (%d bytes) to %s (%d bytes)\n",
+               argv[1], inlen, argv[2], outlen);
+       return 0;
+}