|
|
1.1 root 1: #! /bin/csh
2: # @(#)remdiff 4.1 (Berkeley) 1/1/83
3: #
4: # usage: uudiff directory-local sys![directory-remote]
5: #
6: set UUDIR=/usr/src/cmd/uudiff
7: set UUCP=/usr/src/cmd/uucp
8: set SPOOL=/usr/tmp/uucp
9: set UNIXNAME=vax1
10: set DIFF=YES
11: case $1 in
12: -d) set DIFF=NO; shift;;
13: esac
14:
15: set HERE=`pwd`
16: set ME=`getuid`
17:
18: set LOCAL=$1
19: set SYS=`echo $2 | sed "s/!.*//"`
20: if [ $SYS = $2 ]
21: then set SYS=$UNIXNAME
22: fi
23:
24: set REMOTE=`echo $2 | sed "s/.*!//"`
25: if [ x$REMOTE = x ]
26: then set $REMOTE = $LOCAL
27: fi
28:
29: set LOCAL=`$UUDIR/lenrem $LOCAL $HERE`
30: set REMOTE=`$UUDIR/lenrem $REMOTE $HERE`
31: set LOCDIR=$LOCAL
32: set DIR=YES
33: set REMDIR=$REMOTE
34: if [ -f $LOCDIR ]
35: then
36: set LOCDIR=`$UUDIR/trim $LOCDIR`
37: set REMDIR=`$UUDIR/trim $REMDIR`
38: set DIR=NO
39: fi
40:
41: cat >zza$pid <<!
42: $UUCP/filsum $REMOTE >zzb$pid
43: !
44: uucp -f zza$pid $SYS!ef$pid
45: $UUCP/tdemon >>/$UUCP/tmess &
46: if [ $SYS = research ]
47: then
48: cat >$SPOOL/cq$pid <<%
49: zzb$pid
50:
51: cp zzb$pid $HERE/zzc$pid
52: %
53: else
54: uucp -f -w $SYS!zzb$pid $HERE/zzc$pid
55: fi
56: $UUCP/tdemon >>/$UUCP/tmess &
57: $UUCP/filsum $LOCAL >zzd$pid
58: cat >$SPOOL/cz$pid <<!
59: $HERE/zzc$pid
60:
61: chdir $HERE
62: cat >zzy$pid <<%
63: rm zzb$pid
64: %
65: uucp -f zzy$pid $SYS!ey$pid
66: rm zzy$pid
67: cat >uudiff$pid <<%
68: uudiff comparison of
69: $LOCAL here
70: with
71: $REMOTE on system $SYS
72:
73:
74:
75: %
76: $UUDIR/run1 zzd$pid zzc$pid zzl$pid | sort >>uudiff$pid
77:
78: cat >zzm$pid <<%
79: cg$pid
80: %
81: cat >zzn$pid <<%
82:
83: chdir $HERE
84: %
85:
86: if [ $DIFF = YES ]
87: then
88: if [ $DIR = NO ]
89: then $UUDIR/locpart $LOCAL >zzl$pid
90: fi
91: for f in \`cat zzl${pid}\`
92: do
93: if $UUDIR/printable $LOCDIR/\$f
94: then
95: if [ $DIR = YES ]
96: then uucp $SYS!$REMDIR/\$f \$f.$pid
97: else uucp $SYS!$REMOTE \$f.$pid
98: fi
99: echo $HERE/\$f.$pid >>zzm$pid
100: cat >>zzn$pid <<%
101:
102: echo >>uudiff$pid
103: echo DIFF of \$f: '(< here, > remote)' >>uudiff$pid
104: diff $LOCDIR/\$f \$f.$pid >>uudiff$pid
105: %
106: fi
107: done
108: fi
109:
110: cat >>zzn$pid <<%
111: echo uudiff$pid arrived in $HERE "|" mail $ME
112: rm zz?$pid
113: %
114: cat zzm$pid zzn$pid >>$SPOOL/cg$pid
115: !
116: $UUCP/tdemon >>/$UUCP/tmess
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.