ref: a5cb451b299b03f44154fac5780b6a57ca130ce0
dir: /dis/sig/
#!/dis/sh.dis # Usage: sig key ... # prints out function signatures by grepping the manual # stolen from plan 9 via p9p and caerwyn load std x=$* *=`{echo $x | tr A-Z a-z | tr -dc 'a-z0-9_ \012'} # fold case, delete funny chars if {no $*} { echo Usage: sig function ... >[1=2] raise 'usage' } for i in $* { files=`{grep -il '[ ]*'$i':[ ]*fn\(' /man/2/*} for j in $files { sect=`{basename $j}^'(2)' {echo .nr LL 20i; sed -n '/^.SH SYNOPSIS/,/^.SH.*DESCR/p' $j} | # os nroff -man | sed ' :a /,$|:$/ { N s/\n// } ta s/[ ]+/ /g' | grep -i '[ ]*'$i':[ ]*fn\(' | sed 's/^[ ]+/ /; s/;$/; \# '$sect'/' } } exit