# This is a shell archive.  Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file".
#
# Wrapped by Rick Walker <walker@jr> on Wed Oct 23 13:10:40 1996
#
# This archive contains:
#	list1sed.cmd	cpdir.sh	do_sed.sh	rename.sh	
#

LANG=""; export LANG
PATH=/bin:/usr/bin:$PATH; export PATH


rm -f /tmp/uud$$
(echo "begin 666 /tmp/uud$$\n#;VL*n#6%@x\n \nend" | uudecode) >/dev/null 2>&1
if [ X"`cat /tmp/uud$$ 2>&1`" = Xok ]
then
	unpacker=uudecode
else
	echo Compiling unpacker for non-ascii files
	pwd=`pwd`; cd /tmp
	cat >unpack$$.c <<'EOF'
#include <stdio.h>
#define C (*p++ - ' ' & 077)
main()
{
	int n;
	char buf[128], *p, a,b;

	scanf("begin %o ", &n);
	gets(buf);

	if (freopen(buf, "w", stdout) == NULL) {
		perror(buf);
		exit(1);
	}

	while (gets(p=buf) && (n=C)) {
		while (n>0) {
			a = C;
			if (n-- > 0) putchar(a << 2 | (b=C) >> 4);
			if (n-- > 0) putchar(b << 4 | (a=C) >> 2);
			if (n-- > 0) putchar(a << 6 | C);
		}
	}
	exit(0);
}
EOF
	cc -o unpack$$ unpack$$.c
	rm unpack$$.c
	cd $pwd
	unpacker=/tmp/unpack$$
fi
rm -f /tmp/uud$$

echo x - list1sed.cmd '[non-ascii]'
$unpacker <<'@eof'
begin 775 list1sed.cmd
M<R,B:'1T<#HO8F]T+V-P7VAO;64B(R(N+B\N+B]H=&UL+W1E;7!H;VUE+FATX
M;2(C"G,C(FAT=' Z+R]W=W<N:'!L+FAP+F-O;2]B;W0O8W!?:&]M92(C(BXNX
M+RXN+VAT;6PO=&5M<&AO;64N:'1M(B,*<R-D871E+FAT;6PC9&%T92YH=&TCX
M"G,C:6YD97@N:'1M;"-I;F1E>"YH=&TC"G,C<W5B:F5C="YH=&UL(W-U8FIEX
M8W0N:'1M(PIS(V%U=&AO<BYH=&UL(V%U=&AO<BYH=&TC"G,C(FAT=' Z+V)OX
M=&%N>2]P=6)L:6-?:'1M;"]C<"]H=&UL+VUA<F-H:79E<RYH=&UL(B,B+BXOX
M+BXO:'1M;"]M87)C:&EV92YH=&TB(PHO/&$@:')E9CTB6S M.5U;,"TY75LPX
>+3E=6S M.5TN:'1M;"(O<R\N:'1M;"(O+FAT;2(O                    X
                                                             X
end
@eof

chmod 775 list1sed.cmd

echo x - cpdir.sh
cat >cpdir.sh <<'@EOF'
#!/bin/ksh
# copy files/tree from directory $1 to $2
(cd $1 ; tar cf - . ) | (cd $2 ; tar xf - )
@EOF

chmod 775 cpdir.sh

echo x - do_sed.sh
cat >do_sed.sh <<'@EOF'
#!/bin/ksh

# used to apply the sed commands in file arg1 to the file named in arg2
# make multiple passes if pattern file is greater than 100 line limit

rm -f /tmp/sedtmp*

split -l 95 $1 /tmp/sedtmp$$

for sedfile in /tmp/sedtmp*
do
    sed -f $sedfile $2 > /tmp/--temp--.---
    mv /tmp/--temp--.--- $2
done

rm -f /tmp/sedtmp*
@EOF

chmod 775 do_sed.sh

echo x - rename.sh '[non-ascii]'
$unpacker <<'@eof'
begin 775 rename.sh
M(R$O8FEN+V-S: HC(')E;F%M93H@82!#('-H96QL('-C<FEP="!F<F]M(%-OX
M8F5L;" B54Y)6"!3>7-T96T@5BP@02!0<F%C=&EC86P@1W5I9&4B"B,*(R!5X
M<V%G93H@<F5N86UE(&%R9S$@87)G,@HC(" @(" @("!C:&%N9V5S('1H92!SX
M=')I;F<@87)G,2!I;B!T:&4@9FEL96YA;65S(&]F(&9I;&5S"B,@(" @(" @X
M(&EN('1H92!W;W)K:6YG(&1I<F5C=&]R>2!T;R!T:&4@<W1R:6YG(&%R9S(*X
M(PII9B H)"-A<F=V("$](#(I(&=O=&\@=7-A9V4*9F]R96%C:"!I("@@*B0QX
M*B I"B @("!M=B D:2!@96-H;R D:2!\('-E9" M;B!S+R0Q+R0R+W!@"F5NX
M9 IE>&ET(# *"G5S86=E.@IE8VAO(")5<V%G93H@<F5N86UE(&%R9S$@87)GX
),B(*97AI=" Q                                                X
                                                             X
end
@eof

chmod 775 rename.sh

rm -f /tmp/unpack$$
exit 0