1 /* Argument parsing and main program of GNU Make.
2 Copyright (C) 1988, 89, 90, 91, 94, 95, 96 Free Software Foundation, Inc.
3 This file is part of GNU Make.
5 GNU Make is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
10 GNU Make is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with GNU Make; see the file COPYING. If not, write to
17 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
29 # include <proto/dos.h>
33 #include "pathstuff.h"
37 int __stack
= 20000; /* Make sure we have 20K of stack space */
40 extern void init_dir
PARAMS ((void));
41 extern void remote_setup
PARAMS ((void));
42 extern void remote_cleanup
PARAMS ((void));
43 extern RETSIGTYPE fatal_error_signal
PARAMS ((int sig
));
44 extern RETSIGTYPE child_handler
PARAMS ((int sig
));
46 extern void print_variable_data_base
PARAMS ((void));
47 extern void print_dir_data_base
PARAMS ((void));
48 extern void print_rule_data_base
PARAMS ((void));
49 extern void print_file_data_base
PARAMS ((void));
50 extern void print_vpath_data_base
PARAMS ((void));
56 #ifndef sun /* Sun has an incorrect decl in a header. */
59 extern double atof ();
61 extern char *mktemp ();
63 static void print_data_base
PARAMS((void));
64 static void print_version
PARAMS ((void));
65 static void decode_switches
PARAMS ((int argc
, char **argv
, int env
));
66 static void decode_env_switches
PARAMS ((char *envar
, unsigned int len
));
67 static void define_makeflags
PARAMS ((int all
, int makefile
));
68 static char *quote_as_word
PARAMS ((char *out
, char *in
, int double_dollars
));
70 /* The structure that describes an accepted command switch. */
74 char c
; /* The switch character. */
76 enum /* Type of the value. */
78 flag
, /* Turn int flag on. */
79 flag_off
, /* Turn int flag off. */
80 string
, /* One string per switch. */
81 positive_int
, /* A positive integer. */
82 floating
, /* A floating-point number (double). */
86 char *value_ptr
; /* Pointer to the value-holding variable. */
88 unsigned int env
:1; /* Can come from MAKEFLAGS. */
89 unsigned int toenv
:1; /* Should be put in MAKEFLAGS. */
90 unsigned int no_makefile
:1; /* Don't propagate when remaking makefiles. */
92 char *noarg_value
; /* Pointer to value used if no argument is given. */
93 char *default_value
;/* Pointer to default value. */
95 char *long_name
; /* Long option name. */
96 char *argdesc
; /* Descriptive word for argument. */
97 char *description
; /* Description for usage message. */
101 /* The structure used to hold the list of strings given
102 in command switches of a type that takes string arguments. */
106 char **list
; /* Nil-terminated list of strings. */
107 unsigned int idx
; /* Index into above. */
108 unsigned int max
; /* Number of pointers allocated. */
112 /* The recognized command switches. */
114 /* Nonzero means do not print commands to be executed (-s). */
118 /* Nonzero means just touch the files
119 that would appear to need remaking (-t) */
123 /* Nonzero means just print what commands would need to be executed,
124 don't actually execute them (-n). */
128 /* Print debugging trace info (-d). */
133 /* Suspend make in main for a short time to allow debugger to attach */
135 int suspend_flag
= 0;
138 /* Environment variables override makefile definitions. */
140 int env_overrides
= 0;
142 /* Nonzero means ignore status codes returned by commands
143 executed to remake files. Just treat them all as successful (-i). */
145 int ignore_errors_flag
= 0;
147 /* Nonzero means don't remake anything, just print the data base
148 that results from reading the makefile (-p). */
150 int print_data_base_flag
= 0;
152 /* Nonzero means don't remake anything; just return a nonzero status
153 if the specified targets are not up to date (-q). */
155 int question_flag
= 0;
157 /* Nonzero means do not use any of the builtin rules (-r). */
159 int no_builtin_rules_flag
= 0;
161 /* Nonzero means keep going even if remaking some file fails (-k). */
164 int default_keep_going_flag
= 0;
166 /* Nonzero means print directory before starting and when done (-w). */
168 int print_directory_flag
= 0;
170 /* Nonzero means ignore print_directory_flag and never print the directory.
171 This is necessary because print_directory_flag is set implicitly. */
173 int inhibit_print_directory_flag
= 0;
175 /* Nonzero means print version information. */
177 int print_version_flag
= 0;
179 /* List of makefiles given with -f switches. */
181 static struct stringlist
*makefiles
= 0;
184 /* Number of job slots (commands that can be run at once). */
186 unsigned int job_slots
= 1;
187 unsigned int default_job_slots
= 1;
189 /* Value of job_slots that means no limit. */
191 static unsigned int inf_jobs
= 0;
193 /* Maximum load average at which multiple jobs will be run.
194 Negative values mean unlimited, while zero means limit to
195 zero load (which could be useful to start infinite jobs remotely
196 but one at a time locally). */
198 double max_load_average
= -1.0;
199 double default_load_average
= -1.0;
201 int max_load_average
= -1;
202 int default_load_average
= -1;
205 /* List of directories given with -C switches. */
207 static struct stringlist
*directories
= 0;
209 /* List of include directories given with -I switches. */
211 static struct stringlist
*include_directories
= 0;
213 /* List of files given with -o switches. */
215 static struct stringlist
*old_files
= 0;
217 /* List of files given with -W switches. */
219 static struct stringlist
*new_files
= 0;
221 /* If nonzero, we should just print usage and exit. */
223 static int print_usage_flag
= 0;
225 /* If nonzero, we should print a warning message
226 for each reference to an undefined variable. */
228 int warn_undefined_variables_flag
;
230 /* The table of command switches. */
232 static const struct command_switch switches
[] =
234 { 'b', ignore
, 0, 0, 0, 0, 0, 0,
236 "Ignored for compatibility" },
237 { 'C', string
, (char *) &directories
, 0, 0, 0, 0, 0,
238 "directory", "DIRECTORY",
239 "Change to DIRECTORY before doing anything" },
240 { 'd', flag
, (char *) &debug_flag
, 1, 1, 0, 0, 0,
242 "Print lots of debugging information" },
244 { 'D', flag
, (char *) &suspend_flag
, 1, 1, 0, 0, 0,
245 "suspend-for-debug", 0,
246 "Suspend process to allow a debugger to attach" },
248 { 'e', flag
, (char *) &env_overrides
, 1, 1, 0, 0, 0,
249 "environment-overrides", 0,
250 "Environment variables override makefiles" },
251 { 'f', string
, (char *) &makefiles
, 0, 0, 0, 0, 0,
253 "Read FILE as a makefile" },
254 { 'h', flag
, (char *) &print_usage_flag
, 0, 0, 0, 0, 0,
256 "Print this message and exit" },
257 { 'i', flag
, (char *) &ignore_errors_flag
, 1, 1, 0, 0, 0,
259 "Ignore errors from commands" },
260 { 'I', string
, (char *) &include_directories
, 1, 1, 0, 0, 0,
261 "include-dir", "DIRECTORY",
262 "Search DIRECTORY for included makefiles" },
263 { 'j', positive_int
, (char *) &job_slots
, 1, 1, 0,
264 (char *) &inf_jobs
, (char *) &default_job_slots
,
266 "Allow N jobs at once; infinite jobs with no arg" },
267 { 'k', flag
, (char *) &keep_going_flag
, 1, 1, 0,
268 0, (char *) &default_keep_going_flag
,
270 "Keep going when some targets can't be made" },
272 { 'l', floating
, (char *) &max_load_average
, 1, 1, 0,
273 (char *) &default_load_average
, (char *) &default_load_average
,
275 "Don't start multiple jobs unless load is below N" },
277 { 'l', positive_int
, (char *) &max_load_average
, 1, 1, 0,
278 (char *) &default_load_average
, (char *) &default_load_average
,
280 "Don't start multiple jobs unless load is below N" },
282 { 'm', ignore
, 0, 0, 0, 0, 0, 0,
285 { 'n', flag
, (char *) &just_print_flag
, 1, 1, 1, 0, 0,
287 "Don't actually run any commands; just print them" },
288 { 'o', string
, (char *) &old_files
, 0, 0, 0, 0, 0,
290 "Consider FILE to be very old and don't remake it" },
291 { 'p', flag
, (char *) &print_data_base_flag
, 1, 1, 0, 0, 0,
292 "print-data-base", 0,
293 "Print make's internal database" },
294 { 'q', flag
, (char *) &question_flag
, 1, 1, 1, 0, 0,
296 "Run no commands; exit status says if up to date" },
297 { 'r', flag
, (char *) &no_builtin_rules_flag
, 1, 1, 0, 0, 0,
298 "no-builtin-rules", 0,
299 "Disable the built-in implicit rules" },
300 { 's', flag
, (char *) &silent_flag
, 1, 1, 0, 0, 0,
302 "Don't echo commands" },
303 { 'S', flag_off
, (char *) &keep_going_flag
, 1, 1, 0,
304 0, (char *) &default_keep_going_flag
,
307 { 't', flag
, (char *) &touch_flag
, 1, 1, 1, 0, 0,
309 "Touch targets instead of remaking them" },
310 { 'v', flag
, (char *) &print_version_flag
, 1, 1, 0, 0, 0,
312 "Print the version number of make and exit" },
313 { 'w', flag
, (char *) &print_directory_flag
, 1, 1, 0, 0, 0,
314 "print-directory", 0,
315 "Print the current directory" },
316 { 2, flag
, (char *) &inhibit_print_directory_flag
, 1, 1, 0, 0, 0,
317 "no-print-directory", 0,
318 "Turn off -w, even if it was turned on implicitly" },
319 { 'W', string
, (char *) &new_files
, 0, 0, 0, 0, 0,
321 "Consider FILE to be infinitely new" },
322 { 3, flag
, (char *) &warn_undefined_variables_flag
, 1, 1, 0, 0, 0,
323 "warn-undefined-variables", 0,
324 "Warn when an undefined variable is referenced" },
328 /* Secondary long names for options. */
330 static struct option long_option_aliases
[] =
332 { "quiet", no_argument
, 0, 's' },
333 { "stop", no_argument
, 0, 'S' },
334 { "new-file", required_argument
, 0, 'W' },
335 { "assume-new", required_argument
, 0, 'W' },
336 { "assume-old", required_argument
, 0, 'o' },
337 { "max-load", optional_argument
, 0, 'l' },
338 { "dry-run", no_argument
, 0, 'n' },
339 { "recon", no_argument
, 0, 'n' },
340 { "makefile", required_argument
, 0, 'f' },
343 /* The usage message prints the descriptions of options starting in
344 this column. Make sure it leaves enough room for the longest
345 description to fit in less than 80 characters. */
347 #define DESCRIPTION_COLUMN 30
349 /* List of goal targets. */
351 static struct dep
*goals
, *lastgoal
;
353 /* List of variables which were defined on the command line
354 (or, equivalently, in MAKEFLAGS). */
356 struct command_variable
358 struct command_variable
*next
;
359 struct variable
*variable
;
361 static struct command_variable
*command_variables
;
363 /* The name we were invoked with. */
367 /* Our current directory before processing any -C options. */
369 char *directory_before_chdir
;
371 /* Our current directory after processing all -C options. */
373 char *starting_directory
;
375 /* Value of the MAKELEVEL variable at startup (or 0). */
377 unsigned int makelevel
;
379 /* First file defined in the makefile whose name does not
380 start with `.'. This is the default to remake if the
381 command line does not specify. */
383 struct file
*default_goal_file
;
385 /* Pointer to structure for the file .DEFAULT
386 whose commands are used for any file that has none of its own.
387 This is zero if the makefiles do not define .DEFAULT. */
389 struct file
*default_file
;
391 /* Nonzero if we have seen the magic `.POSIX' target.
392 This turns on pedantic compliance with POSIX.2. */
396 /* Mask of signals that are being caught with fatal_error_signal. */
399 sigset_t fatal_signal_set
;
401 #ifdef HAVE_SIGSETMASK
402 int fatal_signal_mask
;
407 enter_command_line_file (name
)
411 fatal ("empty string invalid as file name");
415 char *expanded
= tilde_expand (name
);
417 name
= expanded
; /* Memory leak; I don't care. */
420 /* This is also done in parse_file_seq, so this is redundant
421 for names read from makefiles. It is here for names passed
422 on the command line. */
423 while (name
[0] == '.' && name
[1] == '/' && name
[2] != '\0')
427 /* Skip following slashes: ".//foo" is "foo", not "/foo". */
433 /* It was all slashes! Move back to the dot and truncate
434 it after the first slash, so it becomes just "./". */
437 while (name
[0] != '.');
441 return enter_file (savestring (name
, strlen (name
)));
444 /* Toggle -d on receipt of SIGUSR1. */
447 debug_signal_handler (sig
)
450 debug_flag
= ! debug_flag
;
455 main (argc
, argv
, envp
)
460 int main (int argc
, char ** argv
)
463 register struct file
*f
;
464 register unsigned int i
;
466 struct dep
*read_makefiles
;
467 PATH_VAR (current_directory
);
469 extern int no_default_sh_exe
;
470 char *unix_path
= NULL
;
471 char *win32_path
= NULL
;
474 default_goal_file
= 0;
475 reading_filename
= 0;
476 reading_lineno_ptr
= 0;
478 #if !defined (HAVE_STRSIGNAL) && !defined (HAVE_SYS_SIGLIST)
483 sigemptyset (&fatal_signal_set
);
484 #define ADD_SIG(sig) sigaddset (&fatal_signal_set, sig)
486 #ifdef HAVE_SIGSETMASK
487 fatal_signal_mask
= 0;
488 #define ADD_SIG(sig) fatal_signal_mask |= sigmask (sig)
494 #define FATAL_SIG(sig) \
495 if (signal ((sig), fatal_error_signal) == SIG_IGN) \
496 (void) signal ((sig), SIG_IGN); \
510 FATAL_SIG (SIGDANGER
);
521 /* Make sure stdout is line-buffered. */
523 #ifdef HAVE_SETLINEBUF
526 #ifndef SETVBUF_REVERSED
527 setvbuf (stdout
, (char *) 0, _IOLBF
, BUFSIZ
);
528 #else /* setvbuf not reversed. */
529 /* Some buggy systems lose if we pass 0 instead of allocating ourselves. */
530 setvbuf (stdout
, _IOLBF
, xmalloc (BUFSIZ
), BUFSIZ
);
531 #endif /* setvbuf reversed. */
532 #endif /* setlinebuf missing. */
534 /* Figure out where this program lives. */
538 if (argv
[0][0] == '\0')
543 program
= rindex (argv
[0], ']');
545 program
= rindex (argv
[0], '/');
549 program
= rindex (argv
[0], '\\');
551 program
= rindex (argv
[0], ':');
559 /* Set up to access user data (files). */
562 /* Figure out where we are. */
565 if (getcwd_fs (current_directory
, GET_PATH_MAX
) == 0)
567 if (getcwd (current_directory
, GET_PATH_MAX
) == 0)
571 perror_with_name ("getcwd: ", "");
573 error ("getwd: %s", current_directory
);
575 current_directory
[0] = '\0';
576 directory_before_chdir
= 0;
579 directory_before_chdir
= savestring (current_directory
,
580 strlen (current_directory
));
582 /* Read in variables from the environment. It is important that this be
583 done before $(MAKE) is are figured out so its definitions will not be
584 one from the environment. */
587 for (i
= 0; envp
[i
] != 0; ++i
)
589 register char *ep
= envp
[i
];
593 if (!strncmp(ep
, "PATH", 4))
595 if (!strncmp(ep
, "Path", 4))
598 /* The result of pointer arithmetic is cast to unsigned int for
599 machines where ptrdiff_t is a different size that doesn't widen
601 define_variable (envp
[i
], (unsigned int) (ep
- envp
[i
]),
603 /* Force exportation of every variable culled from the environment.
604 We used to rely on target_environment's v_default code to do this.
605 But that does not work for the case where an environment variable
606 is redefined in a makefile with `override'; it should then still
607 be exported, because it was originally in the environment. */
612 * PATH defaults to Path iff PATH not found and Path is found.
614 if (!unix_path
&& win32_path
)
615 define_variable("PATH", 4, win32_path
, o_env
, 1)->export
= v_export
;
617 #else /* For Amiga, read the ENV: device, ignoring all dirs */
622 __aligned
struct FileInfoBlock fib
;
624 env
= Lock ("ENV:", ACCESS_READ
);
627 old
= CurrentDir (DupLock(env
));
630 while (ExNext (env
, &fib
))
632 if (fib
.fib_DirEntryType
< 0) /* File */
634 /* Define an empty variable. It will be filled in
635 variable_lookup(). Makes startup quite a bit
637 define_variable (fib
.fib_FileName
,
638 strlen (fib
.fib_FileName
),
639 "", o_env
, 1)->export
= v_export
;
643 UnLock(CurrentDir(old
));
648 /* Decode the switches. */
650 decode_env_switches ("MAKEFLAGS", 9);
652 /* People write things like:
653 MFLAGS="CC=gcc -pipe" "CFLAGS=-g"
654 and we set the -p, -i and -e switches. Doesn't seem quite right. */
655 decode_env_switches ("MFLAGS", 6);
657 decode_switches (argc
, argv
, 0);
660 fprintf(stderr
, "%s (pid = %d)\n", argv
[0], GetCurrentProcessId());
661 fprintf(stderr
, "%s is suspending for 30 seconds...", argv
[0]);
663 fprintf(stderr
, "done sleep(30). Continuing.\n");
667 /* Print version information. */
669 if (print_version_flag
|| print_data_base_flag
|| debug_flag
)
672 /* `make --version' is supposed to just print the version and exit. */
673 if (print_version_flag
)
676 #if !defined(__MSDOS__) && !defined(VMS)
677 /* Set the "MAKE_COMMAND" variable to the name we were invoked with.
678 (If it is a relative pathname with a slash, prepend our directory name
679 so the result will run the same program regardless of the current dir.
680 If it is a name with no slash, we can only hope that PATH did not
681 find it in the current directory.) */
684 * Convert from backslashes to forward slashes for
685 * programs like sh which don't like them. Shouldn't
686 * matter if the path is one way or the other for
689 if (strpbrk(argv
[0], "/:\\") ||
690 strstr(argv
[0], "..") ||
691 !strncmp(argv
[0], "//", 2))
692 argv
[0] = strdup(w32ify(argv
[0],1));
694 if (current_directory
[0] != '\0'
695 && argv
[0] != 0 && argv
[0][0] != '/' && index (argv
[0], '/') != 0)
696 argv
[0] = concat (current_directory
, "/", argv
[0]);
700 /* The extra indirection through $(MAKE_COMMAND) is done
701 for hysterical raisins. */
702 (void) define_variable ("MAKE_COMMAND", 12, argv
[0], o_default
, 0);
703 (void) define_variable ("MAKE", 4, "$(MAKE_COMMAND)", o_default
, 1);
705 if (command_variables
!= 0)
707 struct command_variable
*cv
;
709 unsigned int len
= 0;
712 /* Figure out how much space will be taken up by the command-line
713 variable definitions. */
714 for (cv
= command_variables
; cv
!= 0; cv
= cv
->next
)
717 len
+= 2 * strlen (v
->name
);
721 len
+= 2 * strlen (v
->value
);
724 /* Now allocate a buffer big enough and fill it. */
725 p
= value
= (char *) alloca (len
);
726 for (cv
= command_variables
; cv
!= 0; cv
= cv
->next
)
729 p
= quote_as_word (p
, v
->name
, 0);
733 p
= quote_as_word (p
, v
->value
, 0);
736 p
[-1] = '\0'; /* Kill the final space and terminate. */
738 /* Define an unchangeable variable with a name that no POSIX.2
739 makefile could validly use for its own variable. */
740 (void) define_variable ("-*-command-variables-*-", 23,
741 value
, o_automatic
, 0);
743 /* Define the variable; this will not override any user definition.
744 Normally a reference to this variable is written into the value of
745 MAKEFLAGS, allowing the user to override this value to affect the
746 exported value of MAKEFLAGS. In POSIX-pedantic mode, we cannot
747 allow the user's setting of MAKEOVERRIDES to affect MAKEFLAGS, so
748 a reference to this hidden variable is written instead. */
749 (void) define_variable ("MAKEOVERRIDES", 13,
750 "${-*-command-variables-*-}", o_env
, 1);
753 /* If there were -C flags, move ourselves about. */
754 if (directories
!= 0)
755 for (i
= 0; directories
->list
[i
] != 0; ++i
)
757 char *dir
= directories
->list
[i
];
760 char *expanded
= tilde_expand (dir
);
765 pfatal_with_name (dir
);
766 if (dir
!= directories
->list
[i
])
772 * THIS BLOCK OF CODE MUST COME AFTER chdir() CALL ABOVE IN ORDER
773 * TO NOT CONFUSE THE DEPENDENCY CHECKING CODE IN implicit.c.
775 * The functions in dir.c can incorrectly cache information for "."
776 * before we have changed directory and this can cause file
777 * lookups to fail because the current directory (.) was pointing
778 * at the wrong place when it was first evaluated.
782 * On Windows/NT, we don't have the luxury of a /bin directory that
783 * is mapped globally to every drive mounted to the system. Since make could
784 * be invoked from any drive, and we don't want to propogate /bin/sh
785 * to every single drive. Allow ourselves a chance to search for
786 * a value for default shell here (if the default path does not exist).
788 * The value of default_shell is set here, but it could get reset after
789 * the Makefiles are read in. See logic below where SHELL is checked
790 * after the call to read_all_makefiles() completes.
792 * The reason SHELL is set here is so that macros can be safely evaluated
793 * as makefiles are read in (some macros require $SHELL).
797 extern char *default_shell
;
799 if (!file_exists_p(default_shell
)) {
801 struct variable
*v
= lookup_variable ("Path", 4);
804 * Try and make sure we have a full path to default_shell before
805 * we parse makefiles.
812 ep
= strchr(p
, PATH_SEPARATOR_CHAR
);
817 if (dir_file_exists_p(p
, default_shell
)) {
818 sprintf(sh_path
, "%s/%s", p
, default_shell
);
819 default_shell
= strdup(w32ify(sh_path
,0));
820 no_default_sh_exe
= 0;
821 *ep
= PATH_SEPARATOR_CHAR
;
826 *ep
= PATH_SEPARATOR_CHAR
;
830 ep
= strchr(p
, PATH_SEPARATOR_CHAR
);
833 /* be sure to check last element of Path */
834 if (p
&& *p
&& dir_file_exists_p(p
, default_shell
)) {
835 sprintf(sh_path
, "%s/%s", p
, default_shell
);
836 default_shell
= strdup(w32ify(sh_path
,0));
837 no_default_sh_exe
= 0;
843 /* Figure out the level of recursion. */
845 struct variable
*v
= lookup_variable ("MAKELEVEL", 9);
846 if (v
!= 0 && *v
->value
!= '\0' && *v
->value
!= '-')
847 makelevel
= (unsigned int) atoi (v
->value
);
852 /* Except under -s, always do -w in sub-makes and under -C. */
853 if (!silent_flag
&& (directories
!= 0 || makelevel
> 0))
854 print_directory_flag
= 1;
856 /* Let the user disable that with --no-print-directory. */
857 if (inhibit_print_directory_flag
)
858 print_directory_flag
= 0;
860 /* Construct the list of include directories to search. */
862 construct_include_path (include_directories
== 0 ? (char **) 0
863 : include_directories
->list
);
865 /* Figure out where we are now, after chdir'ing. */
866 if (directories
== 0)
867 /* We didn't move, so we're still in the same place. */
868 starting_directory
= current_directory
;
872 if (getcwd_fs (current_directory
, GET_PATH_MAX
) == 0)
874 if (getcwd (current_directory
, GET_PATH_MAX
) == 0)
878 perror_with_name ("getcwd: ", "");
880 error ("getwd: %s", current_directory
);
882 starting_directory
= 0;
885 starting_directory
= current_directory
;
888 /* Read any stdin makefiles into temporary files. */
892 register unsigned int i
;
893 for (i
= 0; i
< makefiles
->idx
; ++i
)
894 if (makefiles
->list
[i
][0] == '-' && makefiles
->list
[i
][1] == '\0')
896 /* This makefile is standard input. Since we may re-exec
897 and thus re-read the makefiles, we read standard input
898 into a temporary file and read from that. */
901 /* Make a unique filename. */
905 static char name
[] = "sys$scratch:GmXXXXXX";
907 static char name
[] = "/tmp/GmXXXXXX";
909 (void) mktemp (name
);
911 static char name
[L_tmpnam
];
912 (void) tmpnam (name
);
915 outfile
= fopen (name
, "w");
917 pfatal_with_name ("fopen (temporary file)");
918 while (!feof (stdin
))
921 unsigned int n
= fread (buf
, 1, sizeof(buf
), stdin
);
922 if (n
> 0 && fwrite (buf
, 1, n
, outfile
) != n
)
923 pfatal_with_name ("fwrite (temporary file)");
925 /* Try to make sure we won't remake the temporary
926 file when we are re-exec'd. Kludge-o-matic! */
927 fprintf (outfile
, "%s:;\n", name
);
928 (void) fclose (outfile
);
930 /* Replace the name that read_all_makefiles will
931 see with the name of the temporary file. */
934 /* SGI compiler requires alloca's result be assigned simply. */
935 temp
= (char *) alloca (sizeof (name
));
936 bcopy (name
, temp
, sizeof (name
));
937 makefiles
->list
[i
] = temp
;
940 /* Make sure the temporary file will not be remade. */
941 f
= enter_file (savestring (name
, sizeof name
- 1));
943 f
->update_status
= 0;
944 f
->command_state
= cs_finished
;
945 /* Let it be removed when we're done. */
947 /* But don't mention it. */
952 /* Set up to handle children dying. This must be done before
953 reading in the makefiles so that `shell' function calls will work. */
956 (void) signal (SIGCHLD
, child_handler
);
959 (void) signal (SIGCLD
, child_handler
);
962 /* Let the user send us SIGUSR1 to toggle the -d flag during the run. */
964 (void) signal (SIGUSR1
, debug_signal_handler
);
967 /* Define the initial list of suffixes for old-style rules. */
969 set_default_suffixes ();
971 /* Define the file rules for the built-in suffix rules. These will later
972 be converted into pattern rules. We used to do this in
973 install_default_implicit_rules, but since that happens after reading
974 makefiles, it results in the built-in pattern rules taking precedence
975 over makefile-specified suffix rules, which is wrong. */
977 install_default_suffix_rules ();
979 /* Define some internal and special variables. */
981 define_automatic_variables ();
983 /* Set up the MAKEFLAGS and MFLAGS variables
984 so makefiles can look at them. */
986 define_makeflags (0, 0);
990 * Now that makefiles are parsed, see if a Makefile gave a
991 * value for SHELL and use that for default_shell instead if
992 * that filename exists. This should speed up the
993 * construct_argv_internal() function by avoiding unnecessary
997 struct variable
*v
= lookup_variable("SHELL", 5);
998 extern char* default_shell
;
1003 * SHELL must be found, SHELL must be set, value of SHELL
1004 * must be different from current value, and the
1005 * specified file must exist. Whew!
1007 if (v
!= 0 && *v
->value
!= '\0') {
1008 char *fn
= recursively_expand(v
);
1010 if (fn
&& strcmp(fn
, default_shell
) && file_exists_p(fn
)) {
1015 /* if Makefile says SHELL is sh.exe, believe it */
1016 if (strstr(default_shell
, "sh.exe"))
1017 no_default_sh_exe
= 0;
1020 * Convert from backslashes to forward slashes so
1021 * create_command_line_argv_internal() is not confused.
1023 for (p
= strchr(default_shell
, '\\'); p
; p
= strchr(default_shell
, '\\'))
1028 if (no_default_sh_exe
&& job_slots
!= 1) {
1029 error("Do not specify -j or --jobs if sh.exe is not available.");
1030 error("Resetting make for single job mode.");
1035 /* Define the default variables. */
1036 define_default_variables ();
1038 /* Read all the makefiles. */
1040 default_file
= enter_file (".DEFAULT");
1043 = read_all_makefiles (makefiles
== 0 ? (char **) 0 : makefiles
->list
);
1045 /* Decode switches again, in case the variables were set by the makefile. */
1046 decode_env_switches ("MAKEFLAGS", 9);
1048 decode_env_switches ("MFLAGS", 6);
1051 /* Set up MAKEFLAGS and MFLAGS again, so they will be right. */
1053 define_makeflags (1, 0);
1055 /* Make each `struct dep' point at the `struct file' for the file
1056 depended on. Also do magic for special targets. */
1060 /* Convert old-style suffix rules to pattern rules. It is important to
1061 do this before installing the built-in pattern rules below, so that
1062 makefile-specified suffix rules take precedence over built-in pattern
1065 convert_to_pattern ();
1067 /* Install the default implicit pattern rules.
1068 This used to be done before reading the makefiles.
1069 But in that case, built-in pattern rules were in the chain
1070 before user-defined ones, so they matched first. */
1072 install_default_implicit_rules ();
1074 /* Compute implicit rule limits. */
1076 count_implicit_rule_limits ();
1078 /* Construct the listings of directories in VPATH lists. */
1080 build_vpath_lists ();
1082 /* Mark files given with -o flags as very old (00:00:01.00 Jan 1, 1970)
1083 and as having been updated already, and files given with -W flags as
1084 brand new (time-stamp as far as possible into the future). */
1087 for (p
= old_files
->list
; *p
!= 0; ++p
)
1089 f
= enter_command_line_file (*p
);
1090 f
->last_mtime
= (time_t) 1;
1092 f
->update_status
= 0;
1093 f
->command_state
= cs_finished
;
1098 for (p
= new_files
->list
; *p
!= 0; ++p
)
1100 f
= enter_command_line_file (*p
);
1101 f
->last_mtime
= NEW_MTIME
;
1105 /* Initialize the remote job module. */
1108 if (read_makefiles
!= 0)
1110 /* Update any makefiles if necessary. */
1112 time_t *makefile_mtimes
= 0;
1113 unsigned int mm_idx
= 0;
1116 puts ("Updating makefiles....");
1118 /* Remove any makefiles we don't want to try to update.
1119 Also record the current modtimes so we can compare them later. */
1121 register struct dep
*d
, *last
;
1126 register struct file
*f
= d
->file
;
1127 if (f
->double_colon
)
1128 for (f
= f
->double_colon
; f
!= NULL
; f
= f
->prev
)
1130 if (f
->deps
== 0 && f
->cmds
!= 0)
1132 /* This makefile is a :: target with commands, but
1133 no dependencies. So, it will always be remade.
1134 This might well cause an infinite loop, so don't
1135 try to remake it. (This will only happen if
1136 your makefiles are written exceptionally
1137 stupidly; but if you work for Athena, that's how
1138 you write your makefiles.) */
1141 printf ("Makefile `%s' might loop; not remaking it.\n",
1145 read_makefiles
= d
->next
;
1147 last
->next
= d
->next
;
1149 /* Free the storage. */
1152 d
= last
== 0 ? 0 : last
->next
;
1157 if (f
== NULL
|| !f
->double_colon
)
1159 if (makefile_mtimes
== 0)
1160 makefile_mtimes
= (time_t *) xmalloc (sizeof (time_t));
1162 makefile_mtimes
= (time_t *)
1163 xrealloc ((char *) makefile_mtimes
,
1164 (mm_idx
+ 1) * sizeof (time_t));
1165 makefile_mtimes
[mm_idx
++] = file_mtime_no_search (d
->file
);
1172 /* Set up `MAKEFLAGS' specially while remaking makefiles. */
1173 define_makeflags (1, 1);
1175 switch (update_goal_chain (read_makefiles
, 1))
1179 #define BOGUS_UPDATE_STATUS 0
1180 assert (BOGUS_UPDATE_STATUS
);
1188 /* Failed to update. Figure out if we care. */
1190 /* Nonzero if any makefile was successfully remade. */
1192 /* Nonzero if any makefile we care about failed
1193 in updating or could not be found at all. */
1195 register unsigned int i
;
1197 for (i
= 0; read_makefiles
!= 0; ++i
)
1199 struct dep
*d
= read_makefiles
;
1200 read_makefiles
= d
->next
;
1201 if (d
->file
->updated
)
1203 /* This makefile was updated. */
1204 if (d
->file
->update_status
== 0)
1206 /* It was successfully updated. */
1207 any_remade
|= (file_mtime_no_search (d
->file
)
1208 != makefile_mtimes
[i
]);
1210 else if (! (d
->changed
& RM_DONTCARE
))
1213 /* The update failed and this makefile was not
1214 from the MAKEFILES variable, so we care. */
1215 error ("Failed to remake makefile `%s'.",
1217 mtime
= file_mtime_no_search (d
->file
);
1218 any_remade
|= (mtime
!= (time_t) -1
1219 && mtime
!= makefile_mtimes
[i
]);
1223 /* This makefile was not found at all. */
1224 if (! (d
->changed
& RM_DONTCARE
))
1226 /* This is a makefile we care about. See how much. */
1227 if (d
->changed
& RM_INCLUDED
)
1228 /* An included makefile. We don't need
1229 to die, but we do want to complain. */
1230 error ("Included makefile `%s' was not found.",
1234 /* A normal makefile. We must die later. */
1235 error ("Makefile `%s' was not found", dep_name (d
));
1245 else if (any_failed
)
1253 /* Updated successfully. Re-exec ourselves. */
1255 remove_intermediates (0);
1257 if (print_data_base_flag
)
1260 log_working_directory (0);
1264 /* These names might have changed. */
1265 register unsigned int i
, j
= 0;
1266 for (i
= 1; i
< argc
; ++i
)
1267 if (!strcmp (argv
[i
], "-f")) /* XXX */
1269 char *p
= &argv
[i
][2];
1271 argv
[++i
] = makefiles
->list
[j
];
1273 argv
[i
] = concat ("-f", makefiles
->list
[j
], "");
1278 if (directories
!= 0 && directories
->idx
> 0)
1281 if (directory_before_chdir
!= 0)
1283 if (chdir (directory_before_chdir
) < 0)
1285 perror_with_name ("chdir", "");
1294 fatal ("Couldn't change back to original directory.");
1298 for (p
= environ
; *p
!= 0; ++p
)
1299 if (!strncmp (*p
, "MAKELEVEL=", 10))
1301 /* The SGI compiler apparently can't understand
1302 the concept of storing the result of a function
1303 in something other than a local variable. */
1305 sgi_loses
= (char *) alloca (40);
1307 sprintf (*p
, "MAKELEVEL=%u", makelevel
);
1315 len
= GetVar ("MAKELEVEL", buffer
, sizeof (buffer
), GVF_GLOBAL_ONLY
);
1319 sprintf (buffer
, "%u", makelevel
);
1320 SetVar ("MAKELEVEL", buffer
, -1, GVF_GLOBAL_ONLY
);
1328 fputs ("Re-executing:", stdout
);
1329 for (p
= argv
; *p
!= 0; ++p
)
1338 exec_command (argv
, environ
);
1340 exec_command (argv
);
1347 /* Set up `MAKEFLAGS' again for the normal targets. */
1348 define_makeflags (1, 0);
1353 /* If there were no command-line goals, use the default. */
1356 if (default_goal_file
!= 0)
1358 goals
= (struct dep
*) xmalloc (sizeof (struct dep
));
1361 goals
->file
= default_goal_file
;
1369 /* Update the goals. */
1372 puts ("Updating goal targets....");
1374 switch (update_goal_chain (goals
, 0))
1377 /* Nothing happened. */
1379 /* Updated successfully. */
1380 status
= EXIT_SUCCESS
;
1383 /* Updating failed. */
1384 status
= EXIT_FAILURE
;
1387 /* We are under -q and would run some commands. */
1388 status
= EXIT_FAILURE
;
1396 if (read_makefiles
== 0)
1397 fatal ("No targets specified and no makefile found");
1399 fatal ("No targets");
1409 /* Parsing of arguments, decoding of switches. */
1411 static char options
[1 + sizeof (switches
) / sizeof (switches
[0]) * 3];
1412 static struct option long_options
[(sizeof (switches
) / sizeof (switches
[0])) +
1413 (sizeof (long_option_aliases
) /
1414 sizeof (long_option_aliases
[0]))];
1416 /* Fill in the string and vector for getopt. */
1422 register unsigned int i
;
1424 if (options
[0] != '\0')
1430 /* Return switch and non-switch args in order, regardless of
1431 POSIXLY_CORRECT. Non-switch args are returned as option 1. */
1434 for (i
= 0; switches
[i
].c
!= '\0'; ++i
)
1436 long_options
[i
].name
= (switches
[i
].long_name
== 0 ? "" :
1437 switches
[i
].long_name
);
1438 long_options
[i
].flag
= 0;
1439 long_options
[i
].val
= switches
[i
].c
;
1440 if (isalnum (switches
[i
].c
))
1441 *p
++ = switches
[i
].c
;
1442 switch (switches
[i
].type
)
1447 long_options
[i
].has_arg
= no_argument
;
1453 if (isalnum (switches
[i
].c
))
1455 if (switches
[i
].noarg_value
!= 0)
1457 if (isalnum (switches
[i
].c
))
1459 long_options
[i
].has_arg
= optional_argument
;
1462 long_options
[i
].has_arg
= required_argument
;
1467 for (c
= 0; c
< (sizeof (long_option_aliases
) /
1468 sizeof (long_option_aliases
[0]));
1470 long_options
[i
++] = long_option_aliases
[c
];
1471 long_options
[i
].name
= 0;
1475 handle_non_switch_argument (arg
, env
)
1479 /* Non-option argument. It might be a variable definition. */
1481 if (arg
[0] == '-' && arg
[1] == '\0')
1482 /* Ignore plain `-' for compatibility. */
1484 v
= try_variable_definition ((char *) 0, 0, arg
, o_command
);
1487 /* It is indeed a variable definition. Record a pointer to
1488 the variable for later use in define_makeflags. */
1489 struct command_variable
*cv
1490 = (struct command_variable
*) xmalloc (sizeof (*cv
));
1492 cv
->next
= command_variables
;
1493 command_variables
= cv
;
1497 /* Not an option or variable definition; it must be a goal
1498 target! Enter it as a file and add it to the dep chain of
1500 struct file
*f
= enter_command_line_file (arg
);
1505 goals
= (struct dep
*) xmalloc (sizeof (struct dep
));
1511 = (struct dep
*) xmalloc (sizeof (struct dep
));
1512 lastgoal
= lastgoal
->next
;
1519 /* Decode switches from ARGC and ARGV.
1520 They came from the environment if ENV is nonzero. */
1523 decode_switches (argc
, argv
, env
)
1529 register const struct command_switch
*cs
;
1530 register struct stringlist
*sl
;
1533 /* getopt does most of the parsing for us.
1534 First, get its vectors set up. */
1538 /* Let getopt produce error messages for the command line,
1539 but not for options from the environment. */
1541 /* Reset getopt's state. */
1544 while (optind
< argc
)
1546 /* Parse the next argument. */
1547 c
= getopt_long (argc
, argv
, options
, long_options
, (int *) 0);
1549 /* End of arguments, or "--" marker seen. */
1552 /* An argument not starting with a dash. */
1553 handle_non_switch_argument (optarg
, env
);
1555 /* Bad option. We will print a usage message and die later.
1556 But continue to parse the other options so the user can
1557 see all he did wrong. */
1560 for (cs
= switches
; cs
->c
!= '\0'; ++cs
)
1563 /* Whether or not we will actually do anything with
1564 this switch. We test this individually inside the
1565 switch below rather than just once outside it, so that
1566 options which are to be ignored still consume args. */
1567 int doit
= !env
|| cs
->env
;
1580 *(int *) cs
->value_ptr
= cs
->type
== flag
;
1588 optarg
= cs
->noarg_value
;
1590 sl
= *(struct stringlist
**) cs
->value_ptr
;
1593 sl
= (struct stringlist
*)
1594 xmalloc (sizeof (struct stringlist
));
1597 sl
->list
= (char **) xmalloc (5 * sizeof (char *));
1598 *(struct stringlist
**) cs
->value_ptr
= sl
;
1600 else if (sl
->idx
== sl
->max
- 1)
1603 sl
->list
= (char **)
1604 xrealloc ((char *) sl
->list
,
1605 sl
->max
* sizeof (char *));
1607 sl
->list
[sl
->idx
++] = optarg
;
1608 sl
->list
[sl
->idx
] = 0;
1612 if (optarg
== 0 && argc
> optind
1613 && isdigit (argv
[optind
][0]))
1614 optarg
= argv
[optind
++];
1621 int i
= atoi (optarg
);
1625 error ("the `-%c' option requires a \
1626 positive integral argument",
1631 *(unsigned int *) cs
->value_ptr
= i
;
1634 *(unsigned int *) cs
->value_ptr
1635 = *(unsigned int *) cs
->noarg_value
;
1640 if (optarg
== 0 && optind
< argc
1641 && (isdigit (argv
[optind
][0]) || argv
[optind
][0] == '.'))
1642 optarg
= argv
[optind
++];
1645 *(double *) cs
->value_ptr
1646 = (optarg
!= 0 ? atof (optarg
)
1647 : *(double *) cs
->noarg_value
);
1653 /* We've found the switch. Stop looking. */
1658 /* There are no more options according to getting getopt, but there may
1659 be some arguments left. Since we have asked for non-option arguments
1660 to be returned in order, this only happens when there is a "--"
1661 argument to prevent later arguments from being options. */
1662 while (optind
< argc
)
1663 handle_non_switch_argument (argv
[optind
++], env
);
1666 if (!env
&& (bad
|| print_usage_flag
))
1668 /* Print a nice usage message. */
1671 if (print_version_flag
)
1674 usageto
= bad
? stderr
: stdout
;
1676 fprintf (usageto
, "Usage: %s [options] [target] ...\n", program
);
1678 fputs ("Options:\n", usageto
);
1679 for (cs
= switches
; cs
->c
!= '\0'; ++cs
)
1681 char buf
[1024], shortarg
[50], longarg
[50], *p
;
1683 if (cs
->description
[0] == '-')
1686 switch (long_options
[cs
- switches
].has_arg
)
1689 shortarg
[0] = longarg
[0] = '\0';
1691 case required_argument
:
1692 sprintf (longarg
, "=%s", cs
->argdesc
);
1693 sprintf (shortarg
, " %s", cs
->argdesc
);
1695 case optional_argument
:
1696 sprintf (longarg
, "[=%s]", cs
->argdesc
);
1697 sprintf (shortarg
, " [%s]", cs
->argdesc
);
1703 if (isalnum (cs
->c
))
1705 sprintf (buf
, " -%c%s", cs
->c
, shortarg
);
1708 if (cs
->long_name
!= 0)
1711 sprintf (p
, "%s--%s%s",
1712 !isalnum (cs
->c
) ? " " : ", ",
1713 cs
->long_name
, longarg
);
1715 for (i
= 0; i
< (sizeof (long_option_aliases
) /
1716 sizeof (long_option_aliases
[0]));
1718 if (long_option_aliases
[i
].val
== cs
->c
)
1720 sprintf (p
, ", --%s%s",
1721 long_option_aliases
[i
].name
, longarg
);
1726 const struct command_switch
*ncs
= cs
;
1727 while ((++ncs
)->c
!= '\0')
1728 if (ncs
->description
[0] == '-' &&
1729 ncs
->description
[1] == cs
->c
)
1731 /* This is another switch that does the same
1732 one as the one we are processing. We want
1733 to list them all together on one line. */
1734 sprintf (p
, ", -%c%s", ncs
->c
, shortarg
);
1736 if (ncs
->long_name
!= 0)
1738 sprintf (p
, ", --%s%s", ncs
->long_name
, longarg
);
1744 if (p
- buf
> DESCRIPTION_COLUMN
- 2)
1745 /* The list of option names is too long to fit on the same
1746 line with the description, leaving at least two spaces.
1747 Print it on its own line instead. */
1749 fprintf (usageto
, "%s\n", buf
);
1753 fprintf (usageto
, "%*s%s.\n",
1754 - DESCRIPTION_COLUMN
,
1755 buf
, cs
->description
);
1762 /* Decode switches from environment variable ENVAR (which is LEN chars long).
1763 We do this by chopping the value into a vector of words, prepending a
1764 dash to the first word if it lacks one, and passing the vector to
1768 decode_env_switches (envar
, len
)
1772 char *varref
= (char *) alloca (2 + len
+ 2);
1777 /* Get the variable's value. */
1780 bcopy (envar
, &varref
[2], len
);
1781 varref
[2 + len
] = ')';
1782 varref
[2 + len
+ 1] = '\0';
1783 value
= variable_expand (varref
);
1785 /* Skip whitespace, and check for an empty value. */
1786 value
= next_token (value
);
1787 len
= strlen (value
);
1791 /* Allocate a vector that is definitely big enough. */
1792 argv
= (char **) alloca ((1 + len
+ 1) * sizeof (char *));
1794 /* Allocate a buffer to copy the value into while we split it into words
1795 and unquote it. We must use permanent storage for this because
1796 decode_switches may store pointers into the passed argument words. */
1797 p
= (char *) xmalloc (2 * len
);
1799 /* getopt will look at the arguments starting at ARGV[1].
1800 Prepend a spacer word. */
1804 while (*value
!= '\0')
1807 ++value
; /* Skip the backslash. */
1808 else if (isblank (*value
))
1810 /* End of the word. */
1815 while (isblank (*value
));
1823 if (argv
[1][0] != '-' && index (argv
[1], '=') == 0)
1824 /* The first word doesn't start with a dash and isn't a variable
1825 definition. Add a dash and pass it along to decode_switches. We
1826 need permanent storage for this in case decode_switches saves
1827 pointers into the value. */
1828 argv
[1] = concat ("-", argv
[1], "");
1830 /* Parse those words. */
1831 decode_switches (argc
, argv
, 1);
1834 /* Quote the string IN so that it will be interpreted as a single word with
1835 no magic by the shell; if DOUBLE_DOLLARS is nonzero, also double dollar
1836 signs to avoid variable expansion in make itself. Write the result into
1837 OUT, returning the address of the next character to be written.
1838 Allocating space for OUT twice the length of IN (thrice if
1839 DOUBLE_DOLLARS is nonzero) is always sufficient. */
1842 quote_as_word (out
, in
, double_dollars
)
1849 if (index ("^;'\"*?$<>(){}|&~`\\ \t\r\n\f\v", *in
) != 0)
1851 if (index ("^;'\"*?[]$<>(){}|&~`\\ \t\r\n\f\v", *in
) != 0)
1854 if (double_dollars
&& *in
== '$')
1862 /* Define the MAKEFLAGS and MFLAGS variables to reflect the settings of the
1863 command switches. Include options with args if ALL is nonzero.
1864 Don't include options with the `no_makefile' flag set if MAKEFILE. */
1867 define_makeflags (all
, makefile
)
1870 static const char ref
[] = "$(MAKEOVERRIDES)";
1871 static const char posixref
[] = "$(-*-command-variables-*-)";
1872 register const struct command_switch
*cs
;
1878 /* We will construct a linked list of `struct flag's describing
1879 all the flags which need to go in MAKEFLAGS. Then, once we
1880 know how many there are and their lengths, we can put them all
1881 together in a string. */
1886 const struct command_switch
*cs
;
1889 struct flag
*flags
= 0;
1890 unsigned int flagslen
= 0;
1891 #define ADD_FLAG(ARG, LEN) \
1893 struct flag *new = (struct flag *) alloca (sizeof (struct flag)); \
1896 new->next = flags; \
1898 if (new->arg == 0) \
1899 ++flagslen; /* Just a single flag letter. */ \
1901 flagslen += 1 + 1 + 1 + 1 + 3 * (LEN); /* " -x foo" */ \
1902 if (!isalnum (cs->c)) \
1903 /* This switch has no single-letter version, so we use the long. */ \
1904 flagslen += 2 + strlen (cs->long_name); \
1907 for (cs
= switches
; cs
->c
!= '\0'; ++cs
)
1908 if (cs
->toenv
&& (!makefile
|| !cs
->no_makefile
))
1919 if (!*(int *) cs
->value_ptr
== (cs
->type
== flag_off
)
1920 && (cs
->default_value
== 0
1921 || *(int *) cs
->value_ptr
!= *(int *) cs
->default_value
))
1928 if ((cs
->default_value
!= 0
1929 && (*(unsigned int *) cs
->value_ptr
1930 == *(unsigned int *) cs
->default_value
)))
1932 else if (cs
->noarg_value
!= 0
1933 && (*(unsigned int *) cs
->value_ptr
==
1934 *(unsigned int *) cs
->noarg_value
))
1935 ADD_FLAG ("", 0); /* Optional value omitted; see below. */
1936 else if (cs
->c
== 'j')
1937 /* Special case for `-j'. */
1941 char *buf
= (char *) alloca (30);
1942 sprintf (buf
, "%u", *(unsigned int *) cs
->value_ptr
);
1943 ADD_FLAG (buf
, strlen (buf
));
1952 if (cs
->default_value
!= 0
1953 && (*(double *) cs
->value_ptr
1954 == *(double *) cs
->default_value
))
1956 else if (cs
->noarg_value
!= 0
1957 && (*(double *) cs
->value_ptr
1958 == *(double *) cs
->noarg_value
))
1959 ADD_FLAG ("", 0); /* Optional value omitted; see below. */
1962 char *buf
= (char *) alloca (100);
1963 sprintf (buf
, "%g", *(double *) cs
->value_ptr
);
1964 ADD_FLAG (buf
, strlen (buf
));
1973 struct stringlist
*sl
= *(struct stringlist
**) cs
->value_ptr
;
1976 /* Add the elements in reverse order, because
1977 all the flags get reversed below; and the order
1978 matters for some switches (like -I). */
1979 register unsigned int i
= sl
->idx
;
1981 ADD_FLAG (sl
->list
[i
], strlen (sl
->list
[i
]));
1987 flagslen
+= 4 + sizeof posixref
; /* Four more for the possible " -- ". */
1991 /* Construct the value in FLAGSTRING.
1992 We allocate enough space for a preceding dash and trailing null. */
1993 flagstring
= (char *) alloca (1 + flagslen
+ 1);
1999 /* Add the flag letter or name to the string. */
2000 if (!isalnum (flags
->cs
->c
))
2003 strcpy (p
, flags
->cs
->long_name
);
2007 *p
++ = flags
->cs
->c
;
2008 if (flags
->arg
!= 0)
2010 /* A flag that takes an optional argument which in this case is
2011 omitted is specified by ARG being "". We must distinguish
2012 because a following flag appended without an intervening " -"
2013 is considered the arg for the first. */
2014 if (flags
->arg
[0] != '\0')
2016 /* Add its argument too. */
2017 *p
++ = !isalnum (flags
->cs
->c
) ? '=' : ' ';
2018 p
= quote_as_word (p
, flags
->arg
, 1);
2021 /* Write a following space and dash, for the next flag. */
2025 else if (!isalnum (flags
->cs
->c
))
2028 /* Long options must each go in their own word,
2029 so we write the following space and dash. */
2033 flags
= flags
->next
;
2036 /* Define MFLAGS before appending variable definitions. */
2038 if (p
== &flagstring
[1])
2040 flagstring
[0] = '\0';
2041 else if (p
[-1] == '-')
2042 /* Kill the final space and dash. */
2045 /* Terminate the string. */
2048 /* Since MFLAGS is not parsed for flags, there is no reason to
2049 override any makefile redefinition. */
2050 (void) define_variable ("MFLAGS", 6, flagstring
, o_env
, 1);
2052 if (all
&& command_variables
!= 0)
2054 /* Now write a reference to $(MAKEOVERRIDES), which contains all the
2055 command-line variable definitions. */
2057 if (p
== &flagstring
[1])
2058 /* No flags written, so elide the leading dash already written. */
2062 /* Separate the variables from the switches with a "--" arg. */
2065 /* We did not already write a trailing " -". */
2069 /* There is a trailing " -"; fill it out to " -- ". */
2074 /* Copy in the string. */
2077 bcopy (posixref
, p
, sizeof posixref
- 1);
2078 p
+= sizeof posixref
- 1;
2082 bcopy (ref
, p
, sizeof ref
- 1);
2083 p
+= sizeof ref
- 1;
2086 else if (p
== &flagstring
[1])
2091 else if (p
[-1] == '-')
2092 /* Kill the final space and dash. */
2094 /* Terminate the string. */
2097 v
= define_variable ("MAKEFLAGS", 9,
2098 /* If there are switches, omit the leading dash
2099 unless it is a single long option with two
2101 &flagstring
[(flagstring
[0] == '-'
2102 && flagstring
[1] != '-')
2104 /* This used to use o_env, but that lost when a
2105 makefile defined MAKEFLAGS. Makefiles set
2106 MAKEFLAGS to add switches, but we still want
2107 to redefine its value with the full set of
2108 switches. Of course, an override or command
2109 definition will still take precedence. */
2112 /* The first time we are called, set MAKEFLAGS to always be exported.
2113 We should not do this again on the second call, because that is
2114 after reading makefiles which might have done `unexport MAKEFLAGS'. */
2115 v
->export
= v_export
;
2118 /* Print version information. */
2123 static int printed_version
= 0;
2125 char *precede
= print_data_base_flag
? "# " : "";
2127 if (printed_version
)
2128 /* Do it only once. */
2131 printf ("%sGNU Make version %s", precede
, version_string
);
2132 if (remote_description
!= 0 && *remote_description
!= '\0')
2133 printf ("-%s", remote_description
);
2135 printf (", by Richard Stallman and Roland McGrath.\n\
2136 %sCopyright (C) 1988, 89, 90, 91, 92, 93, 94, 95, 96\n\
2137 %s\tFree Software Foundation, Inc.\n\
2138 %sThis is free software; see the source for copying conditions.\n\
2139 %sThere is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A\n\
2140 %sPARTICULAR PURPOSE.\n\n", precede
, precede
, precede
, precede
);
2142 printed_version
= 1;
2144 /* Flush stdout so the user doesn't have to wait to see the
2145 version information while things are thought about. */
2149 /* Print a bunch of information about this and that. */
2154 extern char *ctime ();
2157 when
= time ((time_t *) 0);
2158 printf ("\n# Make data base, printed on %s", ctime (&when
));
2160 print_variable_data_base ();
2161 print_dir_data_base ();
2162 print_rule_data_base ();
2163 print_file_data_base ();
2164 print_vpath_data_base ();
2166 when
= time ((time_t *) 0);
2167 printf ("\n# Finished Make data base on %s\n", ctime (&when
));
2170 /* Exit with STATUS, cleaning up as necessary. */
2176 static char dying
= 0;
2184 /* Try to move back to the original directory. This is essential on
2185 MS-DOS (where there is really only one process), and on Unix it
2186 puts core files in the original directory instead of the -C
2188 if (directory_before_chdir
!= 0)
2189 chdir (directory_before_chdir
);
2191 if (print_version_flag
)
2194 /* Wait for children to die. */
2195 for (err
= status
!= 0; job_slots_used
> 0; err
= 0)
2196 reap_children (1, err
);
2198 /* Let the remote job module clean up its state. */
2201 /* Remove the intermediate files. */
2202 remove_intermediates (0);
2204 if (print_data_base_flag
)
2207 log_working_directory (0);
2213 /* Write a message indicating that we've just entered or
2214 left (according to ENTERING) the current directory. */
2217 log_working_directory (entering
)
2220 static int entered
= 0;
2221 char *message
= entering
? "Entering" : "Leaving";
2223 /* Print nothing without the flag. Don't print the entering message
2224 again if we already have. Don't print the leaving message if we
2225 haven't printed the entering message. */
2226 if (! print_directory_flag
|| entering
== entered
)
2231 if (print_data_base_flag
)
2232 fputs ("# ", stdout
);
2235 printf ("%s: %s ", program
, message
);
2237 printf ("%s[%u]: %s ", program
, makelevel
, message
);
2239 if (starting_directory
== 0)
2240 puts ("an unknown directory");
2242 printf ("directory `%s'\n", starting_directory
);