1 #ifndef lint
2 static char sccsid[] = "@(#)globals.c	1.3 (CWI) 86/11/13";
3 #endif lint
4 
5 
6  /* t0.c: storage allocation */
7 #
8 #include "defs.h"
9 #include <stdio.h>
10 
11 char oldname[BUFSIZ];	/* for .lf kludge */
12 int expflg = 0;
13 int ctrflg = 0;
14 int boxflg = 0;
15 int dboxflg = 0;
16 int tab = '\t';
17 int linsize;		/* Pointsize of lines to draw */
18 int delim1, delim2;	/* eqn delimiters (for n specification) */
19 int evenup[MAXCOL];	/* Equal width column */
20 int evenflg;
21 int F1 = 0;		/* First ``funny'' field delimiter */
22 int F2 = 0;		/* Second ``funny'' spanning indicator */
23 int allflg = 0;
24 int leftover = 0;
25 int textflg = 0;
26 int left1flg = 0;	/* Line left of first (output) column */
27 int rightl = 0;		/* Line right of last (output) column */
28 char *cstore, *cspace;
29 char *last;
30 struct colstr *table[MAXLIN];
31 
32 /*
33  * Next arrays describe the real table. Could be put in a structure in
34  * future
35  */
36 int style[MAXHEAD][MAXCOL];	/* Style of column (l, a, etc.) */
37 int ctop[MAXHEAD][MAXCOL];
38 char font[MAXHEAD][MAXCOL][2];	/* fontstyle of column */
39 char csize[MAXHEAD][MAXCOL][4];	/* pointsize of column */
40 char vsize[MAXHEAD][MAXCOL][4];	/* Vertical spacing (text blocks only */
41 int lefline[MAXHEAD][MAXCOL];	/* line left of specified columns */
42 char cll[MAXCOL][CLLEN];	/* minimum colwumn width wanted */
43 int sep[MAXCOL];		/* Separation between columns in n's */
44 
45 int stynum[MAXLIN+1];
46 int nslin;
47 int nclin;			/* # of columns in specification part */
48 int fullbot[MAXLIN];
49 char *instead[MAXLIN];
50 int used[MAXCOL], lused[MAXCOL], rused[MAXCOL];
51 int linestop[MAXLIN];
52 int nlin;
53 int ncol;
54 int qcol;		/* quantity of output columns (bwk) */
55 int iline = 1;			/* input line counter */
56 char *ifile = "Input";		/* input file name */
57 /*
58  * current name of the diversion for textblocks
59  */
60 char texname = 'a';
61 int texct = 0;			/* index in texstr */
62 /*
63  * possible names of diversions
64  */
65 char texstr[] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWYXZ0123456789";
66 int linstart;
67 char *exstore, *exlim;
68 FILE *tabin  /*= stdin */;
69 int pr1403;
70 
71 int dbg;			/* debug flag */
72 
73 /* Device dependencies */
74 int device = HARRIS;
75