|
111
|
1 * ZLIB.INC - Interface to the general purpose compression library
|
|
|
2 *
|
|
|
3 * ILE RPG400 version by Patrick Monnerat, DATASPHERE.
|
|
|
4 * Version 1.2.11
|
|
|
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 *
|
|
|
25 D ZLIB_VERSION C '1.2.11'
|
|
|
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...
|
|
|
30 D C 11
|
|
|
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
|
