1 #!/usr/local/plan9/bin/rc
3 # doctype: synthesize proper command line for troff
29 grep -h '\$LIST|\|reference|^\.(EQ|TS|\[|PS|IS|GS|G1|GD|PP|BM|LP|BP|PI|cstart|begin|TH...)|^\.P$' $* |
32 BEGIN { files = "'$files'" }
41 /^\.G1/ { grap++; pic++ }
42 /^\.GD/ { dag++; pic++ }
44 /\|reference/ { prefer++ }
45 /^\.cstart/ { chem++; pic++ }
46 /^\.begin +dformat/ { dformat++; pic++ }
50 /^\.BP/ { pictures++ }
51 /^\.PI/ { pictures++ }
55 if (e) x = "refer -e " files " | "
56 else x = "refer " files "| "
59 else if (prefer) { x = "cat " files "| '$prefer'| "; files = "" }
60 if (tped) { x = x "tped " files " | "; files = "" }
61 if (dag) { x = x "dag " files " | "; files = "" }
62 if (ideal) { x = x "ideal -q " files " | "; files = "" }
63 if (grap) { x = x "grap " files " | "; files = "" }
64 if (chem) { x = x "chem " files " | "; files = "" }
65 if (dformat) { x = x "dformat " files " | "; files = "" }
66 if (pic) { x = x "pic " files " | "; files = "" }
67 if (tbl) { x = x "tbl " files " | "; files = "" }
68 if (eqn) { x = x "'$eqn' '$dev' " files " | "; files = "" }
71 else if (ms) x = x "-ms"
72 else if (mm) x = x "-mm"
73 if (lbits) x = x "-mbits"
74 if (pictures) x = x " -mpictures"
75 x = x " '$opt' '$dev' " files