main.c revision 1.9 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.9 jtc static char rcsid[] = "$Id: main.c,v 1.9 1993/12/15 18:26:40 jtc 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.1 cgd rearg: while((c = getopt(argc, argv, "D:I:d: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.1 cgd case 'S':
168 1.1 cgd keepgoing = FALSE;
169 1.1 cgd Var_Append(MAKEFLAGS, "-S", VAR_GLOBAL);
170 1.1 cgd break;
171 1.1 cgd #endif
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.1 cgd
353 1.1 cgd /*
354 1.1 cgd * if the MAKEOBJDIR (or by default, the _PATH_OBJDIR) directory
355 1.1 cgd * exists, change into it and build there. Once things are
356 1.1 cgd * initted, have to add the original directory to the search path,
357 1.1 cgd * and modify the paths for the Makefiles apropriately. The
358 1.1 cgd * current directory is also placed as a variable for make scripts.
359 1.1 cgd */
360 1.7 cgd if (!(path = getenv("MAKEOBJDIR"))) {
361 1.1 cgd path = _PATH_OBJDIR;
362 1.7 cgd snprintf(mdpath, MAXPATHLEN + 1, "%s.%s", path, MACHINE);
363 1.7 cgd } else {
364 1.7 cgd strncpy(mdpath, path, MAXPATHLEN + 1);
365 1.7 cgd }
366 1.7 cgd
367 1.4 cgd curdir = emalloc((u_int)MAXPATHLEN + 1);
368 1.4 cgd if (!getwd(curdir)) {
369 1.4 cgd (void)fprintf(stderr, "make: %s.\n", curdir);
370 1.4 cgd exit(2);
371 1.4 cgd }
372 1.7 cgd if (!lstat(mdpath, &sb)) {
373 1.7 cgd if (chdir(mdpath))
374 1.6 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
375 1.7 cgd mdpath, strerror(errno));
376 1.6 cgd else
377 1.6 cgd obj_is_elsewhere = 1;
378 1.7 cgd } else {
379 1.7 cgd if (!lstat(path, &sb)) {
380 1.7 cgd if (chdir(path))
381 1.7 cgd (void)fprintf(stderr, "make warning: %s: %s.\n",
382 1.7 cgd path, strerror(errno));
383 1.7 cgd else
384 1.7 cgd obj_is_elsewhere = 1;
385 1.7 cgd }
386 1.1 cgd }
387 1.1 cgd
388 1.1 cgd create = Lst_Init(FALSE);
389 1.1 cgd makefiles = Lst_Init(FALSE);
390 1.1 cgd beSilent = FALSE; /* Print commands as executed */
391 1.1 cgd ignoreErrors = FALSE; /* Pay attention to non-zero returns */
392 1.1 cgd noExecute = FALSE; /* Execute all commands */
393 1.1 cgd keepgoing = FALSE; /* Stop on error */
394 1.1 cgd allPrecious = FALSE; /* Remove targets when interrupted */
395 1.1 cgd queryFlag = FALSE; /* This is not just a check-run */
396 1.1 cgd noBuiltins = FALSE; /* Read the built-in rules */
397 1.1 cgd touchFlag = FALSE; /* Actually update targets */
398 1.1 cgd usePipes = TRUE; /* Catch child output in pipes */
399 1.1 cgd debug = 0; /* No debug verbosity, please. */
400 1.1 cgd jobsRunning = FALSE;
401 1.1 cgd
402 1.1 cgd maxJobs = DEFMAXJOBS; /* Set default max concurrency */
403 1.1 cgd maxLocal = DEFMAXLOCAL; /* Set default local max concurrency */
404 1.1 cgd
405 1.1 cgd /*
406 1.1 cgd * Initialize the parsing, directory and variable modules to prepare
407 1.1 cgd * for the reading of inclusion paths and variable settings on the
408 1.1 cgd * command line
409 1.1 cgd */
410 1.1 cgd Dir_Init(); /* Initialize directory structures so -I flags
411 1.1 cgd * can be processed correctly */
412 1.1 cgd Parse_Init(); /* Need to initialize the paths of #include
413 1.1 cgd * directories */
414 1.1 cgd Var_Init(); /* As well as the lists of variables for
415 1.1 cgd * parsing arguments */
416 1.1 cgd
417 1.4 cgd if (obj_is_elsewhere)
418 1.1 cgd Dir_AddDir(dirSearchPath, curdir);
419 1.4 cgd Var_Set(".CURDIR", curdir, VAR_GLOBAL);
420 1.1 cgd
421 1.1 cgd /*
422 1.1 cgd * Initialize various variables.
423 1.1 cgd * MAKE also gets this name, for compatibility
424 1.1 cgd * .MAKEFLAGS gets set to the empty string just in case.
425 1.1 cgd * MFLAGS also gets initialized empty, for compatibility.
426 1.1 cgd */
427 1.1 cgd Var_Set("MAKE", argv[0], VAR_GLOBAL);
428 1.1 cgd Var_Set(MAKEFLAGS, "", VAR_GLOBAL);
429 1.1 cgd Var_Set("MFLAGS", "", VAR_GLOBAL);
430 1.1 cgd Var_Set("MACHINE", MACHINE, VAR_GLOBAL);
431 1.8 cgd Var_Set("MACHINE_ARCH", MACHINE_ARCH, VAR_GLOBAL);
432 1.1 cgd
433 1.1 cgd /*
434 1.1 cgd * First snag any flags out of the MAKE environment variable.
435 1.1 cgd * (Note this is *not* MAKEFLAGS since /bin/make uses that and it's
436 1.1 cgd * in a different format).
437 1.1 cgd */
438 1.1 cgd #ifdef POSIX
439 1.1 cgd Main_ParseArgLine(getenv("MAKEFLAGS"));
440 1.1 cgd #else
441 1.1 cgd Main_ParseArgLine(getenv("MAKE"));
442 1.1 cgd #endif
443 1.1 cgd
444 1.1 cgd MainParseArgs(argc, argv);
445 1.1 cgd
446 1.1 cgd /*
447 1.1 cgd * Initialize archive, target and suffix modules in preparation for
448 1.1 cgd * parsing the makefile(s)
449 1.1 cgd */
450 1.1 cgd Arch_Init();
451 1.1 cgd Targ_Init();
452 1.1 cgd Suff_Init();
453 1.1 cgd
454 1.1 cgd DEFAULT = NILGNODE;
455 1.1 cgd (void)time(&now);
456 1.1 cgd
457 1.1 cgd /*
458 1.1 cgd * Set up the .TARGETS variable to contain the list of targets to be
459 1.1 cgd * created. If none specified, make the variable empty -- the parser
460 1.1 cgd * will fill the thing in with the default or .MAIN target.
461 1.1 cgd */
462 1.1 cgd if (!Lst_IsEmpty(create)) {
463 1.1 cgd LstNode ln;
464 1.1 cgd
465 1.1 cgd for (ln = Lst_First(create); ln != NILLNODE;
466 1.1 cgd ln = Lst_Succ(ln)) {
467 1.1 cgd char *name = (char *)Lst_Datum(ln);
468 1.1 cgd
469 1.1 cgd Var_Append(".TARGETS", name, VAR_GLOBAL);
470 1.1 cgd }
471 1.1 cgd } else
472 1.1 cgd Var_Set(".TARGETS", "", VAR_GLOBAL);
473 1.1 cgd
474 1.1 cgd /*
475 1.1 cgd * Read in the built-in rules first, followed by the specified makefile,
476 1.1 cgd * if it was (makefile != (char *) NULL), or the default Makefile and
477 1.1 cgd * makefile, in that order, if it wasn't.
478 1.1 cgd */
479 1.1 cgd if (!noBuiltins && !ReadMakefile(_PATH_DEFSYSMK))
480 1.1 cgd Fatal("make: no system rules (%s).", _PATH_DEFSYSMK);
481 1.1 cgd
482 1.1 cgd if (!Lst_IsEmpty(makefiles)) {
483 1.1 cgd LstNode ln;
484 1.1 cgd
485 1.1 cgd ln = Lst_Find(makefiles, (ClientData)NULL, ReadMakefile);
486 1.1 cgd if (ln != NILLNODE)
487 1.1 cgd Fatal("make: cannot open %s.", (char *)Lst_Datum(ln));
488 1.1 cgd } else if (!ReadMakefile("makefile"))
489 1.1 cgd (void)ReadMakefile("Makefile");
490 1.1 cgd
491 1.1 cgd (void)ReadMakefile(".depend");
492 1.1 cgd
493 1.1 cgd Var_Append("MFLAGS", Var_Value(MAKEFLAGS, VAR_GLOBAL), VAR_GLOBAL);
494 1.1 cgd
495 1.1 cgd /* Install all the flags into the MAKE envariable. */
496 1.1 cgd if ((p = Var_Value(MAKEFLAGS, VAR_GLOBAL)) && *p)
497 1.1 cgd #ifdef POSIX
498 1.1 cgd setenv("MAKEFLAGS", p, 1);
499 1.1 cgd #else
500 1.1 cgd setenv("MAKE", p, 1);
501 1.1 cgd #endif
502 1.1 cgd
503 1.1 cgd /*
504 1.1 cgd * For compatibility, look at the directories in the VPATH variable
505 1.1 cgd * and add them to the search path, if the variable is defined. The
506 1.1 cgd * variable's value is in the same format as the PATH envariable, i.e.
507 1.1 cgd * <directory>:<directory>:<directory>...
508 1.1 cgd */
509 1.1 cgd if (Var_Exists("VPATH", VAR_CMD)) {
510 1.1 cgd char *vpath, *path, *cp, savec;
511 1.1 cgd /*
512 1.1 cgd * GCC stores string constants in read-only memory, but
513 1.1 cgd * Var_Subst will want to write this thing, so store it
514 1.1 cgd * in an array
515 1.1 cgd */
516 1.1 cgd static char VPATH[] = "${VPATH}";
517 1.1 cgd
518 1.1 cgd vpath = Var_Subst(VPATH, VAR_CMD, FALSE);
519 1.1 cgd path = vpath;
520 1.1 cgd do {
521 1.1 cgd /* skip to end of directory */
522 1.1 cgd for (cp = path; *cp != ':' && *cp != '\0'; cp++);
523 1.1 cgd /* Save terminator character so know when to stop */
524 1.1 cgd savec = *cp;
525 1.1 cgd *cp = '\0';
526 1.1 cgd /* Add directory to search path */
527 1.1 cgd Dir_AddDir(dirSearchPath, path);
528 1.1 cgd *cp = savec;
529 1.1 cgd path = cp + 1;
530 1.1 cgd } while (savec == ':');
531 1.1 cgd (void)free((Address)vpath);
532 1.1 cgd }
533 1.1 cgd
534 1.1 cgd /*
535 1.1 cgd * Now that all search paths have been read for suffixes et al, it's
536 1.1 cgd * time to add the default search path to their lists...
537 1.1 cgd */
538 1.1 cgd Suff_DoPaths();
539 1.1 cgd
540 1.1 cgd /* print the initial graph, if the user requested it */
541 1.1 cgd if (DEBUG(GRAPH1))
542 1.1 cgd Targ_PrintGraph(1);
543 1.1 cgd
544 1.1 cgd /*
545 1.1 cgd * Have now read the entire graph and need to make a list of targets
546 1.1 cgd * to create. If none was given on the command line, we consult the
547 1.1 cgd * parsing module to find the main target(s) to create.
548 1.1 cgd */
549 1.1 cgd if (Lst_IsEmpty(create))
550 1.1 cgd targs = Parse_MainName();
551 1.1 cgd else
552 1.1 cgd targs = Targ_FindList(create, TARG_CREATE);
553 1.1 cgd
554 1.1 cgd /*
555 1.1 cgd * this was original amMake -- want to allow parallelism, so put this
556 1.1 cgd * back in, eventually.
557 1.1 cgd */
558 1.1 cgd if (0) {
559 1.1 cgd /*
560 1.1 cgd * Initialize job module before traversing the graph, now that
561 1.1 cgd * any .BEGIN and .END targets have been read. This is done
562 1.1 cgd * only if the -q flag wasn't given (to prevent the .BEGIN from
563 1.1 cgd * being executed should it exist).
564 1.1 cgd */
565 1.1 cgd if (!queryFlag) {
566 1.1 cgd if (maxLocal == -1)
567 1.1 cgd maxLocal = maxJobs;
568 1.1 cgd Job_Init(maxJobs, maxLocal);
569 1.1 cgd jobsRunning = TRUE;
570 1.1 cgd }
571 1.1 cgd
572 1.1 cgd /* Traverse the graph, checking on all the targets */
573 1.1 cgd outOfDate = Make_Run(targs);
574 1.1 cgd } else
575 1.1 cgd /*
576 1.1 cgd * Compat_Init will take care of creating all the targets as
577 1.1 cgd * well as initializing the module.
578 1.1 cgd */
579 1.1 cgd Compat_Run(targs);
580 1.1 cgd
581 1.1 cgd /* print the graph now it's been processed if the user requested it */
582 1.1 cgd if (DEBUG(GRAPH2))
583 1.1 cgd Targ_PrintGraph(2);
584 1.1 cgd
585 1.1 cgd if (queryFlag && outOfDate)
586 1.1 cgd exit(1);
587 1.1 cgd else
588 1.1 cgd exit(0);
589 1.1 cgd }
590 1.1 cgd
591 1.1 cgd /*-
592 1.1 cgd * ReadMakefile --
593 1.1 cgd * Open and parse the given makefile.
594 1.1 cgd *
595 1.1 cgd * Results:
596 1.1 cgd * TRUE if ok. FALSE if couldn't open file.
597 1.1 cgd *
598 1.1 cgd * Side Effects:
599 1.1 cgd * lots
600 1.1 cgd */
601 1.1 cgd static Boolean
602 1.1 cgd ReadMakefile(fname)
603 1.1 cgd char *fname; /* makefile to read */
604 1.1 cgd {
605 1.1 cgd extern Lst parseIncPath, sysIncPath;
606 1.1 cgd FILE *stream;
607 1.1 cgd char *name, path[MAXPATHLEN + 1];
608 1.1 cgd
609 1.1 cgd if (!strcmp(fname, "-")) {
610 1.1 cgd Parse_File("(stdin)", stdin);
611 1.1 cgd Var_Set("MAKEFILE", "", VAR_GLOBAL);
612 1.1 cgd } else {
613 1.1 cgd if (stream = fopen(fname, "r"))
614 1.1 cgd goto found;
615 1.1 cgd /* if we've chdir'd, rebuild the path name */
616 1.4 cgd if (obj_is_elsewhere && *fname != '/') {
617 1.1 cgd (void)sprintf(path, "%s/%s", curdir, fname);
618 1.1 cgd if (stream = fopen(path, "r")) {
619 1.1 cgd fname = path;
620 1.1 cgd goto found;
621 1.1 cgd }
622 1.1 cgd }
623 1.1 cgd /* look in -I and system include directories. */
624 1.1 cgd name = Dir_FindFile(fname, parseIncPath);
625 1.1 cgd if (!name)
626 1.1 cgd name = Dir_FindFile(fname, sysIncPath);
627 1.1 cgd if (!name || !(stream = fopen(name, "r")))
628 1.1 cgd return(FALSE);
629 1.1 cgd fname = name;
630 1.1 cgd /*
631 1.1 cgd * set the MAKEFILE variable desired by System V fans -- the
632 1.1 cgd * placement of the setting here means it gets set to the last
633 1.1 cgd * makefile specified, as it is set by SysV make.
634 1.1 cgd */
635 1.1 cgd found: Var_Set("MAKEFILE", fname, VAR_GLOBAL);
636 1.1 cgd Parse_File(fname, stream);
637 1.1 cgd (void)fclose(stream);
638 1.1 cgd }
639 1.1 cgd return(TRUE);
640 1.1 cgd }
641 1.1 cgd
642 1.1 cgd /*-
643 1.1 cgd * Error --
644 1.1 cgd * Print an error message given its format.
645 1.1 cgd *
646 1.1 cgd * Results:
647 1.1 cgd * None.
648 1.1 cgd *
649 1.1 cgd * Side Effects:
650 1.1 cgd * The message is printed.
651 1.1 cgd */
652 1.1 cgd /* VARARGS */
653 1.1 cgd void
654 1.1 cgd Error(va_alist)
655 1.1 cgd va_dcl
656 1.1 cgd {
657 1.1 cgd va_list ap;
658 1.1 cgd char *fmt;
659 1.1 cgd
660 1.1 cgd va_start(ap);
661 1.1 cgd fmt = va_arg(ap, char *);
662 1.1 cgd (void)vfprintf(stderr, fmt, ap);
663 1.1 cgd va_end(ap);
664 1.1 cgd (void)fprintf(stderr, "\n");
665 1.1 cgd (void)fflush(stderr);
666 1.1 cgd }
667 1.1 cgd
668 1.1 cgd /*-
669 1.1 cgd * Fatal --
670 1.1 cgd * Produce a Fatal error message. If jobs are running, waits for them
671 1.1 cgd * to finish.
672 1.1 cgd *
673 1.1 cgd * Results:
674 1.1 cgd * None
675 1.1 cgd *
676 1.1 cgd * Side Effects:
677 1.1 cgd * The program exits
678 1.1 cgd */
679 1.1 cgd /* VARARGS */
680 1.1 cgd void
681 1.1 cgd Fatal(va_alist)
682 1.1 cgd va_dcl
683 1.1 cgd {
684 1.1 cgd va_list ap;
685 1.1 cgd char *fmt;
686 1.1 cgd
687 1.1 cgd if (jobsRunning)
688 1.1 cgd Job_Wait();
689 1.1 cgd
690 1.1 cgd va_start(ap);
691 1.1 cgd fmt = va_arg(ap, char *);
692 1.1 cgd (void)vfprintf(stderr, fmt, ap);
693 1.1 cgd va_end(ap);
694 1.1 cgd (void)fprintf(stderr, "\n");
695 1.1 cgd (void)fflush(stderr);
696 1.1 cgd
697 1.1 cgd if (DEBUG(GRAPH2))
698 1.1 cgd Targ_PrintGraph(2);
699 1.1 cgd exit(2); /* Not 1 so -q can distinguish error */
700 1.1 cgd }
701 1.1 cgd
702 1.1 cgd /*
703 1.1 cgd * Punt --
704 1.1 cgd * Major exception once jobs are being created. Kills all jobs, prints
705 1.1 cgd * a message and exits.
706 1.1 cgd *
707 1.1 cgd * Results:
708 1.1 cgd * None
709 1.1 cgd *
710 1.1 cgd * Side Effects:
711 1.1 cgd * All children are killed indiscriminately and the program Lib_Exits
712 1.1 cgd */
713 1.1 cgd /* VARARGS */
714 1.1 cgd void
715 1.1 cgd Punt(va_alist)
716 1.1 cgd va_dcl
717 1.1 cgd {
718 1.1 cgd va_list ap;
719 1.1 cgd char *fmt;
720 1.1 cgd
721 1.1 cgd (void)fprintf(stderr, "make: ");
722 1.1 cgd va_start(ap);
723 1.1 cgd fmt = va_arg(ap, char *);
724 1.1 cgd (void)vfprintf(stderr, fmt, ap);
725 1.1 cgd va_end(ap);
726 1.1 cgd (void)fprintf(stderr, "\n");
727 1.1 cgd (void)fflush(stderr);
728 1.1 cgd
729 1.1 cgd DieHorribly();
730 1.1 cgd }
731 1.1 cgd
732 1.1 cgd /*-
733 1.1 cgd * DieHorribly --
734 1.1 cgd * Exit without giving a message.
735 1.1 cgd *
736 1.1 cgd * Results:
737 1.1 cgd * None
738 1.1 cgd *
739 1.1 cgd * Side Effects:
740 1.1 cgd * A big one...
741 1.1 cgd */
742 1.1 cgd void
743 1.1 cgd DieHorribly()
744 1.1 cgd {
745 1.1 cgd if (jobsRunning)
746 1.1 cgd Job_AbortAll();
747 1.1 cgd if (DEBUG(GRAPH2))
748 1.1 cgd Targ_PrintGraph(2);
749 1.1 cgd exit(2); /* Not 1, so -q can distinguish error */
750 1.1 cgd }
751 1.1 cgd
752 1.1 cgd /*
753 1.1 cgd * Finish --
754 1.1 cgd * Called when aborting due to errors in child shell to signal
755 1.1 cgd * abnormal exit.
756 1.1 cgd *
757 1.1 cgd * Results:
758 1.1 cgd * None
759 1.1 cgd *
760 1.1 cgd * Side Effects:
761 1.1 cgd * The program exits
762 1.1 cgd */
763 1.1 cgd void
764 1.1 cgd Finish(errors)
765 1.1 cgd int errors; /* number of errors encountered in Make_Make */
766 1.1 cgd {
767 1.1 cgd Fatal("%d error%s", errors, errors == 1 ? "" : "s");
768 1.1 cgd }
769 1.1 cgd
770 1.1 cgd /*
771 1.1 cgd * emalloc --
772 1.1 cgd * malloc, but die on error.
773 1.1 cgd */
774 1.1 cgd char *
775 1.1 cgd emalloc(len)
776 1.1 cgd u_int len;
777 1.1 cgd {
778 1.1 cgd char *p, *malloc();
779 1.1 cgd
780 1.1 cgd if (!(p = malloc(len)))
781 1.1 cgd enomem();
782 1.1 cgd return(p);
783 1.1 cgd }
784 1.1 cgd
785 1.1 cgd /*
786 1.1 cgd * enomem --
787 1.1 cgd * die when out of memory.
788 1.1 cgd */
789 1.1 cgd enomem()
790 1.1 cgd {
791 1.1 cgd (void)fprintf(stderr, "make: %s.\n", strerror(errno));
792 1.1 cgd exit(2);
793 1.1 cgd }
794 1.1 cgd
795 1.1 cgd /*
796 1.1 cgd * usage --
797 1.1 cgd * exit with usage message
798 1.1 cgd */
799 1.1 cgd usage()
800 1.1 cgd {
801 1.1 cgd (void)fprintf(stderr,
802 1.1 cgd "usage: make [-eiknqrst] [-D variable] [-d flags] [-f makefile ]\n\
803 1.1 cgd [-I directory] [-j max_jobs] [variable=value]\n");
804 1.1 cgd exit(2);
805 1.1 cgd }
806