aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--as400/bndsrc27
-rw-r--r--as400/readme.txt4
-rw-r--r--as400/zlib.inc32
3 files changed, 41 insertions, 22 deletions
diff --git a/as400/bndsrc b/as400/bndsrc
index a7df67b..d048dbb 100644
--- a/as400/bndsrc
+++ b/as400/bndsrc
@@ -33,9 +33,7 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB')
33 EXPORT SYMBOL("deflateSetDictionary") 33 EXPORT SYMBOL("deflateSetDictionary")
34 EXPORT SYMBOL("deflateCopy") 34 EXPORT SYMBOL("deflateCopy")
35 EXPORT SYMBOL("deflateReset") 35 EXPORT SYMBOL("deflateReset")
36 EXPORT SYMBOL("deflateResetKeep")
37 EXPORT SYMBOL("deflateParams") 36 EXPORT SYMBOL("deflateParams")
38 EXPORT SYMBOL("deflatePending")
39 EXPORT SYMBOL("deflatePrime") 37 EXPORT SYMBOL("deflatePrime")
40 EXPORT SYMBOL("deflateInit_") 38 EXPORT SYMBOL("deflateInit_")
41 EXPORT SYMBOL("deflateInit2_") 39 EXPORT SYMBOL("deflateInit2_")
@@ -171,8 +169,6 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB')
171/********************************************************************/ 169/********************************************************************/
172 170
173 EXPORT SYMBOL("gzclose_w") 171 EXPORT SYMBOL("gzclose_w")
174 EXPORT SYMBOL("gzgetc_")
175 EXPORT SYMBOL("gzflags")
176 172
177/********************************************************************/ 173/********************************************************************/
178/* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */ 174/* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */
@@ -182,6 +178,29 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB')
182 EXPORT SYMBOL("inflatePrime") 178 EXPORT SYMBOL("inflatePrime")
183 EXPORT SYMBOL("inflateReset2") 179 EXPORT SYMBOL("inflateReset2")
184 EXPORT SYMBOL("inflateUndermine") 180 EXPORT SYMBOL("inflateUndermine")
181
182/*@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*/
183/* Version 1.2.6 additional entry points. */
184/*@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*/
185
186/********************************************************************/
187/* *MODULE DEFLATE ZLIB 01/02/01 00:15:09 */
188/********************************************************************/
189
190 EXPORT SYMBOL("deflateResetKeep")
191 EXPORT SYMBOL("deflatePending")
192
193/********************************************************************/
194/* *MODULE GZWRITE ZLIB 01/02/01 00:15:09 */
195/********************************************************************/
196
197 EXPORT SYMBOL("gzgetc_")
198 EXPORT SYMBOL("gzflags")
199
200/********************************************************************/
201/* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */
202/********************************************************************/
203
185 EXPORT SYMBOL("inflateResetKeep") 204 EXPORT SYMBOL("inflateResetKeep")
186 205
187ENDPGMEXP 206ENDPGMEXP
diff --git a/as400/readme.txt b/as400/readme.txt
index c3690d7..7eb5e22 100644
--- a/as400/readme.txt
+++ b/as400/readme.txt
@@ -8,7 +8,7 @@ On the AS400:
8 8
9_ Create the ZLIB AS400 library: 9_ Create the ZLIB AS400 library:
10 10
11 CRTLIB LIB(ZLIB) TYPE(PROD) TEXT('ZLIB compression API library') 11 CRTLIB LIB(ZLIB) TYPE(*PROD) TEXT('ZLIB compression API library')
12 12
13_ Create a work save file, for example: 13_ Create a work save file, for example:
14 14
@@ -52,7 +52,7 @@ II) From the original source distribution:
52 52
531) On the AS400, create the source library: 531) On the AS400, create the source library:
54 54
55 CRTLIB LIB(ZLIB) TYPE(PROD) TEXT('ZLIB compression API library') 55 CRTLIB LIB(ZLIB) TYPE(*PROD) TEXT('ZLIB compression API library')
56 56
572) Create the source files: 572) Create the source files:
58 58
diff --git a/as400/zlib.inc b/as400/zlib.inc
index 20e3228..28fb6ae 100644
--- a/as400/zlib.inc
+++ b/as400/zlib.inc
@@ -29,7 +29,7 @@
29 D ZLIB_VER_REVISION... 29 D ZLIB_VER_REVISION...
30 D C 5 30 D C 5
31 D ZLIB_VER_SUBREVISION... 31 D ZLIB_VER_SUBREVISION...
32 D C 0 32 D C 3
33 * 33 *
34 * Other equates. 34 * Other equates.
35 * 35 *
@@ -111,15 +111,15 @@
111 ************************************************************************** 111 **************************************************************************
112 * 112 *
113 D compress PR 10I 0 extproc('compress') 113 D compress PR 10I 0 extproc('compress')
114 D dest 32767 options(*varsize) Destination buffer 114 D dest 65535 options(*varsize) Destination buffer
115 D destLen 10U 0 Destination length 115 D destLen 10U 0 Destination length
116 D source 32767 const options(*varsize) Source buffer 116 D source 65535 const options(*varsize) Source buffer
117 D sourceLen 10u 0 value Source length 117 D sourceLen 10u 0 value Source length
118 * 118 *
119 D compress2 PR 10I 0 extproc('compress2') 119 D compress2 PR 10I 0 extproc('compress2')
120 D dest 32767 options(*varsize) Destination buffer 120 D dest 65535 options(*varsize) Destination buffer
121 D destLen 10U 0 Destination length 121 D destLen 10U 0 Destination length
122 D source 32767 const options(*varsize) Source buffer 122 D source 65535 const options(*varsize) Source buffer
123 D sourceLen 10U 0 value Source length 123 D sourceLen 10U 0 value Source length
124 D level 10I 0 value Compression level 124 D level 10I 0 value Compression level
125 * 125 *
@@ -127,9 +127,9 @@
127 D sourceLen 10U 0 value 127 D sourceLen 10U 0 value
128 * 128 *
129 D uncompress PR 10I 0 extproc('uncompress') 129 D uncompress PR 10I 0 extproc('uncompress')
130 D dest 32767 options(*varsize) Destination buffer 130 D dest 65535 options(*varsize) Destination buffer
131 D destLen 10U 0 Destination length 131 D destLen 10U 0 Destination length
132 D source 32767 const options(*varsize) Source buffer 132 D source 65535 const options(*varsize) Source buffer
133 D sourceLen 10U 0 value Source length 133 D sourceLen 10U 0 value Source length
134 * 134 *
135 /if not defined(LARGE_FILES) 135 /if not defined(LARGE_FILES)
@@ -165,12 +165,12 @@
165 * 165 *
166 D gzread PR 10I 0 extproc('gzread') 166 D gzread PR 10I 0 extproc('gzread')
167 D file value like(gzFile) File pointer 167 D file value like(gzFile) File pointer
168 D buf 32767 options(*varsize) Buffer 168 D buf 65535 options(*varsize) Buffer
169 D len 10u 0 value Buffer length 169 D len 10u 0 value Buffer length
170 * 170 *
171 D gzwrite PR 10I 0 extproc('gzwrite') 171 D gzwrite PR 10I 0 extproc('gzwrite')
172 D file value like(gzFile) File pointer 172 D file value like(gzFile) File pointer
173 D buf 32767 const options(*varsize) Buffer 173 D buf 65535 const options(*varsize) Buffer
174 D len 10u 0 value Buffer length 174 D len 10u 0 value Buffer length
175 * 175 *
176 D gzputs PR 10I 0 extproc('gzputs') 176 D gzputs PR 10I 0 extproc('gzputs')
@@ -179,7 +179,7 @@
179 * 179 *
180 D gzgets PR * extproc('gzgets') 180 D gzgets PR * extproc('gzgets')
181 D file value like(gzFile) File pointer 181 D file value like(gzFile) File pointer
182 D buf 32767 options(*varsize) Read buffer 182 D buf 65535 options(*varsize) Read buffer
183 D len 10i 0 value Buffer length 183 D len 10i 0 value Buffer length
184 * 184 *
185 D gzputc PR 10i 0 extproc('gzputc') 185 D gzputc PR 10i 0 extproc('gzputc')
@@ -318,7 +318,7 @@
318 D deflateSetDictionary... 318 D deflateSetDictionary...
319 D PR 10I 0 extproc('deflateSetDictionary') Init. dictionary 319 D PR 10I 0 extproc('deflateSetDictionary') Init. dictionary
320 D strm like(z_stream) Compression stream 320 D strm like(z_stream) Compression stream
321 D dictionary 32767 const options(*varsize) Dictionary bytes 321 D dictionary 65535 const options(*varsize) Dictionary bytes
322 D dictLength 10U 0 value Dictionary length 322 D dictLength 10U 0 value Dictionary length
323 * 323 *
324 D deflateCopy PR 10I 0 extproc('deflateCopy') Compress strm 2 strm 324 D deflateCopy PR 10I 0 extproc('deflateCopy') Compress strm 2 strm
@@ -344,7 +344,7 @@
344 * 344 *
345 D deflatePrime PR 10I 0 extproc('deflatePrime') Change level & strat 345 D deflatePrime PR 10I 0 extproc('deflatePrime') Change level & strat
346 D strm like(z_stream) Compression stream 346 D strm like(z_stream) Compression stream
347 D bits 10I 0 value Number of bits to insert 347 D bits 10I 0 value # of bits to insert
348 D value 10I 0 value Bits to insert 348 D value 10I 0 value Bits to insert
349 * 349 *
350 D inflateInit2 PR 10I 0 extproc('inflateInit2_') Init. expansion 350 D inflateInit2 PR 10I 0 extproc('inflateInit2_') Init. expansion
@@ -356,7 +356,7 @@
356 D inflateSetDictionary... 356 D inflateSetDictionary...
357 D PR 10I 0 extproc('inflateSetDictionary') Init. dictionary 357 D PR 10I 0 extproc('inflateSetDictionary') Init. dictionary
358 D strm like(z_stream) Expansion stream 358 D strm like(z_stream) Expansion stream
359 D dictionary 32767 const options(*varsize) Dictionary bytes 359 D dictionary 65535 const options(*varsize) Dictionary bytes
360 D dictLength 10U 0 value Dictionary length 360 D dictLength 10U 0 value Dictionary length
361 * 361 *
362 D inflateSync PR 10I 0 extproc('inflateSync') Sync. expansion 362 D inflateSync PR 10I 0 extproc('inflateSync') Sync. expansion
@@ -385,7 +385,7 @@
385 D PR 10I 0 extproc('inflateBackInit_') 385 D PR 10I 0 extproc('inflateBackInit_')
386 D strm like(z_stream) Expansion stream 386 D strm like(z_stream) Expansion stream
387 D windowBits 10I 0 value Log2(buffer size) 387 D windowBits 10I 0 value Log2(buffer size)
388 D window 32767 options(*varsize) Buffer 388 D window 65535 options(*varsize) Buffer
389 D version * value options(*string) Version string 389 D version * value options(*string) Version string
390 D stream_size 10i 0 value Stream struct. size 390 D stream_size 10i 0 value Stream struct. size
391 * 391 *
@@ -408,12 +408,12 @@
408 * 408 *
409 D adler32 PR 10U 0 extproc('adler32') New checksum 409 D adler32 PR 10U 0 extproc('adler32') New checksum
410 D adler 10U 0 value Old checksum 410 D adler 10U 0 value Old checksum
411 D buf 32767 const options(*varsize) Bytes to accumulate 411 D buf 65535 const options(*varsize) Bytes to accumulate
412 D len 10U 0 value Buffer length 412 D len 10U 0 value Buffer length
413 * 413 *
414 D crc32 PR 10U 0 extproc('crc32') New checksum 414 D crc32 PR 10U 0 extproc('crc32') New checksum
415 D crc 10U 0 value Old checksum 415 D crc 10U 0 value Old checksum
416 D buf 32767 const options(*varsize) Bytes to accumulate 416 D buf 65535 const options(*varsize) Bytes to accumulate
417 D len 10U 0 value Buffer length 417 D len 10U 0 value Buffer length
418 * 418 *
419 ************************************************************************** 419 **************************************************************************
generated by cgit v1.2.3-55-g6feb (git 2.39.1) at 2025-03-19 19:09:13 +0000