summaryrefslogtreecommitdiff
path: root/os400/make-rpg.sh
diff options
context:
space:
mode:
Diffstat (limited to 'os400/make-rpg.sh')
-rw-r--r--os400/make-rpg.sh97
1 files changed, 0 insertions, 97 deletions
diff --git a/os400/make-rpg.sh b/os400/make-rpg.sh
deleted file mode 100644
index 95d3249..0000000
--- a/os400/make-rpg.sh
+++ /dev/null
@@ -1,97 +0,0 @@
-#!/bin/sh
-#
-# Installation of the ILE/RPG header files in the OS/400 library.
-#
-# See Copyright for the status of this software.
-#
-# Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A.
-#
-
-SCRIPTDIR=`dirname "${0}"`
-. "${SCRIPTDIR}/initscript.sh"
-cd "${TOPDIR}/os400/libxmlrpg"
-
-
-# Create the OS/400 source program file for the ILE/RPG header files.
-
-SRCPF="${LIBIFSNAME}/LIBXMLRPG.FILE"
-
-if action_needed "${SRCPF}"
-then CMD="CRTSRCPF FILE(${TARGETLIB}/LIBXMLRPG) RCDLEN(112)"
- CMD="${CMD} CCSID(${TGTCCSID}) TEXT('libxml2: ILE/RPG header files')"
- system "${CMD}"
-fi
-
-
-# Map file names to DB2 name syntax.
-
-> tmpsubstfile
-
-for HFILE in *.rpgle *.rpgle.in
-do NAME="`basename \"${HFILE}\" .in`"
- VAR="`basename \"${NAME}\" .rpgle`"
- VAL="`db2_name \"${NAME}\" nomangle`"
-
- if [ "${VAR}" = 'xmlschemastypes' ]
- then VAL=SCHMTYPES
- fi
-
- echo "s/${VAR}/${VAL}/g" >> tmpsubstfile
- eval "VAR_${VAR}=\"${VAL}\""
-done
-
-
-change_include()
-
-{
- sed -e '\#^....../include *"libxmlrpg/#{' \
- -e 's///' \
- -e 's/".*//' \
- -f tmpsubstfile \
- -e 's#.*# /include libxmlrpg,&#' \
- -e '}'
-}
-
-
-# Create the IFS directory for the ILE/RPG header files.
-
-RPGIFSDIR="${IFSDIR}/include/libxmlrpg"
-
-if action_needed "${RPGIFSDIR}"
-then mkdir -p "${RPGIFSDIR}"
-fi
-
-# Copy the header files to IFS ILE/RPG include directory.
-# Copy them with include path editing to the DB2 library.
-
-for HFILE in *.rpgle *.rpgle.in
-do IFSCMD="cat \"${HFILE}\""
- DB2CMD="change_include < \"${HFILE}\""
- IFSFILE="`basename \"${HFILE}\" .in`"
-
- case "${HFILE}" in
-
- *.in) IFSCMD="${IFSCMD} | versioned_copy"
- DB2CMD="${DB2CMD} | versioned_copy"
- ;;
- esac
-
- IFSDEST="${RPGIFSDIR}/${IFSFILE}"
-
- if action_needed "${IFSDEST}" "${HFILE}"
- then eval "${IFSCMD}" > "${IFSDEST}"
- fi
-
- eval DB2MBR="\"\${VAR_`basename \"${IFSDEST}\" .rpgle`}\""
- DB2DEST="${SRCPF}/${DB2MBR}.MBR"
-
- if action_needed "${DB2DEST}" "${HFILE}"
- then eval "${DB2CMD}" | change_include > tmphdrfile
-
- # Need to translate to target CCSID.
-
- CMD="CPY OBJ('`pwd`/tmphdrfile') TOOBJ('${DB2DEST}')"
- CMD="${CMD} TOCCSID(${TGTCCSID}) DTAFMT(*TEXT) REPLACE(*YES)"
- system "${CMD}"
- fi
-done