sh: Fix duplicate prototypes for builtins.
[dragonfly.git] / bin / sh / main.c
CommitLineData
984263bc
MD
1/*-
2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Kenneth Almquist.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
1de703da
MD
35 *
36 * @(#) Copyright (c) 1991, 1993 The Regents of the University of California. All rights reserved.
37 * @(#)main.c 8.6 (Berkeley) 5/28/95
c3e3bc7a 38 * $FreeBSD: src/bin/sh/main.c,v 1.52 2011/06/13 21:03:27 jilles Exp $
984263bc
MD
39 */
40
984263bc
MD
41#include <stdio.h>
42#include <signal.h>
43#include <sys/stat.h>
44#include <unistd.h>
45#include <fcntl.h>
46#include <locale.h>
47#include <errno.h>
48
49#include "shell.h"
50#include "main.h"
51#include "mail.h"
52#include "options.h"
53#include "output.h"
54#include "parser.h"
55#include "nodes.h"
56#include "expand.h"
57#include "eval.h"
58#include "jobs.h"
59#include "input.h"
60#include "trap.h"
61#include "var.h"
62#include "show.h"
63#include "memalloc.h"
64#include "error.h"
65#include "init.h"
66#include "mystring.h"
67#include "exec.h"
68#include "cd.h"
c3e3bc7a 69#include "builtins.h"
984263bc 70
984263bc
MD
71int rootpid;
72int rootshell;
99512ac4 73struct jmploc main_handler;
145a4981 74int localeisutf8, initial_localeisutf8;
984263bc 75
99512ac4
PA
76static void read_profile(const char *);
77static const char *find_dot_file(const char *);
934863d7 78
984263bc
MD
79/*
80 * Main routine. We initialize things, parse the arguments, execute
81 * profiles if we're a login shell, and then call cmdloop to execute
82 * commands. The setjmp call sets up the location to jump to when an
83 * exception occurs. When an exception occurs the variable "state"
84 * is used to figure out how far we had gotten.
85 */
86
87int
88main(int argc, char *argv[])
89{
ccbebcd9 90 struct stackmark smark, smark2;
984263bc
MD
91 volatile int state;
92 char *shinit;
93
57fed2af 94 setlocale(LC_ALL, "");
145a4981 95 initcharset();
984263bc 96 state = 0;
99512ac4 97 if (setjmp(main_handler.loc)) {
984263bc 98 switch (exception) {
984263bc
MD
99 case EXEXEC:
100 exitstatus = exerrno;
101 break;
102
103 case EXERROR:
104 exitstatus = 2;
105 break;
106
107 default:
108 break;
109 }
110
2b23d27f
PA
111 if (state == 0 || iflag == 0 || ! rootshell ||
112 exception == EXEXIT)
99512ac4 113 exitshell(exitstatus);
984263bc 114 reset();
99512ac4
PA
115 if (exception == EXINT)
116 out2fmt_flush("\n");
984263bc
MD
117 popstackmark(&smark);
118 FORCEINTON; /* enable interrupts */
119 if (state == 1)
120 goto state1;
121 else if (state == 2)
122 goto state2;
123 else if (state == 3)
124 goto state3;
125 else
126 goto state4;
127 }
99512ac4 128 handler = &main_handler;
984263bc
MD
129#ifdef DEBUG
130 opentrace();
131 trputs("Shell args: "); trargs(argv);
132#endif
133 rootpid = getpid();
134 rootshell = 1;
135 init();
136 setstackmark(&smark);
ccbebcd9 137 setstackmark(&smark2);
984263bc 138 procargs(argc, argv);
99512ac4
PA
139 pwd_init(iflag);
140 if (iflag)
141 chkmail(1);
984263bc
MD
142 if (argv[0] && argv[0][0] == '-') {
143 state = 1;
144 read_profile("/etc/profile");
145state1:
146 state = 2;
147 if (privileged == 0)
24fd06d2 148 read_profile("${HOME-}/.profile");
984263bc
MD
149 else
150 read_profile("/etc/suid_profile");
151 }
152state2:
153 state = 3;
154 if (!privileged && iflag) {
155 if ((shinit = lookupvar("ENV")) != NULL && *shinit != '\0') {
156 state = 3;
157 read_profile(shinit);
158 }
159 }
160state3:
161 state = 4;
ccbebcd9 162 popstackmark(&smark2);
984263bc 163 if (minusc) {
99512ac4 164 evalstring(minusc, sflag ? 0 : EV_EXIT);
984263bc
MD
165 }
166 if (sflag || minusc == NULL) {
167state4: /* XXX ??? - why isn't this before the "if" statement */
168 cmdloop(1);
169 }
984263bc
MD
170 exitshell(exitstatus);
171 /*NOTREACHED*/
172 return 0;
173}
174
175
176/*
177 * Read and execute commands. "Top" is nonzero for the top level command
178 * loop; it turns on prompting if the shell is interactive.
179 */
180
181void
182cmdloop(int top)
183{
184 union node *n;
185 struct stackmark smark;
186 int inter;
187 int numeof = 0;
188
189 TRACE(("cmdloop(%d) called\n", top));
190 setstackmark(&smark);
191 for (;;) {
192 if (pendingsigs)
193 dotrap();
194 inter = 0;
195 if (iflag && top) {
196 inter++;
9d7989de 197 showjobs(1, SHOWJOBS_DEFAULT);
984263bc
MD
198 chkmail(0);
199 flushout(&output);
200 }
201 n = parsecmd(inter);
202 /* showtree(n); DEBUG */
203 if (n == NEOF) {
204 if (!top || numeof >= 50)
205 break;
206 if (!stoppedjobs()) {
207 if (!Iflag)
208 break;
99512ac4 209 out2fmt_flush("\nUse \"exit\" to leave shell.\n");
984263bc
MD
210 }
211 numeof++;
212 } else if (n != NULL && nflag == 0) {
213 job_warning = (job_warning == 2) ? 1 : 0;
214 numeof = 0;
215 evaltree(n, 0);
216 }
217 popstackmark(&smark);
218 setstackmark(&smark);
99512ac4
PA
219 if (evalskip != 0) {
220 if (evalskip == SKIPFILE)
221 evalskip = 0;
984263bc
MD
222 break;
223 }
224 }
225 popstackmark(&smark);
226}
227
228
229
230/*
231 * Read /etc/profile or .profile. Return on error.
232 */
233
99512ac4 234static void
492efe05 235read_profile(const char *name)
984263bc
MD
236{
237 int fd;
ccbebcd9 238 const char *expandedname;
984263bc 239
ccbebcd9
PA
240 expandedname = expandstr(__DECONST(char *, name));
241 if (expandedname == NULL)
242 return;
984263bc 243 INTOFF;
ccbebcd9 244 if ((fd = open(expandedname, O_RDONLY)) >= 0)
984263bc
MD
245 setinputfd(fd, 1);
246 INTON;
247 if (fd < 0)
248 return;
249 cmdloop(0);
250 popfile();
251}
252
253
254
255/*
256 * Read a file containing shell functions.
257 */
258
259void
99512ac4 260readcmdfile(const char *name)
984263bc
MD
261{
262 int fd;
263
264 INTOFF;
265 if ((fd = open(name, O_RDONLY)) >= 0)
266 setinputfd(fd, 1);
267 else
f893ef22 268 error("cannot open %s: %s", name, strerror(errno));
984263bc
MD
269 INTON;
270 cmdloop(0);
271 popfile();
272}
273
274
275
276/*
277 * Take commands from a file. To be compatible we should do a path
278 * search for the file, which is necessary to find sub-commands.
279 */
280
281
99512ac4 282static const char *
492efe05 283find_dot_file(const char *basename)
984263bc 284{
984263bc 285 char *fullname;
492efe05 286 const char *path = pathval();
984263bc
MD
287 struct stat statb;
288
289 /* don't try this for absolute or relative paths */
290 if( strchr(basename, '/'))
291 return basename;
292
293 while ((fullname = padvance(&path, basename)) != NULL) {
332546d3
PA
294 if ((stat(fullname, &statb) == 0) && S_ISREG(statb.st_mode)) {
295 /*
296 * Don't bother freeing here, since it will
297 * be freed by the caller.
298 */
299 return fullname;
300 }
984263bc 301 stunalloc(fullname);
984263bc
MD
302 }
303 return basename;
304}
305
306int
307dotcmd(int argc, char **argv)
308{
58ce95e6 309 const char *fullname;
99512ac4 310 char *filename;
58ce95e6
PA
311
312 if (argc < 2)
313 error("missing filename");
314
984263bc
MD
315 exitstatus = 0;
316
99512ac4
PA
317 /*
318 * Because we have historically not supported any options,
319 * only treat "--" specially.
320 */
321 filename = argc > 2 && strcmp(argv[1], "--") == 0 ? argv[2] : argv[1];
984263bc 322
99512ac4 323 fullname = find_dot_file(filename);
58ce95e6
PA
324 setinputfile(fullname, 1);
325 commandname = fullname;
326 cmdloop(0);
327 popfile();
984263bc
MD
328 return exitstatus;
329}
330
331
332int
333exitcmd(int argc, char **argv)
334{
984263bc
MD
335 if (stoppedjobs())
336 return 0;
337 if (argc > 1)
99512ac4 338 exitshell(number(argv[1]));
984263bc 339 else
99512ac4 340 exitshell_savedstatus();
984263bc 341}