xref: /onnv-gate/usr/src/cmd/sh/error.c (revision 0)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
23*0Sstevel@tonic-gate /*	  All Rights Reserved  	*/
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate 
26*0Sstevel@tonic-gate #ident	"%Z%%M%	%I%	%E% SMI"	/* SVr4.0 1.9.5.1	*/
27*0Sstevel@tonic-gate /*
28*0Sstevel@tonic-gate  * UNIX shell
29*0Sstevel@tonic-gate  */
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate #include	"defs.h"
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate 
34*0Sstevel@tonic-gate /* ========	error handling	======== */
35*0Sstevel@tonic-gate 
36*0Sstevel@tonic-gate extern void done();
37*0Sstevel@tonic-gate 
38*0Sstevel@tonic-gate failed(s1, s2)
39*0Sstevel@tonic-gate unsigned char	*s1, *s2;
40*0Sstevel@tonic-gate {
41*0Sstevel@tonic-gate 	prp();
42*0Sstevel@tonic-gate 	prs_cntl(s1);
43*0Sstevel@tonic-gate 	if (s2)
44*0Sstevel@tonic-gate 	{
45*0Sstevel@tonic-gate 		prs(colon);
46*0Sstevel@tonic-gate 		prs(s2);
47*0Sstevel@tonic-gate 	}
48*0Sstevel@tonic-gate 	newline();
49*0Sstevel@tonic-gate 	exitsh(ERROR);
50*0Sstevel@tonic-gate }
51*0Sstevel@tonic-gate 
52*0Sstevel@tonic-gate error(s)
53*0Sstevel@tonic-gate unsigned char	*s;
54*0Sstevel@tonic-gate {
55*0Sstevel@tonic-gate 	failed(s, NIL);
56*0Sstevel@tonic-gate }
57*0Sstevel@tonic-gate 
58*0Sstevel@tonic-gate exitsh(xno)
59*0Sstevel@tonic-gate int	xno;
60*0Sstevel@tonic-gate {
61*0Sstevel@tonic-gate 	/*
62*0Sstevel@tonic-gate 	 * Arrive here from `FATAL' errors
63*0Sstevel@tonic-gate 	 *  a) exit command,
64*0Sstevel@tonic-gate 	 *  b) default trap,
65*0Sstevel@tonic-gate 	 *  c) fault with no trap set.
66*0Sstevel@tonic-gate 	 *
67*0Sstevel@tonic-gate 	 * Action is to return to command level or exit.
68*0Sstevel@tonic-gate 	 */
69*0Sstevel@tonic-gate 	exitval = xno;
70*0Sstevel@tonic-gate 	flags |= eflag;
71*0Sstevel@tonic-gate 	if ((flags & (forcexit | forked | errflg | ttyflg)) != ttyflg)
72*0Sstevel@tonic-gate 		done(0);
73*0Sstevel@tonic-gate 	else
74*0Sstevel@tonic-gate 	{
75*0Sstevel@tonic-gate 		clearup();
76*0Sstevel@tonic-gate 		restore(0);
77*0Sstevel@tonic-gate 		(void)setb(1);
78*0Sstevel@tonic-gate 		execbrk = breakcnt = funcnt = 0;
79*0Sstevel@tonic-gate 		longjmp(errshell, 1);
80*0Sstevel@tonic-gate 	}
81*0Sstevel@tonic-gate }
82*0Sstevel@tonic-gate 
83*0Sstevel@tonic-gate rmtemp(base)
84*0Sstevel@tonic-gate struct ionod	*base;
85*0Sstevel@tonic-gate {
86*0Sstevel@tonic-gate 	while (iotemp > base)
87*0Sstevel@tonic-gate 	{
88*0Sstevel@tonic-gate 		unlink(iotemp->ioname);
89*0Sstevel@tonic-gate 		free(iotemp->iolink);
90*0Sstevel@tonic-gate 		iotemp = iotemp->iolst;
91*0Sstevel@tonic-gate 	}
92*0Sstevel@tonic-gate }
93*0Sstevel@tonic-gate 
94*0Sstevel@tonic-gate rmfunctmp()
95*0Sstevel@tonic-gate {
96*0Sstevel@tonic-gate 	while (fiotemp)
97*0Sstevel@tonic-gate 	{
98*0Sstevel@tonic-gate 		unlink(fiotemp->ioname);
99*0Sstevel@tonic-gate 		fiotemp = fiotemp->iolst;
100*0Sstevel@tonic-gate 	}
101*0Sstevel@tonic-gate }
102*0Sstevel@tonic-gate 
103*0Sstevel@tonic-gate failure(s1, s2)
104*0Sstevel@tonic-gate unsigned char	*s1, *s2;
105*0Sstevel@tonic-gate {
106*0Sstevel@tonic-gate 	prp();
107*0Sstevel@tonic-gate 	prs_cntl(s1);
108*0Sstevel@tonic-gate 	if (s2)
109*0Sstevel@tonic-gate 	{
110*0Sstevel@tonic-gate 		prs(colon);
111*0Sstevel@tonic-gate 		prs(s2);
112*0Sstevel@tonic-gate 	}
113*0Sstevel@tonic-gate 	newline();
114*0Sstevel@tonic-gate 
115*0Sstevel@tonic-gate 	if (flags & errflg)
116*0Sstevel@tonic-gate 		exitsh(ERROR);
117*0Sstevel@tonic-gate 
118*0Sstevel@tonic-gate 	flags |= eflag;
119*0Sstevel@tonic-gate 	exitval = ERROR;
120*0Sstevel@tonic-gate 	exitset();
121*0Sstevel@tonic-gate }
122