qusal/scripts/spec-gen.sh
2024-03-14 16:22:41 +01:00

91 lines
2.6 KiB
Bash
Executable File

#!/bin/sh
## SPDX-FileCopyrightText: 2023 Benjamin Grande M. S. <ben.grande.b@gmail.com>
##
## SPDX-License-Identifier: AGPL-3.0-or-later
set -eu
usage(){
echo "Usage: ${0##*/} PROJECT [PROJECT ...]"
}
# get_scriptlet scriptlet-action
# [pre|post]-[install|upgrade], [pre|post]un-[uninstall|upgrade]
## Get scriptlet command, else fail safe.
get_scriptlet(){
scriptlet="$1"
sed -n "/^<\!-- pkg:begin:${scriptlet} -->$/,/^<\!-- pkg:end:${scriptlet} -->$/p" "${readme}" \
| grep -v -e '^```\S*$' -e "^<\!-- " | sed "s/^sudo //" || echo "true"
}
get_spec(){
"${spec_get}" "${project}" "${1}"
}
gen_spec(){
project="${1}"
## Test if a standard option works without error.
get_spec name >/dev/null
group="$(get_spec group)"
template="rpm_spec/template/template.spec"
target="rpm_spec/${group}-${project}.spec"
## Escape multiline strings for sed
escaped_key(){
echo "${1}" | sed ':a;N;$!ba;s/\n/\\n /g' | sed 's/\$/\\$/'
}
readme="$(get_spec readme)"
pre_install="$(escaped_key "$(get_scriptlet pre-install)")"
pre_upgrade="$(escaped_key "$(get_scriptlet pre-upgrade)")"
post_install="$(escaped_key "$(get_scriptlet post-install)")"
post_upgrade="$(escaped_key "$(get_scriptlet post-upgrade)")"
preun_uninstall="$(escaped_key "$(get_scriptlet preun-uninstall)")"
preun_upgrade="$(escaped_key "$(get_scriptlet preun-upgrade)")"
postun_uninstall="$(escaped_key "$(get_scriptlet postun-uninstall)")"
postun_upgrade="$(escaped_key "$(get_scriptlet postun-upgrade)")"
version="$(get_spec version)"
changelog="$(get_spec changelog)"
requires="$(get_spec requires)"
sed \
-e "s/@PRE_INSTALL@/${pre_install}/" \
-e "s/@PRE_UPGRADE@/${pre_upgrade}/" \
-e "s/@POST_INSTALL@/${post_install}/" \
-e "s/@POST_UPGRADE@/${post_upgrade}/" \
-e "s/@PREUN_UNINSTALL@/${preun_uninstall}/" \
-e "s/@PREUN_UPGRADE@/${preun_upgrade}/" \
-e "s/@POSTUN_UNINSTALL@/${postun_uninstall}/" \
-e "s/@POSTUN_UPGRADE@/${postun_upgrade}/" \
-e "s/@VERSION@/${version}/" \
-e "s/@PROJECT@/${project}/" \
-e "/@CHANGELOG@/d" \
"${template}" | tee "${target}" >/dev/null
requires_key=""
for r in $(printf %s"${requires}" | tr " " "\n"); do
requires_key="${requires_key}\nRequires: ${group}-${r}"
done
sed -i "s/@REQUIRES@/${requires_key}/" "${target}" >/dev/null
echo "${changelog}" | tee -a "${target}" >/dev/null
}
case "${1-}" in
""|-h|--?help) usage; exit 1;;
esac
command -v git >/dev/null ||
{ printf "Missing program: git\n" >&2; exit 1; }
cd "$(git rev-parse --show-toplevel)"
spec_get="./scripts/spec-get.sh"
for p in "$@"; do
gen_spec "${p}"
done