Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
builtin cd $1
3 
echo '<HEAD>'
4 
echo '<TITLE>plan 9 man section '$1'</TITLE>'
5 
echo '</HEAD>'
6 
echo '<BODY>'
7 
echo '<B>[<A HREF="/sys/man/index.html">manual index</A>]</B>'
8 
echo -n '<H2>Plan 9 from Bell Labs - Section '$1' - '
9 
switch($1){
10 
case 1
11 
	echo -n Commands
12 
case 2
13 
	echo -n System and Library Calls
14 
case 3
15 
	echo -n Devices
16 
case 4
17 
	echo -n File Servers
18 
case 5
19 
	echo -n Plan 9 File Protocol, 9P
20 
case 6
21 
	echo -n File Formats, Misc
22 
case 7
23 
	echo -n Databases
24 
case 8
25 
	echo -n System Administration
26 
}
27 
echo '</H2>'
28 
echo '<HR>'
29 
echo '<DL>'
30 
for (i in [a-z0-9:]*) {
31 
	switch($1/$i){
32 
	case 1/ap 1/aviation 1/distill 1/dup 1/games 1/lml 1/noweb 1/pac
33 
	case 2/button 2/fmenu 2/ftree
34 
	case 6/noweb
35 
	case 7/audio 7/chdb 7/music 7/road
36 
		;
37 
 	case *
38 
		echo '<DT><A HREF="/magic/man2html/'$1/$i'">'$i'</A>'
39 
		awk '
40 
		BEGIN { syms = ""; indesc = 0; desc = ""; }
41 
		/.SH *NAME/,/.SH *(DES|SYN)/ {
42 
			if($1 != "\.SH"){
43 
				if($1 ~ /^\..*/)
44 
					i = 2;
45 
				else
46 
					i = 1;
47 
				for(; i <= NF; i++){
48 
					if(indesc){
49 
						desc = desc " " $i;
50 
					} else if($i ~ /^\\?-.*/) {
51 
						indesc = 1;
52 
					} else {
53 
						syms = syms " " $i;
54 
					}
55 
				}
56 
			}
57 
		}
58 
		END { print "- " desc; print "<DD><TT>" syms "</TT>"}
59 
		' $i
60 
		echo '</DT>'
61 
	}
62 
}
63 
echo '</DL>'