Go to most recent revision |
Details |
Last modification |
View Log
| RSS feed
| Rev |
Author |
Line No. |
Line |
| 2 |
- |
1 |
#!/bin/rc
|
|
|
2 |
|
|
|
3 |
if(~ $#* 0 1){
|
|
|
4 |
echo >[1=2] usage: adiff file1 file2
|
|
|
5 |
echo >[1=2] or adiff file1 file2... dir
|
|
|
6 |
exit usage
|
|
|
7 |
}
|
|
|
8 |
|
|
|
9 |
dir = /mnt/wsys
|
|
|
10 |
if(! test -f $dir/cons)
|
|
|
11 |
dir = /mnt/term/$dir
|
|
|
12 |
id=`{cat $dir/new/ctl}
|
|
|
13 |
id=$id(1)
|
|
|
14 |
|
|
|
15 |
l=$1
|
|
|
16 |
r=$2
|
|
|
17 |
if (test -d $1) l=$1/`{basename $2}
|
|
|
18 |
if not if (test -d $2) r=$2/`{basename $1}
|
|
|
19 |
|
|
|
20 |
echo 'name '^`{pwd}^/-diff-^`{basename $l} > $dir/$id/ctl
|
|
|
21 |
|
|
|
22 |
diff $* | awk -v 'l='$l -v 'r='^$r '/^diff/ {l=$2; r=$3; next} /^[1-9]/ {sub("[acd]", " & " r ":"); sub("^", l ":", $0)}
|
|
|
23 |
{print $0}' > $dir/$id/body
|
|
|
24 |
echo clean > $dir/$id/ctl
|