mirror of
https://codeberg.org/kiss-community/repo
synced 2025-01-11 21:30:09 -07:00
46 lines
1.2 KiB
Bash
Executable File
46 lines
1.2 KiB
Bash
Executable File
#!/bin/sh
|
|
die() { echo "$1" >&2 ; exit 1 ; }
|
|
respond() { echo "$1" >&1 ; exit 0 ; }
|
|
|
|
tool=$(basename $0)
|
|
test "$1" = --version && respond "$tool (intltool 9.99.9)"
|
|
|
|
case "$tool" in
|
|
intltool-merge*) ;;
|
|
intltool-perl*)
|
|
test "$1" = -v && respond "This is not perl 5, version 99, subversion 9 (v5.99.9)"
|
|
test "$1" = -e && {
|
|
if test -n "$2" && test -z "$3" ; then
|
|
test "$2" = "require XML::Parser" && exit 0
|
|
printf "%s" "$2"|grep '^use 5\.[0-9]*\.[0-9]*;$' >/dev/null && exit 0
|
|
fi
|
|
die "$0: unsupported usage"
|
|
}
|
|
test "$2" = "printf '%vd', $^V" && respond "5.99.9"
|
|
test "$2" = "require XML::Parser" && exit 0
|
|
printf "%s" "$2" | grep '^use [0-9].[0-9].[0-9];$'>/dev/null 2>&1 && exit 0
|
|
die "$0: unsupported usage" ;;
|
|
*) die "$0: requested functionality not implemented" ;;
|
|
esac
|
|
|
|
larg=
|
|
sarg=
|
|
while test -n "$1" ; do
|
|
case "$1" in
|
|
-x|-u|-d) shift ; continue ;;
|
|
-c) shift ; shift ; continue ;;
|
|
esac
|
|
sarg="$larg"
|
|
larg="$1"
|
|
shift
|
|
done
|
|
test -z "$sarg" && die "$0: need at least 2 args"
|
|
test -r "$sarg" || die "$0: no read perms for $sarg"
|
|
if printf "%s" "$sarg"|grep "\.xml\.in$" >/dev/null 2>&1 ; then
|
|
sed -e 's,<_\([-A-Za-z0-9_]*\)>,<\1>,g' \
|
|
-e 's,</_\([-A-Za-z0-9_]*\)>,</\1>,g' \
|
|
< "$sarg" > "$larg"
|
|
else
|
|
sed 's/^_//' < "$sarg" > "$larg"
|
|
fi
|