blob: ecacd96ed6fd93c58ea6f1786c15bfdbd7dfc4e0 [file] [log] [blame]
Eric Andersen25f27032001-04-26 23:22:31 +00001/* vi: set sw=4 ts=4: */
2/*
Denis Vlasenko424f79b2009-03-22 14:23:34 +00003 * A prototype Bourne shell grammar parser.
4 * Intended to follow the original Thompson and Ritchie
5 * "small and simple is beautiful" philosophy, which
6 * incidentally is a good match to today's BusyBox.
Eric Andersen25f27032001-04-26 23:22:31 +00007 *
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +00008 * Copyright (C) 2000,2001 Larry Doolittle <larry@doolittle.boa.org>
Denis Vlasenkoc8d27332009-04-06 10:47:21 +00009 * Copyright (C) 2008,2009 Denys Vlasenko <vda.linux@googlemail.com>
Eric Andersen25f27032001-04-26 23:22:31 +000010 *
11 * Credits:
12 * The parser routines proper are all original material, first
Eric Andersencb81e642003-07-14 21:21:08 +000013 * written Dec 2000 and Jan 2001 by Larry Doolittle. The
14 * execution engine, the builtins, and much of the underlying
15 * support has been adapted from busybox-0.49pre's lash, which is
Eric Andersenc7bda1c2004-03-15 08:29:22 +000016 * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
Eric Andersencb81e642003-07-14 21:21:08 +000017 * written by Erik Andersen <andersen@codepoet.org>. That, in turn,
18 * is based in part on ladsh.c, by Michael K. Johnson and Erik W.
19 * Troan, which they placed in the public domain. I don't know
20 * how much of the Johnson/Troan code has survived the repeated
21 * rewrites.
22 *
Eric Andersen25f27032001-04-26 23:22:31 +000023 * Other credits:
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +000024 * o_addchr derived from similar w_addchar function in glibc-2.2.
Denis Vlasenko50f3aa42009-04-07 10:52:40 +000025 * parse_redirect, redirect_opt_num, and big chunks of main
Denis Vlasenko424f79b2009-03-22 14:23:34 +000026 * and many builtins derived from contributions by Erik Andersen.
27 * Miscellaneous bugfixes from Matt Kraai.
Eric Andersen25f27032001-04-26 23:22:31 +000028 *
29 * There are two big (and related) architecture differences between
30 * this parser and the lash parser. One is that this version is
31 * actually designed from the ground up to understand nearly all
32 * of the Bourne grammar. The second, consequential change is that
33 * the parser and input reader have been turned inside out. Now,
34 * the parser is in control, and asks for input as needed. The old
35 * way had the input reader in control, and it asked for parsing to
36 * take place as needed. The new way makes it much easier to properly
37 * handle the recursion implicit in the various substitutions, especially
38 * across continuation lines.
39 *
Mike Frysinger25a6ca02009-03-28 13:59:26 +000040 * POSIX syntax not implemented:
Eric Andersen78a7c992001-05-15 16:30:25 +000041 * aliases
Eric Andersen25f27032001-04-26 23:22:31 +000042 * <(list) and >(list) Process Substitution
Mike Frysinger25a6ca02009-03-28 13:59:26 +000043 * Tilde Expansion
Mike Frysinger25a6ca02009-03-28 13:59:26 +000044 *
Denis Vlasenkoc8d27332009-04-06 10:47:21 +000045 * Bash stuff (maybe optionally enable?):
Mike Frysinger25a6ca02009-03-28 13:59:26 +000046 * &> and >& redirection of stdout+stderr
47 * Brace expansion
48 * reserved words: [[ ]] function select
Mike Frysinger6379bb42009-03-28 18:55:03 +000049 * substrings ${var:1:5}
Mike Frysinger25a6ca02009-03-28 13:59:26 +000050 *
Denis Vlasenkoc8d27332009-04-06 10:47:21 +000051 * TODOs:
52 * grep for "TODO" and fix (some of them are easy)
Eric Andersen83a2ae22001-05-07 17:59:25 +000053 * change { and } from special chars to reserved words
Denis Vlasenkofa4ca782009-04-16 12:00:15 +000054 * $var refs in function do not pick up values set by "var=val func"
Denis Vlasenko6b9e0532009-04-18 01:23:21 +000055 * builtins: ulimit
Eric Andersen25f27032001-04-26 23:22:31 +000056 * follow IFS rules more precisely, including update semantics
Eric Andersen25f27032001-04-26 23:22:31 +000057 * figure out what to do with backslash-newline
Eric Andersen25f27032001-04-26 23:22:31 +000058 * continuation lines, both explicit and implicit - done?
Denis Vlasenkoc8d27332009-04-06 10:47:21 +000059 * separate job control from interactiveness
60 * (testcase: booting with init=/bin/hush does not show prompt (2009-04))
Eric Andersen25f27032001-04-26 23:22:31 +000061 *
Bernhard Reutner-Fischer86f5c992006-01-22 22:55:11 +000062 * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
Eric Andersen25f27032001-04-26 23:22:31 +000063 */
Denis Vlasenko1aa7e472007-11-28 06:49:03 +000064#include "busybox.h" /* for APPLET_IS_NOFORK/NOEXEC */
Denis Vlasenkobe709c22008-07-28 00:01:16 +000065#include <glob.h>
66/* #include <dmalloc.h> */
67#if ENABLE_HUSH_CASE
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +000068# include <fnmatch.h>
Denis Vlasenkobe709c22008-07-28 00:01:16 +000069#endif
Mike Frysinger98c52642009-04-02 10:02:37 +000070#include "math.h"
Mike Frysingera4f331d2009-04-07 06:03:22 +000071#include "match.h"
Denis Vlasenko50f3aa42009-04-07 10:52:40 +000072#ifndef PIPE_BUF
73# define PIPE_BUF 4096 /* amount of buffering in a pipe */
74#endif
Mike Frysinger98c52642009-04-02 10:02:37 +000075
Denis Vlasenko1943aec2009-04-09 14:15:57 +000076
77/* Debug build knobs */
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +000078#define LEAK_HUNTING 0
79#define BUILD_AS_NOMMU 0
80/* Enable/disable sanity checks. Ok to enable in production,
81 * only adds a bit of bloat. Set to >1 to get non-production level verbosity.
82 * Keeping 1 for now even in released versions.
83 */
84#define HUSH_DEBUG 1
Denis Vlasenko1943aec2009-04-09 14:15:57 +000085
86
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +000087#if BUILD_AS_NOMMU
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +000088# undef BB_MMU
89# undef USE_FOR_NOMMU
90# undef USE_FOR_MMU
91# define BB_MMU 0
92# define USE_FOR_NOMMU(...) __VA_ARGS__
93# define USE_FOR_MMU(...)
94#endif
95
Denis Vlasenko61befda2008-11-25 01:36:03 +000096#if defined SINGLE_APPLET_MAIN
97/* STANDALONE does not make sense, and won't compile */
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +000098# undef CONFIG_FEATURE_SH_STANDALONE
99# undef ENABLE_FEATURE_SH_STANDALONE
100# undef USE_FEATURE_SH_STANDALONE
101# define SKIP_FEATURE_SH_STANDALONE(...) __VA_ARGS__
102# define ENABLE_FEATURE_SH_STANDALONE 0
103# define USE_FEATURE_SH_STANDALONE(...)
104# define SKIP_FEATURE_SH_STANDALONE(...) __VA_ARGS__
Denis Vlasenko61befda2008-11-25 01:36:03 +0000105#endif
106
Denis Vlasenko05743d72008-02-10 12:10:08 +0000107#if !ENABLE_HUSH_INTERACTIVE
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +0000108# undef ENABLE_FEATURE_EDITING
109# define ENABLE_FEATURE_EDITING 0
110# undef ENABLE_FEATURE_EDITING_FANCY_PROMPT
111# define ENABLE_FEATURE_EDITING_FANCY_PROMPT 0
Denis Vlasenko8412d792007-10-01 09:59:47 +0000112#endif
113
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000114/* Do we support ANY keywords? */
115#if ENABLE_HUSH_IF || ENABLE_HUSH_LOOPS || ENABLE_HUSH_CASE
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +0000116# define HAS_KEYWORDS 1
117# define IF_HAS_KEYWORDS(...) __VA_ARGS__
118# define IF_HAS_NO_KEYWORDS(...)
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000119#else
Denis Vlasenkoce4acbb2009-04-10 23:23:41 +0000120# define HAS_KEYWORDS 0
121# define IF_HAS_KEYWORDS(...)
122# define IF_HAS_NO_KEYWORDS(...) __VA_ARGS__
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000123#endif
Denis Vlasenko8412d792007-10-01 09:59:47 +0000124
Denis Vlasenkod01ff132007-05-02 21:40:23 +0000125/* If you comment out one of these below, it will be #defined later
126 * to perform debug printfs to stderr: */
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000127#define debug_printf(...) do {} while (0)
Denis Vlasenko400c5b62007-05-04 13:07:27 +0000128/* Finer-grained debug switches */
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000129#define debug_printf_parse(...) do {} while (0)
130#define debug_print_tree(a, b) do {} while (0)
131#define debug_printf_exec(...) do {} while (0)
Denis Vlasenkof886fd22008-10-13 12:36:05 +0000132#define debug_printf_env(...) do {} while (0)
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000133#define debug_printf_jobs(...) do {} while (0)
134#define debug_printf_expand(...) do {} while (0)
Denis Vlasenkob61e13d2008-06-17 05:11:43 +0000135#define debug_printf_glob(...) do {} while (0)
136#define debug_printf_list(...) do {} while (0)
Denis Vlasenko30c9cc52008-06-17 07:24:29 +0000137#define debug_printf_subst(...) do {} while (0)
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000138#define debug_printf_clean(...) do {} while (0)
Denis Vlasenkod01ff132007-05-02 21:40:23 +0000139
Denis Vlasenkob6e65562009-04-03 16:49:04 +0000140#define ERR_PTR ((void*)(long)1)
141
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000142#define JOB_STATUS_FORMAT "[%d] %-22s %.40s\n"
Denis Vlasenko5ec61322008-06-24 00:50:07 +0000143
Denis Vlasenkob6e65562009-04-03 16:49:04 +0000144#define SPECIAL_VAR_SYMBOL 3
Eric Andersen25f27032001-04-26 23:22:31 +0000145
Denis Vlasenkocc90f442009-04-08 16:40:34 +0000146static const char hush_version_str[] ALIGN1 = "HUSH_VERSION="BB_VER;
147
148/* This supports saving pointers malloced in vfork child,
Denis Vlasenkoc376db32009-04-15 21:49:48 +0000149 * to be freed in the parent.
Denis Vlasenkocc90f442009-04-08 16:40:34 +0000150 */
151#if !BB_MMU
152typedef struct nommu_save_t {
153 char **new_env;
154 char **old_env;
155 char **argv;
Denis Vlasenko27014ed2009-04-15 21:48:23 +0000156 char **argv_from_re_execing;
Denis Vlasenkocc90f442009-04-08 16:40:34 +0000157} nommu_save_t;
158#endif
159
Denis Vlasenko55789c62008-06-18 16:30:42 +0000160/* The descrip member of this structure is only used to make
161 * debugging output pretty */
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +0000162static const struct {
163 int mode;
Denis Vlasenkoef36ead2007-05-02 15:34:47 +0000164 signed char default_fd;
165 char descrip[3];
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +0000166} redir_table[] = {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +0000167 { 0, 0, "??" },
Eric Andersen25f27032001-04-26 23:22:31 +0000168 { O_RDONLY, 0, "<" },
169 { O_CREAT|O_TRUNC|O_WRONLY, 1, ">" },
170 { O_CREAT|O_APPEND|O_WRONLY, 1, ">>" },
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +0000171 { O_RDONLY, 0, "<<" },
172 { O_CREAT|O_RDWR, 1, "<>" },
173/* Should not be needed. Bogus default_fd helps in debugging */
174/* { O_RDONLY, 77, "<<" }, */
Eric Andersen25f27032001-04-26 23:22:31 +0000175};
176
Denis Vlasenkobcb25532008-07-28 23:04:34 +0000177typedef enum reserved_style {
Eric Andersen25f27032001-04-26 23:22:31 +0000178 RES_NONE = 0,
Denis Vlasenko06810332007-05-21 23:30:54 +0000179#if ENABLE_HUSH_IF
Denis Vlasenko17f02e72008-07-14 04:32:29 +0000180 RES_IF ,
181 RES_THEN ,
182 RES_ELIF ,
183 RES_ELSE ,
184 RES_FI ,
Denis Vlasenko06810332007-05-21 23:30:54 +0000185#endif
186#if ENABLE_HUSH_LOOPS
Denis Vlasenko17f02e72008-07-14 04:32:29 +0000187 RES_FOR ,
188 RES_WHILE ,
189 RES_UNTIL ,
190 RES_DO ,
191 RES_DONE ,
Denis Vlasenkod91afa32008-07-29 11:10:01 +0000192#endif
193#if ENABLE_HUSH_LOOPS || ENABLE_HUSH_CASE
Denis Vlasenko17f02e72008-07-14 04:32:29 +0000194 RES_IN ,
Denis Vlasenko06810332007-05-21 23:30:54 +0000195#endif
Denis Vlasenko17f02e72008-07-14 04:32:29 +0000196#if ENABLE_HUSH_CASE
197 RES_CASE ,
198 /* two pseudo-keywords support contrived "case" syntax: */
199 RES_MATCH , /* "word)" */
200 RES_CASEI , /* "this command is inside CASE" */
201 RES_ESAC ,
202#endif
203 RES_XXXX ,
204 RES_SNTX
Eric Andersen25f27032001-04-26 23:22:31 +0000205} reserved_style;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +0000206
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +0000207typedef struct o_string {
208 char *data;
209 int length; /* position where data is appended */
210 int maxlen;
211 /* Protect newly added chars against globbing
212 * (by prepending \ to *, ?, [, \) */
213 smallint o_escape;
214 smallint o_glob;
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +0000215 /* At least some part of the string was inside '' or "",
216 * possibly empty one: word"", wo''rd etc. */
217 smallint o_quoted;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +0000218 smallint has_empty_slot;
219 smallint o_assignment; /* 0:maybe, 1:yes, 2:no */
220} o_string;
221enum {
222 MAYBE_ASSIGNMENT = 0,
223 DEFINITELY_ASSIGNMENT = 1,
224 NOT_ASSIGNMENT = 2,
225 WORD_IS_KEYWORD = 3, /* not assigment, but next word may be: "if v=xyz cmd;" */
226};
227/* Used for initialization: o_string foo = NULL_O_STRING; */
228#define NULL_O_STRING { NULL }
229
230/* I can almost use ordinary FILE*. Is open_memstream() universally
231 * available? Where is it documented? */
232typedef struct in_str {
233 const char *p;
234 /* eof_flag=1: last char in ->p is really an EOF */
235 char eof_flag; /* meaningless if ->p == NULL */
236 char peek_buf[2];
237#if ENABLE_HUSH_INTERACTIVE
238 smallint promptme;
239 smallint promptmode; /* 0: PS1, 1: PS2 */
240#endif
241 FILE *file;
242 int (*get) (struct in_str *);
243 int (*peek) (struct in_str *);
244} in_str;
245#define i_getch(input) ((input)->get(input))
246#define i_peek(input) ((input)->peek(input))
247
Eric Andersen25f27032001-04-26 23:22:31 +0000248struct redir_struct {
Denis Vlasenko55789c62008-06-18 16:30:42 +0000249 struct redir_struct *next;
Denis Vlasenko5ec61322008-06-24 00:50:07 +0000250 char *rd_filename; /* filename */
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +0000251 int rd_fd; /* fd to redirect */
252 /* fd to redirect to, or -3 if rd_fd is to be closed (n>&-) */
253 int rd_dup;
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +0000254 smallint rd_type; /* (enum redir_type) */
255 /* note: for heredocs, rd_filename contains heredoc delimiter,
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +0000256 * and subsequently heredoc itself; and rd_dup is a bitmask:
257 * 1: do we need to trim leading tabs?
Denis Vlasenkoed055212009-04-11 10:37:10 +0000258 * 2: is heredoc quoted (<<'delim' syntax) ?
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +0000259 */
Eric Andersen25f27032001-04-26 23:22:31 +0000260};
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +0000261typedef enum redir_type {
262 REDIRECT_INVALID = 0,
263 REDIRECT_INPUT = 1,
264 REDIRECT_OVERWRITE = 2,
265 REDIRECT_APPEND = 3,
266 REDIRECT_HEREDOC = 4,
267 REDIRECT_IO = 5,
268 REDIRECT_HEREDOC2 = 6, /* REDIRECT_HEREDOC after heredoc is loaded */
Denis Vlasenkoc96865f2009-04-10 00:20:58 +0000269
270 REDIRFD_CLOSE = -3,
271 REDIRFD_SYNTAX_ERR = -2,
Denis Vlasenko835fcfd2009-04-10 13:51:56 +0000272 REDIRFD_TO_FILE = -1,
273 /* otherwise, rd_fd is redirected to rd_dup */
Denis Vlasenkoc96865f2009-04-10 00:20:58 +0000274
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +0000275 HEREDOC_SKIPTABS = 1,
276 HEREDOC_QUOTED = 2,
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +0000277} redir_type;
278
Eric Andersen25f27032001-04-26 23:22:31 +0000279
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000280struct command {
Denis Vlasenko0c886c62007-01-30 22:30:09 +0000281 pid_t pid; /* 0 if exited */
Denis Vlasenko2b576b82008-08-04 00:46:07 +0000282 int assignment_cnt; /* how many argv[i] are assignments? */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000283 smallint is_stopped; /* is the command currently running? */
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000284 smallint grp_type; /* GRP_xxx */
Denis Vlasenkoed055212009-04-11 10:37:10 +0000285#define GRP_NORMAL 0
286#define GRP_SUBSHELL 1
287#if ENABLE_HUSH_FUNCTIONS
288# define GRP_FUNCTION 2
289#endif
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +0000290 struct pipe *group; /* if non-NULL, this "command" is { list },
291 * ( list ), or a compound statement */
292#if !BB_MMU
293 char *group_as_string;
294#endif
Denis Vlasenkoed055212009-04-11 10:37:10 +0000295#if ENABLE_HUSH_FUNCTIONS
296 struct function *child_func;
297/* This field is used to prevent a bug here:
298 * while...do f1() {a;}; f1; f1 {b;}; f1; done
299 * When we execute "f1() {a;}" cmd, we create new function and clear
300 * cmd->group, cmd->group_as_string, cmd->argv[0].
301 * when we execute "f1 {b;}", we notice that f1 exists,
302 * and that it's "parent cmd" struct is still "alive",
303 * we put those fields back into cmd->xxx
304 * (struct function has ->parent_cmd ptr to facilitate that).
305 * When we loop back, we can execute "f1() {a;}" again and set f1 correctly.
306 * Without this trick, loop would execute a;b;b;b;...
307 * instead of correct sequence a;b;a;b;...
308 * When command is freed, it severs the link
309 * (sets ->child_func->parent_cmd to NULL).
310 */
311#endif
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000312 char **argv; /* command name and arguments */
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000313/* argv vector may contain variable references (^Cvar^C, ^C0^C etc)
314 * and on execution these are substituted with their values.
315 * Substitution can make _several_ words out of one argv[n]!
316 * Example: argv[0]=='.^C*^C.' here: echo .$*.
Denis Vlasenkoc7985b72008-06-17 05:43:38 +0000317 * References of the form ^C`cmd arg^C are `cmd arg` substitutions.
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +0000318 */
Denis Vlasenkoed055212009-04-11 10:37:10 +0000319 struct redir_struct *redirects; /* I/O redirections */
320};
Denis Vlasenkof8c1f022009-04-17 11:55:42 +0000321/* Is there anything in this command at all? */
322#define IS_NULL_CMD(cmd) \
323 (!(cmd)->group && !(cmd)->argv && !(cmd)->redirects)
324
Eric Andersen25f27032001-04-26 23:22:31 +0000325
326struct pipe {
Denis Vlasenkob81b3df2007-04-28 16:48:04 +0000327 struct pipe *next;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000328 int num_cmds; /* total number of commands in pipe */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000329 int alive_cmds; /* number of commands running (not exited) */
330 int stopped_cmds; /* number of commands alive, but stopped */
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +0000331#if ENABLE_HUSH_JOB
Denis Vlasenkob81b3df2007-04-28 16:48:04 +0000332 int jobid; /* job number */
Denis Vlasenko0c886c62007-01-30 22:30:09 +0000333 pid_t pgrp; /* process group ID for the job */
Denis Vlasenko219e88d2007-05-21 10:18:23 +0000334 char *cmdtext; /* name of job */
Denis Vlasenkob81b3df2007-04-28 16:48:04 +0000335#endif
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000336 struct command *cmds; /* array of commands in pipe */
Denis Vlasenko219e88d2007-05-21 10:18:23 +0000337 smallint followup; /* PIPE_BG, PIPE_SEQ, PIPE_OR, PIPE_AND */
Denis Vlasenko5ec61322008-06-24 00:50:07 +0000338 IF_HAS_KEYWORDS(smallint pi_inverted;) /* "! cmd | cmd" */
339 IF_HAS_KEYWORDS(smallint res_word;) /* needed for if, for, while, until... */
Eric Andersen25f27032001-04-26 23:22:31 +0000340};
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +0000341typedef enum pipe_style {
342 PIPE_SEQ = 1,
343 PIPE_AND = 2,
344 PIPE_OR = 3,
345 PIPE_BG = 4,
346} pipe_style;
Denis Vlasenkof8c1f022009-04-17 11:55:42 +0000347/* Is there anything in this pipe at all? */
348#define IS_NULL_PIPE(pi) \
349 ((pi)->num_cmds == 0 IF_HAS_KEYWORDS( && (pi)->res_word == RES_NONE))
Eric Andersen25f27032001-04-26 23:22:31 +0000350
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000351/* This holds pointers to the various results of parsing */
352struct parse_context {
Denis Vlasenkof9f74292009-04-03 00:07:05 +0000353 /* linked list of pipes */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000354 struct pipe *list_head;
Denis Vlasenkof9f74292009-04-03 00:07:05 +0000355 /* last pipe (being constructed right now) */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000356 struct pipe *pipe;
Denis Vlasenkof9f74292009-04-03 00:07:05 +0000357 /* last command in pipe (being constructed right now) */
358 struct command *command;
359 /* last redirect in command->redirects list */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000360 struct redir_struct *pending_redirect;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +0000361#if !BB_MMU
362 o_string as_string;
363#endif
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000364#if HAS_KEYWORDS
365 smallint ctx_res_w;
366 smallint ctx_inverted; /* "! cmd | cmd" */
367#if ENABLE_HUSH_CASE
368 smallint ctx_dsemicolon; /* ";;" seen */
369#endif
Denis Vlasenkof9f74292009-04-03 00:07:05 +0000370 /* bitmask of FLAG_xxx, for figuring out valid reserved words */
371 int old_flag;
372 /* group we are enclosed in:
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000373 * example: "if pipe1; pipe2; then pipe3; fi"
374 * when we see "if" or "then", we malloc and copy current context,
375 * and make ->stack point to it. then we parse pipeN.
376 * when closing "then" / fi" / whatever is found,
377 * we move list_head into ->stack->command->group,
378 * copy ->stack into current context, and delete ->stack.
379 * (parsing of { list } and ( list ) doesn't use this method)
Denis Vlasenkof9f74292009-04-03 00:07:05 +0000380 */
Denis Vlasenko9af22c72008-10-09 12:54:58 +0000381 struct parse_context *stack;
382#endif
383};
384
Denis Vlasenkod76c0492007-05-25 02:16:25 +0000385/* On program start, environ points to initial environment.
386 * putenv adds new pointers into it, unsetenv removes them.
387 * Neither of these (de)allocates the strings.
388 * setenv allocates new strings in malloc space and does putenv,
389 * and thus setenv is unusable (leaky) for shell's purposes */
390#define setenv(...) setenv_is_leaky_dont_use()
391struct variable {
392 struct variable *next;
Denis Vlasenko28c0f0f2007-05-25 02:46:01 +0000393 char *varstr; /* points to "name=" portion */
Denis Vlasenkod76c0492007-05-25 02:16:25 +0000394 int max_len; /* if > 0, name is part of initial env; else name is malloced */
395 smallint flg_export; /* putenv should be done on this var */
Denis Vlasenko219e88d2007-05-21 10:18:23 +0000396 smallint flg_read_only;
Eric Andersen9ffb7dd2001-05-19 03:00:46 +0000397};
398
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000399enum {
Denis Vlasenkobcb25532008-07-28 23:04:34 +0000400 BC_BREAK = 1,
401 BC_CONTINUE = 2,
402};
403
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000404#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000405struct function {
406 struct function *next;
407 char *name;
Denis Vlasenkoed055212009-04-11 10:37:10 +0000408 struct command *parent_cmd;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000409 struct pipe *body;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000410#if !BB_MMU
411 char *body_as_string;
412#endif
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000413};
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000414#endif
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000415
Denis Vlasenkod76c0492007-05-25 02:16:25 +0000416
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000417/* "Globals" within this file */
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000418/* Sorted roughly by size (smaller offsets == smaller code) */
419struct globals {
420#if ENABLE_HUSH_INTERACTIVE
421 /* 'interactive_fd' is a fd# open to ctty, if we have one
422 * _AND_ if we decided to act interactively */
423 int interactive_fd;
424 const char *PS1;
425 const char *PS2;
Denis Vlasenko60b392f2009-04-03 19:14:32 +0000426#define G_interactive_fd (G.interactive_fd)
427#else
428#define G_interactive_fd 0
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000429#endif
430#if ENABLE_FEATURE_EDITING
431 line_input_t *line_input_state;
432#endif
Denis Vlasenkocc3f20b2008-06-23 22:31:52 +0000433 pid_t root_pid;
Denis Vlasenko87a86552008-07-29 19:43:10 +0000434 pid_t last_bg_pid;
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000435#if ENABLE_HUSH_JOB
436 int run_list_level;
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000437 pid_t saved_tty_pgrp;
438 int last_jobid;
439 struct pipe *job_list;
440 struct pipe *toplevel_list;
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000441#endif
Denis Vlasenko422cd7c2009-03-31 12:41:52 +0000442 smallint flag_SIGINT;
Denis Vlasenkodadfb492008-07-29 10:16:05 +0000443#if ENABLE_HUSH_LOOPS
Denis Vlasenkobcb25532008-07-28 23:04:34 +0000444 smallint flag_break_continue;
Denis Vlasenkodadfb492008-07-29 10:16:05 +0000445#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +0000446#if ENABLE_HUSH_FUNCTIONS
447 /* 0: outside of a function (or sourced file)
448 * -1: inside of a function, ok to use return builtin
449 * 1: return is invoked, skip all till end of func.
450 */
451 smallint flag_return_in_progress;
452#endif
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000453 smallint fake_mode;
Denis Vlasenkoefea9d22009-04-09 13:43:11 +0000454 smallint exiting; /* used to prevent EXIT trap recursion */
Denis Vlasenkod5762932009-03-31 11:22:57 +0000455 /* These four support $?, $#, and $1 */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +0000456 smalluint last_exitcode;
Denis Vlasenkocc4c6932009-04-05 07:38:48 +0000457 /* are global_argv and global_argv[1..n] malloced? (note: not [0]) */
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +0000458 smalluint global_args_malloced;
Denis Vlasenkoe1300f62009-03-22 11:41:18 +0000459 /* how many non-NULL argv's we have. NB: $# + 1 */
460 int global_argc;
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000461 char **global_argv;
Denis Vlasenkocc4c6932009-04-05 07:38:48 +0000462#if !BB_MMU
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +0000463 char *argv0_for_re_execing;
Denis Vlasenkocc4c6932009-04-05 07:38:48 +0000464#endif
Denis Vlasenkodadfb492008-07-29 10:16:05 +0000465#if ENABLE_HUSH_LOOPS
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +0000466 unsigned depth_break_continue;
Denis Vlasenkofcf37c32008-07-29 11:37:15 +0000467 unsigned depth_of_loop;
Denis Vlasenkodadfb492008-07-29 10:16:05 +0000468#endif
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000469 const char *ifs;
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000470 const char *cwd;
Denis Vlasenko87a86552008-07-29 19:43:10 +0000471 struct variable *top_var; /* = &G.shell_ver (set in main()) */
Denis Vlasenko0a83fc32007-05-25 11:12:32 +0000472 struct variable shell_ver;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000473#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +0000474 struct function *top_func;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000475#endif
Denis Vlasenkod5762932009-03-31 11:22:57 +0000476 /* Signal and trap handling */
Denis Vlasenko7566bae2009-03-31 17:24:49 +0000477// unsigned count_SIGCHLD;
478// unsigned handled_SIGCHLD;
Denis Vlasenkod5762932009-03-31 11:22:57 +0000479 /* which signals have non-DFL handler (even with no traps set)? */
480 unsigned non_DFL_mask;
Denis Vlasenko7566bae2009-03-31 17:24:49 +0000481 char **traps; /* char *traps[NSIG] */
Denis Vlasenkod5762932009-03-31 11:22:57 +0000482 sigset_t blocked_set;
483 sigset_t inherited_set;
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +0000484#if HUSH_DEBUG
485 unsigned long memleak_value;
Denis Vlasenko0701dca2009-04-11 10:38:47 +0000486 int debug_indent;
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +0000487#endif
Denis Vlasenko6da69cd2009-04-04 12:12:58 +0000488 char user_input_buf[ENABLE_FEATURE_EDITING ? BUFSIZ : 2];
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000489};
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000490#define G (*ptr_to_globals)
Denis Vlasenko87a86552008-07-29 19:43:10 +0000491/* Not #defining name to G.name - this quickly gets unwieldy
492 * (too many defines). Also, I actually prefer to see when a variable
493 * is global, thus "G." prefix is a useful hint */
Denis Vlasenko574f2f42008-02-27 18:41:59 +0000494#define INIT_G() do { \
495 SET_PTR_TO_GLOBALS(xzalloc(sizeof(G))); \
496} while (0)
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000497
498
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000499/* Function prototypes for builtins */
500static int builtin_cd(char **argv);
501static int builtin_echo(char **argv);
502static int builtin_eval(char **argv);
503static int builtin_exec(char **argv);
504static int builtin_exit(char **argv);
505static int builtin_export(char **argv);
506#if ENABLE_HUSH_JOB
507static int builtin_fg_bg(char **argv);
508static int builtin_jobs(char **argv);
509#endif
510#if ENABLE_HUSH_HELP
511static int builtin_help(char **argv);
512#endif
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +0000513#if HUSH_DEBUG
514static int builtin_memleak(char **argv);
515#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000516static int builtin_pwd(char **argv);
517static int builtin_read(char **argv);
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000518static int builtin_set(char **argv);
519static int builtin_shift(char **argv);
520static int builtin_source(char **argv);
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +0000521static int builtin_test(char **argv);
522static int builtin_trap(char **argv);
523static int builtin_true(char **argv);
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000524static int builtin_umask(char **argv);
525static int builtin_unset(char **argv);
Mike Frysinger56bdea12009-03-28 20:01:58 +0000526static int builtin_wait(char **argv);
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000527#if ENABLE_HUSH_LOOPS
528static int builtin_break(char **argv);
529static int builtin_continue(char **argv);
530#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +0000531#if ENABLE_HUSH_FUNCTIONS
532static int builtin_return(char **argv);
533#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000534
535/* Table of built-in functions. They can be forked or not, depending on
536 * context: within pipes, they fork. As simple commands, they do not.
537 * When used in non-forking context, they can change global variables
538 * in the parent shell process. If forked, of course they cannot.
539 * For example, 'unset foo | whatever' will parse and run, but foo will
540 * still be set at the end. */
541struct built_in_command {
542 const char *cmd;
543 int (*function)(char **argv);
544#if ENABLE_HUSH_HELP
545 const char *descr;
546#define BLTIN(cmd, func, help) { cmd, func, help }
547#else
548#define BLTIN(cmd, func, help) { cmd, func }
549#endif
550};
551
552/* For now, echo and test are unconditionally enabled.
553 * Maybe make it configurable? */
554static const struct built_in_command bltins[] = {
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000555 BLTIN("." , builtin_source , "Run commands in a file"),
556 BLTIN(":" , builtin_true , "No-op"),
557 BLTIN("[" , builtin_test , "Test condition"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000558#if ENABLE_HUSH_JOB
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000559 BLTIN("bg" , builtin_fg_bg , "Resume a job in the background"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000560#endif
561#if ENABLE_HUSH_LOOPS
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000562 BLTIN("break" , builtin_break , "Exit from a loop"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000563#endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000564 BLTIN("cd" , builtin_cd , "Change directory"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000565#if ENABLE_HUSH_LOOPS
566 BLTIN("continue", builtin_continue, "Start new loop iteration"),
567#endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000568 BLTIN("echo" , builtin_echo , "Write to stdout"),
569 BLTIN("eval" , builtin_eval , "Construct and run shell command"),
570 BLTIN("exec" , builtin_exec , "Execute command, don't return to shell"),
571 BLTIN("exit" , builtin_exit , "Exit"),
572 BLTIN("export" , builtin_export , "Set environment variable"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000573#if ENABLE_HUSH_JOB
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000574 BLTIN("fg" , builtin_fg_bg , "Bring job into the foreground"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000575#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000576#if ENABLE_HUSH_HELP
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000577 BLTIN("help" , builtin_help , "List shell built-in commands"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000578#endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000579#if ENABLE_HUSH_JOB
580 BLTIN("jobs" , builtin_jobs , "List active jobs"),
581#endif
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +0000582#if HUSH_DEBUG
583 BLTIN("memleak" , builtin_memleak , "Debug tool"),
584#endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000585 BLTIN("pwd" , builtin_pwd , "Print current directory"),
586 BLTIN("read" , builtin_read , "Input environment variable"),
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +0000587#if ENABLE_HUSH_FUNCTIONS
588 BLTIN("return" , builtin_return , "Return from a function"),
589#endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +0000590 BLTIN("set" , builtin_set , "Set/unset shell local variables"),
591 BLTIN("shift" , builtin_shift , "Shift positional parameters"),
592 BLTIN("test" , builtin_test , "Test condition"),
593 BLTIN("trap" , builtin_trap , "Trap signals"),
594// BLTIN("ulimit" , builtin_return , "Control resource limits"),
595 BLTIN("umask" , builtin_umask , "Set file creation mask"),
596 BLTIN("unset" , builtin_unset , "Unset environment variable"),
597 BLTIN("wait" , builtin_wait , "Wait for process"),
Denis Vlasenko424f79b2009-03-22 14:23:34 +0000598};
599
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +0000600
Denis Vlasenko0701dca2009-04-11 10:38:47 +0000601/* Debug printouts.
602 */
603#if HUSH_DEBUG
604/* prevent disasters with G.debug_indent < 0 */
605# define indent() fprintf(stderr, "%*s", (G.debug_indent * 2) & 0xff, "")
606# define debug_enter() (G.debug_indent++)
607# define debug_leave() (G.debug_indent--)
608#else
609# define indent() ((void)0)
610# define debug_enter() ((void)0)
611# define debug_leave() ((void)0)
612#endif
613
614#ifndef debug_printf
615# define debug_printf(...) (indent(), fprintf(stderr, __VA_ARGS__))
616#endif
617
618#ifndef debug_printf_parse
619# define debug_printf_parse(...) (indent(), fprintf(stderr, __VA_ARGS__))
620#endif
621
622#ifndef debug_printf_exec
623#define debug_printf_exec(...) (indent(), fprintf(stderr, __VA_ARGS__))
624#endif
625
626#ifndef debug_printf_env
627# define debug_printf_env(...) (indent(), fprintf(stderr, __VA_ARGS__))
628#endif
629
630#ifndef debug_printf_jobs
631# define debug_printf_jobs(...) (indent(), fprintf(stderr, __VA_ARGS__))
632# define DEBUG_JOBS 1
633#else
634# define DEBUG_JOBS 0
635#endif
636
637#ifndef debug_printf_expand
638# define debug_printf_expand(...) (indent(), fprintf(stderr, __VA_ARGS__))
639# define DEBUG_EXPAND 1
640#else
641# define DEBUG_EXPAND 0
642#endif
643
644#ifndef debug_printf_glob
645# define debug_printf_glob(...) (indent(), fprintf(stderr, __VA_ARGS__))
646# define DEBUG_GLOB 1
647#else
648# define DEBUG_GLOB 0
649#endif
650
651#ifndef debug_printf_list
652# define debug_printf_list(...) (indent(), fprintf(stderr, __VA_ARGS__))
653#endif
654
655#ifndef debug_printf_subst
656# define debug_printf_subst(...) (indent(), fprintf(stderr, __VA_ARGS__))
657#endif
658
659#ifndef debug_printf_clean
660# define debug_printf_clean(...) (indent(), fprintf(stderr, __VA_ARGS__))
661# define DEBUG_CLEAN 1
662#else
663# define DEBUG_CLEAN 0
664#endif
665
666#if DEBUG_EXPAND
667static void debug_print_strings(const char *prefix, char **vv)
668{
669 indent();
670 fprintf(stderr, "%s:\n", prefix);
671 while (*vv)
672 fprintf(stderr, " '%s'\n", *vv++);
673}
674#else
675#define debug_print_strings(prefix, vv) ((void)0)
676#endif
677
678
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000679/* Leak hunting. Use hush_leaktool.sh for post-processing.
680 */
681#if LEAK_HUNTING
682static void *xxmalloc(int lineno, size_t size)
Denis Vlasenko90e485c2007-05-23 15:22:50 +0000683{
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000684 void *ptr = xmalloc((size + 0xff) & ~0xff);
685 fdprintf(2, "line %d: malloc %p\n", lineno, ptr);
686 return ptr;
687}
688static void *xxrealloc(int lineno, void *ptr, size_t size)
689{
690 ptr = xrealloc(ptr, (size + 0xff) & ~0xff);
691 fdprintf(2, "line %d: realloc %p\n", lineno, ptr);
692 return ptr;
693}
694static char *xxstrdup(int lineno, const char *str)
695{
696 char *ptr = xstrdup(str);
697 fdprintf(2, "line %d: strdup %p\n", lineno, ptr);
698 return ptr;
699}
700static void xxfree(void *ptr)
701{
702 fdprintf(2, "free %p\n", ptr);
703 free(ptr);
704}
705#define xmalloc(s) xxmalloc(__LINE__, s)
706#define xrealloc(p, s) xxrealloc(__LINE__, p, s)
707#define xstrdup(s) xxstrdup(__LINE__, s)
708#define free(p) xxfree(p)
709#endif
710
711
712/* Syntax and runtime errors. They always abort scripts.
713 * In interactive use they usually discard unparsed and/or unexecuted commands
714 * and return to the prompt.
715 * HUSH_DEBUG >= 2 prints line number in this file where it was detected.
716 */
717#if HUSH_DEBUG < 2
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000718# define die_if_script(lineno, fmt...) die_if_script(fmt)
719# define syntax_error(lineno, msg) syntax_error(msg)
720# define syntax_error_at(lineno, msg) syntax_error_at(msg)
721# define syntax_error_unterm_ch(lineno, ch) syntax_error_unterm_ch(ch)
722# define syntax_error_unterm_str(lineno, s) syntax_error_unterm_str(s)
723# define syntax_error_unexpected_ch(lineno, ch) syntax_error_unexpected_ch(ch)
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000724#endif
725
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000726static void die_if_script(unsigned lineno, const char *fmt, ...)
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000727{
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000728 va_list p;
729
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000730#if HUSH_DEBUG >= 2
731 bb_error_msg("hush.c:%u", lineno);
732#endif
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000733 va_start(p, fmt);
734 bb_verror_msg(fmt, p, NULL);
735 va_end(p);
736 if (!G_interactive_fd)
737 xfunc_die();
Mike Frysinger6379bb42009-03-28 18:55:03 +0000738}
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000739
740static void syntax_error(unsigned lineno, const char *msg)
741{
742 if (msg)
743 die_if_script(lineno, "syntax error: %s", msg);
744 else
745 die_if_script(lineno, "syntax error", NULL);
746}
747
748static void syntax_error_at(unsigned lineno, const char *msg)
749{
750 die_if_script(lineno, "syntax error at '%s'", msg);
751}
752
Denis Vlasenko0b677d82009-04-10 13:49:10 +0000753/* It so happens that all such cases are totally fatal
754 * even if shell is interactive: EOF while looking for closing
755 * delimiter. There is nowhere to read stuff from after that,
756 * it's EOF! The only choice is to terminate.
757 */
758static void syntax_error_unterm_ch(unsigned lineno, char ch) NORETURN;
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000759static void syntax_error_unterm_ch(unsigned lineno, char ch)
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000760{
761 char msg[2];
762 msg[0] = ch;
763 msg[1] = '\0';
764 die_if_script(lineno, "syntax error: unterminated %s", msg);
Denis Vlasenko0b677d82009-04-10 13:49:10 +0000765 xfunc_die();
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000766}
767
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000768static void syntax_error_unterm_str(unsigned lineno, const char *s)
769{
770 die_if_script(lineno, "syntax error: unterminated %s", s);
771}
772
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000773static void syntax_error_unexpected_ch(unsigned lineno, char ch)
774{
775 char msg[2];
776 msg[0] = ch;
777 msg[1] = '\0';
778 die_if_script(lineno, "syntax error: unexpected %s", msg);
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000779}
780
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000781#if HUSH_DEBUG < 2
782# undef die_if_script
783# undef syntax_error
784# undef syntax_error_at
Denis Vlasenkod68ae082009-04-09 20:41:34 +0000785# undef syntax_error_unterm_ch
786# undef syntax_error_unterm_str
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000787# undef syntax_error_unexpected_ch
Denis Vlasenko90e485c2007-05-23 15:22:50 +0000788#else
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +0000789# define die_if_script(fmt...) die_if_script(__LINE__, fmt)
790# define syntax_error(msg) syntax_error(__LINE__, msg)
791# define syntax_error_at(msg) syntax_error_at(__LINE__, msg)
792# define syntax_error_unterm_ch(ch) syntax_error_unterm_ch(__LINE__, ch)
793# define syntax_error_unterm_str(s) syntax_error_unterm_str(__LINE__, s)
794# define syntax_error_unexpected_ch(ch) syntax_error_unexpected_ch(__LINE__, ch)
Denis Vlasenko90e485c2007-05-23 15:22:50 +0000795#endif
Eric Andersen25f27032001-04-26 23:22:31 +0000796
Denis Vlasenko552433b2009-04-04 19:29:21 +0000797
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000798/* Utility functions
799 */
Denis Vlasenkob61e13d2008-06-17 05:11:43 +0000800static int glob_needed(const char *s)
801{
802 while (*s) {
803 if (*s == '\\')
804 s++;
805 if (*s == '*' || *s == '[' || *s == '?')
806 return 1;
807 s++;
808 }
809 return 0;
810}
811
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000812static int is_well_formed_var_name(const char *s, char terminator)
Denis Vlasenko30c9cc52008-06-17 07:24:29 +0000813{
Denis Vlasenkod4981312008-07-31 10:34:48 +0000814 if (!s || !(isalpha(*s) || *s == '_'))
Denis Vlasenko30c9cc52008-06-17 07:24:29 +0000815 return 0;
816 s++;
817 while (isalnum(*s) || *s == '_')
818 s++;
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000819 return *s == terminator;
Denis Vlasenko30c9cc52008-06-17 07:24:29 +0000820}
821
Denis Vlasenko55789c62008-06-18 16:30:42 +0000822/* Replace each \x with x in place, return ptr past NUL. */
823static char *unbackslash(char *src)
824{
825 char *dst = src;
826 while (1) {
827 if (*src == '\\')
828 src++;
829 if ((*dst++ = *src++) == '\0')
830 break;
831 }
832 return dst;
833}
834
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +0000835static char **add_strings_to_strings(char **strings, char **add, int need_to_dup)
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000836{
837 int i;
838 unsigned count1;
839 unsigned count2;
840 char **v;
841
842 v = strings;
843 count1 = 0;
844 if (v) {
845 while (*v) {
846 count1++;
847 v++;
848 }
849 }
850 count2 = 0;
851 v = add;
852 while (*v) {
853 count2++;
854 v++;
855 }
856 v = xrealloc(strings, (count1 + count2 + 1) * sizeof(char*));
857 v[count1 + count2] = NULL;
858 i = count2;
859 while (--i >= 0)
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +0000860 v[count1 + i] = (need_to_dup ? xstrdup(add[i]) : add[i]);
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000861 return v;
862}
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000863#if LEAK_HUNTING
Denis Vlasenkocc90f442009-04-08 16:40:34 +0000864static char **xx_add_strings_to_strings(int lineno, char **strings, char **add, int need_to_dup)
865{
866 char **ptr = add_strings_to_strings(strings, add, need_to_dup);
867 fdprintf(2, "line %d: add_strings_to_strings %p\n", lineno, ptr);
868 return ptr;
869}
870#define add_strings_to_strings(strings, add, need_to_dup) \
871 xx_add_strings_to_strings(__LINE__, strings, add, need_to_dup)
872#endif
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000873
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000874static char **add_string_to_strings(char **strings, char *add)
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000875{
876 char *v[2];
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000877 v[0] = add;
878 v[1] = NULL;
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +0000879 return add_strings_to_strings(strings, v, /*dup:*/ 0);
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000880}
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +0000881#if LEAK_HUNTING
Denis Vlasenkocc90f442009-04-08 16:40:34 +0000882static char **xx_add_string_to_strings(int lineno, char **strings, char *add)
883{
884 char **ptr = add_string_to_strings(strings, add);
885 fdprintf(2, "line %d: add_string_to_strings %p\n", lineno, ptr);
886 return ptr;
887}
888#define add_string_to_strings(strings, add) \
889 xx_add_string_to_strings(__LINE__, strings, add)
890#endif
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000891
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000892static void putenv_all(char **strings)
893{
894 if (!strings)
895 return;
Denis Vlasenkof886fd22008-10-13 12:36:05 +0000896 while (*strings) {
897 debug_printf_env("putenv '%s'\n", *strings);
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000898 putenv(*strings++);
Denis Vlasenkof886fd22008-10-13 12:36:05 +0000899 }
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000900}
901
902static char **putenv_all_and_save_old(char **strings)
903{
904 char **old = NULL;
905 char **s = strings;
906
907 if (!strings)
908 return old;
909 while (*strings) {
Denis Vlasenkof886fd22008-10-13 12:36:05 +0000910 char *v, *eq;
911
912 eq = strchr(*strings, '=');
913 if (eq) {
914 *eq = '\0';
915 v = getenv(*strings);
916 *eq = '=';
917 if (v) {
918 /* v points to VAL in VAR=VAL, go back to VAR */
919 v -= (eq - *strings) + 1;
920 old = add_string_to_strings(old, v);
921 }
922 }
923 strings++;
Denis Vlasenko22d10a02008-10-13 08:53:43 +0000924 }
925 putenv_all(s);
926 return old;
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000927}
928
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000929static void free_strings_and_unsetenv(char **strings, int unset)
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000930{
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000931 char **v;
932
933 if (!strings)
934 return;
935
936 v = strings;
937 while (*v) {
938 if (unset) {
Denis Vlasenko76ddc2e2008-12-30 05:05:31 +0000939 debug_printf_env("unsetenv '%s'\n", *v);
940 bb_unsetenv(*v);
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000941 }
942 free(*v++);
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000943 }
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000944 free(strings);
Denis Vlasenkod65ea392007-10-01 10:02:25 +0000945}
946
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000947static void free_strings(char **strings)
Denis Vlasenko76d50412008-06-10 16:19:39 +0000948{
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +0000949 free_strings_and_unsetenv(strings, 0);
Denis Vlasenko76d50412008-06-10 16:19:39 +0000950}
Denis Vlasenko76d50412008-06-10 16:19:39 +0000951
952
Denis Vlasenko270b1c32009-04-17 18:54:50 +0000953/* Helpers for setting new $n and restoring them back
954 */
955typedef struct save_arg_t {
956 char *sv_argv0;
957 char **sv_g_argv;
958 int sv_g_argc;
959 smallint sv_g_malloced;
960} save_arg_t;
961
962static void save_and_replace_G_args(save_arg_t *sv, char **argv)
963{
964 int n;
965
966 sv->sv_argv0 = argv[0];
967 sv->sv_g_argv = G.global_argv;
968 sv->sv_g_argc = G.global_argc;
969 sv->sv_g_malloced = G.global_args_malloced;
970
971 argv[0] = G.global_argv[0]; /* retain $0 */
972 G.global_argv = argv;
973 G.global_args_malloced = 0;
974
975 n = 1;
976 while (*++argv)
977 n++;
978 G.global_argc = n;
979}
980
981static void restore_G_args(save_arg_t *sv, char **argv)
982{
983 char **pp;
984
985 if (G.global_args_malloced) {
986 /* someone ran "set -- arg1 arg2 ...", undo */
987 pp = G.global_argv;
988 while (*++pp) /* note: does not free $0 */
989 free(*pp);
990 free(G.global_argv);
991 }
992 argv[0] = sv->sv_argv0;
993 G.global_argv = sv->sv_g_argv;
994 G.global_argc = sv->sv_g_argc;
995 G.global_args_malloced = sv->sv_g_malloced;
996}
997
998
Denis Vlasenkod5762932009-03-31 11:22:57 +0000999/* Basic theory of signal handling in shell
1000 * ========================================
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001001 * This does not describe what hush does, rather, it is current understanding
1002 * what it _should_ do. If it doesn't, it's a bug.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001003 * http://www.opengroup.org/onlinepubs/9699919799/utilities/V3_chap02.html#trap
1004 *
1005 * Signals are handled only after each pipe ("cmd | cmd | cmd" thing)
1006 * is finished or backgrounded. It is the same in interactive and
1007 * non-interactive shells, and is the same regardless of whether
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001008 * a user trap handler is installed or a shell special one is in effect.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001009 * ^C or ^Z from keyboard seem to execute "at once" because it usually
1010 * backgrounds (i.e. stops) or kills all members of currently running
1011 * pipe.
1012 *
1013 * Wait builtin in interruptible by signals for which user trap is set
1014 * or by SIGINT in interactive shell.
1015 *
1016 * Trap handlers will execute even within trap handlers. (right?)
1017 *
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00001018 * User trap handlers are forgotten when subshell ("(cmd)") is entered.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001019 *
1020 * If job control is off, backgrounded commands ("cmd &")
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001021 * have SIGINT, SIGQUIT set to SIG_IGN.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001022 *
1023 * Commands run in command substitution ("`cmd`")
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001024 * have SIGTTIN, SIGTTOU, SIGTSTP set to SIG_IGN.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001025 *
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001026 * Ordinary commands have signals set to SIG_IGN/DFL set as inherited
1027 * by the shell from its parent.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001028 *
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001029 * Siganls which differ from SIG_DFL action
1030 * (note: child (i.e., [v]forked) shell is not an interactive shell):
Denis Vlasenkod5762932009-03-31 11:22:57 +00001031 *
1032 * SIGQUIT: ignore
1033 * SIGTERM (interactive): ignore
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001034 * SIGHUP (interactive):
1035 * send SIGCONT to stopped jobs, send SIGHUP to all jobs and exit
Denis Vlasenkod5762932009-03-31 11:22:57 +00001036 * SIGTTIN, SIGTTOU, SIGTSTP (if job control is on): ignore
Denis Vlasenkoc4ada792009-04-15 23:29:00 +00001037 * Note that ^Z is handled not by trapping SIGTSTP, but by seeing
1038 * that all pipe members are stopped. Try this in bash:
1039 * while :; do :; done - ^Z does not background it
1040 * (while :; do :; done) - ^Z backgrounds it
Denis Vlasenkod5762932009-03-31 11:22:57 +00001041 * SIGINT (interactive): wait for last pipe, ignore the rest
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001042 * of the command line, show prompt. NB: ^C does not send SIGINT
1043 * to interactive shell while shell is waiting for a pipe,
1044 * since shell is bg'ed (is not in foreground process group).
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001045 * Example 1: this waits 5 sec, but does not execute ls:
1046 * "echo $$; sleep 5; ls -l" + "kill -INT <pid>"
1047 * Example 2: this does not wait and does not execute ls:
1048 * "echo $$; sleep 5 & wait; ls -l" + "kill -INT <pid>"
1049 * Example 3: this does not wait 5 sec, but executes ls:
1050 * "sleep 5; ls -l" + press ^C
Denis Vlasenkod5762932009-03-31 11:22:57 +00001051 *
1052 * (What happens to signals which are IGN on shell start?)
1053 * (What happens with signal mask on shell start?)
1054 *
1055 * Implementation in hush
1056 * ======================
1057 * We use in-kernel pending signal mask to determine which signals were sent.
1058 * We block all signals which we don't want to take action immediately,
1059 * i.e. we block all signals which need to have special handling as described
1060 * above, and all signals which have traps set.
1061 * After each pipe execution, we extract any pending signals via sigtimedwait()
1062 * and act on them.
1063 *
1064 * unsigned non_DFL_mask: a mask of such "special" signals
1065 * sigset_t blocked_set: current blocked signal set
1066 *
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001067 * "trap - SIGxxx":
Denis Vlasenko552433b2009-04-04 19:29:21 +00001068 * clear bit in blocked_set unless it is also in non_DFL_mask
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001069 * "trap 'cmd' SIGxxx":
1070 * set bit in blocked_set (even if 'cmd' is '')
Denis Vlasenkod5762932009-03-31 11:22:57 +00001071 * after [v]fork, if we plan to be a shell:
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00001072 * unblock signals with special interactive handling
1073 * (child shell is not interactive),
1074 * unset all traps (note: regardless of child shell's type - {}, (), etc)
Denis Vlasenkod5762932009-03-31 11:22:57 +00001075 * after [v]fork, if we plan to exec:
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001076 * POSIX says pending signal mask is cleared in child - no need to clear it.
1077 * Restore blocked signal set to one inherited by shell just prior to exec.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001078 *
Denis Vlasenko7566bae2009-03-31 17:24:49 +00001079 * Note: as a result, we do not use signal handlers much. The only uses
1080 * are to count SIGCHLDs [disabled - bug somewhere, + bloat]
1081 * and to restore tty pgrp on signal-induced exit.
Denis Vlasenkod5762932009-03-31 11:22:57 +00001082 */
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00001083enum {
1084 SPECIAL_INTERACTIVE_SIGS = 0
1085#if ENABLE_HUSH_JOB
1086 | (1 << SIGTTIN) | (1 << SIGTTOU) | (1 << SIGTSTP)
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00001087 | (1 << SIGHUP)
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00001088#endif
1089 | (1 << SIGTERM)
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00001090 | (1 << SIGINT)
1091};
Denis Vlasenkod5762932009-03-31 11:22:57 +00001092
Denis Vlasenko7566bae2009-03-31 17:24:49 +00001093//static void SIGCHLD_handler(int sig UNUSED_PARAM)
1094//{
1095// G.count_SIGCHLD++;
1096//}
1097
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00001098#if ENABLE_HUSH_JOB
Denis Vlasenko25af86f2009-04-07 13:29:27 +00001099
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00001100/* After [v]fork, in child: do not restore tty pgrp on xfunc death */
1101#define disable_restore_tty_pgrp_on_exit() (die_sleep = 0)
Denis Vlasenko25af86f2009-04-07 13:29:27 +00001102/* After [v]fork, in parent: restore tty pgrp on xfunc death */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00001103#define enable_restore_tty_pgrp_on_exit() (die_sleep = -1)
1104
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001105/* Restores tty foreground process group, and exits.
1106 * May be called as signal handler for fatal signal
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00001107 * (will resend signal to itself, producing correct exit state)
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001108 * or called directly with -EXITCODE.
1109 * We also call it if xfunc is exiting. */
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +00001110static void sigexit(int sig) NORETURN;
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001111static void sigexit(int sig)
1112{
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001113 /* Disable all signals: job control, SIGPIPE, etc. */
Denis Vlasenko3f165fa2008-03-17 08:29:08 +00001114 sigprocmask_allsigs(SIG_BLOCK);
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001115
Denis Vlasenkoabedaac2009-03-31 12:03:40 +00001116 /* Careful: we can end up here after [v]fork. Do not restore
Denis Vlasenko7b830e72009-03-31 13:05:32 +00001117 * tty pgrp then, only top-level shell process does that */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00001118 if (G_interactive_fd && getpid() == G.root_pid)
1119 tcsetpgrp(G_interactive_fd, G.saved_tty_pgrp);
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001120
1121 /* Not a signal, just exit */
1122 if (sig <= 0)
1123 _exit(- sig);
1124
Denis Vlasenko400d8bb2008-02-24 13:36:01 +00001125 kill_myself_with_sig(sig); /* does not return */
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00001126}
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00001127#else
1128
1129#define disable_restore_tty_pgrp_on_exit() ((void)0)
1130#define enable_restore_tty_pgrp_on_exit() ((void)0)
1131
Denis Vlasenkoe0755e52009-04-03 21:16:45 +00001132#endif
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00001133
Mike Frysinger9f8128f2009-03-29 23:49:37 +00001134/* Restores tty foreground process group, and exits. */
1135static void hush_exit(int exitcode) NORETURN;
1136static void hush_exit(int exitcode)
1137{
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00001138 if (G.exiting <= 0 && G.traps && G.traps[0] && G.traps[0][0]) {
1139 /* Prevent recursion:
1140 * trap "echo Hi; exit" EXIT; exit
1141 */
1142 char *argv[] = { NULL, G.traps[0], NULL };
1143 G.traps[0] = NULL;
1144 G.exiting = 1;
Denis Vlasenkod5762932009-03-31 11:22:57 +00001145 builtin_eval(argv);
1146 free(argv[1]);
1147 }
Mike Frysinger9f8128f2009-03-29 23:49:37 +00001148
Denis Vlasenkoabedaac2009-03-31 12:03:40 +00001149#if ENABLE_HUSH_JOB
1150 fflush(NULL); /* flush all streams */
1151 sigexit(- (exitcode & 0xff));
1152#else
1153 exit(exitcode);
1154#endif
Mike Frysinger9f8128f2009-03-29 23:49:37 +00001155}
1156
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00001157static int check_and_run_traps(int sig)
1158{
1159 static const struct timespec zero_timespec = { 0, 0 };
1160 smalluint save_rcode;
1161 int last_sig = 0;
1162
1163 if (sig)
1164 goto jump_in;
1165 while (1) {
1166 sig = sigtimedwait(&G.blocked_set, NULL, &zero_timespec);
1167 if (sig <= 0)
1168 break;
1169 jump_in:
1170 last_sig = sig;
1171 if (G.traps && G.traps[sig]) {
1172 if (G.traps[sig][0]) {
1173 /* We have user-defined handler */
1174 char *argv[] = { NULL, xstrdup(G.traps[sig]), NULL };
1175 save_rcode = G.last_exitcode;
1176 builtin_eval(argv);
1177 free(argv[1]);
1178 G.last_exitcode = save_rcode;
1179 } /* else: "" trap, ignoring signal */
1180 continue;
1181 }
1182 /* not a trap: special action */
1183 switch (sig) {
1184// case SIGCHLD:
1185// G.count_SIGCHLD++;
1186// break;
1187 case SIGINT:
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00001188 /* Builtin was ^C'ed, make it look prettier: */
1189 bb_putchar('\n');
1190 G.flag_SIGINT = 1;
1191 break;
1192#if ENABLE_HUSH_JOB
1193 case SIGHUP: {
1194 struct pipe *job;
1195 /* bash is observed to signal whole process groups,
1196 * not individual processes */
1197 for (job = G.job_list; job; job = job->next) {
1198 if (job->pgrp <= 0)
1199 continue;
1200 debug_printf_exec("HUPing pgrp %d\n", job->pgrp);
1201 if (kill(- job->pgrp, SIGHUP) == 0)
1202 kill(- job->pgrp, SIGCONT);
1203 }
1204 sigexit(SIGHUP);
1205 }
1206#endif
1207 default: /* ignored: */
1208 /* SIGTERM, SIGQUIT, SIGTTIN, SIGTTOU, SIGTSTP */
1209 break;
1210 }
1211 }
1212 return last_sig;
1213}
1214
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00001215
Eric Andersen9ffb7dd2001-05-19 03:00:46 +00001216static const char *set_cwd(void)
1217{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001218 /* xrealloc_getcwd_or_warn(arg) calls free(arg),
1219 * we must not try to free(bb_msg_unknown) */
Denis Vlasenko87a86552008-07-29 19:43:10 +00001220 if (G.cwd == bb_msg_unknown)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001221 G.cwd = NULL;
Denis Vlasenko87a86552008-07-29 19:43:10 +00001222 G.cwd = xrealloc_getcwd_or_warn((char *)G.cwd);
1223 if (!G.cwd)
1224 G.cwd = bb_msg_unknown;
1225 return G.cwd;
Eric Andersen9ffb7dd2001-05-19 03:00:46 +00001226}
1227
Denis Vlasenko83506862007-11-23 13:11:42 +00001228
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001229/* Get/check local shell variables */
1230static struct variable *get_local_var(const char *name)
1231{
1232 struct variable *cur;
1233 int len;
1234
1235 if (!name)
1236 return NULL;
1237 len = strlen(name);
1238 for (cur = G.top_var; cur; cur = cur->next) {
1239 if (strncmp(cur->varstr, name, len) == 0 && cur->varstr[len] == '=')
1240 return cur;
1241 }
1242 return NULL;
1243}
1244
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00001245static const char *get_local_var_value(const char *src)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001246{
1247 struct variable *var = get_local_var(src);
1248 if (var)
1249 return strchr(var->varstr, '=') + 1;
1250 return NULL;
1251}
1252
1253/* str holds "NAME=VAL" and is expected to be malloced.
Mike Frysinger6379bb42009-03-28 18:55:03 +00001254 * We take ownership of it.
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001255 * flg_export:
Mike Frysinger6379bb42009-03-28 18:55:03 +00001256 * 0: do not export
1257 * 1: export
1258 * -1: if NAME is set, leave export status alone
1259 * if NAME is not set, do not export
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001260 * flg_read_only is set only when we handle -R var=val
Mike Frysinger6379bb42009-03-28 18:55:03 +00001261 */
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001262#if BB_MMU
1263#define set_local_var(str, flg_export, flg_read_only) \
1264 set_local_var(str, flg_export)
1265#endif
1266static int set_local_var(char *str, int flg_export, int flg_read_only)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001267{
1268 struct variable *cur;
1269 char *value;
1270 int name_len;
1271
1272 value = strchr(str, '=');
1273 if (!value) { /* not expected to ever happen? */
1274 free(str);
1275 return -1;
1276 }
1277
1278 name_len = value - str + 1; /* including '=' */
1279 cur = G.top_var; /* cannot be NULL (we have HUSH_VERSION and it's RO) */
1280 while (1) {
1281 if (strncmp(cur->varstr, str, name_len) != 0) {
1282 if (!cur->next) {
1283 /* Bail out. Note that now cur points
1284 * to last var in linked list */
1285 break;
1286 }
1287 cur = cur->next;
1288 continue;
1289 }
1290 /* We found an existing var with this name */
1291 *value = '\0';
1292 if (cur->flg_read_only) {
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001293#if !BB_MMU
1294 if (!flg_read_only)
1295#endif
1296 bb_error_msg("%s: readonly variable", str);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001297 free(str);
1298 return -1;
1299 }
1300 debug_printf_env("%s: unsetenv '%s'\n", __func__, str);
1301 unsetenv(str); /* just in case */
1302 *value = '=';
1303 if (strcmp(cur->varstr, str) == 0) {
1304 free_and_exp:
1305 free(str);
1306 goto exp;
1307 }
1308 if (cur->max_len >= strlen(str)) {
1309 /* This one is from startup env, reuse space */
1310 strcpy(cur->varstr, str);
1311 goto free_and_exp;
1312 }
1313 /* max_len == 0 signifies "malloced" var, which we can
1314 * (and has to) free */
1315 if (!cur->max_len)
1316 free(cur->varstr);
1317 cur->max_len = 0;
1318 goto set_str_and_exp;
1319 }
1320
1321 /* Not found - create next variable struct */
1322 cur->next = xzalloc(sizeof(*cur));
1323 cur = cur->next;
1324
1325 set_str_and_exp:
1326 cur->varstr = str;
Denis Vlasenkocc4c6932009-04-05 07:38:48 +00001327#if !BB_MMU
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001328 cur->flg_read_only = flg_read_only;
Denis Vlasenkocc4c6932009-04-05 07:38:48 +00001329#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001330 exp:
Mike Frysinger6379bb42009-03-28 18:55:03 +00001331 if (flg_export == 1)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001332 cur->flg_export = 1;
1333 if (cur->flg_export) {
1334 debug_printf_env("%s: putenv '%s'\n", __func__, cur->varstr);
1335 return putenv(cur->varstr);
1336 }
1337 return 0;
1338}
1339
Mike Frysingerd690f682009-03-30 06:50:54 +00001340static int unset_local_var(const char *name)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001341{
1342 struct variable *cur;
1343 struct variable *prev = prev; /* for gcc */
1344 int name_len;
1345
1346 if (!name)
Mike Frysingerd690f682009-03-30 06:50:54 +00001347 return EXIT_SUCCESS;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001348 name_len = strlen(name);
1349 cur = G.top_var;
1350 while (cur) {
1351 if (strncmp(cur->varstr, name, name_len) == 0 && cur->varstr[name_len] == '=') {
1352 if (cur->flg_read_only) {
1353 bb_error_msg("%s: readonly variable", name);
Mike Frysingerd690f682009-03-30 06:50:54 +00001354 return EXIT_FAILURE;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001355 }
1356 /* prev is ok to use here because 1st variable, HUSH_VERSION,
1357 * is ro, and we cannot reach this code on the 1st pass */
1358 prev->next = cur->next;
1359 debug_printf_env("%s: unsetenv '%s'\n", __func__, cur->varstr);
1360 bb_unsetenv(cur->varstr);
1361 if (!cur->max_len)
1362 free(cur->varstr);
1363 free(cur);
Mike Frysingerd690f682009-03-30 06:50:54 +00001364 return EXIT_SUCCESS;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001365 }
1366 prev = cur;
1367 cur = cur->next;
1368 }
Mike Frysingerd690f682009-03-30 06:50:54 +00001369 return EXIT_SUCCESS;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001370}
1371
Mike Frysinger98c52642009-04-02 10:02:37 +00001372#if ENABLE_SH_MATH_SUPPORT
1373#define is_name(c) ((c) == '_' || isalpha((unsigned char)(c)))
1374#define is_in_name(c) ((c) == '_' || isalnum((unsigned char)(c)))
1375static char *endofname(const char *name)
1376{
1377 char *p;
1378
1379 p = (char *) name;
1380 if (!is_name(*p))
1381 return p;
1382 while (*++p) {
1383 if (!is_in_name(*p))
1384 break;
1385 }
1386 return p;
1387}
1388
1389static void arith_set_local_var(const char *name, const char *val, int flags)
1390{
1391 /* arith code doesnt malloc space, so do it for it */
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00001392 char *var = xasprintf("%s=%s", name, val);
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00001393 set_local_var(var, flags, 0);
Mike Frysinger98c52642009-04-02 10:02:37 +00001394}
1395#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001396
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00001397
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001398/*
1399 * in_str support
1400 */
1401static int static_get(struct in_str *i)
1402{
1403 int ch = *i->p++;
Denis Vlasenkob6e65562009-04-03 16:49:04 +00001404 if (ch != '\0')
1405 return ch;
1406 i->p--;
1407 return EOF;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001408}
1409
1410static int static_peek(struct in_str *i)
1411{
1412 return *i->p;
1413}
1414
1415#if ENABLE_HUSH_INTERACTIVE
1416
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001417static void cmdedit_set_initial_prompt(void)
1418{
Mike Frysingerec2c6552009-03-28 12:24:44 +00001419 if (ENABLE_FEATURE_EDITING_FANCY_PROMPT) {
1420 G.PS1 = getenv("PS1");
1421 if (G.PS1 == NULL)
1422 G.PS1 = "\\w \\$ ";
1423 } else
1424 G.PS1 = NULL;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001425}
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001426
1427static const char* setup_prompt_string(int promptmode)
1428{
1429 const char *prompt_str;
1430 debug_printf("setup_prompt_string %d ", promptmode);
Mike Frysingerec2c6552009-03-28 12:24:44 +00001431 if (!ENABLE_FEATURE_EDITING_FANCY_PROMPT) {
1432 /* Set up the prompt */
1433 if (promptmode == 0) { /* PS1 */
1434 free((char*)G.PS1);
1435 G.PS1 = xasprintf("%s %c ", G.cwd, (geteuid() != 0) ? '$' : '#');
1436 prompt_str = G.PS1;
1437 } else
1438 prompt_str = G.PS2;
1439 } else
1440 prompt_str = (promptmode == 0) ? G.PS1 : G.PS2;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001441 debug_printf("result '%s'\n", prompt_str);
1442 return prompt_str;
1443}
1444
1445static void get_user_input(struct in_str *i)
1446{
1447 int r;
1448 const char *prompt_str;
1449
1450 prompt_str = setup_prompt_string(i->promptmode);
1451#if ENABLE_FEATURE_EDITING
1452 /* Enable command line editing only while a command line
1453 * is actually being read */
1454 do {
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00001455 G.flag_SIGINT = 0;
1456 /* buglet: SIGINT will not make new prompt to appear _at once_,
1457 * only after <Enter>. (^C will work) */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001458 r = read_line_input(prompt_str, G.user_input_buf, BUFSIZ-1, G.line_input_state);
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00001459 /* catch *SIGINT* etc (^C is handled by read_line_input) */
Denis Vlasenko7566bae2009-03-31 17:24:49 +00001460 check_and_run_traps(0);
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00001461 } while (r == 0 || G.flag_SIGINT); /* repeat if ^C or SIGINT */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001462 i->eof_flag = (r < 0);
1463 if (i->eof_flag) { /* EOF/error detected */
1464 G.user_input_buf[0] = EOF; /* yes, it will be truncated, it's ok */
1465 G.user_input_buf[1] = '\0';
1466 }
1467#else
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00001468 do {
1469 G.flag_SIGINT = 0;
1470 fputs(prompt_str, stdout);
1471 fflush(stdout);
1472 G.user_input_buf[0] = r = fgetc(i->file);
1473 /*G.user_input_buf[1] = '\0'; - already is and never changed */
Denis Vlasenko7566bae2009-03-31 17:24:49 +00001474//do we need check_and_run_traps(0)? (maybe only if stdin)
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00001475 } while (G.flag_SIGINT);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001476 i->eof_flag = (r == EOF);
1477#endif
1478 i->p = G.user_input_buf;
1479}
1480
1481#endif /* INTERACTIVE */
1482
1483/* This is the magic location that prints prompts
1484 * and gets data back from the user */
1485static int file_get(struct in_str *i)
1486{
1487 int ch;
1488
1489 /* If there is data waiting, eat it up */
1490 if (i->p && *i->p) {
1491#if ENABLE_HUSH_INTERACTIVE
1492 take_cached:
1493#endif
1494 ch = *i->p++;
1495 if (i->eof_flag && !*i->p)
1496 ch = EOF;
Denis Vlasenko913a2012009-04-05 22:17:04 +00001497 /* note: ch is never NUL */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001498 } else {
1499 /* need to double check i->file because we might be doing something
1500 * more complicated by now, like sourcing or substituting. */
1501#if ENABLE_HUSH_INTERACTIVE
Denis Vlasenko60b392f2009-04-03 19:14:32 +00001502 if (G_interactive_fd && i->promptme && i->file == stdin) {
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001503 do {
1504 get_user_input(i);
1505 } while (!*i->p); /* need non-empty line */
1506 i->promptmode = 1; /* PS2 */
1507 i->promptme = 0;
1508 goto take_cached;
1509 }
1510#endif
Denis Vlasenko913a2012009-04-05 22:17:04 +00001511 do ch = fgetc(i->file); while (ch == '\0');
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001512 }
Denis Vlasenko913a2012009-04-05 22:17:04 +00001513 debug_printf("file_get: got '%c' %d\n", ch, ch);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001514#if ENABLE_HUSH_INTERACTIVE
1515 if (ch == '\n')
1516 i->promptme = 1;
1517#endif
1518 return ch;
1519}
1520
Denis Vlasenko913a2012009-04-05 22:17:04 +00001521/* All callers guarantee this routine will never
1522 * be used right after a newline, so prompting is not needed.
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001523 */
1524static int file_peek(struct in_str *i)
1525{
1526 int ch;
1527 if (i->p && *i->p) {
1528 if (i->eof_flag && !i->p[1])
1529 return EOF;
1530 return *i->p;
Denis Vlasenko913a2012009-04-05 22:17:04 +00001531 /* note: ch is never NUL */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001532 }
Denis Vlasenko913a2012009-04-05 22:17:04 +00001533 do ch = fgetc(i->file); while (ch == '\0');
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001534 i->eof_flag = (ch == EOF);
1535 i->peek_buf[0] = ch;
1536 i->peek_buf[1] = '\0';
1537 i->p = i->peek_buf;
Denis Vlasenko913a2012009-04-05 22:17:04 +00001538 debug_printf("file_peek: got '%c' %d\n", ch, ch);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001539 return ch;
1540}
1541
1542static void setup_file_in_str(struct in_str *i, FILE *f)
1543{
1544 i->peek = file_peek;
1545 i->get = file_get;
1546#if ENABLE_HUSH_INTERACTIVE
1547 i->promptme = 1;
1548 i->promptmode = 0; /* PS1 */
1549#endif
1550 i->file = f;
1551 i->p = NULL;
1552}
1553
1554static void setup_string_in_str(struct in_str *i, const char *s)
1555{
1556 i->peek = static_peek;
1557 i->get = static_get;
1558#if ENABLE_HUSH_INTERACTIVE
1559 i->promptme = 1;
1560 i->promptmode = 0; /* PS1 */
1561#endif
1562 i->p = s;
1563 i->eof_flag = 0;
1564}
1565
1566
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001567/*
1568 * o_string support
1569 */
1570#define B_CHUNK (32 * sizeof(char*))
Eric Andersen25f27032001-04-26 23:22:31 +00001571
Denis Vlasenko0b677d82009-04-10 13:49:10 +00001572static void o_reset_to_empty_unquoted(o_string *o)
Eric Andersen25f27032001-04-26 23:22:31 +00001573{
1574 o->length = 0;
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00001575 o->o_quoted = 0;
Denis Vlasenkod65ea392007-10-01 10:02:25 +00001576 if (o->data)
1577 o->data[0] = '\0';
Eric Andersen25f27032001-04-26 23:22:31 +00001578}
1579
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001580static void o_free(o_string *o)
Eric Andersen25f27032001-04-26 23:22:31 +00001581{
Aaron Lehmanna170e1c2002-11-28 11:27:31 +00001582 free(o->data);
Denis Vlasenkod65ea392007-10-01 10:02:25 +00001583 memset(o, 0, sizeof(*o));
Eric Andersen25f27032001-04-26 23:22:31 +00001584}
1585
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001586static ALWAYS_INLINE void o_free_unsafe(o_string *o)
1587{
1588 free(o->data);
1589}
1590
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001591static void o_grow_by(o_string *o, int len)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001592{
1593 if (o->length + len > o->maxlen) {
1594 o->maxlen += (2*len > B_CHUNK ? 2*len : B_CHUNK);
1595 o->data = xrealloc(o->data, 1 + o->maxlen);
1596 }
1597}
1598
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001599static void o_addchr(o_string *o, int ch)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001600{
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001601 debug_printf("o_addchr: '%c' o->length=%d o=%p\n", ch, o->length, o);
1602 o_grow_by(o, 1);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001603 o->data[o->length] = ch;
1604 o->length++;
1605 o->data[o->length] = '\0';
1606}
1607
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001608static void o_addblock(o_string *o, const char *str, int len)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001609{
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001610 o_grow_by(o, len);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001611 memcpy(&o->data[o->length], str, len);
1612 o->length += len;
1613 o->data[o->length] = '\0';
1614}
1615
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001616#if !BB_MMU
1617static void o_addstr(o_string *o, const char *str)
Mike Frysinger98c52642009-04-02 10:02:37 +00001618{
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001619 o_addblock(o, str, strlen(str));
1620}
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00001621static void nommu_addchr(o_string *o, int ch)
1622{
1623 if (o)
1624 o_addchr(o, ch);
1625}
1626#else
1627#define nommu_addchr(o, str) ((void)0)
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001628#endif
1629
1630static void o_addstr_with_NUL(o_string *o, const char *str)
1631{
1632 o_addblock(o, str, strlen(str) + 1);
Mike Frysinger98c52642009-04-02 10:02:37 +00001633}
1634
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001635static void o_addblock_duplicate_backslash(o_string *o, const char *str, int len)
Denis Vlasenko55789c62008-06-18 16:30:42 +00001636{
1637 while (len) {
1638 o_addchr(o, *str);
1639 if (*str++ == '\\'
1640 && (*str != '*' && *str != '?' && *str != '[')
1641 ) {
1642 o_addchr(o, '\\');
1643 }
1644 len--;
1645 }
1646}
1647
Eric Andersen25f27032001-04-26 23:22:31 +00001648/* My analysis of quoting semantics tells me that state information
1649 * is associated with a destination, not a source.
1650 */
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001651static void o_addqchr(o_string *o, int ch)
Eric Andersen25f27032001-04-26 23:22:31 +00001652{
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001653 int sz = 1;
Denis Vlasenko371de4a2008-10-14 12:43:13 +00001654 char *found = strchr("*?[\\", ch);
1655 if (found)
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001656 sz++;
Denis Vlasenko371de4a2008-10-14 12:43:13 +00001657 o_grow_by(o, sz);
1658 if (found) {
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001659 o->data[o->length] = '\\';
1660 o->length++;
Eric Andersen25f27032001-04-26 23:22:31 +00001661 }
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001662 o->data[o->length] = ch;
1663 o->length++;
1664 o->data[o->length] = '\0';
Eric Andersen25f27032001-04-26 23:22:31 +00001665}
1666
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001667static void o_addQchr(o_string *o, int ch)
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00001668{
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001669 int sz = 1;
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00001670 if (o->o_escape && strchr("*?[\\", ch)) {
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001671 sz++;
1672 o->data[o->length] = '\\';
1673 o->length++;
1674 }
1675 o_grow_by(o, sz);
1676 o->data[o->length] = ch;
1677 o->length++;
1678 o->data[o->length] = '\0';
1679}
1680
1681static void o_addQstr(o_string *o, const char *str, int len)
1682{
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00001683 if (!o->o_escape) {
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001684 o_addblock(o, str, len);
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00001685 return;
1686 }
1687 while (len) {
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001688 char ch;
1689 int sz;
1690 int ordinary_cnt = strcspn(str, "*?[\\");
1691 if (ordinary_cnt > len) /* paranoia */
1692 ordinary_cnt = len;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001693 o_addblock(o, str, ordinary_cnt);
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001694 if (ordinary_cnt == len)
1695 return;
1696 str += ordinary_cnt;
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001697 len -= ordinary_cnt + 1; /* we are processing + 1 char below */
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001698
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00001699 ch = *str++;
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001700 sz = 1;
1701 if (ch) { /* it is necessarily one of "*?[\\" */
1702 sz++;
1703 o->data[o->length] = '\\';
1704 o->length++;
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00001705 }
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00001706 o_grow_by(o, sz);
1707 o->data[o->length] = ch;
1708 o->length++;
1709 o->data[o->length] = '\0';
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00001710 }
1711}
1712
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001713/* A special kind of o_string for $VAR and `cmd` expansion.
1714 * It contains char* list[] at the beginning, which is grown in 16 element
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00001715 * increments. Actual string data starts at the next multiple of 16 * (char*).
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001716 * list[i] contains an INDEX (int!) into this string data.
1717 * It means that if list[] needs to grow, data needs to be moved higher up
1718 * but list[i]'s need not be modified.
1719 * NB: remembering how many list[i]'s you have there is crucial.
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001720 * o_finalize_list() operation post-processes this structure - calculates
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001721 * and stores actual char* ptrs in list[]. Oh, it NULL terminates it as well.
1722 */
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001723#if DEBUG_EXPAND || DEBUG_GLOB
1724static void debug_print_list(const char *prefix, o_string *o, int n)
1725{
1726 char **list = (char**)o->data;
1727 int string_start = ((n + 0xf) & ~0xf) * sizeof(list[0]);
1728 int i = 0;
Denis Vlasenko0701dca2009-04-11 10:38:47 +00001729
1730 indent();
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001731 fprintf(stderr, "%s: list:%p n:%d string_start:%d length:%d maxlen:%d\n",
1732 prefix, list, n, string_start, o->length, o->maxlen);
1733 while (i < n) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00001734 indent();
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001735 fprintf(stderr, " list[%d]=%d '%s' %p\n", i, (int)list[i],
1736 o->data + (int)list[i] + string_start,
1737 o->data + (int)list[i] + string_start);
1738 i++;
1739 }
1740 if (n) {
1741 const char *p = o->data + (int)list[n - 1] + string_start;
Denis Vlasenko0701dca2009-04-11 10:38:47 +00001742 indent();
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00001743 fprintf(stderr, " total_sz:%ld\n", (long)((p + strlen(p) + 1) - o->data));
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001744 }
1745}
1746#else
1747#define debug_print_list(prefix, o, n) ((void)0)
1748#endif
1749
1750/* n = o_save_ptr_helper(str, n) "starts new string" by storing an index value
1751 * in list[n] so that it points past last stored byte so far.
1752 * It returns n+1. */
1753static int o_save_ptr_helper(o_string *o, int n)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001754{
1755 char **list = (char**)o->data;
Denis Vlasenko895bea22008-06-10 18:06:24 +00001756 int string_start;
1757 int string_len;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001758
1759 if (!o->has_empty_slot) {
Denis Vlasenko895bea22008-06-10 18:06:24 +00001760 string_start = ((n + 0xf) & ~0xf) * sizeof(list[0]);
1761 string_len = o->length - string_start;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001762 if (!(n & 0xf)) { /* 0, 0x10, 0x20...? */
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001763 debug_printf_list("list[%d]=%d string_start=%d (growing)\n", n, string_len, string_start);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001764 /* list[n] points to string_start, make space for 16 more pointers */
1765 o->maxlen += 0x10 * sizeof(list[0]);
1766 o->data = xrealloc(o->data, o->maxlen + 1);
Denis Vlasenko7049ff82008-06-25 09:53:17 +00001767 list = (char**)o->data;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001768 memmove(list + n + 0x10, list + n, string_len);
1769 o->length += 0x10 * sizeof(list[0]);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00001770 } else {
1771 debug_printf_list("list[%d]=%d string_start=%d\n",
1772 n, string_len, string_start);
1773 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001774 } else {
1775 /* We have empty slot at list[n], reuse without growth */
Denis Vlasenko895bea22008-06-10 18:06:24 +00001776 string_start = ((n+1 + 0xf) & ~0xf) * sizeof(list[0]); /* NB: n+1! */
1777 string_len = o->length - string_start;
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00001778 debug_printf_list("list[%d]=%d string_start=%d (empty slot)\n",
1779 n, string_len, string_start);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001780 o->has_empty_slot = 0;
1781 }
Denis Vlasenkocc3f20b2008-06-23 22:31:52 +00001782 list[n] = (char*)(ptrdiff_t)string_len;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001783 return n + 1;
1784}
1785
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001786/* "What was our last o_save_ptr'ed position (byte offset relative o->data)?" */
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001787static int o_get_last_ptr(o_string *o, int n)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001788{
1789 char **list = (char**)o->data;
1790 int string_start = ((n + 0xf) & ~0xf) * sizeof(list[0]);
1791
Denis Vlasenkocc3f20b2008-06-23 22:31:52 +00001792 return ((int)(ptrdiff_t)list[n-1]) + string_start;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001793}
1794
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00001795/* o_glob performs globbing on last list[], saving each result
Denis Vlasenko55789c62008-06-18 16:30:42 +00001796 * as a new list[]. */
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001797static int o_glob(o_string *o, int n)
1798{
1799 glob_t globdata;
1800 int gr;
1801 char *pattern;
1802
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001803 debug_printf_glob("start o_glob: n:%d o->data:%p\n", n, o->data);
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001804 if (!o->data)
1805 return o_save_ptr_helper(o, n);
1806 pattern = o->data + o_get_last_ptr(o, n);
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001807 debug_printf_glob("glob pattern '%s'\n", pattern);
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001808 if (!glob_needed(pattern)) {
1809 literal:
1810 o->length = unbackslash(pattern) - o->data;
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001811 debug_printf_glob("glob pattern '%s' is literal\n", pattern);
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001812 return o_save_ptr_helper(o, n);
1813 }
1814
1815 memset(&globdata, 0, sizeof(globdata));
1816 gr = glob(pattern, 0, NULL, &globdata);
1817 debug_printf_glob("glob('%s'):%d\n", pattern, gr);
1818 if (gr == GLOB_NOSPACE)
1819 bb_error_msg_and_die("out of memory during glob");
1820 if (gr == GLOB_NOMATCH) {
1821 globfree(&globdata);
1822 goto literal;
1823 }
1824 if (gr != 0) { /* GLOB_ABORTED ? */
1825//TODO: testcase for bad glob pattern behavior
1826 bb_error_msg("glob(3) error %d on '%s'", gr, pattern);
1827 }
1828 if (globdata.gl_pathv && globdata.gl_pathv[0]) {
1829 char **argv = globdata.gl_pathv;
1830 o->length = pattern - o->data; /* "forget" pattern */
1831 while (1) {
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001832 o_addstr_with_NUL(o, *argv);
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001833 n = o_save_ptr_helper(o, n);
1834 argv++;
1835 if (!*argv)
1836 break;
1837 }
1838 }
1839 globfree(&globdata);
1840 if (DEBUG_GLOB)
1841 debug_print_list("o_glob returning", o, n);
1842 return n;
1843}
1844
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00001845/* If o->o_glob == 1, glob the string so far remembered.
1846 * Otherwise, just finish current list[] and start new */
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001847static int o_save_ptr(o_string *o, int n)
1848{
Denis Vlasenkoa8b6dff2009-03-20 12:05:14 +00001849 if (o->o_glob) { /* if globbing is requested */
1850 /* If o->has_empty_slot, list[n] was already globbed
1851 * (if it was requested back then when it was filled)
1852 * so don't do that again! */
1853 if (!o->has_empty_slot)
1854 return o_glob(o, n); /* o_save_ptr_helper is inside */
1855 }
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001856 return o_save_ptr_helper(o, n);
1857}
1858
1859/* "Please convert list[n] to real char* ptrs, and NULL terminate it." */
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00001860static char **o_finalize_list(o_string *o, int n)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001861{
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001862 char **list;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001863 int string_start;
1864
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001865 n = o_save_ptr(o, n); /* force growth for list[n] if necessary */
1866 if (DEBUG_EXPAND)
1867 debug_print_list("finalized", o, n);
Denis Vlasenko30c9cc52008-06-17 07:24:29 +00001868 debug_printf_expand("finalized n:%d\n", n);
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00001869 list = (char**)o->data;
1870 string_start = ((n + 0xf) & ~0xf) * sizeof(list[0]);
1871 list[--n] = NULL;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001872 while (n) {
1873 n--;
Denis Vlasenkocc3f20b2008-06-23 22:31:52 +00001874 list[n] = o->data + (int)(ptrdiff_t)list[n] + string_start;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001875 }
1876 return list;
1877}
1878
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00001879
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00001880/* Expansion can recurse */
1881#if ENABLE_HUSH_TICK
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00001882static int process_command_subs(o_string *dest, const char *s);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00001883#endif
1884static char *expand_string_to_string(const char *str);
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001885#if BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00001886#define parse_stream_dquoted(as_string, dest, input, dquote_end) \
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001887 parse_stream_dquoted(dest, input, dquote_end)
1888#endif
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00001889static int parse_stream_dquoted(o_string *as_string,
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001890 o_string *dest,
1891 struct in_str *input,
1892 int dquote_end);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00001893
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001894/* expand_strvec_to_strvec() takes a list of strings, expands
1895 * all variable references within and returns a pointer to
1896 * a list of expanded strings, possibly with larger number
1897 * of strings. (Think VAR="a b"; echo $VAR).
1898 * This new list is allocated as a single malloc block.
1899 * NULL-terminated list of char* pointers is at the beginning of it,
1900 * followed by strings themself.
1901 * Caller can deallocate entire list by single free(list). */
Eric Andersen25f27032001-04-26 23:22:31 +00001902
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001903/* Store given string, finalizing the word and starting new one whenever
1904 * we encounter IFS char(s). This is used for expanding variable values.
1905 * End-of-string does NOT finalize word: think about 'echo -$VAR-' */
1906static int expand_on_ifs(o_string *output, int n, const char *str)
Eric Andersen25f27032001-04-26 23:22:31 +00001907{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001908 while (1) {
1909 int word_len = strcspn(str, G.ifs);
1910 if (word_len) {
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00001911 if (output->o_escape || !output->o_glob)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001912 o_addQstr(output, str, word_len);
1913 else /* protect backslashes against globbing up :) */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001914 o_addblock_duplicate_backslash(output, str, word_len);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001915 str += word_len;
1916 }
1917 if (!*str) /* EOL - do not finalize word */
1918 break;
1919 o_addchr(output, '\0');
1920 debug_print_list("expand_on_ifs", output, n);
1921 n = o_save_ptr(output, n);
1922 str += strspn(str, G.ifs); /* skip ifs chars */
Eric Andersen25f27032001-04-26 23:22:31 +00001923 }
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001924 debug_print_list("expand_on_ifs[1]", output, n);
1925 return n;
Eric Andersen25f27032001-04-26 23:22:31 +00001926}
1927
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00001928/* Helper to expand $((...)) and heredoc body. These act as if
1929 * they are in double quotes, with the exception that they are not :).
1930 * Just the rules are similar: "expand only $var and `cmd`"
1931 *
1932 * Returns malloced string.
1933 * As an optimization, we return NULL if expansion is not needed.
1934 */
1935static char *expand_pseudo_dquoted(const char *str)
1936{
1937 char *exp_str;
1938 struct in_str input;
1939 o_string dest = NULL_O_STRING;
1940
1941 if (strchr(str, '$') == NULL
1942#if ENABLE_HUSH_TICK
1943 && strchr(str, '`') == NULL
1944#endif
1945 ) {
1946 return NULL;
1947 }
1948
1949 /* We need to expand. Example:
1950 * echo $(($a + `echo 1`)) $((1 + $((2)) ))
1951 */
1952 setup_string_in_str(&input, str);
1953 parse_stream_dquoted(NULL, &dest, &input, EOF);
1954 //bb_error_msg("'%s' -> '%s'", str, dest.data);
1955 exp_str = expand_string_to_string(dest.data);
1956 //bb_error_msg("'%s' -> '%s'", dest.data, exp_str);
1957 o_free_unsafe(&dest);
1958 return exp_str;
1959}
1960
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001961/* Expand all variable references in given string, adding words to list[]
1962 * at n, n+1,... positions. Return updated n (so that list[n] is next one
1963 * to be filled). This routine is extremely tricky: has to deal with
1964 * variables/parameters with whitespace, $* and $@, and constructs like
1965 * 'echo -$*-'. If you play here, you must run testsuite afterwards! */
1966static int expand_vars_to_list(o_string *output, int n, char *arg, char or_mask)
Eric Andersen25f27032001-04-26 23:22:31 +00001967{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001968 /* or_mask is either 0 (normal case) or 0x80
1969 * (expansion of right-hand side of assignment == 1-element expand.
1970 * It will also do no globbing, and thus we must not backslash-quote!) */
Eric Andersen25f27032001-04-26 23:22:31 +00001971
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001972 char first_ch, ored_ch;
1973 int i;
1974 const char *val;
Mike Frysingera4f331d2009-04-07 06:03:22 +00001975 char *dyn_val, *p;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001976
Mike Frysingera4f331d2009-04-07 06:03:22 +00001977 dyn_val = NULL;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001978 ored_ch = 0;
1979
1980 debug_printf_expand("expand_vars_to_list: arg '%s'\n", arg);
1981 debug_print_list("expand_vars_to_list", output, n);
1982 n = o_save_ptr(output, n);
1983 debug_print_list("expand_vars_to_list[0]", output, n);
1984
1985 while ((p = strchr(arg, SPECIAL_VAR_SYMBOL)) != NULL) {
1986#if ENABLE_HUSH_TICK
1987 o_string subst_result = NULL_O_STRING;
Denis Vlasenko96f67dc2007-05-17 13:02:41 +00001988#endif
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00001989#if ENABLE_SH_MATH_SUPPORT
1990 char arith_buf[sizeof(arith_t)*3 + 2];
1991#endif
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00001992 o_addblock(output, arg, p - arg);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00001993 debug_print_list("expand_vars_to_list[1]", output, n);
1994 arg = ++p;
1995 p = strchr(p, SPECIAL_VAR_SYMBOL);
1996
1997 first_ch = arg[0] | or_mask; /* forced to "quoted" if or_mask = 0x80 */
1998 /* "$@" is special. Even if quoted, it can still
1999 * expand to nothing (not even an empty string) */
2000 if ((first_ch & 0x7f) != '@')
2001 ored_ch |= first_ch;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002002
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002003 val = NULL;
2004 switch (first_ch & 0x7f) {
2005 /* Highest bit in first_ch indicates that var is double-quoted */
2006 case '$': /* pid */
2007 val = utoa(G.root_pid);
2008 break;
2009 case '!': /* bg pid */
2010 val = G.last_bg_pid ? utoa(G.last_bg_pid) : (char*)"";
2011 break;
2012 case '?': /* exitcode */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00002013 val = utoa(G.last_exitcode);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002014 break;
2015 case '#': /* argc */
Mike Frysinger6379bb42009-03-28 18:55:03 +00002016 if (arg[1] != SPECIAL_VAR_SYMBOL)
2017 /* actually, it's a ${#var} */
2018 goto case_default;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002019 val = utoa(G.global_argc ? G.global_argc-1 : 0);
2020 break;
2021 case '*':
2022 case '@':
2023 i = 1;
2024 if (!G.global_argv[i])
2025 break;
2026 ored_ch |= first_ch; /* do it for "$@" _now_, when we know it's not empty */
2027 if (!(first_ch & 0x80)) { /* unquoted $* or $@ */
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002028 smallint sv = output->o_escape;
2029 /* unquoted var's contents should be globbed, so don't escape */
2030 output->o_escape = 0;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002031 while (G.global_argv[i]) {
2032 n = expand_on_ifs(output, n, G.global_argv[i]);
2033 debug_printf_expand("expand_vars_to_list: argv %d (last %d)\n", i, G.global_argc - 1);
2034 if (G.global_argv[i++][0] && G.global_argv[i]) {
2035 /* this argv[] is not empty and not last:
2036 * put terminating NUL, start new word */
2037 o_addchr(output, '\0');
2038 debug_print_list("expand_vars_to_list[2]", output, n);
2039 n = o_save_ptr(output, n);
2040 debug_print_list("expand_vars_to_list[3]", output, n);
2041 }
2042 }
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002043 output->o_escape = sv;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002044 } else
2045 /* If or_mask is nonzero, we handle assignment 'a=....$@.....'
2046 * and in this case should treat it like '$*' - see 'else...' below */
2047 if (first_ch == ('@'|0x80) && !or_mask) { /* quoted $@ */
2048 while (1) {
2049 o_addQstr(output, G.global_argv[i], strlen(G.global_argv[i]));
2050 if (++i >= G.global_argc)
2051 break;
2052 o_addchr(output, '\0');
2053 debug_print_list("expand_vars_to_list[4]", output, n);
2054 n = o_save_ptr(output, n);
2055 }
2056 } else { /* quoted $*: add as one word */
2057 while (1) {
2058 o_addQstr(output, G.global_argv[i], strlen(G.global_argv[i]));
2059 if (!G.global_argv[++i])
2060 break;
2061 if (G.ifs[0])
2062 o_addchr(output, G.ifs[0]);
2063 }
2064 }
2065 break;
2066 case SPECIAL_VAR_SYMBOL: /* <SPECIAL_VAR_SYMBOL><SPECIAL_VAR_SYMBOL> */
2067 /* "Empty variable", used to make "" etc to not disappear */
2068 arg++;
2069 ored_ch = 0x80;
2070 break;
2071#if ENABLE_HUSH_TICK
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00002072 case '`': /* <SPECIAL_VAR_SYMBOL>`cmd<SPECIAL_VAR_SYMBOL> */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002073 *p = '\0';
2074 arg++;
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00002075 /* Can't just stuff it into output o_string,
2076 * expanded result may need to be globbed
2077 * and $IFS-splitted */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002078 debug_printf_subst("SUBST '%s' first_ch %x\n", arg, first_ch);
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00002079 process_command_subs(&subst_result, arg);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002080 debug_printf_subst("SUBST RES '%s'\n", subst_result.data);
2081 val = subst_result.data;
2082 goto store_val;
Denis Vlasenko96f67dc2007-05-17 13:02:41 +00002083#endif
Mike Frysinger98c52642009-04-02 10:02:37 +00002084#if ENABLE_SH_MATH_SUPPORT
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002085 case '+': { /* <SPECIAL_VAR_SYMBOL>+cmd<SPECIAL_VAR_SYMBOL> */
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00002086 arith_eval_hooks_t hooks;
Mike Frysinger98c52642009-04-02 10:02:37 +00002087 arith_t res;
Mike Frysinger98c52642009-04-02 10:02:37 +00002088 int errcode;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002089 char *exp_str;
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00002090
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002091 arg++; /* skip '+' */
2092 *p = '\0'; /* replace trailing <SPECIAL_VAR_SYMBOL> */
Mike Frysinger98c52642009-04-02 10:02:37 +00002093 debug_printf_subst("ARITH '%s' first_ch %x\n", arg, first_ch);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002094
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002095 exp_str = expand_pseudo_dquoted(arg);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00002096 hooks.lookupvar = get_local_var_value;
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00002097 hooks.setvar = arith_set_local_var;
2098 hooks.endofname = endofname;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002099 res = arith(exp_str ? exp_str : arg, &errcode, &hooks);
2100 free(exp_str);
2101
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00002102 if (errcode < 0) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002103 const char *msg = "error in arithmetic";
Mike Frysinger98c52642009-04-02 10:02:37 +00002104 switch (errcode) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002105 case -3:
2106 msg = "exponent less than 0";
2107 break;
2108 case -2:
2109 msg = "divide by 0";
2110 break;
2111 case -5:
2112 msg = "expression recursion loop detected";
2113 break;
Mike Frysinger98c52642009-04-02 10:02:37 +00002114 }
Denis Vlasenkod68ae082009-04-09 20:41:34 +00002115 die_if_script(msg);
Denis Vlasenkob29eb6e2009-04-02 13:46:27 +00002116 }
Mike Frysinger98c52642009-04-02 10:02:37 +00002117 debug_printf_subst("ARITH RES '"arith_t_fmt"'\n", res);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002118 sprintf(arith_buf, arith_t_fmt, res);
2119 val = arith_buf;
Mike Frysinger98c52642009-04-02 10:02:37 +00002120 break;
2121 }
2122#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002123 default: /* <SPECIAL_VAR_SYMBOL>varname<SPECIAL_VAR_SYMBOL> */
Mike Frysinger6379bb42009-03-28 18:55:03 +00002124 case_default: {
Denis Vlasenko232be3e2009-04-05 09:16:00 +00002125 bool exp_len = false;
2126 bool exp_null = false;
2127 char *var = arg;
2128 char exp_save = exp_save; /* for compiler */
2129 char exp_op = exp_op; /* for compiler */
2130 char *exp_word = exp_word; /* for compiler */
Mike Frysinger6379bb42009-03-28 18:55:03 +00002131 size_t exp_off = 0;
Denis Vlasenko232be3e2009-04-05 09:16:00 +00002132
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002133 *p = '\0';
2134 arg[0] = first_ch & 0x7f;
Mike Frysinger6379bb42009-03-28 18:55:03 +00002135
2136 /* prepare for expansions */
2137 if (var[0] == '#') {
2138 /* handle length expansion ${#var} */
2139 exp_len = true;
2140 ++var;
2141 } else {
2142 /* maybe handle parameter expansion */
Mike Frysingera4f331d2009-04-07 06:03:22 +00002143 exp_off = strcspn(var, ":-=+?%#");
Mike Frysinger6379bb42009-03-28 18:55:03 +00002144 if (!var[exp_off])
2145 exp_off = 0;
2146 if (exp_off) {
2147 exp_save = var[exp_off];
2148 exp_null = exp_save == ':';
2149 exp_word = var + exp_off;
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002150 if (exp_null)
2151 ++exp_word;
Mike Frysinger6379bb42009-03-28 18:55:03 +00002152 exp_op = *exp_word++;
2153 var[exp_off] = '\0';
2154 }
2155 }
2156
2157 /* lookup the variable in question */
2158 if (isdigit(var[0])) {
Mike Frysinger7c3e52c2009-03-28 21:06:22 +00002159 /* handle_dollar() should have vetted var for us */
Mike Frysinger6379bb42009-03-28 18:55:03 +00002160 i = xatoi_u(var);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002161 if (i < G.global_argc)
2162 val = G.global_argv[i];
2163 /* else val remains NULL: $N with too big N */
2164 } else
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00002165 val = get_local_var_value(var);
Mike Frysinger6379bb42009-03-28 18:55:03 +00002166
2167 /* handle any expansions */
2168 if (exp_len) {
2169 debug_printf_expand("expand: length of '%s' = ", val);
2170 val = utoa(val ? strlen(val) : 0);
2171 debug_printf_expand("%s\n", val);
2172 } else if (exp_off) {
Mike Frysingera4f331d2009-04-07 06:03:22 +00002173 if (exp_op == '%' || exp_op == '#') {
Mike Frysinger57e74672009-04-09 23:00:33 +00002174 if (val) {
2175 /* we need to do a pattern match */
2176 bool zero;
2177 char *loc;
2178 scan_t scan = pick_scan(exp_op, *exp_word, &zero);
2179 if (exp_op == *exp_word) /* ## or %% */
2180 ++exp_word;
2181 val = dyn_val = xstrdup(val);
2182 loc = scan(dyn_val, exp_word, zero);
2183 if (zero)
2184 val = loc;
2185 else
2186 *loc = '\0';
2187 }
Mike Frysingera4f331d2009-04-07 06:03:22 +00002188 } else {
2189 /* we need to do an expansion */
2190 int exp_test = (!val || (exp_null && !val[0]));
2191 if (exp_op == '+')
2192 exp_test = !exp_test;
2193 debug_printf_expand("expand: op:%c (null:%s) test:%i\n", exp_op,
2194 exp_null ? "true" : "false", exp_test);
2195 if (exp_test) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00002196 if (exp_op == '?') {
2197//TODO: how interactive bash aborts expansion mid-command?
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002198 /* ${var?[error_msg_if_unset]} */
2199 /* ${var:?[error_msg_if_unset_or_null]} */
2200 /* mimic bash message */
Denis Vlasenkod68ae082009-04-09 20:41:34 +00002201 die_if_script("%s: %s",
2202 var,
2203 exp_word[0] ? exp_word : "parameter null or not set"
2204 );
2205 } else {
Mike Frysingera4f331d2009-04-07 06:03:22 +00002206 val = exp_word;
Denis Vlasenkod68ae082009-04-09 20:41:34 +00002207 }
Mike Frysinger6379bb42009-03-28 18:55:03 +00002208
Mike Frysingera4f331d2009-04-07 06:03:22 +00002209 if (exp_op == '=') {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002210 /* ${var=[word]} or ${var:=[word]} */
Mike Frysingera4f331d2009-04-07 06:03:22 +00002211 if (isdigit(var[0]) || var[0] == '#') {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002212 /* mimic bash message */
2213 die_if_script("$%s: cannot assign in this way", var);
Mike Frysingera4f331d2009-04-07 06:03:22 +00002214 val = NULL;
2215 } else {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00002216 char *new_var = xasprintf("%s=%s", var, val);
Mike Frysingera4f331d2009-04-07 06:03:22 +00002217 set_local_var(new_var, -1, 0);
2218 }
Mike Frysinger6379bb42009-03-28 18:55:03 +00002219 }
2220 }
2221 }
Mike Frysingera4f331d2009-04-07 06:03:22 +00002222
Mike Frysinger6379bb42009-03-28 18:55:03 +00002223 var[exp_off] = exp_save;
2224 }
2225
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002226 arg[0] = first_ch;
2227#if ENABLE_HUSH_TICK
2228 store_val:
2229#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002230 if (!(first_ch & 0x80)) { /* unquoted $VAR */
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002231 debug_printf_expand("unquoted '%s', output->o_escape:%d\n", val, output->o_escape);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002232 if (val) {
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002233 /* unquoted var's contents should be globbed, so don't escape */
2234 smallint sv = output->o_escape;
2235 output->o_escape = 0;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002236 n = expand_on_ifs(output, n, val);
2237 val = NULL;
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002238 output->o_escape = sv;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002239 }
2240 } else { /* quoted $VAR, val will be appended below */
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002241 debug_printf_expand("quoted '%s', output->o_escape:%d\n", val, output->o_escape);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002242 }
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002243 } /* default: */
2244 } /* switch (char after <SPECIAL_VAR_SYMBOL>) */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002245 if (val) {
2246 o_addQstr(output, val, strlen(val));
2247 }
Mike Frysingera4f331d2009-04-07 06:03:22 +00002248 free(dyn_val);
2249 dyn_val = NULL;
Mike Frysinger6379bb42009-03-28 18:55:03 +00002250 /* Do the check to avoid writing to a const string */
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00002251 if (*p != SPECIAL_VAR_SYMBOL)
Mike Frysinger6379bb42009-03-28 18:55:03 +00002252 *p = SPECIAL_VAR_SYMBOL;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002253
2254#if ENABLE_HUSH_TICK
2255 o_free(&subst_result);
2256#endif
2257 arg = ++p;
2258 } /* end of "while (SPECIAL_VAR_SYMBOL is found) ..." */
2259
2260 if (arg[0]) {
2261 debug_print_list("expand_vars_to_list[a]", output, n);
2262 /* this part is literal, and it was already pre-quoted
2263 * if needed (much earlier), do not use o_addQstr here! */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00002264 o_addstr_with_NUL(output, arg);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002265 debug_print_list("expand_vars_to_list[b]", output, n);
2266 } else if (output->length == o_get_last_ptr(output, n) /* expansion is empty */
2267 && !(ored_ch & 0x80) /* and all vars were not quoted. */
2268 ) {
2269 n--;
2270 /* allow to reuse list[n] later without re-growth */
2271 output->has_empty_slot = 1;
2272 } else {
2273 o_addchr(output, '\0');
Eric Andersen25f27032001-04-26 23:22:31 +00002274 }
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002275 return n;
Eric Andersen25f27032001-04-26 23:22:31 +00002276}
2277
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002278static char **expand_variables(char **argv, int or_mask)
Eric Andersen25f27032001-04-26 23:22:31 +00002279{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002280 int n;
2281 char **list;
2282 char **v;
2283 o_string output = NULL_O_STRING;
2284
2285 if (or_mask & 0x100) {
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00002286 output.o_escape = 1; /* protect against globbing for "$var" */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002287 /* (unquoted $var will temporarily switch it off) */
2288 output.o_glob = 1;
Eric Andersen25f27032001-04-26 23:22:31 +00002289 }
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002290
2291 n = 0;
2292 v = argv;
2293 while (*v) {
2294 n = expand_vars_to_list(&output, n, *v, (char)or_mask);
2295 v++;
2296 }
2297 debug_print_list("expand_variables", &output, n);
2298
2299 /* output.data (malloced in one block) gets returned in "list" */
2300 list = o_finalize_list(&output, n);
2301 debug_print_strings("expand_variables[1]", list);
2302 return list;
Eric Andersen25f27032001-04-26 23:22:31 +00002303}
2304
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002305static char **expand_strvec_to_strvec(char **argv)
Eric Andersen25f27032001-04-26 23:22:31 +00002306{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002307 return expand_variables(argv, 0x100);
Eric Andersen25f27032001-04-26 23:22:31 +00002308}
2309
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002310/* Used for expansion of right hand of assignments */
2311/* NB: should NOT do globbing! "export v=/bin/c*; env | grep ^v=" outputs
2312 * "v=/bin/c*" */
2313static char *expand_string_to_string(const char *str)
Eric Andersen25f27032001-04-26 23:22:31 +00002314{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002315 char *argv[2], **list;
2316
2317 argv[0] = (char*)str;
2318 argv[1] = NULL;
2319 list = expand_variables(argv, 0x80); /* 0x80: make one-element expansion */
2320 if (HUSH_DEBUG)
2321 if (!list[0] || list[1])
2322 bb_error_msg_and_die("BUG in varexp2");
2323 /* actually, just move string 2*sizeof(char*) bytes back */
2324 overlapping_strcpy((char*)list, list[0]);
2325 debug_printf_expand("string_to_string='%s'\n", (char*)list);
2326 return (char*)list;
2327}
2328
2329/* Used for "eval" builtin */
2330static char* expand_strvec_to_string(char **argv)
2331{
2332 char **list;
2333
2334 list = expand_variables(argv, 0x80);
2335 /* Convert all NULs to spaces */
2336 if (list[0]) {
2337 int n = 1;
2338 while (list[n]) {
2339 if (HUSH_DEBUG)
2340 if (list[n-1] + strlen(list[n-1]) + 1 != list[n])
2341 bb_error_msg_and_die("BUG in varexp3");
2342 list[n][-1] = ' '; /* TODO: or to G.ifs[0]? */
2343 n++;
2344 }
2345 }
2346 overlapping_strcpy((char*)list, list[0]);
2347 debug_printf_expand("strvec_to_string='%s'\n", (char*)list);
2348 return (char*)list;
2349}
2350
2351static char **expand_assignments(char **argv, int count)
2352{
2353 int i;
2354 char **p = NULL;
2355 /* Expand assignments into one string each */
2356 for (i = 0; i < count; i++) {
2357 p = add_string_to_strings(p, expand_string_to_string(argv[i]));
2358 }
2359 return p;
Eric Andersen25f27032001-04-26 23:22:31 +00002360}
2361
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00002362
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002363#if BB_MMU
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002364/* never called */
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002365void re_execute_shell(char ***to_free, const char *s, char *argv0, char **argv);
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002366
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002367static void reset_traps_to_defaults(void)
2368{
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00002369 /* This function is always called in a child shell
2370 * after fork (not vfork, NOMMU doesn't use this function).
Denis Vlasenko74a931a2009-04-15 23:29:44 +00002371 * Child shells are not interactive.
2372 * SIGTTIN/SIGTTOU/SIGTSTP should not have special handling.
2373 * Testcase: (while :; do :; done) + ^Z should background.
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00002374 * Same goes for SIGTERM, SIGHUP, SIGINT.
Denis Vlasenko74a931a2009-04-15 23:29:44 +00002375 */
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00002376 unsigned sig;
2377 unsigned mask;
Denis Vlasenko74a931a2009-04-15 23:29:44 +00002378
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00002379 if (!G.traps && !(G.non_DFL_mask & SPECIAL_INTERACTIVE_SIGS))
2380 return;
2381
2382 /* Stupid. It can be done with *single* &= op, but we can't use
2383 * the fact that G.blocked_set is implemented as a bitmask... */
2384 mask = (SPECIAL_INTERACTIVE_SIGS >> 1);
2385 sig = 1;
2386 while (1) {
2387 if (mask & 1)
2388 sigdelset(&G.blocked_set, sig);
2389 mask >>= 1;
2390 if (!mask)
2391 break;
2392 sig++;
2393 }
2394
2395 G.non_DFL_mask &= ~SPECIAL_INTERACTIVE_SIGS;
2396 mask = G.non_DFL_mask;
2397 if (G.traps) for (sig = 0; sig < NSIG; sig++, mask >>= 1) {
2398 if (!G.traps[sig])
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002399 continue;
2400 free(G.traps[sig]);
2401 G.traps[sig] = NULL;
2402 /* There is no signal for 0 (EXIT) */
2403 if (sig == 0)
2404 continue;
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00002405 /* There was a trap handler, we are removing it.
2406 * But if sig still has non-DFL handling,
2407 * we should not unblock it. */
2408 if (mask & 1)
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002409 continue;
2410 sigdelset(&G.blocked_set, sig);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002411 }
Denis Vlasenko74a931a2009-04-15 23:29:44 +00002412 sigprocmask(SIG_SETMASK, &G.blocked_set, NULL);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002413}
2414
2415#else /* !BB_MMU */
2416
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002417static void re_execute_shell(char ***to_free, const char *s, char *g_argv0, char **g_argv) NORETURN;
2418static void re_execute_shell(char ***to_free, const char *s, char *g_argv0, char **g_argv)
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002419{
2420 char param_buf[sizeof("-$%x:%x:%x:%x") + sizeof(unsigned) * 4];
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002421 char *heredoc_argv[4];
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002422 struct variable *cur;
Denis Vlasenkobc569742009-04-12 20:35:19 +00002423#if ENABLE_HUSH_FUNCTIONS
2424 struct function *funcp;
2425#endif
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002426 char **argv, **pp;
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002427 unsigned cnt;
2428
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002429 if (!g_argv0) { /* heredoc */
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002430 argv = heredoc_argv;
2431 argv[0] = (char *) G.argv0_for_re_execing;
2432 argv[1] = (char *) "-<";
2433 argv[2] = (char *) s;
2434 argv[3] = NULL;
Denis Vlasenkof50caac2009-04-09 01:40:15 +00002435 pp = &argv[3]; /* used as pointer to empty environment */
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002436 goto do_exec;
2437 }
2438
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002439 sprintf(param_buf, "-$%x:%x:%x" USE_HUSH_LOOPS(":%x")
2440 , (unsigned) G.root_pid
2441 , (unsigned) G.last_bg_pid
2442 , (unsigned) G.last_exitcode
2443 USE_HUSH_LOOPS(, G.depth_of_loop)
2444 );
Denis Vlasenkobc569742009-04-12 20:35:19 +00002445 /* 1:hush 2:-$<pid>:<pid>:<exitcode>:<depth> <vars...> <funcs...>
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002446 * 3:-c 4:<cmd> 5:<arg0> <argN...> 6:NULL
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002447 */
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002448 cnt = 6;
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002449 for (cur = G.top_var; cur; cur = cur->next) {
2450 if (!cur->flg_export || cur->flg_read_only)
2451 cnt += 2;
2452 }
Denis Vlasenkobc569742009-04-12 20:35:19 +00002453#if ENABLE_HUSH_FUNCTIONS
2454 for (funcp = G.top_func; funcp; funcp = funcp->next)
2455 cnt += 3;
2456#endif
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002457 pp = g_argv;
2458 while (*pp++)
2459 cnt++;
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002460 *to_free = argv = pp = xzalloc(sizeof(argv[0]) * cnt);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002461 *pp++ = (char *) G.argv0_for_re_execing;
2462 *pp++ = param_buf;
2463 for (cur = G.top_var; cur; cur = cur->next) {
2464 if (cur->varstr == hush_version_str)
2465 continue;
2466 if (cur->flg_read_only) {
2467 *pp++ = (char *) "-R";
2468 *pp++ = cur->varstr;
2469 } else if (!cur->flg_export) {
2470 *pp++ = (char *) "-V";
2471 *pp++ = cur->varstr;
2472 }
2473 }
Denis Vlasenkobc569742009-04-12 20:35:19 +00002474#if ENABLE_HUSH_FUNCTIONS
2475 for (funcp = G.top_func; funcp; funcp = funcp->next) {
2476 *pp++ = (char *) "-F";
2477 *pp++ = funcp->name;
2478 *pp++ = funcp->body_as_string;
2479 }
2480#endif
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002481 /* We can pass activated traps here. Say, -Tnn:trap_string
2482 *
2483 * However, POSIX says that subshells reset signals with traps
2484 * to SIG_DFL.
2485 * I tested bash-3.2 and it not only does that with true subshells
2486 * of the form ( list ), but with any forked children shells.
2487 * I set trap "echo W" WINCH; and then tried:
2488 *
2489 * { echo 1; sleep 20; echo 2; } &
2490 * while true; do echo 1; sleep 20; echo 2; break; done &
2491 * true | { echo 1; sleep 20; echo 2; } | cat
2492 *
2493 * In all these cases sending SIGWINCH to the child shell
2494 * did not run the trap. If I add trap "echo V" WINCH;
2495 * _inside_ group (just before echo 1), it works.
2496 *
2497 * I conclude it means we don't need to pass active traps here.
2498 * exec syscall below resets them to SIG_DFL for us.
2499 */
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002500 *pp++ = (char *) "-c";
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002501 *pp++ = (char *) s;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002502 *pp++ = g_argv0;
2503 while (*g_argv)
2504 *pp++ = *g_argv++;
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002505 /* *pp = NULL; - is already there */
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002506 pp = environ;
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002507
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002508 do_exec:
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002509 debug_printf_exec("re_execute_shell pid:%d cmd:'%s'\n", getpid(), s);
2510 sigprocmask(SIG_SETMASK, &G.inherited_set, NULL);
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002511 execve(bb_busybox_exec_path, argv, pp);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002512 /* Fallback. Useful for init=/bin/hush usage etc */
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002513 if (argv[0][0] == '/')
2514 execve(argv[0], argv, pp);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002515 xfunc_error_retval = 127;
2516 bb_error_msg_and_die("can't re-execute the shell");
2517}
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002518#endif /* !BB_MMU */
2519
2520
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002521static void setup_heredoc(struct redir_struct *redir)
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002522{
2523 struct fd_pair pair;
2524 pid_t pid;
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002525 int len, written;
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002526 /* the _body_ of heredoc (misleading field name) */
2527 const char *heredoc = redir->rd_filename;
2528 char *expanded;
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002529#if !BB_MMU
2530 char **to_free;
2531#endif
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002532
2533 expanded = NULL;
2534 if (!(redir->rd_dup & HEREDOC_QUOTED)) {
2535 expanded = expand_pseudo_dquoted(heredoc);
2536 if (expanded)
2537 heredoc = expanded;
2538 }
2539 len = strlen(heredoc);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002540
Denis Vlasenkoa2218dd2009-04-09 01:39:02 +00002541 close(redir->rd_fd); /* often saves dup2+close in xmove_fd */
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002542 xpiped_pair(pair);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002543 xmove_fd(pair.rd, redir->rd_fd);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002544
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002545 /* Try writing without forking. Newer kernels have
2546 * dynamically growing pipes. Must use non-blocking write! */
2547 ndelay_on(pair.wr);
2548 while (1) {
2549 written = write(pair.wr, heredoc, len);
2550 if (written <= 0)
2551 break;
2552 len -= written;
2553 if (len == 0) {
2554 close(pair.wr);
Denis Vlasenko1943aec2009-04-09 14:15:57 +00002555 free(expanded);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002556 return;
2557 }
2558 heredoc += written;
2559 }
2560 ndelay_off(pair.wr);
2561
2562 /* Okay, pipe buffer was not big enough */
2563 /* Note: we must not create a stray child (bastard? :)
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002564 * for the unsuspecting parent process. Child creates a grandchild
2565 * and exits before parent execs the process which consumes heredoc
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002566 * (that exec happens after we return from this function) */
Denis Vlasenko41ddecd2009-04-15 21:58:14 +00002567#if !BB_MMU
2568 to_free = NULL;
2569#endif
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002570 pid = vfork();
2571 if (pid < 0)
2572 bb_perror_msg_and_die("vfork");
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002573 if (pid == 0) {
2574 /* child */
Denis Vlasenko41ddecd2009-04-15 21:58:14 +00002575 disable_restore_tty_pgrp_on_exit();
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002576 pid = BB_MMU ? fork() : vfork();
2577 if (pid < 0)
2578 bb_perror_msg_and_die(BB_MMU ? "fork" : "vfork");
2579 if (pid != 0)
2580 _exit(0);
2581 /* grandchild */
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002582 close(redir->rd_fd); /* read side of the pipe */
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002583#if BB_MMU
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002584 full_write(pair.wr, heredoc, len); /* may loop or block */
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002585 _exit(0);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002586#else
2587 /* Delegate blocking writes to another process */
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002588 xmove_fd(pair.wr, STDOUT_FILENO);
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002589 re_execute_shell(&to_free, heredoc, NULL, NULL);
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00002590#endif
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002591 }
2592 /* parent */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002593 enable_restore_tty_pgrp_on_exit();
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002594#if !BB_MMU
2595 free(to_free);
2596#endif
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002597 close(pair.wr);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002598 free(expanded);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002599 wait(NULL); /* wait till child has died */
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002600}
2601
Eric Andersen25f27032001-04-26 23:22:31 +00002602/* squirrel != NULL means we squirrel away copies of stdin, stdout,
2603 * and stderr if they are redirected. */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00002604static int setup_redirects(struct command *prog, int squirrel[])
Eric Andersen25f27032001-04-26 23:22:31 +00002605{
2606 int openfd, mode;
2607 struct redir_struct *redir;
2608
Denis Vlasenko0c886c62007-01-30 22:30:09 +00002609 for (redir = prog->redirects; redir; redir = redir->next) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002610 if (redir->rd_type == REDIRECT_HEREDOC2) {
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00002611 /* rd_fd<<HERE case */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002612 if (squirrel && redir->rd_fd < 3) {
2613 squirrel[redir->rd_fd] = dup(redir->rd_fd);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002614 }
2615 /* for REDIRECT_HEREDOC2, rd_filename holds _contents_
2616 * of the heredoc */
2617 debug_printf_parse("set heredoc '%s'\n",
2618 redir->rd_filename);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002619 setup_heredoc(redir);
Eric Andersen817e73c2001-06-06 17:56:09 +00002620 continue;
2621 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002622
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00002623 if (redir->rd_dup == REDIRFD_TO_FILE) {
2624 /* rd_fd<*>file case (<*> is <,>,>>,<>) */
Denis Vlasenkocccdc4e2007-11-23 21:08:38 +00002625 char *p;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002626 if (redir->rd_filename == NULL) {
2627 /* Something went wrong in the parse.
2628 * Pretend it didn't happen */
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00002629 bb_error_msg("bug in redirect parse");
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002630 continue;
2631 }
Denis Vlasenko55789c62008-06-18 16:30:42 +00002632 mode = redir_table[redir->rd_type].mode;
Denis Vlasenkoab876cd2008-06-18 16:29:32 +00002633 p = expand_string_to_string(redir->rd_filename);
Denis Vlasenkocccdc4e2007-11-23 21:08:38 +00002634 openfd = open_or_warn(p, mode);
2635 free(p);
Eric Andersen25f27032001-04-26 23:22:31 +00002636 if (openfd < 0) {
2637 /* this could get lost if stderr has been redirected, but
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00002638 * bash and ash both lose it as well (though zsh doesn't!) */
2639//what the above comment tries to say?
Eric Andersen25f27032001-04-26 23:22:31 +00002640 return 1;
2641 }
2642 } else {
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00002643 /* rd_fd<*>rd_dup or rd_fd<*>- cases */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002644 openfd = redir->rd_dup;
Eric Andersen25f27032001-04-26 23:22:31 +00002645 }
2646
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002647 if (openfd != redir->rd_fd) {
2648 if (squirrel && redir->rd_fd < 3) {
2649 squirrel[redir->rd_fd] = dup(redir->rd_fd);
Eric Andersen25f27032001-04-26 23:22:31 +00002650 }
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002651 if (openfd == REDIRFD_CLOSE) {
2652 /* "n>-" means "close me" */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00002653 close(redir->rd_fd);
Eric Andersen83a2ae22001-05-07 17:59:25 +00002654 } else {
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002655 xdup2(openfd, redir->rd_fd);
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00002656 if (redir->rd_dup == REDIRFD_TO_FILE)
Denis Vlasenkof03dbed2007-04-13 19:55:50 +00002657 close(openfd);
Eric Andersen83a2ae22001-05-07 17:59:25 +00002658 }
Eric Andersen25f27032001-04-26 23:22:31 +00002659 }
2660 }
2661 return 0;
2662}
2663
2664static void restore_redirects(int squirrel[])
2665{
2666 int i, fd;
Denis Vlasenko0c886c62007-01-30 22:30:09 +00002667 for (i = 0; i < 3; i++) {
Eric Andersen25f27032001-04-26 23:22:31 +00002668 fd = squirrel[i];
2669 if (fd != -1) {
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00002670 /* We simply die on error */
2671 xmove_fd(fd, i);
Eric Andersen25f27032001-04-26 23:22:31 +00002672 }
2673 }
2674}
2675
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002676
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002677static void free_pipe_list(struct pipe *head);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002678
Denis Vlasenko34d4d892009-04-04 20:24:37 +00002679/* Return code is the exit status of the pipe */
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002680static void free_pipe(struct pipe *pi)
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002681{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002682 char **p;
2683 struct command *command;
2684 struct redir_struct *r, *rnext;
Denis Vlasenkob6e65562009-04-03 16:49:04 +00002685 int a, i;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002686
Denis Vlasenko34d4d892009-04-04 20:24:37 +00002687 if (pi->stopped_cmds > 0) /* why? */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00002688 return;
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002689 debug_printf_clean("run pipe: (pid %d)\n", getpid());
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002690 for (i = 0; i < pi->num_cmds; i++) {
2691 command = &pi->cmds[i];
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002692 debug_printf_clean(" command %d:\n", i);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002693 if (command->argv) {
2694 for (a = 0, p = command->argv; *p; a++, p++) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002695 debug_printf_clean(" argv[%d] = %s\n", a, *p);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002696 }
2697 free_strings(command->argv);
2698 command->argv = NULL;
Denis Vlasenkob6e65562009-04-03 16:49:04 +00002699 }
2700 /* not "else if": on syntax error, we may have both! */
2701 if (command->group) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002702 debug_printf_clean(" begin group (grp_type:%d)\n",
2703 command->grp_type);
2704 free_pipe_list(command->group);
2705 debug_printf_clean(" end group\n");
Denis Vlasenkob6e65562009-04-03 16:49:04 +00002706 command->group = NULL;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002707 }
Denis Vlasenkoed055212009-04-11 10:37:10 +00002708 /* else is crucial here.
2709 * If group != NULL, child_func is meaningless */
2710#if ENABLE_HUSH_FUNCTIONS
2711 else if (command->child_func) {
2712 debug_printf_exec("cmd %p releases child func at %p\n", command, command->child_func);
2713 command->child_func->parent_cmd = NULL;
2714 }
2715#endif
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00002716#if !BB_MMU
2717 free(command->group_as_string);
2718 command->group_as_string = NULL;
2719#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002720 for (r = command->redirects; r; r = rnext) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002721 debug_printf_clean(" redirect %d%s",
2722 r->rd_fd, redir_table[r->rd_type].descrip);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002723 /* guard against the case >$FOO, where foo is unset or blank */
2724 if (r->rd_filename) {
2725 debug_printf_clean(" fname:'%s'\n", r->rd_filename);
2726 free(r->rd_filename);
2727 r->rd_filename = NULL;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002728 }
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00002729 debug_printf_clean(" rd_dup:%d\n", r->rd_dup);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002730 rnext = r->next;
2731 free(r);
2732 }
2733 command->redirects = NULL;
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002734 }
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002735 free(pi->cmds); /* children are an array, they get freed all at once */
2736 pi->cmds = NULL;
2737#if ENABLE_HUSH_JOB
2738 free(pi->cmdtext);
2739 pi->cmdtext = NULL;
2740#endif
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002741}
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00002742
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002743static void free_pipe_list(struct pipe *head)
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002744{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002745 struct pipe *pi, *next;
2746
2747 for (pi = head; pi; pi = next) {
2748#if HAS_KEYWORDS
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002749 debug_printf_clean(" pipe reserved word %d\n", pi->res_word);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002750#endif
Denis Vlasenko0701dca2009-04-11 10:38:47 +00002751 free_pipe(pi);
2752 debug_printf_clean("pipe followup code %d\n", pi->followup);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002753 next = pi->next;
2754 /*pi->next = NULL;*/
2755 free(pi);
2756 }
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002757}
2758
2759
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002760static int run_list(struct pipe *pi);
Denis Vlasenkobc569742009-04-12 20:35:19 +00002761#if BB_MMU
2762#define parse_stream(pstring, input, end_trigger) \
2763 parse_stream(input, end_trigger)
2764#endif
2765static struct pipe *parse_stream(char **pstring,
2766 struct in_str *input,
2767 int end_trigger);
2768static void parse_and_run_string(const char *s);
2769
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002770
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002771static const struct built_in_command* find_builtin(const char *name)
2772{
2773 const struct built_in_command *x;
2774 for (x = bltins; x != &bltins[ARRAY_SIZE(bltins)]; x++) {
2775 if (strcmp(name, x->cmd) != 0)
2776 continue;
2777 debug_printf_exec("found builtin '%s'\n", name);
2778 return x;
2779 }
2780 return NULL;
2781}
2782
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002783#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002784static const struct function *find_function(const char *name)
2785{
2786 const struct function *funcp = G.top_func;
2787 while (funcp) {
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002788 if (strcmp(name, funcp->name) == 0) {
2789 break;
2790 }
2791 funcp = funcp->next;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002792 }
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00002793 if (funcp)
2794 debug_printf_exec("found function '%s'\n", name);
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002795 return funcp;
2796}
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00002797
Denis Vlasenkobc569742009-04-12 20:35:19 +00002798/* Note: takes ownership on name ptr */
2799static struct function *new_function(char *name)
2800{
2801 struct function *funcp;
2802 struct function **funcpp = &G.top_func;
2803
2804 while ((funcp = *funcpp) != NULL) {
2805 struct command *cmd;
2806
2807 if (strcmp(funcp->name, name) != 0) {
2808 funcpp = &funcp->next;
2809 continue;
2810 }
2811
2812 cmd = funcp->parent_cmd;
2813 debug_printf_exec("func %p parent_cmd %p\n", funcp, cmd);
2814 if (!cmd) {
2815 debug_printf_exec("freeing & replacing function '%s'\n", funcp->name);
2816 free(funcp->name);
2817 /* Note: if !funcp->body, do not free body_as_string!
2818 * This is a special case of "-F name body" function:
2819 * body_as_string was not malloced! */
2820 if (funcp->body) {
2821 free_pipe_list(funcp->body);
2822#if !BB_MMU
2823 free(funcp->body_as_string);
2824#endif
2825 }
2826 } else {
2827 debug_printf_exec("reinserting in tree & replacing function '%s'\n", funcp->name);
2828 cmd->argv[0] = funcp->name;
2829 cmd->group = funcp->body;
2830#if !BB_MMU
2831 cmd->group_as_string = funcp->body_as_string;
2832#endif
2833 }
2834 goto skip;
2835 }
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00002836 debug_printf_exec("remembering new function '%s'\n", name);
Denis Vlasenkobc569742009-04-12 20:35:19 +00002837 funcp = *funcpp = xzalloc(sizeof(*funcp));
2838 /*funcp->next = NULL;*/
2839 skip:
2840 funcp->name = name;
2841 return funcp;
2842}
2843
Denis Vlasenko40e84372009-04-18 11:23:38 +00002844static void unset_func(const char *name)
2845{
2846 struct function *funcp;
2847 struct function **funcpp = &G.top_func;
2848
2849 while ((funcp = *funcpp) != NULL) {
2850 if (strcmp(funcp->name, name) == 0) {
2851 *funcpp = funcp->next;
2852 /* funcp is unlinked now, deleting it */
2853 free(funcp->name);
2854 /* Note: if !funcp->body, do not free body_as_string!
2855 * This is a special case of "-F name body" function:
2856 * body_as_string was not malloced! */
2857 if (funcp->body) {
2858 free_pipe_list(funcp->body);
2859#if !BB_MMU
2860 free(funcp->body_as_string);
2861#endif
2862 }
2863 free(funcp);
2864 break;
2865 }
Denis Vlasenko73010672009-04-18 11:25:18 +00002866 funcpp = &funcp->next;
Denis Vlasenko40e84372009-04-18 11:23:38 +00002867 }
2868}
2869
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002870#if BB_MMU
2871#define exec_function(nommu_save, funcp, argv) \
2872 exec_function(funcp, argv)
2873#endif
2874static void exec_function(nommu_save_t *nommu_save,
2875 const struct function *funcp,
2876 char **argv) NORETURN;
2877static void exec_function(nommu_save_t *nommu_save,
2878 const struct function *funcp,
2879 char **argv)
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002880{
2881# if BB_MMU
2882 int n = 1;
2883
2884 argv[0] = G.global_argv[0];
2885 G.global_argv = argv;
2886 while (*++argv)
2887 n++;
2888 G.global_argc = n;
Denis Vlasenkobc569742009-04-12 20:35:19 +00002889 /* On MMU, funcp->body is always non-NULL */
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00002890 n = run_list(funcp->body);
2891 fflush(NULL);
2892 _exit(n);
2893# else
Denis Vlasenko27014ed2009-04-15 21:48:23 +00002894 re_execute_shell(&nommu_save->argv_from_re_execing,
2895 funcp->body_as_string,
2896 G.global_argv[0],
2897 argv + 1);
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00002898# endif
2899}
2900
2901static int run_function(const struct function *funcp, char **argv)
2902{
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002903 int rc;
2904 save_arg_t sv;
Mike Frysinger885b6f22009-04-18 21:04:25 +00002905#if ENABLE_HUSH_FUNCTIONS
2906 smallint sv_flg;
2907#endif
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00002908
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002909 save_and_replace_G_args(&sv, argv);
Mike Frysinger885b6f22009-04-18 21:04:25 +00002910#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00002911 /* "we are in function, ok to use return" */
2912 sv_flg = G.flag_return_in_progress;
2913 G.flag_return_in_progress = -1;
Mike Frysinger885b6f22009-04-18 21:04:25 +00002914#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00002915
Denis Vlasenkobc569742009-04-12 20:35:19 +00002916 /* On MMU, funcp->body is always non-NULL */
2917#if !BB_MMU
2918 if (!funcp->body) {
2919 /* Function defined by -F */
2920 parse_and_run_string(funcp->body_as_string);
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002921 rc = G.last_exitcode;
Denis Vlasenkobc569742009-04-12 20:35:19 +00002922 } else
2923#endif
2924 {
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002925 rc = run_list(funcp->body);
Denis Vlasenkobc569742009-04-12 20:35:19 +00002926 }
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00002927
Mike Frysinger885b6f22009-04-18 21:04:25 +00002928#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00002929 G.flag_return_in_progress = sv_flg;
Mike Frysinger885b6f22009-04-18 21:04:25 +00002930#endif
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002931 restore_G_args(&sv, argv);
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00002932
Denis Vlasenko270b1c32009-04-17 18:54:50 +00002933 return rc;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002934}
2935#endif
2936
2937
Denis Vlasenkocc90f442009-04-08 16:40:34 +00002938#if BB_MMU
Denis Vlasenko424f79b2009-03-22 14:23:34 +00002939#define pseudo_exec_argv(nommu_save, argv, assignment_cnt, argv_expanded) \
2940 pseudo_exec_argv(argv, assignment_cnt, argv_expanded)
2941#define pseudo_exec(nommu_save, command, argv_expanded) \
2942 pseudo_exec(command, argv_expanded)
2943#endif
2944
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00002945/* Called after [v]fork() in run_pipe, or from builtin_exec.
Denis Vlasenko8412d792007-10-01 09:59:47 +00002946 * Never returns.
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00002947 * Don't exit() here. If you don't exec, use _exit instead.
Eric Andersen94ac2442001-05-22 19:05:18 +00002948 * The at_exit handlers apparently confuse the calling process,
Denis Vlasenko87cb2db2007-04-21 10:00:01 +00002949 * in particular stdin handling. Not sure why? -- because of vfork! (vda) */
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00002950static void pseudo_exec_argv(nommu_save_t *nommu_save,
2951 char **argv, int assignment_cnt,
2952 char **argv_expanded) NORETURN;
2953static void pseudo_exec_argv(nommu_save_t *nommu_save,
2954 char **argv, int assignment_cnt,
2955 char **argv_expanded)
Eric Andersen25f27032001-04-26 23:22:31 +00002956{
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002957 char **new_env;
Denis Vlasenko87cb2db2007-04-21 10:00:01 +00002958
Denis Vlasenko34d4d892009-04-04 20:24:37 +00002959 /* Case when we are here: ... | var=val | ... */
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00002960 if (!argv[assignment_cnt])
Denis Vlasenko1359da62007-04-21 23:27:30 +00002961 _exit(EXIT_SUCCESS);
Denis Vlasenko87cb2db2007-04-21 10:00:01 +00002962
Denis Vlasenko9504e442008-10-29 01:19:15 +00002963 new_env = expand_assignments(argv, assignment_cnt);
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002964#if BB_MMU
2965 putenv_all(new_env);
2966 free(new_env); /* optional */
2967#else
2968 nommu_save->new_env = new_env;
2969 nommu_save->old_env = putenv_all_and_save_old(new_env);
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00002970#endif
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00002971 if (argv_expanded) {
2972 argv = argv_expanded;
2973 } else {
Denis Vlasenko37181682009-04-03 03:19:15 +00002974 argv = expand_strvec_to_strvec(argv + assignment_cnt);
Denis Vlasenko76d50412008-06-10 16:19:39 +00002975#if !BB_MMU
Denis Vlasenkof886fd22008-10-13 12:36:05 +00002976 nommu_save->argv = argv;
Denis Vlasenko76d50412008-06-10 16:19:39 +00002977#endif
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00002978 }
Denis Vlasenko764d59d2007-05-14 16:23:23 +00002979
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002980#if ENABLE_FEATURE_SH_STANDALONE || BB_MMU
2981 if (strchr(argv[0], '/') != NULL)
2982 goto skip;
2983#endif
2984
Denis Vlasenko34d4d892009-04-04 20:24:37 +00002985 /* On NOMMU, we must never block!
2986 * Example: { sleep 99999 | read line } & echo Ok
2987 * read builtin will block on read syscall, leaving parent blocked
2988 * in vfork. Therefore we can't do this:
2989 */
2990#if BB_MMU
2991 /* Check if the command matches any of the builtins.
Denis Vlasenko1359da62007-04-21 23:27:30 +00002992 * Depending on context, this might be redundant. But it's
2993 * easier to waste a few CPU cycles than it is to figure out
2994 * if this is one of those cases.
2995 */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00002996 {
2997 int rcode;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00002998 const struct built_in_command *x = find_builtin(argv[0]);
2999 if (x) {
3000 rcode = x->function(argv);
3001 fflush(NULL);
3002 _exit(rcode);
Eric Andersen94ac2442001-05-22 19:05:18 +00003003 }
Denis Vlasenko1359da62007-04-21 23:27:30 +00003004 }
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003005#endif
3006#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003007 /* Check if the command matches any functions */
3008 {
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003009 const struct function *funcp = find_function(argv[0]);
3010 if (funcp) {
Denis Vlasenko27014ed2009-04-15 21:48:23 +00003011 exec_function(nommu_save, funcp, argv);
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003012 }
3013 }
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003014#endif
Eric Andersen78a7c992001-05-15 16:30:25 +00003015
Denis Vlasenko80d14be2007-04-10 23:03:30 +00003016#if ENABLE_FEATURE_SH_STANDALONE
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003017 /* Check if the command matches any busybox applets */
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003018 {
Denis Vlasenko1aa7e472007-11-28 06:49:03 +00003019 int a = find_applet_by_name(argv[0]);
3020 if (a >= 0) {
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003021# if BB_MMU /* see above why on NOMMU it is not allowed */
Denis Vlasenko1aa7e472007-11-28 06:49:03 +00003022 if (APPLET_IS_NOEXEC(a)) {
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003023 debug_printf_exec("running applet '%s'\n", argv[0]);
Denis Vlasenko1aa7e472007-11-28 06:49:03 +00003024 run_applet_no_and_exit(a, argv);
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003025 }
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003026# endif
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003027 /* Re-exec ourselves */
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003028 debug_printf_exec("re-execing applet '%s'\n", argv[0]);
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003029 sigprocmask(SIG_SETMASK, &G.inherited_set, NULL);
3030 execv(bb_busybox_exec_path, argv);
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003031 /* If they called chroot or otherwise made the binary no longer
3032 * executable, fall through */
3033 }
3034 }
Eric Andersenaac75e52001-04-30 18:18:45 +00003035#endif
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003036
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003037#if ENABLE_FEATURE_SH_STANDALONE || BB_MMU
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003038 skip:
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003039#endif
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003040 debug_printf_exec("execing '%s'\n", argv[0]);
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003041 sigprocmask(SIG_SETMASK, &G.inherited_set, NULL);
Denis Vlasenko1359da62007-04-21 23:27:30 +00003042 execvp(argv[0], argv);
Bernhard Reutner-Fischera53de7f2008-07-21 13:46:54 +00003043 bb_perror_msg("can't exec '%s'", argv[0]);
Bernhard Reutner-Fischer636a1f82008-05-19 09:29:47 +00003044 _exit(EXIT_FAILURE);
Denis Vlasenko1359da62007-04-21 23:27:30 +00003045}
3046
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003047/* Called after [v]fork() in run_pipe
Denis Vlasenko8412d792007-10-01 09:59:47 +00003048 */
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00003049static void pseudo_exec(nommu_save_t *nommu_save,
3050 struct command *command,
3051 char **argv_expanded) NORETURN;
3052static void pseudo_exec(nommu_save_t *nommu_save,
3053 struct command *command,
3054 char **argv_expanded)
Denis Vlasenko1359da62007-04-21 23:27:30 +00003055{
Denis Vlasenko552433b2009-04-04 19:29:21 +00003056 if (command->argv) {
3057 pseudo_exec_argv(nommu_save, command->argv,
3058 command->assignment_cnt, argv_expanded);
3059 }
Denis Vlasenkof03dbed2007-04-13 19:55:50 +00003060
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003061 if (command->group) {
Denis Vlasenko552433b2009-04-04 19:29:21 +00003062 /* Cases when we are here:
3063 * ( list )
3064 * { list } &
3065 * ... | ( list ) | ...
3066 * ... | { list } | ...
3067 */
3068#if BB_MMU
Denis Vlasenko3b492162007-12-24 14:26:57 +00003069 int rcode;
Denis Vlasenko05743d72008-02-10 12:10:08 +00003070 debug_printf_exec("pseudo_exec: run_list\n");
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00003071 reset_traps_to_defaults();
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003072 rcode = run_list(command->group);
Eric Andersenbf7df042001-05-23 22:18:35 +00003073 /* OK to leak memory by not calling free_pipe_list,
Eric Andersen25f27032001-04-26 23:22:31 +00003074 * since this process is about to exit */
Eric Andersen94ac2442001-05-22 19:05:18 +00003075 _exit(rcode);
Denis Vlasenko552433b2009-04-04 19:29:21 +00003076#else
Denis Vlasenko27014ed2009-04-15 21:48:23 +00003077 re_execute_shell(&nommu_save->argv_from_re_execing,
3078 command->group_as_string,
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003079 G.global_argv[0],
3080 G.global_argv + 1);
Denis Vlasenko8412d792007-10-01 09:59:47 +00003081#endif
Eric Andersen25f27032001-04-26 23:22:31 +00003082 }
Denis Vlasenkof03dbed2007-04-13 19:55:50 +00003083
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003084 /* Case when we are here: ... | >file */
3085 debug_printf_exec("pseudo_exec'ed null command\n");
Denis Vlasenkof03dbed2007-04-13 19:55:50 +00003086 _exit(EXIT_SUCCESS);
Eric Andersen25f27032001-04-26 23:22:31 +00003087}
3088
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003089#if ENABLE_HUSH_JOB
Denis Vlasenko3ac0e002007-04-28 16:45:22 +00003090static const char *get_cmdtext(struct pipe *pi)
3091{
3092 char **argv;
3093 char *p;
3094 int len;
3095
3096 /* This is subtle. ->cmdtext is created only on first backgrounding.
3097 * (Think "cat, <ctrl-z>, fg, <ctrl-z>, fg, <ctrl-z>...." here...)
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003098 * On subsequent bg argv is trashed, but we won't use it */
Denis Vlasenko3ac0e002007-04-28 16:45:22 +00003099 if (pi->cmdtext)
3100 return pi->cmdtext;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003101 argv = pi->cmds[0].argv;
Denis Vlasenkoa8442002008-06-14 11:00:17 +00003102 if (!argv || !argv[0]) {
3103 pi->cmdtext = xzalloc(1);
3104 return pi->cmdtext;
3105 }
Denis Vlasenko3ac0e002007-04-28 16:45:22 +00003106
3107 len = 0;
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003108 do {
3109 len += strlen(*argv) + 1;
3110 } while (*++argv);
3111 p = xmalloc(len);
3112 pi->cmdtext = p;// = xmalloc(len);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003113 argv = pi->cmds[0].argv;
Denis Vlasenko3ac0e002007-04-28 16:45:22 +00003114 do {
3115 len = strlen(*argv);
3116 memcpy(p, *argv, len);
3117 p += len;
3118 *p++ = ' ';
3119 } while (*++argv);
3120 p[-1] = '\0';
3121 return pi->cmdtext;
3122}
3123
Eric Andersenbafd94f2001-05-02 16:11:59 +00003124static void insert_bg_job(struct pipe *pi)
3125{
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003126 struct pipe *job, **jobp;
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003127 int i;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003128
3129 /* Linear search for the ID of the job to use */
3130 pi->jobid = 1;
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003131 for (job = G.job_list; job; job = job->next)
3132 if (job->jobid >= pi->jobid)
3133 pi->jobid = job->jobid + 1;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003134
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003135 /* Add job to the list of running jobs */
3136 jobp = &G.job_list;
3137 while ((job = *jobp) != NULL)
3138 jobp = &job->next;
3139 job = *jobp = xmalloc(sizeof(*job));
Eric Andersenbafd94f2001-05-02 16:11:59 +00003140
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003141 *job = *pi; /* physical copy */
3142 job->next = NULL;
3143 job->cmds = xzalloc(sizeof(pi->cmds[0]) * pi->num_cmds);
3144 /* Cannot copy entire pi->cmds[] vector! This causes double frees */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003145 for (i = 0; i < pi->num_cmds; i++) {
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003146 job->cmds[i].pid = pi->cmds[i].pid;
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003147 /* all other fields are not used and stay zero */
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003148 }
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003149 job->cmdtext = xstrdup(get_cmdtext(pi));
Eric Andersenbafd94f2001-05-02 16:11:59 +00003150
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003151 if (G_interactive_fd)
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003152 printf("[%d] %d %s\n", job->jobid, job->cmds[0].pid, job->cmdtext);
3153 /* Last command's pid goes to $! */
3154 G.last_bg_pid = job->cmds[job->num_cmds - 1].pid;
3155 G.last_jobid = job->jobid;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003156}
3157
Eric Andersenbafd94f2001-05-02 16:11:59 +00003158static void remove_bg_job(struct pipe *pi)
3159{
3160 struct pipe *prev_pipe;
3161
Denis Vlasenko87a86552008-07-29 19:43:10 +00003162 if (pi == G.job_list) {
3163 G.job_list = pi->next;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003164 } else {
Denis Vlasenko87a86552008-07-29 19:43:10 +00003165 prev_pipe = G.job_list;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003166 while (prev_pipe->next != pi)
3167 prev_pipe = prev_pipe->next;
3168 prev_pipe->next = pi->next;
3169 }
Denis Vlasenko87a86552008-07-29 19:43:10 +00003170 if (G.job_list)
3171 G.last_jobid = G.job_list->jobid;
Eric Andersen028b65b2001-06-28 01:10:11 +00003172 else
Denis Vlasenko87a86552008-07-29 19:43:10 +00003173 G.last_jobid = 0;
Denis Vlasenko1359da62007-04-21 23:27:30 +00003174}
Eric Andersen028b65b2001-06-28 01:10:11 +00003175
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003176/* Remove a backgrounded job */
Denis Vlasenko1359da62007-04-21 23:27:30 +00003177static void delete_finished_bg_job(struct pipe *pi)
3178{
3179 remove_bg_job(pi);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003180 pi->stopped_cmds = 0;
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003181 free_pipe(pi);
Eric Andersenbafd94f2001-05-02 16:11:59 +00003182 free(pi);
3183}
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003184#endif /* JOB */
Eric Andersenbafd94f2001-05-02 16:11:59 +00003185
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003186/* Check to see if any processes have exited -- if they
3187 * have, figure out why and see if a job has completed */
Eric Andersenc798b072001-06-22 06:23:03 +00003188static int checkjobs(struct pipe* fg_pipe)
Eric Andersenbafd94f2001-05-02 16:11:59 +00003189{
Eric Andersenc798b072001-06-22 06:23:03 +00003190 int attributes;
3191 int status;
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003192#if ENABLE_HUSH_JOB
Eric Andersenbafd94f2001-05-02 16:11:59 +00003193 struct pipe *pi;
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00003194#endif
Eric Andersenbafd94f2001-05-02 16:11:59 +00003195 pid_t childpid;
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003196 int rcode = 0;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003197
Denis Vlasenkod5762932009-03-31 11:22:57 +00003198 debug_printf_jobs("checkjobs %p\n", fg_pipe);
3199
Denis Vlasenko7566bae2009-03-31 17:24:49 +00003200 errno = 0;
3201// if (G.handled_SIGCHLD == G.count_SIGCHLD)
3202// /* avoid doing syscall, nothing there anyway */
3203// return rcode;
3204
Eric Andersenc798b072001-06-22 06:23:03 +00003205 attributes = WUNTRACED;
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003206 if (fg_pipe == NULL)
Eric Andersenc798b072001-06-22 06:23:03 +00003207 attributes |= WNOHANG;
Eric Andersenc798b072001-06-22 06:23:03 +00003208
Denis Vlasenko1359da62007-04-21 23:27:30 +00003209/* Do we do this right?
3210 * bash-3.00# sleep 20 | false
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003211 * <ctrl-Z pressed>
Denis Vlasenko1359da62007-04-21 23:27:30 +00003212 * [3]+ Stopped sleep 20 | false
3213 * bash-3.00# echo $?
3214 * 1 <========== bg pipe is not fully done, but exitcode is already known!
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003215 * [hush 1.14.0: yes we do it right]
Denis Vlasenko1359da62007-04-21 23:27:30 +00003216 */
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003217 wait_more:
Denis Vlasenko7566bae2009-03-31 17:24:49 +00003218 while (1) {
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003219 int i;
Denis Vlasenko7566bae2009-03-31 17:24:49 +00003220 int dead;
3221
3222// i = G.count_SIGCHLD;
3223 childpid = waitpid(-1, &status, attributes);
3224 if (childpid <= 0) {
3225 if (childpid && errno != ECHILD)
3226 bb_perror_msg("waitpid");
3227// else /* Until next SIGCHLD, waitpid's are useless */
3228// G.handled_SIGCHLD = i;
3229 break;
3230 }
3231 dead = WIFEXITED(status) || WIFSIGNALED(status);
3232
Denis Vlasenkob61e13d2008-06-17 05:11:43 +00003233#if DEBUG_JOBS
Denis Vlasenko1359da62007-04-21 23:27:30 +00003234 if (WIFSTOPPED(status))
Denis Vlasenkod01ff132007-05-02 21:40:23 +00003235 debug_printf_jobs("pid %d stopped by sig %d (exitcode %d)\n",
Denis Vlasenko1359da62007-04-21 23:27:30 +00003236 childpid, WSTOPSIG(status), WEXITSTATUS(status));
3237 if (WIFSIGNALED(status))
Denis Vlasenkod01ff132007-05-02 21:40:23 +00003238 debug_printf_jobs("pid %d killed by sig %d (exitcode %d)\n",
Denis Vlasenko1359da62007-04-21 23:27:30 +00003239 childpid, WTERMSIG(status), WEXITSTATUS(status));
3240 if (WIFEXITED(status))
Denis Vlasenkod01ff132007-05-02 21:40:23 +00003241 debug_printf_jobs("pid %d exited, exitcode %d\n",
Denis Vlasenko1359da62007-04-21 23:27:30 +00003242 childpid, WEXITSTATUS(status));
3243#endif
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003244 /* Were we asked to wait for fg pipe? */
Eric Andersenc798b072001-06-22 06:23:03 +00003245 if (fg_pipe) {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003246 for (i = 0; i < fg_pipe->num_cmds; i++) {
3247 debug_printf_jobs("check pid %d\n", fg_pipe->cmds[i].pid);
3248 if (fg_pipe->cmds[i].pid != childpid)
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003249 continue;
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003250 if (dead) {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003251 fg_pipe->cmds[i].pid = 0;
3252 fg_pipe->alive_cmds--;
3253 if (i == fg_pipe->num_cmds - 1) {
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003254 /* last process gives overall exitstatus */
Denis Vlasenko38e626d2009-04-18 12:58:19 +00003255 /* Note: is WIFSIGNALED, WEXITSTATUS = sig + 128 */
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003256 rcode = WEXITSTATUS(status);
Denis Vlasenko5ec61322008-06-24 00:50:07 +00003257 IF_HAS_KEYWORDS(if (fg_pipe->pi_inverted) rcode = !rcode;)
Denis Vlasenko40e84372009-04-18 11:23:38 +00003258 /* bash prints killing signal's name for *last*
3259 * process in pipe (prints just newline for SIGINT).
Denis Vlasenko38e626d2009-04-18 12:58:19 +00003260 * Mimic this. Example: "sleep 5" + ^\
Denis Vlasenko40e84372009-04-18 11:23:38 +00003261 */
3262 if (WIFSIGNALED(status)) {
Denis Vlasenko38e626d2009-04-18 12:58:19 +00003263 int sig = WTERMSIG(status);
3264 printf("%s\n", sig == SIGINT ? "" : get_signame(sig));
Denis Vlasenko40e84372009-04-18 11:23:38 +00003265 }
Denis Vlasenko1359da62007-04-21 23:27:30 +00003266 }
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003267 } else {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003268 fg_pipe->cmds[i].is_stopped = 1;
3269 fg_pipe->stopped_cmds++;
Eric Andersenc798b072001-06-22 06:23:03 +00003270 }
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003271 debug_printf_jobs("fg_pipe: alive_cmds %d stopped_cmds %d\n",
3272 fg_pipe->alive_cmds, fg_pipe->stopped_cmds);
3273 if (fg_pipe->alive_cmds - fg_pipe->stopped_cmds <= 0) {
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003274 /* All processes in fg pipe have exited or stopped */
3275/* Note: *non-interactive* bash does not continue if all processes in fg pipe
3276 * are stopped. Testcase: "cat | cat" in a script (not on command line!)
3277 * and "killall -STOP cat" */
3278 if (G_interactive_fd) {
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003279#if ENABLE_HUSH_JOB
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003280 if (fg_pipe->alive_cmds)
3281 insert_bg_job(fg_pipe);
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003282#endif
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003283 return rcode;
3284 }
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003285 }
3286 /* There are still running processes in the fg pipe */
3287 goto wait_more; /* do waitpid again */
Eric Andersenc798b072001-06-22 06:23:03 +00003288 }
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003289 /* it wasnt fg_pipe, look for process in bg pipes */
Eric Andersenc798b072001-06-22 06:23:03 +00003290 }
3291
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003292#if ENABLE_HUSH_JOB
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003293 /* We asked to wait for bg or orphaned children */
3294 /* No need to remember exitcode in this case */
Denis Vlasenko87a86552008-07-29 19:43:10 +00003295 for (pi = G.job_list; pi; pi = pi->next) {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003296 for (i = 0; i < pi->num_cmds; i++) {
3297 if (pi->cmds[i].pid == childpid)
Denis Vlasenko5f786c22007-04-20 08:35:45 +00003298 goto found_pi_and_prognum;
Eric Andersen52a97ca2001-06-22 06:49:26 +00003299 }
Eric Andersenbafd94f2001-05-02 16:11:59 +00003300 }
Denis Vlasenko5f786c22007-04-20 08:35:45 +00003301 /* Happens when shell is used as init process (init=/bin/sh) */
3302 debug_printf("checkjobs: pid %d was not in our list!\n", childpid);
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003303 continue; /* do waitpid again */
Eric Andersenaeb44c42001-05-22 20:29:00 +00003304
Denis Vlasenko5f786c22007-04-20 08:35:45 +00003305 found_pi_and_prognum:
Denis Vlasenko1359da62007-04-21 23:27:30 +00003306 if (dead) {
Eric Andersenbafd94f2001-05-02 16:11:59 +00003307 /* child exited */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003308 pi->cmds[i].pid = 0;
3309 pi->alive_cmds--;
3310 if (!pi->alive_cmds) {
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003311 if (G_interactive_fd)
Mike Frysinger87824e02009-03-30 00:19:30 +00003312 printf(JOB_STATUS_FORMAT, pi->jobid,
3313 "Done", pi->cmdtext);
Denis Vlasenko1359da62007-04-21 23:27:30 +00003314 delete_finished_bg_job(pi);
Eric Andersenbafd94f2001-05-02 16:11:59 +00003315 }
3316 } else {
3317 /* child stopped */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003318 pi->cmds[i].is_stopped = 1;
3319 pi->stopped_cmds++;
Eric Andersenbafd94f2001-05-02 16:11:59 +00003320 }
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00003321#endif
Denis Vlasenko003f9fb2008-06-24 00:47:58 +00003322 } /* while (waitpid succeeds)... */
Eric Andersenbafd94f2001-05-02 16:11:59 +00003323
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003324 return rcode;
Eric Andersenada18ff2001-05-21 16:18:22 +00003325}
3326
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003327#if ENABLE_HUSH_JOB
Denis Vlasenko52881e92007-04-21 13:42:52 +00003328static int checkjobs_and_fg_shell(struct pipe* fg_pipe)
3329{
3330 pid_t p;
3331 int rcode = checkjobs(fg_pipe);
3332 /* Job finished, move the shell to the foreground */
Denis Vlasenko170435c2007-05-23 13:01:10 +00003333 p = getpgid(0); /* pgid of our process */
3334 debug_printf_jobs("fg'ing ourself: getpgid(0)=%d\n", (int)p);
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003335 tcsetpgrp(G_interactive_fd, p);
Denis Vlasenko52881e92007-04-21 13:42:52 +00003336 return rcode;
3337}
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00003338#endif
Denis Vlasenko52881e92007-04-21 13:42:52 +00003339
Denis Vlasenko34d4d892009-04-04 20:24:37 +00003340/* Start all the jobs, but don't wait for anything to finish.
3341 * See checkjobs().
Eric Andersen25f27032001-04-26 23:22:31 +00003342 *
Denis Vlasenko552433b2009-04-04 19:29:21 +00003343 * Return code is normally -1, when the caller has to wait for children
Eric Andersen25f27032001-04-26 23:22:31 +00003344 * to finish to determine the exit status of the pipe. If the pipe
3345 * is a simple builtin command, however, the action is done by the
Denis Vlasenko05743d72008-02-10 12:10:08 +00003346 * time run_pipe returns, and the exit code is provided as the
Eric Andersen25f27032001-04-26 23:22:31 +00003347 * return value.
3348 *
Denis Vlasenko170435c2007-05-23 13:01:10 +00003349 * Returns -1 only if started some children. IOW: we have to
3350 * mask out retvals of builtins etc with 0xff!
Denis Vlasenko552433b2009-04-04 19:29:21 +00003351 *
3352 * The only case when we do not need to [v]fork is when the pipe
3353 * is single, non-backgrounded, non-subshell command. Examples:
3354 * cmd ; ... { list } ; ...
3355 * cmd && ... { list } && ...
3356 * cmd || ... { list } || ...
3357 * If it is, then we can run cmd as a builtin, NOFORK [do we do this?],
3358 * or (if SH_STANDALONE) an applet, and we can run the { list }
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003359 * with run_list. If it isn't one of these, we fork and exec cmd.
Denis Vlasenko552433b2009-04-04 19:29:21 +00003360 *
3361 * Cases when we must fork:
3362 * non-single: cmd | cmd
3363 * backgrounded: cmd & { list } &
3364 * subshell: ( list ) [&]
Eric Andersen25f27032001-04-26 23:22:31 +00003365 */
Denis Vlasenko05743d72008-02-10 12:10:08 +00003366static int run_pipe(struct pipe *pi)
Eric Andersen25f27032001-04-26 23:22:31 +00003367{
Denis Vlasenko552433b2009-04-04 19:29:21 +00003368 static const char *const null_ptr = NULL;
Eric Andersen25f27032001-04-26 23:22:31 +00003369 int i;
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003370 int nextin;
3371 int pipefds[2]; /* pipefds[0] is for reading */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003372 struct command *command;
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003373 char **argv_expanded;
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003374 char **argv;
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003375 char *p;
Denis Vlasenkof5294e12007-04-14 10:09:57 +00003376 /* it is not always needed, but we aim to smaller code */
3377 int squirrel[] = { -1, -1, -1 };
3378 int rcode;
Eric Andersen25f27032001-04-26 23:22:31 +00003379
Denis Vlasenko552433b2009-04-04 19:29:21 +00003380 debug_printf_exec("run_pipe start: members:%d\n", pi->num_cmds);
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003381 debug_enter();
Denis Vlasenko4ac530c2007-05-02 15:35:45 +00003382
Denis Vlasenko552433b2009-04-04 19:29:21 +00003383 USE_HUSH_JOB(pi->pgrp = -1;)
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003384 pi->stopped_cmds = 0;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003385 command = &(pi->cmds[0]);
Denis Vlasenko552433b2009-04-04 19:29:21 +00003386 argv_expanded = NULL;
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003387
Denis Vlasenko552433b2009-04-04 19:29:21 +00003388 if (pi->num_cmds != 1
3389 || pi->followup == PIPE_BG
3390 || command->grp_type == GRP_SUBSHELL
3391 ) {
3392 goto must_fork;
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003393 }
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003394
Denis Vlasenko552433b2009-04-04 19:29:21 +00003395 pi->alive_cmds = 1;
3396
3397 debug_printf_exec(": group:%p argv:'%s'\n",
3398 command->group, command->argv ? command->argv[0] : "NONE");
3399
3400 if (command->group) {
3401#if ENABLE_HUSH_FUNCTIONS
3402 if (command->grp_type == GRP_FUNCTION) {
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003403 /* "executing" func () { list } */
3404 struct function *funcp;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003405
Denis Vlasenkobc569742009-04-12 20:35:19 +00003406 funcp = new_function(command->argv[0]);
3407 /* funcp->name is already set to argv[0] */
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003408 funcp->body = command->group;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003409#if !BB_MMU
3410 funcp->body_as_string = command->group_as_string;
3411 command->group_as_string = NULL;
3412#endif
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003413 command->group = NULL;
3414 command->argv[0] = NULL;
Denis Vlasenkoed055212009-04-11 10:37:10 +00003415 debug_printf_exec("cmd %p has child func at %p\n", command, funcp);
3416 funcp->parent_cmd = command;
3417 command->child_func = funcp;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003418
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003419 debug_printf_exec("run_pipe: return EXIT_SUCCESS\n");
3420 debug_leave();
Denis Vlasenko552433b2009-04-04 19:29:21 +00003421 return EXIT_SUCCESS;
3422 }
3423#endif
3424 /* { list } */
3425 debug_printf("non-subshell group\n");
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003426 rcode = 1; /* exitcode if redir failed */
3427 if (setup_redirects(command, squirrel) == 0) {
3428 debug_printf_exec(": run_list\n");
3429 rcode = run_list(command->group) & 0xff;
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003430 }
Eric Andersen04407e52001-06-07 16:42:05 +00003431 restore_redirects(squirrel);
Denis Vlasenko5ec61322008-06-24 00:50:07 +00003432 IF_HAS_KEYWORDS(if (pi->pi_inverted) rcode = !rcode;)
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003433 debug_leave();
3434 debug_printf_exec("run_pipe: return %d\n", rcode);
Denis Vlasenko05743d72008-02-10 12:10:08 +00003435 return rcode;
Denis Vlasenkof03dbed2007-04-13 19:55:50 +00003436 }
3437
Denis Vlasenko552433b2009-04-04 19:29:21 +00003438 argv = command->argv ? command->argv : (char **) &null_ptr;
3439 {
3440 const struct built_in_command *x;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003441#if ENABLE_HUSH_FUNCTIONS
3442 const struct function *funcp;
3443#else
3444 enum { funcp = 0 };
3445#endif
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003446 char **new_env = NULL;
3447 char **old_env = NULL;
3448
Denis Vlasenko552433b2009-04-04 19:29:21 +00003449 if (argv[command->assignment_cnt] == NULL) {
3450 /* Assignments, but no command */
3451 /* Ensure redirects take effect. Try "a=t >file" */
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003452 rcode = setup_redirects(command, squirrel);
Denis Vlasenko552433b2009-04-04 19:29:21 +00003453 restore_redirects(squirrel);
3454 /* Set shell variables */
3455 while (*argv) {
3456 p = expand_string_to_string(*argv);
3457 debug_printf_exec("set shell var:'%s'->'%s'\n",
3458 *argv, p);
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00003459 set_local_var(p, 0, 0);
Denis Vlasenko552433b2009-04-04 19:29:21 +00003460 argv++;
Eric Andersen78a7c992001-05-15 16:30:25 +00003461 }
Denis Vlasenko552433b2009-04-04 19:29:21 +00003462 /* Do we need to flag set_local_var() errors?
3463 * "assignment to readonly var" and "putenv error"
3464 */
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003465 IF_HAS_KEYWORDS(if (pi->pi_inverted) rcode = !rcode;)
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003466 debug_leave();
3467 debug_printf_exec("run_pipe: return %d\n", rcode);
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003468 return rcode;
Eric Andersen78a7c992001-05-15 16:30:25 +00003469 }
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003470
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003471 /* Expand the rest into (possibly) many strings each */
Denis Vlasenko552433b2009-04-04 19:29:21 +00003472 argv_expanded = expand_strvec_to_strvec(argv + command->assignment_cnt);
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003473
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003474 x = find_builtin(argv_expanded[0]);
3475#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003476 funcp = NULL;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003477 if (!x)
3478 funcp = find_function(argv_expanded[0]);
3479#endif
3480 if (x || funcp) {
3481 if (!funcp) {
3482 if (x->function == builtin_exec && argv_expanded[1] == NULL) {
3483 debug_printf("exec with redirects only\n");
3484 rcode = setup_redirects(command, NULL);
3485 goto clean_up_and_ret1;
3486 }
Eric Andersen25f27032001-04-26 23:22:31 +00003487 }
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003488 /* setup_redirects acts on file descriptors, not FILEs.
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003489 * This is perfect for work that comes after exec().
3490 * Is it really safe for inline use? Experimentally,
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00003491 * things seem to work. */
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003492 rcode = setup_redirects(command, squirrel);
3493 if (rcode == 0) {
3494 new_env = expand_assignments(argv, command->assignment_cnt);
3495 old_env = putenv_all_and_save_old(new_env);
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003496 if (!funcp) {
3497 debug_printf_exec(": builtin '%s' '%s'...\n",
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003498 x->cmd, argv_expanded[1]);
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003499 rcode = x->function(argv_expanded) & 0xff;
Denis Vlasenko38e626d2009-04-18 12:58:19 +00003500 fflush(NULL);
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003501 }
3502#if ENABLE_HUSH_FUNCTIONS
3503 else {
3504 debug_printf_exec(": function '%s' '%s'...\n",
3505 funcp->name, argv_expanded[1]);
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00003506 rcode = run_function(funcp, argv_expanded) & 0xff;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003507 }
3508#endif
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003509 }
Denis Vlasenkof886fd22008-10-13 12:36:05 +00003510#if ENABLE_FEATURE_SH_STANDALONE
3511 clean_up_and_ret:
3512#endif
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003513 restore_redirects(squirrel);
3514 free_strings_and_unsetenv(new_env, 1);
3515 putenv_all(old_env);
Denis Vlasenkocc90f442009-04-08 16:40:34 +00003516 /* Free the pointers, but the strings themselves
3517 * are in environ now, don't use free_strings! */
3518 free(old_env);
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003519 clean_up_and_ret1:
3520 free(argv_expanded);
3521 IF_HAS_KEYWORDS(if (pi->pi_inverted) rcode = !rcode;)
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003522 debug_leave();
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003523 debug_printf_exec("run_pipe return %d\n", rcode);
3524 return rcode;
Eric Andersen25f27032001-04-26 23:22:31 +00003525 }
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00003526
Denis Vlasenkof5294e12007-04-14 10:09:57 +00003527#if ENABLE_FEATURE_SH_STANDALONE
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003528 i = find_applet_by_name(argv_expanded[0]);
3529 if (i >= 0 && APPLET_IS_NOFORK(i)) {
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003530 rcode = setup_redirects(command, squirrel);
3531 if (rcode == 0) {
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003532 new_env = expand_assignments(argv, command->assignment_cnt);
3533 old_env = putenv_all_and_save_old(new_env);
3534 debug_printf_exec(": run_nofork_applet '%s' '%s'...\n",
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00003535 argv_expanded[0], argv_expanded[1]);
Denis Vlasenkoc4ada792009-04-15 23:29:00 +00003536 rcode = run_nofork_applet(i, argv_expanded);
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003537 }
Denis Vlasenko22d10a02008-10-13 08:53:43 +00003538 goto clean_up_and_ret;
Denis Vlasenkof5294e12007-04-14 10:09:57 +00003539 }
3540#endif
Denis Vlasenko552433b2009-04-04 19:29:21 +00003541 /* It is neither builtin nor applet. We must fork. */
Eric Andersen25f27032001-04-26 23:22:31 +00003542 }
3543
Denis Vlasenko552433b2009-04-04 19:29:21 +00003544 must_fork:
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003545 /* NB: argv_expanded may already be created, and that
3546 * might include `cmd` runs! Do not rerun it! We *must*
3547 * use argv_expanded if it's non-NULL */
3548
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003549 /* Going to fork a child per each pipe member */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003550 pi->alive_cmds = 0;
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003551 nextin = 0;
3552
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003553 for (i = 0; i < pi->num_cmds; i++) {
Denis Vlasenko76d50412008-06-10 16:19:39 +00003554#if !BB_MMU
Denis Vlasenkof886fd22008-10-13 12:36:05 +00003555 volatile nommu_save_t nommu_save;
3556 nommu_save.new_env = NULL;
3557 nommu_save.old_env = NULL;
3558 nommu_save.argv = NULL;
Denis Vlasenko27014ed2009-04-15 21:48:23 +00003559 nommu_save.argv_from_re_execing = NULL;
Denis Vlasenko76d50412008-06-10 16:19:39 +00003560#endif
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003561 command = &(pi->cmds[i]);
3562 if (command->argv) {
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00003563 debug_printf_exec(": pipe member '%s' '%s'...\n",
3564 command->argv[0], command->argv[1]);
Denis Vlasenko552433b2009-04-04 19:29:21 +00003565 } else {
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003566 debug_printf_exec(": pipe member with no argv\n");
Denis Vlasenko552433b2009-04-04 19:29:21 +00003567 }
Eric Andersen25f27032001-04-26 23:22:31 +00003568
3569 /* pipes are inserted between pairs of commands */
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003570 pipefds[0] = 0;
3571 pipefds[1] = 1;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003572 if ((i + 1) < pi->num_cmds)
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003573 xpipe(pipefds);
Eric Andersen25f27032001-04-26 23:22:31 +00003574
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003575 command->pid = BB_MMU ? fork() : vfork();
3576 if (!command->pid) { /* child */
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003577#if ENABLE_HUSH_JOB
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00003578 disable_restore_tty_pgrp_on_exit();
Denis Vlasenkod5762932009-03-31 11:22:57 +00003579
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003580 /* Every child adds itself to new process group
Denis Vlasenko05743d72008-02-10 12:10:08 +00003581 * with pgid == pid_of_first_child_in_pipe */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003582 if (G.run_list_level == 1 && G_interactive_fd) {
Denis Vlasenko05743d72008-02-10 12:10:08 +00003583 pid_t pgrp;
Denis Vlasenko05743d72008-02-10 12:10:08 +00003584 pgrp = pi->pgrp;
3585 if (pgrp < 0) /* true for 1st process only */
3586 pgrp = getpid();
3587 if (setpgid(0, pgrp) == 0 && pi->followup != PIPE_BG) {
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003588 /* We do it in *every* child, not just first,
3589 * to avoid races */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003590 tcsetpgrp(G_interactive_fd, pgrp);
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003591 }
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003592 }
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00003593#endif
Denis Vlasenko8412d792007-10-01 09:59:47 +00003594 xmove_fd(nextin, 0);
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003595 xmove_fd(pipefds[1], 1); /* write end */
3596 if (pipefds[0] > 1)
3597 close(pipefds[0]); /* read end */
Eric Andersen25f27032001-04-26 23:22:31 +00003598 /* Like bash, explicit redirects override pipes,
3599 * and the pipe fd is available for dup'ing. */
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00003600 if (setup_redirects(command, NULL))
3601 _exit(1);
Eric Andersen52a97ca2001-06-22 06:49:26 +00003602
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00003603 /* Restore default handlers just prior to exec */
Denis Vlasenkoabedaac2009-03-31 12:03:40 +00003604 /*signal(SIGCHLD, SIG_DFL); - so far we don't have any handlers */
3605
Denis Vlasenkof886fd22008-10-13 12:36:05 +00003606 /* Stores to nommu_save list of env vars putenv'ed
3607 * (NOMMU, on MMU we don't need that) */
3608 /* cast away volatility... */
3609 pseudo_exec((nommu_save_t*) &nommu_save, command, argv_expanded);
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00003610 /* pseudo_exec() does not return */
Eric Andersen25f27032001-04-26 23:22:31 +00003611 }
Denis Vlasenkocc4c6932009-04-05 07:38:48 +00003612
Denis Vlasenkof9375282009-04-05 19:13:39 +00003613 /* parent or error */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00003614 enable_restore_tty_pgrp_on_exit();
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00003615#if !BB_MMU
Denis Vlasenkof886fd22008-10-13 12:36:05 +00003616 /* Clean up after vforked child */
3617 free(nommu_save.argv);
Denis Vlasenko27014ed2009-04-15 21:48:23 +00003618 free(nommu_save.argv_from_re_execing);
Denis Vlasenkof886fd22008-10-13 12:36:05 +00003619 free_strings_and_unsetenv(nommu_save.new_env, 1);
3620 putenv_all(nommu_save.old_env);
Denis Vlasenkocc90f442009-04-08 16:40:34 +00003621 /* Free the pointers, but the strings themselves
3622 * are in environ now, don't use free_strings! */
3623 free(nommu_save.old_env);
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00003624#endif
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00003625 free(argv_expanded);
3626 argv_expanded = NULL;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003627 if (command->pid < 0) { /* [v]fork failed */
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003628 /* Clearly indicate, was it fork or vfork */
Denis Vlasenko82604e92008-07-01 15:59:42 +00003629 bb_perror_msg(BB_MMU ? "fork" : "vfork");
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003630 } else {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003631 pi->alive_cmds++;
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003632#if ENABLE_HUSH_JOB
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003633 /* Second and next children need to know pid of first one */
3634 if (pi->pgrp < 0)
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003635 pi->pgrp = command->pid;
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00003636#endif
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003637 }
Eric Andersen25f27032001-04-26 23:22:31 +00003638
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003639 if (i)
3640 close(nextin);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003641 if ((i + 1) < pi->num_cmds)
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003642 close(pipefds[1]); /* write end */
3643 /* Pass read (output) pipe end to next iteration */
Eric Andersen25f27032001-04-26 23:22:31 +00003644 nextin = pipefds[0];
3645 }
Denis Vlasenkod2c450c2008-01-08 20:32:12 +00003646
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003647 if (!pi->alive_cmds) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003648 debug_leave();
Denis Vlasenko05743d72008-02-10 12:10:08 +00003649 debug_printf_exec("run_pipe return 1 (all forks failed, no children)\n");
3650 return 1;
3651 }
3652
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003653 debug_leave();
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003654 debug_printf_exec("run_pipe return -1 (%u children started)\n", pi->alive_cmds);
Eric Andersen25f27032001-04-26 23:22:31 +00003655 return -1;
3656}
3657
Denis Vlasenko4b924f32007-05-30 00:29:55 +00003658#ifndef debug_print_tree
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003659static void debug_print_tree(struct pipe *pi, int lvl)
3660{
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003661 static const char *const PIPE[] = {
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003662 [PIPE_SEQ] = "SEQ",
3663 [PIPE_AND] = "AND",
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00003664 [PIPE_OR ] = "OR" ,
3665 [PIPE_BG ] = "BG" ,
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003666 };
3667 static const char *RES[] = {
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003668 [RES_NONE ] = "NONE" ,
Denis Vlasenko06810332007-05-21 23:30:54 +00003669#if ENABLE_HUSH_IF
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003670 [RES_IF ] = "IF" ,
3671 [RES_THEN ] = "THEN" ,
3672 [RES_ELIF ] = "ELIF" ,
3673 [RES_ELSE ] = "ELSE" ,
3674 [RES_FI ] = "FI" ,
Denis Vlasenko06810332007-05-21 23:30:54 +00003675#endif
3676#if ENABLE_HUSH_LOOPS
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003677 [RES_FOR ] = "FOR" ,
3678 [RES_WHILE] = "WHILE",
3679 [RES_UNTIL] = "UNTIL",
3680 [RES_DO ] = "DO" ,
3681 [RES_DONE ] = "DONE" ,
Denis Vlasenkod91afa32008-07-29 11:10:01 +00003682#endif
3683#if ENABLE_HUSH_LOOPS || ENABLE_HUSH_CASE
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003684 [RES_IN ] = "IN" ,
Denis Vlasenko06810332007-05-21 23:30:54 +00003685#endif
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003686#if ENABLE_HUSH_CASE
3687 [RES_CASE ] = "CASE" ,
3688 [RES_MATCH] = "MATCH",
3689 [RES_CASEI] = "CASEI",
3690 [RES_ESAC ] = "ESAC" ,
3691#endif
Denis Vlasenko06810332007-05-21 23:30:54 +00003692 [RES_XXXX ] = "XXXX" ,
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003693 [RES_SNTX ] = "SNTX" ,
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003694 };
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003695 static const char *const GRPTYPE[] = {
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003696 "{}",
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00003697 "()",
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003698#if ENABLE_HUSH_FUNCTIONS
3699 "func()",
3700#endif
3701 };
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003702
3703 int pin, prn;
Denis Vlasenko219e88d2007-05-21 10:18:23 +00003704
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003705 pin = 0;
3706 while (pi) {
Denis Vlasenko219e88d2007-05-21 10:18:23 +00003707 fprintf(stderr, "%*spipe %d res_word=%s followup=%d %s\n", lvl*2, "",
3708 pin, RES[pi->res_word], pi->followup, PIPE[pi->followup]);
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003709 prn = 0;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003710 while (prn < pi->num_cmds) {
3711 struct command *command = &pi->cmds[prn];
3712 char **argv = command->argv;
Denis Vlasenkoa6c467f2007-05-05 15:10:52 +00003713
Denis Vlasenkocd418a22009-04-06 18:08:35 +00003714 fprintf(stderr, "%*s cmd %d assignment_cnt:%d",
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00003715 lvl*2, "", prn,
3716 command->assignment_cnt);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003717 if (command->group) {
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003718 fprintf(stderr, " group %s: (argv=%p)\n",
Denis Vlasenko371de4a2008-10-14 12:43:13 +00003719 GRPTYPE[command->grp_type],
Denis Vlasenkoa6c467f2007-05-05 15:10:52 +00003720 argv);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003721 debug_print_tree(command->group, lvl+1);
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003722 prn++;
3723 continue;
3724 }
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003725 if (argv) while (*argv) {
3726 fprintf(stderr, " '%s'", *argv);
3727 argv++;
Denis Vlasenko4b924f32007-05-30 00:29:55 +00003728 }
Denis Vlasenko400c5b62007-05-04 13:07:27 +00003729 fprintf(stderr, "\n");
3730 prn++;
3731 }
3732 pi = pi->next;
3733 pin++;
3734 }
3735}
3736#endif
3737
Denis Vlasenkoc666f712007-05-16 22:18:54 +00003738/* NB: called by pseudo_exec, and therefore must not modify any
3739 * global data until exec/_exit (we can be a child after vfork!) */
Denis Vlasenko05743d72008-02-10 12:10:08 +00003740static int run_list(struct pipe *pi)
Eric Andersen25f27032001-04-26 23:22:31 +00003741{
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003742#if ENABLE_HUSH_CASE
3743 char *case_word = NULL;
3744#endif
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003745#if ENABLE_HUSH_LOOPS
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003746 struct pipe *loop_top = NULL;
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003747 char *for_varname = NULL;
3748 char **for_lcur = NULL;
3749 char **for_list = NULL;
Denis Vlasenko06810332007-05-21 23:30:54 +00003750#endif
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003751 smallint last_followup;
3752 smalluint rcode;
Denis Vlasenkod91afa32008-07-29 11:10:01 +00003753#if ENABLE_HUSH_IF || ENABLE_HUSH_CASE
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003754 smalluint cond_code = 0;
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003755#else
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003756 enum { cond_code = 0 };
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003757#endif
Denis Vlasenko0e151382009-04-06 18:40:31 +00003758#if HAS_KEYWORDS
Denis Vlasenkocd418a22009-04-06 18:08:35 +00003759 smallint rword; /* enum reserved_style */
3760 smallint last_rword; /* ditto */
Denis Vlasenko0e151382009-04-06 18:40:31 +00003761#endif
Denis Vlasenko4ac530c2007-05-02 15:35:45 +00003762
Denis Vlasenkoc4ada792009-04-15 23:29:00 +00003763 debug_printf_exec("run_list start lvl %d\n", G.run_list_level);
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003764 debug_enter();
Denis Vlasenko4ac530c2007-05-02 15:35:45 +00003765
Denis Vlasenko06810332007-05-21 23:30:54 +00003766#if ENABLE_HUSH_LOOPS
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003767 /* Check syntax for "for" */
Denis Vlasenkocf22c892008-07-28 15:17:44 +00003768 for (struct pipe *cpipe = pi; cpipe; cpipe = cpipe->next) {
3769 if (cpipe->res_word != RES_FOR && cpipe->res_word != RES_IN)
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003770 continue;
3771 /* current word is FOR or IN (BOLD in comments below) */
Denis Vlasenkocf22c892008-07-28 15:17:44 +00003772 if (cpipe->next == NULL) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00003773 syntax_error("malformed for");
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003774 debug_leave();
Denis Vlasenko87a86552008-07-29 19:43:10 +00003775 debug_printf_exec("run_list lvl %d return 1\n", G.run_list_level);
Denis Vlasenko0c886c62007-01-30 22:30:09 +00003776 return 1;
Eric Andersenc7bda1c2004-03-15 08:29:22 +00003777 }
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003778 /* "FOR v; do ..." and "for v IN a b; do..." are ok */
Denis Vlasenkocf22c892008-07-28 15:17:44 +00003779 if (cpipe->next->res_word == RES_DO)
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003780 continue;
3781 /* next word is not "do". It must be "in" then ("FOR v in ...") */
Denis Vlasenkocf22c892008-07-28 15:17:44 +00003782 if (cpipe->res_word == RES_IN /* "for v IN a b; not_do..."? */
3783 || cpipe->next->res_word != RES_IN /* FOR v not_do_and_not_in..."? */
Denis Vlasenko0c886c62007-01-30 22:30:09 +00003784 ) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00003785 syntax_error("malformed for");
Denis Vlasenko0701dca2009-04-11 10:38:47 +00003786 debug_leave();
Denis Vlasenko87a86552008-07-29 19:43:10 +00003787 debug_printf_exec("run_list lvl %d return 1\n", G.run_list_level);
Denis Vlasenko0c886c62007-01-30 22:30:09 +00003788 return 1;
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003789 }
3790 }
Denis Vlasenko06810332007-05-21 23:30:54 +00003791#endif
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003792
Denis Vlasenkobe709c22008-07-28 00:01:16 +00003793 /* Past this point, all code paths should jump to ret: label
Denis Vlasenko12acec52008-07-28 15:15:59 +00003794 * in order to return, no direct "return" statements please.
3795 * This helps to ensure that no memory is leaked. */
Denis Vlasenkobe709c22008-07-28 00:01:16 +00003796
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003797#if ENABLE_HUSH_JOB
Denis Vlasenkoc4ada792009-04-15 23:29:00 +00003798 G.run_list_level++;
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003799#endif
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00003800
Denis Vlasenko0e151382009-04-06 18:40:31 +00003801#if HAS_KEYWORDS
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003802 rword = RES_NONE;
3803 last_rword = RES_XXXX;
Denis Vlasenko0e151382009-04-06 18:40:31 +00003804#endif
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003805 last_followup = PIPE_SEQ;
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00003806 rcode = G.last_exitcode;
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003807
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003808 /* Go through list of pipes, (maybe) executing them. */
3809 for (; pi; pi = USE_HUSH_LOOPS(rword == RES_DONE ? loop_top : ) pi->next) {
Denis Vlasenko422cd7c2009-03-31 12:41:52 +00003810 if (G.flag_SIGINT)
3811 break;
3812
Denis Vlasenko5ec61322008-06-24 00:50:07 +00003813 IF_HAS_KEYWORDS(rword = pi->res_word;)
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003814 debug_printf_exec(": rword=%d cond_code=%d last_rword=%d\n",
3815 rword, cond_code, last_rword);
Denis Vlasenko06810332007-05-21 23:30:54 +00003816#if ENABLE_HUSH_LOOPS
Denis Vlasenko4554b722008-07-29 13:36:09 +00003817 if ((rword == RES_WHILE || rword == RES_UNTIL || rword == RES_FOR)
Denis Vlasenko87a86552008-07-29 19:43:10 +00003818 && loop_top == NULL /* avoid bumping G.depth_of_loop twice */
Denis Vlasenko4554b722008-07-29 13:36:09 +00003819 ) {
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003820 /* start of a loop: remember where loop starts */
3821 loop_top = pi;
Denis Vlasenko87a86552008-07-29 19:43:10 +00003822 G.depth_of_loop++;
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003823 }
Denis Vlasenko06810332007-05-21 23:30:54 +00003824#endif
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003825 /* Still in the same "if...", "then..." or "do..." branch? */
Denis Vlasenko0e151382009-04-06 18:40:31 +00003826 if (IF_HAS_KEYWORDS(rword == last_rword &&) 1) {
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003827 if ((rcode == 0 && last_followup == PIPE_OR)
3828 || (rcode != 0 && last_followup == PIPE_AND)
3829 ) {
3830 /* It is "<true> || CMD" or "<false> && CMD"
3831 * and we should not execute CMD */
3832 debug_printf_exec("skipped cmd because of || or &&\n");
3833 last_followup = pi->followup;
3834 continue;
3835 }
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003836 }
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003837 last_followup = pi->followup;
Denis Vlasenko0e151382009-04-06 18:40:31 +00003838 IF_HAS_KEYWORDS(last_rword = rword;)
Denis Vlasenko06810332007-05-21 23:30:54 +00003839#if ENABLE_HUSH_IF
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003840 if (cond_code) {
3841 if (rword == RES_THEN) {
Denis Vlasenko0e151382009-04-06 18:40:31 +00003842 /* if false; then ... fi has exitcode 0! */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00003843 G.last_exitcode = rcode = EXIT_SUCCESS;
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003844 /* "if <false> THEN cmd": skip cmd */
3845 continue;
3846 }
3847 } else {
3848 if (rword == RES_ELSE || rword == RES_ELIF) {
3849 /* "if <true> then ... ELSE/ELIF cmd":
3850 * skip cmd and all following ones */
3851 break;
3852 }
3853 }
Denis Vlasenko06810332007-05-21 23:30:54 +00003854#endif
3855#if ENABLE_HUSH_LOOPS
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003856 if (rword == RES_FOR) { /* && pi->num_cmds - always == 1 */
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00003857 if (!for_lcur) {
Denis Vlasenkod65ea392007-10-01 10:02:25 +00003858 /* first loop through for */
Denis Vlasenkoff182a32008-07-05 20:29:59 +00003859
3860 static const char encoded_dollar_at[] ALIGN1 = {
3861 SPECIAL_VAR_SYMBOL, '@' | 0x80, SPECIAL_VAR_SYMBOL, '\0'
3862 }; /* encoded representation of "$@" */
3863 static const char *const encoded_dollar_at_argv[] = {
3864 encoded_dollar_at, NULL
3865 }; /* argv list with one element: "$@" */
3866 char **vals;
3867
3868 vals = (char**)encoded_dollar_at_argv;
Denis Vlasenkocf22c892008-07-28 15:17:44 +00003869 if (pi->next->res_word == RES_IN) {
Denis Vlasenkoff182a32008-07-05 20:29:59 +00003870 /* if no variable values after "in" we skip "for" */
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003871 if (!pi->next->cmds[0].argv) {
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00003872 G.last_exitcode = rcode = EXIT_SUCCESS;
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003873 debug_printf_exec(": null FOR: exitcode EXIT_SUCCESS\n");
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003874 break;
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003875 }
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003876 vals = pi->next->cmds[0].argv;
Denis Vlasenkoff182a32008-07-05 20:29:59 +00003877 } /* else: "for var; do..." -> assume "$@" list */
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003878 /* create list of variable values */
Denis Vlasenkoff182a32008-07-05 20:29:59 +00003879 debug_print_strings("for_list made from", vals);
3880 for_list = expand_strvec_to_strvec(vals);
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00003881 for_lcur = for_list;
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003882 debug_print_strings("for_list", for_list);
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003883 for_varname = pi->cmds[0].argv[0];
3884 pi->cmds[0].argv[0] = NULL;
Eric Andersenc7bda1c2004-03-15 08:29:22 +00003885 }
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003886 free(pi->cmds[0].argv[0]);
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00003887 if (!*for_lcur) {
Denis Vlasenko12acec52008-07-28 15:15:59 +00003888 /* "for" loop is over, clean up */
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00003889 free(for_list);
Denis Vlasenkobe709c22008-07-28 00:01:16 +00003890 for_list = NULL;
Denis Vlasenko03eb8bf2007-05-14 16:19:34 +00003891 for_lcur = NULL;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003892 pi->cmds[0].argv[0] = for_varname;
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003893 break;
Eric Andersen4c9b68f2002-04-13 12:33:41 +00003894 }
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003895 /* Insert next value from for_lcur */
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00003896 /* note: *for_lcur already has quotes removed, $var expanded, etc */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003897 pi->cmds[0].argv[0] = xasprintf("%s=%s", for_varname, *for_lcur++);
3898 pi->cmds[0].assignment_cnt = 1;
Eric Andersenc7bda1c2004-03-15 08:29:22 +00003899 }
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00003900 if (rword == RES_IN) {
3901 continue; /* "for v IN list;..." - "in" has no cmds anyway */
3902 }
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003903 if (rword == RES_DONE) {
3904 continue; /* "done" has no cmds too */
Eric Andersenc7bda1c2004-03-15 08:29:22 +00003905 }
Denis Vlasenko06810332007-05-21 23:30:54 +00003906#endif
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003907#if ENABLE_HUSH_CASE
3908 if (rword == RES_CASE) {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003909 case_word = expand_strvec_to_string(pi->cmds->argv);
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003910 continue;
3911 }
3912 if (rword == RES_MATCH) {
Denis Vlasenkofbeeb322008-07-31 00:17:01 +00003913 char **argv;
3914
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003915 if (!case_word) /* "case ... matched_word) ... WORD)": we executed selected branch, stop */
3916 break;
3917 /* all prev words didn't match, does this one match? */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003918 argv = pi->cmds->argv;
Denis Vlasenkofbeeb322008-07-31 00:17:01 +00003919 while (*argv) {
3920 char *pattern = expand_string_to_string(*argv);
3921 /* TODO: which FNM_xxx flags to use? */
3922 cond_code = (fnmatch(pattern, case_word, /*flags:*/ 0) != 0);
3923 free(pattern);
3924 if (cond_code == 0) { /* match! we will execute this branch */
3925 free(case_word); /* make future "word)" stop */
3926 case_word = NULL;
3927 break;
3928 }
3929 argv++;
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003930 }
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003931 continue;
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003932 }
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003933 if (rword == RES_CASEI) { /* inside of a case branch */
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003934 if (cond_code != 0)
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003935 continue; /* not matched yet, skip this pipe */
Denis Vlasenko17f02e72008-07-14 04:32:29 +00003936 }
3937#endif
Denis Vlasenkod5762932009-03-31 11:22:57 +00003938 /* Just pressing <enter> in shell should check for jobs.
3939 * OTOH, in non-interactive shell this is useless
3940 * and only leads to extra job checks */
3941 if (pi->num_cmds == 0) {
Denis Vlasenko60b392f2009-04-03 19:14:32 +00003942 if (G_interactive_fd)
Denis Vlasenkod5762932009-03-31 11:22:57 +00003943 goto check_jobs_and_continue;
3944 continue;
3945 }
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003946
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003947 /* After analyzing all keywords and conditions, we decided
Denis Vlasenkod5762932009-03-31 11:22:57 +00003948 * to execute this pipe. NB: have to do checkjobs(NULL)
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003949 * after run_pipe to collect any background children,
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003950 * even if list execution is to be stopped. */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00003951 debug_printf_exec(": run_pipe with %d members\n", pi->num_cmds);
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003952 {
3953 int r;
Denis Vlasenkodadfb492008-07-29 10:16:05 +00003954#if ENABLE_HUSH_LOOPS
Denis Vlasenko87a86552008-07-29 19:43:10 +00003955 G.flag_break_continue = 0;
Denis Vlasenkodadfb492008-07-29 10:16:05 +00003956#endif
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003957 rcode = r = run_pipe(pi); /* NB: rcode is a smallint */
3958 if (r != -1) {
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00003959 /* We ran a builtin, function, or group.
3960 * rcode is already known
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003961 * and we don't need to wait for anything. */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00003962 G.last_exitcode = rcode;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00003963 debug_printf_exec(": builtin/func exitcode %d\n", rcode);
Denis Vlasenko7566bae2009-03-31 17:24:49 +00003964 check_and_run_traps(0);
Denis Vlasenkodadfb492008-07-29 10:16:05 +00003965#if ENABLE_HUSH_LOOPS
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003966 /* Was it "break" or "continue"? */
Denis Vlasenko87a86552008-07-29 19:43:10 +00003967 if (G.flag_break_continue) {
3968 smallint fbc = G.flag_break_continue;
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003969 /* We might fall into outer *loop*,
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003970 * don't want to break it too */
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003971 if (loop_top) {
Denis Vlasenko87a86552008-07-29 19:43:10 +00003972 G.depth_break_continue--;
3973 if (G.depth_break_continue == 0)
3974 G.flag_break_continue = 0;
Denis Vlasenkofcf37c32008-07-29 11:37:15 +00003975 /* else: e.g. "continue 2" should *break* once, *then* continue */
3976 } /* else: "while... do... { we are here (innermost list is not a loop!) };...done" */
Denis Vlasenko87a86552008-07-29 19:43:10 +00003977 if (G.depth_break_continue != 0 || fbc == BC_BREAK)
Denis Vlasenkofcf37c32008-07-29 11:37:15 +00003978 goto check_jobs_and_break;
3979 /* "continue": simulate end of loop */
3980 rword = RES_DONE;
3981 continue;
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003982 }
Denis Vlasenkodadfb492008-07-29 10:16:05 +00003983#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00003984#if ENABLE_HUSH_FUNCTIONS
3985 if (G.flag_return_in_progress == 1)
3986 goto check_jobs_and_break;
3987#endif
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003988 } else if (pi->followup == PIPE_BG) {
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00003989 /* What does bash do with attempts to background builtins? */
Denis Vlasenkobcb25532008-07-28 23:04:34 +00003990 /* even bash 3.2 doesn't do that well with nested bg:
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003991 * try "{ { sleep 10; echo DEEP; } & echo HERE; } &".
3992 * I'm NOT treating inner &'s as jobs */
Denis Vlasenko7566bae2009-03-31 17:24:49 +00003993 check_and_run_traps(0);
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00003994#if ENABLE_HUSH_JOB
Denis Vlasenko87a86552008-07-29 19:43:10 +00003995 if (G.run_list_level == 1)
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003996{
3997debug_printf_exec("insert_bg_job1\n");
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00003998 insert_bg_job(pi);
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00003999debug_printf_exec("insert_bg_job2\n");
4000}
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00004001#endif
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00004002 G.last_exitcode = rcode = EXIT_SUCCESS;
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004003 debug_printf_exec(": cmd&: exitcode EXIT_SUCCESS\n");
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004004 } else {
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00004005#if ENABLE_HUSH_JOB
Denis Vlasenko60b392f2009-04-03 19:14:32 +00004006 if (G.run_list_level == 1 && G_interactive_fd) {
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004007 /* Waits for completion, then fg's main shell */
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004008 rcode = checkjobs_and_fg_shell(pi);
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004009 debug_printf_exec(": checkjobs_and_fg_shell exitcode %d\n", rcode);
Denis Vlasenko7566bae2009-03-31 17:24:49 +00004010 check_and_run_traps(0);
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004011 } else
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00004012#endif
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004013 { /* This one just waits for completion */
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004014 rcode = checkjobs(pi);
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004015 debug_printf_exec(": checkjobs exitcode %d\n", rcode);
Denis Vlasenko7566bae2009-03-31 17:24:49 +00004016 check_and_run_traps(0);
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004017 }
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00004018 G.last_exitcode = rcode;
Eric Andersen25f27032001-04-26 23:22:31 +00004019 }
4020 }
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004021
4022 /* Analyze how result affects subsequent commands */
Denis Vlasenko06810332007-05-21 23:30:54 +00004023#if ENABLE_HUSH_IF
Denis Vlasenko219e88d2007-05-21 10:18:23 +00004024 if (rword == RES_IF || rword == RES_ELIF)
Denis Vlasenkobcb25532008-07-28 23:04:34 +00004025 cond_code = rcode;
Denis Vlasenko06810332007-05-21 23:30:54 +00004026#endif
4027#if ENABLE_HUSH_LOOPS
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004028 /* Beware of "while false; true; do ..."! */
4029 if (pi->next && pi->next->res_word == RES_DO) {
4030 if (rword == RES_WHILE) {
4031 if (rcode) {
4032 /* "while false; do...done" - exitcode 0 */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00004033 G.last_exitcode = rcode = EXIT_SUCCESS;
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004034 debug_printf_exec(": while expr is false: breaking (exitcode:EXIT_SUCCESS)\n");
4035 goto check_jobs_and_break;
4036 }
Denis Vlasenko918a34b2008-07-28 23:17:31 +00004037 }
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004038 if (rword == RES_UNTIL) {
4039 if (!rcode) {
4040 debug_printf_exec(": until expr is true: breaking\n");
Denis Vlasenkobcb25532008-07-28 23:04:34 +00004041 check_jobs_and_break:
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004042 checkjobs(NULL);
4043 break;
4044 }
Denis Vlasenkobcb25532008-07-28 23:04:34 +00004045 }
Denis Vlasenko5e052ca2008-07-28 15:15:09 +00004046 }
Denis Vlasenko06810332007-05-21 23:30:54 +00004047#endif
Mike Frysinger8ec1c9d2009-03-29 00:45:26 +00004048
4049 check_jobs_and_continue:
Eric Andersen028b65b2001-06-28 01:10:11 +00004050 checkjobs(NULL);
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004051 } /* for (pi) */
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00004052
4053#if ENABLE_HUSH_JOB
Denis Vlasenkod5762932009-03-31 11:22:57 +00004054 G.run_list_level--;
Denis Vlasenkoac0e5ab2007-05-04 21:37:27 +00004055#endif
Denis Vlasenkobe709c22008-07-28 00:01:16 +00004056#if ENABLE_HUSH_LOOPS
Denis Vlasenkofcf37c32008-07-29 11:37:15 +00004057 if (loop_top)
Denis Vlasenko87a86552008-07-29 19:43:10 +00004058 G.depth_of_loop--;
Denis Vlasenkobe709c22008-07-28 00:01:16 +00004059 free(for_list);
4060#endif
4061#if ENABLE_HUSH_CASE
4062 free(case_word);
4063#endif
Denis Vlasenko0701dca2009-04-11 10:38:47 +00004064 debug_leave();
4065 debug_printf_exec("run_list lvl %d return %d\n", G.run_list_level + 1, rcode);
Eric Andersen25f27032001-04-26 23:22:31 +00004066 return rcode;
4067}
4068
Eric Andersen25f27032001-04-26 23:22:31 +00004069/* Select which version we will use */
Denis Vlasenko05743d72008-02-10 12:10:08 +00004070static int run_and_free_list(struct pipe *pi)
Eric Andersen25f27032001-04-26 23:22:31 +00004071{
Denis Vlasenko0c886c62007-01-30 22:30:09 +00004072 int rcode = 0;
Denis Vlasenko05743d72008-02-10 12:10:08 +00004073 debug_printf_exec("run_and_free_list entered\n");
Denis Vlasenko87a86552008-07-29 19:43:10 +00004074 if (!G.fake_mode) {
Denis Vlasenkoa2b11e32009-04-06 14:11:13 +00004075 debug_printf_exec(": run_list: 1st pipe with %d cmds\n", pi->num_cmds);
Denis Vlasenko05743d72008-02-10 12:10:08 +00004076 rcode = run_list(pi);
Eric Andersenc7bda1c2004-03-15 08:29:22 +00004077 }
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00004078 /* free_pipe_list has the side effect of clearing memory.
Denis Vlasenko05743d72008-02-10 12:10:08 +00004079 * In the long run that function can be merged with run_list,
Eric Andersen25f27032001-04-26 23:22:31 +00004080 * but doing that now would hobble the debugging effort. */
Denis Vlasenko0701dca2009-04-11 10:38:47 +00004081 free_pipe_list(pi);
Denis Vlasenko87f40ba2008-06-10 22:39:37 +00004082 debug_printf_exec("run_and_free_list return %d\n", rcode);
Eric Andersen25f27032001-04-26 23:22:31 +00004083 return rcode;
4084}
4085
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00004086
Denis Vlasenkoac678ec2007-04-16 22:32:04 +00004087static struct pipe *new_pipe(void)
4088{
Eric Andersen25f27032001-04-26 23:22:31 +00004089 struct pipe *pi;
Denis Vlasenko3ac0e002007-04-28 16:45:22 +00004090 pi = xzalloc(sizeof(struct pipe));
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004091 /*pi->followup = 0; - deliberately invalid value */
Denis Vlasenko5ec61322008-06-24 00:50:07 +00004092 /*pi->res_word = RES_NONE; - RES_NONE is 0 anyway */
Eric Andersen25f27032001-04-26 23:22:31 +00004093 return pi;
4094}
4095
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004096/* Command (member of a pipe) is complete, or we start a new pipe
4097 * if ctx->command is NULL.
4098 * No errors possible here.
4099 */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004100static int done_command(struct parse_context *ctx)
4101{
4102 /* The command is really already in the pipe structure, so
4103 * advance the pipe counter and make a new, null command. */
4104 struct pipe *pi = ctx->pipe;
4105 struct command *command = ctx->command;
4106
4107 if (command) {
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004108 if (IS_NULL_CMD(command)) {
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004109 debug_printf_parse("done_command: skipping null cmd, num_cmds=%d\n", pi->num_cmds);
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004110 goto clear_and_ret;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004111 }
4112 pi->num_cmds++;
4113 debug_printf_parse("done_command: ++num_cmds=%d\n", pi->num_cmds);
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004114 //debug_print_tree(ctx->list_head, 20);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004115 } else {
4116 debug_printf_parse("done_command: initializing, num_cmds=%d\n", pi->num_cmds);
4117 }
4118
4119 /* Only real trickiness here is that the uncommitted
4120 * command structure is not counted in pi->num_cmds. */
4121 pi->cmds = xrealloc(pi->cmds, sizeof(*pi->cmds) * (pi->num_cmds+1));
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004122 ctx->command = command = &pi->cmds[pi->num_cmds];
4123 clear_and_ret:
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004124 memset(command, 0, sizeof(*command));
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004125 return pi->num_cmds; /* used only for 0/nonzero check */
4126}
4127
4128static void done_pipe(struct parse_context *ctx, pipe_style type)
4129{
4130 int not_null;
4131
4132 debug_printf_parse("done_pipe entered, followup %d\n", type);
4133 /* Close previous command */
4134 not_null = done_command(ctx);
4135 ctx->pipe->followup = type;
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004136#if HAS_KEYWORDS
4137 ctx->pipe->pi_inverted = ctx->ctx_inverted;
4138 ctx->ctx_inverted = 0;
4139 ctx->pipe->res_word = ctx->ctx_res_w;
4140#endif
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004141
4142 /* Without this check, even just <enter> on command line generates
4143 * tree of three NOPs (!). Which is harmless but annoying.
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004144 * IOW: it is safe to do it unconditionally. */
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004145 if (not_null
Denis Vlasenko7f959372009-04-14 08:06:59 +00004146#if ENABLE_HUSH_IF
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004147 || ctx->ctx_res_w == RES_FI
Denis Vlasenko7f959372009-04-14 08:06:59 +00004148#endif
4149#if ENABLE_HUSH_LOOPS
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004150 || ctx->ctx_res_w == RES_DONE
4151 || ctx->ctx_res_w == RES_FOR
4152 || ctx->ctx_res_w == RES_IN
Denis Vlasenko7f959372009-04-14 08:06:59 +00004153#endif
4154#if ENABLE_HUSH_CASE
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004155 || ctx->ctx_res_w == RES_ESAC
4156#endif
4157 ) {
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004158 struct pipe *new_p;
4159 debug_printf_parse("done_pipe: adding new pipe: "
4160 "not_null:%d ctx->ctx_res_w:%d\n",
4161 not_null, ctx->ctx_res_w);
4162 new_p = new_pipe();
4163 ctx->pipe->next = new_p;
4164 ctx->pipe = new_p;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004165 /* RES_THEN, RES_DO etc are "sticky" -
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004166 * they remain set for pipes inside if/while.
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004167 * This is used to control execution.
4168 * RES_FOR and RES_IN are NOT sticky (needed to support
4169 * cases where variable or value happens to match a keyword):
4170 */
4171#if ENABLE_HUSH_LOOPS
4172 if (ctx->ctx_res_w == RES_FOR
4173 || ctx->ctx_res_w == RES_IN)
4174 ctx->ctx_res_w = RES_NONE;
4175#endif
4176#if ENABLE_HUSH_CASE
4177 if (ctx->ctx_res_w == RES_MATCH)
4178 ctx->ctx_res_w = RES_CASEI;
4179#endif
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004180 ctx->command = NULL; /* trick done_command below */
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004181 /* Create the memory for command, roughly:
4182 * ctx->pipe->cmds = new struct command;
4183 * ctx->command = &ctx->pipe->cmds[0];
4184 */
4185 done_command(ctx);
Denis Vlasenkocd418a22009-04-06 18:08:35 +00004186 //debug_print_tree(ctx->list_head, 10);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00004187 }
4188 debug_printf_parse("done_pipe return\n");
4189}
4190
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004191static void initialize_context(struct parse_context *ctx)
Eric Andersen25f27032001-04-26 23:22:31 +00004192{
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004193 memset(ctx, 0, sizeof(*ctx));
Denis Vlasenko1a735862007-05-23 00:32:25 +00004194 ctx->pipe = ctx->list_head = new_pipe();
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004195 /* Create the memory for command, roughly:
4196 * ctx->pipe->cmds = new struct command;
4197 * ctx->command = &ctx->pipe->cmds[0];
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004198 */
4199 done_command(ctx);
Eric Andersen25f27032001-04-26 23:22:31 +00004200}
4201
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004202/* If a reserved word is found and processed, parse context is modified
4203 * and 1 is returned.
Eric Andersen25f27032001-04-26 23:22:31 +00004204 */
Denis Vlasenko5ec61322008-06-24 00:50:07 +00004205#if HAS_KEYWORDS
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004206struct reserved_combo {
4207 char literal[6];
4208 unsigned char res;
4209 unsigned char assignment_flag;
4210 int flag;
4211};
4212enum {
4213 FLAG_END = (1 << RES_NONE ),
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004214#if ENABLE_HUSH_IF
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004215 FLAG_IF = (1 << RES_IF ),
4216 FLAG_THEN = (1 << RES_THEN ),
4217 FLAG_ELIF = (1 << RES_ELIF ),
4218 FLAG_ELSE = (1 << RES_ELSE ),
4219 FLAG_FI = (1 << RES_FI ),
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004220#endif
4221#if ENABLE_HUSH_LOOPS
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004222 FLAG_FOR = (1 << RES_FOR ),
4223 FLAG_WHILE = (1 << RES_WHILE),
4224 FLAG_UNTIL = (1 << RES_UNTIL),
4225 FLAG_DO = (1 << RES_DO ),
4226 FLAG_DONE = (1 << RES_DONE ),
4227 FLAG_IN = (1 << RES_IN ),
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004228#endif
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004229#if ENABLE_HUSH_CASE
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004230 FLAG_MATCH = (1 << RES_MATCH),
4231 FLAG_ESAC = (1 << RES_ESAC ),
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004232#endif
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004233 FLAG_START = (1 << RES_XXXX ),
4234};
4235
4236static const struct reserved_combo* match_reserved_word(o_string *word)
4237{
Eric Andersen25f27032001-04-26 23:22:31 +00004238 /* Mostly a list of accepted follow-up reserved words.
4239 * FLAG_END means we are done with the sequence, and are ready
4240 * to turn the compound list into a command.
4241 * FLAG_START means the word must start a new compound list.
4242 */
Denis Vlasenkoc72c1ed2007-01-30 22:31:26 +00004243 static const struct reserved_combo reserved_list[] = {
Denis Vlasenko06810332007-05-21 23:30:54 +00004244#if ENABLE_HUSH_IF
Denis Vlasenko2b576b82008-08-04 00:46:07 +00004245 { "!", RES_NONE, NOT_ASSIGNMENT , 0 },
4246 { "if", RES_IF, WORD_IS_KEYWORD, FLAG_THEN | FLAG_START },
4247 { "then", RES_THEN, WORD_IS_KEYWORD, FLAG_ELIF | FLAG_ELSE | FLAG_FI },
4248 { "elif", RES_ELIF, WORD_IS_KEYWORD, FLAG_THEN },
4249 { "else", RES_ELSE, WORD_IS_KEYWORD, FLAG_FI },
4250 { "fi", RES_FI, NOT_ASSIGNMENT , FLAG_END },
Denis Vlasenko06810332007-05-21 23:30:54 +00004251#endif
4252#if ENABLE_HUSH_LOOPS
Denis Vlasenko2b576b82008-08-04 00:46:07 +00004253 { "for", RES_FOR, NOT_ASSIGNMENT , FLAG_IN | FLAG_DO | FLAG_START },
4254 { "while", RES_WHILE, WORD_IS_KEYWORD, FLAG_DO | FLAG_START },
4255 { "until", RES_UNTIL, WORD_IS_KEYWORD, FLAG_DO | FLAG_START },
4256 { "in", RES_IN, NOT_ASSIGNMENT , FLAG_DO },
4257 { "do", RES_DO, WORD_IS_KEYWORD, FLAG_DONE },
4258 { "done", RES_DONE, NOT_ASSIGNMENT , FLAG_END },
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004259#endif
4260#if ENABLE_HUSH_CASE
Denis Vlasenko2b576b82008-08-04 00:46:07 +00004261 { "case", RES_CASE, NOT_ASSIGNMENT , FLAG_MATCH | FLAG_START },
4262 { "esac", RES_ESAC, NOT_ASSIGNMENT , FLAG_END },
Denis Vlasenko06810332007-05-21 23:30:54 +00004263#endif
Eric Andersen25f27032001-04-26 23:22:31 +00004264 };
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004265 const struct reserved_combo *r;
4266
4267 for (r = reserved_list; r < reserved_list + ARRAY_SIZE(reserved_list); r++) {
4268 if (strcmp(word->data, r->literal) == 0)
4269 return r;
4270 }
4271 return NULL;
4272}
Denis Vlasenkobb929512009-04-16 10:59:40 +00004273/* Return 0: not a keyword, 1: keyword
4274 */
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004275static int reserved_word(o_string *word, struct parse_context *ctx)
4276{
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004277#if ENABLE_HUSH_CASE
4278 static const struct reserved_combo reserved_match = {
Denis Vlasenko2b576b82008-08-04 00:46:07 +00004279 "", RES_MATCH, NOT_ASSIGNMENT , FLAG_MATCH | FLAG_ESAC
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004280 };
4281#endif
Denis Vlasenkoc72c1ed2007-01-30 22:31:26 +00004282 const struct reserved_combo *r;
Denis Vlasenkoc72c1ed2007-01-30 22:31:26 +00004283
Denis Vlasenkobb929512009-04-16 10:59:40 +00004284 if (word->o_quoted)
4285 return 0;
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004286 r = match_reserved_word(word);
4287 if (!r)
4288 return 0;
4289
4290 debug_printf("found reserved word %s, res %d\n", r->literal, r->res);
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004291#if ENABLE_HUSH_CASE
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004292 if (r->res == RES_IN && ctx->ctx_res_w == RES_CASE)
4293 /* "case word IN ..." - IN part starts first match part */
4294 r = &reserved_match;
4295 else
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004296#endif
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004297 if (r->flag == 0) { /* '!' */
4298 if (ctx->ctx_inverted) { /* bash doesn't accept '! ! true' */
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004299 syntax_error("! ! command");
Denis Vlasenkobb929512009-04-16 10:59:40 +00004300 ctx->ctx_res_w = RES_SNTX;
Eric Andersen25f27032001-04-26 23:22:31 +00004301 }
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004302 ctx->ctx_inverted = 1;
Denis Vlasenko1a735862007-05-23 00:32:25 +00004303 return 1;
Eric Andersen25f27032001-04-26 23:22:31 +00004304 }
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004305 if (r->flag & FLAG_START) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004306 struct parse_context *old;
Denis Vlasenkobb929512009-04-16 10:59:40 +00004307
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004308 old = xmalloc(sizeof(*old));
4309 debug_printf_parse("push stack %p\n", old);
4310 *old = *ctx; /* physical copy */
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004311 initialize_context(ctx);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004312 ctx->stack = old;
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004313 } else if (/*ctx->ctx_res_w == RES_NONE ||*/ !(ctx->old_flag & (1 << r->res))) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004314 syntax_error_at(word->data);
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004315 ctx->ctx_res_w = RES_SNTX;
4316 return 1;
Denis Vlasenkobb929512009-04-16 10:59:40 +00004317 } else {
4318 /* "{...} fi" is ok. "{...} if" is not
4319 * Example:
4320 * if { echo foo; } then { echo bar; } fi */
4321 if (ctx->command->group)
4322 done_pipe(ctx, PIPE_SEQ);
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004323 }
Denis Vlasenkobb929512009-04-16 10:59:40 +00004324
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004325 ctx->ctx_res_w = r->res;
4326 ctx->old_flag = r->flag;
Denis Vlasenkobb929512009-04-16 10:59:40 +00004327 word->o_assignment = r->assignment_flag;
4328
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004329 if (ctx->old_flag & FLAG_END) {
4330 struct parse_context *old;
Denis Vlasenkobb929512009-04-16 10:59:40 +00004331
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004332 done_pipe(ctx, PIPE_SEQ);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004333 debug_printf_parse("pop stack %p\n", ctx->stack);
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004334 old = ctx->stack;
4335 old->command->group = ctx->list_head;
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004336 old->command->grp_type = GRP_NORMAL;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00004337#if !BB_MMU
4338 o_addstr(&old->as_string, ctx->as_string.data);
4339 o_free_unsafe(&ctx->as_string);
4340 old->command->group_as_string = xstrdup(old->as_string.data);
4341 debug_printf_parse("pop, remembering as:'%s'\n",
4342 old->command->group_as_string);
4343#endif
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004344 *ctx = *old; /* physical copy */
4345 free(old);
4346 }
Denis Vlasenkoc3735272008-10-09 12:58:26 +00004347 return 1;
Eric Andersen25f27032001-04-26 23:22:31 +00004348}
Denis Vlasenko06810332007-05-21 23:30:54 +00004349#endif
Eric Andersen25f27032001-04-26 23:22:31 +00004350
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004351/* Word is complete, look at it and update parsing context.
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004352 * Normal return is 0. Syntax errors return 1.
4353 * Note: on return, word is reset, but not o_free'd!
4354 */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004355static int done_word(o_string *word, struct parse_context *ctx)
Eric Andersen25f27032001-04-26 23:22:31 +00004356{
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004357 struct command *command = ctx->command;
Eric Andersen25f27032001-04-26 23:22:31 +00004358
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004359 debug_printf_parse("done_word entered: '%s' %p\n", word->data, command);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004360 if (word->length == 0 && word->o_quoted == 0) {
Denis Vlasenkoab876cd2008-06-18 16:29:32 +00004361 debug_printf_parse("done_word return 0: true null, ignored\n");
4362 return 0;
Eric Andersen25f27032001-04-26 23:22:31 +00004363 }
Denis Vlasenko2b576b82008-08-04 00:46:07 +00004364
Eric Andersen25f27032001-04-26 23:22:31 +00004365 if (ctx->pending_redirect) {
Denis Vlasenkoab876cd2008-06-18 16:29:32 +00004366 /* We do not glob in e.g. >*.tmp case. bash seems to glob here
4367 * only if run as "bash", not "sh" */
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004368 /* http://www.opengroup.org/onlinepubs/009695399/utilities/xcu_chap02.html
4369 * "2.7 Redirection
4370 * ...the word that follows the redirection operator
4371 * shall be subjected to tilde expansion, parameter expansion,
4372 * command substitution, arithmetic expansion, and quote
4373 * removal. Pathname expansion shall not be performed
4374 * on the word by a non-interactive shell; an interactive
4375 * shell may perform it, but shall do so only when
4376 * the expansion would result in one word."
4377 */
Denis Vlasenkoab876cd2008-06-18 16:29:32 +00004378 ctx->pending_redirect->rd_filename = xstrdup(word->data);
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004379 /* Cater for >\file case:
4380 * >\a creates file a; >\\a, >"\a", >"\\a" create file \a
4381 * Same with heredocs:
4382 * for <<\H delim is H; <<\\H, <<"\H", <<"\\H" - \H
4383 */
4384 unbackslash(ctx->pending_redirect->rd_filename);
4385 /* Is it <<"HEREDOC"? */
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004386 if (ctx->pending_redirect->rd_type == REDIRECT_HEREDOC
4387 && word->o_quoted
4388 ) {
4389 ctx->pending_redirect->rd_dup |= HEREDOC_QUOTED;
4390 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004391 debug_printf_parse("word stored in rd_filename: '%s'\n", word->data);
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004392 ctx->pending_redirect = NULL;
Eric Andersen25f27032001-04-26 23:22:31 +00004393 } else {
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004394 /* If this word wasn't an assignment, next ones definitely
4395 * can't be assignments. Even if they look like ones. */
4396 if (word->o_assignment != DEFINITELY_ASSIGNMENT
4397 && word->o_assignment != WORD_IS_KEYWORD
4398 ) {
4399 word->o_assignment = NOT_ASSIGNMENT;
4400 } else {
4401 if (word->o_assignment == DEFINITELY_ASSIGNMENT)
4402 command->assignment_cnt++;
4403 word->o_assignment = MAYBE_ASSIGNMENT;
4404 }
4405
Denis Vlasenko5ec61322008-06-24 00:50:07 +00004406#if HAS_KEYWORDS
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004407# if ENABLE_HUSH_CASE
Denis Vlasenko757361f2008-07-14 08:26:47 +00004408 if (ctx->ctx_dsemicolon
4409 && strcmp(word->data, "esac") != 0 /* not "... pattern) cmd;; esac" */
4410 ) {
Denis Vlasenko395ae452008-07-14 06:29:38 +00004411 /* already done when ctx_dsemicolon was set to 1: */
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004412 /* ctx->ctx_res_w = RES_MATCH; */
4413 ctx->ctx_dsemicolon = 0;
4414 } else
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004415# endif
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004416 if (!command->argv /* if it's the first word... */
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004417# if ENABLE_HUSH_LOOPS
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004418 && ctx->ctx_res_w != RES_FOR /* ...not after FOR or IN */
4419 && ctx->ctx_res_w != RES_IN
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004420# endif
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004421 ) {
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004422 debug_printf_parse("checking '%s' for reserved-ness\n", word->data);
Denis Vlasenkoa8442002008-06-14 11:00:17 +00004423 if (reserved_word(word, ctx)) {
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004424 o_reset_to_empty_unquoted(word);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00004425 debug_printf_parse("done_word return %d\n",
4426 (ctx->ctx_res_w == RES_SNTX));
Denis Vlasenko5ec61322008-06-24 00:50:07 +00004427 return (ctx->ctx_res_w == RES_SNTX);
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00004428 }
Eric Andersen25f27032001-04-26 23:22:31 +00004429 }
Denis Vlasenko5ec61322008-06-24 00:50:07 +00004430#endif
Denis Vlasenkobb929512009-04-16 10:59:40 +00004431 if (command->group) {
4432 /* "{ echo foo; } echo bar" - bad */
4433 syntax_error_at(word->data);
4434 debug_printf_parse("done_word return 1: syntax error, "
4435 "groups and arglists don't mix\n");
4436 return 1;
4437 }
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004438 if (word->o_quoted /* word had "xx" or 'xx' at least as part of it. */
Denis Vlasenko55789c62008-06-18 16:30:42 +00004439 /* optimization: and if it's ("" or '') or ($v... or `cmd`...): */
4440 && (word->data[0] == '\0' || word->data[0] == SPECIAL_VAR_SYMBOL)
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004441 /* (otherwise it's known to be not empty and is already safe) */
Denis Vlasenkoab876cd2008-06-18 16:29:32 +00004442 ) {
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004443 /* exclude "$@" - it can expand to no word despite "" */
Denis Vlasenkoafdcd122008-07-05 17:40:04 +00004444 char *p = word->data;
4445 while (p[0] == SPECIAL_VAR_SYMBOL
4446 && (p[1] & 0x7f) == '@'
4447 && p[2] == SPECIAL_VAR_SYMBOL
4448 ) {
4449 p += 3;
4450 }
4451 if (p == word->data || p[0] != '\0') {
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004452 /* saw no "$@", or not only "$@" but some
4453 * real text is there too */
4454 /* insert "empty variable" reference, this makes
Denis Vlasenkoafdcd122008-07-05 17:40:04 +00004455 * e.g. "", $empty"" etc to not disappear */
4456 o_addchr(word, SPECIAL_VAR_SYMBOL);
4457 o_addchr(word, SPECIAL_VAR_SYMBOL);
4458 }
Denis Vlasenkoc1c63b62008-06-18 09:20:35 +00004459 }
Denis Vlasenko22d10a02008-10-13 08:53:43 +00004460 command->argv = add_string_to_strings(command->argv, xstrdup(word->data));
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004461//SEGV, but good idea.
4462// command->argv = add_string_to_strings(command->argv, word->data);
4463// word->data = NULL;
4464// word->length = 0;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004465 debug_print_strings("word appended to argv", command->argv);
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00004466 }
Eric Andersen25f27032001-04-26 23:22:31 +00004467
Denis Vlasenko06810332007-05-21 23:30:54 +00004468#if ENABLE_HUSH_LOOPS
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004469 if (ctx->ctx_res_w == RES_FOR) {
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004470 if (word->o_quoted
4471 || !is_well_formed_var_name(command->argv[0], '\0')
4472 ) {
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004473 /* bash says just "not a valid identifier" */
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004474 syntax_error("not a valid identifier in for");
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004475 return 1;
4476 }
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004477 /* Force FOR to have just one word (variable name) */
4478 /* NB: basically, this makes hush see "for v in ..."
4479 * syntax as if it is "for v; in ...". FOR and IN become
4480 * two pipe structs in parse tree. */
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00004481 done_pipe(ctx, PIPE_SEQ);
Denis Vlasenko733e3fb2008-07-06 10:01:13 +00004482 }
Denis Vlasenko06810332007-05-21 23:30:54 +00004483#endif
Denis Vlasenko17f02e72008-07-14 04:32:29 +00004484#if ENABLE_HUSH_CASE
4485 /* Force CASE to have just one word */
4486 if (ctx->ctx_res_w == RES_CASE) {
4487 done_pipe(ctx, PIPE_SEQ);
4488 }
4489#endif
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004490
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004491 o_reset_to_empty_unquoted(word);
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00004492
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00004493 debug_printf_parse("done_word return 0\n");
Eric Andersen25f27032001-04-26 23:22:31 +00004494 return 0;
4495}
4496
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004497
4498/* Peek ahead in the input to find out if we have a "&n" construct,
4499 * as in "2>&1", that represents duplicating a file descriptor.
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004500 * Return:
4501 * REDIRFD_CLOSE if >&- "close fd" construct is seen,
4502 * REDIRFD_SYNTAX_ERR if syntax error,
4503 * REDIRFD_TO_FILE if no & was seen,
4504 * or the number found.
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004505 */
4506#if BB_MMU
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004507#define parse_redir_right_fd(as_string, input) \
4508 parse_redir_right_fd(input)
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004509#endif
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004510static int parse_redir_right_fd(o_string *as_string, struct in_str *input)
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004511{
4512 int ch, d, ok;
4513
4514 ch = i_peek(input);
4515 if (ch != '&')
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004516 return REDIRFD_TO_FILE;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004517
4518 ch = i_getch(input); /* get the & */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004519 nommu_addchr(as_string, ch);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004520 ch = i_peek(input);
4521 if (ch == '-') {
4522 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004523 nommu_addchr(as_string, ch);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004524 return REDIRFD_CLOSE;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004525 }
4526 d = 0;
4527 ok = 0;
4528 while (ch != EOF && isdigit(ch)) {
4529 d = d*10 + (ch-'0');
4530 ok = 1;
4531 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004532 nommu_addchr(as_string, ch);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004533 ch = i_peek(input);
4534 }
4535 if (ok) return d;
4536
4537//TODO: this is the place to catch ">&file" bashism (redirect both fd 1 and 2)
4538
4539 bb_error_msg("ambiguous redirect");
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004540 return REDIRFD_SYNTAX_ERR;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004541}
4542
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004543/* Return code is 0 normal, 1 if a syntax error is detected
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004544 */
4545static int parse_redirect(struct parse_context *ctx,
4546 int fd,
4547 redir_type style,
4548 struct in_str *input)
4549{
4550 struct command *command = ctx->command;
4551 struct redir_struct *redir;
4552 struct redir_struct **redirp;
4553 int dup_num;
4554
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004555 dup_num = REDIRFD_TO_FILE;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004556 if (style != REDIRECT_HEREDOC) {
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004557 /* Check for a '>&1' type redirect */
4558 dup_num = parse_redir_right_fd(&ctx->as_string, input);
4559 if (dup_num == REDIRFD_SYNTAX_ERR)
4560 return 1;
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004561 } else {
4562 int ch = i_peek(input);
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004563 dup_num = (ch == '-'); /* HEREDOC_SKIPTABS bit is 1 */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004564 if (dup_num) { /* <<-... */
4565 ch = i_getch(input);
4566 nommu_addchr(&ctx->as_string, ch);
4567 ch = i_peek(input);
4568 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004569 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004570
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004571 if (style == REDIRECT_OVERWRITE && dup_num == REDIRFD_TO_FILE) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004572 int ch = i_peek(input);
4573 if (ch == '|') {
4574 /* >|FILE redirect ("clobbering" >).
4575 * Since we do not support "set -o noclobber" yet,
4576 * >| and > are the same for now. Just eat |.
4577 */
4578 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004579 nommu_addchr(&ctx->as_string, ch);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004580 }
4581 }
4582
4583 /* Create a new redir_struct and append it to the linked list */
4584 redirp = &command->redirects;
4585 while ((redir = *redirp) != NULL) {
4586 redirp = &(redir->next);
4587 }
4588 *redirp = redir = xzalloc(sizeof(*redir));
4589 /* redir->next = NULL; */
4590 /* redir->rd_filename = NULL; */
4591 redir->rd_type = style;
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004592 redir->rd_fd = (fd == -1) ? redir_table[style].default_fd : fd;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004593
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004594 debug_printf_parse("redirect type %d %s\n", redir->rd_fd,
4595 redir_table[style].descrip);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004596
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004597 redir->rd_dup = dup_num;
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00004598 if (style != REDIRECT_HEREDOC && dup_num != REDIRFD_TO_FILE) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004599 /* Erik had a check here that the file descriptor in question
4600 * is legit; I postpone that to "run time"
4601 * A "-" representation of "close me" shows up as a -3 here */
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004602 debug_printf_parse("duplicating redirect '%d>&%d'\n",
4603 redir->rd_fd, redir->rd_dup);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004604 } else {
4605 /* Set ctx->pending_redirect, so we know what to do at the
4606 * end of the next parsed word. */
4607 ctx->pending_redirect = redir;
4608 }
4609 return 0;
4610}
4611
Eric Andersen25f27032001-04-26 23:22:31 +00004612/* If a redirect is immediately preceded by a number, that number is
4613 * supposed to tell which file descriptor to redirect. This routine
4614 * looks for such preceding numbers. In an ideal world this routine
4615 * needs to handle all the following classes of redirects...
4616 * echo 2>foo # redirects fd 2 to file "foo", nothing passed to echo
4617 * echo 49>foo # redirects fd 49 to file "foo", nothing passed to echo
4618 * echo -2>foo # redirects fd 1 to file "foo", "-2" passed to echo
4619 * echo 49x>foo # redirects fd 1 to file "foo", "49x" passed to echo
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004620 *
4621 * http://www.opengroup.org/onlinepubs/009695399/utilities/xcu_chap02.html
4622 * "2.7 Redirection
4623 * ... If n is quoted, the number shall not be recognized as part of
4624 * the redirection expression. For example:
4625 * echo \2>a
4626 * writes the character 2 into file a"
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00004627 * We are getting it right by setting ->o_quoted on any \<char>
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004628 *
4629 * A -1 return means no valid number was found,
4630 * the caller should use the appropriate default for this redirection.
Eric Andersen25f27032001-04-26 23:22:31 +00004631 */
4632static int redirect_opt_num(o_string *o)
4633{
4634 int num;
4635
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004636 if (o->data == NULL)
Denis Vlasenkobb81c582007-01-30 22:32:09 +00004637 return -1;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004638 num = bb_strtou(o->data, NULL, 10);
4639 if (errno || num < 0)
4640 return -1;
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004641 o_reset_to_empty_unquoted(o);
Eric Andersen25f27032001-04-26 23:22:31 +00004642 return num;
4643}
4644
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004645#if BB_MMU
4646#define fetch_till_str(as_string, input, word, skip_tabs) \
4647 fetch_till_str(input, word, skip_tabs)
4648#endif
4649static char *fetch_till_str(o_string *as_string,
4650 struct in_str *input,
4651 const char *word,
4652 int skip_tabs)
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004653{
4654 o_string heredoc = NULL_O_STRING;
4655 int past_EOL = 0;
4656 int ch;
4657
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004658 goto jump_in;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004659 while (1) {
4660 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004661 nommu_addchr(as_string, ch);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004662 if (ch == '\n') {
4663 if (strcmp(heredoc.data + past_EOL, word) == 0) {
4664 heredoc.data[past_EOL] = '\0';
4665 debug_printf_parse("parsed heredoc '%s'\n", heredoc.data);
4666 return heredoc.data;
4667 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004668 do {
4669 o_addchr(&heredoc, ch);
4670 past_EOL = heredoc.length;
4671 jump_in:
4672 do {
4673 ch = i_getch(input);
4674 nommu_addchr(as_string, ch);
4675 } while (skip_tabs && ch == '\t');
4676 } while (ch == '\n');
4677 }
4678 if (ch == EOF) {
4679 o_free_unsafe(&heredoc);
4680 return NULL;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004681 }
4682 o_addchr(&heredoc, ch);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004683 nommu_addchr(as_string, ch);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004684 }
4685}
4686
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00004687/* Look at entire parse tree for not-yet-loaded REDIRECT_HEREDOCs
4688 * and load them all. There should be exactly heredoc_cnt of them.
4689 */
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004690static int fetch_heredocs(int heredoc_cnt, struct parse_context *ctx, struct in_str *input)
4691{
4692 struct pipe *pi = ctx->list_head;
4693
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004694 while (pi && heredoc_cnt) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004695 int i;
4696 struct command *cmd = pi->cmds;
4697
4698 debug_printf_parse("fetch_heredocs: num_cmds:%d cmd argv0:'%s'\n",
4699 pi->num_cmds,
4700 cmd->argv ? cmd->argv[0] : "NONE");
4701 for (i = 0; i < pi->num_cmds; i++) {
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004702 struct redir_struct *redir = cmd->redirects;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004703
4704 debug_printf_parse("fetch_heredocs: %d cmd argv0:'%s'\n",
4705 i, cmd->argv ? cmd->argv[0] : "NONE");
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004706 while (redir) {
4707 if (redir->rd_type == REDIRECT_HEREDOC) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004708 char *p;
4709
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004710 redir->rd_type = REDIRECT_HEREDOC2;
4711 /* redir->dup is (ab)used to indicate <<- */
4712 p = fetch_till_str(&ctx->as_string, input,
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00004713 redir->rd_filename, redir->rd_dup & HEREDOC_SKIPTABS);
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00004714 if (!p) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004715 syntax_error("unexpected EOF in here document");
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00004716 return 1;
4717 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004718 free(redir->rd_filename);
4719 redir->rd_filename = p;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004720 heredoc_cnt--;
4721 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004722 redir = redir->next;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004723 }
4724 cmd++;
4725 }
4726 pi = pi->next;
4727 }
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004728#if 0
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004729 /* Should be 0. If it isn't, it's a parse error */
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00004730 if (heredoc_cnt)
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004731 bb_error_msg_and_die("heredoc BUG 2");
4732#endif
4733 return 0;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00004734}
4735
4736
Denis Vlasenko14b5dd92007-05-20 21:51:38 +00004737#if ENABLE_HUSH_TICK
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004738static FILE *generate_stream_from_string(const char *s)
Eric Andersen25f27032001-04-26 23:22:31 +00004739{
4740 FILE *pf;
Eric Andersen25f27032001-04-26 23:22:31 +00004741 int pid, channel[2];
Denis Vlasenko27014ed2009-04-15 21:48:23 +00004742#if !BB_MMU
4743 char **to_free;
4744#endif
Denis Vlasenkoba7cf262007-05-25 14:34:30 +00004745
Denis Vlasenko5a6aedd2007-05-26 16:44:20 +00004746 xpipe(channel);
Denis Vlasenko82604e92008-07-01 15:59:42 +00004747 pid = BB_MMU ? fork() : vfork();
4748 if (pid < 0)
4749 bb_perror_msg_and_die(BB_MMU ? "fork" : "vfork");
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004750
Denis Vlasenko05743d72008-02-10 12:10:08 +00004751 if (pid == 0) { /* child */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004752 disable_restore_tty_pgrp_on_exit();
Denis Vlasenkoba7cf262007-05-25 14:34:30 +00004753 /* Process substitution is not considered to be usual
4754 * 'command execution'.
Denis Vlasenkoabedaac2009-03-31 12:03:40 +00004755 * SUSv3 says ctrl-Z should be ignored, ctrl-C should not.
4756 */
Denis Vlasenkoe0755e52009-04-03 21:16:45 +00004757 bb_signals(0
4758 + (1 << SIGTSTP)
4759 + (1 << SIGTTIN)
4760 + (1 << SIGTTOU)
4761 , SIG_IGN);
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004762 close(channel[0]); /* NB: close _first_, then move fd! */
4763 xmove_fd(channel[1], 1);
4764 /* Prevent it from trying to handle ctrl-z etc */
4765 USE_HUSH_JOB(G.run_list_level = 1;)
4766#if BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00004767 reset_traps_to_defaults();
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004768 parse_and_run_string(s);
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00004769 _exit(G.last_exitcode);
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004770#else
4771 /* We re-execute after vfork on NOMMU. This makes this script safe:
Denis Vlasenkof9375282009-04-05 19:13:39 +00004772 * yes "0123456789012345678901234567890" | dd bs=32 count=64k >BIG
4773 * huge=`cat BIG` # was blocking here forever
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004774 * echo OK
4775 */
Denis Vlasenko27014ed2009-04-15 21:48:23 +00004776 re_execute_shell(&to_free,
4777 s,
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00004778 G.global_argv[0],
4779 G.global_argv + 1);
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004780#endif
Eric Andersen25f27032001-04-26 23:22:31 +00004781 }
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004782
4783 /* parent */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00004784 enable_restore_tty_pgrp_on_exit();
Denis Vlasenko27014ed2009-04-15 21:48:23 +00004785#if !BB_MMU
4786 free(to_free);
4787#endif
Eric Andersen25f27032001-04-26 23:22:31 +00004788 close(channel[1]);
Denis Vlasenko5f786c22007-04-20 08:35:45 +00004789 pf = fdopen(channel[0], "r");
Eric Andersen25f27032001-04-26 23:22:31 +00004790 return pf;
4791}
4792
Denis Vlasenko21f0d4c2007-05-06 14:15:42 +00004793/* Return code is exit status of the process that is run. */
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004794static int process_command_subs(o_string *dest, const char *s)
Eric Andersen25f27032001-04-26 23:22:31 +00004795{
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004796 FILE *pf;
Eric Andersen25f27032001-04-26 23:22:31 +00004797 struct in_str pipe_str;
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004798 int ch, eol_cnt;
Denis Vlasenko3e9aaae2007-05-11 12:56:43 +00004799
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004800 pf = generate_stream_from_string(s);
4801 if (pf == NULL)
Denis Vlasenko05743d72008-02-10 12:10:08 +00004802 return 1;
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004803 close_on_exec_on(fileno(pf));
Eric Andersen25f27032001-04-26 23:22:31 +00004804
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00004805 /* Now send results of command back into original context */
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004806 setup_file_in_str(&pipe_str, pf);
Denis Vlasenko3e9aaae2007-05-11 12:56:43 +00004807 eol_cnt = 0;
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00004808 while ((ch = i_getch(&pipe_str)) != EOF) {
Denis Vlasenko3e9aaae2007-05-11 12:56:43 +00004809 if (ch == '\n') {
4810 eol_cnt++;
4811 continue;
4812 }
4813 while (eol_cnt) {
Denis Vlasenko55789c62008-06-18 16:30:42 +00004814 o_addchr(dest, '\n');
Denis Vlasenko3e9aaae2007-05-11 12:56:43 +00004815 eol_cnt--;
4816 }
Denis Vlasenko7e3d33b2008-06-12 13:31:04 +00004817 o_addQchr(dest, ch);
Eric Andersen25f27032001-04-26 23:22:31 +00004818 }
4819
4820 debug_printf("done reading from pipe, pclose()ing\n");
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00004821 /* Note: we got EOF, and we just close the read end of the pipe.
4822 * We do not wait for the `cmd` child to terminate. bash and ash do.
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004823 * Try these:
4824 * echo `echo Hi; exec 1>&-; sleep 2` - bash waits 2 sec
4825 * `false`; echo $? - bash outputs "1"
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00004826 */
Denis Vlasenkodb2a9b62009-04-03 22:31:18 +00004827 fclose(pf);
4828 debug_printf("closed FILE from child. return 0\n");
4829 return 0;
Eric Andersen25f27032001-04-26 23:22:31 +00004830}
Denis Vlasenko14b5dd92007-05-20 21:51:38 +00004831#endif
Eric Andersen25f27032001-04-26 23:22:31 +00004832
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004833static int parse_group(o_string *dest, struct parse_context *ctx,
Eric Andersen25f27032001-04-26 23:22:31 +00004834 struct in_str *input, int ch)
4835{
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004836 /* dest contains characters seen prior to ( or {.
Denis Vlasenko027e3fd2009-04-02 22:50:40 +00004837 * Typically it's empty, but for function defs,
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004838 * it contains function name (without '()'). */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004839 struct pipe *pipe_list;
Denis Vlasenko240c2552009-04-03 03:45:05 +00004840 int endch;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004841 struct command *command = ctx->command;
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00004842
4843 debug_printf_parse("parse_group entered\n");
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004844#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00004845 if (ch == '(' && !dest->o_quoted) {
4846 if (dest->length)
Denis Vlasenkobb929512009-04-16 10:59:40 +00004847 if (done_word(dest, ctx))
4848 return 1;
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00004849 if (!command->argv)
4850 goto skip; /* (... */
4851 if (command->argv[1]) { /* word word ... (... */
4852 syntax_error_unexpected_ch('(');
4853 return 1;
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004854 }
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00004855 /* it is "word(..." or "word (..." */
4856 do
4857 ch = i_getch(input);
4858 while (ch == ' ' || ch == '\t');
4859 if (ch != ')') {
4860 syntax_error_unexpected_ch(ch);
4861 return 1;
4862 }
4863 nommu_addchr(&ctx->as_string, ch);
4864 do
4865 ch = i_getch(input);
4866 while (ch == ' ' || ch == '\t' || ch == '\n');
4867 if (ch != '{') {
4868 syntax_error_unexpected_ch(ch);
4869 return 1;
4870 }
4871 nommu_addchr(&ctx->as_string, ch);
4872 command->grp_type = GRP_FUNCTION;
4873 goto skip;
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004874 }
4875#endif
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004876 if (command->argv /* word [word]{... */
4877 || dest->length /* word{... */
4878 || dest->o_quoted /* ""{... */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004879 ) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00004880 syntax_error(NULL);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00004881 debug_printf_parse("parse_group return 1: "
4882 "syntax error, groups and arglists don't mix\n");
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00004883 return 1;
Eric Andersen25f27032001-04-26 23:22:31 +00004884 }
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004885
4886#if ENABLE_HUSH_FUNCTIONS
4887 skip:
4888#endif
Denis Vlasenko240c2552009-04-03 03:45:05 +00004889 endch = '}';
Denis Vlasenko90e485c2007-05-23 15:22:50 +00004890 if (ch == '(') {
Denis Vlasenko240c2552009-04-03 03:45:05 +00004891 endch = ')';
Denis Vlasenko371de4a2008-10-14 12:43:13 +00004892 command->grp_type = GRP_SUBSHELL;
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00004893 } else {
4894 /* bash does not allow "{echo...", requires whitespace */
4895 ch = i_getch(input);
4896 if (ch != ' ' && ch != '\t' && ch != '\n') {
4897 syntax_error_unexpected_ch(ch);
4898 return 1;
4899 }
4900 nommu_addchr(&ctx->as_string, ch);
Eric Andersen25f27032001-04-26 23:22:31 +00004901 }
Denis Vlasenkob7d8c0d2009-04-10 19:05:43 +00004902
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00004903 {
4904#if !BB_MMU
4905 char *as_string = NULL;
4906#endif
4907 pipe_list = parse_stream(&as_string, input, endch);
4908#if !BB_MMU
4909 if (as_string)
4910 o_addstr(&ctx->as_string, as_string);
4911#endif
4912 /* empty ()/{} or parse error? */
4913 if (!pipe_list || pipe_list == ERR_PTR) {
Denis Vlasenkobb929512009-04-16 10:59:40 +00004914 /* parse_stream already emitted error msg */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00004915#if !BB_MMU
4916 free(as_string);
4917#endif
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00004918 debug_printf_parse("parse_group return 1: "
4919 "parse_stream returned %p\n", pipe_list);
4920 return 1;
4921 }
4922 command->group = pipe_list;
4923#if !BB_MMU
4924 as_string[strlen(as_string) - 1] = '\0'; /* plink ')' or '}' */
4925 command->group_as_string = as_string;
4926 debug_printf_parse("end of group, remembering as:'%s'\n",
4927 command->group_as_string);
4928#endif
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00004929 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00004930 debug_printf_parse("parse_group return 0\n");
4931 return 0;
Denis Vlasenko9af22c72008-10-09 12:54:58 +00004932 /* command remains "open", available for possible redirects */
Eric Andersen25f27032001-04-26 23:22:31 +00004933}
4934
Mike Frysinger98c52642009-04-02 10:02:37 +00004935#if ENABLE_HUSH_TICK || ENABLE_SH_MATH_SUPPORT
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004936/* Subroutines for copying $(...) and `...` things */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004937static void add_till_backquote(o_string *dest, struct in_str *input);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004938/* '...' */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004939static void add_till_single_quote(o_string *dest, struct in_str *input)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004940{
4941 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00004942 int ch = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004943 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00004944 syntax_error_unterm_ch('\'');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004945 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004946 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004947 if (ch == '\'')
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004948 return;
Denis Vlasenko82dfec32008-06-16 12:47:11 +00004949 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004950 }
4951}
4952/* "...\"...`..`...." - do we need to handle "...$(..)..." too? */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004953static void add_till_double_quote(o_string *dest, struct in_str *input)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004954{
4955 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00004956 int ch = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004957 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00004958 syntax_error_unterm_ch('"');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004959 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004960 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004961 if (ch == '"')
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004962 return;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004963 if (ch == '\\') { /* \x. Copy both chars. */
Denis Vlasenko82dfec32008-06-16 12:47:11 +00004964 o_addchr(dest, ch);
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00004965 ch = i_getch(input);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004966 }
Denis Vlasenko82dfec32008-06-16 12:47:11 +00004967 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004968 if (ch == '`') {
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004969 add_till_backquote(dest, input);
Denis Vlasenko82dfec32008-06-16 12:47:11 +00004970 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004971 continue;
4972 }
Denis Vlasenko5703c222008-06-15 11:49:42 +00004973 //if (ch == '$') ...
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004974 }
4975}
4976/* Process `cmd` - copy contents until "`" is seen. Complicated by
4977 * \` quoting.
4978 * "Within the backquoted style of command substitution, backslash
4979 * shall retain its literal meaning, except when followed by: '$', '`', or '\'.
4980 * The search for the matching backquote shall be satisfied by the first
4981 * backquote found without a preceding backslash; during this search,
4982 * if a non-escaped backquote is encountered within a shell comment,
4983 * a here-document, an embedded command substitution of the $(command)
4984 * form, or a quoted string, undefined results occur. A single-quoted
4985 * or double-quoted string that begins, but does not end, within the
4986 * "`...`" sequence produces undefined results."
4987 * Example Output
4988 * echo `echo '\'TEST\`echo ZZ\`BEST` \TESTZZBEST
4989 */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004990static void add_till_backquote(o_string *dest, struct in_str *input)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004991{
4992 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00004993 int ch = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004994 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00004995 syntax_error_unterm_ch('`');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004996 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00004997 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00004998 if (ch == '`')
Denis Vlasenko0b677d82009-04-10 13:49:10 +00004999 return;
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005000 if (ch == '\\') {
5001 /* \x. Copy both chars unless it is \` */
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005002 int ch2 = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005003 if (ch2 == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005004 syntax_error_unterm_ch('`');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005005 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005006 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005007 if (ch2 != '`' && ch2 != '$' && ch2 != '\\')
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005008 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005009 ch = ch2;
5010 }
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005011 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005012 }
5013}
5014/* Process $(cmd) - copy contents until ")" is seen. Complicated by
5015 * quoting and nested ()s.
5016 * "With the $(command) style of command substitution, all characters
5017 * following the open parenthesis to the matching closing parenthesis
5018 * constitute the command. Any valid shell script can be used for command,
5019 * except a script consisting solely of redirections which produces
5020 * unspecified results."
5021 * Example Output
5022 * echo $(echo '(TEST)' BEST) (TEST) BEST
5023 * echo $(echo 'TEST)' BEST) TEST) BEST
5024 * echo $(echo \(\(TEST\) BEST) ((TEST) BEST
5025 */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005026static void add_till_closing_paren(o_string *dest, struct in_str *input, bool dbl)
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005027{
5028 int count = 0;
5029 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005030 int ch = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005031 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005032 syntax_error_unterm_ch(')');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005033 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005034 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005035 if (ch == '(')
5036 count++;
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005037 if (ch == ')') {
Mike Frysinger98c52642009-04-02 10:02:37 +00005038 if (--count < 0) {
5039 if (!dbl)
5040 break;
5041 if (i_peek(input) == ')') {
5042 i_getch(input);
5043 break;
5044 }
5045 }
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005046 }
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005047 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005048 if (ch == '\'') {
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005049 add_till_single_quote(dest, input);
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005050 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005051 continue;
5052 }
5053 if (ch == '"') {
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005054 add_till_double_quote(dest, input);
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005055 o_addchr(dest, ch);
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005056 continue;
5057 }
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005058 if (ch == '\\') {
5059 /* \x. Copy verbatim. Important for \(, \) */
Denis Vlasenko76db5ad2008-06-12 12:58:20 +00005060 ch = i_getch(input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005061 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005062 syntax_error_unterm_ch(')');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005063 /*xfunc_die(); - redundant */
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005064 }
Denis Vlasenko82dfec32008-06-16 12:47:11 +00005065 o_addchr(dest, ch);
Denis Vlasenko76db5ad2008-06-12 12:58:20 +00005066 continue;
5067 }
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005068 }
5069}
Mike Frysinger98c52642009-04-02 10:02:37 +00005070#endif /* ENABLE_HUSH_TICK || ENABLE_SH_MATH_SUPPORT */
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005071
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00005072/* Return code: 0 for OK, 1 for syntax error */
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005073#if BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005074#define handle_dollar(as_string, dest, input) \
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005075 handle_dollar(dest, input)
5076#endif
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005077static int handle_dollar(o_string *as_string,
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005078 o_string *dest,
5079 struct in_str *input)
Eric Andersen25f27032001-04-26 23:22:31 +00005080{
Mike Frysinger6379bb42009-03-28 18:55:03 +00005081 int expansion;
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005082 int ch = i_peek(input); /* first character after the $ */
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00005083 unsigned char quote_mask = dest->o_escape ? 0x80 : 0;
Denis Vlasenkoe0a33672007-05-10 23:06:55 +00005084
5085 debug_printf_parse("handle_dollar entered: ch='%c'\n", ch);
Denis Vlasenko1f4cf512007-05-16 10:39:24 +00005086 if (isalpha(ch)) {
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005087 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005088 nommu_addchr(as_string, ch);
Denis Vlasenkod4981312008-07-31 10:34:48 +00005089 make_var:
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005090 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Denis Vlasenkoe0a33672007-05-10 23:06:55 +00005091 while (1) {
Denis Vlasenkoe0a33672007-05-10 23:06:55 +00005092 debug_printf_parse(": '%c'\n", ch);
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005093 o_addchr(dest, ch | quote_mask);
Denis Vlasenko1f4cf512007-05-16 10:39:24 +00005094 quote_mask = 0;
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005095 ch = i_peek(input);
Denis Vlasenko602d13c2007-05-13 18:34:53 +00005096 if (!isalnum(ch) && ch != '_')
5097 break;
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005098 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005099 nommu_addchr(as_string, ch);
Eric Andersen25f27032001-04-26 23:22:31 +00005100 }
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005101 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Eric Andersen25f27032001-04-26 23:22:31 +00005102 } else if (isdigit(ch)) {
Denis Vlasenko602d13c2007-05-13 18:34:53 +00005103 make_one_char_var:
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005104 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005105 nommu_addchr(as_string, ch);
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005106 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Denis Vlasenko602d13c2007-05-13 18:34:53 +00005107 debug_printf_parse(": '%c'\n", ch);
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005108 o_addchr(dest, ch | quote_mask);
5109 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Eric Andersen25f27032001-04-26 23:22:31 +00005110 } else switch (ch) {
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005111 case '$': /* pid */
5112 case '!': /* last bg pid */
5113 case '?': /* last exit code */
5114 case '#': /* number of args */
5115 case '*': /* args */
5116 case '@': /* args */
5117 goto make_one_char_var;
5118 case '{': {
5119 bool first_char, all_digits;
Mike Frysinger6379bb42009-03-28 18:55:03 +00005120
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005121 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005122 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005123 nommu_addchr(as_string, ch);
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00005124 /* TODO: maybe someone will try to escape the '}' */
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005125 expansion = 0;
5126 first_char = true;
5127 all_digits = false;
5128 while (1) {
5129 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005130 nommu_addchr(as_string, ch);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005131 if (ch == '}')
Mike Frysinger98c52642009-04-02 10:02:37 +00005132 break;
Mike Frysinger98c52642009-04-02 10:02:37 +00005133
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005134 if (first_char) {
5135 if (ch == '#')
5136 /* ${#var}: length of var contents */
5137 goto char_ok;
5138 else if (isdigit(ch)) {
5139 all_digits = true;
5140 goto char_ok;
5141 }
5142 }
5143
5144 if (expansion < 2
5145 && ( (all_digits && !isdigit(ch))
5146 || (!all_digits && !isalnum(ch) && ch != '_')
5147 )
5148 ) {
5149 /* handle parameter expansions
5150 * http://www.opengroup.org/onlinepubs/009695399/utilities/xcu_chap02.html#tag_02_06_02
5151 */
5152 if (first_char)
5153 goto case_default;
5154 switch (ch) {
5155 case ':': /* null modifier */
5156 if (expansion == 0) {
5157 debug_printf_parse(": null modifier\n");
5158 ++expansion;
5159 break;
5160 }
5161 goto case_default;
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005162 case '#': /* remove prefix */
5163 case '%': /* remove suffix */
5164 if (expansion == 0) {
5165 debug_printf_parse(": remove suffix/prefix\n");
5166 expansion = 2;
5167 break;
5168 }
5169 goto case_default;
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005170 case '-': /* default value */
5171 case '=': /* assign default */
5172 case '+': /* alternative */
5173 case '?': /* error indicate */
5174 debug_printf_parse(": parameter expansion\n");
5175 expansion = 2;
5176 break;
5177 default:
5178 case_default:
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005179 syntax_error_unterm_str("${name}");
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005180 debug_printf_parse("handle_dollar return 1: unterminated ${name}\n");
5181 return 1;
5182 }
5183 }
5184 char_ok:
5185 debug_printf_parse(": '%c'\n", ch);
5186 o_addchr(dest, ch | quote_mask);
5187 quote_mask = 0;
5188 first_char = false;
5189 }
5190 o_addchr(dest, SPECIAL_VAR_SYMBOL);
5191 break;
5192 }
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005193#if (ENABLE_SH_MATH_SUPPORT || ENABLE_HUSH_TICK)
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005194 case '(': {
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005195# if !BB_MMU
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005196 int pos;
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005197# endif
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005198 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005199 nommu_addchr(as_string, ch);
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005200# if ENABLE_SH_MATH_SUPPORT
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005201 if (i_peek(input) == '(') {
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005202 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005203 nommu_addchr(as_string, ch);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005204 o_addchr(dest, SPECIAL_VAR_SYMBOL);
5205 o_addchr(dest, /*quote_mask |*/ '+');
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005206# if !BB_MMU
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005207 pos = dest->length;
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005208# endif
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005209 add_till_closing_paren(dest, input, true);
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005210# if !BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005211 if (as_string) {
5212 o_addstr(as_string, dest->data + pos);
5213 o_addchr(as_string, ')');
5214 o_addchr(as_string, ')');
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005215 }
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005216# endif
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005217 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Eric Andersen25f27032001-04-26 23:22:31 +00005218 break;
Denis Vlasenko76db5ad2008-06-12 12:58:20 +00005219 }
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005220# endif
5221# if ENABLE_HUSH_TICK
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005222 o_addchr(dest, SPECIAL_VAR_SYMBOL);
5223 o_addchr(dest, quote_mask | '`');
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005224# if !BB_MMU
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005225 pos = dest->length;
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005226# endif
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005227 add_till_closing_paren(dest, input, false);
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005228# if !BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005229 if (as_string) {
5230 o_addstr(as_string, dest->data + pos);
5231 o_addchr(as_string, '`');
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005232 }
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005233# endif
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005234 o_addchr(dest, SPECIAL_VAR_SYMBOL);
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005235# endif
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005236 break;
5237 }
Denis Vlasenkod85a5df2009-04-05 08:43:57 +00005238#endif
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005239 case '_':
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005240 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005241 nommu_addchr(as_string, ch);
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005242 ch = i_peek(input);
5243 if (isalnum(ch)) { /* it's $_name or $_123 */
5244 ch = '_';
5245 goto make_var;
5246 }
5247 /* else: it's $_ */
5248 /* TODO: */
5249 /* $_ Shell or shell script name; or last cmd name */
5250 /* $- Option flags set by set builtin or shell options (-i etc) */
5251 default:
5252 o_addQchr(dest, '$');
Eric Andersen25f27032001-04-26 23:22:31 +00005253 }
Denis Vlasenkoe0a33672007-05-10 23:06:55 +00005254 debug_printf_parse("handle_dollar return 0\n");
Eric Andersen25f27032001-04-26 23:22:31 +00005255 return 0;
5256}
5257
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005258#if BB_MMU
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005259#define parse_stream_dquoted(as_string, dest, input, dquote_end) \
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005260 parse_stream_dquoted(dest, input, dquote_end)
5261#endif
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005262static int parse_stream_dquoted(o_string *as_string,
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005263 o_string *dest,
5264 struct in_str *input,
5265 int dquote_end)
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005266{
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005267 int ch;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005268 int next;
5269
5270 again:
5271 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005272 if (ch != EOF)
5273 nommu_addchr(as_string, ch);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005274 if (ch == dquote_end) { /* may be only '"' or EOF */
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005275 if (dest->o_assignment == NOT_ASSIGNMENT)
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00005276 dest->o_escape ^= 1;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005277 debug_printf_parse("parse_stream_dquoted return 0\n");
5278 return 0;
5279 }
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00005280 /* note: can't move it above ch == dquote_end check! */
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005281 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005282 syntax_error_unterm_ch('"');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005283 /*xfunc_die(); - redundant */
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005284 }
5285 next = '\0';
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005286 if (ch != '\n') {
5287 next = i_peek(input);
5288 }
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00005289 debug_printf_parse(": ch=%c (%d) escape=%d\n",
5290 ch, ch, dest->o_escape);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005291 if (ch == '\\') {
5292 if (next == EOF) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00005293 syntax_error("\\<eof>");
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005294 xfunc_die();
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005295 }
5296 /* bash:
5297 * "The backslash retains its special meaning [in "..."]
5298 * only when followed by one of the following characters:
5299 * $, `, ", \, or <newline>. A double quote may be quoted
5300 * within double quotes by preceding it with a backslash.
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005301 */
5302 if (strchr("$`\"\\", next) != NULL) {
5303 o_addqchr(dest, i_getch(input));
5304 } else {
5305 o_addqchr(dest, '\\');
5306 }
5307 goto again;
5308 }
5309 if (ch == '$') {
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005310 if (handle_dollar(as_string, dest, input) != 0) {
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005311 debug_printf_parse("parse_stream_dquoted return 1: "
5312 "handle_dollar returned non-0\n");
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005313 return 1;
5314 }
5315 goto again;
5316 }
5317#if ENABLE_HUSH_TICK
5318 if (ch == '`') {
5319 //int pos = dest->length;
5320 o_addchr(dest, SPECIAL_VAR_SYMBOL);
5321 o_addchr(dest, 0x80 | '`');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005322 add_till_backquote(dest, input);
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005323 o_addchr(dest, SPECIAL_VAR_SYMBOL);
5324 //debug_printf_subst("SUBST RES3 '%s'\n", dest->data + pos);
Denis Vlasenkof328e002009-04-02 16:55:38 +00005325 goto again;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005326 }
5327#endif
Denis Vlasenkof328e002009-04-02 16:55:38 +00005328 o_addQchr(dest, ch);
5329 if (ch == '='
5330 && (dest->o_assignment == MAYBE_ASSIGNMENT
5331 || dest->o_assignment == WORD_IS_KEYWORD)
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00005332 && is_well_formed_var_name(dest->data, '=')
Denis Vlasenkof328e002009-04-02 16:55:38 +00005333 ) {
5334 dest->o_assignment = DEFINITELY_ASSIGNMENT;
5335 }
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005336 goto again;
5337}
5338
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005339/*
5340 * Scan input until EOF or end_trigger char.
5341 * Return a list of pipes to execute, or NULL on EOF
5342 * or if end_trigger character is met.
5343 * On syntax error, exit is shell is not interactive,
5344 * reset parsing machinery and start parsing anew,
5345 * or return ERR_PTR.
Denis Vlasenko027e3fd2009-04-02 22:50:40 +00005346 */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005347static struct pipe *parse_stream(char **pstring,
5348 struct in_str *input,
5349 int end_trigger)
Eric Andersen25f27032001-04-26 23:22:31 +00005350{
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005351 struct parse_context ctx;
5352 o_string dest = NULL_O_STRING;
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005353 int is_in_dquote;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005354 int heredoc_cnt;
Eric Andersen25f27032001-04-26 23:22:31 +00005355
Denis Vlasenkob7aaae92009-04-02 20:17:49 +00005356 /* Double-quote state is handled in the state variable is_in_dquote.
Eric Andersen25f27032001-04-26 23:22:31 +00005357 * A single-quote triggers a bypass of the main loop until its mate is
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005358 * found. When recursing, quote state is passed in via dest->o_escape.
5359 */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005360 debug_printf_parse("parse_stream entered, end_trigger='%c'\n",
5361 end_trigger ? : 'X');
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005362 debug_enter();
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00005363
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005364 G.ifs = get_local_var_value("IFS");
5365 if (G.ifs == NULL)
5366 G.ifs = " \t\n";
5367
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005368 reset:
5369#if ENABLE_HUSH_INTERACTIVE
5370 input->promptmode = 0; /* PS1 */
5371#endif
5372 /* dest.o_assignment = MAYBE_ASSIGNMENT; - already is */
5373 initialize_context(&ctx);
5374 is_in_dquote = 0;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005375 heredoc_cnt = 0;
Denis Vlasenko1a735862007-05-23 00:32:25 +00005376 while (1) {
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005377 const char *is_ifs;
5378 const char *is_special;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005379 int ch;
5380 int next;
5381 int redir_fd;
5382 redir_type redir_style;
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005383
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005384 if (is_in_dquote) {
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00005385 /* dest.o_quoted = 1; - already is (see below) */
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005386 if (parse_stream_dquoted(&ctx.as_string, &dest, input, '"')) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005387 goto parse_error;
5388 }
5389 /* We reached closing '"' */
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005390 is_in_dquote = 0;
5391 }
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005392 ch = i_getch(input);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005393 debug_printf_parse(": ch=%c (%d) escape=%d\n",
5394 ch, ch, dest.o_escape);
5395 if (ch == EOF) {
5396 struct pipe *pi;
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005397
5398 if (heredoc_cnt) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005399 syntax_error_unterm_str("here document");
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005400 xfunc_die();
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005401 }
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005402 if (done_word(&dest, &ctx)) {
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005403 xfunc_die();
Denis Vlasenko55789c62008-06-18 16:30:42 +00005404 }
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005405 o_free(&dest);
5406 done_pipe(&ctx, PIPE_SEQ);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005407 pi = ctx.list_head;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005408 /* If we got nothing... */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005409 /* (this makes bare "&" cmd a no-op.
5410 * bash says: "syntax error near unexpected token '&'") */
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005411 if (pi->num_cmds == 0
5412 IF_HAS_KEYWORDS( && pi->res_word == RES_NONE)
5413 ) {
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005414 free_pipe_list(pi);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005415 pi = NULL;
5416 }
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005417#if !BB_MMU
5418 debug_printf_parse("as_string '%s'\n", ctx.as_string.data);
5419 if (pstring)
5420 *pstring = ctx.as_string.data;
5421 else
5422 o_free_unsafe(&ctx.as_string);
5423#endif
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005424 debug_leave();
5425 debug_printf_parse("parse_stream return %p\n", pi);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005426 return pi;
Denis Vlasenko1a735862007-05-23 00:32:25 +00005427 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005428 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005429 is_ifs = strchr(G.ifs, ch);
5430 is_special = strchr("<>;&|(){}#'" /* special outside of "str" */
5431 "\\$\"" USE_HUSH_TICK("`") /* always special */
5432 , ch);
5433
5434 if (!is_special && !is_ifs) { /* ordinary char */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005435 o_addQchr(&dest, ch);
5436 if ((dest.o_assignment == MAYBE_ASSIGNMENT
5437 || dest.o_assignment == WORD_IS_KEYWORD)
Denis Vlasenko55789c62008-06-18 16:30:42 +00005438 && ch == '='
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00005439 && is_well_formed_var_name(dest.data, '=')
Denis Vlasenko55789c62008-06-18 16:30:42 +00005440 ) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005441 dest.o_assignment = DEFINITELY_ASSIGNMENT;
Denis Vlasenko55789c62008-06-18 16:30:42 +00005442 }
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005443 continue;
5444 }
Denis Vlasenko240c2552009-04-03 03:45:05 +00005445
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005446 if (is_ifs) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005447 if (done_word(&dest, &ctx)) {
5448 goto parse_error;
Eric Andersenaac75e52001-04-30 18:18:45 +00005449 }
Denis Vlasenko37181682009-04-03 03:19:15 +00005450 if (ch == '\n') {
Denis Vlasenkof1736072008-07-31 10:09:26 +00005451#if ENABLE_HUSH_CASE
5452 /* "case ... in <newline> word) ..." -
5453 * newlines are ignored (but ';' wouldn't be) */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005454 if (ctx.command->argv == NULL
5455 && ctx.ctx_res_w == RES_MATCH
Denis Vlasenkof1736072008-07-31 10:09:26 +00005456 ) {
5457 continue;
5458 }
5459#endif
Denis Vlasenko240c2552009-04-03 03:45:05 +00005460 /* Treat newline as a command separator. */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005461 done_pipe(&ctx, PIPE_SEQ);
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005462 debug_printf_parse("heredoc_cnt:%d\n", heredoc_cnt);
5463 if (heredoc_cnt) {
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00005464 if (fetch_heredocs(heredoc_cnt, &ctx, input)) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005465 goto parse_error;
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00005466 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005467 heredoc_cnt = 0;
5468 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005469 dest.o_assignment = MAYBE_ASSIGNMENT;
Denis Vlasenko240c2552009-04-03 03:45:05 +00005470 ch = ';';
Denis Vlasenko7c986122009-04-04 12:15:42 +00005471 /* note: if (is_ifs) continue;
Denis Vlasenko240c2552009-04-03 03:45:05 +00005472 * will still trigger for us */
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00005473 }
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005474 }
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005475 if (end_trigger && end_trigger == ch
5476 && (heredoc_cnt == 0 || end_trigger != ';')
5477 ) {
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005478 if (heredoc_cnt) {
5479 /* This is technically valid:
5480 * { cat <<HERE; }; echo Ok
5481 * heredoc
5482 * heredoc
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005483 * HERE
5484 * but we don't support this.
5485 * We require heredoc to be in enclosing {}/(),
5486 * if any.
5487 */
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005488 syntax_error_unterm_str("here document");
Denis Vlasenko6c9be7f2009-04-07 02:29:51 +00005489 goto parse_error;
5490 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005491 if (done_word(&dest, &ctx)) {
5492 goto parse_error;
5493 }
Denis Vlasenkof8c1f022009-04-17 11:55:42 +00005494 /* Disallow "{ cmd }" without semicolon or & */
5495 //debug_printf_parse("null pi %d\n", IS_NULL_PIPE(ctx.pipe))
5496 //debug_printf_parse("null cmd %d\n", IS_NULL_CMD(ctx.command))
5497 if (ch == '}'
5498 && !(IS_NULL_PIPE(ctx.pipe) && IS_NULL_CMD(ctx.command))
5499 ) {
5500 syntax_error_unexpected_ch(ch);
5501 goto parse_error;
5502 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005503 done_pipe(&ctx, PIPE_SEQ);
5504 dest.o_assignment = MAYBE_ASSIGNMENT;
Denis Vlasenko240c2552009-04-03 03:45:05 +00005505 /* Do we sit outside of any if's, loops or case's? */
Denis Vlasenko37181682009-04-03 03:19:15 +00005506 if (!HAS_KEYWORDS
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005507 IF_HAS_KEYWORDS(|| (ctx.ctx_res_w == RES_NONE && ctx.old_flag == 0))
Denis Vlasenko37181682009-04-03 03:19:15 +00005508 ) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005509 o_free(&dest);
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005510#if !BB_MMU
5511 debug_printf_parse("as_string '%s'\n", ctx.as_string.data);
5512 if (pstring)
5513 *pstring = ctx.as_string.data;
5514 else
5515 o_free_unsafe(&ctx.as_string);
5516#endif
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005517 debug_leave();
5518 debug_printf_parse("parse_stream return %p: "
5519 "end_trigger char found\n",
5520 ctx.list_head);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005521 return ctx.list_head;
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005522 }
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005523 }
Denis Vlasenko6da69cd2009-04-04 12:12:58 +00005524 if (is_ifs)
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005525 continue;
Denis Vlasenko55789c62008-06-18 16:30:42 +00005526
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005527 next = '\0';
5528 if (ch != '\n') {
5529 next = i_peek(input);
5530 }
5531
Denis Vlasenkoc96865f2009-04-10 00:20:58 +00005532 /* Catch <, > before deciding whether this word is
5533 * an assignment. a=1 2>z b=2: b=2 is still assignment */
5534 switch (ch) {
5535 case '>':
5536 redir_fd = redirect_opt_num(&dest);
5537 if (done_word(&dest, &ctx)) {
5538 goto parse_error;
5539 }
5540 redir_style = REDIRECT_OVERWRITE;
5541 if (next == '>') {
5542 redir_style = REDIRECT_APPEND;
5543 ch = i_getch(input);
5544 nommu_addchr(&ctx.as_string, ch);
5545 }
5546#if 0
5547 else if (next == '(') {
5548 syntax_error(">(process) not supported");
5549 goto parse_error;
5550 }
5551#endif
5552 if (parse_redirect(&ctx, redir_fd, redir_style, input))
5553 goto parse_error;
5554 continue; /* back to top of while (1) */
5555 case '<':
5556 redir_fd = redirect_opt_num(&dest);
5557 if (done_word(&dest, &ctx)) {
5558 goto parse_error;
5559 }
5560 redir_style = REDIRECT_INPUT;
5561 if (next == '<') {
5562 redir_style = REDIRECT_HEREDOC;
5563 heredoc_cnt++;
5564 debug_printf_parse("++heredoc_cnt=%d\n", heredoc_cnt);
5565 ch = i_getch(input);
5566 nommu_addchr(&ctx.as_string, ch);
5567 } else if (next == '>') {
5568 redir_style = REDIRECT_IO;
5569 ch = i_getch(input);
5570 nommu_addchr(&ctx.as_string, ch);
5571 }
5572#if 0
5573 else if (next == '(') {
5574 syntax_error("<(process) not supported");
5575 goto parse_error;
5576 }
5577#endif
5578 if (parse_redirect(&ctx, redir_fd, redir_style, input))
5579 goto parse_error;
5580 continue; /* back to top of while (1) */
5581 }
5582
5583 if (dest.o_assignment == MAYBE_ASSIGNMENT
5584 /* check that we are not in word in "a=1 2>word b=1": */
5585 && !ctx.pending_redirect
5586 ) {
5587 /* ch is a special char and thus this word
5588 * cannot be an assignment */
5589 dest.o_assignment = NOT_ASSIGNMENT;
5590 }
5591
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005592 switch (ch) {
Eric Andersen25f27032001-04-26 23:22:31 +00005593 case '#':
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005594 if (dest.length == 0) {
Denis Vlasenko0c886c62007-01-30 22:30:09 +00005595 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005596 ch = i_peek(input);
Denis Vlasenko0c886c62007-01-30 22:30:09 +00005597 if (ch == EOF || ch == '\n')
5598 break;
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005599 i_getch(input);
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005600 /* note: we do not add it to &ctx.as_string */
Denis Vlasenko0c886c62007-01-30 22:30:09 +00005601 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005602 nommu_addchr(&ctx.as_string, '\n');
Eric Andersen25f27032001-04-26 23:22:31 +00005603 } else {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005604 o_addQchr(&dest, ch);
Eric Andersen25f27032001-04-26 23:22:31 +00005605 }
5606 break;
5607 case '\\':
5608 if (next == EOF) {
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00005609 syntax_error("\\<eof>");
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005610 xfunc_die();
Eric Andersen25f27032001-04-26 23:22:31 +00005611 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005612 o_addchr(&dest, '\\');
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005613 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005614 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenko3dfb0352009-04-08 09:29:14 +00005615 o_addchr(&dest, ch);
5616 /* Example: echo Hello \2>file
5617 * we need to know that word 2 is quoted */
5618 dest.o_quoted = 1;
Eric Andersen25f27032001-04-26 23:22:31 +00005619 break;
5620 case '$':
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005621 if (handle_dollar(&ctx.as_string, &dest, input) != 0) {
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005622 debug_printf_parse("parse_stream parse error: "
5623 "handle_dollar returned non-0\n");
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005624 goto parse_error;
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00005625 }
Eric Andersen25f27032001-04-26 23:22:31 +00005626 break;
5627 case '\'':
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00005628 dest.o_quoted = 1;
Denis Vlasenko0c886c62007-01-30 22:30:09 +00005629 while (1) {
Denis Vlasenko46ccdcb2008-06-10 18:05:12 +00005630 ch = i_getch(input);
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005631 if (ch == EOF) {
Denis Vlasenkod68ae082009-04-09 20:41:34 +00005632 syntax_error_unterm_ch('\'');
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005633 /*xfunc_die(); - redundant */
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005634 }
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005635 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005636 if (ch == '\'')
Denis Vlasenko0c886c62007-01-30 22:30:09 +00005637 break;
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005638 if (dest.o_assignment == NOT_ASSIGNMENT)
5639 o_addqchr(&dest, ch);
Denis Vlasenko55789c62008-06-18 16:30:42 +00005640 else
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005641 o_addchr(&dest, ch);
Eric Andersen25f27032001-04-26 23:22:31 +00005642 }
Eric Andersen25f27032001-04-26 23:22:31 +00005643 break;
5644 case '"':
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00005645 dest.o_quoted = 1;
Denis Vlasenko2f1d3942009-04-02 16:31:29 +00005646 is_in_dquote ^= 1; /* invert */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005647 if (dest.o_assignment == NOT_ASSIGNMENT)
5648 dest.o_escape ^= 1;
Eric Andersen25f27032001-04-26 23:22:31 +00005649 break;
Denis Vlasenko14b5dd92007-05-20 21:51:38 +00005650#if ENABLE_HUSH_TICK
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005651 case '`': {
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005652#if !BB_MMU
5653 int pos;
5654#endif
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005655 o_addchr(&dest, SPECIAL_VAR_SYMBOL);
5656 o_addchr(&dest, '`');
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005657#if !BB_MMU
5658 pos = dest.length;
5659#endif
Denis Vlasenko0b677d82009-04-10 13:49:10 +00005660 add_till_backquote(&dest, input);
Denis Vlasenko5c090a92009-04-08 21:51:33 +00005661#if !BB_MMU
5662 o_addstr(&ctx.as_string, dest.data + pos);
5663 o_addchr(&ctx.as_string, '`');
5664#endif
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005665 o_addchr(&dest, SPECIAL_VAR_SYMBOL);
5666 //debug_printf_subst("SUBST RES3 '%s'\n", dest.data + pos);
Eric Andersen25f27032001-04-26 23:22:31 +00005667 break;
Denis Vlasenko7b4f3f12008-06-10 18:04:32 +00005668 }
Denis Vlasenko14b5dd92007-05-20 21:51:38 +00005669#endif
Eric Andersen25f27032001-04-26 23:22:31 +00005670 case ';':
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005671#if ENABLE_HUSH_CASE
5672 case_semi:
5673#endif
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005674 if (done_word(&dest, &ctx)) {
5675 goto parse_error;
5676 }
5677 done_pipe(&ctx, PIPE_SEQ);
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005678#if ENABLE_HUSH_CASE
5679 /* Eat multiple semicolons, detect
5680 * whether it means something special */
5681 while (1) {
5682 ch = i_peek(input);
5683 if (ch != ';')
5684 break;
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005685 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005686 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005687 if (ctx.ctx_res_w == RES_CASEI) {
5688 ctx.ctx_dsemicolon = 1;
5689 ctx.ctx_res_w = RES_MATCH;
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005690 break;
5691 }
5692 }
5693#endif
Denis Vlasenko2b576b82008-08-04 00:46:07 +00005694 new_cmd:
5695 /* We just finished a cmd. New one may start
5696 * with an assignment */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005697 dest.o_assignment = MAYBE_ASSIGNMENT;
Eric Andersen25f27032001-04-26 23:22:31 +00005698 break;
5699 case '&':
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005700 if (done_word(&dest, &ctx)) {
5701 goto parse_error;
5702 }
Denis Vlasenkobb81c582007-01-30 22:32:09 +00005703 if (next == '&') {
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005704 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005705 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005706 done_pipe(&ctx, PIPE_AND);
Eric Andersen25f27032001-04-26 23:22:31 +00005707 } else {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005708 done_pipe(&ctx, PIPE_BG);
Eric Andersen25f27032001-04-26 23:22:31 +00005709 }
Denis Vlasenko2b576b82008-08-04 00:46:07 +00005710 goto new_cmd;
Eric Andersen25f27032001-04-26 23:22:31 +00005711 case '|':
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005712 if (done_word(&dest, &ctx)) {
5713 goto parse_error;
5714 }
Denis Vlasenkofbeeb322008-07-31 00:17:01 +00005715#if ENABLE_HUSH_CASE
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005716 if (ctx.ctx_res_w == RES_MATCH)
Denis Vlasenkof1736072008-07-31 10:09:26 +00005717 break; /* we are in case's "word | word)" */
Denis Vlasenkofbeeb322008-07-31 00:17:01 +00005718#endif
Denis Vlasenko2b576b82008-08-04 00:46:07 +00005719 if (next == '|') { /* || */
Denis Vlasenko609f2ab2009-04-04 23:15:14 +00005720 ch = i_getch(input);
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00005721 nommu_addchr(&ctx.as_string, ch);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005722 done_pipe(&ctx, PIPE_OR);
Eric Andersen25f27032001-04-26 23:22:31 +00005723 } else {
5724 /* we could pick up a file descriptor choice here
5725 * with redirect_opt_num(), but bash doesn't do it.
5726 * "echo foo 2| cat" yields "foo 2". */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005727 done_command(&ctx);
Eric Andersen25f27032001-04-26 23:22:31 +00005728 }
Denis Vlasenko2b576b82008-08-04 00:46:07 +00005729 goto new_cmd;
Eric Andersen25f27032001-04-26 23:22:31 +00005730 case '(':
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005731#if ENABLE_HUSH_CASE
Denis Vlasenkof1736072008-07-31 10:09:26 +00005732 /* "case... in [(]word)..." - skip '(' */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005733 if (ctx.ctx_res_w == RES_MATCH
5734 && ctx.command->argv == NULL /* not (word|(... */
5735 && dest.length == 0 /* not word(... */
Denis Vlasenko02d6f1a2009-04-07 19:56:55 +00005736 && dest.o_quoted == 0 /* not ""(... */
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005737 ) {
5738 continue;
5739 }
5740#endif
Eric Andersen25f27032001-04-26 23:22:31 +00005741 case '{':
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005742 if (parse_group(&dest, &ctx, input, ch) != 0) {
5743 goto parse_error;
Denis Vlasenkoe725bfe2007-05-03 22:45:39 +00005744 }
Denis Vlasenko2b576b82008-08-04 00:46:07 +00005745 goto new_cmd;
Eric Andersen25f27032001-04-26 23:22:31 +00005746 case ')':
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005747#if ENABLE_HUSH_CASE
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005748 if (ctx.ctx_res_w == RES_MATCH)
Denis Vlasenko17f02e72008-07-14 04:32:29 +00005749 goto case_semi;
5750#endif
Eric Andersen25f27032001-04-26 23:22:31 +00005751 case '}':
Denis Vlasenkoc3735272008-10-09 12:58:26 +00005752 /* proper use of this character is caught by end_trigger:
5753 * if we see {, we call parse_group(..., end_trigger='}')
5754 * and it will match } earlier (not here). */
Denis Vlasenkoc0ea3292009-04-10 21:22:02 +00005755 syntax_error_unexpected_ch(ch);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005756 goto parse_error;
Eric Andersen25f27032001-04-26 23:22:31 +00005757 default:
Denis Vlasenko5ec61322008-06-24 00:50:07 +00005758 if (HUSH_DEBUG)
Denis Vlasenko90e485c2007-05-23 15:22:50 +00005759 bb_error_msg_and_die("BUG: unexpected %c\n", ch);
Eric Andersen25f27032001-04-26 23:22:31 +00005760 }
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005761 } /* while (1) */
Denis Vlasenko027e3fd2009-04-02 22:50:40 +00005762
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005763 parse_error:
5764 {
Denis Vlasenko60b392f2009-04-03 19:14:32 +00005765 struct parse_context *pctx;
5766 IF_HAS_KEYWORDS(struct parse_context *p2;)
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005767
5768 /* Clean up allocated tree.
5769 * Samples for finding leaks on syntax error recovery path.
Denis Vlasenkoa24c8ca2009-04-04 15:24:40 +00005770 * Run them from interactive shell, watch pmap `pidof hush`.
5771 * while if false; then false; fi do break; done
5772 * (bash accepts it)
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005773 * while if false; then false; fi; do break; fi
Denis Vlasenkocc4c6932009-04-05 07:38:48 +00005774 * Samples to catch leaks at execution:
5775 * while if (true | {true;}); then echo ok; fi; do break; done
5776 * while if (true | {true;}); then echo ok; fi; do (if echo ok; break; then :; fi) | cat; break; done
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005777 */
5778 pctx = &ctx;
5779 do {
5780 /* Update pipe/command counts,
5781 * otherwise freeing may miss some */
5782 done_pipe(pctx, PIPE_SEQ);
5783 debug_printf_clean("freeing list %p from ctx %p\n",
5784 pctx->list_head, pctx);
5785 debug_print_tree(pctx->list_head, 0);
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005786 free_pipe_list(pctx->list_head);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005787 debug_printf_clean("freed list %p\n", pctx->list_head);
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005788#if !BB_MMU
5789 o_free_unsafe(&pctx->as_string);
5790#endif
Denis Vlasenko60b392f2009-04-03 19:14:32 +00005791 IF_HAS_KEYWORDS(p2 = pctx->stack;)
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005792 if (pctx != &ctx) {
5793 free(pctx);
5794 }
Denis Vlasenko60b392f2009-04-03 19:14:32 +00005795 IF_HAS_KEYWORDS(pctx = p2;)
5796 } while (HAS_KEYWORDS && pctx);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005797 /* Free text, clear all dest fields */
5798 o_free(&dest);
5799 /* If we are not in top-level parse, we return,
5800 * our caller will propagate error.
5801 */
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005802 if (end_trigger != ';') {
5803#if !BB_MMU
5804 if (pstring)
5805 *pstring = NULL;
5806#endif
Denis Vlasenko0701dca2009-04-11 10:38:47 +00005807 debug_leave();
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005808 return ERR_PTR;
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005809 }
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005810 /* Discard cached input, force prompt */
5811 input->p = NULL;
Denis Vlasenko60b392f2009-04-03 19:14:32 +00005812 USE_HUSH_INTERACTIVE(input->promptme = 1;)
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005813 goto reset;
Denis Vlasenko027e3fd2009-04-02 22:50:40 +00005814 }
Eric Andersen25f27032001-04-26 23:22:31 +00005815}
5816
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005817/* Executing from string: eval, sh -c '...'
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005818 * or from file: /etc/profile, . file, sh <script>, sh (intereactive)
5819 * end_trigger controls how often we stop parsing
5820 * NUL: parse all, execute, return
5821 * ';': parse till ';' or newline, execute, repeat till EOF
5822 */
5823static void parse_and_run_stream(struct in_str *inp, int end_trigger)
Eric Andersen25f27032001-04-26 23:22:31 +00005824{
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005825 while (1) {
5826 struct pipe *pipe_list;
Denis Vlasenkof8d01d32008-06-14 17:13:20 +00005827
Denis Vlasenko9aa7d6f2009-04-04 22:47:50 +00005828 pipe_list = parse_stream(NULL, inp, end_trigger);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005829 if (!pipe_list) /* EOF */
5830 break;
5831 debug_print_tree(pipe_list, 0);
5832 debug_printf_exec("parse_and_run_stream: run_and_free_list\n");
5833 run_and_free_list(pipe_list);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005834 }
Eric Andersen25f27032001-04-26 23:22:31 +00005835}
5836
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005837static void parse_and_run_string(const char *s)
Eric Andersen25f27032001-04-26 23:22:31 +00005838{
5839 struct in_str input;
5840 setup_string_in_str(&input, s);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005841 parse_and_run_stream(&input, '\0');
Eric Andersen25f27032001-04-26 23:22:31 +00005842}
5843
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005844static void parse_and_run_file(FILE *f)
Eric Andersen25f27032001-04-26 23:22:31 +00005845{
Eric Andersen25f27032001-04-26 23:22:31 +00005846 struct in_str input;
5847 setup_file_in_str(&input, f);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00005848 parse_and_run_stream(&input, ';');
Eric Andersen25f27032001-04-26 23:22:31 +00005849}
5850
Denis Vlasenkof9375282009-04-05 19:13:39 +00005851/* Called a few times only (or even once if "sh -c") */
5852static void block_signals(int second_time)
Eric Andersen52a97ca2001-06-22 06:49:26 +00005853{
Denis Vlasenkof9375282009-04-05 19:13:39 +00005854 unsigned sig;
5855 unsigned mask;
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00005856
Denis Vlasenkof9375282009-04-05 19:13:39 +00005857 mask = (1 << SIGQUIT);
Denis Vlasenkoe4bd4f22009-04-17 13:52:51 +00005858 if (G_interactive_fd)
5859 mask = (1 << SIGQUIT) | SPECIAL_INTERACTIVE_SIGS;
Denis Vlasenkof9375282009-04-05 19:13:39 +00005860 G.non_DFL_mask = mask;
Eric Andersen52a97ca2001-06-22 06:49:26 +00005861
Denis Vlasenkof9375282009-04-05 19:13:39 +00005862 if (!second_time)
5863 sigprocmask(SIG_SETMASK, NULL, &G.blocked_set);
5864 sig = 0;
5865 while (mask) {
5866 if (mask & 1)
5867 sigaddset(&G.blocked_set, sig);
5868 mask >>= 1;
5869 sig++;
5870 }
5871 sigdelset(&G.blocked_set, SIGCHLD);
5872
5873 sigprocmask(SIG_SETMASK, &G.blocked_set,
5874 second_time ? NULL : &G.inherited_set);
5875 /* POSIX allows shell to re-enable SIGCHLD
5876 * even if it was SIG_IGN on entry */
5877// G.count_SIGCHLD++; /* ensure it is != G.handled_SIGCHLD */
5878 if (!second_time)
5879 signal(SIGCHLD, SIG_DFL); // SIGCHLD_handler);
5880}
5881
5882#if ENABLE_HUSH_JOB
5883/* helper */
5884static void maybe_set_to_sigexit(int sig)
5885{
5886 void (*handler)(int);
5887 /* non_DFL_mask'ed signals are, well, masked,
5888 * no need to set handler for them.
5889 */
5890 if (!((G.non_DFL_mask >> sig) & 1)) {
5891 handler = signal(sig, sigexit);
5892 if (handler == SIG_IGN) /* oops... restore back to IGN! */
5893 signal(sig, handler);
5894 }
5895}
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00005896/* Set handlers to restore tty pgrp and exit */
Denis Vlasenkof9375282009-04-05 19:13:39 +00005897static void set_fatal_handlers(void)
5898{
Denis Vlasenkoa6c467f2007-05-05 15:10:52 +00005899 /* We _must_ restore tty pgrp on fatal signals */
Denis Vlasenkof9375282009-04-05 19:13:39 +00005900 if (HUSH_DEBUG) {
5901 maybe_set_to_sigexit(SIGILL );
5902 maybe_set_to_sigexit(SIGFPE );
5903 maybe_set_to_sigexit(SIGBUS );
5904 maybe_set_to_sigexit(SIGSEGV);
5905 maybe_set_to_sigexit(SIGTRAP);
5906 } /* else: hush is perfect. what SEGV? */
5907 maybe_set_to_sigexit(SIGABRT);
5908 /* bash 3.2 seems to handle these just like 'fatal' ones */
5909 maybe_set_to_sigexit(SIGPIPE);
5910 maybe_set_to_sigexit(SIGALRM);
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00005911 /* if we are interactive, SIGHUP, SIGTERM and SIGINT are masked.
Denis Vlasenkof9375282009-04-05 19:13:39 +00005912 * if we aren't interactive... but in this case
5913 * we never want to restore pgrp on exit, and this fn is not called */
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00005914 /*maybe_set_to_sigexit(SIGHUP );*/
Denis Vlasenkof9375282009-04-05 19:13:39 +00005915 /*maybe_set_to_sigexit(SIGTERM);*/
5916 /*maybe_set_to_sigexit(SIGINT );*/
Eric Andersen6c947d22001-06-25 22:24:38 +00005917}
Denis Vlasenkob81b3df2007-04-28 16:48:04 +00005918#endif
Eric Andersenada18ff2001-05-21 16:18:22 +00005919
Denis Vlasenkod5762932009-03-31 11:22:57 +00005920static int set_mode(const char cstate, const char mode)
5921{
5922 int state = (cstate == '-' ? 1 : 0);
5923 switch (mode) {
5924 case 'n': G.fake_mode = state; break;
5925 case 'x': /*G.debug_mode = state;*/ break;
5926 default: return EXIT_FAILURE;
5927 }
5928 return EXIT_SUCCESS;
5929}
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00005930
Denis Vlasenko9b49a5e2007-10-11 10:05:36 +00005931int hush_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
Matt Kraai2d91deb2001-08-01 17:21:35 +00005932int hush_main(int argc, char **argv)
Eric Andersen25f27032001-04-26 23:22:31 +00005933{
Denis Vlasenko0a83fc32007-05-25 11:12:32 +00005934 static const struct variable const_shell_ver = {
5935 .next = NULL,
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00005936 .varstr = (char*)hush_version_str,
Denis Vlasenko0a83fc32007-05-25 11:12:32 +00005937 .max_len = 1, /* 0 can provoke free(name) */
5938 .flg_export = 1,
5939 .flg_read_only = 1,
5940 };
Denis Vlasenkof9375282009-04-05 19:13:39 +00005941 int signal_mask_is_inited = 0;
Eric Andersen25f27032001-04-26 23:22:31 +00005942 int opt;
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00005943 char **e;
Denis Vlasenkod76c0492007-05-25 02:16:25 +00005944 struct variable *cur_var;
Eric Andersenbc604a22001-05-16 05:24:03 +00005945
Denis Vlasenko574f2f42008-02-27 18:41:59 +00005946 INIT_G();
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00005947 if (EXIT_SUCCESS) /* if EXIT_SUCCESS == 0, is already done */
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00005948 G.last_exitcode = EXIT_SUCCESS;
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00005949#if !BB_MMU
5950 G.argv0_for_re_execing = argv[0];
5951#endif
Denis Vlasenko0a83fc32007-05-25 11:12:32 +00005952 /* Deal with HUSH_VERSION */
Denis Vlasenko87a86552008-07-29 19:43:10 +00005953 G.shell_ver = const_shell_ver; /* copying struct here */
5954 G.top_var = &G.shell_ver;
Denis Vlasenkof886fd22008-10-13 12:36:05 +00005955 debug_printf_env("unsetenv '%s'\n", "HUSH_VERSION");
Denis Vlasenko0a83fc32007-05-25 11:12:32 +00005956 unsetenv("HUSH_VERSION"); /* in case it exists in initial env */
5957 /* Initialize our shell local variables with the values
Denis Vlasenkod76c0492007-05-25 02:16:25 +00005958 * currently living in the environment */
Denis Vlasenko87a86552008-07-29 19:43:10 +00005959 cur_var = G.top_var;
Denis Vlasenko0a83fc32007-05-25 11:12:32 +00005960 e = environ;
Denis Vlasenkod76c0492007-05-25 02:16:25 +00005961 if (e) while (*e) {
5962 char *value = strchr(*e, '=');
5963 if (value) { /* paranoia */
5964 cur_var->next = xzalloc(sizeof(*cur_var));
5965 cur_var = cur_var->next;
Denis Vlasenko28c0f0f2007-05-25 02:46:01 +00005966 cur_var->varstr = *e;
Denis Vlasenkod76c0492007-05-25 02:16:25 +00005967 cur_var->max_len = strlen(*e);
5968 cur_var->flg_export = 1;
5969 }
5970 e++;
5971 }
Denis Vlasenkof886fd22008-10-13 12:36:05 +00005972 debug_printf_env("putenv '%s'\n", hush_version_str);
Denis Vlasenkoafd7a8d2008-10-09 16:29:44 +00005973 putenv((char *)hush_version_str); /* reinstate HUSH_VERSION */
Denis Vlasenko38f63192007-01-22 09:03:07 +00005974#if ENABLE_FEATURE_EDITING
Denis Vlasenko87a86552008-07-29 19:43:10 +00005975 G.line_input_state = new_line_input_t(FOR_SHELL);
Denis Vlasenko8e1c7152007-01-22 07:21:38 +00005976#endif
Denis Vlasenko87a86552008-07-29 19:43:10 +00005977 G.global_argc = argc;
5978 G.global_argv = argv;
Eric Andersen94ac2442001-05-22 19:05:18 +00005979 /* Initialize some more globals to non-zero values */
5980 set_cwd();
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00005981#if ENABLE_HUSH_INTERACTIVE
Mike Frysingerec2c6552009-03-28 12:24:44 +00005982 if (ENABLE_FEATURE_EDITING)
5983 cmdedit_set_initial_prompt();
Denis Vlasenko87a86552008-07-29 19:43:10 +00005984 G.PS2 = "> ";
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00005985#endif
Denis Vlasenkoc8be5ee2007-05-17 15:38:46 +00005986
Denis Vlasenkoed782372009-04-10 00:45:02 +00005987 if (setjmp(die_jmp)) {
5988 /* xfunc has failed! die die die */
5989 /* no EXIT traps, this is an escape hatch! */
5990 G.exiting = 1;
5991 hush_exit(xfunc_error_retval);
5992 }
5993
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005994 /* Shell is non-interactive at first. We need to call
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00005995 * block_signals(0) if we are going to execute "sh <script>",
5996 * "sh -c <cmds>" or login shell's /etc/profile and friends.
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00005997 * If we later decide that we are interactive, we run block_signals(0)
5998 * (or re-run block_signals(1) if we ran block_signals(0) before)
5999 * in order to intercept (more) signals.
6000 */
6001
6002 /* Parse options */
Mike Frysinger19a7ea12009-03-28 13:02:11 +00006003 /* http://www.opengroup.org/onlinepubs/9699919799/utilities/sh.html */
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006004 while (1) {
6005 opt = getopt(argc, argv, "c:xins"
6006#if !BB_MMU
Denis Vlasenkobc569742009-04-12 20:35:19 +00006007 "<:$:R:V:"
6008# if ENABLE_HUSH_FUNCTIONS
6009 "F:"
6010# endif
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006011#endif
6012 );
6013 if (opt <= 0)
6014 break;
Eric Andersen25f27032001-04-26 23:22:31 +00006015 switch (opt) {
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006016 case 'c':
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006017 if (!G.root_pid)
6018 G.root_pid = getpid();
Denis Vlasenko87a86552008-07-29 19:43:10 +00006019 G.global_argv = argv + optind;
Denis Vlasenkoa8b6dff2009-03-20 12:05:14 +00006020 if (!argv[optind]) {
6021 /* -c 'script' (no params): prevent empty $0 */
6022 *--G.global_argv = argv[0];
6023 optind--;
6024 } /* else -c 'script' PAR0 PAR1: $0 is PAR0 */
Denis Vlasenko87a86552008-07-29 19:43:10 +00006025 G.global_argc = argc - optind;
Denis Vlasenkof9375282009-04-05 19:13:39 +00006026 block_signals(0); /* 0: called 1st time */
Denis Vlasenkob6e65562009-04-03 16:49:04 +00006027 parse_and_run_string(optarg);
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006028 goto final_return;
6029 case 'i':
Denis Vlasenkoc666f712007-05-16 22:18:54 +00006030 /* Well, we cannot just declare interactiveness,
6031 * we have to have some stuff (ctty, etc) */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006032 /* G_interactive_fd++; */
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006033 break;
Mike Frysinger19a7ea12009-03-28 13:02:11 +00006034 case 's':
6035 /* "-s" means "read from stdin", but this is how we always
6036 * operate, so simply do nothing here. */
6037 break;
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006038#if !BB_MMU
Denis Vlasenko50f3aa42009-04-07 10:52:40 +00006039 case '<': /* "big heredoc" support */
6040 full_write(STDOUT_FILENO, optarg, strlen(optarg));
6041 _exit(0);
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006042 case '$':
Denis Vlasenko34e573d2009-04-06 12:56:28 +00006043 G.root_pid = bb_strtou(optarg, &optarg, 16);
6044 optarg++;
6045 G.last_bg_pid = bb_strtou(optarg, &optarg, 16);
6046 optarg++;
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00006047 G.last_exitcode = bb_strtou(optarg, &optarg, 16);
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00006048# if ENABLE_HUSH_LOOPS
Denis Vlasenko34e573d2009-04-06 12:56:28 +00006049 optarg++;
6050 G.depth_of_loop = bb_strtou(optarg, &optarg, 16);
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00006051# endif
Denis Vlasenko34e573d2009-04-06 12:56:28 +00006052 break;
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006053 case 'R':
6054 case 'V':
6055 set_local_var(xstrdup(optarg), 0, opt == 'R');
6056 break;
Denis Vlasenkobc569742009-04-12 20:35:19 +00006057# if ENABLE_HUSH_FUNCTIONS
6058 case 'F': {
6059 struct function *funcp = new_function(optarg);
6060 /* funcp->name is already set to optarg */
6061 /* funcp->body is set to NULL. It's a special case. */
6062 funcp->body_as_string = argv[optind];
6063 optind++;
6064 break;
6065 }
6066# endif
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006067#endif
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006068 case 'n':
6069 case 'x':
Denis Vlasenkod5762932009-03-31 11:22:57 +00006070 if (!set_mode('-', opt))
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006071 break;
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006072 default:
Eric Andersen9ffb7dd2001-05-19 03:00:46 +00006073#ifndef BB_VER
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006074 fprintf(stderr, "Usage: sh [FILE]...\n"
6075 " or: sh -c command [args]...\n\n");
6076 exit(EXIT_FAILURE);
Eric Andersen9ffb7dd2001-05-19 03:00:46 +00006077#else
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006078 bb_show_usage();
Eric Andersen9ffb7dd2001-05-19 03:00:46 +00006079#endif
Eric Andersen25f27032001-04-26 23:22:31 +00006080 }
Denis Vlasenkof9375282009-04-05 19:13:39 +00006081 } /* option parsing loop */
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006082
6083 if (!G.root_pid)
6084 G.root_pid = getpid();
Denis Vlasenkof9375282009-04-05 19:13:39 +00006085
6086 /* If we are login shell... */
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006087 if (argv[0] && argv[0][0] == '-') {
6088 FILE *input;
Denis Vlasenko4ea187f2009-04-17 14:35:43 +00006089 /* TODO: what should argv be while sourcing /etc/profile? */
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006090 debug_printf("sourcing /etc/profile\n");
6091 input = fopen_for_read("/etc/profile");
6092 if (input != NULL) {
6093 close_on_exec_on(fileno(input));
Denis Vlasenkof9375282009-04-05 19:13:39 +00006094 block_signals(0); /* 0: called 1st time */
6095 signal_mask_is_inited = 1;
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006096 parse_and_run_file(input);
6097 fclose(input);
6098 }
Denis Vlasenkof9375282009-04-05 19:13:39 +00006099 /* bash: after sourcing /etc/profile,
6100 * tries to source (in the given order):
6101 * ~/.bash_profile, ~/.bash_login, ~/.profile,
6102 * stopping of first found. --noprofile turns this off.
6103 * bash also sources ~/.bash_logout on exit.
6104 * If called as sh, skips .bash_XXX files.
6105 */
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006106 }
6107
Denis Vlasenkof9375282009-04-05 19:13:39 +00006108 if (argv[optind]) {
6109 FILE *input;
6110 /*
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00006111 * "bash <script>" (which is never interactive (unless -i?))
6112 * sources $BASH_ENV here (without scanning $PATH).
Denis Vlasenkof9375282009-04-05 19:13:39 +00006113 * If called as sh, does the same but with $ENV.
6114 */
6115 debug_printf("running script '%s'\n", argv[optind]);
6116 G.global_argv = argv + optind;
6117 G.global_argc = argc - optind;
6118 input = xfopen_for_read(argv[optind]);
6119 close_on_exec_on(fileno(input));
6120 if (!signal_mask_is_inited)
6121 block_signals(0); /* 0: called 1st time */
6122 parse_and_run_file(input);
6123#if ENABLE_FEATURE_CLEAN_UP
6124 fclose(input);
6125#endif
6126 goto final_return;
6127 }
6128
Denis Vlasenkoc4a7af52009-04-05 20:33:27 +00006129 /* Up to here, shell was non-interactive. Now it may become one.
6130 * NB: don't forget to (re)run block_signals(0/1) as needed.
6131 */
Denis Vlasenkof9375282009-04-05 19:13:39 +00006132
Denis Vlasenkofbf6dea2007-04-13 19:56:56 +00006133 /* A shell is interactive if the '-i' flag was given, or if all of
Eric Andersen25f27032001-04-26 23:22:31 +00006134 * the following conditions are met:
Denis Vlasenko55b2de72007-04-18 17:21:28 +00006135 * no -c command
Eric Andersen25f27032001-04-26 23:22:31 +00006136 * no arguments remaining or the -s flag given
6137 * standard input is a terminal
6138 * standard output is a terminal
Denis Vlasenkof9375282009-04-05 19:13:39 +00006139 * Refer to Posix.2, the description of the 'sh' utility.
6140 */
6141#if ENABLE_HUSH_JOB
6142 if (isatty(STDIN_FILENO) && isatty(STDOUT_FILENO)) {
Denis Vlasenko87a86552008-07-29 19:43:10 +00006143 G.saved_tty_pgrp = tcgetpgrp(STDIN_FILENO);
Denis Vlasenkof9375282009-04-05 19:13:39 +00006144 debug_printf("saved_tty_pgrp:%d\n", G.saved_tty_pgrp);
Denis Vlasenkod3f973e2009-04-06 10:21:42 +00006145//TODO: "interactive" and "have job control" are two different things.
6146//If tcgetpgrp fails here, "have job control" is false, but "interactive"
6147//should stay on! Currently, we mix these into one.
Denis Vlasenko87a86552008-07-29 19:43:10 +00006148 if (G.saved_tty_pgrp >= 0) {
Denis Vlasenkof9375282009-04-05 19:13:39 +00006149 /* try to dup stdin to high fd#, >= 255 */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006150 G_interactive_fd = fcntl(STDIN_FILENO, F_DUPFD, 255);
6151 if (G_interactive_fd < 0) {
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00006152 /* try to dup to any fd */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006153 G_interactive_fd = dup(STDIN_FILENO);
6154 if (G_interactive_fd < 0)
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00006155 /* give up */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006156 G_interactive_fd = 0;
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00006157 }
Denis Vlasenko46f9b6d2009-04-05 10:39:03 +00006158// TODO: track & disallow any attempts of user
6159// to (inadvertently) close/redirect it
Denis Vlasenko54e7ffb2007-04-21 00:03:36 +00006160 }
Eric Andersen25f27032001-04-26 23:22:31 +00006161 }
Denis Vlasenkof9375282009-04-05 19:13:39 +00006162 debug_printf("interactive_fd:%d\n", G_interactive_fd);
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006163 if (G_interactive_fd) {
Denis Vlasenkof9375282009-04-05 19:13:39 +00006164 pid_t shell_pgrp;
6165
6166 /* We are indeed interactive shell, and we will perform
6167 * job control. Setting up for that. */
6168
6169 close_on_exec_on(G_interactive_fd);
6170 /* If we were run as 'hush &', sleep until we are
6171 * in the foreground (tty pgrp == our pgrp).
6172 * If we get started under a job aware app (like bash),
6173 * make sure we are now in charge so we don't fight over
6174 * who gets the foreground */
6175 while (1) {
6176 shell_pgrp = getpgrp();
6177 G.saved_tty_pgrp = tcgetpgrp(G_interactive_fd);
6178 if (G.saved_tty_pgrp == shell_pgrp)
6179 break;
6180 /* send TTIN to ourself (should stop us) */
6181 kill(- shell_pgrp, SIGTTIN);
6182 }
6183 /* Block some signals */
6184 block_signals(signal_mask_is_inited);
6185 /* Set other signals to restore saved_tty_pgrp */
6186 set_fatal_handlers();
6187 /* Put ourselves in our own process group */
6188 bb_setpgrp(); /* is the same as setpgid(our_pid, our_pid); */
6189 /* Grab control of the terminal */
6190 tcsetpgrp(G_interactive_fd, getpid());
Denis Vlasenko4ecfcdc2008-02-11 08:32:31 +00006191 /* -1 is special - makes xfuncs longjmp, not exit
Denis Vlasenkoc04163a2008-02-11 08:30:53 +00006192 * (we reset die_sleep = 0 whereever we [v]fork) */
Denis Vlasenkoaf07b7c2009-04-07 13:26:18 +00006193 enable_restore_tty_pgrp_on_exit(); /* sets die_sleep = -1 */
Denis Vlasenkof9375282009-04-05 19:13:39 +00006194 } else if (!signal_mask_is_inited) {
6195 block_signals(0); /* 0: called 1st time */
6196 } /* else: block_signals(0) was done before */
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00006197#elif ENABLE_HUSH_INTERACTIVE
Denis Vlasenkof9375282009-04-05 19:13:39 +00006198 /* No job control compiled in, only prompt/line editing */
6199 if (isatty(STDIN_FILENO) && isatty(STDOUT_FILENO)) {
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006200 G_interactive_fd = fcntl(STDIN_FILENO, F_DUPFD, 255);
6201 if (G_interactive_fd < 0) {
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00006202 /* try to dup to any fd */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006203 G_interactive_fd = dup(STDIN_FILENO);
6204 if (G_interactive_fd < 0)
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00006205 /* give up */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006206 G_interactive_fd = 0;
Denis Vlasenkoe3f2f892007-04-28 16:48:27 +00006207 }
6208 }
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006209 if (G_interactive_fd) {
Denis Vlasenkof9375282009-04-05 19:13:39 +00006210 close_on_exec_on(G_interactive_fd);
6211 block_signals(signal_mask_is_inited);
6212 } else if (!signal_mask_is_inited) {
6213 block_signals(0);
6214 }
6215#else
6216 /* We have interactiveness code disabled */
6217 if (!signal_mask_is_inited) {
6218 block_signals(0);
6219 }
6220#endif
6221 /* bash:
6222 * if interactive but not a login shell, sources ~/.bashrc
6223 * (--norc turns this off, --rcfile <file> overrides)
6224 */
6225
6226 if (!ENABLE_FEATURE_SH_EXTRA_QUIET && G_interactive_fd) {
Mike Frysinger258275d2009-04-05 21:19:43 +00006227 printf("\n\n%s hush - the humble shell\n", bb_banner);
Mike Frysingerb2705e12009-03-23 08:44:02 +00006228 printf("Enter 'help' for a list of built-in commands.\n\n");
6229 }
6230
Denis Vlasenkof9375282009-04-05 19:13:39 +00006231 parse_and_run_file(stdin);
Eric Andersen25f27032001-04-26 23:22:31 +00006232
Denis Vlasenkod76c0492007-05-25 02:16:25 +00006233 final_return:
Denis Vlasenko38f63192007-01-22 09:03:07 +00006234#if ENABLE_FEATURE_CLEAN_UP
Denis Vlasenko87a86552008-07-29 19:43:10 +00006235 if (G.cwd != bb_msg_unknown)
6236 free((char*)G.cwd);
6237 cur_var = G.top_var->next;
Denis Vlasenkod76c0492007-05-25 02:16:25 +00006238 while (cur_var) {
6239 struct variable *tmp = cur_var;
6240 if (!cur_var->max_len)
Denis Vlasenko28c0f0f2007-05-25 02:46:01 +00006241 free(cur_var->varstr);
Denis Vlasenkod76c0492007-05-25 02:16:25 +00006242 cur_var = cur_var->next;
6243 free(tmp);
Eric Andersenaeb44c42001-05-22 20:29:00 +00006244 }
Eric Andersen25f27032001-04-26 23:22:31 +00006245#endif
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00006246 hush_exit(G.last_exitcode);
Eric Andersen25f27032001-04-26 23:22:31 +00006247}
Denis Vlasenko96702ca2007-11-23 23:28:55 +00006248
6249
6250#if ENABLE_LASH
6251int lash_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
6252int lash_main(int argc, char **argv)
6253{
6254 //bb_error_msg("lash is deprecated, please use hush instead");
6255 return hush_main(argc, argv);
6256}
6257#endif
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006258
6259
6260/*
6261 * Built-ins
6262 */
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +00006263static int builtin_true(char **argv UNUSED_PARAM)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006264{
6265 return 0;
6266}
6267
6268static int builtin_test(char **argv)
6269{
6270 int argc = 0;
6271 while (*argv) {
6272 argc++;
6273 argv++;
6274 }
6275 return test_main(argc, argv - argc);
6276}
6277
6278static int builtin_echo(char **argv)
6279{
6280 int argc = 0;
6281 while (*argv) {
6282 argc++;
6283 argv++;
6284 }
6285 return echo_main(argc, argv - argc);
6286}
6287
6288static int builtin_eval(char **argv)
6289{
6290 int rcode = EXIT_SUCCESS;
6291
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006292 if (*++argv) {
6293 char *str = expand_strvec_to_string(argv);
Denis Vlasenkob6e65562009-04-03 16:49:04 +00006294 /* bash:
6295 * eval "echo Hi; done" ("done" is syntax error):
6296 * "echo Hi" will not execute too.
6297 */
6298 parse_and_run_string(str);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006299 free(str);
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00006300 rcode = G.last_exitcode;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006301 }
6302 return rcode;
6303}
6304
6305static int builtin_cd(char **argv)
6306{
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006307 const char *newdir = argv[1];
6308 if (newdir == NULL) {
Denis Vlasenkob6e65562009-04-03 16:49:04 +00006309 /* bash does nothing (exitcode 0) if HOME is ""; if it's unset,
Denis Vlasenko0b677d82009-04-10 13:49:10 +00006310 * bash says "bash: cd: HOME not set" and does nothing
6311 * (exitcode 1)
Denis Vlasenkob6e65562009-04-03 16:49:04 +00006312 */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006313 newdir = getenv("HOME") ? : "/";
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006314 }
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006315 if (chdir(newdir)) {
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006316 /* Mimic bash message exactly */
6317 bb_perror_msg("cd: %s", newdir);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006318 return EXIT_FAILURE;
6319 }
6320 set_cwd();
6321 return EXIT_SUCCESS;
6322}
6323
6324static int builtin_exec(char **argv)
6325{
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006326 if (*++argv == NULL)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006327 return EXIT_SUCCESS; /* bash does this */
6328 {
6329#if !BB_MMU
Denis Vlasenkof886fd22008-10-13 12:36:05 +00006330 nommu_save_t dummy;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006331#endif
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00006332 /* TODO: if exec fails, bash does NOT exit! We do... */
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006333 pseudo_exec_argv(&dummy, argv, 0, NULL);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006334 /* never returns */
6335 }
6336}
6337
6338static int builtin_exit(char **argv)
6339{
Denis Vlasenkocd418a22009-04-06 18:08:35 +00006340 debug_printf_exec("%s()\n", __func__);
Denis Vlasenko40e84372009-04-18 11:23:38 +00006341
6342 /* interactive bash:
6343 * # trap "echo EEE" EXIT
6344 * # exit
6345 * exit
6346 * There are stopped jobs.
6347 * (if there are _stopped_ jobs, running ones don't count)
6348 * # exit
6349 * exit
6350 # EEE (then bash exits)
6351 *
6352 * we can use G.exiting = -1 as indicator "last cmd was exit"
6353 */
Denis Vlasenkoefea9d22009-04-09 13:43:11 +00006354
6355 /* note: EXIT trap is run by hush_exit */
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006356 if (*++argv == NULL)
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00006357 hush_exit(G.last_exitcode);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006358 /* mimic bash: exit 123abc == exit 255 + error msg */
6359 xfunc_error_retval = 255;
6360 /* bash: exit -2 == exit 254, no error msg */
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006361 hush_exit(xatoi(*argv) & 0xff);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006362}
6363
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006364static void print_escaped(const char *s)
6365{
6366 do {
6367 if (*s != '\'') {
6368 const char *p;
6369
6370 p = strchrnul(s, '\'');
6371 /* print 'xxxx', possibly just '' */
6372 printf("'%.*s'", (int)(p - s), s);
6373 if (*p == '\0')
6374 break;
6375 s = p;
6376 }
6377 /* s points to '; print "'''...'''" */
6378 putchar('"');
6379 do putchar('\''); while (*++s == '\'');
6380 putchar('"');
6381 } while (*s);
6382}
6383
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006384static int builtin_export(char **argv)
6385{
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006386 if (*++argv == NULL) {
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006387 char **e = environ;
Denis Vlasenko0b677d82009-04-10 13:49:10 +00006388 if (e) {
6389 while (*e) {
6390#if 0
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006391 puts(*e++);
Denis Vlasenko0b677d82009-04-10 13:49:10 +00006392#else
6393 /* ash emits: export VAR='VAL'
6394 * bash: declare -x VAR="VAL"
6395 * we follow ash example */
6396 const char *s = *e++;
6397 const char *p = strchr(s, '=');
6398
6399 if (!p) /* wtf? take next variable */
6400 continue;
6401 /* export var= */
6402 printf("export %.*s", (int)(p - s) + 1, s);
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006403 print_escaped(p + 1);
Denis Vlasenko0b677d82009-04-10 13:49:10 +00006404 putchar('\n');
6405#endif
6406 }
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006407 /*fflush(stdout); - done after each builtin anyway */
Denis Vlasenko0b677d82009-04-10 13:49:10 +00006408 }
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006409 return EXIT_SUCCESS;
6410 }
6411
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006412 do {
6413 const char *value;
6414 char *name = *argv;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006415
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006416 value = strchr(name, '=');
6417 if (!value) {
6418 /* They are exporting something without a =VALUE */
6419 struct variable *var;
6420
6421 var = get_local_var(name);
6422 if (var) {
6423 var->flg_export = 1;
6424 debug_printf_env("%s: putenv '%s'\n", __func__, var->varstr);
6425 putenv(var->varstr);
6426 }
6427 /* bash does not return an error when trying to export
6428 * an undefined variable. Do likewise. */
6429 continue;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006430 }
Denis Vlasenkob0a64782009-04-06 11:33:07 +00006431 set_local_var(xstrdup(name), 1, 0);
6432 } while (*++argv);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006433
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006434 return EXIT_SUCCESS;
6435}
6436
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006437static int builtin_trap(char **argv)
6438{
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006439 int sig;
6440 char *new_cmd;
6441
6442 if (!G.traps)
6443 G.traps = xzalloc(sizeof(G.traps[0]) * NSIG);
6444
6445 argv++;
6446 if (!*argv) {
Denis Vlasenko6008d8a2009-04-18 13:05:10 +00006447 int i;
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006448 /* No args: print all trapped */
6449 for (i = 0; i < NSIG; ++i) {
6450 if (G.traps[i]) {
6451 printf("trap -- ");
6452 print_escaped(G.traps[i]);
6453 printf(" %s\n", get_signame(i));
6454 }
6455 }
6456 /*fflush(stdout); - done after each builtin anyway */
6457 return EXIT_SUCCESS;
6458 }
6459
6460 new_cmd = NULL;
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006461 /* If first arg is a number: reset all specified signals */
6462 sig = bb_strtou(*argv, NULL, 10);
6463 if (errno == 0) {
6464 int ret;
6465 process_sig_list:
6466 ret = EXIT_SUCCESS;
6467 while (*argv) {
6468 sig = get_signum(*argv++);
6469 if (sig < 0 || sig >= NSIG) {
6470 ret = EXIT_FAILURE;
6471 /* Mimic bash message exactly */
Denis Vlasenko6008d8a2009-04-18 13:05:10 +00006472 bb_perror_msg("trap: %s: invalid signal specification", argv[-1]);
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006473 continue;
6474 }
6475
6476 free(G.traps[sig]);
6477 G.traps[sig] = xstrdup(new_cmd);
6478
6479 debug_printf("trap: setting SIG%s (%i) to '%s'",
6480 get_signame(sig), sig, G.traps[sig]);
6481
6482 /* There is no signal for 0 (EXIT) */
6483 if (sig == 0)
6484 continue;
6485
6486 if (new_cmd) {
6487 sigaddset(&G.blocked_set, sig);
6488 } else {
6489 /* There was a trap handler, we are removing it
6490 * (if sig has non-DFL handling,
6491 * we don't need to do anything) */
6492 if (sig < 32 && (G.non_DFL_mask & (1 << sig)))
6493 continue;
6494 sigdelset(&G.blocked_set, sig);
6495 }
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006496 }
Denis Vlasenko6008d8a2009-04-18 13:05:10 +00006497 sigprocmask(SIG_SETMASK, &G.blocked_set, NULL);
Denis Vlasenko38e626d2009-04-18 12:58:19 +00006498 return ret;
6499 }
6500
6501 if (!argv[1]) { /* no second arg */
6502 bb_error_msg("trap: invalid arguments");
6503 return EXIT_FAILURE;
6504 }
6505
6506 /* First arg is "-": reset all specified to default */
6507 /* First arg is "--": skip it, the rest is "handler SIGs..." */
6508 /* Everything else: set arg as signal handler
6509 * (includes "" case, which ignores signal) */
6510 if (argv[0][0] == '-') {
6511 if (argv[0][1] == '\0') { /* "-" */
6512 /* new_cmd remains NULL: "reset these sigs" */
6513 goto reset_traps;
6514 }
6515 if (argv[0][1] == '-' && argv[0][2] == '\0') { /* "--" */
6516 argv++;
6517 }
6518 /* else: "-something", no special meaning */
6519 }
6520 new_cmd = *argv;
6521 reset_traps:
6522 argv++;
6523 goto process_sig_list;
6524}
6525
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006526#if ENABLE_HUSH_JOB
6527/* built-in 'fg' and 'bg' handler */
6528static int builtin_fg_bg(char **argv)
6529{
6530 int i, jobnum;
6531 struct pipe *pi;
6532
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006533 if (!G_interactive_fd)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006534 return EXIT_FAILURE;
6535 /* If they gave us no args, assume they want the last backgrounded task */
6536 if (!argv[1]) {
Denis Vlasenko87a86552008-07-29 19:43:10 +00006537 for (pi = G.job_list; pi; pi = pi->next) {
6538 if (pi->jobid == G.last_jobid) {
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006539 goto found;
6540 }
6541 }
6542 bb_error_msg("%s: no current job", argv[0]);
6543 return EXIT_FAILURE;
6544 }
6545 if (sscanf(argv[1], "%%%d", &jobnum) != 1) {
6546 bb_error_msg("%s: bad argument '%s'", argv[0], argv[1]);
6547 return EXIT_FAILURE;
6548 }
Denis Vlasenko87a86552008-07-29 19:43:10 +00006549 for (pi = G.job_list; pi; pi = pi->next) {
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006550 if (pi->jobid == jobnum) {
6551 goto found;
6552 }
6553 }
6554 bb_error_msg("%s: %d: no such job", argv[0], jobnum);
6555 return EXIT_FAILURE;
6556 found:
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00006557 /* TODO: bash prints a string representation
6558 * of job being foregrounded (like "sleep 1 | cat") */
Denis Vlasenko34d4d892009-04-04 20:24:37 +00006559 if (argv[0][0] == 'f') {
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006560 /* Put the job into the foreground. */
Denis Vlasenko60b392f2009-04-03 19:14:32 +00006561 tcsetpgrp(G_interactive_fd, pi->pgrp);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006562 }
6563
6564 /* Restart the processes in the job */
Denis Vlasenko9af22c72008-10-09 12:54:58 +00006565 debug_printf_jobs("reviving %d procs, pgrp %d\n", pi->num_cmds, pi->pgrp);
6566 for (i = 0; i < pi->num_cmds; i++) {
6567 debug_printf_jobs("reviving pid %d\n", pi->cmds[i].pid);
6568 pi->cmds[i].is_stopped = 0;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006569 }
Denis Vlasenko9af22c72008-10-09 12:54:58 +00006570 pi->stopped_cmds = 0;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006571
6572 i = kill(- pi->pgrp, SIGCONT);
6573 if (i < 0) {
6574 if (errno == ESRCH) {
6575 delete_finished_bg_job(pi);
6576 return EXIT_SUCCESS;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006577 }
Denis Vlasenko34d4d892009-04-04 20:24:37 +00006578 bb_perror_msg("kill (SIGCONT)");
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006579 }
6580
Denis Vlasenko34d4d892009-04-04 20:24:37 +00006581 if (argv[0][0] == 'f') {
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006582 remove_bg_job(pi);
6583 return checkjobs_and_fg_shell(pi);
6584 }
6585 return EXIT_SUCCESS;
6586}
6587#endif
6588
6589#if ENABLE_HUSH_HELP
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +00006590static int builtin_help(char **argv UNUSED_PARAM)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006591{
6592 const struct built_in_command *x;
6593
Denis Vlasenko34d4d892009-04-04 20:24:37 +00006594 printf("\n"
6595 "Built-in commands:\n"
6596 "------------------\n");
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006597 for (x = bltins; x != &bltins[ARRAY_SIZE(bltins)]; x++) {
6598 printf("%s\t%s\n", x->cmd, x->descr);
6599 }
6600 printf("\n\n");
6601 return EXIT_SUCCESS;
6602}
6603#endif
6604
6605#if ENABLE_HUSH_JOB
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +00006606static int builtin_jobs(char **argv UNUSED_PARAM)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006607{
6608 struct pipe *job;
6609 const char *status_string;
6610
Denis Vlasenko87a86552008-07-29 19:43:10 +00006611 for (job = G.job_list; job; job = job->next) {
Denis Vlasenko9af22c72008-10-09 12:54:58 +00006612 if (job->alive_cmds == job->stopped_cmds)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006613 status_string = "Stopped";
6614 else
6615 status_string = "Running";
6616
6617 printf(JOB_STATUS_FORMAT, job->jobid, status_string, job->cmdtext);
6618 }
6619 return EXIT_SUCCESS;
6620}
6621#endif
6622
Denis Vlasenkoc73b70c2009-04-08 11:48:57 +00006623#if HUSH_DEBUG
6624static int builtin_memleak(char **argv UNUSED_PARAM)
6625{
6626 void *p;
6627 unsigned long l;
6628
6629 /* Crude attempt to find where "free memory" starts,
6630 * sans fragmentation. */
6631 p = malloc(240);
6632 l = (unsigned long)p;
6633 free(p);
6634 p = malloc(3400);
6635 if (l < (unsigned long)p) l = (unsigned long)p;
6636 free(p);
6637
6638 if (!G.memleak_value)
6639 G.memleak_value = l;
6640
6641 l -= G.memleak_value;
6642 if ((long)l < 0)
6643 l = 0;
6644 l /= 1024;
6645 if (l > 127)
6646 l = 127;
6647
6648 /* Exitcode is "how many kilobytes we leaked since 1st call" */
6649 return l;
6650}
6651#endif
6652
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +00006653static int builtin_pwd(char **argv UNUSED_PARAM)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006654{
6655 puts(set_cwd());
6656 return EXIT_SUCCESS;
6657}
6658
6659static int builtin_read(char **argv)
6660{
6661 char *string;
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00006662 const char *name = "REPLY";
6663
6664 if (argv[1]) {
6665 name = argv[1];
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00006666 /* bash (3.2.33(1)) bug: "read 0abcd" will execute,
6667 * and _after_ that_ it will complain */
Denis Vlasenko05d3b7c2009-04-09 19:16:15 +00006668 if (!is_well_formed_var_name(name, '\0')) {
6669 /* Mimic bash message */
6670 bb_error_msg("read: '%s': not a valid identifier", name);
6671 return 1;
6672 }
6673 }
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006674
Denis Vlasenko1fd1ea42009-04-10 12:03:20 +00006675//TODO: bash unbackslashes input, splits words and puts them in argv[i]
6676
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006677 string = xmalloc_reads(STDIN_FILENO, xasprintf("%s=", name), NULL);
Denis Vlasenko0bb4a232009-04-05 01:42:59 +00006678 return set_local_var(string, 0, 0);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006679}
6680
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006681/* http://www.opengroup.org/onlinepubs/9699919799/utilities/V3_chap02.html#set
6682 * built-in 'set' handler
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006683 * SUSv3 says:
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006684 * set [-abCefhmnuvx] [-o option] [argument...]
6685 * set [+abCefhmnuvx] [+o option] [argument...]
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006686 * set -- [argument...]
6687 * set -o
6688 * set +o
6689 * Implementations shall support the options in both their hyphen and
6690 * plus-sign forms. These options can also be specified as options to sh.
6691 * Examples:
6692 * Write out all variables and their values: set
6693 * Set $1, $2, and $3 and set "$#" to 3: set c a b
6694 * Turn on the -x and -v options: set -xv
6695 * Unset all positional parameters: set --
6696 * Set $1 to the value of x, even if it begins with '-' or '+': set -- "$x"
6697 * Set the positional parameters to the expansion of x, even if x expands
6698 * with a leading '-' or '+': set -- $x
6699 *
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006700 * So far, we only support "set -- [argument...]" and some of the short names.
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006701 */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006702static int builtin_set(char **argv)
6703{
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006704 int n;
6705 char **pp, **g_argv;
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006706 char *arg = *++argv;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006707
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006708 if (arg == NULL) {
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006709 struct variable *e;
Denis Vlasenko87a86552008-07-29 19:43:10 +00006710 for (e = G.top_var; e; e = e->next)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006711 puts(e->varstr);
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006712 return EXIT_SUCCESS;
Denis Vlasenko11fb7cf2009-03-20 10:13:08 +00006713 }
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006714
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006715 do {
6716 if (!strcmp(arg, "--")) {
6717 ++argv;
6718 goto set_argv;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006719 }
Denis Vlasenko6ba6f542009-04-10 21:57:50 +00006720 if (arg[0] != '+' && arg[0] != '-')
6721 break;
6722 for (n = 1; arg[n]; ++n)
6723 if (set_mode(arg[0], arg[n]))
6724 goto error;
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006725 } while ((arg = *++argv) != NULL);
6726 /* Now argv[0] is 1st argument */
6727
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006728 if (arg == NULL)
6729 return EXIT_SUCCESS;
6730 set_argv:
6731
Denis Vlasenko424f79b2009-03-22 14:23:34 +00006732 /* NB: G.global_argv[0] ($0) is never freed/changed */
6733 g_argv = G.global_argv;
6734 if (G.global_args_malloced) {
6735 pp = g_argv;
6736 while (*++pp)
6737 free(*pp);
6738 g_argv[1] = NULL;
6739 } else {
6740 G.global_args_malloced = 1;
6741 pp = xzalloc(sizeof(pp[0]) * 2);
6742 pp[0] = g_argv[0]; /* retain $0 */
6743 g_argv = pp;
6744 }
6745 /* This realloc's G.global_argv */
6746 G.global_argv = pp = add_strings_to_strings(g_argv, argv, /*dup:*/ 1);
6747
6748 n = 1;
6749 while (*++pp)
6750 n++;
6751 G.global_argc = n;
6752
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006753 return EXIT_SUCCESS;
Mike Frysingerad88d5a2009-03-28 13:44:51 +00006754
6755 /* Nothing known, so abort */
6756 error:
6757 bb_error_msg("set: %s: invalid option", arg);
6758 return EXIT_FAILURE;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006759}
6760
6761static int builtin_shift(char **argv)
6762{
6763 int n = 1;
6764 if (argv[1]) {
6765 n = atoi(argv[1]);
6766 }
Denis Vlasenko87a86552008-07-29 19:43:10 +00006767 if (n >= 0 && n < G.global_argc) {
Denis Vlasenkoe1300f62009-03-22 11:41:18 +00006768 if (G.global_args_malloced) {
6769 int m = 1;
6770 while (m <= n)
6771 free(G.global_argv[m++]);
6772 }
Denis Vlasenko87a86552008-07-29 19:43:10 +00006773 G.global_argc -= n;
Denis Vlasenkoe1300f62009-03-22 11:41:18 +00006774 memmove(&G.global_argv[1], &G.global_argv[n+1],
6775 G.global_argc * sizeof(G.global_argv[0]));
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006776 return EXIT_SUCCESS;
6777 }
6778 return EXIT_FAILURE;
6779}
6780
6781static int builtin_source(char **argv)
6782{
6783 FILE *input;
Denis Vlasenko270b1c32009-04-17 18:54:50 +00006784 save_arg_t sv;
Mike Frysinger885b6f22009-04-18 21:04:25 +00006785#if ENABLE_HUSH_FUNCTIONS
6786 smallint sv_flg;
6787#endif
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006788
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006789 if (*++argv == NULL)
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006790 return EXIT_FAILURE;
6791
Denis Vlasenko6b9e0532009-04-18 01:23:21 +00006792// TODO: search through $PATH is missing
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006793 input = fopen_or_warn(*argv, "r");
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006794 if (!input) {
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006795 /* bb_perror_msg("%s", *argv); - done by fopen_or_warn */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006796 return EXIT_FAILURE;
6797 }
6798 close_on_exec_on(fileno(input));
6799
Mike Frysinger885b6f22009-04-18 21:04:25 +00006800#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006801 sv_flg = G.flag_return_in_progress;
6802 /* "we are inside sourced file, ok to use return" */
6803 G.flag_return_in_progress = -1;
Mike Frysinger885b6f22009-04-18 21:04:25 +00006804#endif
Denis Vlasenko270b1c32009-04-17 18:54:50 +00006805 save_and_replace_G_args(&sv, argv);
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006806
Denis Vlasenkob6e65562009-04-03 16:49:04 +00006807 parse_and_run_file(input);
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006808 fclose(input);
Denis Vlasenko270b1c32009-04-17 18:54:50 +00006809
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006810 restore_G_args(&sv, argv);
Mike Frysinger885b6f22009-04-18 21:04:25 +00006811#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006812 G.flag_return_in_progress = sv_flg;
Mike Frysinger885b6f22009-04-18 21:04:25 +00006813#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006814
Denis Vlasenkoab2b0642009-04-06 18:42:11 +00006815 return G.last_exitcode;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006816}
6817
6818static int builtin_umask(char **argv)
6819{
Denis Vlasenkoeb858492009-04-18 02:06:54 +00006820 int rc;
6821 mode_t mask;
6822
6823 mask = umask(0);
6824 if (argv[1]) {
6825 mode_t old_mask = mask;
6826
6827 mask ^= 0777;
6828 rc = bb_parse_mode(argv[1], &mask);
6829 mask ^= 0777;
6830 if (rc == 0) {
6831 mask = old_mask;
6832 /* bash messages:
6833 * bash: umask: 'q': invalid symbolic mode operator
6834 * bash: umask: 999: octal number out of range
6835 */
6836 bb_error_msg("%s: '%s' invalid mode", argv[0], argv[1]);
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006837 }
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006838 } else {
Denis Vlasenkoeb858492009-04-18 02:06:54 +00006839 rc = 1;
6840 /* Mimic bash */
6841 printf("%04o\n", (unsigned) mask);
6842 /* fall through and restore mask which we set to 0 */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006843 }
Denis Vlasenkoeb858492009-04-18 02:06:54 +00006844 umask(mask);
6845
6846 return !rc; /* rc != 0 - success */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006847}
6848
Mike Frysingerd690f682009-03-30 06:50:54 +00006849/* http://www.opengroup.org/onlinepubs/9699919799/utilities/V3_chap02.html#unset */
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006850static int builtin_unset(char **argv)
6851{
Mike Frysingerd690f682009-03-30 06:50:54 +00006852 int ret;
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006853 char var;
Denis Vlasenko40e84372009-04-18 11:23:38 +00006854 char *arg;
Mike Frysingerd690f682009-03-30 06:50:54 +00006855
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006856 if (!*++argv)
Mike Frysingerd690f682009-03-30 06:50:54 +00006857 return EXIT_SUCCESS;
6858
Denis Vlasenko40e84372009-04-18 11:23:38 +00006859 var = 0;
6860 while ((arg = *argv) != NULL && arg[0] == '-') {
6861 while (*++arg) {
6862 switch (*arg) {
6863 case 'v':
6864 case 'f':
6865 if (var == 0 || var == *arg) {
6866 var = *arg;
6867 break;
6868 }
6869 /* else: unset -vf, which is illegal.
6870 * fall through */
6871 default:
6872 bb_error_msg("unset: %s: invalid option", *argv);
6873 return EXIT_FAILURE;
6874 }
Mike Frysingerd690f682009-03-30 06:50:54 +00006875 }
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006876 argv++;
Mike Frysingerd690f682009-03-30 06:50:54 +00006877 }
6878
6879 ret = EXIT_SUCCESS;
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006880 while (*argv) {
Denis Vlasenko40e84372009-04-18 11:23:38 +00006881 if (var != 'f') {
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006882 if (unset_local_var(*argv)) {
6883 /* unset <nonexistent_var> doesn't fail.
6884 * Error is when one tries to unset RO var.
6885 * Message was printed by unset_local_var. */
Mike Frysingerd690f682009-03-30 06:50:54 +00006886 ret = EXIT_FAILURE;
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006887 }
Mike Frysingerd690f682009-03-30 06:50:54 +00006888 }
Denis Vlasenko40e84372009-04-18 11:23:38 +00006889#if ENABLE_HUSH_FUNCTIONS
6890 else {
6891 unset_func(*argv);
6892 }
6893#endif
Denis Vlasenkobfbc9712009-04-06 12:04:42 +00006894 argv++;
Mike Frysingerd690f682009-03-30 06:50:54 +00006895 }
6896 return ret;
Denis Vlasenkoc7985b72008-06-17 05:43:38 +00006897}
Denis Vlasenkobcb25532008-07-28 23:04:34 +00006898
Mike Frysinger56bdea12009-03-28 20:01:58 +00006899/* http://www.opengroup.org/onlinepubs/9699919799/utilities/wait.html */
6900static int builtin_wait(char **argv)
6901{
6902 int ret = EXIT_SUCCESS;
Denis Vlasenko7566bae2009-03-31 17:24:49 +00006903 int status, sig;
Mike Frysinger56bdea12009-03-28 20:01:58 +00006904
Denis Vlasenko7566bae2009-03-31 17:24:49 +00006905 if (*++argv == NULL) {
6906 /* Don't care about wait results */
6907 /* Note 1: must wait until there are no more children */
6908 /* Note 2: must be interruptible */
6909 /* Examples:
6910 * $ sleep 3 & sleep 6 & wait
6911 * [1] 30934 sleep 3
6912 * [2] 30935 sleep 6
6913 * [1] Done sleep 3
6914 * [2] Done sleep 6
6915 * $ sleep 3 & sleep 6 & wait
6916 * [1] 30936 sleep 3
6917 * [2] 30937 sleep 6
6918 * [1] Done sleep 3
6919 * ^C <-- after ~4 sec from keyboard
6920 * $
6921 */
6922 sigaddset(&G.blocked_set, SIGCHLD);
6923 sigprocmask(SIG_SETMASK, &G.blocked_set, NULL);
6924 while (1) {
6925 checkjobs(NULL);
6926 if (errno == ECHILD)
6927 break;
6928 /* Wait for SIGCHLD or any other signal of interest */
6929 /* sigtimedwait with infinite timeout: */
6930 sig = sigwaitinfo(&G.blocked_set, NULL);
6931 if (sig > 0) {
6932 sig = check_and_run_traps(sig);
6933 if (sig && sig != SIGCHLD) { /* see note 2 */
6934 ret = 128 + sig;
6935 break;
6936 }
6937 }
6938 }
6939 sigdelset(&G.blocked_set, SIGCHLD);
6940 sigprocmask(SIG_SETMASK, &G.blocked_set, NULL);
6941 return ret;
6942 }
Mike Frysinger56bdea12009-03-28 20:01:58 +00006943
Denis Vlasenko7566bae2009-03-31 17:24:49 +00006944 /* This is probably buggy wrt interruptible-ness */
Denis Vlasenkod5762932009-03-31 11:22:57 +00006945 while (*argv) {
6946 pid_t pid = bb_strtou(*argv, NULL, 10);
Mike Frysinger40b8dc42009-03-29 00:50:30 +00006947 if (errno) {
Denis Vlasenkod5762932009-03-31 11:22:57 +00006948 /* mimic bash message */
6949 bb_error_msg("wait: '%s': not a pid or valid job spec", *argv);
Mike Frysinger56bdea12009-03-28 20:01:58 +00006950 return EXIT_FAILURE;
Denis Vlasenkod5762932009-03-31 11:22:57 +00006951 }
6952 if (waitpid(pid, &status, 0) == pid) {
Mike Frysinger56bdea12009-03-28 20:01:58 +00006953 if (WIFSIGNALED(status))
6954 ret = 128 + WTERMSIG(status);
6955 else if (WIFEXITED(status))
6956 ret = WEXITSTATUS(status);
Denis Vlasenkod5762932009-03-31 11:22:57 +00006957 else /* wtf? */
Mike Frysinger56bdea12009-03-28 20:01:58 +00006958 ret = EXIT_FAILURE;
6959 } else {
Denis Vlasenkod5762932009-03-31 11:22:57 +00006960 bb_perror_msg("wait %s", *argv);
Mike Frysinger56bdea12009-03-28 20:01:58 +00006961 ret = 127;
6962 }
Denis Vlasenkod5762932009-03-31 11:22:57 +00006963 argv++;
Mike Frysinger56bdea12009-03-28 20:01:58 +00006964 }
6965
6966 return ret;
6967}
6968
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006969#if ENABLE_HUSH_LOOPS || ENABLE_HUSH_FUNCTIONS
6970static unsigned parse_numeric_argv1(char **argv, unsigned def, unsigned def_min)
6971{
6972 if (argv[1]) {
6973 def = bb_strtou(argv[1], NULL, 10);
6974 if (errno || def < def_min || argv[2]) {
6975 bb_error_msg("%s: bad arguments", argv[0]);
6976 def = UINT_MAX;
6977 }
6978 }
6979 return def;
6980}
6981#endif
6982
Denis Vlasenkodadfb492008-07-29 10:16:05 +00006983#if ENABLE_HUSH_LOOPS
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00006984static int builtin_break(char **argv)
Denis Vlasenkobcb25532008-07-28 23:04:34 +00006985{
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006986 unsigned depth;
Denis Vlasenko87a86552008-07-29 19:43:10 +00006987 if (G.depth_of_loop == 0) {
Denis Vlasenko4f504a92008-07-29 19:48:30 +00006988 bb_error_msg("%s: only meaningful in a loop", argv[0]);
Denis Vlasenkofcf37c32008-07-29 11:37:15 +00006989 return EXIT_SUCCESS; /* bash compat */
6990 }
Denis Vlasenko87a86552008-07-29 19:43:10 +00006991 G.flag_break_continue++; /* BC_BREAK = 1 */
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006992
6993 G.depth_break_continue = depth = parse_numeric_argv1(argv, 1, 1);
6994 if (depth == UINT_MAX)
6995 G.flag_break_continue = BC_BREAK;
6996 if (G.depth_of_loop < depth)
Denis Vlasenko87a86552008-07-29 19:43:10 +00006997 G.depth_break_continue = G.depth_of_loop;
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00006998
Denis Vlasenkobcb25532008-07-28 23:04:34 +00006999 return EXIT_SUCCESS;
7000}
7001
Denis Vlasenko6a2d40f2008-07-28 23:07:06 +00007002static int builtin_continue(char **argv)
Denis Vlasenkobcb25532008-07-28 23:04:34 +00007003{
Denis Vlasenko4f504a92008-07-29 19:48:30 +00007004 G.flag_break_continue = 1; /* BC_CONTINUE = 2 = 1+1 */
7005 return builtin_break(argv);
Denis Vlasenkobcb25532008-07-28 23:04:34 +00007006}
Denis Vlasenkodadfb492008-07-29 10:16:05 +00007007#endif
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00007008
7009#if ENABLE_HUSH_FUNCTIONS
Denis Vlasenko7b9e5c52009-04-17 23:53:15 +00007010static int builtin_return(char **argv)
Denis Vlasenko3d40d8e2009-04-17 23:44:18 +00007011{
7012 int rc;
7013
7014 if (G.flag_return_in_progress != -1) {
7015 bb_error_msg("%s: not in a function or sourced script", argv[0]);
7016 return EXIT_FAILURE; /* bash compat */
7017 }
7018
7019 G.flag_return_in_progress = 1;
7020
7021 /* bash:
7022 * out of range: wraps around at 256, does not error out
7023 * non-numeric param:
7024 * f() { false; return qwe; }; f; echo $?
7025 * bash: return: qwe: numeric argument required <== we do this
7026 * 255 <== we also do this
7027 */
7028 rc = parse_numeric_argv1(argv, G.last_exitcode, 0);
7029 return rc;
7030}
7031#endif