BSD 4_3_Net_2 release

[unix-history] / usr / src / usr.bin / groff / etc / grog.sh

#!/bin/sh
# grog -- guess options for groff command
# Like doctype in Kernighan & Pike, Unix Programming Environment, pp 306-8.

soelim=gsoelim

opts=

for arg
do
       case "$arg" in
       --)
               shift; break;;
       -)
               break;;
       -*)
               opts="$opts $arg"; shift;;
       *)
               break;;
       esac
done

egrep -h '^\.(P|[LI]P|[pnil]p|TS|EQ|TH|SH|so)' $* \
| sed -e '/^\.so/s/^.*$/.SO_START\
&\
.SO_END/' \
| $soelim \
| egrep '^\.(P|[LI]P|[pnil]p|TS|EQ|TH|SH|SO_START|SO_END)' \
| awk '
/^\.SO_START$/ { so = 1 }
/^\.SO_END$/ { so = 0 }
/^\.TS/ { tbl++; if (so > 0) soelim++ }
/^\.PS/ { pic++; if (so > 0) soelim++ }
/^\.EQ/ { eqn++; if (so > 0) soelim++ }
/^\.TH/ { TH++ }
/^\.[PLI]P/ { PP++ }
/^\.P$/ { P++ }
/^\.SH/ { SH++ }
/^\.[pnil]p/ { me++ }

END {
       if (files ~ /^-/)
               files = "-- " files
       printf "groff"
       if (pic > 0 || tbl > 0 || eqn > 0) {
               printf " -"
               if (soelim > 0) printf "s"
               if (pic > 0) printf "p"
               if (tbl > 0) printf "t"
               if (eqn > 0) printf "e"
       }
       if (me > 0)
               printf " -me"
       else if (SH > 0 && TH > 0)
               printf " -man"
       else if (PP > 0)
               printf " -ms"
       else if (P > 0)
               printf " -mm"
       if (opts != "")
               printf "%s", opts
       if (files != "")
               printf " %s", files
       print
}' "opts=$opts" "files=$*" -