45 lines
740 B
Text
45 lines
740 B
Text
:
|
|
# @(#) uudec.sh 1.0 93/11/22
|
|
# 92/08/04 john@armory.com (John H. DuBois III)
|
|
# 93/11/22 Added help.
|
|
|
|
isfalse()
|
|
{
|
|
test 0 -eq "$1"
|
|
}
|
|
|
|
phelp()
|
|
{
|
|
"$name: process uuencoded files.
|
|
Usage: uudec [-h] filename ...
|
|
Options:
|
|
-h: Print this help."
|
|
}
|
|
|
|
name=${0##*/}
|
|
|
|
typeset -i force=0
|
|
|
|
while getopts "hf" opt; do
|
|
case "$opt" in
|
|
h) phelp; exit 0;;
|
|
f) force=1;;
|
|
*) echo "$Usage" 1>&2; exit 2;;
|
|
esac
|
|
done
|
|
|
|
shift $((OPTIND - 1))
|
|
|
|
for file; do
|
|
echo "$file"
|
|
while read b mode filename && [ "$b" != begin ]; do :; done < "$file"
|
|
if [ "$b" = begin ]; then
|
|
if [ -f "$filename" ] && isfalse $force; then
|
|
echo "Output file \"$filename\" exists. Not written."
|
|
else
|
|
uudecode "$file"
|
|
fi
|
|
else
|
|
echo "No begin line."
|
|
fi
|
|
done
|