/* shell.c -- GNU's idea of the POSIX shell specification. */
-/* Copyright (C) 1987,1991 Free Software Foundation, Inc.
+/* Copyright (C) 1987-2012 Free Software Foundation, Inc.
This file is part of GNU Bash, the Bourne Again SHell.
- 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 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 3 of the License, or
+ (at your option) any later version.
- Bash is distributed in the hope that it will be useful, but WITHOUT
- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
- License for more details.
+ Bash is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
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.
+ along with Bash. If not, see <http://www.gnu.org/licenses/>.
+*/
+/*
Birthdate:
Sunday, January 10th, 1988.
Initial author: Brian Fox
#include "config.h"
#include "bashtypes.h"
-#ifndef _MINIX
+#if !defined (_MINIX) && defined (HAVE_SYS_FILE_H)
# include <sys/file.h>
#endif
#include "posixstat.h"
# include <unistd.h>
#endif
+#include "bashintl.h"
+
#define NEED_SH_SETLINEBUF_DECL /* used in externs.h */
#include "shell.h"
#include "execute_cmd.h"
#include "findcmd.h"
+#if defined (USING_BASH_MALLOC) && defined (DEBUG) && !defined (DISABLE_MALLOC_WRAPPERS)
+# include <malloc/shmalloc.h>
+#endif
+
#if defined (HISTORY)
# include "bashhist.h"
# include <readline/history.h>
#endif
+#if defined (READLINE)
+# include "bashline.h"
+#endif
+
#include <tilde/tilde.h>
#include <glob/strmatch.h>
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;
+extern int gnu_error_format;
+extern char *primary_prompt, *secondary_prompt;
+extern char *this_command_name;
/* Non-zero means that this shell has already been run; i.e. you should
call shell_reinitialize () if you need to start afresh. */
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" (or -l) flag.
-2 = both from getty, and from flag.
*/
int login_shell = 0;
shell exits. */
int hup_on_exit = 0;
+/* Non-zero means to list status of running and stopped jobs at shell exit */
+int check_jobs_at_exit = 0;
+
+/* Non-zero means to change to a directory name supplied as a command name */
+int autocd = 0;
+
/* Tells what state the shell was in when it started:
0 = non-interactive shell script
1 = interactive
2 = -c command
+ 3 = wordexp evaluation
This is a superset of the information provided by interactive_shell.
*/
int startup_state = 0;
/* Are we running in an emacs shell window? */
int running_under_emacs;
+/* Do we have /dev/fd? */
+#ifdef HAVE_DEV_FD
+int have_devfd = HAVE_DEV_FD;
+#else
+int have_devfd = 0;
+#endif
+
/* The name of the .(shell)rc file. */
static char *bashrc_file = "~/.bashrc";
static int make_login_shell; /* Make this shell be a `-bash' shell. */
static int want_initial_help; /* --help option */
-int no_line_editing = 0; /* Don't do fancy line editing. */
-int posixly_correct = 0; /* Non-zero means posix.2 superset. */
+int debugging_mode = 0; /* In debugging mode with --debugger */
+#if defined (READLINE)
+int no_line_editing = 0; /* non-zero -> don't do fancy line editing. */
+#else
+int no_line_editing = 1; /* can't have line editing without readline */
+#endif
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 */
+int protected_mode = 0; /* No command substitution with --wordexp */
+
+#if defined (STRICT_POSIX)
+int posixly_correct = 1; /* Non-zero means posix.2 superset. */
+#else
+int posixly_correct = 0; /* Non-zero means posix.2 superset. */
+#endif
/* Some long-winded argument names. These are obviously new. */
#define Int 1
#define Charp 2
-struct {
- char *name;
+static const struct {
+ const char *name;
int type;
int *int_value;
char **char_value;
} long_args[] = {
{ "debug", Int, &debugging, (char **)0x0 },
+#if defined (DEBUGGER)
+ { "debugger", Int, &debugging_mode, (char **)0x0 },
+#endif
{ "dump-po-strings", Int, &dump_po_strings, (char **)0x0 },
{ "dump-strings", Int, &dump_translatable_strings, (char **)0x0 },
{ "help", Int, &want_initial_help, (char **)0x0 },
{ "noprofile", Int, &no_profile, (char **)0x0 },
{ "norc", Int, &no_rc, (char **)0x0 },
{ "posix", Int, &posixly_correct, (char **)0x0 },
+#if defined (WORDEXP_OPTION)
+ { "protected", Int, &protected_mode, (char **)0x0 },
+#endif
{ "rcfile", Charp, (int *)0x0, &bashrc_file },
#if defined (RESTRICTED_SHELL)
{ "restricted", Int, &restricted, (char **)0x0 },
#endif
{ "verbose", Int, &echo_input_at_read, (char **)0x0 },
{ "version", Int, &do_version, (char **)0x0 },
+#if defined (WORDEXP_OPTION)
{ "wordexp", Int, &wordexp_only, (char **)0x0 },
+#endif
{ (char *)0x0, Int, (int *)0x0, (char **)0x0 }
};
char **subshell_argv;
char **subshell_envp;
+char *exec_argv0;
+
#if defined (BUFFERED_INPUT)
/* The file descriptor from which the shell is reading input. */
int default_buffered_input = -1;
int read_from_stdin; /* -s flag supplied */
int want_pending_command; /* -c flag supplied */
+/* This variable is not static so it can be bound to $BASH_EXECUTION_STRING */
+char *command_execution_string; /* argument to -c option */
+
+int malloc_trace_at_exit = 0;
+
static int shell_reinitialized = 0;
-static char *local_pending_command;
static FILE *default_input;
static int parse_shell_options __P((char **, int, int));
static int bind_args __P((char **, int, int, int));
+static void start_debugger __P((void));
+
static void add_shopt_to_alist __P((char *, int));
static void run_shopt_alist __P((void));
static int open_shell_script __P((char *));
static void set_bash_input __P((void));
static int run_one_command __P((char *));
+#if defined (WORDEXP_OPTION)
static int run_wordexp __P((char *));
+#endif
static int uidget __P((void));
-static int isnetconn __P((int));
static void init_interactive __P((void));
static void init_noninteractive __P((void));
+static void init_interactive_script __P((void));
static void set_shell_name __P((char *));
static void shell_initialize __P((void));
struct stat sb;
if (stat ("/tmp", &sb) < 0)
- internal_warning ("could not find /tmp, please create!");
+ 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");
+ internal_warning (_("/tmp must be a valid directory name"));
}
}
#endif /* __CYGWIN__ */
#endif
/* Catch early SIGINTs. */
- code = setjmp (top_level);
+ code = setjmp_nosigs (top_level);
if (code)
exit (2);
-#if defined (USING_BASH_MALLOC) && defined (DEBUG)
-# if 0 /* memory tracing */
- malloc_set_trace(1);
-# endif
+ xtrace_init ();
-# if 0
+#if defined (USING_BASH_MALLOC) && defined (DEBUG) && !defined (DISABLE_MALLOC_WRAPPERS)
+# if 1
malloc_set_register (1);
# endif
#endif
#endif /* __CYGWIN__ */
/* Wait forever if we are debugging a login shell. */
- while (debugging_login_shell);
+ while (debugging_login_shell) sleep (3);
set_default_locale ();
/* Initialize `local' variables for all `invocations' of main (). */
arg_index = 1;
- local_pending_command = (char *)NULL;
+ if (arg_index > argc)
+ arg_index = argc;
+ command_execution_string = (char *)NULL;
want_pending_command = locally_skip_execution = read_from_stdin = 0;
default_input = stdin;
#if defined (BUFFERED_INPUT)
shell_name++;
shell_reinitialize ();
- if (setjmp (top_level))
+ if (setjmp_nosigs (top_level))
exit (2);
}
exit (EXECUTION_SUCCESS);
}
- /* If user supplied the "--login" flag, then set and invert LOGIN_SHELL. */
+ /* 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 user supplied the "--login" (or -l) flag, then set and invert
+ LOGIN_SHELL. */
if (make_login_shell)
{
login_shell++;
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);
+ set_login_shell ("login_shell", login_shell != 0);
if (dump_po_strings)
dump_translatable_strings = 1;
following args are $0...$n respectively. */
if (want_pending_command)
{
- local_pending_command = argv[arg_index];
- if (local_pending_command == 0)
+ command_execution_string = argv[arg_index];
+ if (command_execution_string == 0)
{
- report_error ("option `-c' requires an argument");
- exit (EX_USAGE);
+ report_error (_("%s: option requires an argument"), "-c");
+ exit (EX_BADUSAGE);
}
arg_index++;
}
this_command_name = (char *)NULL;
+ cmd_init(); /* initialize the command object caches */
+
/* First, let the outside world know about our interactive status.
A shell is interactive if the `-i' flag was given, or if all of
the following conditions are met:
no -c command
no arguments remaining or the -s flag given
standard input is a terminal
- standard output is a terminal
+ standard error is a terminal
Refer to Posix.2, the description of the `sh' utility. */
if (forced_interactive || /* -i flag */
- (!local_pending_command && /* No -c command and ... */
+ (!command_execution_string && /* 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 */
- isatty (fileno (stdout)))) /* output is a terminal. */
+ isatty (fileno (stderr)))) /* error output is a terminal. */
init_interactive ();
else
init_noninteractive ();
-#define CLOSE_FDS_AT_LOGIN
-#if defined (CLOSE_FDS_AT_LOGIN)
/*
* Some systems have the bad habit of starting login shells with lots of open
* file descriptors. For instance, most systems that have picked up the
* pre-4.0 Sun YP code leave a file descriptor open each time you call one
* of the getpw* functions, and it's set to be open across execs. That
- * means one for login, one for xterm, one for shelltool, etc.
+ * means one for login, one for xterm, one for shelltool, etc. There are
+ * also systems that open persistent FDs to other agents or files as part
+ * of process startup; these need to be set to be close-on-exec.
*/
if (login_shell && interactive_shell)
{
for (i = 3; i < 20; i++)
- close (i);
+ SET_CLOSE_ON_EXEC (i);
}
-#endif /* CLOSE_FDS_AT_LOGIN */
- /* If we're in a strict Posix.2 mode, turn on interactive comments and
- other Posix.2 things. */
+ /* If we're in a strict Posix.2 mode, turn on interactive comments,
+ alias expansion in non-interactive shells, and other Posix.2 things. */
if (posixly_correct)
{
- bind_variable ("POSIXLY_CORRECT", "y");
+ bind_variable ("POSIXLY_CORRECT", "y", 0);
sv_strict_posix ("POSIXLY_CORRECT");
}
Variables from the environment are expected to be set, etc. */
shell_initialize ();
+ set_default_lang ();
set_default_locale_vars ();
+ /*
+ * M-x term -> TERM=eterm EMACS=22.1 (term:0.96) (eterm)
+ * M-x shell -> TERM=dumb EMACS=t (no line editing)
+ * M-x terminal -> TERM=emacs-em7955 EMACS= (line editing)
+ */
if (interactive_shell)
{
- char *term;
+ char *term, *emacs;
- term = getenv ("TERM");
+ term = get_string_value ("TERM");
+ emacs = get_string_value ("EMACS");
+
+ /* Not sure any emacs terminal emulator sets TERM=emacs any more */
no_line_editing |= term && (STREQ (term, "emacs"));
- term = getenv ("EMACS");
- running_under_emacs = term ? ((strmatch ("*term*", term, 0) == 0) ? 2 : 1)
- : 0;
+ no_line_editing |= emacs && emacs[0] == 't' && emacs[1] == '\0' && STREQ (term, "dumb");
+
+ /* running_under_emacs == 2 for `eterm' */
+ running_under_emacs = (emacs != 0) || (term && STREQN (term, "emacs", 5));
+ running_under_emacs += term && STREQN (term, "eterm", 5) && emacs && strstr (emacs, "term");
+
+ if (running_under_emacs)
+ gnu_error_format = 1;
}
top_level_arg_index = arg_index;
code = setjmp (top_level);
if (code)
{
- if (code == EXITPROG)
+ if (code == EXITPROG || code == ERREXIT)
exit_shell (last_command_exit_value);
else
{
if (interactive_shell == 0)
{
- makunbound ("PS1", shell_variables);
- makunbound ("PS2", shell_variables);
+ unbind_variable ("PS1");
+ unbind_variable ("PS2");
interactive = 0;
+#if 0
+ /* This has already been done by init_noninteractive */
expand_aliases = posixly_correct;
+#endif
}
else
{
/* If we are invoked as `sh', turn on Posix mode. */
if (act_like_sh)
{
- bind_variable ("POSIXLY_CORRECT", "y");
+ bind_variable ("POSIXLY_CORRECT", "y", 0);
sv_strict_posix ("POSIXLY_CORRECT");
}
maybe_make_restricted (shell_name);
#endif /* RESTRICTED_SHELL */
+#if defined (WORDEXP_OPTION)
if (wordexp_only)
{
startup_state = 3;
last_command_exit_value = run_wordexp (argv[arg_index]);
exit_shell (last_command_exit_value);
}
+#endif
- if (local_pending_command)
+ if (command_execution_string)
{
arg_index = bind_args (argv, arg_index, argc, 0);
startup_state = 2;
+
+ if (debugging_mode)
+ start_debugger ();
+
#if defined (ONESHOT)
executing = 1;
- run_one_command (local_pending_command);
+ run_one_command (command_execution_string);
exit_shell (last_command_exit_value);
#else /* ONESHOT */
- with_input_from_string (local_pending_command, "-c");
+ with_input_from_string (command_execution_string, "-c");
goto read_and_execute;
#endif /* !ONESHOT */
}
/* Bind remaining args to $1 ... $n */
arg_index = bind_args (argv, arg_index, argc, 1);
+
+ if (debugging_mode && locally_skip_execution == 0 && running_setuid == 0 && dollar_vars[1])
+ start_debugger ();
+
/* Do the things that should be done only for interactive shells. */
if (interactive_shell)
{
/* Set up for checking for presence of mail. */
- remember_mail_dates ();
reset_mail_timer ();
+ init_mail_dates ();
#if defined (HISTORY)
/* Initialize the interactive history stuff. */
bash_initialize_history ();
- if (shell_initialized == 0)
+ /* Don't load the history from the history file if we've already
+ saved some lines in this session (e.g., by putting `history -s xx'
+ into one of the startup files). */
+ if (shell_initialized == 0 && history_lines_this_session == 0)
load_history ();
#endif /* HISTORY */
*long_args[i].int_value = 1;
else if (argv[++arg_index] == 0)
{
- report_error ("option `%s' requires an argument",
- long_args[i].name);
- exit (EX_USAGE);
+ report_error (_("%s: option requires an argument"), long_args[i].name);
+ exit (EX_BADUSAGE);
}
else
*long_args[i].char_value = argv[arg_index];
{
if (longarg)
{
- report_error ("%s: unrecognized option", argv[arg_index]);
+ report_error (_("%s: invalid option"), argv[arg_index]);
show_shell_usage (stderr, 0);
- exit (EX_USAGE);
+ exit (EX_BADUSAGE);
}
break; /* No such argument. Maybe flag arg. */
}
want_pending_command = 1;
break;
+ case 'l':
+ make_login_shell = 1;
+ break;
+
case 's':
read_from_stdin = 1;
break;
break;
}
if (set_minus_o_option (on_or_off, o_option) != EXECUTION_SUCCESS)
- exit (EX_USAGE);
+ exit (EX_BADUSAGE);
next_arg++;
break;
default:
if (change_flag (arg_character, on_or_off) == FLAG_ERROR)
{
- report_error ("%c%c: unrecognized option", on_or_off, arg_character);
+ report_error (_("%c%c: invalid option"), on_or_off, arg_character);
show_shell_usage (stderr, 0);
- exit (EX_USAGE);
+ exit (EX_BADUSAGE);
}
}
}
exit_shell (s)
int s;
{
+ fflush (stdout); /* XXX */
+ fflush (stderr);
+
/* Do trap[0] if defined. Allow it to override the exit status
passed to us. */
if (signal_is_trapped (0))
#endif /* PROCESS_SUBSTITUTION */
#if defined (HISTORY)
- if (interactive_shell)
+ if (remember_on_history)
maybe_save_shell_history ();
#endif /* HISTORY */
+#if defined (COPROCESS_SUPPORT)
+ coproc_flush ();
+#endif
+
#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. */
#endif /* JOB_CONTROL */
/* Always return the exit status of the last command to our parent. */
- exit (s);
+ sh_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;
{
+#if defined (MALLOC_DEBUG) && defined (USING_BASH_MALLOC)
+ if (malloc_trace_at_exit)
+ trace_malloc_stats (get_name_for_error (), (char *)NULL);
+#endif
+
exit (s);
}
-#endif
+
+/* Exit a subshell, which includes calling the exit trap. We don't want to
+ do any more cleanup, since a subshell is created as an exact copy of its
+ parent. */
+void
+subshell_exit (s)
+ int s;
+{
+ fflush (stdout);
+ fflush (stderr);
+
+ /* Do trap[0] if defined. Allow it to override the exit status
+ passed to us. */
+ if (signal_is_trapped (0))
+ s = run_exit_trap ();
+
+ sh_exit (s);
+}
/* 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
/* 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)
+ act_like_sh == 0 && command_execution_string)
{
#ifdef SSH_SOURCE_BASHRC
run_by_ssh = (find_variable ("SSH_CLIENT") != (SHELL_VAR *)0) ||
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
+ /* A shell begun with the --login (or -l) 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 (restricted)
return 1;
temp = base_pathname (name);
+ if (*temp == '-')
+ temp++;
return (STREQ (temp, RESTRICTED_SHELL_NAME));
}
{
char *temp;
- temp = base_pathname (shell_name);
+ temp = base_pathname (name);
+ if (*temp == '-')
+ temp++;
if (restricted || (STREQ (temp, RESTRICTED_SHELL_NAME)))
{
set_var_read_only ("PATH");
current_user.egid = current_user.gid;
}
+#if defined (WORDEXP_OPTION)
static int
run_wordexp (words)
char *words;
{
int code, nw, nb;
- WORD_LIST *wl, *result;
+ WORD_LIST *wl, *tl, *result;
- code = setjmp (top_level);
+ code = setjmp_nosigs (top_level);
if (code != NOT_JUMPED)
{
switch (code)
{
- /* Some kind of throw to top_level has occured. */
+ /* Some kind of throw to top_level has occurred. */
case FORCE_EOF:
return last_command_exit_value = 127;
+ case ERREXIT:
case EXITPROG:
return last_command_exit_value;
case DISCARD:
if (global_command->type != cm_simple)
return (126);
wl = global_command->value.Simple->words;
+ if (protected_mode)
+ for (tl = wl; tl; tl = tl->next)
+ tl->word->flags |= W_NOCOMSUB|W_NOPROCSUB;
result = wl ? expand_words_no_vars (wl) : (WORD_LIST *)0;
}
else
return (0);
}
+#endif
#if defined (ONESHOT)
/* Run one command, given as the argument to the -c option. Tell
{
int code;
- code = setjmp (top_level);
+ code = setjmp_nosigs (top_level);
if (code != NOT_JUMPED)
{
#endif /* PROCESS_SUBSTITUTION */
switch (code)
{
- /* Some kind of throw to top_level has occured. */
+ /* Some kind of throw to top_level has occurred. */
case FORCE_EOF:
return last_command_exit_value = 127;
+ case ERREXIT:
case EXITPROG:
return last_command_exit_value;
case DISCARD:
register int i;
WORD_LIST *args;
- for (i = arg_start, args = (WORD_LIST *)NULL; i != arg_end; i++)
+ for (i = arg_start, args = (WORD_LIST *)NULL; i < arg_end; i++)
args = make_word_list (make_word (argv[i]), args);
if (args)
{
FREE (dollar_vars[0]);
dollar_vars[0] = savestring (args->word->word);
remember_args (args->next, 1);
+ push_args (args->next); /* BASH_ARGV and BASH_ARGC */
}
else /* bind to $1...$n for shell script */
- remember_args (args, 1);
+ {
+ remember_args (args, 1);
+ push_args (args); /* BASH_ARGV and BASH_ARGC */
+ }
dispose_words (args);
}
unbind_args ()
{
remember_args ((WORD_LIST *)NULL, 1);
+ pop_args (); /* Reset BASH_ARGV and BASH_ARGC */
+}
+
+static void
+start_debugger ()
+{
+#if defined (DEBUGGER) && defined (DEBUGGER_START_FILE)
+ int old_errexit;
+
+ old_errexit = exit_immediately_on_error;
+ exit_immediately_on_error = 0;
+
+ maybe_execute_file (DEBUGGER_START_FILE, 1);
+ function_trace_mode = 1;
+
+ exit_immediately_on_error += old_errexit;
+#endif
}
static int
char *script_name;
{
int fd, e, fd_is_tty;
- char *filename, *path_filename;
+ char *filename, *path_filename, *t;
char sample[80];
int sample_len;
struct stat sb;
+#if defined (ARRAY_VARS)
+ SHELL_VAR *funcname_v, *bash_source_v, *bash_lineno_v;
+ ARRAY *funcname_a, *bash_source_a, *bash_lineno_a;
+#endif
- free (dollar_vars[0]);
- dollar_vars[0] = savestring (script_name);
filename = savestring (script_name);
fd = open (filename, O_RDONLY);
exit ((e == ENOENT) ? EX_NOTFOUND : EX_NOINPUT);
}
+ free (dollar_vars[0]);
+ dollar_vars[0] = exec_argv0 ? savestring (exec_argv0) : savestring (script_name);
+ if (exec_argv0)
+ {
+ free (exec_argv0);
+ exec_argv0 = (char *)NULL;
+ }
+
+#if defined (ARRAY_VARS)
+ GET_ARRAY_FROM_VAR ("FUNCNAME", funcname_v, funcname_a);
+ GET_ARRAY_FROM_VAR ("BASH_SOURCE", bash_source_v, bash_source_a);
+ GET_ARRAY_FROM_VAR ("BASH_LINENO", bash_lineno_v, bash_lineno_a);
+
+ array_push (bash_source_a, filename);
+ if (bash_lineno_a)
+ {
+ t = itos (executing_line_number ());
+ array_push (bash_lineno_a, t);
+ free (t);
+ }
+ array_push (funcname_a, "main");
+#endif
+
#ifdef HAVE_DEV_FD
fd_is_tty = isatty (fd);
#else
{
e = errno;
if ((fstat (fd, &sb) == 0) && S_ISDIR (sb.st_mode))
- internal_error ("%s: is a directory", filename);
+ internal_error (_("%s: is a directory"), filename);
else
{
errno = e;
}
else if (sample_len > 0 && (check_binary_file (sample, sample_len)))
{
- internal_error ("%s: cannot execute binary file", filename);
+ internal_error (_("%s: cannot execute binary file"), filename);
exit (EX_BINARY_FILE);
}
/* Now rewind the file back to the beginning. */
/* 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
+ fd = move_to_high_fd (fd, 1, -1);
#if defined (BUFFERED_INPUT)
default_buffered_input = fd;
/* 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 ();
+ init_interactive_script ();
free (filename);
return (fd);
/* with_input_from_stdin really means `with_input_from_readline' */
if (interactive && no_line_editing == 0)
with_input_from_stdin ();
- else
#if defined (BUFFERED_INPUT)
- {
- if (interactive == 0)
- with_input_from_buffered_stream (default_buffered_input, dollar_vars[0]);
- else
- with_input_from_stream (default_input, dollar_vars[0]);
- }
-#else /* !BUFFERED_INPUT */
+ else if (interactive == 0)
+ with_input_from_buffered_stream (default_buffered_input, dollar_vars[0]);
+#endif /* BUFFERED_INPUT */
+ else
with_input_from_stream (default_input, dollar_vars[0]);
-#endif /* !BUFFERED_INPUT */
}
/* Close the current shell script input source and forget about it. This is
{
close_buffered_fd (default_buffered_input);
default_buffered_input = bash_input.location.buffered_fd = -1;
+ bash_input.type = st_none; /* XXX */
}
#else /* !BUFFERED_INPUT */
if (default_input)
{
/* Here's a hack. If the name of this shell is "sh", then don't do
any startup files; just try to be more like /bin/sh. */
- shell_name = base_pathname (argv0);
- if (*shell_name == '-')
- shell_name++;
+ shell_name = argv0 ? base_pathname (argv0) : PROGRAM;
+
+ if (argv0 && *argv0 == '-')
+ {
+ if (*shell_name == '-')
+ shell_name++;
+ login_shell = 1;
+ }
+
if (shell_name[0] == 's' && shell_name[1] == 'h' && shell_name[2] == '\0')
act_like_sh++;
if (shell_name[0] == 's' && shell_name[1] == 'u' && shell_name[2] == '\0')
su_shell++;
- shell_name = argv0;
+ shell_name = argv0 ? argv0 : PROGRAM;
FREE (dollar_vars[0]);
dollar_vars[0] = savestring (shell_name);
- if (*shell_name == '-')
- {
- shell_name++;
- login_shell++;
- }
-
/* A program may start an interactive shell with
"execl ("/bin/bash", "-", NULL)".
If so, default the name of this shell to our name. */
static void
init_interactive ()
{
- interactive_shell = startup_state = interactive = 1;
- expand_aliases = 1;
+ expand_aliases = interactive_shell = startup_state = 1;
+ interactive = 1;
}
static void
bash_history_reinit (0);
#endif /* HISTORY */
interactive_shell = startup_state = interactive = 0;
- expand_aliases = 0;
+ expand_aliases = posixly_correct; /* XXX - was 0 not posixly_correct */
no_line_editing = 1;
#if defined (JOB_CONTROL)
- set_job_control (0);
+ /* Even if the shell is not interactive, enable job control if the -i or
+ -m option is supplied at startup. */
+ set_job_control (forced_interactive||jobs_m_flag);
#endif /* JOB_CONTROL */
}
+static void
+init_interactive_script ()
+{
+ init_noninteractive ();
+ expand_aliases = interactive_shell = startup_state = 1;
+}
+
void
get_current_user_info ()
{
/* Don't fetch this more than once. */
if (current_user.user_name == 0)
{
+#if defined (__TANDEM)
+ entry = getpwnam (getlogin ());
+#else
entry = getpwuid (current_user.uid);
+#endif
if (entry)
{
current_user.user_name = savestring (entry->pw_name);
}
else
{
- current_user.user_name = savestring ("I have no name!");
+ current_user.user_name = _("I have no name!");
+ current_user.user_name = savestring (current_user.user_name);
current_user.shell = savestring ("/bin/sh");
current_user.home_dir = savestring ("/");
}
for restoring the original default signal handlers. That function
is called when we make a new child. */
initialize_traps ();
- initialize_signals ();
+ initialize_signals (0);
/* It's highly unlikely that this will change. */
if (current_host_name == 0)
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_job_control (0);
+ initialize_job_control (jobs_m_flag);
/* Initialize input streams to null. */
initialize_bash_input ();
+ initialize_flags ();
+
/* 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. */
+ from the environment variables $SHELLOPTS or $BASHOPTS 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);
+ initialize_bashopts (privileged_mode||restricted||running_setuid);
#else
initialize_shell_options (privileged_mode||running_setuid);
+ initialize_bashopts (privileged_mode||running_setuid);
#endif
}
forced_interactive = interactive_shell = subshell_environment = 0;
expand_aliases = 0;
+ /* XXX - should we set jobs_m_flag to 0 here? */
+
#if defined (HISTORY)
bash_history_reinit (0);
#endif /* HISTORY */
/* Delete all variables and functions. They will be reinitialized when
the environment is parsed. */
- delete_all_variables (shell_variables);
+ delete_all_contexts (shell_variables);
delete_all_variables (shell_functions);
+ reinit_special_variables ();
+
+#if defined (READLINE)
+ bashline_reinitialize ();
+#endif
+
shell_reinitialized = 1;
}
char *set_opts, *s, *t;
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",
+ 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);
+ fputs (_("GNU long options:\n"), fp);
for (i = 0; long_args[i].name; i++)
fprintf (fp, "\t--%s\n", long_args[i].name);
- fputs ("Shell options:\n", fp);
- fputs ("\t-irsD or -c command or -O shopt_option\t\t(invocation only)\n", fp);
+ fputs (_("Shell options:\n"), fp);
+ fputs (_("\t-ilrsD 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"))
t = strchr (s, ']');
if (t)
*t = '\0';
- fprintf (fp, "\t-%s or -o option\n", s);
+ fprintf (fp, _("\t-%s or -o option\n"), s);
free (set_opts);
}
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");
+ 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"));
}
}
for (i = 0; i < shopt_ind; i++)
if (shopt_setopt (shopt_alist[i].word, (shopt_alist[i].token == '-')) != EXECUTION_SUCCESS)
- exit (EX_USAGE);
+ exit (EX_BADUSAGE);
free (shopt_alist);
shopt_alist = 0;
shopt_ind = shopt_len = 0;
}
-
-/* The second and subsequent conditions must match those used to decide
- whether or not to call getpeername() in isnetconn(). */
-#if defined (HAVE_SYS_SOCKET_H) && defined (HAVE_GETPEERNAME) && !defined (SVR4_2)
-# include <sys/socket.h>
-#endif
-
-/* Is FD a socket or network connection? */
-static int
-isnetconn (fd)
- int fd;
-{
-#if defined (HAVE_GETPEERNAME) && !defined (SVR4_2) && !defined (__BEOS__)
- int rv;
- socklen_t l;
- struct sockaddr sa;
-
- l = sizeof(sa);
- 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 || __BEOS__ */
-# if defined (SVR4) || defined (SVR4_2)
- /* Sockets on SVR4 and SVR4.2 are character special (streams) devices. */
- struct stat sb;
-
- if (isatty (fd))
- return (0);
- if (fstat (fd, &sb) < 0)
- return (0);
-# if defined (S_ISFIFO)
- if (S_ISFIFO (sb.st_mode))
- return (0);
-# endif /* S_ISFIFO */
- return (S_ISCHR (sb.st_mode));
-# else /* !SVR4 && !SVR4_2 */
-# 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 || __BEOS__ */
- return (0);
-# endif /* !S_ISSOCK || __BEOS__ */
-# endif /* !SVR4 && !SVR4_2 */
-#endif /* !HAVE_GETPEERNAME || SVR4_2 || __BEOS__ */
-}