|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T d
Length: 1417 (0x589)
Types: TextFile
Names: »distf«
└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
└─⟦3658e588a⟧ »EurOpenD3/mail/mh/mh-6.7.tar.Z«
└─⟦c75e36ecb⟧
└─⟦this⟧ »mh-6.7/miscellany/mtrenv/bin/distf«
: run this script through /bin/sh
: PATH=:/bin:/usr/bin:/usr/ucb:/usr/uci:/usr/uci/lib/mh; export PATH
case $LOCAL in
"") LOCAL="`rprompt %h`"
export LOCAL ;;
esac
F="" H="" N=F T=+${LOCAL}$$
for A in $*
do
case $A in
-nov*) N=F ;;
-v*) N=T ;;
-*) echo "distf: $A unknown" 1>&2
exit 1 ;;
+*|@*) case $F in
"") F=$A ;;
*) echo "distf: only one folder at a time" 1>&2
exit 1 ;;
esac ;;
*) case $H in
"") H=$A ;;
*) echo "distf: only one host at a time" 1>&2
exit 1 ;;
esac ;;
esac
done
case $F in
"") F=+outbox ;;
esac
case $H in
"") echo "usage: distf hostname [+folder]" 1>&2
exit 1 ;;
esac
prf=/tmp/prf$$ ctx=/tmp/ctx$$
trap "rm -f $prf $ctx" 0 1 2 3 13 15
rm -f $prf
echo "MH-Sequences:" > $prf
cat ${MH-$HOME/.mh_profile} >> $prf
MH="$prf" ; export MH
rm -f $ctx
cp ${MHCONTEXT-`mhpath +`/context} $ctx
MHCONTEXT="$ctx" ; export MHCONTEXT
if mhpath $F all > /dev/null;
then
C="rcp -r `mhpath $F` $H:`rsh $H -n mhpath $T`"
case $N in
T) echo $C ;;
esac
if $C;
then
case $N in
F) C="rsh $H -n packit $T; rmf $T" ;;
T) C="rsh $H -n packit -v $T; rmf $T"
echo $C ;;
esac
if $C;
then
C="rmm $F all"
case $N in
T) echo "rmm $F all" ;;
esac
if $C;
then
exit 0;
else
exit 1;
fi
else
exit 1;
fi
else
exit 1;
fi
else
exit 1;
fi
exit 0