diff options
Diffstat (limited to 'gnu/usr.bin/man/makewhatis/makewhatis.sh')
| -rw-r--r-- | gnu/usr.bin/man/makewhatis/makewhatis.sh | 120 |
1 files changed, 0 insertions, 120 deletions
diff --git a/gnu/usr.bin/man/makewhatis/makewhatis.sh b/gnu/usr.bin/man/makewhatis/makewhatis.sh deleted file mode 100644 index 28b871d..0000000 --- a/gnu/usr.bin/man/makewhatis/makewhatis.sh +++ /dev/null @@ -1,120 +0,0 @@ -#!/bin/sh -# -# makewhatis -- update the whatis database in the man directories. -# -# Copyright (c) 1990, 1991, John W. Eaton. -# -# You may distribute under the terms of the GNU General Public -# License as specified in the README file that comes with the man -# distribution. -# -# John W. Eaton -# jwe@che.utexas.edu -# Department of Chemical Engineering -# The University of Texas at Austin -# Austin, Texas 78712 - -PATH=/bin:/usr/local/bin:/usr/ucb:/usr/bin - -if [ $# = 0 ] -then - echo "usage: makewhatis directory [...]" - exit 1 -fi -for dir in $* -do - cd $dir - for subdir in man* - do - if [ -d $subdir ] - then - for f in `find $subdir -type f -print` - do - suffix=`echo $f | sed -e 's/.*\\.//'` - if [ ".$suffix" = "%compext%" ]; then - output=%zcat% - else - output=cat - fi - $output $f | \ - sed -n '/^\.TH.*$/p - /^\.Dt.*$/p - /^\.S[hH][ ]*NAME/,/^\.S[hH]/p'|\ - sed -e 's/\\[ ]*\-/-/ - s/^.P[Pp].*$// - s/\\(em// - s/\\fI// - s/\\fR//' |\ - awk 'BEGIN {insh = 0; inSh = 0; Nd = 0} { - if ($1 == ".TH" || $1 == ".Dt") - sect = $3 - else if (($1 == ".br" && insh == 1)\ - || ($1 == ".SH" && insh == 1)\ - || ($1 == ".Sh" && inSh == 1)) { - if (i > 0 && nc > 0) { - for (k= 1; k <= nc; k++) { - namesect = sprintf("%s (%s)", name[k], sect) - printf("%s", namesect) - printf(" - ") - for (j = 0; j < i-1; j++) - printf("%s ", desc[j]) - printf("%s\n", desc[i-1]) - } - } - count = 0 - i = 0 - nc = 0 - } else if ($1 == ".SH" && insh == 0) { - insh = 1 - count = 0 - i = 0 - nc = 0 - } else if ($1 == ".Sh" && inSh == 0) { - inSh = 1 - i = 0 - nc = 0 - } else if (insh == 1) { - count++ - if (count == 1 && NF > 2) { - start = 2 - for (k = 1; k <= NF; k++) - if ($k == "-") { - start = k + 1 - break - } else { - sub(",","",$k) - if ($k != "") - name[++nc] = $k - } - if (NF >= start) - for (j = start; j <= NF; j++) - desc[i++] = $j - } else { - for (j = 1; j <= NF; j++) - desc[i++] = $j - } - } else if ($1 == ".Nm" && inSh == 1 && Nd == 0) { - for (k = 2; k <= NF; k++) { - sub(",","",$k) - if ($k != "") - name[++nc] = $k - } - } else if ($1 == ".Nd" && inSh == 1) { - Nd = 1 - for (j = 2; j <= NF; j++) - desc[i++] = $j - } else if (Nd == 1) { - start = 1 - if ($1 ~ /\..*/) - start = 2 - for (j = start; j <= NF; j++) - desc[i++] = $j - } - }' - done - fi - done | sort | colrm 80 | uniq > $dir/whatis.db.tmp - mv $dir/whatis.db.tmp $dir/whatis -done - -exit |
