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