| #!/bin/sh | 
 | # | 
 | #       ZLIB compilation script for the OS/400. | 
 | # | 
 | # | 
 | #       This is a shell script since make is not a standard component of OS/400. | 
 |  | 
 |  | 
 | ################################################################################ | 
 | # | 
 | #                       Tunable configuration parameters. | 
 | # | 
 | ################################################################################ | 
 |  | 
 | TARGETLIB='ZLIB'                # Target OS/400 program library | 
 | STATBNDDIR='ZLIB_A'             # Static binding directory. | 
 | DYNBNDDIR='ZLIB'                # Dynamic binding directory. | 
 | SRVPGM="ZLIB"                   # Service program. | 
 | IFSDIR='/zlib'                  # IFS support base directory. | 
 | TGTCCSID='500'                  # Target CCSID of objects | 
 | DEBUG='*NONE'                   # Debug level | 
 | OPTIMIZE='40'                   # Optimisation level | 
 | OUTPUT='*NONE'                  # Compilation output option. | 
 | TGTRLS='V6R1M0'                 # Target OS release | 
 |  | 
 | export TARGETLIB STATBNDDIR DYNBNDDIR SRVPGM IFSDIR | 
 | export TGTCCSID DEBUG OPTIMIZE OUTPUT TGTRLS | 
 |  | 
 |  | 
 | ################################################################################ | 
 | # | 
 | #                       OS/400 specific definitions. | 
 | # | 
 | ################################################################################ | 
 |  | 
 | LIBIFSNAME="/QSYS.LIB/${TARGETLIB}.LIB" | 
 |  | 
 |  | 
 | ################################################################################ | 
 | # | 
 | #                               Procedures. | 
 | # | 
 | ################################################################################ | 
 |  | 
 | #       action_needed dest [src] | 
 | # | 
 | #       dest is an object to build | 
 | #       if specified, src is an object on which dest depends. | 
 | # | 
 | #       exit 0 (succeeds) if some action has to be taken, else 1. | 
 |  | 
 | action_needed() | 
 |  | 
 | { | 
 |         [ ! -e "${1}" ] && return 0 | 
 |         [ "${2}" ] || return 1 | 
 |         [ "${1}" -ot "${2}" ] && return 0 | 
 |         return 1 | 
 | } | 
 |  | 
 |  | 
 | #       make_module module_name source_name [additional_definitions] | 
 | # | 
 | #       Compile source name into module if needed. | 
 | #       As side effect, append the module name to variable MODULES. | 
 | #       Set LINK to "YES" if the module has been compiled. | 
 |  | 
 | make_module() | 
 |  | 
 | { | 
 |     MODULES="${MODULES} ${1}" | 
 |     MODIFSNAME="${LIBIFSNAME}/${1}.MODULE" | 
 |     CSRC="`basename \"${2}\"`" | 
 |  | 
 |     if action_needed "${MODIFSNAME}" "${2}" | 
 |     then    : | 
 |     elif [ ! "`sed -e \"/<source name=\\\"${CSRC}\\\">/,/<\\\\/source>/!d\" \ | 
 |       -e '/<depend /!d'                                                 \ | 
 |       -e 's/.* name=\"\\([^\"]*\\)\".*/\\1/' < \"${TOPDIR}/treebuild.xml\" | | 
 |         while read HDR | 
 |         do      if action_needed \"${MODIFSNAME}\" \"${IFSDIR}/include/${HDR}\" | 
 |                 then    echo recompile | 
 |                         break | 
 |                 fi | 
 |         done`" ] | 
 |     then    return 0 | 
 |     fi | 
 |  | 
 |     CMD="CRTCMOD MODULE(${TARGETLIB}/${1}) SRCSTMF('${2}')" | 
 |     CMD="${CMD} SYSIFCOPT(*IFS64IO) OPTION(*INCDIRFIRST)" | 
 |     CMD="${CMD} LOCALETYPE(*LOCALE) FLAG(10)" | 
 |     CMD="${CMD} INCDIR('${IFSDIR}/include' ${INCLUDES})" | 
 |     CMD="${CMD} TGTCCSID(${TGTCCSID}) TGTRLS(${TGTRLS})" | 
 |     CMD="${CMD} OUTPUT(${OUTPUT})" | 
 |     CMD="${CMD} OPTIMIZE(${OPTIMIZE})" | 
 |     CMD="${CMD} DBGVIEW(${DEBUG})" | 
 |     system "${CMD}" | 
 |     LINK=YES | 
 | } | 
 |  | 
 |  | 
 | #       Determine DB2 object name from IFS name. | 
 |  | 
 | db2_name() | 
 |  | 
 | { | 
 |         basename "${1}"                                                 | | 
 |         tr 'a-z-' 'A-Z_'                                                | | 
 |         sed -e 's/\..*//'                                               \ | 
 |             -e 's/^\(.\).*\(.........\)$/\1\2/' | 
 | } | 
 |  | 
 |  | 
 | #       Force enumeration types to be the same size as integers. | 
 |  | 
 | copy_hfile() | 
 |  | 
 | { | 
 |         sed -e '1i\ | 
 | #pragma enum(int)\ | 
 | ' "${@}" -e '$a\ | 
 | #pragma enum(pop)\ | 
 | ' | 
 | } | 
 |  | 
 |  | 
 | ################################################################################ | 
 | # | 
 | #                             Script initialization. | 
 | # | 
 | ################################################################################ | 
 |  | 
 | SCRIPTDIR=`dirname "${0}"` | 
 |  | 
 | case "${SCRIPTDIR}" in | 
 | /*)     ;; | 
 | *)      SCRIPTDIR="`pwd`/${SCRIPTDIR}" | 
 | esac | 
 |  | 
 | while true | 
 | do      case "${SCRIPTDIR}" in | 
 |         */.)    SCRIPTDIR="${SCRIPTDIR%/.}";; | 
 |         *)      break;; | 
 |         esac | 
 | done | 
 |  | 
 | #  The script directory is supposed to be in ${TOPDIR}/os400. | 
 |  | 
 | TOPDIR=`dirname "${SCRIPTDIR}"` | 
 | export SCRIPTDIR TOPDIR | 
 | cd "${TOPDIR}" | 
 |  | 
 |  | 
 | #  Extract the version from the master compilation XML file. | 
 |  | 
 | VERSION=`sed -e '/^<package /!d'                                        \ | 
 |             -e 's/^.* version="\([0-9.]*\)".*$/\1/' -e 'q'              \ | 
 |             < treebuild.xml` | 
 | export VERSION | 
 |  | 
 | ################################################################################ | 
 |  | 
 |  | 
 | #       Create the OS/400 library if it does not exist. | 
 |  | 
 | if action_needed "${LIBIFSNAME}" | 
 | then    CMD="CRTLIB LIB(${TARGETLIB}) TEXT('ZLIB: Data compression API')" | 
 |         system "${CMD}" | 
 | fi | 
 |  | 
 |  | 
 | #       Create the DOCS source file if it does not exist. | 
 |  | 
 | if action_needed "${LIBIFSNAME}/DOCS.FILE" | 
 | then    CMD="CRTSRCPF FILE(${TARGETLIB}/DOCS) RCDLEN(112)" | 
 |         CMD="${CMD} CCSID(${TGTCCSID}) TEXT('Documentation texts')" | 
 |         system "${CMD}" | 
 | fi | 
 |  | 
 | #       Copy some documentation files if needed. | 
 |  | 
 | for TEXT in "${TOPDIR}/ChangeLog" "${TOPDIR}/FAQ"                       \ | 
 |     "${TOPDIR}/README" "${SCRIPTDIR}/README400" | 
 | do      MEMBER="${LIBIFSNAME}/DOCS.FILE/`db2_name \"${TEXT}\"`.MBR" | 
 |  | 
 |         if action_needed "${MEMBER}" "${TEXT}" | 
 |         then    CMD="CPY OBJ('${TEXT}') TOOBJ('${MEMBER}') TOCCSID(${TGTCCSID})" | 
 |                 CMD="${CMD} DTAFMT(*TEXT) REPLACE(*YES)" | 
 |                 system "${CMD}" | 
 |         fi | 
 | done | 
 |  | 
 |  | 
 | #       Create the OS/400 source program file for the C header files. | 
 |  | 
 | SRCPF="${LIBIFSNAME}/H.FILE" | 
 |  | 
 | if action_needed "${SRCPF}" | 
 | then    CMD="CRTSRCPF FILE(${TARGETLIB}/H) RCDLEN(112)" | 
 |         CMD="${CMD} CCSID(${TGTCCSID}) TEXT('ZLIB: C/C++ header files')" | 
 |         system "${CMD}" | 
 | fi | 
 |  | 
 |  | 
 | #       Create the IFS directory for the C header files. | 
 |  | 
 | if action_needed "${IFSDIR}/include" | 
 | then    mkdir -p "${IFSDIR}/include" | 
 | fi | 
 |  | 
 | #       Copy the header files to DB2 library. Link from IFS include directory. | 
 |  | 
 | for HFILE in "${TOPDIR}/"*.h | 
 | do      DEST="${SRCPF}/`db2_name \"${HFILE}\"`.MBR" | 
 |  | 
 |         if action_needed "${DEST}" "${HFILE}" | 
 |         then    copy_hfile < "${HFILE}" > tmphdrfile | 
 |  | 
 |                 #       Need to translate to target CCSID. | 
 |  | 
 |                 CMD="CPY OBJ('`pwd`/tmphdrfile') TOOBJ('${DEST}')" | 
 |                 CMD="${CMD} TOCCSID(${TGTCCSID}) DTAFMT(*TEXT) REPLACE(*YES)" | 
 |                 system "${CMD}" | 
 |                 # touch -r "${HFILE}" "${DEST}" | 
 |                 rm -f tmphdrfile | 
 |         fi | 
 |  | 
 |         IFSFILE="${IFSDIR}/include/`basename \"${HFILE}\"`" | 
 |  | 
 |         if action_needed "${IFSFILE}" "${DEST}" | 
 |         then    rm -f "${IFSFILE}" | 
 |                 ln -s "${DEST}" "${IFSFILE}" | 
 |         fi | 
 | done | 
 |  | 
 |  | 
 | #       Install the ILE/RPG header file. | 
 |  | 
 |  | 
 | HFILE="${SCRIPTDIR}/zlib.inc" | 
 | DEST="${SRCPF}/ZLIB.INC.MBR" | 
 |  | 
 | if action_needed "${DEST}" "${HFILE}" | 
 | then    CMD="CPY OBJ('${HFILE}') TOOBJ('${DEST}')" | 
 |         CMD="${CMD} TOCCSID(${TGTCCSID}) DTAFMT(*TEXT) REPLACE(*YES)" | 
 |         system "${CMD}" | 
 |         # touch -r "${HFILE}" "${DEST}" | 
 | fi | 
 |  | 
 | IFSFILE="${IFSDIR}/include/`basename \"${HFILE}\"`" | 
 |  | 
 | if action_needed "${IFSFILE}" "${DEST}" | 
 | then    rm -f "${IFSFILE}" | 
 |         ln -s "${DEST}" "${IFSFILE}" | 
 | fi | 
 |  | 
 |  | 
 | #      Create and compile the identification source file. | 
 |  | 
 | 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 | 
 | make_module     OS400           os400.c | 
 | LINK=                           # No need to rebuild service program yet. | 
 | MODULES= | 
 |  | 
 |  | 
 | #       Get source list. | 
 |  | 
 | CSOURCES=`sed -e '/<source name="/!d'                                   \ | 
 |     -e 's/.* name="\([^"]*\)".*/\1/' < treebuild.xml` | 
 |  | 
 | #       Compile the sources into modules. | 
 |  | 
 | for SRC in ${CSOURCES} | 
 | do      MODULE=`db2_name "${SRC}"` | 
 |         make_module "${MODULE}" "${SRC}" | 
 | done | 
 |  | 
 |  | 
 | #       If needed, (re)create the static binding directory. | 
 |  | 
 | if action_needed "${LIBIFSNAME}/${STATBNDDIR}.BNDDIR" | 
 | then    LINK=YES | 
 | fi | 
 |  | 
 | if [ "${LINK}" ] | 
 | then    rm -rf "${LIBIFSNAME}/${STATBNDDIR}.BNDDIR" | 
 |         CMD="CRTBNDDIR BNDDIR(${TARGETLIB}/${STATBNDDIR})" | 
 |         CMD="${CMD} TEXT('ZLIB static binding directory')" | 
 |         system "${CMD}" | 
 |  | 
 |         for MODULE in ${MODULES} | 
 |         do      CMD="ADDBNDDIRE BNDDIR(${TARGETLIB}/${STATBNDDIR})" | 
 |                 CMD="${CMD} OBJ((${TARGETLIB}/${MODULE} *MODULE))" | 
 |                 system "${CMD}" | 
 |         done | 
 | fi | 
 |  | 
 |  | 
 | #       The exportation file for service program creation must be in a DB2 | 
 | #               source file, so make sure it exists. | 
 |  | 
 | if action_needed "${LIBIFSNAME}/TOOLS.FILE" | 
 | then    CMD="CRTSRCPF FILE(${TARGETLIB}/TOOLS) RCDLEN(112)" | 
 |         CMD="${CMD} CCSID(${TGTCCSID}) TEXT('ZLIB: build tools')" | 
 |         system "${CMD}" | 
 | fi | 
 |  | 
 |  | 
 | DEST="${LIBIFSNAME}/TOOLS.FILE/BNDSRC.MBR" | 
 |  | 
 | if action_needed "${SCRIPTDIR}/bndsrc" "${DEST}" | 
 | then    CMD="CPY OBJ('${SCRIPTDIR}/bndsrc') TOOBJ('${DEST}')" | 
 |         CMD="${CMD} TOCCSID(${TGTCCSID}) DTAFMT(*TEXT) REPLACE(*YES)" | 
 |         system "${CMD}" | 
 |         # touch -r "${SCRIPTDIR}/bndsrc" "${DEST}" | 
 |         LINK=YES | 
 | fi | 
 |  | 
 |  | 
 | #       Build the service program if needed. | 
 |  | 
 | if action_needed "${LIBIFSNAME}/${SRVPGM}.SRVPGM" | 
 | then    LINK=YES | 
 | fi | 
 |  | 
 | if [ "${LINK}" ] | 
 | then    CMD="CRTSRVPGM SRVPGM(${TARGETLIB}/${SRVPGM})" | 
 |         CMD="${CMD} SRCFILE(${TARGETLIB}/TOOLS) SRCMBR(BNDSRC)" | 
 |         CMD="${CMD} MODULE(${TARGETLIB}/OS400)" | 
 |         CMD="${CMD} BNDDIR(${TARGETLIB}/${STATBNDDIR})" | 
 |         CMD="${CMD} TEXT('ZLIB ${VERSION} dynamic library')" | 
 |         CMD="${CMD} TGTRLS(${TGTRLS})" | 
 |         system "${CMD}" | 
 |         LINK=YES | 
 |  | 
 |         #       Duplicate the service program for a versioned backup. | 
 |  | 
 |         BACKUP=`echo "${SRVPGM}${VERSION}"                              | | 
 |                 sed -e 's/.*\(..........\)$/\1/' -e 's/\./_/g'` | 
 |         BACKUP="`db2_name \"${BACKUP}\"`" | 
 |         BKUPIFSNAME="${LIBIFSNAME}/${BACKUP}.SRVPGM" | 
 |         rm -f "${BKUPIFSNAME}" | 
 |         CMD="CRTDUPOBJ OBJ(${SRVPGM}) FROMLIB(${TARGETLIB})" | 
 |         CMD="${CMD} OBJTYPE(*SRVPGM) NEWOBJ(${BACKUP})" | 
 |         system "${CMD}" | 
 | fi | 
 |  | 
 |  | 
 | #       If needed, (re)create the dynamic binding directory. | 
 |  | 
 | if action_needed "${LIBIFSNAME}/${DYNBNDDIR}.BNDDIR" | 
 | then    LINK=YES | 
 | fi | 
 |  | 
 | if [ "${LINK}" ] | 
 | then    rm -rf "${LIBIFSNAME}/${DYNBNDDIR}.BNDDIR" | 
 |         CMD="CRTBNDDIR BNDDIR(${TARGETLIB}/${DYNBNDDIR})" | 
 |         CMD="${CMD} TEXT('ZLIB dynamic binding directory')" | 
 |         system "${CMD}" | 
 |         CMD="ADDBNDDIRE BNDDIR(${TARGETLIB}/${DYNBNDDIR})" | 
 |         CMD="${CMD} OBJ((*LIBL/${SRVPGM} *SRVPGM))" | 
 |         system "${CMD}" | 
 | fi |