xref: /netbsd-src/usr.bin/make/compat.c (revision c64d4171c6f912972428361000d29636c687d68b)
1 /*	$NetBSD: compat.c,v 1.245 2023/02/14 21:38:31 rillig Exp $	*/
2 
3 /*
4  * Copyright (c) 1988, 1989, 1990 The Regents of the University of California.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to Berkeley by
8  * Adam de Boor.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 /*
36  * Copyright (c) 1988, 1989 by Adam de Boor
37  * Copyright (c) 1989 by Berkeley Softworks
38  * All rights reserved.
39  *
40  * This code is derived from software contributed to Berkeley by
41  * Adam de Boor.
42  *
43  * Redistribution and use in source and binary forms, with or without
44  * modification, are permitted provided that the following conditions
45  * are met:
46  * 1. Redistributions of source code must retain the above copyright
47  *    notice, this list of conditions and the following disclaimer.
48  * 2. Redistributions in binary form must reproduce the above copyright
49  *    notice, this list of conditions and the following disclaimer in the
50  *    documentation and/or other materials provided with the distribution.
51  * 3. All advertising materials mentioning features or use of this software
52  *    must display the following acknowledgement:
53  *	This product includes software developed by the University of
54  *	California, Berkeley and its contributors.
55  * 4. Neither the name of the University nor the names of its contributors
56  *    may be used to endorse or promote products derived from this software
57  *    without specific prior written permission.
58  *
59  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
60  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
61  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
62  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
63  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
64  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
65  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
66  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
67  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
68  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
69  * SUCH DAMAGE.
70  */
71 
72 /*
73  * This file implements the full-compatibility mode of make, which makes the
74  * targets without parallelism and without a custom shell.
75  *
76  * Interface:
77  *	Compat_MakeAll	Initialize this module and make the given targets.
78  */
79 
80 #include <sys/types.h>
81 #include <sys/stat.h>
82 #include <sys/wait.h>
83 
84 #include <errno.h>
85 #include <signal.h>
86 
87 #include "make.h"
88 #include "dir.h"
89 #include "job.h"
90 #include "metachar.h"
91 #include "pathnames.h"
92 
93 /*	"@(#)compat.c	8.2 (Berkeley) 3/19/94"	*/
94 MAKE_RCSID("$NetBSD: compat.c,v 1.245 2023/02/14 21:38:31 rillig Exp $");
95 
96 static GNode *curTarg = NULL;
97 static pid_t compatChild;
98 static int compatSigno;
99 
100 /*
101  * Delete the file of a failed, interrupted, or otherwise duffed target,
102  * unless inhibited by .PRECIOUS.
103  */
104 static void
105 CompatDeleteTarget(GNode *gn)
106 {
107 	if (gn != NULL && !GNode_IsPrecious(gn)) {
108 		const char *file = GNode_VarTarget(gn);
109 
110 		if (!opts.noExecute && unlink_file(file) == 0) {
111 			Error("*** %s removed", file);
112 		}
113 	}
114 }
115 
116 /*
117  * Interrupt the creation of the current target and remove it if it ain't
118  * precious. Then exit.
119  *
120  * If .INTERRUPT exists, its commands are run first WITH INTERRUPTS IGNORED.
121  *
122  * XXX: is .PRECIOUS supposed to inhibit .INTERRUPT? I doubt it, but I've
123  * left the logic alone for now. - dholland 20160826
124  */
125 static void
126 CompatInterrupt(int signo)
127 {
128 	CompatDeleteTarget(curTarg);
129 
130 	if (curTarg != NULL && !GNode_IsPrecious(curTarg)) {
131 		/*
132 		 * Run .INTERRUPT only if hit with interrupt signal
133 		 */
134 		if (signo == SIGINT) {
135 			GNode *gn = Targ_FindNode(".INTERRUPT");
136 			if (gn != NULL) {
137 				Compat_Make(gn, gn);
138 			}
139 		}
140 	}
141 
142 	if (signo == SIGQUIT)
143 		_exit(signo);
144 
145 	/*
146 	 * If there is a child running, pass the signal on.
147 	 * We will exist after it has exited.
148 	 */
149 	compatSigno = signo;
150 	if (compatChild > 0) {
151 		KILLPG(compatChild, signo);
152 	} else {
153 		bmake_signal(signo, SIG_DFL);
154 		kill(myPid, signo);
155 	}
156 }
157 
158 static void
159 DebugFailedTarget(const char *cmd, const GNode *gn)
160 {
161 	const char *p = cmd;
162 	debug_printf("\n*** Failed target:  %s\n*** Failed command: ",
163 	    gn->name);
164 
165 	/*
166 	 * Replace runs of whitespace with a single space, to reduce the
167 	 * amount of whitespace for multi-line command lines.
168 	 */
169 	while (*p != '\0') {
170 		if (ch_isspace(*p)) {
171 			debug_printf(" ");
172 			cpp_skip_whitespace(&p);
173 		} else {
174 			debug_printf("%c", *p);
175 			p++;
176 		}
177 	}
178 	debug_printf("\n");
179 }
180 
181 static bool
182 UseShell(const char *cmd MAKE_ATTR_UNUSED)
183 {
184 #if !defined(MAKE_NATIVE)
185 	/*
186 	 * In a non-native build, the host environment might be weird enough
187 	 * that it's necessary to go through a shell to get the correct
188 	 * behaviour.  Or perhaps the shell has been replaced with something
189 	 * that does extra logging, and that should not be bypassed.
190 	 */
191 	return true;
192 #else
193 	/*
194 	 * Search for meta characters in the command. If there are no meta
195 	 * characters, there's no need to execute a shell to execute the
196 	 * command.
197 	 *
198 	 * Additionally variable assignments and empty commands
199 	 * go to the shell. Therefore treat '=' and ':' like shell
200 	 * meta characters as documented in make(1).
201 	 */
202 
203 	return needshell(cmd);
204 #endif
205 }
206 
207 /*
208  * Execute the next command for a target. If the command returns an error,
209  * the node's made field is set to ERROR and creation stops.
210  *
211  * Input:
212  *	cmdp		Command to execute
213  *	gn		Node from which the command came
214  *	ln		List node that contains the command
215  *
216  * Results:
217  *	true if the command succeeded.
218  */
219 bool
220 Compat_RunCommand(const char *cmdp, GNode *gn, StringListNode *ln)
221 {
222 	char *cmdStart;		/* Start of expanded command */
223 	char *bp;
224 	bool silent;		/* Don't print command */
225 	bool doIt;		/* Execute even if -n */
226 	volatile bool errCheck;	/* Check errors */
227 	int reason;		/* Reason for child's death */
228 	int status;		/* Description of child's death */
229 	pid_t cpid;		/* Child actually found */
230 	pid_t retstat;		/* Result of wait */
231 	const char **volatile av; /* Argument vector for thing to exec */
232 	char **volatile mav;	/* Copy of the argument vector for freeing */
233 	bool useShell;		/* True if command should be executed using a
234 				 * shell */
235 	const char *volatile cmd = cmdp;
236 
237 	silent = (gn->type & OP_SILENT) != OP_NONE;
238 	errCheck = !(gn->type & OP_IGNORE);
239 	doIt = false;
240 
241 	cmdStart = Var_Subst(cmd, gn, VARE_WANTRES);
242 	/* TODO: handle errors */
243 
244 	if (cmdStart[0] == '\0') {
245 		free(cmdStart);
246 		return true;
247 	}
248 	cmd = cmdStart;
249 	LstNode_Set(ln, cmdStart);
250 
251 	if (gn->type & OP_SAVE_CMDS) {
252 		GNode *endNode = Targ_GetEndNode();
253 		if (gn != endNode) {
254 			/*
255 			 * Append the expanded command, to prevent the
256 			 * local variables from being interpreted in the
257 			 * scope of the .END node.
258 			 *
259 			 * A probably unintended side effect of this is that
260 			 * the expanded command will be expanded again in the
261 			 * .END node.  Therefore, a literal '$' in these
262 			 * commands must be written as '$$$$' instead of the
263 			 * usual '$$'.
264 			 */
265 			Lst_Append(&endNode->commands, cmdStart);
266 			return true;
267 		}
268 	}
269 	if (strcmp(cmdStart, "...") == 0) {
270 		gn->type |= OP_SAVE_CMDS;
271 		return true;
272 	}
273 
274 	for (;;) {
275 		if (*cmd == '@')
276 			silent = !DEBUG(LOUD);
277 		else if (*cmd == '-')
278 			errCheck = false;
279 		else if (*cmd == '+') {
280 			doIt = true;
281 			if (shellName == NULL)	/* we came here from jobs */
282 				Shell_Init();
283 		} else if (!ch_isspace(*cmd))
284 			/* Ignore whitespace for compatibility with gnu make */
285 			break;
286 		cmd++;
287 	}
288 
289 	while (ch_isspace(*cmd))
290 		cmd++;
291 
292 	/*
293 	 * If we did not end up with a command, just skip it.
294 	 */
295 	if (cmd[0] == '\0')
296 		return true;
297 
298 	useShell = UseShell(cmd);
299 	/*
300 	 * Print the command before echoing if we're not supposed to be quiet
301 	 * for this one. We also print the command if -n given.
302 	 */
303 	if (!silent || !GNode_ShouldExecute(gn)) {
304 		printf("%s\n", cmd);
305 		fflush(stdout);
306 	}
307 
308 	/*
309 	 * If we're not supposed to execute any commands, this is as far as
310 	 * we go...
311 	 */
312 	if (!doIt && !GNode_ShouldExecute(gn))
313 		return true;
314 
315 	DEBUG1(JOB, "Execute: '%s'\n", cmd);
316 
317 	if (useShell) {
318 		/*
319 		 * We need to pass the command off to the shell, typically
320 		 * because the command contains a "meta" character.
321 		 */
322 		static const char *shargv[5];
323 
324 		/* The following work for any of the builtin shell specs. */
325 		int shargc = 0;
326 		shargv[shargc++] = shellPath;
327 		if (errCheck && shellErrFlag != NULL)
328 			shargv[shargc++] = shellErrFlag;
329 		shargv[shargc++] = DEBUG(SHELL) ? "-xc" : "-c";
330 		shargv[shargc++] = cmd;
331 		shargv[shargc] = NULL;
332 		av = shargv;
333 		bp = NULL;
334 		mav = NULL;
335 	} else {
336 		/*
337 		 * No meta-characters, so no need to exec a shell. Break the
338 		 * command into words to form an argument vector we can
339 		 * execute.
340 		 */
341 		Words words = Str_Words(cmd, false);
342 		mav = words.words;
343 		bp = words.freeIt;
344 		av = (void *)mav;
345 	}
346 
347 #ifdef USE_META
348 	if (useMeta)
349 		meta_compat_start();
350 #endif
351 
352 	Var_ReexportVars();
353 
354 	compatChild = cpid = vfork();
355 	if (cpid < 0)
356 		Fatal("Could not fork");
357 
358 	if (cpid == 0) {
359 #ifdef USE_META
360 		if (useMeta)
361 			meta_compat_child();
362 #endif
363 		(void)execvp(av[0], (char *const *)UNCONST(av));
364 		execDie("exec", av[0]);
365 	}
366 
367 	free(mav);
368 	free(bp);
369 
370 	/* XXX: Memory management looks suspicious here. */
371 	/* XXX: Setting a list item to NULL is unexpected. */
372 	LstNode_SetNull(ln);
373 
374 #ifdef USE_META
375 	if (useMeta)
376 		meta_compat_parent(cpid);
377 #endif
378 
379 	/*
380 	 * The child is off and running. Now all we can do is wait...
381 	 */
382 	while ((retstat = wait(&reason)) != cpid) {
383 		if (retstat > 0)
384 			JobReapChild(retstat, reason, false); /* not ours? */
385 		if (retstat == -1 && errno != EINTR) {
386 			break;
387 		}
388 	}
389 
390 	if (retstat < 0)
391 		Fatal("error in wait: %d: %s", retstat, strerror(errno));
392 
393 	if (WIFSTOPPED(reason)) {
394 		status = WSTOPSIG(reason);	/* stopped */
395 	} else if (WIFEXITED(reason)) {
396 		status = WEXITSTATUS(reason);	/* exited */
397 #if defined(USE_META) && defined(USE_FILEMON_ONCE)
398 		if (useMeta)
399 			meta_cmd_finish(NULL);
400 #endif
401 		if (status != 0) {
402 			if (DEBUG(ERROR))
403 				DebugFailedTarget(cmd, gn);
404 			printf("*** Error code %d", status);
405 		}
406 	} else {
407 		status = WTERMSIG(reason);	/* signaled */
408 		printf("*** Signal %d", status);
409 	}
410 
411 
412 	if (!WIFEXITED(reason) || status != 0) {
413 		if (errCheck) {
414 #ifdef USE_META
415 			if (useMeta)
416 				meta_job_error(NULL, gn, false, status);
417 #endif
418 			gn->made = ERROR;
419 			if (opts.keepgoing) {
420 				/*
421 				 * Abort the current target,
422 				 * but let others continue.
423 				 */
424 				printf(" (continuing)\n");
425 			} else {
426 				printf("\n");
427 			}
428 			if (deleteOnError)
429 				CompatDeleteTarget(gn);
430 		} else {
431 			/*
432 			 * Continue executing commands for this target.
433 			 * If we return 0, this will happen...
434 			 */
435 			printf(" (ignored)\n");
436 			status = 0;
437 		}
438 	}
439 
440 	free(cmdStart);
441 	compatChild = 0;
442 	if (compatSigno != 0) {
443 		bmake_signal(compatSigno, SIG_DFL);
444 		kill(myPid, compatSigno);
445 	}
446 
447 	return status == 0;
448 }
449 
450 static void
451 RunCommands(GNode *gn)
452 {
453 	StringListNode *ln;
454 
455 	for (ln = gn->commands.first; ln != NULL; ln = ln->next) {
456 		const char *cmd = ln->datum;
457 		if (!Compat_RunCommand(cmd, gn, ln))
458 			break;
459 	}
460 }
461 
462 static void
463 MakeInRandomOrder(GNode **gnodes, GNode **end, GNode *pgn)
464 {
465 	GNode **it;
466 	size_t r;
467 
468 	for (r = (size_t)(end - gnodes); r >= 2; r--) {
469 		/* Biased, but irrelevant in practice. */
470 		size_t i = (size_t)random() % r;
471 		GNode *t = gnodes[r - 1];
472 		gnodes[r - 1] = gnodes[i];
473 		gnodes[i] = t;
474 	}
475 
476 	for (it = gnodes; it != end; it++)
477 		Compat_Make(*it, pgn);
478 }
479 
480 static void
481 MakeWaitGroupsInRandomOrder(GNodeList *gnodes, GNode *pgn)
482 {
483 	Vector vec;
484 	GNodeListNode *ln;
485 	GNode **nodes;
486 	size_t i, n, start;
487 
488 	Vector_Init(&vec, sizeof(GNode *));
489 	for (ln = gnodes->first; ln != NULL; ln = ln->next)
490 		*(GNode **)Vector_Push(&vec) = ln->datum;
491 	nodes = vec.items;
492 	n = vec.len;
493 
494 	start = 0;
495 	for (i = 0; i < n; i++) {
496 		if (nodes[i]->type & OP_WAIT) {
497 			MakeInRandomOrder(nodes + start, nodes + i, pgn);
498 			Compat_Make(nodes[i], pgn);
499 			start = i + 1;
500 		}
501 	}
502 	MakeInRandomOrder(nodes + start, nodes + i, pgn);
503 
504 	Vector_Done(&vec);
505 }
506 
507 static void
508 MakeNodes(GNodeList *gnodes, GNode *pgn)
509 {
510 	GNodeListNode *ln;
511 
512 	if (Lst_IsEmpty(gnodes))
513 		return;
514 	if (opts.randomizeTargets) {
515 		MakeWaitGroupsInRandomOrder(gnodes, pgn);
516 		return;
517 	}
518 
519 	for (ln = gnodes->first; ln != NULL; ln = ln->next) {
520 		GNode *cgn = ln->datum;
521 		Compat_Make(cgn, pgn);
522 	}
523 }
524 
525 static bool
526 MakeUnmade(GNode *gn, GNode *pgn)
527 {
528 
529 	assert(gn->made == UNMADE);
530 
531 	/*
532 	 * First mark ourselves to be made, then apply whatever transformations
533 	 * the suffix module thinks are necessary. Once that's done, we can
534 	 * descend and make all our children. If any of them has an error
535 	 * but the -k flag was given, our 'make' field will be set to false
536 	 * again. This is our signal to not attempt to do anything but abort
537 	 * our parent as well.
538 	 */
539 	gn->flags.remake = true;
540 	gn->made = BEINGMADE;
541 
542 	if (!(gn->type & OP_MADE))
543 		Suff_FindDeps(gn);
544 
545 	MakeNodes(&gn->children, gn);
546 
547 	if (!gn->flags.remake) {
548 		gn->made = ABORTED;
549 		pgn->flags.remake = false;
550 		return false;
551 	}
552 
553 	if (Lst_FindDatum(&gn->implicitParents, pgn) != NULL)
554 		Var_Set(pgn, IMPSRC, GNode_VarTarget(gn));
555 
556 	/*
557 	 * All the children were made ok. Now youngestChild->mtime contains the
558 	 * modification time of the newest child, we need to find out if we
559 	 * exist and when we were modified last. The criteria for datedness
560 	 * are defined by GNode_IsOODate.
561 	 */
562 	DEBUG1(MAKE, "Examining %s...", gn->name);
563 	if (!GNode_IsOODate(gn)) {
564 		gn->made = UPTODATE;
565 		DEBUG0(MAKE, "up-to-date.\n");
566 		return false;
567 	}
568 
569 	/*
570 	 * If the user is just seeing if something is out-of-date, exit now
571 	 * to tell him/her "yes".
572 	 */
573 	DEBUG0(MAKE, "out-of-date.\n");
574 	if (opts.query && gn != Targ_GetEndNode())
575 		exit(1);
576 
577 	/*
578 	 * We need to be re-made.
579 	 * Ensure that $? (.OODATE) and $> (.ALLSRC) are both set.
580 	 */
581 	GNode_SetLocalVars(gn);
582 
583 	/*
584 	 * Alter our type to tell if errors should be ignored or things
585 	 * should not be printed so Compat_RunCommand knows what to do.
586 	 */
587 	if (opts.ignoreErrors)
588 		gn->type |= OP_IGNORE;
589 	if (opts.silent)
590 		gn->type |= OP_SILENT;
591 
592 	if (Job_CheckCommands(gn, Fatal)) {
593 		/*
594 		 * Our commands are ok, but we still have to worry about
595 		 * the -t flag.
596 		 */
597 		if (!opts.touch || (gn->type & OP_MAKE)) {
598 			curTarg = gn;
599 #ifdef USE_META
600 			if (useMeta && GNode_ShouldExecute(gn))
601 				meta_job_start(NULL, gn);
602 #endif
603 			RunCommands(gn);
604 			curTarg = NULL;
605 		} else {
606 			Job_Touch(gn, (gn->type & OP_SILENT) != OP_NONE);
607 		}
608 	} else {
609 		gn->made = ERROR;
610 	}
611 #ifdef USE_META
612 	if (useMeta && GNode_ShouldExecute(gn)) {
613 		if (meta_job_finish(NULL) != 0)
614 			gn->made = ERROR;
615 	}
616 #endif
617 
618 	if (gn->made != ERROR) {
619 		/*
620 		 * If the node was made successfully, mark it so, update
621 		 * its modification time and timestamp all its parents.
622 		 * This is to keep its state from affecting that of its parent.
623 		 */
624 		gn->made = MADE;
625 		if (Make_Recheck(gn) == 0)
626 			pgn->flags.force = true;
627 		if (!(gn->type & OP_EXEC)) {
628 			pgn->flags.childMade = true;
629 			GNode_UpdateYoungestChild(pgn, gn);
630 		}
631 	} else if (opts.keepgoing) {
632 		pgn->flags.remake = false;
633 	} else {
634 		PrintOnError(gn, "\nStop.\n");
635 		exit(1);
636 	}
637 	return true;
638 }
639 
640 static void
641 MakeOther(GNode *gn, GNode *pgn)
642 {
643 
644 	if (Lst_FindDatum(&gn->implicitParents, pgn) != NULL) {
645 		const char *target = GNode_VarTarget(gn);
646 		Var_Set(pgn, IMPSRC, target != NULL ? target : "");
647 	}
648 
649 	switch (gn->made) {
650 	case BEINGMADE:
651 		Error("Graph cycles through %s", gn->name);
652 		gn->made = ERROR;
653 		pgn->flags.remake = false;
654 		break;
655 	case MADE:
656 		if (!(gn->type & OP_EXEC)) {
657 			pgn->flags.childMade = true;
658 			GNode_UpdateYoungestChild(pgn, gn);
659 		}
660 		break;
661 	case UPTODATE:
662 		if (!(gn->type & OP_EXEC))
663 			GNode_UpdateYoungestChild(pgn, gn);
664 		break;
665 	default:
666 		break;
667 	}
668 }
669 
670 /*
671  * Make a target.
672  *
673  * If an error is detected and not being ignored, the process exits.
674  *
675  * Input:
676  *	gn		The node to make
677  *	pgn		Parent to abort if necessary
678  *
679  * Output:
680  *	gn->made
681  *		UPTODATE	gn was already up-to-date.
682  *		MADE		gn was recreated successfully.
683  *		ERROR		An error occurred while gn was being created,
684  *				either due to missing commands or in -k mode.
685  *		ABORTED		gn was not remade because one of its
686  *				dependencies could not be made due to errors.
687  */
688 void
689 Compat_Make(GNode *gn, GNode *pgn)
690 {
691 	if (shellName == NULL)	/* we came here from jobs */
692 		Shell_Init();
693 
694 	if (gn->made == UNMADE && (gn == pgn || !(pgn->type & OP_MADE))) {
695 		if (!MakeUnmade(gn, pgn))
696 			goto cohorts;
697 
698 		/* XXX: Replace with GNode_IsError(gn) */
699 	} else if (gn->made == ERROR) {
700 		/*
701 		 * Already had an error when making this.
702 		 * Tell the parent to abort.
703 		 */
704 		pgn->flags.remake = false;
705 	} else {
706 		MakeOther(gn, pgn);
707 	}
708 
709 cohorts:
710 	MakeNodes(&gn->cohorts, pgn);
711 }
712 
713 static void
714 MakeBeginNode(void)
715 {
716 	GNode *gn = Targ_FindNode(".BEGIN");
717 	if (gn == NULL)
718 		return;
719 
720 	Compat_Make(gn, gn);
721 	if (GNode_IsError(gn)) {
722 		PrintOnError(gn, "\nStop.\n");
723 		exit(1);
724 	}
725 }
726 
727 static void
728 InitSignals(void)
729 {
730 	if (bmake_signal(SIGINT, SIG_IGN) != SIG_IGN)
731 		bmake_signal(SIGINT, CompatInterrupt);
732 	if (bmake_signal(SIGTERM, SIG_IGN) != SIG_IGN)
733 		bmake_signal(SIGTERM, CompatInterrupt);
734 	if (bmake_signal(SIGHUP, SIG_IGN) != SIG_IGN)
735 		bmake_signal(SIGHUP, CompatInterrupt);
736 	if (bmake_signal(SIGQUIT, SIG_IGN) != SIG_IGN)
737 		bmake_signal(SIGQUIT, CompatInterrupt);
738 }
739 
740 void
741 Compat_MakeAll(GNodeList *targs)
742 {
743 	GNode *errorNode = NULL;
744 
745 	if (shellName == NULL)
746 		Shell_Init();
747 
748 	InitSignals();
749 
750 	/*
751 	 * Create the .END node now, to keep the (debug) output of the
752 	 * counter.mk test the same as before 2020-09-23.  This
753 	 * implementation detail probably doesn't matter though.
754 	 */
755 	(void)Targ_GetEndNode();
756 
757 	if (!opts.query)
758 		MakeBeginNode();
759 
760 	/*
761 	 * Expand .USE nodes right now, because they can modify the structure
762 	 * of the tree.
763 	 */
764 	Make_ExpandUse(targs);
765 
766 	while (!Lst_IsEmpty(targs)) {
767 		GNode *gn = Lst_Dequeue(targs);
768 		Compat_Make(gn, gn);
769 
770 		if (gn->made == UPTODATE) {
771 			printf("`%s' is up to date.\n", gn->name);
772 		} else if (gn->made == ABORTED) {
773 			printf("`%s' not remade because of errors.\n",
774 			    gn->name);
775 		}
776 		if (GNode_IsError(gn) && errorNode == NULL)
777 			errorNode = gn;
778 	}
779 
780 	/* If the user has defined a .END target, run its commands. */
781 	if (errorNode == NULL) {
782 		GNode *endNode = Targ_GetEndNode();
783 		Compat_Make(endNode, endNode);
784 		if (GNode_IsError(endNode))
785 			errorNode = endNode;
786 	}
787 
788 	if (errorNode != NULL) {
789 		if (DEBUG(GRAPH2))
790 			Targ_PrintGraph(2);
791 		else if (DEBUG(GRAPH3))
792 			Targ_PrintGraph(3);
793 		PrintOnError(errorNode, "\nStop.\n");
794 		exit(1);
795 	}
796 }
797