1 /* shell.c -- GNU's idea of the POSIX shell specification. */
3 /* Copyright (C) 1987-2005 Free Software Foundation, Inc.
5 This file is part of GNU Bash, the Bourne Again SHell.
7 Bash is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 Bash is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
15 License for more details.
17 You should have received a copy of the GNU General Public License
18 along with Bash; see the file COPYING. If not, write to the Free
19 Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA.
22 Sunday, January 10th, 1988.
23 Initial author: Brian Fox
25 #define INSTALL_DEBUG_MODE
29 #include "bashtypes.h"
30 #if !defined (_MINIX) && defined (HAVE_SYS_FILE_H)
31 # include <sys/file.h>
33 #include "posixstat.h"
34 #include "posixtime.h"
42 #if defined (HAVE_UNISTD_H)
48 #define NEED_SH_SETLINEBUF_DECL /* used in externs.h */
53 #include "mailcheck.h"
55 #include "builtins/common.h"
57 #if defined (JOB_CONTROL)
59 #endif /* JOB_CONTROL */
62 #include "execute_cmd.h"
65 #if defined (USING_BASH_MALLOC) && defined (DEBUG) && !defined (DISABLE_MALLOC_WRAPPERS)
66 # include <malloc/shmalloc.h>
70 # include "bashhist.h"
71 # include <readline/history.h>
74 #include <tilde/tilde.h>
75 #include <glob/strmatch.h>
77 #if defined (__OPENNT)
78 # include <opennt/opennt.h>
81 #if !defined (HAVE_GETPW_DECLS)
82 extern struct passwd
*getpwuid ();
83 #endif /* !HAVE_GETPW_DECLS */
89 #if defined (NO_MAIN_ENV_ARG)
90 extern char **environ
; /* used if no third argument to main() */
93 extern char *dist_version
, *release_status
;
94 extern int patch_level
, build_version
;
95 extern int shell_level
;
96 extern int subshell_environment
;
97 extern int last_command_exit_value
;
98 extern int line_number
;
99 extern int expand_aliases
;
100 extern int array_needs_making
;
101 extern int gnu_error_format
;
102 extern char *primary_prompt
, *secondary_prompt
;
103 extern char *this_command_name
;
105 /* Non-zero means that this shell has already been run; i.e. you should
106 call shell_reinitialize () if you need to start afresh. */
107 int shell_initialized
= 0;
109 COMMAND
*global_command
= (COMMAND
*)NULL
;
111 /* Information about the current user. */
112 struct user_info current_user
=
114 (uid_t
)-1, (uid_t
)-1, (gid_t
)-1, (gid_t
)-1,
115 (char *)NULL
, (char *)NULL
, (char *)NULL
118 /* The current host's name. */
119 char *current_host_name
= (char *)NULL
;
121 /* Non-zero means that this shell is a login shell.
124 1 = login shell from getty (or equivalent fake out)
125 -1 = login shell from "--login" (or -l) flag.
126 -2 = both from getty, and from flag.
130 /* Non-zero means that at this moment, the shell is interactive. In
131 general, this means that the shell is at this moment reading input
132 from the keyboard. */
135 /* Non-zero means that the shell was started as an interactive shell. */
136 int interactive_shell
= 0;
138 /* Non-zero means to send a SIGHUP to all jobs when an interactive login
142 /* Tells what state the shell was in when it started:
143 0 = non-interactive shell script
146 3 = wordexp evaluation
147 This is a superset of the information provided by interactive_shell.
149 int startup_state
= 0;
151 /* Special debugging helper. */
152 int debugging_login_shell
= 0;
154 /* The environment that the shell passes to other commands. */
155 char **shell_environment
;
157 /* Non-zero when we are executing a top-level command. */
160 /* The number of commands executed so far. */
161 int current_command_number
= 1;
163 /* Non-zero is the recursion depth for commands. */
164 int indirection_level
= 0;
166 /* The name of this shell, as taken from argv[0]. */
167 char *shell_name
= (char *)NULL
;
169 /* time in seconds when the shell was started */
170 time_t shell_start_time
;
172 /* Are we running in an emacs shell window? */
173 int running_under_emacs
;
175 /* The name of the .(shell)rc file. */
176 static char *bashrc_file
= "~/.bashrc";
178 /* Non-zero means to act more like the Bourne shell on startup. */
179 static int act_like_sh
;
181 /* Non-zero if this shell is being run by `su'. */
184 /* Non-zero if we have already expanded and sourced $ENV. */
185 static int sourced_env
;
187 /* Is this shell running setuid? */
188 static int running_setuid
;
190 /* Values for the long-winded argument names. */
191 static int debugging
; /* Do debugging things. */
192 static int no_rc
; /* Don't execute ~/.bashrc */
193 static int no_profile
; /* Don't execute .profile */
194 static int do_version
; /* Display interesting version info. */
195 static int make_login_shell
; /* Make this shell be a `-bash' shell. */
196 static int want_initial_help
; /* --help option */
198 int debugging_mode
= 0; /* In debugging mode with --debugger */
199 int no_line_editing
= 0; /* Don't do fancy line editing. */
200 int dump_translatable_strings
; /* Dump strings in $"...", don't execute. */
201 int dump_po_strings
; /* Dump strings in $"..." in po format */
202 int wordexp_only
= 0; /* Do word expansion only */
203 int protected_mode
= 0; /* No command substitution with --wordexp */
205 #if defined (STRICT_POSIX)
206 int posixly_correct
= 1; /* Non-zero means posix.2 superset. */
208 int posixly_correct
= 0; /* Non-zero means posix.2 superset. */
212 /* Some long-winded argument names. These are obviously new. */
221 { "debug", Int
, &debugging
, (char **)0x0 },
222 #if defined (DEBUGGER)
223 { "debugger", Int
, &debugging_mode
, (char **)0x0 },
225 { "dump-po-strings", Int
, &dump_po_strings
, (char **)0x0 },
226 { "dump-strings", Int
, &dump_translatable_strings
, (char **)0x0 },
227 { "help", Int
, &want_initial_help
, (char **)0x0 },
228 { "init-file", Charp
, (int *)0x0, &bashrc_file
},
229 { "login", Int
, &make_login_shell
, (char **)0x0 },
230 { "noediting", Int
, &no_line_editing
, (char **)0x0 },
231 { "noprofile", Int
, &no_profile
, (char **)0x0 },
232 { "norc", Int
, &no_rc
, (char **)0x0 },
233 { "posix", Int
, &posixly_correct
, (char **)0x0 },
234 { "protected", Int
, &protected_mode
, (char **)0x0 },
235 { "rcfile", Charp
, (int *)0x0, &bashrc_file
},
236 #if defined (RESTRICTED_SHELL)
237 { "restricted", Int
, &restricted
, (char **)0x0 },
239 { "verbose", Int
, &echo_input_at_read
, (char **)0x0 },
240 { "version", Int
, &do_version
, (char **)0x0 },
241 { "wordexp", Int
, &wordexp_only
, (char **)0x0 },
242 { (char *)0x0, Int
, (int *)0x0, (char **)0x0 }
245 /* These are extern so execute_simple_command can set them, and then
246 longjmp back to main to execute a shell script, instead of calling
247 main () again and resulting in indefinite, possibly fatal, stack
249 procenv_t subshell_top_level
;
251 char **subshell_argv
;
252 char **subshell_envp
;
254 #if defined (BUFFERED_INPUT)
255 /* The file descriptor from which the shell is reading input. */
256 int default_buffered_input
= -1;
259 /* The following two variables are not static so they can show up in $-. */
260 int read_from_stdin
; /* -s flag supplied */
261 int want_pending_command
; /* -c flag supplied */
263 /* This variable is not static so it can be bound to $BASH_EXECUTION_STRING */
264 char *command_execution_string
; /* argument to -c option */
266 int malloc_trace_at_exit
= 0;
268 static int shell_reinitialized
= 0;
270 static FILE *default_input
;
272 static STRING_INT_ALIST
*shopt_alist
;
273 static int shopt_ind
= 0, shopt_len
= 0;
275 static int parse_long_options
__P((char **, int, int));
276 static int parse_shell_options
__P((char **, int, int));
277 static int bind_args
__P((char **, int, int, int));
279 static void start_debugger
__P((void));
281 static void add_shopt_to_alist
__P((char *, int));
282 static void run_shopt_alist
__P((void));
284 static void execute_env_file
__P((char *));
285 static void run_startup_files
__P((void));
286 static int open_shell_script
__P((char *));
287 static void set_bash_input
__P((void));
288 static int run_one_command
__P((char *));
289 static int run_wordexp
__P((char *));
291 static int uidget
__P((void));
293 static void init_interactive
__P((void));
294 static void init_noninteractive
__P((void));
296 static void set_shell_name
__P((char *));
297 static void shell_initialize
__P((void));
298 static void shell_reinitialize
__P((void));
300 static void show_shell_usage
__P((FILE *, int));
304 _cygwin32_check_tmp ()
308 if (stat ("/tmp", &sb
) < 0)
309 internal_warning (_("could not find /tmp, please create!"));
312 if (S_ISDIR (sb
.st_mode
) == 0)
313 internal_warning (_("/tmp must be a valid directory name"));
316 #endif /* __CYGWIN__ */
318 #if defined (NO_MAIN_ENV_ARG)
319 /* systems without third argument to main() */
324 #else /* !NO_MAIN_ENV_ARG */
326 main (argc
, argv
, env
)
329 #endif /* !NO_MAIN_ENV_ARG */
332 int code
, old_errexit_flag
;
333 #if defined (RESTRICTED_SHELL)
336 volatile int locally_skip_execution
;
337 volatile int arg_index
, top_level_arg_index
;
342 #endif /* __OPENNT */
348 USE_VAR(old_errexit_flag
);
349 #if defined (RESTRICTED_SHELL)
353 /* Catch early SIGINTs. */
354 code
= setjmp (top_level
);
358 #if defined (USING_BASH_MALLOC) && defined (DEBUG) && !defined (DISABLE_MALLOC_WRAPPERS)
360 malloc_set_register (1);
367 _cygwin32_check_tmp ();
368 #endif /* __CYGWIN__ */
370 /* Wait forever if we are debugging a login shell. */
371 while (debugging_login_shell
) sleep (3);
373 set_default_locale ();
375 running_setuid
= uidget ();
377 if (getenv ("POSIXLY_CORRECT") || getenv ("POSIX_PEDANTIC"))
380 #if defined (USE_GNU_MALLOC_LIBRARY)
381 mcheck (programming_error
, (void (*) ())0);
382 #endif /* USE_GNU_MALLOC_LIBRARY */
384 if (setjmp (subshell_top_level
))
386 argc
= subshell_argc
;
387 argv
= subshell_argv
;
392 shell_reinitialized
= 0;
394 /* Initialize `local' variables for all `invocations' of main (). */
396 if (arg_index
> argc
)
398 command_execution_string
= (char *)NULL
;
399 want_pending_command
= locally_skip_execution
= read_from_stdin
= 0;
400 default_input
= stdin
;
401 #if defined (BUFFERED_INPUT)
402 default_buffered_input
= -1;
405 /* Fix for the `infinite process creation' bug when running shell scripts
406 from startup files on System V. */
407 login_shell
= make_login_shell
= 0;
409 /* If this shell has already been run, then reinitialize it to a
411 if (shell_initialized
|| shell_name
)
413 /* Make sure that we do not infinitely recurse as a login shell. */
414 if (*shell_name
== '-')
417 shell_reinitialize ();
418 if (setjmp (top_level
))
422 shell_environment
= env
;
423 set_shell_name (argv
[0]);
424 shell_start_time
= NOW
; /* NOW now defined in general.h */
426 /* Parse argument flags from the input line. */
428 /* Find full word arguments first. */
429 arg_index
= parse_long_options (argv
, arg_index
, argc
);
431 if (want_initial_help
)
433 show_shell_usage (stdout
, 1);
434 exit (EXECUTION_SUCCESS
);
439 show_shell_version (1);
440 exit (EXECUTION_SUCCESS
);
443 /* All done with full word options; do standard shell option parsing.*/
444 this_command_name
= shell_name
; /* for error reporting */
445 arg_index
= parse_shell_options (argv
, arg_index
, argc
);
447 /* If user supplied the "--login" (or -l) flag, then set and invert
449 if (make_login_shell
)
452 login_shell
= -login_shell
;
455 set_login_shell (login_shell
!= 0);
458 dump_translatable_strings
= 1;
460 if (dump_translatable_strings
)
461 read_but_dont_execute
= 1;
463 if (running_setuid
&& privileged_mode
== 0)
464 disable_priv_mode ();
466 /* Need to get the argument to a -c option processed in the
467 above loop. The next arg is a command to execute, and the
468 following args are $0...$n respectively. */
469 if (want_pending_command
)
471 command_execution_string
= argv
[arg_index
];
472 if (command_execution_string
== 0)
474 report_error (_("%s: option requires an argument"), "-c");
479 this_command_name
= (char *)NULL
;
481 cmd_init(); /* initialize the command object caches */
483 /* First, let the outside world know about our interactive status.
484 A shell is interactive if the `-i' flag was given, or if all of
485 the following conditions are met:
487 no arguments remaining or the -s flag given
488 standard input is a terminal
489 standard error is a terminal
490 Refer to Posix.2, the description of the `sh' utility. */
492 if (forced_interactive
|| /* -i flag */
493 (!command_execution_string
&& /* No -c command and ... */
494 wordexp_only
== 0 && /* No --wordexp and ... */
495 ((arg_index
== argc
) || /* no remaining args or... */
496 read_from_stdin
) && /* -s flag with args, and */
497 isatty (fileno (stdin
)) && /* Input is a terminal and */
498 isatty (fileno (stderr
)))) /* error output is a terminal. */
501 init_noninteractive ();
503 #define CLOSE_FDS_AT_LOGIN
504 #if defined (CLOSE_FDS_AT_LOGIN)
506 * Some systems have the bad habit of starting login shells with lots of open
507 * file descriptors. For instance, most systems that have picked up the
508 * pre-4.0 Sun YP code leave a file descriptor open each time you call one
509 * of the getpw* functions, and it's set to be open across execs. That
510 * means one for login, one for xterm, one for shelltool, etc.
512 if (login_shell
&& interactive_shell
)
514 for (i
= 3; i
< 20; i
++)
517 #endif /* CLOSE_FDS_AT_LOGIN */
519 /* If we're in a strict Posix.2 mode, turn on interactive comments,
520 alias expansion in non-interactive shells, and other Posix.2 things. */
523 bind_variable ("POSIXLY_CORRECT", "y", 0);
524 sv_strict_posix ("POSIXLY_CORRECT");
527 /* Now we run the shopt_alist and process the options. */
531 /* From here on in, the shell must be a normal functioning shell.
532 Variables from the environment are expected to be set, etc. */
535 set_default_locale_vars ();
537 if (interactive_shell
)
541 term
= get_string_value ("TERM");
542 no_line_editing
|= term
&& (STREQ (term
, "emacs"));
543 emacs
= get_string_value ("EMACS");
544 running_under_emacs
= emacs
? ((strstr (emacs
, "term") != 0) ? 2 : 1) : 0;
546 no_line_editing
|= emacs
&& emacs
[0] == 't' && emacs
[1] == '\0';
548 no_line_editing
|= emacs
&& emacs
[0] == 't' && emacs
[1] == '\0' && STREQ (term
, "dumb");
550 if (running_under_emacs
)
551 gnu_error_format
= 1;
554 top_level_arg_index
= arg_index
;
555 old_errexit_flag
= exit_immediately_on_error
;
557 /* Give this shell a place to longjmp to before executing the
558 startup files. This allows users to press C-c to abort the
560 code
= setjmp (top_level
);
563 if (code
== EXITPROG
|| code
== ERREXIT
)
564 exit_shell (last_command_exit_value
);
567 #if defined (JOB_CONTROL)
568 /* Reset job control, since run_startup_files turned it off. */
569 set_job_control (interactive_shell
);
571 /* Reset value of `set -e', since it's turned off before running
572 the startup files. */
573 exit_immediately_on_error
+= old_errexit_flag
;
574 locally_skip_execution
++;
578 arg_index
= top_level_arg_index
;
580 /* Execute the start-up scripts. */
582 if (interactive_shell
== 0)
584 unbind_variable ("PS1");
585 unbind_variable ("PS2");
588 /* This has already been done by init_noninteractive */
589 expand_aliases
= posixly_correct
;
594 change_flag ('i', FLAG_ON
);
598 #if defined (RESTRICTED_SHELL)
599 /* Set restricted_shell based on whether the basename of $0 indicates that
600 the shell should be restricted or if the `-r' option was supplied at
602 restricted_shell
= shell_is_restricted (shell_name
);
604 /* If the `-r' option is supplied at invocation, make sure that the shell
605 is not in restricted mode when running the startup files. */
606 saverst
= restricted
;
610 /* The startup files are run with `set -e' temporarily disabled. */
611 if (locally_skip_execution
== 0 && running_setuid
== 0)
613 old_errexit_flag
= exit_immediately_on_error
;
614 exit_immediately_on_error
= 0;
616 run_startup_files ();
617 exit_immediately_on_error
+= old_errexit_flag
;
620 /* If we are invoked as `sh', turn on Posix mode. */
623 bind_variable ("POSIXLY_CORRECT", "y", 0);
624 sv_strict_posix ("POSIXLY_CORRECT");
627 #if defined (RESTRICTED_SHELL)
628 /* Turn on the restrictions after executing the startup files. This
629 means that `bash -r' or `set -r' invoked from a startup file will
630 turn on the restrictions after the startup files are executed. */
631 restricted
= saverst
|| restricted
;
632 if (shell_reinitialized
== 0)
633 maybe_make_restricted (shell_name
);
634 #endif /* RESTRICTED_SHELL */
639 last_command_exit_value
= run_wordexp (argv
[arg_index
]);
640 exit_shell (last_command_exit_value
);
643 if (command_execution_string
)
645 arg_index
= bind_args (argv
, arg_index
, argc
, 0);
651 #if defined (ONESHOT)
653 run_one_command (command_execution_string
);
654 exit_shell (last_command_exit_value
);
656 with_input_from_string (command_execution_string
, "-c");
657 goto read_and_execute
;
658 #endif /* !ONESHOT */
661 /* Get possible input filename and set up default_buffered_input or
662 default_input as appropriate. */
663 if (arg_index
!= argc
&& read_from_stdin
== 0)
665 open_shell_script (argv
[arg_index
]);
668 else if (interactive
== 0)
669 /* In this mode, bash is reading a script from stdin, which is a
670 pipe or redirected file. */
671 #if defined (BUFFERED_INPUT)
672 default_buffered_input
= fileno (stdin
); /* == 0 */
674 setbuf (default_input
, (char *)NULL
);
675 #endif /* !BUFFERED_INPUT */
679 /* Bind remaining args to $1 ... $n */
680 arg_index
= bind_args (argv
, arg_index
, argc
, 1);
682 if (debugging_mode
&& locally_skip_execution
== 0 && running_setuid
== 0)
685 /* Do the things that should be done only for interactive shells. */
686 if (interactive_shell
)
688 /* Set up for checking for presence of mail. */
689 remember_mail_dates ();
692 #if defined (HISTORY)
693 /* Initialize the interactive history stuff. */
694 bash_initialize_history ();
695 /* Don't load the history from the history file if we've already
696 saved some lines in this session (e.g., by putting `history -s xx'
697 into one of the startup files). */
698 if (shell_initialized
== 0 && history_lines_this_session
== 0)
702 /* Initialize terminal state for interactive shells after the
703 .bash_profile and .bashrc are interpreted. */
707 #if !defined (ONESHOT)
709 #endif /* !ONESHOT */
711 shell_initialized
= 1;
713 /* Read commands until exit condition. */
715 exit_shell (last_command_exit_value
);
719 parse_long_options (argv
, arg_start
, arg_end
)
721 int arg_start
, arg_end
;
723 int arg_index
, longarg
, i
;
726 arg_index
= arg_start
;
727 while ((arg_index
!= arg_end
) && (arg_string
= argv
[arg_index
]) &&
728 (*arg_string
== '-'))
732 /* Make --login equivalent to -login. */
733 if (arg_string
[1] == '-' && arg_string
[2])
739 for (i
= 0; long_args
[i
].name
; i
++)
741 if (STREQ (arg_string
+ 1, long_args
[i
].name
))
743 if (long_args
[i
].type
== Int
)
744 *long_args
[i
].int_value
= 1;
745 else if (argv
[++arg_index
] == 0)
747 report_error (_("%s: option requires an argument"), long_args
[i
].name
);
751 *long_args
[i
].char_value
= argv
[arg_index
];
756 if (long_args
[i
].name
== 0)
760 report_error (_("%s: invalid option"), argv
[arg_index
]);
761 show_shell_usage (stderr
, 0);
764 break; /* No such argument. Maybe flag arg. */
774 parse_shell_options (argv
, arg_start
, arg_end
)
776 int arg_start
, arg_end
;
779 int arg_character
, on_or_off
, next_arg
, i
;
780 char *o_option
, *arg_string
;
782 arg_index
= arg_start
;
783 while (arg_index
!= arg_end
&& (arg_string
= argv
[arg_index
]) &&
784 (*arg_string
== '-' || *arg_string
== '+'))
786 /* There are flag arguments, so parse them. */
787 next_arg
= arg_index
+ 1;
789 /* A single `-' signals the end of options. From the 4.3 BSD sh.
790 An option `--' means the same thing; this is the standard
791 getopt(3) meaning. */
792 if (arg_string
[0] == '-' &&
793 (arg_string
[1] == '\0' ||
794 (arg_string
[1] == '-' && arg_string
[2] == '\0')))
798 on_or_off
= arg_string
[0];
799 while (arg_character
= arg_string
[i
++])
801 switch (arg_character
)
804 want_pending_command
= 1;
808 make_login_shell
= 1;
816 o_option
= argv
[next_arg
];
819 list_minus_o_opts (-1, (on_or_off
== '-') ? 0 : 1);
822 if (set_minus_o_option (on_or_off
, o_option
) != EXECUTION_SUCCESS
)
828 /* Since some of these can be overridden by the normal
829 interactive/non-interactive shell initialization or
830 initializing posix mode, we save the options and process
831 them after initialization. */
832 o_option
= argv
[next_arg
];
835 shopt_listopt (o_option
, (on_or_off
== '-') ? 0 : 1);
838 add_shopt_to_alist (o_option
, on_or_off
);
843 dump_translatable_strings
= 1;
847 if (change_flag (arg_character
, on_or_off
) == FLAG_ERROR
)
849 report_error (_("%c%c: invalid option"), on_or_off
, arg_character
);
850 show_shell_usage (stderr
, 0);
855 /* Can't do just a simple increment anymore -- what about
856 "bash -abouo emacs ignoreeof -hP"? */
857 arg_index
= next_arg
;
863 /* Exit the shell with status S. */
868 /* Do trap[0] if defined. Allow it to override the exit status
870 if (signal_is_trapped (0))
871 s
= run_exit_trap ();
873 #if defined (PROCESS_SUBSTITUTION)
875 #endif /* PROCESS_SUBSTITUTION */
877 #if defined (HISTORY)
878 if (interactive_shell
)
879 maybe_save_shell_history ();
882 #if defined (JOB_CONTROL)
883 /* If the user has run `shopt -s huponexit', hangup all jobs when we exit
884 an interactive login shell. ksh does this unconditionally. */
885 if (interactive_shell
&& login_shell
&& hup_on_exit
)
888 /* If this shell is interactive, terminate all stopped jobs and
889 restore the original terminal process group. Don't do this if we're
890 in a subshell and calling exit_shell after, for example, a failed
892 if (subshell_environment
== 0)
894 #endif /* JOB_CONTROL */
896 /* Always return the exit status of the last command to our parent. */
900 /* A wrapper for exit that (optionally) can do other things, like malloc
901 statistics tracing. */
906 #if defined (MALLOC_DEBUG) && defined (USING_BASH_MALLOC)
907 if (malloc_trace_at_exit
)
908 trace_malloc_stats (get_name_for_error (), (char *)NULL
);
914 /* Source the bash startup files. If POSIXLY_CORRECT is non-zero, we obey
915 the Posix.2 startup file rules: $ENV is expanded, and if the file it
916 names exists, that file is sourced. The Posix.2 rules are in effect
917 for interactive shells only. (section 4.56.5.3) */
919 /* Execute ~/.bashrc for most shells. Never execute it if
920 ACT_LIKE_SH is set, or if NO_RC is set.
922 If the executable file "/usr/gnu/src/bash/foo" contains:
929 COMMAND EXECUTE BASHRC
930 --------------------------------
934 rsh machine ls YES (for rsh, which calls `bash -c')
935 rsh machine foo YES (for shell started by rsh) NO (for foo!)
942 execute_env_file (env_file
)
947 if (env_file
&& *env_file
)
949 fn
= expand_string_unsplit_to_string (env_file
, Q_DOUBLE_QUOTES
);
951 maybe_execute_file (fn
, 1);
959 #if defined (JOB_CONTROL)
962 int sourced_login
, run_by_ssh
;
964 /* get the rshd/sshd case out of the way first. */
965 if (interactive_shell
== 0 && no_rc
== 0 && login_shell
== 0 &&
966 act_like_sh
== 0 && command_execution_string
)
968 #ifdef SSH_SOURCE_BASHRC
969 run_by_ssh
= (find_variable ("SSH_CLIENT") != (SHELL_VAR
*)0) ||
970 (find_variable ("SSH2_CLIENT") != (SHELL_VAR
*)0);
975 /* If we were run by sshd or we think we were run by rshd, execute
976 ~/.bashrc if we are a top-level shell. */
977 if ((run_by_ssh
|| isnetconn (fileno (stdin
))) && shell_level
< 2)
980 # if defined (__OPENNT)
981 maybe_execute_file (_prefixInstallPath(SYS_BASHRC
, NULL
, 0), 1);
983 maybe_execute_file (SYS_BASHRC
, 1);
986 maybe_execute_file (bashrc_file
, 1);
991 #if defined (JOB_CONTROL)
992 /* Startup files should be run without job control enabled. */
993 old_job_control
= interactive_shell
? set_job_control (0) : 0;
998 /* A shell begun with the --login (or -l) flag that is not in posix mode
999 runs the login shell startup files, no matter whether or not it is
1000 interactive. If NON_INTERACTIVE_LOGIN_SHELLS is defined, run the
1001 startup files if argv[0][0] == '-' as well. */
1002 #if defined (NON_INTERACTIVE_LOGIN_SHELLS)
1003 if (login_shell
&& posixly_correct
== 0)
1005 if (login_shell
< 0 && posixly_correct
== 0)
1008 /* We don't execute .bashrc for login shells. */
1011 /* Execute /etc/profile and one of the personal login shell
1012 initialization files. */
1013 if (no_profile
== 0)
1015 maybe_execute_file (SYS_PROFILE
, 1);
1017 if (act_like_sh
) /* sh */
1018 maybe_execute_file ("~/.profile", 1);
1019 else if ((maybe_execute_file ("~/.bash_profile", 1) == 0) &&
1020 (maybe_execute_file ("~/.bash_login", 1) == 0)) /* bash */
1021 maybe_execute_file ("~/.profile", 1);
1027 /* A non-interactive shell not named `sh' and not in posix mode reads and
1028 executes commands from $BASH_ENV. If `su' starts a shell with `-c cmd'
1029 and `-su' as the name of the shell, we want to read the startup files.
1030 No other non-interactive shells read any startup files. */
1031 if (interactive_shell
== 0 && !(su_shell
&& login_shell
))
1033 if (posixly_correct
== 0 && act_like_sh
== 0 && privileged_mode
== 0 &&
1035 execute_env_file (get_string_value ("BASH_ENV"));
1039 /* Interactive shell or `-su' shell. */
1040 if (posixly_correct
== 0) /* bash, sh */
1042 if (login_shell
&& sourced_login
++ == 0)
1044 /* We don't execute .bashrc for login shells. */
1047 /* Execute /etc/profile and one of the personal login shell
1048 initialization files. */
1049 if (no_profile
== 0)
1051 maybe_execute_file (SYS_PROFILE
, 1);
1053 if (act_like_sh
) /* sh */
1054 maybe_execute_file ("~/.profile", 1);
1055 else if ((maybe_execute_file ("~/.bash_profile", 1) == 0) &&
1056 (maybe_execute_file ("~/.bash_login", 1) == 0)) /* bash */
1057 maybe_execute_file ("~/.profile", 1);
1062 if (act_like_sh
== 0 && no_rc
== 0)
1065 # if defined (__OPENNT)
1066 maybe_execute_file (_prefixInstallPath(SYS_BASHRC
, NULL
, 0), 1);
1068 maybe_execute_file (SYS_BASHRC
, 1);
1071 maybe_execute_file (bashrc_file
, 1);
1074 else if (act_like_sh
&& privileged_mode
== 0 && sourced_env
++ == 0)
1075 execute_env_file (get_string_value ("ENV"));
1077 else /* bash --posix, sh --posix */
1080 if (interactive_shell
&& privileged_mode
== 0 && sourced_env
++ == 0)
1081 execute_env_file (get_string_value ("ENV"));
1084 #if defined (JOB_CONTROL)
1085 set_job_control (old_job_control
);
1089 #if defined (RESTRICTED_SHELL)
1090 /* Return 1 if the shell should be a restricted one based on NAME or the
1091 value of `restricted'. Don't actually do anything, just return a
1094 shell_is_restricted (name
)
1101 temp
= base_pathname (name
);
1104 return (STREQ (temp
, RESTRICTED_SHELL_NAME
));
1107 /* Perhaps make this shell a `restricted' one, based on NAME. If the
1108 basename of NAME is "rbash", then this shell is restricted. The
1109 name of the restricted shell is a configurable option, see config.h.
1110 In a restricted shell, PATH, SHELL, ENV, and BASH_ENV are read-only
1112 Do this also if `restricted' is already set to 1; maybe the shell was
1115 maybe_make_restricted (name
)
1120 temp
= base_pathname (name
);
1123 if (restricted
|| (STREQ (temp
, RESTRICTED_SHELL_NAME
)))
1125 set_var_read_only ("PATH");
1126 set_var_read_only ("SHELL");
1127 set_var_read_only ("ENV");
1128 set_var_read_only ("BASH_ENV");
1131 return (restricted
);
1133 #endif /* RESTRICTED_SHELL */
1135 /* Fetch the current set of uids and gids and return 1 if we're running
1136 setuid or setgid. */
1143 if (current_user
.uid
!= u
)
1145 FREE (current_user
.user_name
);
1146 FREE (current_user
.shell
);
1147 FREE (current_user
.home_dir
);
1148 current_user
.user_name
= current_user
.shell
= current_user
.home_dir
= (char *)NULL
;
1150 current_user
.uid
= u
;
1151 current_user
.gid
= getgid ();
1152 current_user
.euid
= geteuid ();
1153 current_user
.egid
= getegid ();
1155 /* See whether or not we are running setuid or setgid. */
1156 return (current_user
.uid
!= current_user
.euid
) ||
1157 (current_user
.gid
!= current_user
.egid
);
1161 disable_priv_mode ()
1163 setuid (current_user
.uid
);
1164 setgid (current_user
.gid
);
1165 current_user
.euid
= current_user
.uid
;
1166 current_user
.egid
= current_user
.gid
;
1174 WORD_LIST
*wl
, *tl
, *result
;
1176 code
= setjmp (top_level
);
1178 if (code
!= NOT_JUMPED
)
1182 /* Some kind of throw to top_level has occured. */
1184 return last_command_exit_value
= 127;
1187 return last_command_exit_value
;
1189 return last_command_exit_value
= 1;
1191 command_error ("run_wordexp", CMDERR_BADJUMP
, code
, 0);
1195 /* Run it through the parser to get a list of words and expand them */
1196 if (words
&& *words
)
1198 with_input_from_string (words
, "--wordexp");
1199 if (parse_command () != 0)
1201 if (global_command
== 0)
1206 if (global_command
->type
!= cm_simple
)
1208 wl
= global_command
->value
.Simple
->words
;
1210 for (tl
= wl
; tl
; tl
= tl
->next
)
1211 tl
->word
->flags
|= W_NOCOMSUB
|W_NOPROCSUB
;
1212 result
= wl
? expand_words_no_vars (wl
) : (WORD_LIST
*)0;
1215 result
= (WORD_LIST
*)0;
1217 last_command_exit_value
= 0;
1225 /* Count up the number of words and bytes, and print them. Don't count
1226 the trailing NUL byte. */
1227 for (nw
= nb
= 0, wl
= result
; wl
; wl
= wl
->next
)
1230 nb
+= strlen (wl
->word
->word
);
1232 printf ("%u\n%u\n", nw
, nb
);
1233 /* Print each word on a separate line. This will have to be changed when
1234 the interface to glibc is completed. */
1235 for (wl
= result
; wl
; wl
= wl
->next
)
1236 printf ("%s\n", wl
->word
->word
);
1241 #if defined (ONESHOT)
1242 /* Run one command, given as the argument to the -c option. Tell
1243 parse_and_execute not to fork for a simple command. */
1245 run_one_command (command
)
1250 code
= setjmp (top_level
);
1252 if (code
!= NOT_JUMPED
)
1254 #if defined (PROCESS_SUBSTITUTION)
1255 unlink_fifo_list ();
1256 #endif /* PROCESS_SUBSTITUTION */
1259 /* Some kind of throw to top_level has occured. */
1261 return last_command_exit_value
= 127;
1264 return last_command_exit_value
;
1266 return last_command_exit_value
= 1;
1268 command_error ("run_one_command", CMDERR_BADJUMP
, code
, 0);
1271 return (parse_and_execute (savestring (command
), "-c", SEVAL_NOHIST
));
1273 #endif /* ONESHOT */
1276 bind_args (argv
, arg_start
, arg_end
, start_index
)
1278 int arg_start
, arg_end
, start_index
;
1283 for (i
= arg_start
, args
= (WORD_LIST
*)NULL
; i
< arg_end
; i
++)
1284 args
= make_word_list (make_word (argv
[i
]), args
);
1287 args
= REVERSE_LIST (args
, WORD_LIST
*);
1288 if (start_index
== 0) /* bind to $0...$n for sh -c command */
1290 /* Posix.2 4.56.3 says that the first argument after sh -c command
1291 becomes $0, and the rest of the arguments become $1...$n */
1292 shell_name
= savestring (args
->word
->word
);
1293 FREE (dollar_vars
[0]);
1294 dollar_vars
[0] = savestring (args
->word
->word
);
1295 remember_args (args
->next
, 1);
1296 push_args (args
->next
); /* BASH_ARGV and BASH_ARGC */
1298 else /* bind to $1...$n for shell script */
1300 remember_args (args
, 1);
1301 push_args (args
); /* BASH_ARGV and BASH_ARGC */
1304 dispose_words (args
);
1313 remember_args ((WORD_LIST
*)NULL
, 1);
1314 pop_args (); /* Reset BASH_ARGV and BASH_ARGC */
1320 #if defined (DEBUGGER) && defined (DEBUGGER_START_FILE)
1323 old_errexit
= exit_immediately_on_error
;
1324 exit_immediately_on_error
= 0;
1326 maybe_execute_file (DEBUGGER_START_FILE
, 1);
1327 function_trace_mode
= 1;
1329 exit_immediately_on_error
+= old_errexit
;
1334 open_shell_script (script_name
)
1337 int fd
, e
, fd_is_tty
;
1338 char *filename
, *path_filename
, *t
;
1342 #if defined (ARRAY_VARS)
1343 SHELL_VAR
*funcname_v
, *bash_source_v
, *bash_lineno_v
;
1344 ARRAY
*funcname_a
, *bash_source_a
, *bash_lineno_a
;
1347 filename
= savestring (script_name
);
1349 fd
= open (filename
, O_RDONLY
);
1350 if ((fd
< 0) && (errno
== ENOENT
) && (absolute_program (filename
) == 0))
1353 /* If it's not in the current directory, try looking through PATH
1355 path_filename
= find_path_file (script_name
);
1359 filename
= path_filename
;
1360 fd
= open (filename
, O_RDONLY
);
1369 file_error (filename
);
1370 exit ((e
== ENOENT
) ? EX_NOTFOUND
: EX_NOINPUT
);
1373 free (dollar_vars
[0]);
1374 dollar_vars
[0] = savestring (script_name
);
1376 #if defined (ARRAY_VARS)
1377 GET_ARRAY_FROM_VAR ("FUNCNAME", funcname_v
, funcname_a
);
1378 GET_ARRAY_FROM_VAR ("BASH_SOURCE", bash_source_v
, bash_source_a
);
1379 GET_ARRAY_FROM_VAR ("BASH_LINENO", bash_lineno_v
, bash_lineno_a
);
1381 array_push (bash_source_a
, filename
);
1384 t
= itos (executing_line_number ());
1385 array_push (bash_lineno_a
, t
);
1388 array_push (funcname_a
, "main");
1392 fd_is_tty
= isatty (fd
);
1397 /* Only do this with non-tty file descriptors we can seek on. */
1398 if (fd_is_tty
== 0 && (lseek (fd
, 0L, 1) != -1))
1400 /* Check to see if the `file' in `bash file' is a binary file
1401 according to the same tests done by execute_simple_command (),
1402 and report an error and exit if it is. */
1403 sample_len
= read (fd
, sample
, sizeof (sample
));
1407 if ((fstat (fd
, &sb
) == 0) && S_ISDIR (sb
.st_mode
))
1408 internal_error (_("%s: is a directory"), filename
);
1412 file_error (filename
);
1416 else if (sample_len
> 0 && (check_binary_file (sample
, sample_len
)))
1418 internal_error ("%s: cannot execute binary file", filename
);
1419 exit (EX_BINARY_FILE
);
1421 /* Now rewind the file back to the beginning. */
1425 /* Open the script. But try to move the file descriptor to a randomly
1426 large one, in the hopes that any descriptors used by the script will
1427 not match with ours. */
1428 fd
= move_to_high_fd (fd
, 0, -1);
1430 #if defined (__CYGWIN__) && defined (O_TEXT)
1431 setmode (fd
, O_TEXT
);
1434 #if defined (BUFFERED_INPUT)
1435 default_buffered_input
= fd
;
1436 SET_CLOSE_ON_EXEC (default_buffered_input
);
1437 #else /* !BUFFERED_INPUT */
1438 default_input
= fdopen (fd
, "r");
1440 if (default_input
== 0)
1442 file_error (filename
);
1446 SET_CLOSE_ON_EXEC (fd
);
1447 if (fileno (default_input
) != fd
)
1448 SET_CLOSE_ON_EXEC (fileno (default_input
));
1449 #endif /* !BUFFERED_INPUT */
1451 /* Just about the only way for this code to be executed is if something
1452 like `bash -i /dev/stdin' is executed. */
1453 if (interactive_shell
&& fd_is_tty
)
1458 #if defined (BUFFERED_INPUT)
1459 default_buffered_input
= 0;
1461 fclose (default_input
);
1462 default_input
= stdin
;
1465 else if (forced_interactive
&& fd_is_tty
== 0)
1466 /* But if a script is called with something like `bash -i scriptname',
1467 we need to do a non-interactive setup here, since we didn't do it
1469 init_noninteractive ();
1475 /* Initialize the input routines for the parser. */
1479 /* Make sure the fd from which we are reading input is not in
1481 #if defined (BUFFERED_INPUT)
1482 if (interactive
== 0)
1483 sh_unset_nodelay_mode (default_buffered_input
);
1485 #endif /* !BUFFERED_INPUT */
1486 sh_unset_nodelay_mode (fileno (stdin
));
1488 /* with_input_from_stdin really means `with_input_from_readline' */
1489 if (interactive
&& no_line_editing
== 0)
1490 with_input_from_stdin ();
1491 #if defined (BUFFERED_INPUT)
1492 else if (interactive
== 0)
1493 with_input_from_buffered_stream (default_buffered_input
, dollar_vars
[0]);
1494 #endif /* BUFFERED_INPUT */
1496 with_input_from_stream (default_input
, dollar_vars
[0]);
1499 /* Close the current shell script input source and forget about it. This is
1500 extern so execute_cmd.c:initialize_subshell() can call it. If CHECK_ZERO
1501 is non-zero, we close default_buffered_input even if it's the standard
1504 unset_bash_input (check_zero
)
1507 #if defined (BUFFERED_INPUT)
1508 if ((check_zero
&& default_buffered_input
>= 0) ||
1509 (check_zero
== 0 && default_buffered_input
> 0))
1511 close_buffered_fd (default_buffered_input
);
1512 default_buffered_input
= bash_input
.location
.buffered_fd
= -1;
1514 #else /* !BUFFERED_INPUT */
1517 fclose (default_input
);
1518 default_input
= (FILE *)NULL
;
1520 #endif /* !BUFFERED_INPUT */
1524 #if !defined (PROGRAM)
1525 # define PROGRAM "bash"
1529 set_shell_name (argv0
)
1532 /* Here's a hack. If the name of this shell is "sh", then don't do
1533 any startup files; just try to be more like /bin/sh. */
1534 shell_name
= argv0
? base_pathname (argv0
) : PROGRAM
;
1536 if (*shell_name
== '-')
1542 if (shell_name
[0] == 's' && shell_name
[1] == 'h' && shell_name
[2] == '\0')
1544 if (shell_name
[0] == 's' && shell_name
[1] == 'u' && shell_name
[2] == '\0')
1547 shell_name
= argv0
? argv0
: PROGRAM
;
1548 FREE (dollar_vars
[0]);
1549 dollar_vars
[0] = savestring (shell_name
);
1551 /* A program may start an interactive shell with
1552 "execl ("/bin/bash", "-", NULL)".
1553 If so, default the name of this shell to our name. */
1554 if (!shell_name
|| !*shell_name
|| (shell_name
[0] == '-' && !shell_name
[1]))
1555 shell_name
= PROGRAM
;
1561 interactive_shell
= startup_state
= interactive
= 1;
1566 init_noninteractive ()
1568 #if defined (HISTORY)
1569 bash_history_reinit (0);
1570 #endif /* HISTORY */
1571 interactive_shell
= startup_state
= interactive
= 0;
1572 expand_aliases
= posixly_correct
; /* XXX - was 0 not posixly_correct */
1573 no_line_editing
= 1;
1574 #if defined (JOB_CONTROL)
1575 set_job_control (0);
1576 #endif /* JOB_CONTROL */
1580 get_current_user_info ()
1582 struct passwd
*entry
;
1584 /* Don't fetch this more than once. */
1585 if (current_user
.user_name
== 0)
1587 entry
= getpwuid (current_user
.uid
);
1590 current_user
.user_name
= savestring (entry
->pw_name
);
1591 current_user
.shell
= (entry
->pw_shell
&& entry
->pw_shell
[0])
1592 ? savestring (entry
->pw_shell
)
1593 : savestring ("/bin/sh");
1594 current_user
.home_dir
= savestring (entry
->pw_dir
);
1598 current_user
.user_name
= _("I have no name!");
1599 current_user
.user_name
= savestring (current_user
.user_name
);
1600 current_user
.shell
= savestring ("/bin/sh");
1601 current_user
.home_dir
= savestring ("/");
1607 /* Do whatever is necessary to initialize the shell.
1608 Put new initializations in here. */
1614 /* Line buffer output for stderr and stdout. */
1615 if (shell_initialized
== 0)
1617 sh_setlinebuf (stderr
);
1618 sh_setlinebuf (stdout
);
1621 /* Sort the array of shell builtins so that the binary search in
1622 find_shell_builtin () works correctly. */
1623 initialize_shell_builtins ();
1625 /* Initialize the trap signal handlers before installing our own
1626 signal handlers. traps.c:restore_original_signals () is responsible
1627 for restoring the original default signal handlers. That function
1628 is called when we make a new child. */
1629 initialize_traps ();
1630 initialize_signals (0);
1632 /* It's highly unlikely that this will change. */
1633 if (current_host_name
== 0)
1635 /* Initialize current_host_name. */
1636 if (gethostname (hostname
, 255) < 0)
1637 current_host_name
= "??host??";
1639 current_host_name
= savestring (hostname
);
1642 /* Initialize the stuff in current_user that comes from the password
1643 file. We don't need to do this right away if the shell is not
1645 if (interactive_shell
)
1646 get_current_user_info ();
1648 /* Initialize our interface to the tilde expander. */
1649 tilde_initialize ();
1651 /* Initialize internal and environment variables. Don't import shell
1652 functions from the environment if we are running in privileged or
1653 restricted mode or if the shell is running setuid. */
1654 #if defined (RESTRICTED_SHELL)
1655 initialize_shell_variables (shell_environment
, privileged_mode
||restricted
||running_setuid
);
1657 initialize_shell_variables (shell_environment
, privileged_mode
||running_setuid
);
1660 /* Initialize the data structures for storing and running jobs. */
1661 initialize_job_control (0);
1663 /* Initialize input streams to null. */
1664 initialize_bash_input ();
1666 initialize_flags ();
1668 /* Initialize the shell options. Don't import the shell options
1669 from the environment variable $SHELLOPTS if we are running in
1670 privileged or restricted mode or if the shell is running setuid. */
1671 #if defined (RESTRICTED_SHELL)
1672 initialize_shell_options (privileged_mode
||restricted
||running_setuid
);
1674 initialize_shell_options (privileged_mode
||running_setuid
);
1678 /* Function called by main () when it appears that the shell has already
1679 had some initialization performed. This is supposed to reset the world
1680 back to a pristine state, as if we had been exec'ed. */
1682 shell_reinitialize ()
1684 /* The default shell prompts. */
1685 primary_prompt
= PPROMPT
;
1686 secondary_prompt
= SPROMPT
;
1688 /* Things that get 1. */
1689 current_command_number
= 1;
1691 /* We have decided that the ~/.bashrc file should not be executed
1692 for the invocation of each shell script. If the variable $ENV
1693 (or $BASH_ENV) is set, its value is used as the name of a file
1695 no_rc
= no_profile
= 1;
1697 /* Things that get 0. */
1698 login_shell
= make_login_shell
= interactive
= executing
= 0;
1699 debugging
= do_version
= line_number
= last_command_exit_value
= 0;
1700 forced_interactive
= interactive_shell
= subshell_environment
= 0;
1703 #if defined (HISTORY)
1704 bash_history_reinit (0);
1705 #endif /* HISTORY */
1707 #if defined (RESTRICTED_SHELL)
1709 #endif /* RESTRICTED_SHELL */
1711 /* Ensure that the default startup file is used. (Except that we don't
1712 execute this file for reinitialized shells). */
1713 bashrc_file
= "~/.bashrc";
1715 /* Delete all variables and functions. They will be reinitialized when
1716 the environment is parsed. */
1717 delete_all_contexts (shell_variables
);
1718 delete_all_variables (shell_functions
);
1720 shell_reinitialized
= 1;
1724 show_shell_usage (fp
, extra
)
1729 char *set_opts
, *s
, *t
;
1732 fprintf (fp
, "GNU bash, version %s-(%s)\n", shell_version_string (), MACHTYPE
);
1733 fprintf (fp
, _("Usage:\t%s [GNU long option] [option] ...\n\t%s [GNU long option] [option] script-file ...\n"),
1734 shell_name
, shell_name
);
1735 fputs (_("GNU long options:\n"), fp
);
1736 for (i
= 0; long_args
[i
].name
; i
++)
1737 fprintf (fp
, "\t--%s\n", long_args
[i
].name
);
1739 fputs (_("Shell options:\n"), fp
);
1740 fputs (_("\t-irsD or -c command or -O shopt_option\t\t(invocation only)\n"), fp
);
1742 for (i
= 0, set_opts
= 0; shell_builtins
[i
].name
; i
++)
1743 if (STREQ (shell_builtins
[i
].name
, "set"))
1744 set_opts
= savestring (shell_builtins
[i
].short_doc
);
1747 s
= xstrchr (set_opts
, '[');
1752 t
= xstrchr (s
, ']');
1755 fprintf (fp
, _("\t-%s or -o option\n"), s
);
1761 fprintf (fp
, _("Type `%s -c \"help set\"' for more information about shell options.\n"), shell_name
);
1762 fprintf (fp
, _("Type `%s -c help' for more information about shell builtin commands.\n"), shell_name
);
1763 fprintf (fp
, _("Use the `bashbug' command to report bugs.\n"));
1768 add_shopt_to_alist (opt
, on_or_off
)
1772 if (shopt_ind
>= shopt_len
)
1775 shopt_alist
= (STRING_INT_ALIST
*)xrealloc (shopt_alist
, shopt_len
* sizeof (shopt_alist
[0]));
1777 shopt_alist
[shopt_ind
].word
= opt
;
1778 shopt_alist
[shopt_ind
].token
= on_or_off
;
1787 for (i
= 0; i
< shopt_ind
; i
++)
1788 if (shopt_setopt (shopt_alist
[i
].word
, (shopt_alist
[i
].token
== '-')) != EXECUTION_SUCCESS
)
1792 shopt_ind
= shopt_len
= 0;