diff options
Diffstat (limited to 'src/cmd/pic/pic.h')
| -rw-r--r-- | src/cmd/pic/pic.h | 219 |
1 files changed, 219 insertions, 0 deletions
diff --git a/src/cmd/pic/pic.h b/src/cmd/pic/pic.h new file mode 100644 index 00000000..a4f7a6a4 --- /dev/null +++ b/src/cmd/pic/pic.h @@ -0,0 +1,219 @@ +#ifndef PI +#define PI 3.1415926535897932384626433832795028841971693993751 +#endif + +#define MAXWID 8.5 /* default limits max picture to 8.5 x 11; */ +#define MAXHT 11 /* change to taste without peril */ + +#define dprintf if(dbg)printf + +extern void yyerror(char *); + +extern char errbuf[200]; +#define ERROR sprintf(errbuf, +#define FATAL ), yyerror(errbuf), exit(1) +#define WARNING ), yyerror(errbuf) + +#define DEFAULT 0 + +#define HEAD1 1 +#define HEAD2 2 +#define HEAD12 (HEAD1+HEAD2) +#define INVIS 4 +#define CW_ARC 8 /* clockwise arc */ +#define DOTBIT 16 /* line styles */ +#define DASHBIT 32 +#define FILLBIT 64 /* gray-fill on boxes, etc. */ +#define NOEDGEBIT 128 /* no edge on filled object */ + +#define CENTER 01 /* text attributes */ +#define LJUST 02 +#define RJUST 04 +#define ABOVE 010 +#define BELOW 020 +#define SPREAD 040 + +#define SCALE 1.0 /* default scale: units/inch */ +#define WID 0.75 /* default width for boxes and ellipses */ +#define WID2 0.375 +#define HT 0.5 /* default height and line length */ +#define HT2 (HT/2) +#define HT5 (HT/5) +#define HT10 (HT/10) + +/* these have to be like so, so that we can write */ +/* things like R & V, etc. */ +#define H 0 +#define V 1 +#define R_DIR 0 +#define U_DIR 1 +#define L_DIR 2 +#define D_DIR 3 +#define ishor(n) (((n) & V) == 0) +#define isvert(n) (((n) & V) != 0) +#define isright(n) ((n) == R_DIR) +#define isleft(n) ((n) == L_DIR) +#define isdown(n) ((n) == D_DIR) +#define isup(n) ((n) == U_DIR) + +typedef float ofloat; /* for o_val[] in obj; could be double */ + +typedef struct obj { /* stores various things in variable length */ + int o_type; + int o_count; /* number of things */ + int o_nobj; /* index in objlist */ + int o_mode; /* hor or vert */ + float o_x; /* coord of "center" */ + float o_y; + int o_nt1; /* 1st index in text[] for this object */ + int o_nt2; /* 2nd; difference is #text strings */ + int o_attr; /* HEAD, CW, INVIS, etc., go here */ + int o_size; /* linesize */ + int o_nhead; /* arrowhead style */ + struct symtab *o_symtab; /* symtab for [...] */ + float o_ddval; /* value of dot/dash expression */ + float o_fillval; /* gray scale value */ + ofloat o_val[1]; /* actually this will be > 1 in general */ + /* type is not always FLOAT!!!! */ +} obj; + +typedef union { /* the yacc stack type */ + int i; + char *p; + obj *o; + double f; + struct symtab *st; +} YYSTYPE; + +extern YYSTYPE yylval, yyval; + +struct symtab { + char *s_name; + int s_type; + YYSTYPE s_val; + struct symtab *s_next; +}; + +typedef struct { /* attribute of an object */ + int a_type; + int a_sub; + YYSTYPE a_val; +} Attr; + +typedef struct { + int t_type; /* CENTER, LJUST, etc. */ + char t_op; /* optional sign for size changes */ + char t_size; /* size, abs or rel */ + char *t_val; +} Text; + +#define String 01 +#define Macro 02 +#define File 04 +#define Char 010 +#define Thru 020 +#define Free 040 + +typedef struct { /* input source */ + int type; /* Macro, String, File */ + char *sp; /* if String or Macro */ +} Src; + +extern Src src[], *srcp; /* input source stack */ + +typedef struct { + FILE *fin; + char *fname; + int lineno; +} Infile; + +extern Infile infile[], *curfile; + +#define MAXARGS 20 +typedef struct { /* argument stack */ + char *argstk[MAXARGS]; /* pointers to args */ + char *argval; /* points to space containing args */ +} Arg; + +extern int dbg; +extern obj **objlist; +extern int nobj, nobjlist; +extern Attr *attr; +extern int nattr, nattrlist; +extern Text *text; +extern int ntextlist; +extern int ntext; +extern int ntext1; +extern double curx, cury; +extern int hvmode; +extern int codegen; +extern char *PEstring; + +char *tostring(char *); +char *grow(char *, char *, int, int); +double getfval(char *), getcomp(obj *, int), getblkvar(obj *, char *); +YYSTYPE getvar(char *); +struct symtab *lookup(char *), *makevar(char *, int, YYSTYPE); +char *ifstat(double, char *, char *), *delimstr(char *), *sprintgen(char *); +void forloop(char *var, double from, double to, int op, double by, char *_str); +int setdir(int), curdir(void); +void resetvar(void); +void checkscale(char *); +void pushsrc(int, char *); +void copy(void); +void copyuntil(char *); +void copyfile(char *); +void copydef(struct symtab *); +void definition(char *); +struct symtab *copythru(char *); +int input(void); +int unput(int); +void extreme(double, double); + +extern double deltx, delty; +extern int lineno; +extern int synerr; + +extern double xmin, ymin, xmax, ymax; + +obj *leftthing(int), *boxgen(void), *circgen(int), *arcgen(int); +obj *linegen(int), *splinegen(void), *movegen(void); +obj *textgen(void), *plotgen(void); +obj *troffgen(char *), *rightthing(obj *, int), *blockgen(obj *, obj *); +obj *makenode(int, int), *makepos(double, double); +obj *fixpos(obj *, double, double); +obj *addpos(obj *, obj *), *subpos(obj *, obj *); +obj *makebetween(double, obj *, obj *); +obj *getpos(obj *, int), *gethere(void), *getfirst(int, int); +obj *getlast(int, int), *getblock(obj *, char *); +void savetext(int, char *); +void makeiattr(int, int); +void makevattr(char *); +void makefattr(int type, int sub, double f); +void maketattr(int, char *); +void makeoattr(int, obj *); +void makeattr(int type, int sub, YYSTYPE val); +void printexpr(double); +void printpos(obj *); +void exprsave(double); +void addtattr(int); +void printlf(int, char *); + +struct pushstack { + double p_x; + double p_y; + int p_hvmode; + double p_xmin; + double p_ymin; + double p_xmax; + double p_ymax; + struct symtab *p_symtab; +}; +extern struct pushstack stack[]; +extern int nstack; +extern int cw; + +extern double errcheck(double, char *); +#define Log10(x) errcheck(log10(x), "log") +#define Exp(x) errcheck(exp(x), "exp") +#define Sqrt(x) errcheck(sqrt(x), "sqrt") |