Blame


1 f08fdedc 2003-11-23 devnull /*
2 f08fdedc 2003-11-23 devnull * Plan9 is defined for plan 9
3 f08fdedc 2003-11-23 devnull * V9 is defined for 9th edition
4 f08fdedc 2003-11-23 devnull * Sun is defined for sun-os
5 f08fdedc 2003-11-23 devnull * Please don't litter the code with ifdefs. The three below (and one in
6 f08fdedc 2003-11-23 devnull * getflags) should be enough.
7 f08fdedc 2003-11-23 devnull */
8 f08fdedc 2003-11-23 devnull #define Plan9
9 f08fdedc 2003-11-23 devnull #ifdef Plan9
10 f08fdedc 2003-11-23 devnull #include <u.h>
11 f08fdedc 2003-11-23 devnull #include <libc.h>
12 f08fdedc 2003-11-23 devnull #define NSIG 32
13 f08fdedc 2003-11-23 devnull #define SIGINT 2
14 f08fdedc 2003-11-23 devnull #define SIGQUIT 3
15 f08fdedc 2003-11-23 devnull #endif
16 f08fdedc 2003-11-23 devnull #ifdef V9
17 f08fdedc 2003-11-23 devnull #include <signal.h>
18 f08fdedc 2003-11-23 devnull #include <libc.h>
19 f08fdedc 2003-11-23 devnull #endif
20 f08fdedc 2003-11-23 devnull #ifdef Sun
21 f08fdedc 2003-11-23 devnull #include <signal.h>
22 f08fdedc 2003-11-23 devnull #endif
23 f08fdedc 2003-11-23 devnull #define YYMAXDEPTH 500
24 f08fdedc 2003-11-23 devnull #ifndef PAREN
25 f08fdedc 2003-11-23 devnull #ifndef YYMAJOR
26 f08fdedc 2003-11-23 devnull #include "x.tab.h"
27 f08fdedc 2003-11-23 devnull #endif
28 f08fdedc 2003-11-23 devnull #endif
29 f08fdedc 2003-11-23 devnull typedef struct tree tree;
30 f08fdedc 2003-11-23 devnull typedef struct word word;
31 f08fdedc 2003-11-23 devnull typedef struct io io;
32 f08fdedc 2003-11-23 devnull typedef union code code;
33 f08fdedc 2003-11-23 devnull typedef struct var var;
34 f08fdedc 2003-11-23 devnull typedef struct list list;
35 f08fdedc 2003-11-23 devnull typedef struct redir redir;
36 f08fdedc 2003-11-23 devnull typedef struct thread thread;
37 f08fdedc 2003-11-23 devnull typedef struct builtin builtin;
38 f08fdedc 2003-11-23 devnull
39 f08fdedc 2003-11-23 devnull struct tree{
40 f08fdedc 2003-11-23 devnull int type;
41 f08fdedc 2003-11-23 devnull int rtype, fd0, fd1; /* details of REDIR PIPE DUP tokens */
42 f08fdedc 2003-11-23 devnull char *str;
43 f08fdedc 2003-11-23 devnull int quoted;
44 f08fdedc 2003-11-23 devnull int iskw;
45 f08fdedc 2003-11-23 devnull tree *child[3];
46 f08fdedc 2003-11-23 devnull tree *next;
47 f08fdedc 2003-11-23 devnull };
48 f08fdedc 2003-11-23 devnull tree *newtree(void);
49 f08fdedc 2003-11-23 devnull tree *token(char*, int), *klook(char*), *tree1(int, tree*);
50 f08fdedc 2003-11-23 devnull tree *tree2(int, tree*, tree*), *tree3(int, tree*, tree*, tree*);
51 f08fdedc 2003-11-23 devnull tree *mung1(tree*, tree*), *mung2(tree*, tree*, tree*);
52 f08fdedc 2003-11-23 devnull tree *mung3(tree*, tree*, tree*, tree*), *epimung(tree*, tree*);
53 f08fdedc 2003-11-23 devnull tree *simplemung(tree*), *heredoc(tree*);
54 f08fdedc 2003-11-23 devnull void freetree(tree*);
55 f08fdedc 2003-11-23 devnull tree *cmdtree;
56 f08fdedc 2003-11-23 devnull /*
57 f08fdedc 2003-11-23 devnull * The first word of any code vector is a reference count.
58 f08fdedc 2003-11-23 devnull * Always create a new reference to a code vector by calling codecopy(.).
59 f08fdedc 2003-11-23 devnull * Always call codefree(.) when deleting a reference.
60 f08fdedc 2003-11-23 devnull */
61 f08fdedc 2003-11-23 devnull union code{
62 f08fdedc 2003-11-23 devnull void (*f)(void);
63 f08fdedc 2003-11-23 devnull int i;
64 f08fdedc 2003-11-23 devnull char *s;
65 f08fdedc 2003-11-23 devnull };
66 f08fdedc 2003-11-23 devnull char *promptstr;
67 f08fdedc 2003-11-23 devnull int doprompt;
68 f08fdedc 2003-11-23 devnull #define NTOK 8192
69 f08fdedc 2003-11-23 devnull char tok[NTOK];
70 f08fdedc 2003-11-23 devnull #define APPEND 1
71 f08fdedc 2003-11-23 devnull #define WRITE 2
72 f08fdedc 2003-11-23 devnull #define READ 3
73 f08fdedc 2003-11-23 devnull #define HERE 4
74 f08fdedc 2003-11-23 devnull #define DUPFD 5
75 f08fdedc 2003-11-23 devnull #define CLOSE 6
76 f08fdedc 2003-11-23 devnull struct var{
77 f08fdedc 2003-11-23 devnull char *name; /* ascii name */
78 f08fdedc 2003-11-23 devnull word *val; /* value */
79 f08fdedc 2003-11-23 devnull int changed;
80 f08fdedc 2003-11-23 devnull code *fn; /* pointer to function's code vector */
81 f08fdedc 2003-11-23 devnull int fnchanged;
82 f08fdedc 2003-11-23 devnull int pc; /* pc of start of function */
83 f08fdedc 2003-11-23 devnull var *next; /* next on hash or local list */
84 f08fdedc 2003-11-23 devnull };
85 f08fdedc 2003-11-23 devnull var *vlook(char*), *gvlook(char*), *newvar(char*, var*);
86 f08fdedc 2003-11-23 devnull #define NVAR 521
87 f08fdedc 2003-11-23 devnull var *gvar[NVAR]; /* hash for globals */
88 f08fdedc 2003-11-23 devnull #define new(type) ((type *)emalloc(sizeof(type)))
89 f08fdedc 2003-11-23 devnull char *emalloc(long);
90 f08fdedc 2003-11-23 devnull void *Malloc(ulong);
91 f08fdedc 2003-11-23 devnull void efree(char*);
92 f08fdedc 2003-11-23 devnull #define NOFILE 128 /* should come from <param.h> */
93 f08fdedc 2003-11-23 devnull struct here{
94 f08fdedc 2003-11-23 devnull tree *tag;
95 f08fdedc 2003-11-23 devnull char *name;
96 f08fdedc 2003-11-23 devnull struct here *next;
97 f08fdedc 2003-11-23 devnull };
98 f08fdedc 2003-11-23 devnull int mypid;
99 f08fdedc 2003-11-23 devnull /*
100 f08fdedc 2003-11-23 devnull * Glob character escape in strings:
101 f08fdedc 2003-11-23 devnull * In a string, GLOB must be followed by *?[ or GLOB.
102 f08fdedc 2003-11-23 devnull * GLOB* matches any string
103 f08fdedc 2003-11-23 devnull * GLOB? matches any single character
104 f08fdedc 2003-11-23 devnull * GLOB[...] matches anything in the brackets
105 f08fdedc 2003-11-23 devnull * GLOBGLOB matches GLOB
106 f08fdedc 2003-11-23 devnull */
107 f08fdedc 2003-11-23 devnull #define GLOB ((char)0x01)
108 f08fdedc 2003-11-23 devnull /*
109 f08fdedc 2003-11-23 devnull * onebyte(c), twobyte(c), threebyte(c)
110 f08fdedc 2003-11-23 devnull * Is c the first character of a one- two- or three-byte utf sequence?
111 f08fdedc 2003-11-23 devnull */
112 f08fdedc 2003-11-23 devnull #define onebyte(c) ((c&0x80)==0x00)
113 f08fdedc 2003-11-23 devnull #define twobyte(c) ((c&0xe0)==0xc0)
114 f08fdedc 2003-11-23 devnull #define threebyte(c) ((c&0xf0)==0xe0)
115 f08fdedc 2003-11-23 devnull char **argp;
116 f08fdedc 2003-11-23 devnull char **args;
117 f08fdedc 2003-11-23 devnull int nerror; /* number of errors encountered during compilation */
118 f08fdedc 2003-11-23 devnull int doprompt; /* is it time for a prompt? */
119 f08fdedc 2003-11-23 devnull /*
120 f08fdedc 2003-11-23 devnull * Which fds are the reading/writing end of a pipe?
121 f08fdedc 2003-11-23 devnull * Unfortunately, this can vary from system to system.
122 f08fdedc 2003-11-23 devnull * 9th edition Unix doesn't care, the following defines
123 f08fdedc 2003-11-23 devnull * work on plan 9.
124 f08fdedc 2003-11-23 devnull */
125 f08fdedc 2003-11-23 devnull #define PRD 0
126 f08fdedc 2003-11-23 devnull #define PWR 1
127 f08fdedc 2003-11-23 devnull extern char *Rcmain(), Fdprefix[];
128 f08fdedc 2003-11-23 devnull #define register
129 f08fdedc 2003-11-23 devnull /*
130 f08fdedc 2003-11-23 devnull * How many dot commands have we executed?
131 f08fdedc 2003-11-23 devnull * Used to ensure that -v flag doesn't print rcmain.
132 f08fdedc 2003-11-23 devnull */
133 f08fdedc 2003-11-23 devnull int ndot;
134 f08fdedc 2003-11-23 devnull char *getstatus(void);
135 f08fdedc 2003-11-23 devnull int lastc;
136 f08fdedc 2003-11-23 devnull int lastword;