Retro68/gcc/zlib/as400/compile.clp

111 lines
5.2 KiB
Plaintext
Raw Normal View History

2012-03-27 23:13:14 +00:00
/******************************************************************************/
/* */
/* ZLIB */
/* */
/* Compile sources into modules and link them into a service program. */
/* */
/******************************************************************************/
PGM
/* Configuration adjustable parameters. */
DCL VAR(&SRCLIB) TYPE(*CHAR) LEN(10) +
VALUE('ZLIB') /* Source library. */
DCL VAR(&SRCFILE) TYPE(*CHAR) LEN(10) +
VALUE('SOURCES') /* Source member file. */
DCL VAR(&CTLFILE) TYPE(*CHAR) LEN(10) +
VALUE('TOOLS') /* Control member file. */
DCL VAR(&MODLIB) TYPE(*CHAR) LEN(10) +
VALUE('ZLIB') /* Module library. */
DCL VAR(&SRVLIB) TYPE(*CHAR) LEN(10) +
VALUE('LGPL') /* Service program library. */
DCL VAR(&CFLAGS) TYPE(*CHAR) +
VALUE('OPTIMIZE(40)') /* Compile options. */
2014-09-21 17:33:12 +00:00
DCL VAR(&TGTRLS) TYPE(*CHAR) +
VALUE('V5R3M0') /* Target release. */
2012-03-27 23:13:14 +00:00
/* Working storage. */
DCL VAR(&CMDLEN) TYPE(*DEC) LEN(15 5) VALUE(300) /* Command length. */
DCL VAR(&CMD) TYPE(*CHAR) LEN(512)
2014-09-21 17:33:12 +00:00
DCL VAR(&FIXDCMD) TYPE(*CHAR) LEN(512)
2012-03-27 23:13:14 +00:00
/* Compile sources into modules. */
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&FIXDCMD) VALUE('CRTCMOD' *BCAT &CFLAGS *BCAT +
'SYSIFCOPT(*IFS64IO)' *BCAT +
'DEFINE(''_LARGEFILE64_SOURCE''' *BCAT +
'''_LFS64_LARGEFILE=1'') TGTRLS(' *TCAT &TGTRLS *TCAT +
') SRCFILE(' *TCAT &SRCLIB *TCAT '/' *TCAT +
&SRCFILE *TCAT ') MODULE(' *TCAT &MODLIB *TCAT '/')
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'ADLER32)')
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'COMPRESS)')
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'CRC32)')
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'DEFLATE)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'GZCLOSE)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'GZLIB)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'GZREAD)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'GZWRITE)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'INFBACK)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'INFFAST)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'INFLATE)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'INFTREES)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'TREES)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'UNCOMPR)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
2014-09-21 17:33:12 +00:00
CHGVAR VAR(&CMD) VALUE(&FIXDCMD *TCAT 'ZUTIL)')
2012-03-27 23:13:14 +00:00
CALL PGM(QCMDEXC) PARM(&CMD &CMDLEN)
/* Link modules into a service program. */
CRTSRVPGM SRVPGM(&SRVLIB/ZLIB) +
MODULE(&MODLIB/ADLER32 &MODLIB/COMPRESS +
&MODLIB/CRC32 &MODLIB/DEFLATE +
2014-09-21 17:33:12 +00:00
&MODLIB/GZCLOSE &MODLIB/GZLIB +
&MODLIB/GZREAD &MODLIB/GZWRITE +
&MODLIB/INFBACK &MODLIB/INFFAST +
&MODLIB/INFLATE &MODLIB/INFTREES +
&MODLIB/TREES &MODLIB/UNCOMPR +
&MODLIB/ZUTIL) +
SRCFILE(&SRCLIB/&CTLFILE) SRCMBR(BNDSRC) +
TEXT('ZLIB 1.2.7') TGTRLS(&TGTRLS)
2012-03-27 23:13:14 +00:00
ENDPGM