etc/grog.sh

   1 #!/bin/sh
   2 # grog -- guess options for groff command
   3 # Like doctype in Kernighan & Pike, Unix Programming Environment, pp 306-8.
   4
   5 soelim=gsoelim
   6
   7 opts=
   8
   9 for arg
  10 do
  11         case "$arg" in
  12         --)
  13                 shift; break;;
  14         -)
  15                 break;;
  16         -*)
  17                 opts="$opts $arg"; shift;;
  18         *)
  19                 break;;
  20         esac
  21 done
  22
  23 egrep -h '^\.(P|[LI]P|[pnil]p|Dd|Tp|Dp|De|Cx|Cl|Oo|Oc|TS|EQ|TH|SH|so|\[|R1)' $* \
  24 | sed -e '/^\.so/s/^.*$/.SO_START\
  25 &\
  26 .SO_END/' \
  27 | $soelim \
  28 | egrep '^\.(P|[LI]P|[pnil]p|Dd|Tp|Dp|De|Cx|Cl|Oo|Oc|TS|EQ|TH|SH|\[|R1|SO_START|SO_END)' \
  29 | awk '
  30 /^\.SO_START$/ { so = 1 }
  31 /^\.SO_END$/ { so = 0 }
  32 /^\.TS/ { tbl++; if (so > 0) soelim++ }
  33 /^\.PS([ 0-9.<].*)?$/ { pic++; if (so > 0) soelim++ }
  34 /^\.EQ/ { eqn++; if (so > 0) soelim++ }
  35 /^\.(R1|\[)/ { refer++; if (so > 0) soelim++ }
  36 /^\.TH/ { TH++ }
  37 /^\.[PLI]P/ { PP++ }
  38 /^\.P$/ { P++ }
  39 /^\.SH/ { SH++ }
  40 /^\.[pnil]p/ { me++ }
  41 /^\.Dd/ { mdoc++ }
  42 /^\.(Tp|Dp|De|Cx|Cl)/ { mdoc_old++ }
  43 /^\.Oo/ { Oo++ }
  44 /^\.Oc/ { Oo-- }
  45
  46 END {
  47         if (files ~ /^-/)
  48                 files = "-- " files
  49         printf "groff"
  50         if (pic > 0 || tbl > 0 || eqn > 0 || refer > 0) {
  51                 printf " -"
  52                 if (soelim > 0) printf "s"
  53                 if (refer > 0) printf "R"
  54                 if (pic > 0) printf "p"
  55                 if (tbl > 0) printf "t"
  56                 if (eqn > 0) printf "e"
  57         }
  58         if (me > 0)
  59                 printf " -me"
  60         else if (SH > 0 && TH > 0)
  61                 printf " -man"
  62         else if (PP > 0)
  63                 printf " -ms"
  64         else if (P > 0)
  65                 printf " -mm"
  66         else if (mdoc > 0) {
  67                 if (mdoc_old > 0 || Oo > 0)
  68                         printf " -mdoc.old"
  69                 else
  70                         printf " -mdoc"
  71         }
  72         if (opts != "")
  73                 printf "%s", opts
  74         if (files != "")
  75                 printf " %s", files
  76         print
  77 }' "opts=$opts" "files=$*" -