1 # Usage: awk -f checkman.awk man?/*.?
4 # - .TH is first line, and has proper name section number
5 # - sections are in order NAME, SYNOPSIS, DESCRIPTION, EXAMPLES,
6 # FILES, SOURCE, SEE ALSO, DIAGNOSTICS, BUGS
7 # - there's a manual page for each cross-referenced page
11 # .SH sections should come in the following order
14 Weight["SYNOPSIS"] = 2
15 Weight["DESCRIPTION"] = 4
17 Weight["EXAMPLES"] = 16
20 Weight["SEE ALSO"] = 128
21 Weight["DIAGNOSTICS"] = 256
22 Weight["SYSTEM CALLS"] = 512
28 Skipdirs["aviation"] = 1
36 Skipdirs["service.alt"] = 1
43 Omitted["mousereset"] = 1
44 Omitted["postalias"] = 1
45 Omitted["mksacfs"] = 1
50 Omitted["netlib_find"] = 1
51 Omitted["uuencode"] = 1
52 Omitted["uudecode"] = 1
55 Omitted["tcp17032"] = 1
56 Omitted["tcp17033"] = 1
59 Omitted["tcp7330"] = 1
62 Omitted["tcp1723"] = 1
64 Omitted["allmail"] = 1
66 Omittedlib["brk_"] = 1
67 Omittedlib["creadimage"] = 1
68 Omittedlib["main"] = 1
69 Omittedlib["oseek"] = 1
70 Omittedlib["sysr1"] = 1
76 if (substr(FILENAME, 2, 1) == "/")
78 else if (substr(FILENAME, 3, 1) == "/")
81 print "FILENAME", FILENAME, "not of form [0-9][0-9]?/*"
82 else if(!(substr(FILENAME, seclen+2, n-seclen-1) ~ /^[A-Z]+(.html)?$/)){
83 section = substr(FILENAME, 1, seclen)
84 name = substr(FILENAME, seclen+2, n-seclen-1)
85 if($1 != ".TH" || NF != 3)
86 print "First line of", FILENAME, "not a proper .TH"
87 else if(($2!="INTRO" || name!="0intro") && ($2 != toupper(name) || substr($3, 1, seclen) != section)){
88 print ".TH of", FILENAME, "doesn't match filename"
90 Pages[section "/" $2] = 1
97 print "Unterminated .EX in", FILENAME, ":", $0
99 if (substr($2, 1, 1) == "\"") {
101 print "Unneeded quote in", FILENAME, ":", $0
102 $2 = substr($2, 2, length($2)-2)
103 } else if (NF == 3) {
104 $2 = substr($2, 2) substr($3, 1, length($3)-1)
108 if(Sh == 0 && $2 != "NAME")
109 print FILENAME, "has no .SH NAME"
113 print "Heading", $2, "out of order in", FILENAME
120 print "Nested .EX in", FILENAME, ":", $0
126 print "Bad .EE in", FILENAME, ":", $0
134 $1 == ".PD" || $1 == ".SH" || $1 == ".SS" || $1 == ".TH" {
143 if(smallspace && !lastre)
144 print "Possible missing .PD at " FILENAME ":" FNR
152 $0 ~ /^\.[A-Z].*\([1-9]\)/ {
153 if ($1 == ".IR" && $3 ~ /\([0-9]\)/) {
156 }else if ($1 == ".RI" && $2 == "(" && $4 ~ /\([0-9]\)/) {
159 }else if ($1 == ".IR" && $3 ~ /9.\([0-9]\)/) {
162 }else if ($1 == ".RI" && $2 == "(" && $4 ~ /9.\([0-9]\)/) {
166 print "Possible bad cross-reference format in", FILENAME ":" FNR
170 gsub(/[^0-9]/, "", section)
171 Refs[section "/" toupper(name)]++
175 print "Checking Cross-Referenced Pages"
178 split(tolower(i), a, "/")
179 print "grep -in '" a[2] "[ ]*\\(" a[1] "' ?/* # Need " tolower(i)
183 print "Checking commands"
184 getindex("/sys/man/1")
185 getindex("/sys/man/4")
186 getindex("/sys/man/7")
187 getindex("/sys/man/8")
188 getbinlist("/386/bin")
189 getbinlist("/rc/bin")
191 if (!(i in Index) && !(i in Omitted))
192 print "Need", i, "(in " List[i] ")"
196 if (!(i in Index) && (i in Omitted))
197 print "Omit", i, "(in " List[i] ")"
202 print "Checking libraries"
203 getindex("/sys/man/2")
204 getnmlist("/386/lib/lib9p.a")
205 getnmlist("/386/lib/libauth.a")
206 getnmlist("/386/lib/libauthsrv.a")
207 getnmlist("/386/lib/libbin.a")
208 getnmlist("/386/lib/libbio.a")
209 getnmlist("/386/lib/libc.a")
210 getnmlist("/386/lib/libcontrol.a")
211 getnmlist("/386/lib/libdisk.a")
212 getnmlist("/386/lib/libdraw.a")
213 getnmlist("/386/lib/libflate.a")
214 getnmlist("/386/lib/libframe.a")
215 getnmlist("/386/lib/libgeometry.a")
216 getnmlist("/386/lib/libhtml.a")
217 getnmlist("/386/lib/libhttpd.a")
218 getnmlist("/386/lib/libip.a")
219 getnmlist("/386/lib/libmach.a")
220 getnmlist("/386/lib/libmemdraw.a")
221 getnmlist("/386/lib/libmemlayer.a")
222 getnmlist("/386/lib/libmp.a")
223 getnmlist("/386/lib/libndb.a")
224 getnmlist("/386/lib/libplumb.a")
225 getnmlist("/386/lib/libregexp.a")
226 getnmlist("/386/lib/libsec.a")
227 getnmlist("/386/lib/libstdio.a")
228 getnmlist("/386/lib/libString.a")
229 getnmlist("/386/lib/libthread.a")
231 if (!(i in Index) && !(i in Omittedlib))
232 print "Need", i, "(in " List[i] ")"
236 if (!(i in Index) && (i in Omittedlib))
237 print "Omit", i, "(in " List[i] ")"
241 func getindex(dir, fname)
244 while ((getline < fname) > 0)
249 func getbinlist(dir, cmd, subdirs, nsd)
251 cmd = "ls -p -l " dir
253 while (cmd | getline) {
255 if (!($10 in Skipdirs))
257 } else if ($10 !~ "^_")
260 for ( ; nsd > 0 ; nsd--)
261 getbinlist(dir "/" subdirs[nsd])
265 func getnmlist(lib, cmd)
267 cmd = "nm -g -h " lib
268 while (cmd | getline) {
269 if (($1 == "T" || $1 == "L") && $2 !~ "^_")