blob: 6214571b951318f88372c44e2308417d261f4f88 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
#!/bin/rc
rfork n
cd $1
*=(`{ls -drp [0-9]*})
while(! ~ $#* 0 1){
diff -n $2/index.txt $1/index.txt | awk -F'[\/ :]' '
$1 ~/^[0-9]+$/ {
getA = "cat "$5"/current | sed -n -e ''1d; /^A/s/^A//p; /^#/q''"
getA | getline A; close getA
$1 = t2d($1)
$5 = t2d($5)
print "\n" A ":\n" $1":"$3" "$4" "$5":"$7
next
}
{ print }
function t2d(t) {
c = "date "t; c|getline l; close c
split(l, a, "[ :]+")
return a[1]" "a[2]" "a[3]" "a[4]":"a[5]" "a[8]"("t")"
}'
shift
}
echo clean >/dev/ctl >[2]/dev/null
|
