main.c revision 1.11 1 1.1 cgd /*
2 1.1 cgd * Copyright (c) 1988, 1989, 1990 The Regents of the University of California.
3 1.1 cgd * Copyright (c) 1988, 1989 by Adam de Boor
4 1.1 cgd * Copyright (c) 1989 by Berkeley Softworks
5 1.1 cgd * All rights reserved.
6 1.1 cgd *
7 1.1 cgd * This code is derived from software contributed to Berkeley by
8 1.1 cgd * Adam de Boor.
9 1.1 cgd *
10 1.1 cgd * Redistribution and use in source and binary forms, with or without
11 1.1 cgd * modification, are permitted provided that the following conditions
12 1.1 cgd * are met:
13 1.1 cgd * 1. Redistributions of source code must retain the above copyright
14 1.1 cgd * notice, this list of conditions and the following disclaimer.
15 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 cgd * notice, this list of conditions and the following disclaimer in the
17 1.1 cgd * documentation and/or other materials provided with the distribution.
18 1.1 cgd * 3. All advertising materials mentioning features or use of this software
19 1.1 cgd * must display the following acknowledgement:
20 1.1 cgd * This product includes software developed by the University of
21 1.1 cgd * California, Berkeley and its contributors.
22 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
23 1.1 cgd * may be used to endorse or promote products derived from this software
24 1.1 cgd * without specific prior written permission.
25 1.1 cgd *
26 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 1.1 cgd * SUCH DAMAGE.
37 1.1 cgd */
38 1.1 cgd
39 1.1 cgd #ifndef lint
40 1.1 cgd char copyright[] =
41 1.1 cgd "@(#) Copyright (c) 1989 The Regents of the University of California.\n\
42 1.1 cgd All rights reserved.\n";
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.1 cgd #ifndef lint
46 1.5 mycroft /*static char sccsid[] = "from: @(#)main.c 5.25 (Berkeley) 4/1/91";*/
47 1.11 pk static char rcsid[] = "$Id: main.c,v 1.11 1993/12/22 00:25:57 pk Exp $";
48 1.1 cgd #endif /* not lint */
49 1.1 cgd
50 1.1 cgd /*-
51 1.1 cgd * main.c --
52 1.1 cgd * The main file for this entire program. Exit routines etc
53 1.1 cgd * reside here.
54 1.1 cgd *
55 1.1 cgd * Utility functions defined in this file:
56 1.1 cgd * Main_ParseArgLine Takes a line of arguments, breaks them and
57 1.1 cgd * treats them as if they were given when first
58 1.1 cgd * invoked. Used by the parse module to implement
59 1.1 cgd * the .MFLAGS target.
60 1.1 cgd *
61 1.1 cgd * Error Print a tagged error message. The global
62 1.1 cgd * MAKE variable must have been defined. This
63 1.1 cgd * takes a format string and two optional
64 1.1 cgd * arguments for it.
65 1.1 cgd *
66 1.1 cgd * Fatal Print an error message and exit. Also takes
67 1.1 cgd * a format string and two arguments.
68 1.1 cgd *
69 1.1 cgd * Punt Aborts all jobs and exits with a message. Also
70 1.1 cgd * takes a format string and two arguments.
71 1.1 cgd *
72 1.1 cgd * Finish Finish things up by printing the number of
73 1.1 cgd * errors which occured, as passed to it, and
74 1.1 cgd * exiting.
75 1.1 cgd */
76 1.1 cgd
77 1.1 cgd #include <sys/param.h>
78 1.1 cgd #include <sys/signal.h>
79 1.1 cgd #include <sys/stat.h>
80 1.1 cgd #include <errno.h>
81 1.1 cgd #include <fcntl.h>
82 1.1 cgd #include <stdio.h>
83 1.1 cgd #include <varargs.h>
84 1.1 cgd #include "make.h"
85 1.1 cgd #include "pathnames.h"
86 1.1 cgd
87 1.1 cgd #ifndef DEFMAXLOCAL
88 1.1 cgd #define DEFMAXLOCAL DEFMAXJOBS
89 1.1 cgd #endif DEFMAXLOCAL
90 1.1 cgd
91 1.1 cgd #define MAKEFLAGS ".MAKEFLAGS"
92 1.1 cgd
93 1.1 cgd Lst create; /* Targets to be made */
94 1.1 cgd time_t now; /* Time at start of make */
95 1.1 cgd GNode *DEFAULT; /* .DEFAULT node */
96 1.1 cgd Boolean allPrecious; /* .PRECIOUS given on line by itself */
97 1.1 cgd
98 1.1 cgd static Boolean noBuiltins; /* -r flag */
99 1.1 cgd static Lst makefiles; /* ordered list of makefiles to read */
100 1.9 jtc int maxJobs; /* -j argument */
101 1.1 cgd static int maxLocal; /* -L argument */
102 1.1 cgd Boolean debug; /* -d flag */
103 1.1 cgd Boolean noExecute; /* -n flag */
104 1.1 cgd Boolean keepgoing; /* -k flag */
105 1.1 cgd Boolean queryFlag; /* -q flag */
106 1.1 cgd Boolean touchFlag; /* -t flag */
107 1.1 cgd Boolean usePipes; /* !-P flag */
108 1.1 cgd Boolean ignoreErrors; /* -i flag */
109 1.1 cgd Boolean beSilent; /* -s flag */
110 1.1 cgd Boolean oldVars; /* variable substitution style */
111 1.1 cgd Boolean checkEnvFirst; /* -e flag */
112 1.1 cgd static Boolean jobsRunning; /* TRUE if the jobs might be running */
113 1.1 cgd
114 1.1 cgd static Boolean ReadMakefile();
115 1.1 cgd
116 1.4 cgd static char *curdir; /* pathname of dir where make ran */
117 1.4 cgd static int obj_is_elsewhere; /* if chdir'd for an architecture */
118 1.1 cgd
119 1.1 cgd /*-
120 1.1 cgd * MainParseArgs --
121 1.1 cgd * Parse a given argument vector. Called from main() and from
122 1.1 cgd * Main_ParseArgLine() when the .MAKEFLAGS target is used.
123 1.1 cgd *
124 1.1 cgd * XXX: Deal with command line overriding .MAKEFLAGS in makefile
125 1.1 cgd *
126 1.1 cgd * Results:
127 1.1 cgd * None
128 1.1 cgd *
129 1.1 cgd * Side Effects:
130 1.1 cgd * Various global and local flags will be set depending on the flags
131 1.1 cgd * given
132 1.1 cgd */
133 1.1 cgd static void
134 1.1 cgd MainParseArgs(argc, argv)
135 1.1 cgd int argc;
136 1.1 cgd char **argv;
137 1.1 cgd {
138 1.1 cgd extern int optind;
139 1.1 cgd extern char *optarg;
140 1.1 cgd register int i;
141 1.1 cgd register char *cp;
142 1.1 cgd char c;
143 1.1 cgd
144 1.1 cgd optind = 1; /* since we're called more than once */
145 1.10 jtc rearg: while((c = getopt(argc, argv, "D:I:Sd:ef:ij:knqrst")) != EOF) {
146 1.1 cgd switch(c) {
147 1.1 cgd case 'D':
148 1.1 cgd Var_Set(optarg, "1", VAR_GLOBAL);
149 1.1 cgd Var_Append(MAKEFLAGS, "-D", VAR_GLOBAL);
150 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
151 1.1 cgd break;
152 1.1 cgd case 'I':
153 1.1 cgd Parse_AddIncludeDir(optarg);
154 1.1 cgd Var_Append(MAKEFLAGS, "-I", VAR_GLOBAL);
155 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
156 1.1 cgd break;
157 1.1 cgd #ifdef notdef
158 1.1 cgd case 'L':
159 1.1 cgd maxLocal = atoi(optarg);
160 1.1 cgd Var_Append(MAKEFLAGS, "-L", VAR_GLOBAL);
161 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
162 1.1 cgd break;
163 1.1 cgd case 'P':
164 1.1 cgd usePipes = FALSE;
165 1.1 cgd Var_Append(MAKEFLAGS, "-P", VAR_GLOBAL);
166 1.1 cgd break;
167 1.10 jtc #endif
168 1.1 cgd case 'S':
169 1.1 cgd keepgoing = FALSE;
170 1.1 cgd Var_Append(MAKEFLAGS, "-S", VAR_GLOBAL);
171 1.1 cgd break;
172 1.1 cgd case 'd': {
173 1.1 cgd char *modules = optarg;
174 1.1 cgd
175 1.1 cgd for (; *modules; ++modules)
176 1.1 cgd switch (*modules) {
177 1.1 cgd case 'A':
178 1.1 cgd debug = ~0;
179 1.1 cgd break;
180 1.1 cgd case 'a':
181 1.1 cgd debug |= DEBUG_ARCH;
182 1.1 cgd break;
183 1.1 cgd case 'c':
184 1.1 cgd debug |= DEBUG_COND;
185 1.1 cgd break;
186 1.1 cgd case 'd':
187 1.1 cgd debug |= DEBUG_DIR;
188 1.1 cgd break;
189 1.1 cgd case 'g':
190 1.1 cgd if (modules[1] == '1') {
191 1.1 cgd debug |= DEBUG_GRAPH1;
192 1.1 cgd ++modules;
193 1.1 cgd }
194 1.1 cgd else if (modules[1] == '2') {
195 1.1 cgd debug |= DEBUG_GRAPH2;
196 1.1 cgd ++modules;
197 1.1 cgd }
198 1.1 cgd break;
199 1.1 cgd case 'j':
200 1.1 cgd debug |= DEBUG_JOB;
201 1.1 cgd break;
202 1.1 cgd case 'm':
203 1.1 cgd debug |= DEBUG_MAKE;
204 1.1 cgd break;
205 1.1 cgd case 's':
206 1.1 cgd debug |= DEBUG_SUFF;
207 1.1 cgd break;
208 1.1 cgd case 't':
209 1.1 cgd debug |= DEBUG_TARG;
210 1.1 cgd break;
211 1.1 cgd case 'v':
212 1.1 cgd debug |= DEBUG_VAR;
213 1.1 cgd break;
214 1.1 cgd default:
215 1.1 cgd (void)fprintf(stderr,
216 1.1 cgd "make: illegal argument to d option -- %c\n",
217 1.1 cgd *modules);
218 1.1 cgd usage();
219 1.1 cgd }
220 1.1 cgd Var_Append(MAKEFLAGS, "-d", VAR_GLOBAL);
221 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
222 1.1 cgd break;
223 1.1 cgd }
224 1.1 cgd case 'e':
225 1.1 cgd checkEnvFirst = TRUE;
226 1.1 cgd Var_Append(MAKEFLAGS, "-e", VAR_GLOBAL);
227 1.1 cgd break;
228 1.1 cgd case 'f':
229 1.1 cgd (void)Lst_AtEnd(makefiles, (ClientData)optarg);
230 1.1 cgd break;
231 1.1 cgd case 'i':
232 1.1 cgd ignoreErrors = TRUE;
233 1.1 cgd Var_Append(MAKEFLAGS, "-i", VAR_GLOBAL);
234 1.1 cgd break;
235 1.1 cgd case 'j':
236 1.1 cgd maxJobs = atoi(optarg);
237 1.9 jtc Var_Append(MAKEFLAGS, "-j", VAR_GLOBAL);
238 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
239 1.1 cgd break;
240 1.1 cgd case 'k':
241 1.1 cgd keepgoing = TRUE;
242 1.1 cgd Var_Append(MAKEFLAGS, "-k", VAR_GLOBAL);
243 1.1 cgd break;
244 1.1 cgd case 'n':
245 1.1 cgd noExecute = TRUE;
246 1.1 cgd Var_Append(MAKEFLAGS, "-n", VAR_GLOBAL);
247 1.1 cgd break;
248 1.1 cgd case 'q':
249 1.1 cgd queryFlag = TRUE;
250 1.1 cgd /* Kind of nonsensical, wot? */
251 1.1 cgd Var_Append(MAKEFLAGS, "-q", VAR_GLOBAL);
252 1.1 cgd break;
253 1.1 cgd case 'r':
254 1.1 cgd noBuiltins = TRUE;
255 1.1 cgd Var_Append(MAKEFLAGS, "-r", VAR_GLOBAL);
256 1.1 cgd break;
257 1.1 cgd case 's':
258 1.1 cgd beSilent = TRUE;
259 1.1 cgd Var_Append(MAKEFLAGS, "-s", VAR_GLOBAL);
260 1.1 cgd break;
261 1.1 cgd case 't':
262 1.1 cgd touchFlag = TRUE;
263 1.1 cgd Var_Append(MAKEFLAGS, "-t", VAR_GLOBAL);
264 1.1 cgd break;
265 1.1 cgd default:
266 1.1 cgd case '?':
267 1.1 cgd usage();
268 1.1 cgd }
269 1.1 cgd }
270 1.1 cgd
271 1.1 cgd oldVars = TRUE;
272 1.1 cgd
273 1.1 cgd /*
274 1.1 cgd * See if the rest of the arguments are variable assignments and
275 1.1 cgd * perform them if so. Else take them to be targets and stuff them
276 1.1 cgd * on the end of the "create" list.
277 1.1 cgd */
278 1.1 cgd for (argv += optind, argc -= optind; *argv; ++argv, --argc)
279 1.1 cgd if (Parse_IsVar(*argv))
280 1.1 cgd Parse_DoVar(*argv, VAR_CMD);
281 1.1 cgd else {
282 1.1 cgd if (!**argv)
283 1.1 cgd Punt("illegal (null) argument.");
284 1.1 cgd if (**argv == '-') {
285 1.2 cgd /* 17 Mar 92*/ if ((*argv)[1])
286 1.2 cgd /* 17 Mar 92*/ optind = 0; /* -flag... */
287 1.2 cgd /* 17 Mar 92*/ else
288 1.2 cgd /* 17 Mar 92*/ optind = 1; /* - */
289 1.1 cgd goto rearg;
290 1.1 cgd }
291 1.1 cgd (void)Lst_AtEnd(create, (ClientData)*argv);
292 1.1 cgd }
293 1.1 cgd }
294 1.1 cgd
295 1.1 cgd /*-
296 1.1 cgd * Main_ParseArgLine --
297 1.1 cgd * Used by the parse module when a .MFLAGS or .MAKEFLAGS target
298 1.1 cgd * is encountered and by main() when reading the .MAKEFLAGS envariable.
299 1.1 cgd * Takes a line of arguments and breaks it into its
300 1.1 cgd * component words and passes those words and the number of them to the
301 1.1 cgd * MainParseArgs function.
302 1.1 cgd * The line should have all its leading whitespace removed.
303 1.1 cgd *
304 1.1 cgd * Results:
305 1.1 cgd * None
306 1.1 cgd *
307 1.1 cgd * Side Effects:
308 1.1 cgd * Only those that come from the various arguments.
309 1.1 cgd */
310 1.1 cgd void
311 1.1 cgd Main_ParseArgLine(line)
312 1.1 cgd char *line; /* Line to fracture */
313 1.1 cgd {
314 1.1 cgd char **argv; /* Manufactured argument vector */
315 1.1 cgd int argc; /* Number of arguments in argv */
316 1.1 cgd
317 1.1 cgd if (line == NULL)
318 1.1 cgd return;
319 1.1 cgd for (; *line == ' '; ++line);
320 1.1 cgd if (!*line)
321 1.1 cgd return;
322 1.1 cgd
323 1.1 cgd argv = brk_string(line, &argc);
324 1.1 cgd MainParseArgs(argc, argv);
325 1.1 cgd }
326 1.1 cgd
327 1.1 cgd /*-
328 1.1 cgd * main --
329 1.1 cgd * The main function, for obvious reasons. Initializes variables
330 1.1 cgd * and a few modules, then parses the arguments give it in the
331 1.1 cgd * environment and on the command line. Reads the system makefile
332 1.1 cgd * followed by either Makefile, makefile or the file given by the
333 1.1 cgd * -f argument. Sets the .MAKEFLAGS PMake variable based on all the
334 1.1 cgd * flags it has received by then uses either the Make or the Compat
335 1.1 cgd * module to create the initial list of targets.
336 1.1 cgd *
337 1.1 cgd * Results:
338 1.1 cgd * If -q was given, exits -1 if anything was out-of-date. Else it exits
339 1.1 cgd * 0.
340 1.1 cgd *
341 1.1 cgd * Side Effects:
342 1.1 cgd * The program exits when done. Targets are created. etc. etc. etc.
343 1.1 cgd */
344 1.1 cgd main(argc, argv)
345 1.1 cgd int argc;
346 1.1 cgd char **argv;
347 1.1 cgd {
348 1.1 cgd Lst targs; /* target nodes to create -- passed to Make_Init */
349 1.1 cgd Boolean outOfDate; /* FALSE if all targets up to date */
350 1.1 cgd struct stat sb;
351 1.7 cgd char mdpath[MAXPATHLEN + 1], *p, *path, *getenv();
352 1.11 pk char objpath[MAXPATHLEN + 1];
353 1.1 cgd
354 1.1 cgd /*
355 1.1 cgd * if the MAKEOBJDIR (or by default, the _PATH_OBJDIR) directory
356 1.1 cgd * exists, change into it and build there. Once things are
357 1.1 cgd * initted, have to add the original directory to the search path,
358 1.1 cgd * and modify the paths for the Makefiles apropriately. The
359 1.1 cgd * current directory is also placed as a variable for make scripts.
360 1.1 cgd */
361 1.7 cgd if (!(path = getenv("MAKEOBJDIR"))) {
362 1.1 cgd path = _PATH_OBJDIR;
363 1.7 cgd snprintf(mdpath, MAXPATHLEN + 1, "%s.%s", path, MACHINE);
364 1.7 cgd } else {
365 1.7 cgd strncpy(mdpath, path, MAXPATHLEN + 1);
366 1.7 cgd }
367 1.7 cgd
368 1.4 cgd curdir = emalloc((u_int)MAXPATHLEN + 1);
369 1.4 cgd if (!getwd(curdir)) {
370 1.4 cgd (void)fprintf(stderr, "make: %s.\n", curdir);
371 1.4 cgd exit(2);
372 1.4 cgd }
373 1.7 cgd if (!lstat(mdpath, &sb)) {
374 1.11 pk snprintf(objpath, MAXPATHLEN + 1, "%s/%s", curdir, mdpath);
375 1.7 cgd if (chdir(mdpath))
376 1.6 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
377 1.7 cgd mdpath, strerror(errno));
378 1.6 cgd else
379 1.6 cgd obj_is_elsewhere = 1;
380 1.7 cgd } else {
381 1.7 cgd if (!lstat(path, &sb)) {
382 1.11 pk snprintf(objpath, MAXPATHLEN + 1, "%s/%s", curdir, path);
383 1.7 cgd if (chdir(path))
384 1.7 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
385 1.7 cgd path, strerror(errno));
386 1.7 cgd else
387 1.7 cgd obj_is_elsewhere = 1;
388 1.7 cgd }
389 1.1 cgd }
390 1.1 cgd
391 1.1 cgd create = Lst_Init(FALSE);
392 1.1 cgd makefiles = Lst_Init(FALSE);
393 1.1 cgd beSilent = FALSE; /* Print commands as executed */
394 1.1 cgd ignoreErrors = FALSE; /* Pay attention to non-zero returns */
395 1.1 cgd noExecute = FALSE; /* Execute all commands */
396 1.1 cgd keepgoing = FALSE; /* Stop on error */
397 1.1 cgd allPrecious = FALSE; /* Remove targets when interrupted */
398 1.1 cgd queryFlag = FALSE; /* This is not just a check-run */
399 1.1 cgd noBuiltins = FALSE; /* Read the built-in rules */
400 1.1 cgd touchFlag = FALSE; /* Actually update targets */
401 1.1 cgd usePipes = TRUE; /* Catch child output in pipes */
402 1.1 cgd debug = 0; /* No debug verbosity, please. */
403 1.1 cgd jobsRunning = FALSE;
404 1.1 cgd
405 1.1 cgd maxJobs = DEFMAXJOBS; /* Set default max concurrency */
406 1.1 cgd maxLocal = DEFMAXLOCAL; /* Set default local max concurrency */
407 1.1 cgd
408 1.1 cgd /*
409 1.1 cgd * Initialize the parsing, directory and variable modules to prepare
410 1.1 cgd * for the reading of inclusion paths and variable settings on the
411 1.1 cgd * command line
412 1.1 cgd */
413 1.1 cgd Dir_Init(); /* Initialize directory structures so -I flags
414 1.1 cgd * can be processed correctly */
415 1.1 cgd Parse_Init(); /* Need to initialize the paths of #include
416 1.1 cgd * directories */
417 1.1 cgd Var_Init(); /* As well as the lists of variables for
418 1.1 cgd * parsing arguments */
419 1.1 cgd
420 1.4 cgd if (obj_is_elsewhere)
421 1.1 cgd Dir_AddDir(dirSearchPath, curdir);
422 1.4 cgd Var_Set(".CURDIR", curdir, VAR_GLOBAL);
423 1.11 pk Var_Set(".OBJDIR", obj_is_elsewhere?objpath:curdir, VAR_GLOBAL);
424 1.1 cgd
425 1.1 cgd /*
426 1.1 cgd * Initialize various variables.
427 1.1 cgd * MAKE also gets this name, for compatibility
428 1.1 cgd * .MAKEFLAGS gets set to the empty string just in case.
429 1.1 cgd * MFLAGS also gets initialized empty, for compatibility.
430 1.1 cgd */
431 1.1 cgd Var_Set("MAKE", argv[0], VAR_GLOBAL);
432 1.1 cgd Var_Set(MAKEFLAGS, "", VAR_GLOBAL);
433 1.1 cgd Var_Set("MFLAGS", "", VAR_GLOBAL);
434 1.1 cgd Var_Set("MACHINE", MACHINE, VAR_GLOBAL);
435 1.8 cgd Var_Set("MACHINE_ARCH", MACHINE_ARCH, VAR_GLOBAL);
436 1.1 cgd
437 1.1 cgd /*
438 1.1 cgd * First snag any flags out of the MAKE environment variable.
439 1.1 cgd * (Note this is *not* MAKEFLAGS since /bin/make uses that and it's
440 1.1 cgd * in a different format).
441 1.1 cgd */
442 1.1 cgd #ifdef POSIX
443 1.1 cgd Main_ParseArgLine(getenv("MAKEFLAGS"));
444 1.1 cgd #else
445 1.1 cgd Main_ParseArgLine(getenv("MAKE"));
446 1.1 cgd #endif
447 1.1 cgd
448 1.1 cgd MainParseArgs(argc, argv);
449 1.1 cgd
450 1.1 cgd /*
451 1.1 cgd * Initialize archive, target and suffix modules in preparation for
452 1.1 cgd * parsing the makefile(s)
453 1.1 cgd */
454 1.1 cgd Arch_Init();
455 1.1 cgd Targ_Init();
456 1.1 cgd Suff_Init();
457 1.1 cgd
458 1.1 cgd DEFAULT = NILGNODE;
459 1.1 cgd (void)time(&now);
460 1.1 cgd
461 1.1 cgd /*
462 1.1 cgd * Set up the .TARGETS variable to contain the list of targets to be
463 1.1 cgd * created. If none specified, make the variable empty -- the parser
464 1.1 cgd * will fill the thing in with the default or .MAIN target.
465 1.1 cgd */
466 1.1 cgd if (!Lst_IsEmpty(create)) {
467 1.1 cgd LstNode ln;
468 1.1 cgd
469 1.1 cgd for (ln = Lst_First(create); ln != NILLNODE;
470 1.1 cgd ln = Lst_Succ(ln)) {
471 1.1 cgd char *name = (char *)Lst_Datum(ln);
472 1.1 cgd
473 1.1 cgd Var_Append(".TARGETS", name, VAR_GLOBAL);
474 1.1 cgd }
475 1.1 cgd } else
476 1.1 cgd Var_Set(".TARGETS", "", VAR_GLOBAL);
477 1.1 cgd
478 1.1 cgd /*
479 1.1 cgd * Read in the built-in rules first, followed by the specified makefile,
480 1.1 cgd * if it was (makefile != (char *) NULL), or the default Makefile and
481 1.1 cgd * makefile, in that order, if it wasn't.
482 1.1 cgd */
483 1.1 cgd if (!noBuiltins && !ReadMakefile(_PATH_DEFSYSMK))
484 1.1 cgd Fatal("make: no system rules (%s).", _PATH_DEFSYSMK);
485 1.1 cgd
486 1.1 cgd if (!Lst_IsEmpty(makefiles)) {
487 1.1 cgd LstNode ln;
488 1.1 cgd
489 1.1 cgd ln = Lst_Find(makefiles, (ClientData)NULL, ReadMakefile);
490 1.1 cgd if (ln != NILLNODE)
491 1.1 cgd Fatal("make: cannot open %s.", (char *)Lst_Datum(ln));
492 1.1 cgd } else if (!ReadMakefile("makefile"))
493 1.1 cgd (void)ReadMakefile("Makefile");
494 1.1 cgd
495 1.1 cgd (void)ReadMakefile(".depend");
496 1.1 cgd
497 1.1 cgd Var_Append("MFLAGS", Var_Value(MAKEFLAGS, VAR_GLOBAL), VAR_GLOBAL);
498 1.1 cgd
499 1.1 cgd /* Install all the flags into the MAKE envariable. */
500 1.1 cgd if ((p = Var_Value(MAKEFLAGS, VAR_GLOBAL)) && *p)
501 1.1 cgd #ifdef POSIX
502 1.1 cgd setenv("MAKEFLAGS", p, 1);
503 1.1 cgd #else
504 1.1 cgd setenv("MAKE", p, 1);
505 1.1 cgd #endif
506 1.1 cgd
507 1.1 cgd /*
508 1.1 cgd * For compatibility, look at the directories in the VPATH variable
509 1.1 cgd * and add them to the search path, if the variable is defined. The
510 1.1 cgd * variable's value is in the same format as the PATH envariable, i.e.
511 1.1 cgd * <directory>:<directory>:<directory>...
512 1.1 cgd */
513 1.1 cgd if (Var_Exists("VPATH", VAR_CMD)) {
514 1.1 cgd char *vpath, *path, *cp, savec;
515 1.1 cgd /*
516 1.1 cgd * GCC stores string constants in read-only memory, but
517 1.1 cgd * Var_Subst will want to write this thing, so store it
518 1.1 cgd * in an array
519 1.1 cgd */
520 1.1 cgd static char VPATH[] = "${VPATH}";
521 1.1 cgd
522 1.1 cgd vpath = Var_Subst(VPATH, VAR_CMD, FALSE);
523 1.1 cgd path = vpath;
524 1.1 cgd do {
525 1.1 cgd /* skip to end of directory */
526 1.1 cgd for (cp = path; *cp != ':' && *cp != '\0'; cp++);
527 1.1 cgd /* Save terminator character so know when to stop */
528 1.1 cgd savec = *cp;
529 1.1 cgd *cp = '\0';
530 1.1 cgd /* Add directory to search path */
531 1.1 cgd Dir_AddDir(dirSearchPath, path);
532 1.1 cgd *cp = savec;
533 1.1 cgd path = cp + 1;
534 1.1 cgd } while (savec == ':');
535 1.1 cgd (void)free((Address)vpath);
536 1.1 cgd }
537 1.1 cgd
538 1.1 cgd /*
539 1.1 cgd * Now that all search paths have been read for suffixes et al, it's
540 1.1 cgd * time to add the default search path to their lists...
541 1.1 cgd */
542 1.1 cgd Suff_DoPaths();
543 1.1 cgd
544 1.1 cgd /* print the initial graph, if the user requested it */
545 1.1 cgd if (DEBUG(GRAPH1))
546 1.1 cgd Targ_PrintGraph(1);
547 1.1 cgd
548 1.1 cgd /*
549 1.1 cgd * Have now read the entire graph and need to make a list of targets
550 1.1 cgd * to create. If none was given on the command line, we consult the
551 1.1 cgd * parsing module to find the main target(s) to create.
552 1.1 cgd */
553 1.1 cgd if (Lst_IsEmpty(create))
554 1.1 cgd targs = Parse_MainName();
555 1.1 cgd else
556 1.1 cgd targs = Targ_FindList(create, TARG_CREATE);
557 1.1 cgd
558 1.1 cgd /*
559 1.1 cgd * this was original amMake -- want to allow parallelism, so put this
560 1.1 cgd * back in, eventually.
561 1.1 cgd */
562 1.1 cgd if (0) {
563 1.1 cgd /*
564 1.1 cgd * Initialize job module before traversing the graph, now that
565 1.1 cgd * any .BEGIN and .END targets have been read. This is done
566 1.1 cgd * only if the -q flag wasn't given (to prevent the .BEGIN from
567 1.1 cgd * being executed should it exist).
568 1.1 cgd */
569 1.1 cgd if (!queryFlag) {
570 1.1 cgd if (maxLocal == -1)
571 1.1 cgd maxLocal = maxJobs;
572 1.1 cgd Job_Init(maxJobs, maxLocal);
573 1.1 cgd jobsRunning = TRUE;
574 1.1 cgd }
575 1.1 cgd
576 1.1 cgd /* Traverse the graph, checking on all the targets */
577 1.1 cgd outOfDate = Make_Run(targs);
578 1.1 cgd } else
579 1.1 cgd /*
580 1.1 cgd * Compat_Init will take care of creating all the targets as
581 1.1 cgd * well as initializing the module.
582 1.1 cgd */
583 1.1 cgd Compat_Run(targs);
584 1.1 cgd
585 1.1 cgd /* print the graph now it's been processed if the user requested it */
586 1.1 cgd if (DEBUG(GRAPH2))
587 1.1 cgd Targ_PrintGraph(2);
588 1.1 cgd
589 1.1 cgd if (queryFlag && outOfDate)
590 1.1 cgd exit(1);
591 1.1 cgd else
592 1.1 cgd exit(0);
593 1.1 cgd }
594 1.1 cgd
595 1.1 cgd /*-
596 1.1 cgd * ReadMakefile --
597 1.1 cgd * Open and parse the given makefile.
598 1.1 cgd *
599 1.1 cgd * Results:
600 1.1 cgd * TRUE if ok. FALSE if couldn't open file.
601 1.1 cgd *
602 1.1 cgd * Side Effects:
603 1.1 cgd * lots
604 1.1 cgd */
605 1.1 cgd static Boolean
606 1.1 cgd ReadMakefile(fname)
607 1.1 cgd char *fname; /* makefile to read */
608 1.1 cgd {
609 1.1 cgd extern Lst parseIncPath, sysIncPath;
610 1.1 cgd FILE *stream;
611 1.1 cgd char *name, path[MAXPATHLEN + 1];
612 1.1 cgd
613 1.1 cgd if (!strcmp(fname, "-")) {
614 1.1 cgd Parse_File("(stdin)", stdin);
615 1.1 cgd Var_Set("MAKEFILE", "", VAR_GLOBAL);
616 1.1 cgd } else {
617 1.1 cgd if (stream = fopen(fname, "r"))
618 1.1 cgd goto found;
619 1.1 cgd /* if we've chdir'd, rebuild the path name */
620 1.4 cgd if (obj_is_elsewhere && *fname != '/') {
621 1.1 cgd (void)sprintf(path, "%s/%s", curdir, fname);
622 1.1 cgd if (stream = fopen(path, "r")) {
623 1.1 cgd fname = path;
624 1.1 cgd goto found;
625 1.1 cgd }
626 1.1 cgd }
627 1.1 cgd /* look in -I and system include directories. */
628 1.1 cgd name = Dir_FindFile(fname, parseIncPath);
629 1.1 cgd if (!name)
630 1.1 cgd name = Dir_FindFile(fname, sysIncPath);
631 1.1 cgd if (!name || !(stream = fopen(name, "r")))
632 1.1 cgd return(FALSE);
633 1.1 cgd fname = name;
634 1.1 cgd /*
635 1.1 cgd * set the MAKEFILE variable desired by System V fans -- the
636 1.1 cgd * placement of the setting here means it gets set to the last
637 1.1 cgd * makefile specified, as it is set by SysV make.
638 1.1 cgd */
639 1.1 cgd found: Var_Set("MAKEFILE", fname, VAR_GLOBAL);
640 1.1 cgd Parse_File(fname, stream);
641 1.1 cgd (void)fclose(stream);
642 1.1 cgd }
643 1.1 cgd return(TRUE);
644 1.1 cgd }
645 1.1 cgd
646 1.1 cgd /*-
647 1.1 cgd * Error --
648 1.1 cgd * Print an error message given its format.
649 1.1 cgd *
650 1.1 cgd * Results:
651 1.1 cgd * None.
652 1.1 cgd *
653 1.1 cgd * Side Effects:
654 1.1 cgd * The message is printed.
655 1.1 cgd */
656 1.1 cgd /* VARARGS */
657 1.1 cgd void
658 1.1 cgd Error(va_alist)
659 1.1 cgd va_dcl
660 1.1 cgd {
661 1.1 cgd va_list ap;
662 1.1 cgd char *fmt;
663 1.1 cgd
664 1.1 cgd va_start(ap);
665 1.1 cgd fmt = va_arg(ap, char *);
666 1.1 cgd (void)vfprintf(stderr, fmt, ap);
667 1.1 cgd va_end(ap);
668 1.1 cgd (void)fprintf(stderr, "\n");
669 1.1 cgd (void)fflush(stderr);
670 1.1 cgd }
671 1.1 cgd
672 1.1 cgd /*-
673 1.1 cgd * Fatal --
674 1.1 cgd * Produce a Fatal error message. If jobs are running, waits for them
675 1.1 cgd * to finish.
676 1.1 cgd *
677 1.1 cgd * Results:
678 1.1 cgd * None
679 1.1 cgd *
680 1.1 cgd * Side Effects:
681 1.1 cgd * The program exits
682 1.1 cgd */
683 1.1 cgd /* VARARGS */
684 1.1 cgd void
685 1.1 cgd Fatal(va_alist)
686 1.1 cgd va_dcl
687 1.1 cgd {
688 1.1 cgd va_list ap;
689 1.1 cgd char *fmt;
690 1.1 cgd
691 1.1 cgd if (jobsRunning)
692 1.1 cgd Job_Wait();
693 1.1 cgd
694 1.1 cgd va_start(ap);
695 1.1 cgd fmt = va_arg(ap, char *);
696 1.1 cgd (void)vfprintf(stderr, fmt, ap);
697 1.1 cgd va_end(ap);
698 1.1 cgd (void)fprintf(stderr, "\n");
699 1.1 cgd (void)fflush(stderr);
700 1.1 cgd
701 1.1 cgd if (DEBUG(GRAPH2))
702 1.1 cgd Targ_PrintGraph(2);
703 1.1 cgd exit(2); /* Not 1 so -q can distinguish error */
704 1.1 cgd }
705 1.1 cgd
706 1.1 cgd /*
707 1.1 cgd * Punt --
708 1.1 cgd * Major exception once jobs are being created. Kills all jobs, prints
709 1.1 cgd * a message and exits.
710 1.1 cgd *
711 1.1 cgd * Results:
712 1.1 cgd * None
713 1.1 cgd *
714 1.1 cgd * Side Effects:
715 1.1 cgd * All children are killed indiscriminately and the program Lib_Exits
716 1.1 cgd */
717 1.1 cgd /* VARARGS */
718 1.1 cgd void
719 1.1 cgd Punt(va_alist)
720 1.1 cgd va_dcl
721 1.1 cgd {
722 1.1 cgd va_list ap;
723 1.1 cgd char *fmt;
724 1.1 cgd
725 1.1 cgd (void)fprintf(stderr, "make: ");
726 1.1 cgd va_start(ap);
727 1.1 cgd fmt = va_arg(ap, char *);
728 1.1 cgd (void)vfprintf(stderr, fmt, ap);
729 1.1 cgd va_end(ap);
730 1.1 cgd (void)fprintf(stderr, "\n");
731 1.1 cgd (void)fflush(stderr);
732 1.1 cgd
733 1.1 cgd DieHorribly();
734 1.1 cgd }
735 1.1 cgd
736 1.1 cgd /*-
737 1.1 cgd * DieHorribly --
738 1.1 cgd * Exit without giving a message.
739 1.1 cgd *
740 1.1 cgd * Results:
741 1.1 cgd * None
742 1.1 cgd *
743 1.1 cgd * Side Effects:
744 1.1 cgd * A big one...
745 1.1 cgd */
746 1.1 cgd void
747 1.1 cgd DieHorribly()
748 1.1 cgd {
749 1.1 cgd if (jobsRunning)
750 1.1 cgd Job_AbortAll();
751 1.1 cgd if (DEBUG(GRAPH2))
752 1.1 cgd Targ_PrintGraph(2);
753 1.1 cgd exit(2); /* Not 1, so -q can distinguish error */
754 1.1 cgd }
755 1.1 cgd
756 1.1 cgd /*
757 1.1 cgd * Finish --
758 1.1 cgd * Called when aborting due to errors in child shell to signal
759 1.1 cgd * abnormal exit.
760 1.1 cgd *
761 1.1 cgd * Results:
762 1.1 cgd * None
763 1.1 cgd *
764 1.1 cgd * Side Effects:
765 1.1 cgd * The program exits
766 1.1 cgd */
767 1.1 cgd void
768 1.1 cgd Finish(errors)
769 1.1 cgd int errors; /* number of errors encountered in Make_Make */
770 1.1 cgd {
771 1.1 cgd Fatal("%d error%s", errors, errors == 1 ? "" : "s");
772 1.1 cgd }
773 1.1 cgd
774 1.1 cgd /*
775 1.1 cgd * emalloc --
776 1.1 cgd * malloc, but die on error.
777 1.1 cgd */
778 1.1 cgd char *
779 1.1 cgd emalloc(len)
780 1.1 cgd u_int len;
781 1.1 cgd {
782 1.1 cgd char *p, *malloc();
783 1.1 cgd
784 1.1 cgd if (!(p = malloc(len)))
785 1.1 cgd enomem();
786 1.1 cgd return(p);
787 1.1 cgd }
788 1.1 cgd
789 1.1 cgd /*
790 1.1 cgd * enomem --
791 1.1 cgd * die when out of memory.
792 1.1 cgd */
793 1.1 cgd enomem()
794 1.1 cgd {
795 1.1 cgd (void)fprintf(stderr, "make: %s.\n", strerror(errno));
796 1.1 cgd exit(2);
797 1.1 cgd }
798 1.1 cgd
799 1.1 cgd /*
800 1.1 cgd * usage --
801 1.1 cgd * exit with usage message
802 1.1 cgd */
803 1.1 cgd usage()
804 1.1 cgd {
805 1.1 cgd (void)fprintf(stderr,
806 1.1 cgd "usage: make [-eiknqrst] [-D variable] [-d flags] [-f makefile ]\n\
807 1.1 cgd [-I directory] [-j max_jobs] [variable=value]\n");
808 1.1 cgd exit(2);
809 1.1 cgd }
810