fixed more binutils issues (newer gcc/libc)
[zpugcc/jano.git] / toolchain / gcc / zlib / example.c
blobf60fa6a76044c786e719edc851149ef363ff804a
1 /* example.c -- usage example of the zlib compression library
2 * Copyright (C) 1995-2002 Jean-loup Gailly.
3 * For conditions of distribution and use, see copyright notice in zlib.h
4 */
6 /* @(#) $Id: example.c 119 2004-10-05 20:38:42Z oyvind $ */
8 #include <stdio.h>
9 #include "zlib.h"
11 #ifdef STDC
12 # include <string.h>
13 # include <stdlib.h>
14 #else
15 extern void exit OF((int));
16 #endif
18 #if defined(VMS) || defined(RISCOS)
19 # define TESTFILE "foo-gz"
20 #else
21 # define TESTFILE "foo.gz"
22 #endif
24 #define CHECK_ERR(err, msg) { \
25 if (err != Z_OK) { \
26 fprintf(stderr, "%s error: %d\n", msg, err); \
27 exit(1); \
28 } \
31 const char hello[] = "hello, hello!";
32 /* "hello world" would be more standard, but the repeated "hello"
33 * stresses the compression code better, sorry...
36 const char dictionary[] = "hello";
37 uLong dictId; /* Adler32 value of the dictionary */
39 void test_compress OF((Byte *compr, uLong comprLen,
40 Byte *uncompr, uLong uncomprLen));
41 void test_gzio OF((const char *out, const char *in,
42 Byte *uncompr, int uncomprLen));
43 void test_deflate OF((Byte *compr, uLong comprLen));
44 void test_inflate OF((Byte *compr, uLong comprLen,
45 Byte *uncompr, uLong uncomprLen));
46 void test_large_deflate OF((Byte *compr, uLong comprLen,
47 Byte *uncompr, uLong uncomprLen));
48 void test_large_inflate OF((Byte *compr, uLong comprLen,
49 Byte *uncompr, uLong uncomprLen));
50 void test_flush OF((Byte *compr, uLong *comprLen));
51 void test_sync OF((Byte *compr, uLong comprLen,
52 Byte *uncompr, uLong uncomprLen));
53 void test_dict_deflate OF((Byte *compr, uLong comprLen));
54 void test_dict_inflate OF((Byte *compr, uLong comprLen,
55 Byte *uncompr, uLong uncomprLen));
56 int main OF((int argc, char *argv[]));
58 /* ===========================================================================
59 * Test compress() and uncompress()
61 void test_compress(compr, comprLen, uncompr, uncomprLen)
62 Byte *compr, *uncompr;
63 uLong comprLen, uncomprLen;
65 int err;
66 uLong len = strlen(hello)+1;
68 err = compress(compr, &comprLen, (const Bytef*)hello, len);
69 CHECK_ERR(err, "compress");
71 strcpy((char*)uncompr, "garbage");
73 err = uncompress(uncompr, &uncomprLen, compr, comprLen);
74 CHECK_ERR(err, "uncompress");
76 if (strcmp((char*)uncompr, hello)) {
77 fprintf(stderr, "bad uncompress\n");
78 exit(1);
79 } else {
80 printf("uncompress(): %s\n", (char *)uncompr);
84 /* ===========================================================================
85 * Test read/write of .gz files
87 void test_gzio(out, in, uncompr, uncomprLen)
88 const char *out; /* compressed output file */
89 const char *in; /* compressed input file */
90 Byte *uncompr;
91 int uncomprLen;
93 int err;
94 int len = strlen(hello)+1;
95 gzFile file;
96 z_off_t pos;
98 file = gzopen(out, "wb");
99 if (file == NULL) {
100 fprintf(stderr, "gzopen error\n");
101 exit(1);
103 gzputc(file, 'h');
104 if (gzputs(file, "ello") != 4) {
105 fprintf(stderr, "gzputs err: %s\n", gzerror(file, &err));
106 exit(1);
108 if (gzprintf(file, ", %s!", "hello") != 8) {
109 fprintf(stderr, "gzprintf err: %s\n", gzerror(file, &err));
110 exit(1);
112 gzseek(file, 1L, SEEK_CUR); /* add one zero byte */
113 gzclose(file);
115 file = gzopen(in, "rb");
116 if (file == NULL) {
117 fprintf(stderr, "gzopen error\n");
119 strcpy((char*)uncompr, "garbage");
121 uncomprLen = gzread(file, uncompr, (unsigned)uncomprLen);
122 if (uncomprLen != len) {
123 fprintf(stderr, "gzread err: %s\n", gzerror(file, &err));
124 exit(1);
126 if (strcmp((char*)uncompr, hello)) {
127 fprintf(stderr, "bad gzread: %s\n", (char*)uncompr);
128 exit(1);
129 } else {
130 printf("gzread(): %s\n", (char *)uncompr);
133 pos = gzseek(file, -8L, SEEK_CUR);
134 if (pos != 6 || gztell(file) != pos) {
135 fprintf(stderr, "gzseek error, pos=%ld, gztell=%ld\n",
136 (long)pos, (long)gztell(file));
137 exit(1);
140 if (gzgetc(file) != ' ') {
141 fprintf(stderr, "gzgetc error\n");
142 exit(1);
145 gzgets(file, (char*)uncompr, uncomprLen);
146 uncomprLen = strlen((char*)uncompr);
147 if (uncomprLen != 6) { /* "hello!" */
148 fprintf(stderr, "gzgets err after gzseek: %s\n", gzerror(file, &err));
149 exit(1);
151 if (strcmp((char*)uncompr, hello+7)) {
152 fprintf(stderr, "bad gzgets after gzseek\n");
153 exit(1);
154 } else {
155 printf("gzgets() after gzseek: %s\n", (char *)uncompr);
158 gzclose(file);
161 /* ===========================================================================
162 * Test deflate() with small buffers
164 void test_deflate(compr, comprLen)
165 Byte *compr;
166 uLong comprLen;
168 z_stream c_stream; /* compression stream */
169 int err;
170 int len = strlen(hello)+1;
172 c_stream.zalloc = (alloc_func)0;
173 c_stream.zfree = (free_func)0;
174 c_stream.opaque = (voidpf)0;
176 err = deflateInit(&c_stream, Z_DEFAULT_COMPRESSION);
177 CHECK_ERR(err, "deflateInit");
179 c_stream.next_in = (Bytef*)hello;
180 c_stream.next_out = compr;
182 while (c_stream.total_in != (uLong)len && c_stream.total_out < comprLen) {
183 c_stream.avail_in = c_stream.avail_out = 1; /* force small buffers */
184 err = deflate(&c_stream, Z_NO_FLUSH);
185 CHECK_ERR(err, "deflate");
187 /* Finish the stream, still forcing small buffers: */
188 for (;;) {
189 c_stream.avail_out = 1;
190 err = deflate(&c_stream, Z_FINISH);
191 if (err == Z_STREAM_END) break;
192 CHECK_ERR(err, "deflate");
195 err = deflateEnd(&c_stream);
196 CHECK_ERR(err, "deflateEnd");
199 /* ===========================================================================
200 * Test inflate() with small buffers
202 void test_inflate(compr, comprLen, uncompr, uncomprLen)
203 Byte *compr, *uncompr;
204 uLong comprLen, uncomprLen;
206 int err;
207 z_stream d_stream; /* decompression stream */
209 strcpy((char*)uncompr, "garbage");
211 d_stream.zalloc = (alloc_func)0;
212 d_stream.zfree = (free_func)0;
213 d_stream.opaque = (voidpf)0;
215 d_stream.next_in = compr;
216 d_stream.avail_in = 0;
217 d_stream.next_out = uncompr;
219 err = inflateInit(&d_stream);
220 CHECK_ERR(err, "inflateInit");
222 while (d_stream.total_out < uncomprLen && d_stream.total_in < comprLen) {
223 d_stream.avail_in = d_stream.avail_out = 1; /* force small buffers */
224 err = inflate(&d_stream, Z_NO_FLUSH);
225 if (err == Z_STREAM_END) break;
226 CHECK_ERR(err, "inflate");
229 err = inflateEnd(&d_stream);
230 CHECK_ERR(err, "inflateEnd");
232 if (strcmp((char*)uncompr, hello)) {
233 fprintf(stderr, "bad inflate\n");
234 exit(1);
235 } else {
236 printf("inflate(): %s\n", (char *)uncompr);
240 /* ===========================================================================
241 * Test deflate() with large buffers and dynamic change of compression level
243 void test_large_deflate(compr, comprLen, uncompr, uncomprLen)
244 Byte *compr, *uncompr;
245 uLong comprLen, uncomprLen;
247 z_stream c_stream; /* compression stream */
248 int err;
250 c_stream.zalloc = (alloc_func)0;
251 c_stream.zfree = (free_func)0;
252 c_stream.opaque = (voidpf)0;
254 err = deflateInit(&c_stream, Z_BEST_SPEED);
255 CHECK_ERR(err, "deflateInit");
257 c_stream.next_out = compr;
258 c_stream.avail_out = (uInt)comprLen;
260 /* At this point, uncompr is still mostly zeroes, so it should compress
261 * very well:
263 c_stream.next_in = uncompr;
264 c_stream.avail_in = (uInt)uncomprLen;
265 err = deflate(&c_stream, Z_NO_FLUSH);
266 CHECK_ERR(err, "deflate");
267 if (c_stream.avail_in != 0) {
268 fprintf(stderr, "deflate not greedy\n");
269 exit(1);
272 /* Feed in already compressed data and switch to no compression: */
273 deflateParams(&c_stream, Z_NO_COMPRESSION, Z_DEFAULT_STRATEGY);
274 c_stream.next_in = compr;
275 c_stream.avail_in = (uInt)comprLen/2;
276 err = deflate(&c_stream, Z_NO_FLUSH);
277 CHECK_ERR(err, "deflate");
279 /* Switch back to compressing mode: */
280 deflateParams(&c_stream, Z_BEST_COMPRESSION, Z_FILTERED);
281 c_stream.next_in = uncompr;
282 c_stream.avail_in = (uInt)uncomprLen;
283 err = deflate(&c_stream, Z_NO_FLUSH);
284 CHECK_ERR(err, "deflate");
286 err = deflate(&c_stream, Z_FINISH);
287 if (err != Z_STREAM_END) {
288 fprintf(stderr, "deflate should report Z_STREAM_END\n");
289 exit(1);
291 err = deflateEnd(&c_stream);
292 CHECK_ERR(err, "deflateEnd");
295 /* ===========================================================================
296 * Test inflate() with large buffers
298 void test_large_inflate(compr, comprLen, uncompr, uncomprLen)
299 Byte *compr, *uncompr;
300 uLong comprLen, uncomprLen;
302 int err;
303 z_stream d_stream; /* decompression stream */
305 strcpy((char*)uncompr, "garbage");
307 d_stream.zalloc = (alloc_func)0;
308 d_stream.zfree = (free_func)0;
309 d_stream.opaque = (voidpf)0;
311 d_stream.next_in = compr;
312 d_stream.avail_in = (uInt)comprLen;
314 err = inflateInit(&d_stream);
315 CHECK_ERR(err, "inflateInit");
317 for (;;) {
318 d_stream.next_out = uncompr; /* discard the output */
319 d_stream.avail_out = (uInt)uncomprLen;
320 err = inflate(&d_stream, Z_NO_FLUSH);
321 if (err == Z_STREAM_END) break;
322 CHECK_ERR(err, "large inflate");
325 err = inflateEnd(&d_stream);
326 CHECK_ERR(err, "inflateEnd");
328 if (d_stream.total_out != 2*uncomprLen + comprLen/2) {
329 fprintf(stderr, "bad large inflate: %ld\n", d_stream.total_out);
330 exit(1);
331 } else {
332 printf("large_inflate(): OK\n");
336 /* ===========================================================================
337 * Test deflate() with full flush
339 void test_flush(compr, comprLen)
340 Byte *compr;
341 uLong *comprLen;
343 z_stream c_stream; /* compression stream */
344 int err;
345 int len = strlen(hello)+1;
347 c_stream.zalloc = (alloc_func)0;
348 c_stream.zfree = (free_func)0;
349 c_stream.opaque = (voidpf)0;
351 err = deflateInit(&c_stream, Z_DEFAULT_COMPRESSION);
352 CHECK_ERR(err, "deflateInit");
354 c_stream.next_in = (Bytef*)hello;
355 c_stream.next_out = compr;
356 c_stream.avail_in = 3;
357 c_stream.avail_out = (uInt)*comprLen;
358 err = deflate(&c_stream, Z_FULL_FLUSH);
359 CHECK_ERR(err, "deflate");
361 compr[3]++; /* force an error in first compressed block */
362 c_stream.avail_in = len - 3;
364 err = deflate(&c_stream, Z_FINISH);
365 if (err != Z_STREAM_END) {
366 CHECK_ERR(err, "deflate");
368 err = deflateEnd(&c_stream);
369 CHECK_ERR(err, "deflateEnd");
371 *comprLen = c_stream.total_out;
374 /* ===========================================================================
375 * Test inflateSync()
377 void test_sync(compr, comprLen, uncompr, uncomprLen)
378 Byte *compr, *uncompr;
379 uLong comprLen, uncomprLen;
381 int err;
382 z_stream d_stream; /* decompression stream */
384 strcpy((char*)uncompr, "garbage");
386 d_stream.zalloc = (alloc_func)0;
387 d_stream.zfree = (free_func)0;
388 d_stream.opaque = (voidpf)0;
390 d_stream.next_in = compr;
391 d_stream.avail_in = 2; /* just read the zlib header */
393 err = inflateInit(&d_stream);
394 CHECK_ERR(err, "inflateInit");
396 d_stream.next_out = uncompr;
397 d_stream.avail_out = (uInt)uncomprLen;
399 inflate(&d_stream, Z_NO_FLUSH);
400 CHECK_ERR(err, "inflate");
402 d_stream.avail_in = (uInt)comprLen-2; /* read all compressed data */
403 err = inflateSync(&d_stream); /* but skip the damaged part */
404 CHECK_ERR(err, "inflateSync");
406 err = inflate(&d_stream, Z_FINISH);
407 if (err != Z_DATA_ERROR) {
408 fprintf(stderr, "inflate should report DATA_ERROR\n");
409 /* Because of incorrect adler32 */
410 exit(1);
412 err = inflateEnd(&d_stream);
413 CHECK_ERR(err, "inflateEnd");
415 printf("after inflateSync(): hel%s\n", (char *)uncompr);
418 /* ===========================================================================
419 * Test deflate() with preset dictionary
421 void test_dict_deflate(compr, comprLen)
422 Byte *compr;
423 uLong comprLen;
425 z_stream c_stream; /* compression stream */
426 int err;
428 c_stream.zalloc = (alloc_func)0;
429 c_stream.zfree = (free_func)0;
430 c_stream.opaque = (voidpf)0;
432 err = deflateInit(&c_stream, Z_BEST_COMPRESSION);
433 CHECK_ERR(err, "deflateInit");
435 err = deflateSetDictionary(&c_stream,
436 (const Bytef*)dictionary, sizeof(dictionary));
437 CHECK_ERR(err, "deflateSetDictionary");
439 dictId = c_stream.adler;
440 c_stream.next_out = compr;
441 c_stream.avail_out = (uInt)comprLen;
443 c_stream.next_in = (Bytef*)hello;
444 c_stream.avail_in = (uInt)strlen(hello)+1;
446 err = deflate(&c_stream, Z_FINISH);
447 if (err != Z_STREAM_END) {
448 fprintf(stderr, "deflate should report Z_STREAM_END\n");
449 exit(1);
451 err = deflateEnd(&c_stream);
452 CHECK_ERR(err, "deflateEnd");
455 /* ===========================================================================
456 * Test inflate() with a preset dictionary
458 void test_dict_inflate(compr, comprLen, uncompr, uncomprLen)
459 Byte *compr, *uncompr;
460 uLong comprLen, uncomprLen;
462 int err;
463 z_stream d_stream; /* decompression stream */
465 strcpy((char*)uncompr, "garbage");
467 d_stream.zalloc = (alloc_func)0;
468 d_stream.zfree = (free_func)0;
469 d_stream.opaque = (voidpf)0;
471 d_stream.next_in = compr;
472 d_stream.avail_in = (uInt)comprLen;
474 err = inflateInit(&d_stream);
475 CHECK_ERR(err, "inflateInit");
477 d_stream.next_out = uncompr;
478 d_stream.avail_out = (uInt)uncomprLen;
480 for (;;) {
481 err = inflate(&d_stream, Z_NO_FLUSH);
482 if (err == Z_STREAM_END) break;
483 if (err == Z_NEED_DICT) {
484 if (d_stream.adler != dictId) {
485 fprintf(stderr, "unexpected dictionary");
486 exit(1);
488 err = inflateSetDictionary(&d_stream, (const Bytef*)dictionary,
489 sizeof(dictionary));
491 CHECK_ERR(err, "inflate with dict");
494 err = inflateEnd(&d_stream);
495 CHECK_ERR(err, "inflateEnd");
497 if (strcmp((char*)uncompr, hello)) {
498 fprintf(stderr, "bad inflate with dict\n");
499 exit(1);
500 } else {
501 printf("inflate with dictionary: %s\n", (char *)uncompr);
505 /* ===========================================================================
506 * Usage: example [output.gz [input.gz]]
509 int main(argc, argv)
510 int argc;
511 char *argv[];
513 Byte *compr, *uncompr;
514 uLong comprLen = 10000*sizeof(int); /* don't overflow on MSDOS */
515 uLong uncomprLen = comprLen;
516 static const char* myVersion = ZLIB_VERSION;
518 if (zlibVersion()[0] != myVersion[0]) {
519 fprintf(stderr, "incompatible zlib version\n");
520 exit(1);
522 } else if (strcmp(zlibVersion(), ZLIB_VERSION) != 0) {
523 fprintf(stderr, "warning: different zlib version\n");
526 compr = (Byte*)calloc((uInt)comprLen, 1);
527 uncompr = (Byte*)calloc((uInt)uncomprLen, 1);
528 /* compr and uncompr are cleared to avoid reading uninitialized
529 * data and to ensure that uncompr compresses well.
531 if (compr == Z_NULL || uncompr == Z_NULL) {
532 printf("out of memory\n");
533 exit(1);
535 test_compress(compr, comprLen, uncompr, uncomprLen);
537 test_gzio((argc > 1 ? argv[1] : TESTFILE),
538 (argc > 2 ? argv[2] : TESTFILE),
539 uncompr, (int)uncomprLen);
541 test_deflate(compr, comprLen);
542 test_inflate(compr, comprLen, uncompr, uncomprLen);
544 test_large_deflate(compr, comprLen, uncompr, uncomprLen);
545 test_large_inflate(compr, comprLen, uncompr, uncomprLen);
547 test_flush(compr, &comprLen);
548 test_sync(compr, comprLen, uncompr, uncomprLen);
549 comprLen = uncomprLen;
551 test_dict_deflate(compr, comprLen);
552 test_dict_inflate(compr, comprLen, uncompr, uncomprLen);
554 exit(0);
555 return 0; /* to avoid warning */