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