blob: 295c070ea1f9b631ca0d5218bbe8b383ea4781f2 (
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
set x $*
. ./.param
for dir in $DIRLST
do
> $TMPDIR/cref$dir
cd $MANDIR/man$dir
for file in $FILLST
do
so=`line < $file | sed "s/ .*$//"`
if test "$so" = ".so"
then
continue
fi
grep ".*([1-8][cmsgxjvCMSGXJV]*)" $file >> $TMPDIR/cref$dir
done
cd $TMPDIR
echo " ," >> cref$dir
date > lower.suf$dir
echo >> lower.suf$dir
date > badcref$dir
echo >> badcref$dir
ed - cref$dir >> lower.suf$dir <<!
g/ *\(([1-8][CMSGXJVcmsgxjv]*)\)/s//\1/
1,\$s/ /\\
/g
1,\$s/ /\\
/g
1,\$s/,/\\
/g
v/(/d
g/\\\\\^/s///
g/\\\\\|/s///
g/([1-8][cgmsxjv])/p
g//d
g/^(/d
g/(/s//./
g/^\./d
g/C).*/s//c/
g/G).*/s//g/
g/M).*/s//m/
g/S).*/s//s/
g/X).*/s//x/
g/J).*/s//j/
g/V).*/s//v/
g/).*/s///
w
q
!
sort -i cref$dir | uniq > tmp.$$
while read cref
do
sect=`echo $cref | sed "s/.*\.\(.\).*/\1/"`
try=`ls $MANDIR/man$sect/$cref 2>&1`
if test "$try" = "$MANDIR/man$sect/$cref"
then
continue
else
echo $try | sed -e "s;$MANDIR/man..;;" -e "s; not found;;" >> badcref$dir
fi
done < tmp.$$
ed - badcref$dir <<!
g/\.\([1-8]\)/s//(\1/
g/c$/s//C)/
g/m$/s//M)/
g/s$/s//S)/
g/g$/s//G)/
g/x$/s//X)/
g/j$/s//J)/
g/v$/s//V)/
g/[^)]$/s/$/)/
1s/.$//
w
q
!
rm -f tmp.$$ cref$dir
done
|
