From 9e35567064baded660f61732b247ef5abc809014 Mon Sep 17 00:00:00 2001 From: Mark Adler Date: Tue, 17 Feb 2026 02:31:51 -0800 Subject: Version 1.3.2 --- os400/README400 | 2 +- os400/make.sh | 2 +- os400/zlibfixed.rpgle | 24 +++++++++++++++---- os400/zlibfree.rpgle | 66 +++++++++++++++++++++++++++++++++++++++++++++------ 4 files changed, 80 insertions(+), 14 deletions(-) (limited to 'os400') diff --git a/os400/README400 b/os400/README400 index 2cfe7a3c..9314a687 100644 --- a/os400/README400 +++ b/os400/README400 @@ -1,4 +1,4 @@ - ZLIB version 1.3.1.2 for OS/400 installation instructions + ZLIB version 1.3.2 for OS/400 installation instructions 1) Download and unpack the zlib tarball to some IFS directory. (i.e.: /path/to/the/zlib/ifs/source/directory) diff --git a/os400/make.sh b/os400/make.sh index e9643f52..43915796 100644 --- a/os400/make.sh +++ b/os400/make.sh @@ -276,7 +276,7 @@ fi echo '#pragma comment(user, "ZLIB version '"${VERSION}"'")' > os400.c echo '#pragma comment(user, __DATE__)' >> os400.c echo '#pragma comment(user, __TIME__)' >> os400.c -echo '#pragma comment(copyright, "Copyright (C) 1995-2017 Jean-Loup Gailly, Mark Adler. OS/400 version by P. Monnerat.")' >> os400.c +echo '#pragma comment(copyright, "Copyright (C) 1995-2026 Jean-Loup Gailly, Mark Adler. OS/400 version by P. Monnerat.")' >> os400.c make_module OS400 os400.c LINK= # No need to rebuild service program yet. MODULES= diff --git a/os400/zlibfixed.rpgle b/os400/zlibfixed.rpgle index b2e3e093..75060f30 100644 --- a/os400/zlibfixed.rpgle +++ b/os400/zlibfixed.rpgle @@ -1,7 +1,7 @@ * ZLIB.INC - Interface to the general purpose compression library * * ILE RPG400 version by Patrick Monnerat, DATASPHERE. - * Version 1.3.1.2 + * Version 1.3.2 * * * WARNING: @@ -22,14 +22,14 @@ * * Versioning information. * - D ZLIB_VERSION C '1.3.1.2' - D ZLIB_VERNUM C X'12a0' + D ZLIB_VERSION C '1.3.2' + D ZLIB_VERNUM C X'1320' D ZLIB_VER_MAJOR C 1 D ZLIB_VER_MINOR C 3 D ZLIB_VER_REVISION... - D C 1 - D ZLIB_VER_SUBREVISION... D C 2 + D ZLIB_VER_SUBREVISION... + D C 0 * * Other equates. * @@ -535,6 +535,20 @@ D buf 65535 const options(*varsize) Bytes to accumulate D len 20U 0 value Buffer length * + D crc32_combine_gen... + D PR 10U 0 extproc('crc32_combine_gen') Operator + D len2 20U 0 value Buffer length + * + D crc32_combine_gen64... + D PR 10U 0 extproc('crc32_combine_gen64') Operator + D len2 20U 0 value Buffer length + * + D crc32_combine_op... + D PR 10U 0 extproc('crc32_combine_op') New Checksum + D crc1 10U 0 value Old checksum + D crc2 10U 0 value Old checksum + D op 10U 0 value Operator + * ************************************************************************** * Miscellaneous function prototypes ************************************************************************** diff --git a/os400/zlibfree.rpgle b/os400/zlibfree.rpgle index 5ae31baf..b35c4680 100644 --- a/os400/zlibfree.rpgle +++ b/os400/zlibfree.rpgle @@ -2,7 +2,7 @@ // ZLIB.INC - Interface to the general purpose compression library // ILE RPG400 version by Patrick Monnerat, DATASPHERE. -// Version 1.3.1.1 +// Version 1.3.2 // WARNING: @@ -23,12 +23,12 @@ // Versioning information. -Dcl-C ZLIB_VERSION '1.3.1.1'; -Dcl-C ZLIB_VERNUM X'12A0'; +Dcl-C ZLIB_VERSION '1.3.2'; +Dcl-C ZLIB_VERNUM X'1320'; Dcl-C ZLIB_VER_MAJOR 1; Dcl-C ZLIB_VER_MINOR 3; -Dcl-C ZLIB_VER_REVISION 1; -Dcl-C ZLIB_VER_SUBREVISION 1; +Dcl-C ZLIB_VER_REVISION 2; +Dcl-C ZLIB_VER_SUBREVISION 0; // Other equates. @@ -113,6 +113,13 @@ Dcl-Pr compress Int(10) Extproc('compress'); sourceLen Uns(10) Value; // Source length End-Pr; +Dcl-Pr compress_z Int(10) Extproc('compress_z'); + dest Char(65535) Options(*VARSIZE); // Destination buffer + destLen Uns(20); // Destination length + source Char(65535) Const Options(*VARSIZE); // Source buffer + sourceLen Uns(20) Value; // Source length +End-Pr; + Dcl-Pr compress2 Int(10) Extproc('compress2'); dest Char(65535) Options(*VARSIZE); // Destination buffer destLen Uns(10); // Destination length @@ -121,10 +128,22 @@ Dcl-Pr compress2 Int(10) Extproc('compress2'); level Int(10) Value; // Compression level End-Pr; +Dcl-Pr compress2_z Int(10) Extproc('compress2_z'); + dest Char(65535) Options(*VARSIZE); // Destination buffer + destLen Uns(20); // Destination length + source Char(65535) Const Options(*VARSIZE); // Source buffer + sourceLen Uns(20) Value; // Source length + level Int(10) Value; // Compression level +End-Pr; + Dcl-Pr compressBound Uns(10) Extproc('compressBound'); sourceLen Uns(10) Value; End-Pr; +Dcl-Pr compressBound_z Uns(10) Extproc('compressBound_z'); + sourceLen Uns(20) Value; +End-Pr; + Dcl-Pr uncompress Int(10) Extproc('uncompress'); dest Char(65535) Options(*VARSIZE); // Destination buffer destLen Uns(10); // Destination length @@ -132,6 +151,13 @@ Dcl-Pr uncompress Int(10) Extproc('uncompress'); sourceLen Uns(10) Value; // Source length End-Pr; +Dcl-Pr uncompress_z Int(10) Extproc('uncompress_z'); + dest Char(65535) Options(*VARSIZE); // Destination buffer + destLen Uns(20); // Destination length + source Char(65535) Const Options(*VARSIZE); // Source buffer + sourceLen Uns(20) Value; // Source length +End-Pr; + Dcl-Pr uncompress2 Int(10) Extproc('uncompress2'); dest Char(65535) Options(*VARSIZE); // Destination buffer destLen Uns(10); // Destination length @@ -139,6 +165,13 @@ Dcl-Pr uncompress2 Int(10) Extproc('uncompress2'); sourceLen Uns(10); // Source length End-Pr; +Dcl-Pr uncompress2_z Int(10) Extproc('uncompress2_z'); + dest Char(65535) Options(*VARSIZE); // Destination buffer + destLen Uns(20); // Destination length + source Char(65535) Const Options(*VARSIZE); // Source buffer + sourceLen Uns(20); // Source length +End-Pr; + /if not defined(LARGE_FILES) Dcl-Pr gzopen Extproc('gzopen') Like(gzFile); path Pointer Value Options(*STRING); // File pathname @@ -397,7 +430,12 @@ End-Pr; Dcl-Pr deflateBound Uns(10) Extproc('deflateBound'); // Change level & strat strm Like(z_stream); // Compression stream - sourcelen Uns(10) Value; // Compression level + sourcelen Uns(10) Value; // Source length +End-Pr; + +Dcl-Pr deflateBound_z Uns(10) Extproc('deflateBound_z'); // Change level & strat + strm Like(z_stream); // Compression stream + sourcelen Uns(20) Value; // Source length End-Pr; Dcl-Pr deflatePending Int(10) Extproc('deflatePending'); // Change level & strat @@ -542,7 +580,7 @@ End-Pr; Dcl-Pr crc32_combine Uns(10) Extproc('crc32_combine'); // New checksum crc1 Uns(10) Value; // Old checksum crc2 Uns(10) Value; // Old checksum - len2 Uns(20) Value; // Buffer length + len2 Uns(20) Value; // 2nd Buffer length End-Pr; Dcl-Pr crc32_z Uns(10) Extproc('crc32_z'); // New checksum @@ -551,6 +589,20 @@ Dcl-Pr crc32_z Uns(10) Extproc('crc32_z'); // New checksum len Uns(20) Value; // Buffer length End-Pr; +Dcl-Pr crc32_combine_gen Uns(10) Extproc('crc32_combine_gen'); + len Uns(20) Value; // 2nd Buffer length +End-Pr; + +Dcl-Pr crc32_combine_gen64 Uns(10) Extproc('crc32_combine_gen64'); + len Uns(20) Value; // 2nd Buffer length +End-Pr; + +Dcl-Pr crc32_combine_op Uns(10) Extproc('crc32_combine_op'); // New checksum + crc1 Uns(10) Value; // Old checksum + crc2 Uns(10) Value; // Old checksum + op Uns(10) Value; // Operator +End-Pr; + //************************************************************************* // Miscellaneous function prototypes //************************************************************************* -- cgit v1.2.3-55-g6feb