main.c revision 1.13 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.13 cgd /* from: static char sccsid[] = "@(#)main.c 5.25 (Berkeley) 4/1/91"; */
47 1.13 cgd static char *rcsid = "$Id: main.c,v 1.13 1994/03/05 00:34:53 cgd 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.13 cgd #include <sys/types.h>
78 1.13 cgd #include <sys/time.h>
79 1.1 cgd #include <sys/param.h>
80 1.13 cgd #include <sys/resource.h>
81 1.1 cgd #include <sys/signal.h>
82 1.1 cgd #include <sys/stat.h>
83 1.1 cgd #include <errno.h>
84 1.1 cgd #include <fcntl.h>
85 1.1 cgd #include <stdio.h>
86 1.13 cgd #if __STDC__
87 1.13 cgd #include <stdarg.h>
88 1.13 cgd #else
89 1.1 cgd #include <varargs.h>
90 1.13 cgd #endif
91 1.1 cgd #include "make.h"
92 1.13 cgd #include "hash.h"
93 1.13 cgd #include "dir.h"
94 1.13 cgd #include "job.h"
95 1.1 cgd #include "pathnames.h"
96 1.1 cgd
97 1.1 cgd #ifndef DEFMAXLOCAL
98 1.1 cgd #define DEFMAXLOCAL DEFMAXJOBS
99 1.1 cgd #endif DEFMAXLOCAL
100 1.1 cgd
101 1.1 cgd #define MAKEFLAGS ".MAKEFLAGS"
102 1.1 cgd
103 1.1 cgd Lst create; /* Targets to be made */
104 1.1 cgd time_t now; /* Time at start of make */
105 1.1 cgd GNode *DEFAULT; /* .DEFAULT node */
106 1.1 cgd Boolean allPrecious; /* .PRECIOUS given on line by itself */
107 1.1 cgd
108 1.1 cgd static Boolean noBuiltins; /* -r flag */
109 1.1 cgd static Lst makefiles; /* ordered list of makefiles to read */
110 1.13 cgd int maxJobs; /* -J argument */
111 1.1 cgd static int maxLocal; /* -L argument */
112 1.13 cgd Boolean compatMake; /* -B argument */
113 1.1 cgd Boolean debug; /* -d flag */
114 1.1 cgd Boolean noExecute; /* -n flag */
115 1.1 cgd Boolean keepgoing; /* -k flag */
116 1.1 cgd Boolean queryFlag; /* -q flag */
117 1.1 cgd Boolean touchFlag; /* -t flag */
118 1.1 cgd Boolean usePipes; /* !-P flag */
119 1.1 cgd Boolean ignoreErrors; /* -i flag */
120 1.1 cgd Boolean beSilent; /* -s flag */
121 1.1 cgd Boolean oldVars; /* variable substitution style */
122 1.1 cgd Boolean checkEnvFirst; /* -e flag */
123 1.1 cgd static Boolean jobsRunning; /* TRUE if the jobs might be running */
124 1.1 cgd
125 1.1 cgd static Boolean ReadMakefile();
126 1.13 cgd static void usage();
127 1.1 cgd
128 1.13 cgd static char *curdir; /* startup directory */
129 1.13 cgd static char *objdir; /* where we chdir'ed to */
130 1.1 cgd
131 1.1 cgd /*-
132 1.1 cgd * MainParseArgs --
133 1.1 cgd * Parse a given argument vector. Called from main() and from
134 1.1 cgd * Main_ParseArgLine() when the .MAKEFLAGS target is used.
135 1.1 cgd *
136 1.1 cgd * XXX: Deal with command line overriding .MAKEFLAGS in makefile
137 1.1 cgd *
138 1.1 cgd * Results:
139 1.1 cgd * None
140 1.1 cgd *
141 1.1 cgd * Side Effects:
142 1.1 cgd * Various global and local flags will be set depending on the flags
143 1.1 cgd * given
144 1.1 cgd */
145 1.1 cgd static void
146 1.1 cgd MainParseArgs(argc, argv)
147 1.1 cgd int argc;
148 1.1 cgd char **argv;
149 1.1 cgd {
150 1.1 cgd extern int optind;
151 1.1 cgd extern char *optarg;
152 1.1 cgd char c;
153 1.1 cgd
154 1.1 cgd optind = 1; /* since we're called more than once */
155 1.13 cgd #ifdef notyet
156 1.13 cgd # define OPTFLAGS "BD:I:L:PSd:ef:ij:knqrst"
157 1.13 cgd #else
158 1.13 cgd # define OPTFLAGS "D:I:d:ef:ij:knqrst"
159 1.13 cgd #endif
160 1.13 cgd rearg: while((c = getopt(argc, argv, OPTFLAGS)) != EOF) {
161 1.1 cgd switch(c) {
162 1.1 cgd case 'D':
163 1.1 cgd Var_Set(optarg, "1", VAR_GLOBAL);
164 1.1 cgd Var_Append(MAKEFLAGS, "-D", VAR_GLOBAL);
165 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
166 1.1 cgd break;
167 1.1 cgd case 'I':
168 1.1 cgd Parse_AddIncludeDir(optarg);
169 1.1 cgd Var_Append(MAKEFLAGS, "-I", VAR_GLOBAL);
170 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
171 1.1 cgd break;
172 1.13 cgd #ifdef notyet
173 1.13 cgd case 'B':
174 1.13 cgd compatMake = TRUE;
175 1.13 cgd break;
176 1.1 cgd case 'L':
177 1.1 cgd maxLocal = atoi(optarg);
178 1.1 cgd Var_Append(MAKEFLAGS, "-L", VAR_GLOBAL);
179 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
180 1.1 cgd break;
181 1.1 cgd case 'P':
182 1.1 cgd usePipes = FALSE;
183 1.1 cgd Var_Append(MAKEFLAGS, "-P", VAR_GLOBAL);
184 1.1 cgd break;
185 1.1 cgd case 'S':
186 1.1 cgd keepgoing = FALSE;
187 1.1 cgd Var_Append(MAKEFLAGS, "-S", VAR_GLOBAL);
188 1.1 cgd break;
189 1.13 cgd #endif
190 1.1 cgd case 'd': {
191 1.1 cgd char *modules = optarg;
192 1.1 cgd
193 1.1 cgd for (; *modules; ++modules)
194 1.1 cgd switch (*modules) {
195 1.1 cgd case 'A':
196 1.1 cgd debug = ~0;
197 1.1 cgd break;
198 1.1 cgd case 'a':
199 1.1 cgd debug |= DEBUG_ARCH;
200 1.1 cgd break;
201 1.1 cgd case 'c':
202 1.1 cgd debug |= DEBUG_COND;
203 1.1 cgd break;
204 1.1 cgd case 'd':
205 1.1 cgd debug |= DEBUG_DIR;
206 1.1 cgd break;
207 1.13 cgd case 'f':
208 1.13 cgd debug |= DEBUG_FOR;
209 1.13 cgd break;
210 1.1 cgd case 'g':
211 1.1 cgd if (modules[1] == '1') {
212 1.1 cgd debug |= DEBUG_GRAPH1;
213 1.1 cgd ++modules;
214 1.1 cgd }
215 1.1 cgd else if (modules[1] == '2') {
216 1.1 cgd debug |= DEBUG_GRAPH2;
217 1.1 cgd ++modules;
218 1.1 cgd }
219 1.1 cgd break;
220 1.1 cgd case 'j':
221 1.1 cgd debug |= DEBUG_JOB;
222 1.1 cgd break;
223 1.1 cgd case 'm':
224 1.1 cgd debug |= DEBUG_MAKE;
225 1.1 cgd break;
226 1.1 cgd case 's':
227 1.1 cgd debug |= DEBUG_SUFF;
228 1.1 cgd break;
229 1.1 cgd case 't':
230 1.1 cgd debug |= DEBUG_TARG;
231 1.1 cgd break;
232 1.1 cgd case 'v':
233 1.1 cgd debug |= DEBUG_VAR;
234 1.1 cgd break;
235 1.1 cgd default:
236 1.1 cgd (void)fprintf(stderr,
237 1.1 cgd "make: illegal argument to d option -- %c\n",
238 1.1 cgd *modules);
239 1.1 cgd usage();
240 1.1 cgd }
241 1.1 cgd Var_Append(MAKEFLAGS, "-d", VAR_GLOBAL);
242 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
243 1.1 cgd break;
244 1.1 cgd }
245 1.1 cgd case 'e':
246 1.1 cgd checkEnvFirst = TRUE;
247 1.1 cgd Var_Append(MAKEFLAGS, "-e", VAR_GLOBAL);
248 1.1 cgd break;
249 1.1 cgd case 'f':
250 1.1 cgd (void)Lst_AtEnd(makefiles, (ClientData)optarg);
251 1.1 cgd break;
252 1.1 cgd case 'i':
253 1.1 cgd ignoreErrors = TRUE;
254 1.1 cgd Var_Append(MAKEFLAGS, "-i", VAR_GLOBAL);
255 1.1 cgd break;
256 1.1 cgd case 'j':
257 1.1 cgd maxJobs = atoi(optarg);
258 1.9 jtc Var_Append(MAKEFLAGS, "-j", VAR_GLOBAL);
259 1.1 cgd Var_Append(MAKEFLAGS, optarg, VAR_GLOBAL);
260 1.1 cgd break;
261 1.1 cgd case 'k':
262 1.1 cgd keepgoing = TRUE;
263 1.1 cgd Var_Append(MAKEFLAGS, "-k", VAR_GLOBAL);
264 1.1 cgd break;
265 1.1 cgd case 'n':
266 1.1 cgd noExecute = TRUE;
267 1.1 cgd Var_Append(MAKEFLAGS, "-n", VAR_GLOBAL);
268 1.1 cgd break;
269 1.1 cgd case 'q':
270 1.1 cgd queryFlag = TRUE;
271 1.1 cgd /* Kind of nonsensical, wot? */
272 1.1 cgd Var_Append(MAKEFLAGS, "-q", VAR_GLOBAL);
273 1.1 cgd break;
274 1.1 cgd case 'r':
275 1.1 cgd noBuiltins = TRUE;
276 1.1 cgd Var_Append(MAKEFLAGS, "-r", VAR_GLOBAL);
277 1.1 cgd break;
278 1.1 cgd case 's':
279 1.1 cgd beSilent = TRUE;
280 1.1 cgd Var_Append(MAKEFLAGS, "-s", VAR_GLOBAL);
281 1.1 cgd break;
282 1.1 cgd case 't':
283 1.1 cgd touchFlag = TRUE;
284 1.1 cgd Var_Append(MAKEFLAGS, "-t", VAR_GLOBAL);
285 1.1 cgd break;
286 1.1 cgd default:
287 1.1 cgd case '?':
288 1.1 cgd usage();
289 1.1 cgd }
290 1.1 cgd }
291 1.1 cgd
292 1.1 cgd oldVars = TRUE;
293 1.1 cgd
294 1.1 cgd /*
295 1.1 cgd * See if the rest of the arguments are variable assignments and
296 1.1 cgd * perform them if so. Else take them to be targets and stuff them
297 1.1 cgd * on the end of the "create" list.
298 1.1 cgd */
299 1.1 cgd for (argv += optind, argc -= optind; *argv; ++argv, --argc)
300 1.1 cgd if (Parse_IsVar(*argv))
301 1.1 cgd Parse_DoVar(*argv, VAR_CMD);
302 1.1 cgd else {
303 1.1 cgd if (!**argv)
304 1.1 cgd Punt("illegal (null) argument.");
305 1.1 cgd if (**argv == '-') {
306 1.13 cgd if ((*argv)[1])
307 1.13 cgd optind = 0; /* -flag... */
308 1.13 cgd else
309 1.13 cgd optind = 1; /* - */
310 1.1 cgd goto rearg;
311 1.1 cgd }
312 1.1 cgd (void)Lst_AtEnd(create, (ClientData)*argv);
313 1.1 cgd }
314 1.1 cgd }
315 1.1 cgd
316 1.1 cgd /*-
317 1.1 cgd * Main_ParseArgLine --
318 1.1 cgd * Used by the parse module when a .MFLAGS or .MAKEFLAGS target
319 1.1 cgd * is encountered and by main() when reading the .MAKEFLAGS envariable.
320 1.1 cgd * Takes a line of arguments and breaks it into its
321 1.1 cgd * component words and passes those words and the number of them to the
322 1.1 cgd * MainParseArgs function.
323 1.1 cgd * The line should have all its leading whitespace removed.
324 1.1 cgd *
325 1.1 cgd * Results:
326 1.1 cgd * None
327 1.1 cgd *
328 1.1 cgd * Side Effects:
329 1.1 cgd * Only those that come from the various arguments.
330 1.1 cgd */
331 1.1 cgd void
332 1.1 cgd Main_ParseArgLine(line)
333 1.1 cgd char *line; /* Line to fracture */
334 1.1 cgd {
335 1.1 cgd char **argv; /* Manufactured argument vector */
336 1.1 cgd int argc; /* Number of arguments in argv */
337 1.1 cgd
338 1.1 cgd if (line == NULL)
339 1.1 cgd return;
340 1.13 cgd for (; *line == ' '; ++line)
341 1.13 cgd continue;
342 1.1 cgd if (!*line)
343 1.1 cgd return;
344 1.1 cgd
345 1.1 cgd argv = brk_string(line, &argc);
346 1.1 cgd MainParseArgs(argc, argv);
347 1.1 cgd }
348 1.1 cgd
349 1.1 cgd /*-
350 1.1 cgd * main --
351 1.1 cgd * The main function, for obvious reasons. Initializes variables
352 1.1 cgd * and a few modules, then parses the arguments give it in the
353 1.1 cgd * environment and on the command line. Reads the system makefile
354 1.1 cgd * followed by either Makefile, makefile or the file given by the
355 1.1 cgd * -f argument. Sets the .MAKEFLAGS PMake variable based on all the
356 1.1 cgd * flags it has received by then uses either the Make or the Compat
357 1.1 cgd * module to create the initial list of targets.
358 1.1 cgd *
359 1.1 cgd * Results:
360 1.1 cgd * If -q was given, exits -1 if anything was out-of-date. Else it exits
361 1.1 cgd * 0.
362 1.1 cgd *
363 1.1 cgd * Side Effects:
364 1.1 cgd * The program exits when done. Targets are created. etc. etc. etc.
365 1.1 cgd */
366 1.13 cgd int
367 1.1 cgd main(argc, argv)
368 1.1 cgd int argc;
369 1.1 cgd char **argv;
370 1.1 cgd {
371 1.1 cgd Lst targs; /* target nodes to create -- passed to Make_Init */
372 1.13 cgd Boolean outOfDate = TRUE; /* FALSE if all targets up to date */
373 1.13 cgd struct stat sb, sa;
374 1.13 cgd char *p, *path, *pwd, *getenv(), *getwd();
375 1.13 cgd char mdpath[MAXPATHLEN + 1];
376 1.13 cgd char obpath[MAXPATHLEN + 1];
377 1.13 cgd char cdpath[MAXPATHLEN + 1];
378 1.13 cgd
379 1.13 cgd /*
380 1.13 cgd * Find where we are and take care of PWD for the automounter...
381 1.13 cgd * All this code is so that we know where we are when we start up
382 1.13 cgd * on a different machine with pmake.
383 1.13 cgd */
384 1.13 cgd curdir = cdpath;
385 1.13 cgd if (getwd(curdir) == NULL) {
386 1.13 cgd (void)fprintf(stderr, "make: %s.\n", curdir);
387 1.13 cgd exit(2);
388 1.13 cgd }
389 1.13 cgd
390 1.13 cgd if (stat(curdir, &sa) == -1) {
391 1.13 cgd (void)fprintf(stderr, "make: %s: %s.\n",
392 1.13 cgd curdir, strerror(errno));
393 1.13 cgd exit(2);
394 1.13 cgd }
395 1.13 cgd
396 1.13 cgd if ((pwd = getenv("PWD")) != NULL) {
397 1.13 cgd if (stat(pwd, &sb) == 0 && sa.st_ino == sb.st_ino &&
398 1.13 cgd sa.st_dev == sb.st_dev)
399 1.13 cgd (void) strcpy(curdir, pwd);
400 1.13 cgd }
401 1.13 cgd
402 1.1 cgd
403 1.1 cgd /*
404 1.1 cgd * if the MAKEOBJDIR (or by default, the _PATH_OBJDIR) directory
405 1.1 cgd * exists, change into it and build there. Once things are
406 1.1 cgd * initted, have to add the original directory to the search path,
407 1.1 cgd * and modify the paths for the Makefiles apropriately. The
408 1.1 cgd * current directory is also placed as a variable for make scripts.
409 1.1 cgd */
410 1.7 cgd if (!(path = getenv("MAKEOBJDIR"))) {
411 1.1 cgd path = _PATH_OBJDIR;
412 1.13 cgd (void) sprintf(mdpath, "%s.%s", path, MACHINE);
413 1.7 cgd }
414 1.13 cgd else
415 1.13 cgd (void) strncpy(mdpath, path, MAXPATHLEN + 1);
416 1.13 cgd
417 1.13 cgd if (stat(mdpath, &sb) == 0 && S_ISDIR(sb.st_mode)) {
418 1.7 cgd
419 1.13 cgd if (chdir(mdpath)) {
420 1.13 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
421 1.13 cgd mdpath, strerror(errno));
422 1.13 cgd objdir = curdir;
423 1.13 cgd }
424 1.13 cgd else {
425 1.13 cgd if (mdpath[0] != '/') {
426 1.13 cgd (void) sprintf(obpath, "%s/%s", curdir, mdpath);
427 1.13 cgd objdir = obpath;
428 1.13 cgd }
429 1.13 cgd else
430 1.13 cgd objdir = mdpath;
431 1.13 cgd }
432 1.4 cgd }
433 1.13 cgd else {
434 1.13 cgd if (stat(path, &sb) == 0 && S_ISDIR(sb.st_mode)) {
435 1.13 cgd
436 1.13 cgd if (chdir(path)) {
437 1.7 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
438 1.13 cgd path, strerror(errno));
439 1.13 cgd objdir = curdir;
440 1.13 cgd }
441 1.13 cgd else {
442 1.13 cgd if (path[0] != '/') {
443 1.13 cgd (void) sprintf(obpath, "%s/%s", curdir,
444 1.13 cgd path);
445 1.13 cgd objdir = obpath;
446 1.13 cgd }
447 1.13 cgd else
448 1.13 cgd objdir = obpath;
449 1.13 cgd }
450 1.7 cgd }
451 1.13 cgd else
452 1.13 cgd objdir = curdir;
453 1.1 cgd }
454 1.1 cgd
455 1.13 cgd setenv("PWD", objdir, 1);
456 1.13 cgd
457 1.1 cgd create = Lst_Init(FALSE);
458 1.1 cgd makefiles = Lst_Init(FALSE);
459 1.1 cgd beSilent = FALSE; /* Print commands as executed */
460 1.1 cgd ignoreErrors = FALSE; /* Pay attention to non-zero returns */
461 1.1 cgd noExecute = FALSE; /* Execute all commands */
462 1.1 cgd keepgoing = FALSE; /* Stop on error */
463 1.1 cgd allPrecious = FALSE; /* Remove targets when interrupted */
464 1.1 cgd queryFlag = FALSE; /* This is not just a check-run */
465 1.1 cgd noBuiltins = FALSE; /* Read the built-in rules */
466 1.1 cgd touchFlag = FALSE; /* Actually update targets */
467 1.1 cgd usePipes = TRUE; /* Catch child output in pipes */
468 1.1 cgd debug = 0; /* No debug verbosity, please. */
469 1.1 cgd jobsRunning = FALSE;
470 1.1 cgd
471 1.1 cgd maxJobs = DEFMAXJOBS; /* Set default max concurrency */
472 1.1 cgd maxLocal = DEFMAXLOCAL; /* Set default local max concurrency */
473 1.13 cgd #ifdef notyet
474 1.13 cgd compatMake = FALSE; /* No compat mode */
475 1.13 cgd #else
476 1.13 cgd compatMake = TRUE; /* No compat mode */
477 1.13 cgd #endif
478 1.1 cgd
479 1.13 cgd
480 1.1 cgd /*
481 1.1 cgd * Initialize the parsing, directory and variable modules to prepare
482 1.1 cgd * for the reading of inclusion paths and variable settings on the
483 1.1 cgd * command line
484 1.1 cgd */
485 1.1 cgd Dir_Init(); /* Initialize directory structures so -I flags
486 1.1 cgd * can be processed correctly */
487 1.1 cgd Parse_Init(); /* Need to initialize the paths of #include
488 1.1 cgd * directories */
489 1.1 cgd Var_Init(); /* As well as the lists of variables for
490 1.1 cgd * parsing arguments */
491 1.13 cgd if (objdir != curdir)
492 1.1 cgd Dir_AddDir(dirSearchPath, curdir);
493 1.4 cgd Var_Set(".CURDIR", curdir, VAR_GLOBAL);
494 1.13 cgd Var_Set(".OBJDIR", objdir, VAR_GLOBAL);
495 1.1 cgd
496 1.1 cgd /*
497 1.1 cgd * Initialize various variables.
498 1.1 cgd * MAKE also gets this name, for compatibility
499 1.1 cgd * .MAKEFLAGS gets set to the empty string just in case.
500 1.1 cgd * MFLAGS also gets initialized empty, for compatibility.
501 1.1 cgd */
502 1.1 cgd Var_Set("MAKE", argv[0], VAR_GLOBAL);
503 1.1 cgd Var_Set(MAKEFLAGS, "", VAR_GLOBAL);
504 1.1 cgd Var_Set("MFLAGS", "", VAR_GLOBAL);
505 1.13 cgd #ifdef MACHINE
506 1.1 cgd Var_Set("MACHINE", MACHINE, VAR_GLOBAL);
507 1.13 cgd #endif
508 1.13 cgd #ifdef MACHINE_ARCH
509 1.8 cgd Var_Set("MACHINE_ARCH", MACHINE_ARCH, VAR_GLOBAL);
510 1.13 cgd #endif
511 1.1 cgd
512 1.1 cgd /*
513 1.1 cgd * First snag any flags out of the MAKE environment variable.
514 1.1 cgd * (Note this is *not* MAKEFLAGS since /bin/make uses that and it's
515 1.1 cgd * in a different format).
516 1.1 cgd */
517 1.1 cgd #ifdef POSIX
518 1.1 cgd Main_ParseArgLine(getenv("MAKEFLAGS"));
519 1.1 cgd #else
520 1.1 cgd Main_ParseArgLine(getenv("MAKE"));
521 1.1 cgd #endif
522 1.1 cgd
523 1.1 cgd MainParseArgs(argc, argv);
524 1.1 cgd
525 1.1 cgd /*
526 1.1 cgd * Initialize archive, target and suffix modules in preparation for
527 1.1 cgd * parsing the makefile(s)
528 1.1 cgd */
529 1.1 cgd Arch_Init();
530 1.1 cgd Targ_Init();
531 1.1 cgd Suff_Init();
532 1.1 cgd
533 1.1 cgd DEFAULT = NILGNODE;
534 1.1 cgd (void)time(&now);
535 1.1 cgd
536 1.1 cgd /*
537 1.1 cgd * Set up the .TARGETS variable to contain the list of targets to be
538 1.1 cgd * created. If none specified, make the variable empty -- the parser
539 1.1 cgd * will fill the thing in with the default or .MAIN target.
540 1.1 cgd */
541 1.1 cgd if (!Lst_IsEmpty(create)) {
542 1.1 cgd LstNode ln;
543 1.1 cgd
544 1.1 cgd for (ln = Lst_First(create); ln != NILLNODE;
545 1.1 cgd ln = Lst_Succ(ln)) {
546 1.1 cgd char *name = (char *)Lst_Datum(ln);
547 1.1 cgd
548 1.1 cgd Var_Append(".TARGETS", name, VAR_GLOBAL);
549 1.1 cgd }
550 1.1 cgd } else
551 1.1 cgd Var_Set(".TARGETS", "", VAR_GLOBAL);
552 1.1 cgd
553 1.1 cgd /*
554 1.1 cgd * Read in the built-in rules first, followed by the specified makefile,
555 1.1 cgd * if it was (makefile != (char *) NULL), or the default Makefile and
556 1.1 cgd * makefile, in that order, if it wasn't.
557 1.1 cgd */
558 1.1 cgd if (!noBuiltins && !ReadMakefile(_PATH_DEFSYSMK))
559 1.1 cgd Fatal("make: no system rules (%s).", _PATH_DEFSYSMK);
560 1.1 cgd
561 1.1 cgd if (!Lst_IsEmpty(makefiles)) {
562 1.1 cgd LstNode ln;
563 1.1 cgd
564 1.1 cgd ln = Lst_Find(makefiles, (ClientData)NULL, ReadMakefile);
565 1.1 cgd if (ln != NILLNODE)
566 1.1 cgd Fatal("make: cannot open %s.", (char *)Lst_Datum(ln));
567 1.1 cgd } else if (!ReadMakefile("makefile"))
568 1.1 cgd (void)ReadMakefile("Makefile");
569 1.1 cgd
570 1.1 cgd (void)ReadMakefile(".depend");
571 1.1 cgd
572 1.1 cgd Var_Append("MFLAGS", Var_Value(MAKEFLAGS, VAR_GLOBAL), VAR_GLOBAL);
573 1.1 cgd
574 1.1 cgd /* Install all the flags into the MAKE envariable. */
575 1.13 cgd if (((p = Var_Value(MAKEFLAGS, VAR_GLOBAL)) != NULL) && *p)
576 1.1 cgd #ifdef POSIX
577 1.1 cgd setenv("MAKEFLAGS", p, 1);
578 1.1 cgd #else
579 1.1 cgd setenv("MAKE", p, 1);
580 1.1 cgd #endif
581 1.1 cgd
582 1.1 cgd /*
583 1.1 cgd * For compatibility, look at the directories in the VPATH variable
584 1.1 cgd * and add them to the search path, if the variable is defined. The
585 1.1 cgd * variable's value is in the same format as the PATH envariable, i.e.
586 1.1 cgd * <directory>:<directory>:<directory>...
587 1.1 cgd */
588 1.1 cgd if (Var_Exists("VPATH", VAR_CMD)) {
589 1.1 cgd char *vpath, *path, *cp, savec;
590 1.1 cgd /*
591 1.1 cgd * GCC stores string constants in read-only memory, but
592 1.1 cgd * Var_Subst will want to write this thing, so store it
593 1.1 cgd * in an array
594 1.1 cgd */
595 1.1 cgd static char VPATH[] = "${VPATH}";
596 1.1 cgd
597 1.13 cgd vpath = Var_Subst(NULL, VPATH, VAR_CMD, FALSE);
598 1.1 cgd path = vpath;
599 1.1 cgd do {
600 1.1 cgd /* skip to end of directory */
601 1.13 cgd for (cp = path; *cp != ':' && *cp != '\0'; cp++)
602 1.13 cgd continue;
603 1.1 cgd /* Save terminator character so know when to stop */
604 1.1 cgd savec = *cp;
605 1.1 cgd *cp = '\0';
606 1.1 cgd /* Add directory to search path */
607 1.1 cgd Dir_AddDir(dirSearchPath, path);
608 1.1 cgd *cp = savec;
609 1.1 cgd path = cp + 1;
610 1.1 cgd } while (savec == ':');
611 1.1 cgd (void)free((Address)vpath);
612 1.1 cgd }
613 1.1 cgd
614 1.1 cgd /*
615 1.1 cgd * Now that all search paths have been read for suffixes et al, it's
616 1.1 cgd * time to add the default search path to their lists...
617 1.1 cgd */
618 1.1 cgd Suff_DoPaths();
619 1.1 cgd
620 1.1 cgd /* print the initial graph, if the user requested it */
621 1.1 cgd if (DEBUG(GRAPH1))
622 1.1 cgd Targ_PrintGraph(1);
623 1.1 cgd
624 1.1 cgd /*
625 1.1 cgd * Have now read the entire graph and need to make a list of targets
626 1.1 cgd * to create. If none was given on the command line, we consult the
627 1.1 cgd * parsing module to find the main target(s) to create.
628 1.1 cgd */
629 1.1 cgd if (Lst_IsEmpty(create))
630 1.1 cgd targs = Parse_MainName();
631 1.1 cgd else
632 1.1 cgd targs = Targ_FindList(create, TARG_CREATE);
633 1.1 cgd
634 1.1 cgd /*
635 1.1 cgd * this was original amMake -- want to allow parallelism, so put this
636 1.1 cgd * back in, eventually.
637 1.1 cgd */
638 1.13 cgd if (!compatMake) {
639 1.1 cgd /*
640 1.1 cgd * Initialize job module before traversing the graph, now that
641 1.1 cgd * any .BEGIN and .END targets have been read. This is done
642 1.1 cgd * only if the -q flag wasn't given (to prevent the .BEGIN from
643 1.1 cgd * being executed should it exist).
644 1.1 cgd */
645 1.1 cgd if (!queryFlag) {
646 1.1 cgd if (maxLocal == -1)
647 1.1 cgd maxLocal = maxJobs;
648 1.1 cgd Job_Init(maxJobs, maxLocal);
649 1.1 cgd jobsRunning = TRUE;
650 1.1 cgd }
651 1.1 cgd
652 1.1 cgd /* Traverse the graph, checking on all the targets */
653 1.1 cgd outOfDate = Make_Run(targs);
654 1.1 cgd } else
655 1.1 cgd /*
656 1.1 cgd * Compat_Init will take care of creating all the targets as
657 1.1 cgd * well as initializing the module.
658 1.1 cgd */
659 1.1 cgd Compat_Run(targs);
660 1.1 cgd
661 1.1 cgd /* print the graph now it's been processed if the user requested it */
662 1.1 cgd if (DEBUG(GRAPH2))
663 1.1 cgd Targ_PrintGraph(2);
664 1.1 cgd
665 1.1 cgd if (queryFlag && outOfDate)
666 1.13 cgd return(1);
667 1.1 cgd else
668 1.13 cgd return(0);
669 1.1 cgd }
670 1.1 cgd
671 1.1 cgd /*-
672 1.1 cgd * ReadMakefile --
673 1.1 cgd * Open and parse the given makefile.
674 1.1 cgd *
675 1.1 cgd * Results:
676 1.1 cgd * TRUE if ok. FALSE if couldn't open file.
677 1.1 cgd *
678 1.1 cgd * Side Effects:
679 1.1 cgd * lots
680 1.1 cgd */
681 1.1 cgd static Boolean
682 1.1 cgd ReadMakefile(fname)
683 1.1 cgd char *fname; /* makefile to read */
684 1.1 cgd {
685 1.1 cgd extern Lst parseIncPath, sysIncPath;
686 1.1 cgd FILE *stream;
687 1.1 cgd char *name, path[MAXPATHLEN + 1];
688 1.1 cgd
689 1.1 cgd if (!strcmp(fname, "-")) {
690 1.1 cgd Parse_File("(stdin)", stdin);
691 1.1 cgd Var_Set("MAKEFILE", "", VAR_GLOBAL);
692 1.1 cgd } else {
693 1.13 cgd if ((stream = fopen(fname, "r")) != NULL)
694 1.1 cgd goto found;
695 1.1 cgd /* if we've chdir'd, rebuild the path name */
696 1.13 cgd if (curdir != objdir && *fname != '/') {
697 1.1 cgd (void)sprintf(path, "%s/%s", curdir, fname);
698 1.13 cgd if ((stream = fopen(path, "r")) != NULL) {
699 1.1 cgd fname = path;
700 1.1 cgd goto found;
701 1.1 cgd }
702 1.1 cgd }
703 1.1 cgd /* look in -I and system include directories. */
704 1.1 cgd name = Dir_FindFile(fname, parseIncPath);
705 1.1 cgd if (!name)
706 1.1 cgd name = Dir_FindFile(fname, sysIncPath);
707 1.1 cgd if (!name || !(stream = fopen(name, "r")))
708 1.1 cgd return(FALSE);
709 1.1 cgd fname = name;
710 1.1 cgd /*
711 1.1 cgd * set the MAKEFILE variable desired by System V fans -- the
712 1.1 cgd * placement of the setting here means it gets set to the last
713 1.1 cgd * makefile specified, as it is set by SysV make.
714 1.1 cgd */
715 1.1 cgd found: Var_Set("MAKEFILE", fname, VAR_GLOBAL);
716 1.1 cgd Parse_File(fname, stream);
717 1.1 cgd (void)fclose(stream);
718 1.1 cgd }
719 1.1 cgd return(TRUE);
720 1.1 cgd }
721 1.1 cgd
722 1.1 cgd /*-
723 1.1 cgd * Error --
724 1.1 cgd * Print an error message given its format.
725 1.1 cgd *
726 1.1 cgd * Results:
727 1.1 cgd * None.
728 1.1 cgd *
729 1.1 cgd * Side Effects:
730 1.1 cgd * The message is printed.
731 1.1 cgd */
732 1.1 cgd /* VARARGS */
733 1.1 cgd void
734 1.13 cgd #if __STDC__
735 1.13 cgd Error(char *fmt, ...)
736 1.13 cgd #else
737 1.1 cgd Error(va_alist)
738 1.1 cgd va_dcl
739 1.13 cgd #endif
740 1.1 cgd {
741 1.1 cgd va_list ap;
742 1.13 cgd #if __STDC__
743 1.13 cgd va_start(ap, fmt);
744 1.13 cgd #else
745 1.1 cgd char *fmt;
746 1.1 cgd
747 1.1 cgd va_start(ap);
748 1.1 cgd fmt = va_arg(ap, char *);
749 1.13 cgd #endif
750 1.1 cgd (void)vfprintf(stderr, fmt, ap);
751 1.1 cgd va_end(ap);
752 1.1 cgd (void)fprintf(stderr, "\n");
753 1.1 cgd (void)fflush(stderr);
754 1.1 cgd }
755 1.1 cgd
756 1.1 cgd /*-
757 1.1 cgd * Fatal --
758 1.1 cgd * Produce a Fatal error message. If jobs are running, waits for them
759 1.1 cgd * to finish.
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 /* VARARGS */
768 1.1 cgd void
769 1.13 cgd #if __STDC__
770 1.13 cgd Fatal(char *fmt, ...)
771 1.13 cgd #else
772 1.1 cgd Fatal(va_alist)
773 1.1 cgd va_dcl
774 1.13 cgd #endif
775 1.1 cgd {
776 1.1 cgd va_list ap;
777 1.13 cgd #if __STDC__
778 1.13 cgd va_start(ap, fmt);
779 1.13 cgd #else
780 1.1 cgd char *fmt;
781 1.1 cgd
782 1.13 cgd va_start(ap);
783 1.13 cgd fmt = va_arg(ap, char *);
784 1.13 cgd #endif
785 1.1 cgd if (jobsRunning)
786 1.1 cgd Job_Wait();
787 1.1 cgd
788 1.1 cgd (void)vfprintf(stderr, fmt, ap);
789 1.1 cgd va_end(ap);
790 1.1 cgd (void)fprintf(stderr, "\n");
791 1.1 cgd (void)fflush(stderr);
792 1.1 cgd
793 1.1 cgd if (DEBUG(GRAPH2))
794 1.1 cgd Targ_PrintGraph(2);
795 1.1 cgd exit(2); /* Not 1 so -q can distinguish error */
796 1.1 cgd }
797 1.1 cgd
798 1.1 cgd /*
799 1.1 cgd * Punt --
800 1.1 cgd * Major exception once jobs are being created. Kills all jobs, prints
801 1.1 cgd * a message and exits.
802 1.1 cgd *
803 1.1 cgd * Results:
804 1.1 cgd * None
805 1.1 cgd *
806 1.1 cgd * Side Effects:
807 1.1 cgd * All children are killed indiscriminately and the program Lib_Exits
808 1.1 cgd */
809 1.1 cgd /* VARARGS */
810 1.1 cgd void
811 1.13 cgd #if __STDC__
812 1.13 cgd Punt(char *fmt, ...)
813 1.13 cgd #else
814 1.1 cgd Punt(va_alist)
815 1.1 cgd va_dcl
816 1.13 cgd #endif
817 1.1 cgd {
818 1.1 cgd va_list ap;
819 1.13 cgd #if __STDC__
820 1.13 cgd va_start(ap, fmt);
821 1.13 cgd #else
822 1.1 cgd char *fmt;
823 1.1 cgd
824 1.1 cgd va_start(ap);
825 1.1 cgd fmt = va_arg(ap, char *);
826 1.13 cgd #endif
827 1.13 cgd
828 1.13 cgd (void)fprintf(stderr, "make: ");
829 1.1 cgd (void)vfprintf(stderr, fmt, ap);
830 1.1 cgd va_end(ap);
831 1.1 cgd (void)fprintf(stderr, "\n");
832 1.1 cgd (void)fflush(stderr);
833 1.1 cgd
834 1.1 cgd DieHorribly();
835 1.1 cgd }
836 1.1 cgd
837 1.1 cgd /*-
838 1.1 cgd * DieHorribly --
839 1.1 cgd * Exit without giving a message.
840 1.1 cgd *
841 1.1 cgd * Results:
842 1.1 cgd * None
843 1.1 cgd *
844 1.1 cgd * Side Effects:
845 1.1 cgd * A big one...
846 1.1 cgd */
847 1.1 cgd void
848 1.1 cgd DieHorribly()
849 1.1 cgd {
850 1.1 cgd if (jobsRunning)
851 1.1 cgd Job_AbortAll();
852 1.1 cgd if (DEBUG(GRAPH2))
853 1.1 cgd Targ_PrintGraph(2);
854 1.1 cgd exit(2); /* Not 1, so -q can distinguish error */
855 1.1 cgd }
856 1.1 cgd
857 1.1 cgd /*
858 1.1 cgd * Finish --
859 1.1 cgd * Called when aborting due to errors in child shell to signal
860 1.1 cgd * abnormal exit.
861 1.1 cgd *
862 1.1 cgd * Results:
863 1.1 cgd * None
864 1.1 cgd *
865 1.1 cgd * Side Effects:
866 1.1 cgd * The program exits
867 1.1 cgd */
868 1.1 cgd void
869 1.1 cgd Finish(errors)
870 1.1 cgd int errors; /* number of errors encountered in Make_Make */
871 1.1 cgd {
872 1.1 cgd Fatal("%d error%s", errors, errors == 1 ? "" : "s");
873 1.1 cgd }
874 1.1 cgd
875 1.1 cgd /*
876 1.1 cgd * emalloc --
877 1.1 cgd * malloc, but die on error.
878 1.1 cgd */
879 1.1 cgd char *
880 1.1 cgd emalloc(len)
881 1.1 cgd u_int len;
882 1.1 cgd {
883 1.12 jtc char *p;
884 1.1 cgd
885 1.1 cgd if (!(p = malloc(len)))
886 1.1 cgd enomem();
887 1.1 cgd return(p);
888 1.1 cgd }
889 1.1 cgd
890 1.1 cgd /*
891 1.1 cgd * enomem --
892 1.1 cgd * die when out of memory.
893 1.1 cgd */
894 1.13 cgd void
895 1.1 cgd enomem()
896 1.1 cgd {
897 1.1 cgd (void)fprintf(stderr, "make: %s.\n", strerror(errno));
898 1.1 cgd exit(2);
899 1.1 cgd }
900 1.1 cgd
901 1.1 cgd /*
902 1.1 cgd * usage --
903 1.1 cgd * exit with usage message
904 1.1 cgd */
905 1.13 cgd static void
906 1.1 cgd usage()
907 1.1 cgd {
908 1.1 cgd (void)fprintf(stderr,
909 1.1 cgd "usage: make [-eiknqrst] [-D variable] [-d flags] [-f makefile ]\n\
910 1.1 cgd [-I directory] [-j max_jobs] [variable=value]\n");
911 1.1 cgd exit(2);
912 1.1 cgd }
913