164 lines
4.3 KiB
Modula-2
164 lines
4.3 KiB
Modula-2
![]() |
This file is exec.def, from which is created exec.c.
|
||
|
It implements the builtin "exec" in Bash.
|
||
|
|
||
|
Copyright (C) 1987, 1989, 1991 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 1, 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.
|
||
|
|
||
|
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, 675 Mass Ave, Cambridge, MA 02139, USA.
|
||
|
|
||
|
$PRODUCES exec.c
|
||
|
|
||
|
$BUILTIN exec
|
||
|
$FUNCTION exec_builtin
|
||
|
$SHORT_DOC exec [ [-] file [redirection ...]]
|
||
|
Exec FILE, replacing this shell with the specified program.
|
||
|
If FILE is not specified, the redirections take effect in this
|
||
|
shell. If the first argument is `-', then place a dash in the
|
||
|
zeroth arg passed to FILE. If the file cannot be exec'ed and
|
||
|
the shell is not interactive, then the shell exits, unless the
|
||
|
shell variable "no_exit_on_failed_exec" exists.
|
||
|
$END
|
||
|
|
||
|
#include "../shell.h"
|
||
|
#include <sys/types.h>
|
||
|
#include "../posixstat.h"
|
||
|
#include <signal.h>
|
||
|
#include <errno.h>
|
||
|
|
||
|
#include "../execute_cmd.h"
|
||
|
#include "common.h"
|
||
|
#include "../flags.h"
|
||
|
|
||
|
/* Not all systems declare ERRNO in errno.h... and some systems #define it! */
|
||
|
#if !defined (errno)
|
||
|
extern int errno;
|
||
|
#endif /* !errno */
|
||
|
extern int interactive, subshell_environment;
|
||
|
extern REDIRECT *redirection_undo_list;
|
||
|
|
||
|
int
|
||
|
exec_builtin (list)
|
||
|
WORD_LIST *list;
|
||
|
{
|
||
|
int exit_value = EXECUTION_FAILURE;
|
||
|
|
||
|
maybe_make_export_env ();
|
||
|
|
||
|
/* First, let the redirections remain. */
|
||
|
dispose_redirects (redirection_undo_list);
|
||
|
redirection_undo_list = (REDIRECT *)NULL;
|
||
|
|
||
|
if (!list)
|
||
|
return (EXECUTION_SUCCESS);
|
||
|
else
|
||
|
{
|
||
|
/* Otherwise, execve the new command with args. */
|
||
|
char *command, **args;
|
||
|
int dash_name = 0;
|
||
|
|
||
|
if (list->word->word[0] == '-' && !list->word->word[1])
|
||
|
{
|
||
|
/* The user would like to exec this command as if it was a
|
||
|
login command. Do so. */
|
||
|
list = list->next;
|
||
|
dash_name++;
|
||
|
}
|
||
|
|
||
|
if (!list)
|
||
|
return (EXECUTION_SUCCESS);
|
||
|
|
||
|
#if defined (RESTRICTED_SHELL)
|
||
|
if (restricted)
|
||
|
{
|
||
|
builtin_error ("restricted");
|
||
|
return (EXECUTION_FAILURE);
|
||
|
}
|
||
|
#endif /* RESTRICTED_SHELL */
|
||
|
|
||
|
args = make_word_array (list);
|
||
|
|
||
|
/* A command with a slash anywhere in its name is not looked up in
|
||
|
the search path. */
|
||
|
if (absolute_program (args[0]))
|
||
|
command = args[0];
|
||
|
else
|
||
|
command = find_user_command (args[0]);
|
||
|
if (!command)
|
||
|
{
|
||
|
builtin_error ("%s: not found", args[0]);
|
||
|
exit_value = EX_NOTFOUND; /* As per Posix.2, 3.14.6 */
|
||
|
goto failed_exec;
|
||
|
}
|
||
|
|
||
|
command = full_pathname (command);
|
||
|
/* If the user wants this to look like a login shell, then
|
||
|
prepend a `-' onto the first argument (argv[0]). */
|
||
|
if (dash_name)
|
||
|
{
|
||
|
char *new_name = xmalloc (2 + strlen (args[0]));
|
||
|
new_name[0] = '-';
|
||
|
strcpy (new_name + 1, args[0]);
|
||
|
free (args[0]);
|
||
|
args[0] = new_name;
|
||
|
}
|
||
|
|
||
|
/* Decrement SHLVL by 1 so a new shell started here has the same value,
|
||
|
preserving the appearance. After we do that, we need to change the
|
||
|
exported environment to include the new value. */
|
||
|
adjust_shell_level (-1);
|
||
|
maybe_make_export_env ();
|
||
|
|
||
|
#if defined (HISTORY)
|
||
|
maybe_save_shell_history ();
|
||
|
#endif /* HISTORY */
|
||
|
restore_original_signals ();
|
||
|
|
||
|
#if defined (JOB_CONTROL)
|
||
|
if (subshell_environment == 0)
|
||
|
end_job_control ();
|
||
|
#endif /* JOB_CONTROL */
|
||
|
|
||
|
shell_execve (command, args, export_env);
|
||
|
|
||
|
adjust_shell_level (1);
|
||
|
|
||
|
if (!executable_file (command))
|
||
|
{
|
||
|
builtin_error ("%s: cannot execute: %s", command, strerror (errno));
|
||
|
exit_value = EX_NOEXEC; /* As per Posix.2, 3.14.6 */
|
||
|
}
|
||
|
else
|
||
|
file_error (command);
|
||
|
|
||
|
failed_exec:
|
||
|
if (command)
|
||
|
free (command);
|
||
|
|
||
|
if (subshell_environment ||
|
||
|
(!interactive && !find_variable ("no_exit_on_failed_exec")))
|
||
|
exit (exit_value);
|
||
|
|
||
|
initialize_traps ();
|
||
|
reinitialize_signals ();
|
||
|
|
||
|
#if defined (JOB_CONTROL)
|
||
|
restart_job_control ();
|
||
|
#endif /* JOB_CONTROL */
|
||
|
|
||
|
return (exit_value);
|
||
|
}
|
||
|
}
|