blob: fbc2219dd4de0a609e48978cccb5c01137ae1ef6 (
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
|
#!/bin/sh -x
# Copyright (c) 2002,2003 Alexey Zelkin <phantom@FreeBSD.org>
#
# ent.sh -- this script checks {authors,teams}.ent files for correctness
#
# $FreeBSD$
: ${CVSROOT=/home/dcvs}
prefix=doc/en_US.ISO8859-1/share/sgml
cvs='cvs -Q -R co -p'
diff='diff -u'
tmp=${TMPDIR-/tmp}/_entities
ckfile() {
ckf=$1
$cvs $prefix/$ckf 2>/dev/null |
grep ENTITY |
awk '{ print $2 }' > $tmp.entsrc
sort -u $tmp.entsrc > $tmp.entsrc2
$diff $tmp.entsrc $tmp.entsrc2 > $ckf.order
$cvs $prefix/$ckf 2>/dev/null |
perl -ne 'print "$1 -- $2\n" if /ENTITY ([^ ]+).*<email>(.*)<\/email>/' |
grep -vi freebsd.org > $ckf.addr
}
ckresults() {
ckf=$1
if [ -s $ckf.order ]; then
echo "Ordering check for $ckf failed. See $ckf.ordering file for details."
else
rm -f $ckf.order
echo "Ordering check for $ckf is Ok. "
fi
if [ -s $ckf.addr ]; then
echo "Email addresses for $ckf failed. See $ckf.addr file for details."
else
rm -f $ckf.addr
echo "Email addresses check for $ckf is Ok. "
fi
}
ckfile "authors.ent"
ckfile "teams.ent"
echo
ckresults "authors.ent"
ckresults "teams.ent"
rm -f $tmp.entsrc $tmp.entsrc2
|
