Blame


1 8f314994 2004-03-02 devnull #include "sys.h"
2 76193d7c 2003-09-30 devnull
3 76193d7c 2003-09-30 devnull #undef assert
4 76193d7c 2003-09-30 devnull #define assert mkassert
5 76193d7c 2003-09-30 devnull extern Biobuf bout;
6 76193d7c 2003-09-30 devnull
7 76193d7c 2003-09-30 devnull typedef struct Bufblock
8 76193d7c 2003-09-30 devnull {
9 76193d7c 2003-09-30 devnull struct Bufblock *next;
10 76193d7c 2003-09-30 devnull char *start;
11 76193d7c 2003-09-30 devnull char *end;
12 76193d7c 2003-09-30 devnull char *current;
13 76193d7c 2003-09-30 devnull } Bufblock;
14 76193d7c 2003-09-30 devnull
15 76193d7c 2003-09-30 devnull typedef struct Word
16 76193d7c 2003-09-30 devnull {
17 76193d7c 2003-09-30 devnull char *s;
18 76193d7c 2003-09-30 devnull struct Word *next;
19 76193d7c 2003-09-30 devnull } Word;
20 76193d7c 2003-09-30 devnull
21 76193d7c 2003-09-30 devnull typedef struct Envy
22 76193d7c 2003-09-30 devnull {
23 76193d7c 2003-09-30 devnull char *name;
24 76193d7c 2003-09-30 devnull Word *values;
25 76193d7c 2003-09-30 devnull } Envy;
26 76193d7c 2003-09-30 devnull
27 76193d7c 2003-09-30 devnull extern Envy *envy;
28 76193d7c 2003-09-30 devnull
29 9aa1c92f 2005-01-04 devnull typedef struct Shell
30 9aa1c92f 2005-01-04 devnull {
31 9aa1c92f 2005-01-04 devnull char *name;
32 9aa1c92f 2005-01-04 devnull char *termchars; /* used in parse.c to isolate assignment attribute */
33 9aa1c92f 2005-01-04 devnull int iws; /* inter-word separator in environment */
34 9aa1c92f 2005-01-04 devnull char *(*charin)(char*, char*); /* search for unescaped characters */
35 9aa1c92f 2005-01-04 devnull char *(*expandquote)(char*, Rune, Bufblock*); /* extract escaped token */
36 9aa1c92f 2005-01-04 devnull int (*escapetoken)(Biobuf*, Bufblock*, int, int); /* input escaped token */
37 9aa1c92f 2005-01-04 devnull char *(*copyq)(char*, Rune, Bufblock*); /* check for quoted strings */
38 9aa1c92f 2005-01-04 devnull int (*matchname)(char*); /* does name match */
39 9aa1c92f 2005-01-04 devnull } Shell;
40 9aa1c92f 2005-01-04 devnull
41 76193d7c 2003-09-30 devnull typedef struct Rule
42 76193d7c 2003-09-30 devnull {
43 76193d7c 2003-09-30 devnull char *target; /* one target */
44 76193d7c 2003-09-30 devnull Word *tail; /* constituents of targets */
45 76193d7c 2003-09-30 devnull char *recipe; /* do it ! */
46 76193d7c 2003-09-30 devnull short attr; /* attributes */
47 76193d7c 2003-09-30 devnull short line; /* source line */
48 76193d7c 2003-09-30 devnull char *file; /* source file */
49 76193d7c 2003-09-30 devnull Word *alltargets; /* all the targets */
50 76193d7c 2003-09-30 devnull int rule; /* rule number */
51 76193d7c 2003-09-30 devnull Reprog *pat; /* reg exp goo */
52 76193d7c 2003-09-30 devnull char *prog; /* to use in out of date */
53 76193d7c 2003-09-30 devnull struct Rule *chain; /* hashed per target */
54 76193d7c 2003-09-30 devnull struct Rule *next;
55 9aa1c92f 2005-01-04 devnull Shell *shellt; /* shell to use with this rule */
56 9aa1c92f 2005-01-04 devnull Word *shellcmd;
57 76193d7c 2003-09-30 devnull } Rule;
58 76193d7c 2003-09-30 devnull
59 76193d7c 2003-09-30 devnull extern Rule *rules, *metarules, *patrule;
60 76193d7c 2003-09-30 devnull
61 76193d7c 2003-09-30 devnull /* Rule.attr */
62 76193d7c 2003-09-30 devnull #define META 0x0001
63 76193d7c 2003-09-30 devnull #define UNUSED 0x0002
64 76193d7c 2003-09-30 devnull #define UPD 0x0004
65 76193d7c 2003-09-30 devnull #define QUIET 0x0008
66 76193d7c 2003-09-30 devnull #define VIR 0x0010
67 76193d7c 2003-09-30 devnull #define REGEXP 0x0020
68 76193d7c 2003-09-30 devnull #define NOREC 0x0040
69 76193d7c 2003-09-30 devnull #define DEL 0x0080
70 76193d7c 2003-09-30 devnull #define NOVIRT 0x0100
71 76193d7c 2003-09-30 devnull
72 76193d7c 2003-09-30 devnull #define NREGEXP 10
73 76193d7c 2003-09-30 devnull
74 76193d7c 2003-09-30 devnull typedef struct Arc
75 76193d7c 2003-09-30 devnull {
76 76193d7c 2003-09-30 devnull short flag;
77 76193d7c 2003-09-30 devnull struct Node *n;
78 76193d7c 2003-09-30 devnull Rule *r;
79 76193d7c 2003-09-30 devnull char *stem;
80 76193d7c 2003-09-30 devnull char *prog;
81 76193d7c 2003-09-30 devnull char *match[NREGEXP];
82 76193d7c 2003-09-30 devnull struct Arc *next;
83 76193d7c 2003-09-30 devnull } Arc;
84 76193d7c 2003-09-30 devnull
85 76193d7c 2003-09-30 devnull /* Arc.flag */
86 76193d7c 2003-09-30 devnull #define TOGO 1
87 76193d7c 2003-09-30 devnull
88 76193d7c 2003-09-30 devnull typedef struct Node
89 76193d7c 2003-09-30 devnull {
90 76193d7c 2003-09-30 devnull char *name;
91 76193d7c 2003-09-30 devnull long time;
92 76193d7c 2003-09-30 devnull unsigned short flags;
93 76193d7c 2003-09-30 devnull Arc *prereqs;
94 76193d7c 2003-09-30 devnull struct Node *next; /* list for a rule */
95 76193d7c 2003-09-30 devnull } Node;
96 76193d7c 2003-09-30 devnull
97 76193d7c 2003-09-30 devnull /* Node.flags */
98 76193d7c 2003-09-30 devnull #define VIRTUAL 0x0001
99 76193d7c 2003-09-30 devnull #define CYCLE 0x0002
100 76193d7c 2003-09-30 devnull #define READY 0x0004
101 76193d7c 2003-09-30 devnull #define CANPRETEND 0x0008
102 76193d7c 2003-09-30 devnull #define PRETENDING 0x0010
103 76193d7c 2003-09-30 devnull #define NOTMADE 0x0020
104 76193d7c 2003-09-30 devnull #define BEINGMADE 0x0040
105 76193d7c 2003-09-30 devnull #define MADE 0x0080
106 76193d7c 2003-09-30 devnull #define MADESET(n,m) n->flags = (n->flags&~(NOTMADE|BEINGMADE|MADE))|(m)
107 76193d7c 2003-09-30 devnull #define PROBABLE 0x0100
108 76193d7c 2003-09-30 devnull #define VACUOUS 0x0200
109 76193d7c 2003-09-30 devnull #define NORECIPE 0x0400
110 76193d7c 2003-09-30 devnull #define DELETE 0x0800
111 76193d7c 2003-09-30 devnull #define NOMINUSE 0x1000
112 44eb2088 2015-08-27 rsc #define ONLIST 0x2000
113 76193d7c 2003-09-30 devnull
114 76193d7c 2003-09-30 devnull typedef struct Job
115 76193d7c 2003-09-30 devnull {
116 76193d7c 2003-09-30 devnull Rule *r; /* master rule for job */
117 76193d7c 2003-09-30 devnull Node *n; /* list of node targets */
118 76193d7c 2003-09-30 devnull char *stem;
119 76193d7c 2003-09-30 devnull char **match;
120 76193d7c 2003-09-30 devnull Word *p; /* prerequistes */
121 76193d7c 2003-09-30 devnull Word *np; /* new prerequistes */
122 76193d7c 2003-09-30 devnull Word *t; /* targets */
123 76193d7c 2003-09-30 devnull Word *at; /* all targets */
124 76193d7c 2003-09-30 devnull int nproc; /* slot number */
125 76193d7c 2003-09-30 devnull struct Job *next;
126 76193d7c 2003-09-30 devnull } Job;
127 76193d7c 2003-09-30 devnull extern Job *jobs;
128 76193d7c 2003-09-30 devnull
129 76193d7c 2003-09-30 devnull typedef struct Symtab
130 76193d7c 2003-09-30 devnull {
131 76193d7c 2003-09-30 devnull short space;
132 76193d7c 2003-09-30 devnull char *name;
133 3fe9465a 2006-04-20 devnull union {
134 3fe9465a 2006-04-20 devnull void *ptr;
135 3fe9465a 2006-04-20 devnull uintptr value;
136 3fe9465a 2006-04-20 devnull } u;
137 76193d7c 2003-09-30 devnull struct Symtab *next;
138 76193d7c 2003-09-30 devnull } Symtab;
139 76193d7c 2003-09-30 devnull
140 76193d7c 2003-09-30 devnull enum {
141 76193d7c 2003-09-30 devnull S_VAR, /* variable -> value */
142 76193d7c 2003-09-30 devnull S_TARGET, /* target -> rule */
143 76193d7c 2003-09-30 devnull S_TIME, /* file -> time */
144 76193d7c 2003-09-30 devnull S_PID, /* pid -> products */
145 76193d7c 2003-09-30 devnull S_NODE, /* target name -> node */
146 76193d7c 2003-09-30 devnull S_AGG, /* aggregate -> time */
147 76193d7c 2003-09-30 devnull S_BITCH, /* bitched about aggregate not there */
148 76193d7c 2003-09-30 devnull S_NOEXPORT, /* var -> noexport */
149 76193d7c 2003-09-30 devnull S_OVERRIDE, /* can't override */
150 76193d7c 2003-09-30 devnull S_OUTOFDATE, /* n1\377n2 -> 2(outofdate) or 1(not outofdate) */
151 76193d7c 2003-09-30 devnull S_MAKEFILE, /* target -> node */
152 76193d7c 2003-09-30 devnull S_MAKEVAR, /* dumpable mk variable */
153 76193d7c 2003-09-30 devnull S_EXPORTED, /* var -> current exported value */
154 76193d7c 2003-09-30 devnull S_WESET, /* variable; we set in the mkfile */
155 76193d7c 2003-09-30 devnull S_INTERNAL /* an internal mk variable (e.g., stem, target) */
156 76193d7c 2003-09-30 devnull };
157 76193d7c 2003-09-30 devnull
158 76193d7c 2003-09-30 devnull extern int debug;
159 76193d7c 2003-09-30 devnull extern int nflag, tflag, iflag, kflag, aflag, mflag;
160 76193d7c 2003-09-30 devnull extern int mkinline;
161 76193d7c 2003-09-30 devnull extern char *infile;
162 76193d7c 2003-09-30 devnull extern int nreps;
163 76193d7c 2003-09-30 devnull extern char *explain;
164 9aa1c92f 2005-01-04 devnull extern Shell *shellt;
165 9aa1c92f 2005-01-04 devnull extern Word *shellcmd;
166 76193d7c 2003-09-30 devnull
167 9aa1c92f 2005-01-04 devnull extern Shell shshell, rcshell;
168 9aa1c92f 2005-01-04 devnull
169 76193d7c 2003-09-30 devnull #define SYNERR(l) (fprint(2, "mk: %s:%d: syntax error; ", infile, ((l)>=0)?(l):mkinline))
170 76193d7c 2003-09-30 devnull #define RERR(r) (fprint(2, "mk: %s:%d: rule error; ", (r)->file, (r)->line))
171 76193d7c 2003-09-30 devnull #define NAMEBLOCK 1000
172 76193d7c 2003-09-30 devnull #define BIGBLOCK 20000
173 76193d7c 2003-09-30 devnull
174 76193d7c 2003-09-30 devnull #define SEP(c) (((c)==' ')||((c)=='\t')||((c)=='\n'))
175 76193d7c 2003-09-30 devnull #define WORDCHR(r) ((r) > ' ' && !utfrune("!\"#$%&'()*+,-./:;<=>?@[\\]^`{|}~", (r)))
176 76193d7c 2003-09-30 devnull
177 76193d7c 2003-09-30 devnull #define DEBUG(x) (debug&(x))
178 76193d7c 2003-09-30 devnull #define D_PARSE 0x01
179 76193d7c 2003-09-30 devnull #define D_GRAPH 0x02
180 76193d7c 2003-09-30 devnull #define D_EXEC 0x04
181 76193d7c 2003-09-30 devnull
182 76193d7c 2003-09-30 devnull #define LSEEK(f,o,p) seek(f,o,p)
183 76193d7c 2003-09-30 devnull
184 76193d7c 2003-09-30 devnull #define PERCENT(ch) (((ch) == '%') || ((ch) == '&'))
185 76193d7c 2003-09-30 devnull
186 76193d7c 2003-09-30 devnull #include "fns.h"