95 lines
2.7 KiB
Bash
95 lines
2.7 KiB
Bash
|
#!/bin/sh
|
||
|
|
# Copyright (C) The libssh2 project and its contributors.
|
||
|
|
# SPDX-License-Identifier: BSD-3-Clause
|
||
|
|
#
|
||
|
|
# Installation of the ILE/RPG header files in the OS/400 library.
|
||
|
|
#
|
||
|
|
|
||
|
|
SCRIPTDIR=$(dirname "${0}")
|
||
|
|
. "${SCRIPTDIR}/initscript.sh"
|
||
|
|
cd "${TOPDIR}/os400/libssh2rpg" || exit 1
|
||
|
|
|
||
|
|
|
||
|
|
# Create the OS/400 source program file for the ILE/RPG header files.
|
||
|
|
|
||
|
|
SRCPF="${LIBIFSNAME}/LIBSSH2RPG.FILE"
|
||
|
|
|
||
|
|
if action_needed "${SRCPF}"
|
||
|
|
then CMD="CRTSRCPF FILE(${TARGETLIB}/LIBSSH2RPG) RCDLEN(112)"
|
||
|
|
CMD="${CMD} CCSID(${TGTCCSID}) TEXT('libssh2: ILE/RPG header files')"
|
||
|
|
system "${CMD}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
|
||
|
|
# Map file names to DB2 name syntax.
|
||
|
|
|
||
|
|
for HFILE in *.rpgle *.rpgle.in
|
||
|
|
do NAME="$(basename "${HFILE}" .in)"
|
||
|
|
VAR="$(basename "${NAME}" .rpgle)"
|
||
|
|
VAL="$(db2_name "${NAME}")"
|
||
|
|
|
||
|
|
eval "VAR_${VAR}=\"${VAL}\""
|
||
|
|
echo "${VAR} s/${VAR}/${VAL}/g"
|
||
|
|
done > tmpsubstfile1
|
||
|
|
|
||
|
|
# Order substitution commands so that a prefix appears after all
|
||
|
|
# file names beginning with the prefix.
|
||
|
|
|
||
|
|
sort -r tmpsubstfile1 | sed 's/^[^ ]*[ ]*//' > tmpsubstfile2
|
||
|
|
|
||
|
|
|
||
|
|
change_include()
|
||
|
|
|
||
|
|
{
|
||
|
|
sed -e '\#^....../include *"libssh2rpg/#{' \
|
||
|
|
-e 's///' \
|
||
|
|
-e 's/".*//' \
|
||
|
|
-f tmpsubstfile2 \
|
||
|
|
-e 's#.*# /include libssh2rpg,&#' \
|
||
|
|
-e '}'
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
# Create the IFS directory for the ILE/RPG header files.
|
||
|
|
|
||
|
|
RPGIFSDIR="${IFSDIR}/include/libssh2rpg"
|
||
|
|
|
||
|
|
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
|