Home | History | Annotate | Line # | Download | only in make
main.c revision 1.8
      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.8      cgd static char rcsid[] = "$Id: main.c,v 1.8 1993/12/04 02:12:40 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.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.1      cgd 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.1      cgd 			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