|
|
1.1 root 1: #include "tdef.hd"
2: #include "strs.hd"
3:
4: /* Filenames */
5:
6: char newf[NS];
7:
8: #ifdef unix
9: struct {
10: char buf[NS];
11: } nextf[NSN] = {
12: "/usr/lib/tmac/tmac.",
13: "/usr/lib/tmac/tmac.",
14: "/usr/lib/tmac/tmac.",
15: "/usr/lib/tmac/tmac." };
16: int nfi = 19;
17: char suftab[] = "/usr/lib/suftab";
18: #ifdef NROFF
19: char termtab[NS] = "/usr/lib/term/tab";
20: int tti = 17;
21:
22: #ifndef NOCOMPACT
23: char cmpctf[40] = "/usr/lib/macros/cmp.n.d.";
24: char cmpctuf[40] = "/usr/lib/macros/ucmp.n.";
25: #endif
26:
27: #else
28:
29: char fontfile[40] = "/usr/lib/font/ft";
30: int ffi = 16;
31:
32: #ifndef NOCOMPACT
33: char cmpctf[40] = "/usr/lib/macros/cmp.t.d.";
34: char cmpctuf[40] = "/usr/lib/macros/ucmp.t.";
35: #endif
36:
37: #endif
38: #endif
39:
40: #ifdef tso
41:
42: #ifdef NROFF
43: char termtab[NS] = "\164\141\142"; /*tab*/
44: int tti = 3;
45: #else
46: char fontfile[40] = "\146\164"; /*ft*/
47: int ffi = 2;
48: #endif
49:
50: struct {
51: char buf[NS];
52: } nextf[NSN] = {
53: "\164\155\141\143\056", /*tmac.*/
54: "\164\155\141\143\056",
55: "\164\155\141\143\056",
56: "\164\155\141\143\056", };
57: int nfi = 5;
58:
59: #endif
60:
61: char obuf[OBUFSZ];
62: char *obufp = obuf;
63: int pto = 10000;
64: int pfrom = 1;
65: int print = 1;
66: #ifndef NROFF
67: int oldbits = -1;
68: int lg = LG;
69: #endif
70: int init = 1;
71: int fc = IMP;
72: int eschar = '\\';
73: int pl = 11*INCH;
74: int po = PO;
75: int dfact = 1;
76: int dfactd = 1;
77: int res = 1;
78: int smnt = 4;
79: int ascii = ASCII;
80: filedes ptid = PTID;
81: char ptname[] = "/dev/cat";
82: int pnlist[NPN] = {-1};
83: int *pnp = pnlist;
84: int npn = 1;
85: int npnflg = 1;
86: int xflg = 1;
87: int dpn = -1;
88: int totout = 1;
89: int ulfont = 1;
90: int ulbit = 1<<9;
91: int tabch = TAB;
92: int ldrch = LEADER;
93: int cd = 0;
94:
95: /* troff environment block */
96:
97: #ifndef INCORE
98: struct envblock eblock = { /* environment initialization */
99: #else
100: struct envblock eblock[NEV] = {
101: #endif
102: /* Eics */ ICS,
103: /* Eic */ 0,
104: /* Eicf */ 0,
105: /* Echbits */ 0,
106: /* Enmbits */ 0,
107: /* Eapts */ PS,
108: /* Eapts1 */ PS,
109: /* Epts */ PS,
110: /* Epts1 */ PS,
111: /* Efont */ FT,
112: /* Efont1 */ FT,
113: /* Esps */ SPS,
114: #ifndef NROFF
115: /* Espacesz */ SS,
116: /* Espbits */ 0,
117: #endif
118: /* Elss */ VS,
119: /* Elss1 */ VS,
120: /* Els */ 1,
121: /* Els1 */ 1,
122: /* Ell */ LL,
123: /* Ell1 */ LL,
124: /* Elt */ LL,
125: /* Elt1 */ LL,
126: /* Ead */ 1,
127: /* Enms */ 1,
128: /* Endf */ 1,
129: /* Efi */ 1,
130: /* Ecc */ '.',
131: /* Ec2 */ '\'',
132: /* Eohc */ OHC,
133: /* Ehyf */ 0,
134: /* Ehyoff */ 0,
135: /* Eun1 */ -1,
136: /* Etabc */ 0,
137: /* Edotc */ '.',
138: /* Eadsp */ 0,
139: /* Eadrem */ 0,
140: /* Elastl */ 0,
141: /* Enel */ 0,
142: /* Eadmod */ 0,
143: /* *Ewordp */ 0,
144: /* Espflg */ 0,
145: /* *Elinep */ 0,
146: /* *Ewdend */ 0,
147: /* *Ewdstart */ 0,
148: /* Ewne */ 0,
149: /* Ene */ 0,
150: /* Enc */ 0,
151: /* Enb */ 0,
152: /* Elnmod */ 0,
153: /* Enwd */ 0,
154: /* Enn */ 0,
155: /* Eni */ 0,
156: /* Eul */ 0,
157: /* Ecu */ 0,
158: /* Ece */ 0,
159: /* Ein */ 0,
160: /* Ein1 */ 0,
161: /* Eun */ 0,
162: /* Ewch */ 0,
163: /* Ependt */ 0,
164: /* *Ependw */ 0,
165: /* Ependnf */ 0,
166: /* Espread */ 0,
167: /* Eit */ 0,
168: /* Eitmac */ 0,
169: /* Elnsize */ LNSIZE,
170: /* *Ehyptr[NHYP] */ {0},
171: /* Etabtab[NTAB] */ {DTAB*1, DTAB*2, DTAB*3, DTAB*4, DTAB*5, DTAB*6,
172: DTAB*7, DTAB*8, DTAB*9, DTAB*10, DTAB*11,
173: DTAB*12, DTAB*13, DTAB*14, DTAB*15, 0},
174: /* Eline[LNSIZE] */ {0},
175: /* Eword[WDSIZE] */ {0}
176: }; /* end of environment initialization */
177:
178: int oline[LNSIZE+1];
179: int ch_CMASK; /* synonym for getch()&CMASK */
180: int tch[2] = {IMP, 0}; /* single character buffer */
181:
182: extern caseds(), caseas(), casesp(), caseft(), caseps(), casevs(),
183: casenr(), caseif(), casepo(), casetl(), casetm(), casebp(), casech(),
184: casepn(), tbreak(), caseti(), casene(), casenf(), casece(), casefi(),
185: casein(), casell(), casens(), casemk(), casert(), caseam(),
186: casede(), casedi(), caseda(), casewh(), casedt(), caseit(), caserm(),
187: casern(), casead(), casers(), casena(), casepl(), caseta(), casetr(),
188: caseul(), caselt(), casenx(), caseso(), caseig(), casetc(), casefc(),
189: caseec(), caseeo(), caselc(), caseev(), caserd(), caseab(), casefl(),
190: done(), casess(), casefp(), casecs(), casebd(), caselg(), casehc(),
191: casehy(), casenh(), casenm(), casenn(), casesv(), caseos(), casels(),
192: casecc(), casec2(), caseem(), caseaf(), casehw(), casemc(), casepm(),
193: casecu(), casepi(), caserr(), caseuf(), caseie(), caseel(), casepc(),
194: caseht(), caseco(), caseunix();
195:
196:
197: /* The following is a definition of the nroff/troff data area
198: * as saved by the compacted macros. This includes name tables,
199: * trap tables, number register value tables, and translation
200: * tables.
201: */
202:
203:
204: struct ddatablock dblock = { /* data block */
205:
206: #include "nrtab.dt"
207: 0, /* number register table */
208:
209: #include "rqtab.dt"
210: 0,0 /* names table */
211:
212: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.