![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to grap.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / grap|
Return to grap.h CVS log | Up to [Research Unix] / researchv10no / cmd / grap |
1.1 ! root 1: extern char errbuf[200]; ! 2: #define ERROR sprintf(errbuf, ! 3: #define FATAL ), yyerror(errbuf), exit(1) ! 4: #define WARNING ), yyerror(errbuf) ! 5: ! 6: #define dprintf if(dbg)printf ! 7: ! 8: #define String 01 ! 9: #define Macro 02 ! 10: #define File 04 ! 11: #define Char 010 ! 12: #define Thru 020 ! 13: #define Free 040 ! 14: ! 15: #define MARGIN 0.07 /* default margin around data */ ! 16: #define SLOP 1.001 /* slop for limits of for loops */ ! 17: #define FRAMEWID 3 /* default width for boxes and ellipses */ ! 18: #define FRAMEHT 2 /* default height and line length */ ! 19: #define TICKLEN 0.1 ! 20: ! 21: #define MAXNUM 200 ! 22: ! 23: #define XFLAG 01 ! 24: #define YFLAG 02 ! 25: ! 26: #define INTICK 01 ! 27: #define OUTICK 02 ! 28: ! 29: #define BOT 01 ! 30: #define TOP 02 ! 31: #define RIGHT 04 ! 32: #define LEFT 010 ! 33: ! 34: #define RJUST 01 ! 35: #define LJUST 02 ! 36: #define ABOVE 04 ! 37: #define BELOW 010 ! 38: ! 39: typedef struct infile { ! 40: FILE *fin; ! 41: char *fname; ! 42: int lineno; ! 43: } Infile; ! 44: ! 45: typedef struct { /* input source */ ! 46: int type; /* Macro, String, File */ ! 47: char *sp; /* if String or Macro */ ! 48: } Src; ! 49: ! 50: extern Src src[], *srcp; /* input source stack */ ! 51: ! 52: #define MAXARGS 100 ! 53: typedef struct { /* argument stack */ ! 54: char *argstk[MAXARGS]; /* pointers to args */ ! 55: char *argval; /* points to space containing args */ ! 56: } Arg; ! 57: ! 58: extern Infile infile[10]; ! 59: extern Infile *curfile; ! 60: ! 61: typedef struct { ! 62: struct obj *obj; ! 63: double x, y; ! 64: } Point; ! 65: ! 66: typedef struct attr { /* e.g., DASH 1.1 or "..." rjust size *.5 */ ! 67: short type; ! 68: double fval; ! 69: char *sval; ! 70: short just; /* justification, for STRING type */ ! 71: short op; /* optional operator, ditto */ ! 72: struct attr *next; ! 73: } Attr; ! 74: ! 75: typedef struct obj { /* a name and its properties */ ! 76: char *name; ! 77: char *val; /* body of define, etc. */ ! 78: double fval; /* if a numeric variable */ ! 79: Point pt; /* usually for max and min */ ! 80: Point pt1; ! 81: short type; /* NAME, DEFNAME, ... */ ! 82: short first; /* 1 after 1st item seen */ ! 83: short coord; /* 1 if coord system specified for this name */ ! 84: short log; /* x, y, or z (= x+y) */ ! 85: Attr *attr; /* DASH, etc., for now */ ! 86: struct obj *next; ! 87: } Obj; ! 88: ! 89: typedef union { /* the yacc stack type */ ! 90: int i; ! 91: char *p; ! 92: double f; ! 93: Point pt; ! 94: Obj *op; ! 95: Attr *ap; ! 96: } YYSTYPE; ! 97: ! 98: extern YYSTYPE yylval, yyval; ! 99: ! 100: extern int dbg; ! 101: ! 102: extern int ntext; ! 103: extern double num[MAXNUM]; ! 104: extern int nnum; ! 105: extern int ntick, tside; ! 106: ! 107: extern char *tostring(char *); ! 108: extern char *grow(char *, char *, int, int); ! 109: ! 110: extern int lineno; ! 111: extern int synerr; ! 112: extern int codegen; ! 113: extern char tempfile[]; ! 114: extern FILE *tfd; ! 115: ! 116: extern Point ptmin, ptmax; ! 117: ! 118: extern char *dflt_coord; ! 119: extern char *curr_coord; ! 120: extern int ncoord; ! 121: extern int auto_x; ! 122: extern double margin; ! 123: extern int autoticks; ! 124: extern int pointsize, ps_set; ! 125: ! 126: ! 127: #define logit(x) (x) = log10(x) ! 128: #define Log10(x) errcheck(log10(x), "log") ! 129: #define Exp(x) errcheck(exp(x), "exp") ! 130: #define Sqrt(x) errcheck(sqrt(x), "sqrt") ! 131: ! 132: #define min(x,y) (((x) <= (y)) ? (x) : (y)) ! 133: #define max(x,y) (((x) >= (y)) ? (x) : (y)) ! 134: ! 135: extern void yyerror(char *); ! 136: extern void coord_x(Point); ! 137: extern void coord_y(Point); ! 138: extern void coordlog(int); ! 139: extern void coord(Obj *); ! 140: extern void resetcoord(Obj *); ! 141: extern void savenum(int, double); ! 142: extern void setjust(int); ! 143: extern void setsize(int, double); ! 144: extern void range(Point); ! 145: extern void halfrange(Obj *, int, double); ! 146: extern Obj *lookup(char *, int); ! 147: extern double getvar(Obj *); ! 148: extern double setvar(Obj *, double); ! 149: extern Point makepoint(Obj *, double, double); ! 150: extern Attr *makefattr(int, double); ! 151: extern Attr *makesattr(char *); ! 152: extern Attr *makeattr(int, double, char *, int, int); ! 153: extern Attr *addattr(Attr *, Attr *); ! 154: extern void freeattr(Attr *); ! 155: extern char *slprint(Attr *); ! 156: extern char *juststr(int); ! 157: extern char *sprntf(char *, Attr *); ! 158: extern void forloop(Obj *, double, double, int, double, char *); ! 159: extern void nextfor(void); ! 160: extern void endfor(void); ! 161: extern char *ifstat(double, char *, char *); ! 162: extern void frame(void); ! 163: extern void frameht(double); ! 164: extern void framewid(double); ! 165: extern void frameside(int, Attr *); ! 166: extern void pushsrc(int, char *); ! 167: extern void popsrc(void); ! 168: extern void definition(char *); ! 169: extern char *delimstr(char *); ! 170: extern int baldelim(int, char *); ! 171: extern void dodef(Obj *); ! 172: extern int getarg(char *); ! 173: extern int input(void); ! 174: extern int nextchar(void); ! 175: extern void do_thru(void); ! 176: extern int unput(int); ! 177: extern void pbstr(char *); ! 178: extern double errcheck(double, char *); ! 179: extern void yyerror(char *); ! 180: extern void eprint(void); ! 181: extern int yywrap(void); ! 182: extern void copyfile(char *); ! 183: extern void copydef(Obj *); ! 184: extern Obj *copythru(char *); ! 185: extern char *addnewline(char *); ! 186: extern void copyuntil(char *); ! 187: extern void copy(void); ! 188: extern void shell_init(void); ! 189: extern void shell_text(char *); ! 190: extern void shell_exec(void); ! 191: extern void labelwid(double); ! 192: extern void labelmove(int, double); ! 193: extern void label(int, Attr *); ! 194: extern void lab_adjust(void); ! 195: extern char *sizeit(Attr *); ! 196: extern void line(int, Point, Point, Attr *); ! 197: extern void circle(double, Point); ! 198: extern char *xyname(Point); ! 199: extern void pic(char *); ! 200: extern void numlist(void); ! 201: extern void plot(Attr *, Point); ! 202: extern void plotnum(double, char *, Point); ! 203: extern void drawdesc(int, Obj *, Attr *, char *); ! 204: extern void next(Obj *, Point, Attr *); ! 205: extern void print(void); ! 206: extern void endstat(void); ! 207: extern void graph(char *); ! 208: extern void setup(void); ! 209: extern void do_first(void); ! 210: extern void reset(void); ! 211: extern void opentemp(void); ! 212: extern void savetick(double, char *); ! 213: extern void dflt_tick(double); ! 214: extern void tickside(int); ! 215: extern void tickoff(int); ! 216: extern void gridtickoff(void); ! 217: extern void setlist(void); ! 218: extern void tickdir(int, double, int); ! 219: extern void ticks(void); ! 220: extern double modfloor(double, double); ! 221: extern double modceil(double, double); ! 222: extern void do_autoticks(Obj *); ! 223: extern void logtick(double, double, double); ! 224: extern Obj *setauto(void); ! 225: extern void autoside(Obj *, int); ! 226: extern void autolog(Obj *, int); ! 227: extern void iterator(double, double, int, double, char *); ! 228: extern void ticklist(Obj *, int); ! 229: extern void print_ticks(int, int, Obj *, char *, char *); ! 230: extern void maketick(int, char *, int, int, double, char *, char *, char *); ! 231: extern void griddesc(Attr *); ! 232: extern void gridlist(Obj *); ! 233: extern char *desc_str(Attr *); ! 234: extern int sidelog(int, int); ! 235: ! 236: extern Obj *objlist;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.