Annotation of src/external/gpl3/binutils/dist/zlib/os400/zlib.inc, Revision 1.1.1.2
1.1 christos 1: * ZLIB.INC - Interface to the general purpose compression library
2: *
3: * ILE RPG400 version by Patrick Monnerat, DATASPHERE.
1.1.1.2 ! christos 4: * Version 1.2.12
1.1 christos 5: *
6: *
7: * WARNING:
8: * Procedures inflateInit(), inflateInit2(), deflateInit(),
9: * deflateInit2() and inflateBackInit() need to be called with
10: * two additional arguments:
11: * the package version string and the stream control structure.
12: * size. This is needed because RPG lacks some macro feature.
13: * Call these procedures as:
14: * inflateInit(...: ZLIB_VERSION: %size(z_stream))
15: *
16: /if not defined(ZLIB_H_)
17: /define ZLIB_H_
18: *
19: **************************************************************************
20: * Constants
21: **************************************************************************
22: *
23: * Versioning information.
24: *
1.1.1.2 ! christos 25: D ZLIB_VERSION C '1.2.12'
1.1 christos 26: D ZLIB_VERNUM C X'12a0'
27: D ZLIB_VER_MAJOR C 1
28: D ZLIB_VER_MINOR C 2
29: D ZLIB_VER_REVISION...
1.1.1.2 ! christos 30: D C 12
1.1 christos 31: D ZLIB_VER_SUBREVISION...
32: D C 0
33: *
34: * Other equates.
35: *
36: D Z_NO_FLUSH C 0
37: D Z_PARTIAL_FLUSH...
38: D C 1
39: D Z_SYNC_FLUSH C 2
40: D Z_FULL_FLUSH C 3
41: D Z_FINISH C 4
42: D Z_BLOCK C 5
43: D Z_TREES C 6
44: *
45: D Z_OK C 0
46: D Z_STREAM_END C 1
47: D Z_NEED_DICT C 2
48: D Z_ERRNO C -1
49: D Z_STREAM_ERROR C -2
50: D Z_DATA_ERROR C -3
51: D Z_MEM_ERROR C -4
52: D Z_BUF_ERROR C -5
53: D Z_VERSION_ERROR C -6
54: *
55: D Z_NO_COMPRESSION...
56: D C 0
57: D Z_BEST_SPEED C 1
58: D Z_BEST_COMPRESSION...
59: D C 9
60: D Z_DEFAULT_COMPRESSION...
61: D C -1
62: *
63: D Z_FILTERED C 1
64: D Z_HUFFMAN_ONLY C 2
65: D Z_RLE C 3
66: D Z_DEFAULT_STRATEGY...
67: D C 0
68: *
69: D Z_BINARY C 0
70: D Z_ASCII C 1
71: D Z_UNKNOWN C 2
72: *
73: D Z_DEFLATED C 8
74: *
75: D Z_NULL C 0
76: *
77: **************************************************************************
78: * Types
79: **************************************************************************
80: *
81: D z_streamp S * Stream struct ptr
82: D gzFile S * File pointer
83: D gz_headerp S *
84: D z_off_t S 10i 0 Stream offsets
85: D z_off64_t S 20i 0 Stream offsets
86: *
87: **************************************************************************
88: * Structures
89: **************************************************************************
90: *
91: * The GZIP encode/decode stream support structure.
92: *
93: D z_stream DS align based(z_streamp)
94: D zs_next_in * Next input byte
95: D zs_avail_in 10U 0 Byte cnt at next_in
96: D zs_total_in 10U 0 Total bytes read
97: D zs_next_out * Output buffer ptr
98: D zs_avail_out 10U 0 Room left @ next_out
99: D zs_total_out 10U 0 Total bytes written
100: D zs_msg * Last errmsg or null
101: D zs_state * Internal state
102: D zs_zalloc * procptr Int. state allocator
103: D zs_free * procptr Int. state dealloc.
104: D zs_opaque * Private alloc. data
105: D zs_data_type 10i 0 ASC/BIN best guess
106: D zs_adler 10u 0 Uncompr. adler32 val
107: D 10U 0 Reserved
108: D 10U 0 Ptr. alignment
109: *
110: **************************************************************************
111: * Utility function prototypes
112: **************************************************************************
113: *
114: D compress PR 10I 0 extproc('compress')
115: D dest 65535 options(*varsize) Destination buffer
116: D destLen 10U 0 Destination length
117: D source 65535 const options(*varsize) Source buffer
118: D sourceLen 10u 0 value Source length
119: *
120: D compress2 PR 10I 0 extproc('compress2')
121: D dest 65535 options(*varsize) Destination buffer
122: D destLen 10U 0 Destination length
123: D source 65535 const options(*varsize) Source buffer
124: D sourceLen 10U 0 value Source length
125: D level 10I 0 value Compression level
126: *
127: D compressBound PR 10U 0 extproc('compressBound')
128: D sourceLen 10U 0 value
129: *
130: D uncompress PR 10I 0 extproc('uncompress')
131: D dest 65535 options(*varsize) Destination buffer
132: D destLen 10U 0 Destination length
133: D source 65535 const options(*varsize) Source buffer
134: D sourceLen 10U 0 value Source length
135: *
136: D uncompress2 PR 10I 0 extproc('uncompress2')
137: D dest 65535 options(*varsize) Destination buffer
138: D destLen 10U 0 Destination length
139: D source 65535 const options(*varsize) Source buffer
140: D sourceLen 10U 0 Source length
141: *
142: /if not defined(LARGE_FILES)
143: D gzopen PR extproc('gzopen')
144: D like(gzFile)
145: D path * value options(*string) File pathname
146: D mode * value options(*string) Open mode
147: /else
148: D gzopen PR extproc('gzopen64')
149: D like(gzFile)
150: D path * value options(*string) File pathname
151: D mode * value options(*string) Open mode
152: *
153: D gzopen64 PR extproc('gzopen64')
154: D like(gzFile)
155: D path * value options(*string) File pathname
156: D mode * value options(*string) Open mode
157: /endif
158: *
159: D gzdopen PR extproc('gzdopen')
160: D like(gzFile)
161: D fd 10I 0 value File descriptor
162: D mode * value options(*string) Open mode
163: *
164: D gzbuffer PR 10I 0 extproc('gzbuffer')
165: D file value like(gzFile) File pointer
166: D size 10U 0 value
167: *
168: D gzsetparams PR 10I 0 extproc('gzsetparams')
169: D file value like(gzFile) File pointer
170: D level 10I 0 value
171: D strategy 10I 0 value
172: *
173: D gzread PR 10I 0 extproc('gzread')
174: D file value like(gzFile) File pointer
175: D buf 65535 options(*varsize) Buffer
176: D len 10u 0 value Buffer length
177: *
178: D gzfread PR 20I 0 extproc('gzfread')
179: D buf 65535 options(*varsize) Buffer
180: D size 20u 0 value Buffer length
181: D nitems 20u 0 value Buffer length
182: D file value like(gzFile) File pointer
183: *
184: D gzwrite PR 10I 0 extproc('gzwrite')
185: D file value like(gzFile) File pointer
186: D buf 65535 const options(*varsize) Buffer
187: D len 10u 0 value Buffer length
188: *
189: D gzfwrite PR 20I 0 extproc('gzfwrite')
190: D buf 65535 options(*varsize) Buffer
191: D size 20u 0 value Buffer length
192: D nitems 20u 0 value Buffer length
193: D file value like(gzFile) File pointer
194: *
195: D gzputs PR 10I 0 extproc('gzputs')
196: D file value like(gzFile) File pointer
197: D s * value options(*string) String to output
198: *
199: D gzgets PR * extproc('gzgets')
200: D file value like(gzFile) File pointer
201: D buf 65535 options(*varsize) Read buffer
202: D len 10i 0 value Buffer length
203: *
204: D gzputc PR 10i 0 extproc('gzputc')
205: D file value like(gzFile) File pointer
206: D c 10I 0 value Character to write
207: *
208: D gzgetc PR 10i 0 extproc('gzgetc')
209: D file value like(gzFile) File pointer
210: *
211: D gzgetc_ PR 10i 0 extproc('gzgetc_')
212: D file value like(gzFile) File pointer
213: *
214: D gzungetc PR 10i 0 extproc('gzungetc')
215: D c 10I 0 value Character to push
216: D file value like(gzFile) File pointer
217: *
218: D gzflush PR 10i 0 extproc('gzflush')
219: D file value like(gzFile) File pointer
220: D flush 10I 0 value Type of flush
221: *
222: /if not defined(LARGE_FILES)
223: D gzseek PR extproc('gzseek')
224: D like(z_off_t)
225: D file value like(gzFile) File pointer
226: D offset value like(z_off_t) Offset
227: D whence 10i 0 value Origin
228: /else
229: D gzseek PR extproc('gzseek64')
230: D like(z_off_t)
231: D file value like(gzFile) File pointer
232: D offset value like(z_off_t) Offset
233: D whence 10i 0 value Origin
234: *
235: D gzseek64 PR extproc('gzseek64')
236: D like(z_off64_t)
237: D file value like(gzFile) File pointer
238: D offset value like(z_off64_t) Offset
239: D whence 10i 0 value Origin
240: /endif
241: *
242: D gzrewind PR 10i 0 extproc('gzrewind')
243: D file value like(gzFile) File pointer
244: *
245: /if not defined(LARGE_FILES)
246: D gztell PR extproc('gztell')
247: D like(z_off_t)
248: D file value like(gzFile) File pointer
249: /else
250: D gztell PR extproc('gztell64')
251: D like(z_off_t)
252: D file value like(gzFile) File pointer
253: *
254: D gztell64 PR extproc('gztell64')
255: D like(z_off64_t)
256: D file value like(gzFile) File pointer
257: /endif
258: *
259: /if not defined(LARGE_FILES)
260: D gzoffset PR extproc('gzoffset')
261: D like(z_off_t)
262: D file value like(gzFile) File pointer
263: /else
264: D gzoffset PR extproc('gzoffset64')
265: D like(z_off_t)
266: D file value like(gzFile) File pointer
267: *
268: D gzoffset64 PR extproc('gzoffset64')
269: D like(z_off64_t)
270: D file value like(gzFile) File pointer
271: /endif
272: *
273: D gzeof PR 10i 0 extproc('gzeof')
274: D file value like(gzFile) File pointer
275: *
276: D gzdirect PR 10i 0 extproc('gzdirect')
277: D file value like(gzFile) File pointer
278: *
279: D gzclose_r PR 10i 0 extproc('gzclose_r')
280: D file value like(gzFile) File pointer
281: *
282: D gzclose_w PR 10i 0 extproc('gzclose_w')
283: D file value like(gzFile) File pointer
284: *
285: D gzclose PR 10i 0 extproc('gzclose')
286: D file value like(gzFile) File pointer
287: *
288: D gzerror PR * extproc('gzerror') Error string
289: D file value like(gzFile) File pointer
290: D errnum 10I 0 Error code
291: *
292: D gzclearerr PR extproc('gzclearerr')
293: D file value like(gzFile) File pointer
294: *
295: **************************************************************************
296: * Basic function prototypes
297: **************************************************************************
298: *
299: D zlibVersion PR * extproc('zlibVersion') Version string
300: *
301: D deflateInit PR 10I 0 extproc('deflateInit_') Init. compression
302: D strm like(z_stream) Compression stream
303: D level 10I 0 value Compression level
304: D version * value options(*string) Version string
305: D stream_size 10i 0 value Stream struct. size
306: *
307: D deflate PR 10I 0 extproc('deflate') Compress data
308: D strm like(z_stream) Compression stream
309: D flush 10I 0 value Flush type required
310: *
311: D deflateEnd PR 10I 0 extproc('deflateEnd') Termin. compression
312: D strm like(z_stream) Compression stream
313: *
314: D inflateInit PR 10I 0 extproc('inflateInit_') Init. expansion
315: D strm like(z_stream) Expansion stream
316: D version * value options(*string) Version string
317: D stream_size 10i 0 value Stream struct. size
318: *
319: D inflate PR 10I 0 extproc('inflate') Expand data
320: D strm like(z_stream) Expansion stream
321: D flush 10I 0 value Flush type required
322: *
323: D inflateEnd PR 10I 0 extproc('inflateEnd') Termin. expansion
324: D strm like(z_stream) Expansion stream
325: *
326: **************************************************************************
327: * Advanced function prototypes
328: **************************************************************************
329: *
330: D deflateInit2 PR 10I 0 extproc('deflateInit2_') Init. compression
331: D strm like(z_stream) Compression stream
332: D level 10I 0 value Compression level
333: D method 10I 0 value Compression method
334: D windowBits 10I 0 value log2(window size)
335: D memLevel 10I 0 value Mem/cmpress tradeoff
336: D strategy 10I 0 value Compression strategy
337: D version * value options(*string) Version string
338: D stream_size 10i 0 value Stream struct. size
339: *
340: D deflateSetDictionary...
341: D PR 10I 0 extproc('deflateSetDictionary') Init. dictionary
342: D strm like(z_stream) Compression stream
343: D dictionary 65535 const options(*varsize) Dictionary bytes
344: D dictLength 10U 0 value Dictionary length
345: *
346: D deflateCopy PR 10I 0 extproc('deflateCopy') Compress strm 2 strm
347: D dest like(z_stream) Destination stream
348: D source like(z_stream) Source stream
349: *
350: D deflateReset PR 10I 0 extproc('deflateReset') End and init. stream
351: D strm like(z_stream) Compression stream
352: *
353: D deflateParams PR 10I 0 extproc('deflateParams') Change level & strat
354: D strm like(z_stream) Compression stream
355: D level 10I 0 value Compression level
356: D strategy 10I 0 value Compression strategy
357: *
358: D deflateTune PR 10I 0 extproc('deflateTune')
359: D strm like(z_stream) Compression stream
360: D good 10I 0 value
361: D lazy 10I 0 value
362: D nice 10I 0 value
363: D chain 10I 0 value
364: *
365: D deflateBound PR 10U 0 extproc('deflateBound') Change level & strat
366: D strm like(z_stream) Compression stream
367: D sourcelen 10U 0 value Compression level
368: *
369: D deflatePending PR 10I 0 extproc('deflatePending') Change level & strat
370: D strm like(z_stream) Compression stream
371: D pending 10U 0 Pending bytes
372: D bits 10I 0 Pending bits
373: *
374: D deflatePrime PR 10I 0 extproc('deflatePrime') Change level & strat
375: D strm like(z_stream) Compression stream
376: D bits 10I 0 value # of bits to insert
377: D value 10I 0 value Bits to insert
378: *
379: D inflateInit2 PR 10I 0 extproc('inflateInit2_') Init. expansion
380: D strm like(z_stream) Expansion stream
381: D windowBits 10I 0 value log2(window size)
382: D version * value options(*string) Version string
383: D stream_size 10i 0 value Stream struct. size
384: *
385: D inflateSetDictionary...
386: D PR 10I 0 extproc('inflateSetDictionary') Init. dictionary
387: D strm like(z_stream) Expansion stream
388: D dictionary 65535 const options(*varsize) Dictionary bytes
389: D dictLength 10U 0 value Dictionary length
390: *
391: D inflateGetDictionary...
392: D PR 10I 0 extproc('inflateGetDictionary') Get dictionary
393: D strm like(z_stream) Expansion stream
394: D dictionary 65535 options(*varsize) Dictionary bytes
395: D dictLength 10U 0 Dictionary length
396: *
397: D deflateGetDictionary...
398: D PR 10I 0 extproc('deflateGetDictionary') Get dictionary
399: D strm like(z_stream) Expansion stream
400: D dictionary 65535 options(*varsize) Dictionary bytes
401: D dictLength 10U 0 Dictionary length
402: *
403: D inflateSync PR 10I 0 extproc('inflateSync') Sync. expansion
404: D strm like(z_stream) Expansion stream
405: *
406: D inflateCopy PR 10I 0 extproc('inflateCopy')
407: D dest like(z_stream) Destination stream
408: D source like(z_stream) Source stream
409: *
410: D inflateReset PR 10I 0 extproc('inflateReset') End and init. stream
411: D strm like(z_stream) Expansion stream
412: *
413: D inflateReset2 PR 10I 0 extproc('inflateReset2') End and init. stream
414: D strm like(z_stream) Expansion stream
415: D windowBits 10I 0 value Log2(buffer size)
416: *
417: D inflatePrime PR 10I 0 extproc('inflatePrime') Insert bits
418: D strm like(z_stream) Expansion stream
419: D bits 10I 0 value Bit count
420: D value 10I 0 value Bits to insert
421: *
422: D inflateMark PR 10I 0 extproc('inflateMark') Get inflate info
423: D strm like(z_stream) Expansion stream
424: *
425: D inflateCodesUsed...
426: PR 20U 0 extproc('inflateCodesUsed')
427: D strm like(z_stream) Expansion stream
428: *
429: D inflateValidate...
430: PR 20U 0 extproc('inflateValidate')
431: D strm like(z_stream) Expansion stream
432: D check 10I 0 value
433: *
434: D inflateGetHeader...
435: PR 10U 0 extproc('inflateGetHeader')
436: D strm like(z_stream) Expansion stream
437: D head like(gz_headerp)
438: *
439: D deflateSetHeader...
440: PR 10U 0 extproc('deflateSetHeader')
441: D strm like(z_stream) Expansion stream
442: D head like(gz_headerp)
443: *
444: D inflateBackInit...
445: D PR 10I 0 extproc('inflateBackInit_')
446: D strm like(z_stream) Expansion stream
447: D windowBits 10I 0 value Log2(buffer size)
448: D window 65535 options(*varsize) Buffer
449: D version * value options(*string) Version string
450: D stream_size 10i 0 value Stream struct. size
451: *
452: D inflateBack PR 10I 0 extproc('inflateBack')
453: D strm like(z_stream) Expansion stream
454: D in * value procptr Input function
455: D in_desc * value Input descriptor
456: D out * value procptr Output function
457: D out_desc * value Output descriptor
458: *
459: D inflateBackEnd PR 10I 0 extproc('inflateBackEnd')
460: D strm like(z_stream) Expansion stream
461: *
462: D zlibCompileFlags...
463: D PR 10U 0 extproc('zlibCompileFlags')
464: *
465: **************************************************************************
466: * Checksum function prototypes
467: **************************************************************************
468: *
469: D adler32 PR 10U 0 extproc('adler32') New checksum
470: D adler 10U 0 value Old checksum
471: D buf 65535 const options(*varsize) Bytes to accumulate
472: D len 10U 0 value Buffer length
473: *
474: D adler32_combine...
475: PR 10U 0 extproc('adler32_combine') New checksum
476: D adler1 10U 0 value Old checksum
477: D adler2 10U 0 value Old checksum
478: D len2 20U 0 value Buffer length
479: *
480: D adler32_z PR 10U 0 extproc('adler32_z') New checksum
481: D adler 10U 0 value Old checksum
482: D buf 65535 const options(*varsize) Bytes to accumulate
483: D len 20U 0 value Buffer length
484: *
485: D crc32 PR 10U 0 extproc('crc32') New checksum
486: D crc 10U 0 value Old checksum
487: D buf 65535 const options(*varsize) Bytes to accumulate
488: D len 10U 0 value Buffer length
489: *
490: D crc32_combine...
491: PR 10U 0 extproc('crc32_combine') New checksum
492: D crc1 10U 0 value Old checksum
493: D crc2 10U 0 value Old checksum
494: D len2 20U 0 value Buffer length
495: *
496: D crc32_z PR 10U 0 extproc('crc32_z') New checksum
497: D crc 10U 0 value Old checksum
498: D buf 65535 const options(*varsize) Bytes to accumulate
499: D len 20U 0 value Buffer length
500: *
501: **************************************************************************
502: * Miscellaneous function prototypes
503: **************************************************************************
504: *
505: D zError PR * extproc('zError') Error string
506: D err 10I 0 value Error code
507: *
508: D inflateSyncPoint...
509: D PR 10I 0 extproc('inflateSyncPoint')
510: D strm like(z_stream) Expansion stream
511: *
512: D get_crc_table PR * extproc('get_crc_table') Ptr to ulongs
513: *
514: D inflateUndermine...
515: D PR 10I 0 extproc('inflateUndermine')
516: D strm like(z_stream) Expansion stream
517: D arg 10I 0 value Error code
518: *
519: D inflateResetKeep...
520: D PR 10I 0 extproc('inflateResetKeep') End and init. stream
521: D strm like(z_stream) Expansion stream
522: *
523: D deflateResetKeep...
524: D PR 10I 0 extproc('deflateResetKeep') End and init. stream
525: D strm like(z_stream) Expansion stream
526: *
527: /endif
CVSweb <webmaster@jp.NetBSD.org>