-/* shell.c -- GNU's idea of the POSIX shell specification.
+/* shell.c -- GNU's idea of the POSIX shell specification. */
- This file is part of Bash, the Bourne Again SHell. Bash is free
- software; no one can prevent you from reading the source code, or
- giving it to someone else. This file is copyrighted under the GNU
- General Public License, which can be found in the file called
- COPYING.
+/* Copyright (C) 1987,1991 Free Software Foundation, Inc.
- Copyright (C) 1988, 1991 Free Software Foundation, Inc.
+ This file is part of GNU Bash, the Bourne Again SHell.
- This file is part of GNU Bash.
+ Bash is free software; you can redistribute it and/or modify it
+ under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2, or (at your option)
+ any later version.
Bash is distributed in the hope that it will be useful, but WITHOUT
- ANY WARRANTY. No author or distributor accepts responsibility to
- anyone for the consequences of using it or for whether it serves
- any particular purpose or works at all, unless he says so in
- writing. Refer to the GNU Emacs General Public License for full
- details.
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
+ License for more details.
- Everyone is granted permission to copy, modify and redistribute
- Bash, but only under the conditions described in the GNU General
- Public License. A copy of this license is supposed to have been
- given to you along with GNU Emacs so you can know your rights and
- responsibilities. It should be in a file named COPYING.
-
- Among other things, the copyright notice and this notice must be
- preserved on all copies.
+ You should have received a copy of the GNU General Public License
+ along with Bash; see the file COPYING. If not, write to the Free
+ Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA.
Birthdate:
Sunday, January 10th, 1988.
#include "config.h"
#include "bashtypes.h"
-#include <sys/file.h>
+#ifndef _MINIX
+# include <sys/file.h>
+#endif
#include "posixstat.h"
+#include "posixtime.h"
#include "bashansi.h"
#include <stdio.h>
#include <signal.h>
# include <unistd.h>
#endif
+#define NEED_SH_SETLINEBUF_DECL /* used in externs.h */
+
#include "shell.h"
#include "flags.h"
#include "trap.h"
#include "input.h"
#include "execute_cmd.h"
+#include "findcmd.h"
#if defined (HISTORY)
# include "bashhist.h"
#endif
#include <tilde/tilde.h>
-#include <glob/fnmatch.h>
+#include <glob/strmatch.h>
+
+#if defined (__OPENNT)
+# include <opennt/opennt.h>
+#endif
#if !defined (HAVE_GETPW_DECLS)
extern struct passwd *getpwuid ();
extern int errno;
#endif
+#if defined (NO_MAIN_ENV_ARG)
+extern char **environ; /* used if no third argument to main() */
+#endif
+
extern char *dist_version, *release_status;
extern int patch_level, build_version;
+extern int shell_level;
extern int subshell_environment;
extern int last_command_exit_value;
extern int line_number;
extern char *primary_prompt, *secondary_prompt;
extern int expand_aliases;
extern char *this_command_name;
+extern int array_needs_making;
/* Non-zero means that this shell has already been run; i.e. you should
call shell_reinitialize () if you need to start afresh. */
/* Information about the current user. */
struct user_info current_user =
{
- -1, -1, -1, -1, (char *)NULL, (char *)NULL, (char *)NULL
+ (uid_t)-1, (uid_t)-1, (gid_t)-1, (gid_t)-1,
+ (char *)NULL, (char *)NULL, (char *)NULL
};
/* The current host's name. */
Specifically:
0 = not login shell.
1 = login shell from getty (or equivalent fake out)
- -1 = login shell from "-login" flag.
+ -1 = login shell from "--login" flag.
-2 = both from getty, and from flag.
*/
int login_shell = 0;
/* Non-zero means that the shell was started as an interactive shell. */
int interactive_shell = 0;
+/* Non-zero means to send a SIGHUP to all jobs when an interactive login
+ shell exits. */
+int hup_on_exit = 0;
+
/* Tells what state the shell was in when it started:
0 = non-interactive shell script
1 = interactive
int no_line_editing = 0; /* Don't do fancy line editing. */
int posixly_correct = 0; /* Non-zero means posix.2 superset. */
int dump_translatable_strings; /* Dump strings in $"...", don't execute. */
+int dump_po_strings; /* Dump strings in $"..." in po format */
+int wordexp_only = 0; /* Do word expansion only */
/* Some long-winded argument names. These are obviously new. */
#define Int 1
char **char_value;
} long_args[] = {
{ "debug", Int, &debugging, (char **)0x0 },
+ { "dump-po-strings", Int, &dump_po_strings, (char **)0x0 },
{ "dump-strings", Int, &dump_translatable_strings, (char **)0x0 },
{ "help", Int, &want_initial_help, (char **)0x0 },
+ { "init-file", Charp, (int *)0x0, &bashrc_file },
{ "login", Int, &make_login_shell, (char **)0x0 },
{ "noediting", Int, &no_line_editing, (char **)0x0 },
{ "noprofile", Int, &no_profile, (char **)0x0 },
#endif
{ "verbose", Int, &echo_input_at_read, (char **)0x0 },
{ "version", Int, &do_version, (char **)0x0 },
+ { "wordexp", Int, &wordexp_only, (char **)0x0 },
{ (char *)0x0, Int, (int *)0x0, (char **)0x0 }
};
int default_buffered_input = -1;
#endif
-static int read_from_stdin; /* -s flag supplied */
-static int want_pending_command; /* -c flag supplied */
+/* The following two variables are not static so they can show up in $-. */
+int read_from_stdin; /* -s flag supplied */
+int want_pending_command; /* -c flag supplied */
+
+static int shell_reinitialized = 0;
static char *local_pending_command;
static FILE *default_input;
-static int parse_long_options ();
-static int parse_shell_options ();
-static void run_startup_files ();
-static int bind_args ();
-static int open_shell_script ();
-static void set_bash_input ();
-static int run_one_command ();
+static STRING_INT_ALIST *shopt_alist;
+static int shopt_ind = 0, shopt_len = 0;
-static int uidget ();
-static int isnetconn ();
+static int parse_long_options __P((char **, int, int));
+static int parse_shell_options __P((char **, int, int));
+static int bind_args __P((char **, int, int, int));
-static void init_interactive (), init_noninteractive ();
-static void set_shell_name ();
-static void shell_initialize ();
-static void shell_reinitialize ();
+static void add_shopt_to_alist __P((char *, int));
+static void run_shopt_alist __P((void));
+
+static void execute_env_file __P((char *));
+static void run_startup_files __P((void));
+static int open_shell_script __P((char *));
+static void set_bash_input __P((void));
+static int run_one_command __P((char *));
+static int run_wordexp __P((char *));
+
+static int uidget __P((void));
+static int isnetconn __P((int));
+
+static void init_interactive __P((void));
+static void init_noninteractive __P((void));
+
+static void set_shell_name __P((char *));
+static void shell_initialize __P((void));
+static void shell_reinitialize __P((void));
+
+static void show_shell_usage __P((FILE *, int));
+
+#ifdef __CYGWIN__
+static void
+_cygwin32_check_tmp ()
+{
+ struct stat sb;
-static void show_shell_usage ();
+ if (stat ("/tmp", &sb) < 0)
+ internal_warning ("could not find /tmp, please create!");
+ else
+ {
+ if (S_ISDIR (sb.st_mode) == 0)
+ internal_warning ("/tmp must be a valid directory name");
+ }
+}
+#endif /* __CYGWIN__ */
+#if defined (NO_MAIN_ENV_ARG)
+/* systems without third argument to main() */
+int
+main (argc, argv)
+ int argc;
+ char **argv;
+#else /* !NO_MAIN_ENV_ARG */
int
main (argc, argv, env)
int argc;
char **argv, **env;
+#endif /* !NO_MAIN_ENV_ARG */
{
register int i;
- int code;
+ int code, old_errexit_flag;
+#if defined (RESTRICTED_SHELL)
+ int saverst;
+#endif
volatile int locally_skip_execution;
volatile int arg_index, top_level_arg_index;
+#ifdef __OPENNT
+ char **env;
+
+ env = environ;
+#endif /* __OPENNT */
+
+ USE_VAR(argc);
+ USE_VAR(argv);
+ USE_VAR(env);
+ USE_VAR(code);
+ USE_VAR(old_errexit_flag);
+#if defined (RESTRICTED_SHELL)
+ USE_VAR(saverst);
+#endif
/* Catch early SIGINTs. */
code = setjmp (top_level);
if (code)
exit (2);
+#if defined (USING_BASH_MALLOC) && defined (DEBUG)
+# if 0 /* memory tracing */
+ malloc_set_trace(1);
+# endif
+
+# if 0
+ malloc_set_register (1);
+# endif
+#endif
+
check_dev_tty ();
+#ifdef __CYGWIN__
+ _cygwin32_check_tmp ();
+#endif /* __CYGWIN__ */
+
/* Wait forever if we are debugging a login shell. */
while (debugging_login_shell);
running_setuid = uidget ();
- posixly_correct = (getenv ("POSIXLY_CORRECT") != (char *)NULL) ||
- (getenv ("POSIX_PEDANTIC") != (char *)NULL);
+ if (getenv ("POSIXLY_CORRECT") || getenv ("POSIX_PEDANTIC"))
+ posixly_correct = 1;
#if defined (USE_GNU_MALLOC_LIBRARY)
mcheck (programming_error, (void (*) ())0);
sourced_env = 0;
}
+ shell_reinitialized = 0;
+
/* Initialize `local' variables for all `invocations' of main (). */
arg_index = 1;
local_pending_command = (char *)NULL;
if (want_initial_help)
{
- show_shell_usage (stdout);
+ show_shell_usage (stdout, 1);
exit (EXECUTION_SUCCESS);
}
login_shell = -login_shell;
}
+ set_login_shell (login_shell != 0);
+
/* All done with full word options; do standard shell option parsing.*/
this_command_name = shell_name; /* for error reporting */
arg_index = parse_shell_options (argv, arg_index, argc);
+ if (dump_po_strings)
+ dump_translatable_strings = 1;
+
if (dump_translatable_strings)
read_but_dont_execute = 1;
- /* If we're in a strict Posix.2 mode, turn on interactive comments and
- other Posix.2 things. */
- if (posixly_correct)
- posix_initialize (posixly_correct);
-
if (running_setuid && privileged_mode == 0)
disable_priv_mode ();
if (forced_interactive || /* -i flag */
(!local_pending_command && /* No -c command and ... */
+ wordexp_only == 0 && /* No --wordexp and ... */
((arg_index == argc) || /* no remaining args or... */
read_from_stdin) && /* -s flag with args, and */
isatty (fileno (stdin)) && /* Input is a terminal and */
}
#endif /* CLOSE_FDS_AT_LOGIN */
+ /* If we're in a strict Posix.2 mode, turn on interactive comments and
+ other Posix.2 things. */
+ if (posixly_correct)
+ {
+ bind_variable ("POSIXLY_CORRECT", "y");
+ sv_strict_posix ("POSIXLY_CORRECT");
+ }
+
+ /* Now we run the shopt_alist and process the options. */
+ if (shopt_alist)
+ run_shopt_alist ();
+
/* From here on in, the shell must be a normal functioning shell.
Variables from the environment are expected to be set, etc. */
shell_initialize ();
term = getenv ("TERM");
no_line_editing |= term && (STREQ (term, "emacs"));
term = getenv ("EMACS");
- running_under_emacs = term ? ((fnmatch ("*term*", term, 0) == 0) ? 2 : 1)
+ running_under_emacs = term ? ((strmatch ("*term*", term, 0) == 0) ? 2 : 1)
: 0;
}
top_level_arg_index = arg_index;
+ old_errexit_flag = exit_immediately_on_error;
/* Give this shell a place to longjmp to before executing the
startup files. This allows users to press C-c to abort the
if (code == EXITPROG)
exit_shell (last_command_exit_value);
else
- locally_skip_execution++;
+ {
+#if defined (JOB_CONTROL)
+ /* Reset job control, since run_startup_files turned it off. */
+ set_job_control (interactive_shell);
+#endif
+ /* Reset value of `set -e', since it's turned off before running
+ the startup files. */
+ exit_immediately_on_error += old_errexit_flag;
+ locally_skip_execution++;
+ }
}
arg_index = top_level_arg_index;
{
makunbound ("PS1", shell_variables);
makunbound ("PS2", shell_variables);
- interactive = expand_aliases = 0;
+ interactive = 0;
+ expand_aliases = posixly_correct;
}
else
{
interactive = 1;
}
+#if defined (RESTRICTED_SHELL)
+ /* Set restricted_shell based on whether the basename of $0 indicates that
+ the shell should be restricted or if the `-r' option was supplied at
+ startup. */
+ restricted_shell = shell_is_restricted (shell_name);
+
+ /* If the `-r' option is supplied at invocation, make sure that the shell
+ is not in restricted mode when running the startup files. */
+ saverst = restricted;
+ restricted = 0;
+#endif
+
+ /* The startup files are run with `set -e' temporarily disabled. */
if (locally_skip_execution == 0 && running_setuid == 0)
- run_startup_files ();
+ {
+ old_errexit_flag = exit_immediately_on_error;
+ exit_immediately_on_error = 0;
+
+ run_startup_files ();
+ exit_immediately_on_error += old_errexit_flag;
+ }
/* If we are invoked as `sh', turn on Posix mode. */
if (act_like_sh)
- posix_initialize (posixly_correct = 1);
+ {
+ bind_variable ("POSIXLY_CORRECT", "y");
+ sv_strict_posix ("POSIXLY_CORRECT");
+ }
#if defined (RESTRICTED_SHELL)
- /* Turn on the restrictions after parsing the startup files. */
- maybe_make_restricted (shell_name);
+ /* Turn on the restrictions after executing the startup files. This
+ means that `bash -r' or `set -r' invoked from a startup file will
+ turn on the restrictions after the startup files are executed. */
+ restricted = saverst || restricted;
+ if (shell_reinitialized == 0)
+ maybe_make_restricted (shell_name);
#endif /* RESTRICTED_SHELL */
+ if (wordexp_only)
+ {
+ startup_state = 3;
+ last_command_exit_value = run_wordexp (argv[arg_index]);
+ exit_shell (last_command_exit_value);
+ }
+
if (local_pending_command)
{
arg_index = bind_args (argv, arg_index, argc, 0);
-
startup_state = 2;
#if defined (ONESHOT)
+ executing = 1;
run_one_command (local_pending_command);
exit_shell (last_command_exit_value);
#else /* ONESHOT */
/* Bind remaining args to $1 ... $n */
arg_index = bind_args (argv, arg_index, argc, 1);
-
/* Do the things that should be done only for interactive shells. */
if (interactive_shell)
{
if (longarg)
{
report_error ("%s: unrecognized option", argv[arg_index]);
+ show_shell_usage (stderr, 0);
exit (EX_USAGE);
}
break; /* No such argument. Maybe flag arg. */
o_option = argv[next_arg];
if (o_option == 0)
{
- list_minus_o_opts ();
+ list_minus_o_opts (-1, (on_or_off == '-') ? 0 : 1);
break;
}
if (set_minus_o_option (on_or_off, o_option) != EXECUTION_SUCCESS)
next_arg++;
break;
+ case 'O':
+ /* Since some of these can be overridden by the normal
+ interactive/non-interactive shell initialization or
+ initializing posix mode, we save the options and process
+ them after initialization. */
+ o_option = argv[next_arg];
+ if (o_option == 0)
+ {
+ shopt_listopt (o_option, (on_or_off == '-') ? 0 : 1);
+ break;
+ }
+ add_shopt_to_alist (o_option, on_or_off);
+ next_arg++;
+ break;
+
case 'D':
dump_translatable_strings = 1;
break;
if (change_flag (arg_character, on_or_off) == FLAG_ERROR)
{
report_error ("%c%c: unrecognized option", on_or_off, arg_character);
+ show_shell_usage (stderr, 0);
exit (EX_USAGE);
}
}
}
/* Exit the shell with status S. */
-int
+void
exit_shell (s)
int s;
{
#endif /* HISTORY */
#if defined (JOB_CONTROL)
+ /* If the user has run `shopt -s huponexit', hangup all jobs when we exit
+ an interactive login shell. ksh does this unconditionally. */
+ if (interactive_shell && login_shell && hup_on_exit)
+ hangup_all_jobs ();
+
/* If this shell is interactive, terminate all stopped jobs and
- restore the original terminal process group. */
- end_job_control ();
+ restore the original terminal process group. Don't do this if we're
+ in a subshell and calling exit_shell after, for example, a failed
+ word expansion. */
+ if (subshell_environment == 0)
+ end_job_control ();
#endif /* JOB_CONTROL */
/* Always return the exit status of the last command to our parent. */
exit (s);
}
+#ifdef INCLUDE_UNUSED
+/* A wrapper for exit that (optionally) can do other things, like malloc
+ statistics tracing. */
+void
+sh_exit (s)
+ int s;
+{
+ exit (s);
+}
+#endif
+
/* Source the bash startup files. If POSIXLY_CORRECT is non-zero, we obey
the Posix.2 startup file rules: $ENV is expanded, and if the file it
names exists, that file is sourced. The Posix.2 rules are in effect
then:
- COMMAND EXECUTE BASHRC
- --------------------------------
- bash -c foo NO
- bash foo NO
- foo NO
- rsh machine ls YES (for rsh, which calls `bash -c')
- rsh machine foo YES (for shell started by rsh) NO (for foo!)
- echo ls | bash NO
- login NO
- bash YES
+ COMMAND EXECUTE BASHRC
+ --------------------------------
+ bash -c foo NO
+ bash foo NO
+ foo NO
+ rsh machine ls YES (for rsh, which calls `bash -c')
+ rsh machine foo YES (for shell started by rsh) NO (for foo!)
+ echo ls | bash NO
+ login NO
+ bash YES
*/
static void
char *env_file;
{
char *fn;
- WORD_LIST *list;
if (env_file && *env_file)
{
- list = expand_string_unsplit (env_file, Q_DOUBLE_QUOTES);
- if (list)
- {
- fn = string_list (list);
- dispose_words (list);
-
- if (fn && *fn)
- maybe_execute_file (fn, 1);
- FREE (fn);
- }
+ fn = expand_string_unsplit_to_string (env_file, Q_DOUBLE_QUOTES);
+ if (fn && *fn)
+ maybe_execute_file (fn, 1);
+ FREE (fn);
}
}
static void
run_startup_files ()
{
- /* get the rshd case out of the way first. */
+#if defined (JOB_CONTROL)
+ int old_job_control;
+#endif
+ int sourced_login, run_by_ssh;
+
+ /* get the rshd/sshd case out of the way first. */
if (interactive_shell == 0 && no_rc == 0 && login_shell == 0 &&
- act_like_sh == 0 && local_pending_command && isnetconn (fileno (stdin)))
+ act_like_sh == 0 && local_pending_command)
{
+#ifdef SSH_SOURCE_BASHRC
+ run_by_ssh = (find_variable ("SSH_CLIENT") != (SHELL_VAR *)0) ||
+ (find_variable ("SSH2_CLIENT") != (SHELL_VAR *)0);
+#else
+ run_by_ssh = 0;
+#endif
+
+ /* If we were run by sshd or we think we were run by rshd, execute
+ ~/.bashrc if we are a top-level shell. */
+ if ((run_by_ssh || isnetconn (fileno (stdin))) && shell_level < 2)
+ {
#ifdef SYS_BASHRC
- maybe_execute_file (SYS_BASHRC, 1);
+# if defined (__OPENNT)
+ maybe_execute_file (_prefixInstallPath(SYS_BASHRC, NULL, 0), 1);
+# else
+ maybe_execute_file (SYS_BASHRC, 1);
+# endif
#endif
- maybe_execute_file (bashrc_file, 1);
- return;
+ maybe_execute_file (bashrc_file, 1);
+ return;
+ }
+ }
+
+#if defined (JOB_CONTROL)
+ /* Startup files should be run without job control enabled. */
+ old_job_control = interactive_shell ? set_job_control (0) : 0;
+#endif
+
+ sourced_login = 0;
+
+ /* A shell begun with the --login flag that is not in posix mode runs
+ the login shell startup files, no matter whether or not it is
+ interactive. If NON_INTERACTIVE_LOGIN_SHELLS is defined, run the
+ startup files if argv[0][0] == '-' as well. */
+#if defined (NON_INTERACTIVE_LOGIN_SHELLS)
+ if (login_shell && posixly_correct == 0)
+#else
+ if (login_shell < 0 && posixly_correct == 0)
+#endif
+ {
+ /* We don't execute .bashrc for login shells. */
+ no_rc++;
+
+ /* Execute /etc/profile and one of the personal login shell
+ initialization files. */
+ if (no_profile == 0)
+ {
+ maybe_execute_file (SYS_PROFILE, 1);
+
+ if (act_like_sh) /* sh */
+ maybe_execute_file ("~/.profile", 1);
+ else if ((maybe_execute_file ("~/.bash_profile", 1) == 0) &&
+ (maybe_execute_file ("~/.bash_login", 1) == 0)) /* bash */
+ maybe_execute_file ("~/.profile", 1);
+ }
+
+ sourced_login = 1;
}
/* A non-interactive shell not named `sh' and not in posix mode reads and
/* Interactive shell or `-su' shell. */
if (posixly_correct == 0) /* bash, sh */
{
- /* We don't execute .bashrc for login shells. */
- if (login_shell)
- no_rc++;
+ if (login_shell && sourced_login++ == 0)
+ {
+ /* We don't execute .bashrc for login shells. */
+ no_rc++;
- /* Execute /etc/profile and one of the personal login shell
- initialization files. */
- if (login_shell && no_profile == 0)
- {
- maybe_execute_file (SYS_PROFILE, 1);
+ /* Execute /etc/profile and one of the personal login shell
+ initialization files. */
+ if (no_profile == 0)
+ {
+ maybe_execute_file (SYS_PROFILE, 1);
- if (act_like_sh) /* sh */
- maybe_execute_file ("~/.profile", 1);
- else if ((maybe_execute_file ("~/.bash_profile", 1) == 0) &&
- (maybe_execute_file ("~/.bash_login", 1) == 0)) /* bash */
- maybe_execute_file ("~/.profile", 1);
- }
+ if (act_like_sh) /* sh */
+ maybe_execute_file ("~/.profile", 1);
+ else if ((maybe_execute_file ("~/.bash_profile", 1) == 0) &&
+ (maybe_execute_file ("~/.bash_login", 1) == 0)) /* bash */
+ maybe_execute_file ("~/.profile", 1);
+ }
+ }
/* bash */
if (act_like_sh == 0 && no_rc == 0)
{
#ifdef SYS_BASHRC
+# if defined (__OPENNT)
+ maybe_execute_file (_prefixInstallPath(SYS_BASHRC, NULL, 0), 1);
+# else
maybe_execute_file (SYS_BASHRC, 1);
+# endif
#endif
- maybe_execute_file (bashrc_file, 1);
+ maybe_execute_file (bashrc_file, 1);
}
/* sh */
else if (act_like_sh && privileged_mode == 0 && sourced_env++ == 0)
- execute_env_file (get_string_value ("ENV"));
+ execute_env_file (get_string_value ("ENV"));
}
else /* bash --posix, sh --posix */
{
/* bash and sh */
if (interactive_shell && privileged_mode == 0 && sourced_env++ == 0)
- execute_env_file (get_string_value ("ENV"));
+ execute_env_file (get_string_value ("ENV"));
}
+
+#if defined (JOB_CONTROL)
+ set_job_control (old_job_control);
+#endif
}
#if defined (RESTRICTED_SHELL)
+/* Return 1 if the shell should be a restricted one based on NAME or the
+ value of `restricted'. Don't actually do anything, just return a
+ boolean value. */
+int
+shell_is_restricted (name)
+ char *name;
+{
+ char *temp;
+
+ if (restricted)
+ return 1;
+ temp = base_pathname (name);
+ return (STREQ (temp, RESTRICTED_SHELL_NAME));
+}
+
/* Perhaps make this shell a `restricted' one, based on NAME. If the
basename of NAME is "rbash", then this shell is restricted. The
name of the restricted shell is a configurable option, see config.h.
- In a restricted shell, PATH and SHELL are read-only and non-unsettable.
+ In a restricted shell, PATH, SHELL, ENV, and BASH_ENV are read-only
+ and non-unsettable.
Do this also if `restricted' is already set to 1; maybe the shell was
started with -r. */
int
{
set_var_read_only ("PATH");
set_var_read_only ("SHELL");
- restricted++;
+ set_var_read_only ("ENV");
+ set_var_read_only ("BASH_ENV");
+ restricted = 1;
}
return (restricted);
}
current_user.egid = current_user.gid;
}
+static int
+run_wordexp (words)
+ char *words;
+{
+ int code, nw, nb;
+ WORD_LIST *wl, *result;
+
+ code = setjmp (top_level);
+
+ if (code != NOT_JUMPED)
+ {
+ switch (code)
+ {
+ /* Some kind of throw to top_level has occured. */
+ case FORCE_EOF:
+ return last_command_exit_value = 127;
+ case EXITPROG:
+ return last_command_exit_value;
+ case DISCARD:
+ return last_command_exit_value = 1;
+ default:
+ command_error ("run_wordexp", CMDERR_BADJUMP, code, 0);
+ }
+ }
+
+ /* Run it through the parser to get a list of words and expand them */
+ if (words && *words)
+ {
+ with_input_from_string (words, "--wordexp");
+ if (parse_command () != 0)
+ return (126);
+ if (global_command == 0)
+ {
+ printf ("0\n0\n");
+ return (0);
+ }
+ if (global_command->type != cm_simple)
+ return (126);
+ wl = global_command->value.Simple->words;
+ result = wl ? expand_words_no_vars (wl) : (WORD_LIST *)0;
+ }
+ else
+ result = (WORD_LIST *)0;
+
+ last_command_exit_value = 0;
+
+ if (result == 0)
+ {
+ printf ("0\n0\n");
+ return (0);
+ }
+
+ /* Count up the number of words and bytes, and print them. Don't count
+ the trailing NUL byte. */
+ for (nw = nb = 0, wl = result; wl; wl = wl->next)
+ {
+ nw++;
+ nb += strlen (wl->word->word);
+ }
+ printf ("%u\n%u\n", nw, nb);
+ /* Print each word on a separate line. This will have to be changed when
+ the interface to glibc is completed. */
+ for (wl = result; wl; wl = wl->next)
+ printf ("%s\n", wl->word->word);
+
+ return (0);
+}
+
#if defined (ONESHOT)
/* Run one command, given as the argument to the -c option. Tell
parse_and_execute not to fork for a simple command. */
case DISCARD:
return last_command_exit_value = 1;
default:
- programming_error ("run_one_command: bad jump: code %d", code);
+ command_error ("run_one_command", CMDERR_BADJUMP, code, 0);
}
}
- return (parse_and_execute (savestring (command), "-c", -1));
+ return (parse_and_execute (savestring (command), "-c", SEVAL_NOHIST));
}
#endif /* ONESHOT */
/* Posix.2 4.56.3 says that the first argument after sh -c command
becomes $0, and the rest of the arguments become $1...$n */
shell_name = savestring (args->word->word);
+ FREE (dollar_vars[0]);
dollar_vars[0] = savestring (args->word->word);
remember_args (args->next, 1);
}
else /* bind to $1...$n for shell script */
- remember_args (args, 1);
+ remember_args (args, 1);
dispose_words (args);
}
open_shell_script (script_name)
char *script_name;
{
- int fd;
+ int fd, e, fd_is_tty;
char *filename, *path_filename;
- unsigned char sample[80];
+ char sample[80];
int sample_len;
+ struct stat sb;
free (dollar_vars[0]);
dollar_vars[0] = savestring (script_name);
fd = open (filename, O_RDONLY);
if ((fd < 0) && (errno == ENOENT) && (absolute_program (filename) == 0))
{
+ e = errno;
/* If it's not in the current directory, try looking through PATH
for it. */
path_filename = find_path_file (script_name);
filename = path_filename;
fd = open (filename, O_RDONLY);
}
+ else
+ errno = e;
}
if (fd < 0)
{
- int e = errno;
+ e = errno;
file_error (filename);
exit ((e == ENOENT) ? EX_NOTFOUND : EX_NOINPUT);
}
- /* Only do this with file descriptors we can seek on. */
- if (lseek (fd, 0L, 1) != -1)
+#ifdef HAVE_DEV_FD
+ fd_is_tty = isatty (fd);
+#else
+ fd_is_tty = 0;
+#endif
+
+ /* Only do this with non-tty file descriptors we can seek on. */
+ if (fd_is_tty == 0 && (lseek (fd, 0L, 1) != -1))
{
/* Check to see if the `file' in `bash file' is a binary file
according to the same tests done by execute_simple_command (),
and report an error and exit if it is. */
sample_len = read (fd, sample, sizeof (sample));
- if (sample_len > 0 && (check_binary_file (sample, sample_len)))
+ if (sample_len < 0)
+ {
+ e = errno;
+ if ((fstat (fd, &sb) == 0) && S_ISDIR (sb.st_mode))
+ internal_error ("%s: is a directory", filename);
+ else
+ {
+ errno = e;
+ file_error (filename);
+ }
+ exit (EX_NOEXEC);
+ }
+ else if (sample_len > 0 && (check_binary_file (sample, sample_len)))
{
internal_error ("%s: cannot execute binary file", filename);
exit (EX_BINARY_FILE);
lseek (fd, 0L, 0);
}
+ /* Open the script. But try to move the file descriptor to a randomly
+ large one, in the hopes that any descriptors used by the script will
+ not match with ours. */
+ fd = move_to_high_fd (fd, 0, -1);
+
+#if defined (__CYGWIN__) && defined (O_TEXT)
+ setmode (fd, O_TEXT);
+#endif
+
#if defined (BUFFERED_INPUT)
default_buffered_input = fd;
- if (default_buffered_input == -1)
- {
- file_error (filename);
- exit (EX_NOTFOUND);
- }
SET_CLOSE_ON_EXEC (default_buffered_input);
#else /* !BUFFERED_INPUT */
- /* Open the script. But try to move the file descriptor to a randomly
- large one, in the hopes that any descriptors used by the script will
- not match with ours. */
- fd = move_to_high_fd (fd, 0);
-
default_input = fdopen (fd, "r");
if (default_input == 0)
SET_CLOSE_ON_EXEC (fileno (default_input));
#endif /* !BUFFERED_INPUT */
- if (interactive_shell == 0 || isatty (fd) == 0)
- init_noninteractive ();
- else
+ /* Just about the only way for this code to be executed is if something
+ like `bash -i /dev/stdin' is executed. */
+ if (interactive_shell && fd_is_tty)
{
- /* I don't believe that this code is ever executed, even in
- the presence of /dev/fd. */
dup2 (fd, 0);
close (fd);
fd = 0;
default_input = stdin;
#endif
}
+ else if (forced_interactive && fd_is_tty == 0)
+ /* But if a script is called with something like `bash -i scriptname',
+ we need to do a non-interactive setup here, since we didn't do it
+ before. */
+ init_noninteractive ();
+
free (filename);
return (fd);
}
no-delay mode. */
#if defined (BUFFERED_INPUT)
if (interactive == 0)
- unset_nodelay_mode (default_buffered_input);
+ sh_unset_nodelay_mode (default_buffered_input);
else
#endif /* !BUFFERED_INPUT */
- unset_nodelay_mode (fileno (stdin));
+ sh_unset_nodelay_mode (fileno (stdin));
/* with_input_from_stdin really means `with_input_from_readline' */
if (interactive && no_line_editing == 0)
#endif /* !BUFFERED_INPUT */
}
+/* Close the current shell script input source and forget about it. This is
+ extern so execute_cmd.c:initialize_subshell() can call it. If CHECK_ZERO
+ is non-zero, we close default_buffered_input even if it's the standard
+ input (fd 0). */
+void
+unset_bash_input (check_zero)
+ int check_zero;
+{
+#if defined (BUFFERED_INPUT)
+ if ((check_zero && default_buffered_input >= 0) ||
+ (check_zero == 0 && default_buffered_input > 0))
+ {
+ close_buffered_fd (default_buffered_input);
+ default_buffered_input = bash_input.location.buffered_fd = -1;
+ }
+#else /* !BUFFERED_INPUT */
+ if (default_input)
+ {
+ fclose (default_input);
+ default_input = (FILE *)NULL;
+ }
+#endif /* !BUFFERED_INPUT */
+}
+
+
#if !defined (PROGRAM)
# define PROGRAM "bash"
#endif
#endif /* JOB_CONTROL */
}
+void
+get_current_user_info ()
+{
+ struct passwd *entry;
+
+ /* Don't fetch this more than once. */
+ if (current_user.user_name == 0)
+ {
+ entry = getpwuid (current_user.uid);
+ if (entry)
+ {
+ current_user.user_name = savestring (entry->pw_name);
+ current_user.shell = (entry->pw_shell && entry->pw_shell[0])
+ ? savestring (entry->pw_shell)
+ : savestring ("/bin/sh");
+ current_user.home_dir = savestring (entry->pw_dir);
+ }
+ else
+ {
+ current_user.user_name = savestring ("I have no name!");
+ current_user.shell = savestring ("/bin/sh");
+ current_user.home_dir = savestring ("/");
+ }
+ endpwent ();
+ }
+}
+
/* Do whatever is necessary to initialize the shell.
Put new initializations in here. */
static void
shell_initialize ()
{
- struct passwd *entry;
char hostname[256];
/* Line buffer output for stderr and stdout. */
- setlinebuf (stderr);
- setlinebuf (stdout);
+ if (shell_initialized == 0)
+ {
+ sh_setlinebuf (stderr);
+ sh_setlinebuf (stdout);
+ }
/* Sort the array of shell builtins so that the binary search in
find_shell_builtin () works correctly. */
/* It's highly unlikely that this will change. */
if (current_host_name == 0)
{
- /* Initialize current_user.name and current_host_name. */
+ /* Initialize current_host_name. */
if (gethostname (hostname, 255) < 0)
current_host_name = "??host??";
else
current_host_name = savestring (hostname);
}
- /* Don't fetch this more than once. */
- if (current_user.user_name == 0)
- {
- entry = getpwuid (current_user.uid);
- if (entry)
- {
- current_user.user_name = savestring (entry->pw_name);
- current_user.shell = (entry->pw_shell && entry->pw_shell[0])
- ? savestring (entry->pw_shell)
- : savestring ("/bin/sh");
- current_user.home_dir = savestring (entry->pw_dir);
- }
- else
- {
- current_user.user_name = savestring ("I have no name!");
- current_user.shell = savestring ("/bin/sh");
- current_user.home_dir = savestring ("/");
- }
- endpwent ();
- }
+ /* Initialize the stuff in current_user that comes from the password
+ file. We don't need to do this right away if the shell is not
+ interactive. */
+ if (interactive_shell)
+ get_current_user_info ();
/* Initialize our interface to the tilde expander. */
tilde_initialize ();
initialize_shell_variables (shell_environment, privileged_mode||running_setuid);
#endif
+#if 0
/* Initialize filename hash tables. */
initialize_filename_hashing ();
+#endif
/* Initialize the data structures for storing and running jobs. */
- initialize_jobs ();
+ initialize_job_control (0);
/* Initialize input streams to null. */
initialize_bash_input ();
- /* Initialize the shell options. */
- initialize_shell_options ();
+ /* Initialize the shell options. Don't import the shell options
+ from the environment variable $SHELLOPTS if we are running in
+ privileged or restricted mode or if the shell is running setuid. */
+#if defined (RESTRICTED_SHELL)
+ initialize_shell_options (privileged_mode||restricted||running_setuid);
+#else
+ initialize_shell_options (privileged_mode||running_setuid);
+#endif
}
/* Function called by main () when it appears that the shell has already
delete_all_variables (shell_variables);
delete_all_variables (shell_functions);
-#if 0
- /* Pretend the PATH variable has changed. */
- flush_hashed_filenames ();
-#endif
+ shell_reinitialized = 1;
}
static void
-show_shell_usage (fp)
+show_shell_usage (fp, extra)
FILE *fp;
+ int extra;
{
int i;
char *set_opts, *s, *t;
- fprintf (fp, "GNU bash, version %s-(%s)\n", shell_version_string (), MACHTYPE);
+ if (extra)
+ fprintf (fp, "GNU bash, version %s-(%s)\n", shell_version_string (), MACHTYPE);
fprintf (fp, "Usage:\t%s [GNU long option] [option] ...\n\t%s [GNU long option] [option] script-file ...\n",
shell_name, shell_name);
fputs ("GNU long options:\n", fp);
fprintf (fp, "\t--%s\n", long_args[i].name);
fputs ("Shell options:\n", fp);
- fputs ("\t-irsD or -c command\t\t(invocation only)\n", fp);
+ fputs ("\t-irsD or -c command or -O shopt_option\t\t(invocation only)\n", fp);
for (i = 0, set_opts = 0; shell_builtins[i].name; i++)
if (STREQ (shell_builtins[i].name, "set"))
free (set_opts);
}
- fprintf (fp, "Type `%s -c \"help set\"' for more information about shell options.\n", shell_name);
- fprintf (fp, "Type `%s -c help' for more information about shell builtin commands.\n", shell_name);
- fprintf (fp, "Use the `bashbug' command to report bugs.\n");
+ if (extra)
+ {
+ fprintf (fp, "Type `%s -c \"help set\"' for more information about shell options.\n", shell_name);
+ fprintf (fp, "Type `%s -c help' for more information about shell builtin commands.\n", shell_name);
+ fprintf (fp, "Use the `bashbug' command to report bugs.\n");
+ }
+}
+
+static void
+add_shopt_to_alist (opt, on_or_off)
+ char *opt;
+ int on_or_off;
+{
+ if (shopt_ind >= shopt_len)
+ {
+ shopt_len += 8;
+ shopt_alist = (STRING_INT_ALIST *)xrealloc (shopt_alist, shopt_len * sizeof (shopt_alist[0]));
+ }
+ shopt_alist[shopt_ind].word = opt;
+ shopt_alist[shopt_ind].token = on_or_off;
+ shopt_ind++;
+}
+
+static void
+run_shopt_alist ()
+{
+ register int i;
+
+ for (i = 0; i < shopt_ind; i++)
+ if (shopt_setopt (shopt_alist[i].word, (shopt_alist[i].token == '-')) != EXECUTION_SUCCESS)
+ exit (EX_USAGE);
+ free (shopt_alist);
+ shopt_alist = 0;
+ shopt_ind = shopt_len = 0;
}
/* The second and subsequent conditions must match those used to decide
isnetconn (fd)
int fd;
{
-#if defined (HAVE_GETPEERNAME) && !defined (SVR4_2)
- int rv, l;
+#if defined (HAVE_GETPEERNAME) && !defined (SVR4_2) && !defined (__BEOS__)
+ int rv;
+ socklen_t l;
struct sockaddr sa;
l = sizeof(sa);
- rv = getpeername(0, &sa, &l);
+ rv = getpeername(fd, &sa, &l);
/* Solaris 2.5 getpeername() returns EINVAL if the fd is not a socket. */
return ((rv < 0 && (errno == ENOTSOCK || errno == EINVAL)) ? 0 : 1);
-#else /* !HAVE_GETPEERNAME || SVR4_2 */
+#else /* !HAVE_GETPEERNAME || SVR4_2 || __BEOS__ */
# if defined (SVR4) || defined (SVR4_2)
/* Sockets on SVR4 and SVR4.2 are character special (streams) devices. */
struct stat sb;
# endif /* S_ISFIFO */
return (S_ISCHR (sb.st_mode));
# else /* !SVR4 && !SVR4_2 */
-# if defined (S_ISSOCK)
+# if defined (S_ISSOCK) && !defined (__BEOS__)
struct stat sb;
if (fstat (fd, &sb) < 0)
return (0);
return (S_ISSOCK (sb.st_mode));
-# else /* !S_ISSOCK */
+# else /* !S_ISSOCK || __BEOS__ */
return (0);
-# endif /* !S_ISSOCK */
+# endif /* !S_ISSOCK || __BEOS__ */
# endif /* !SVR4 && !SVR4_2 */
-#endif /* !HAVE_GETPEERNAME || SVR4_2 */
+#endif /* !HAVE_GETPEERNAME || SVR4_2 || __BEOS__ */
}
projects / platform / upstream / bash.git / blobdiff