1 This file is command.def, from which is created command.c.
2 It implements the builtin "command" in Bash.
4 Copyright (C) 1987, 1989, 1991 Free Software Foundation, Inc.
6 This file is part of GNU Bash, the Bourne Again SHell.
8 Bash is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 1, or (at your option) any later
13 Bash is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
18 You should have received a copy of the GNU General Public License along
19 with Bash; see the file COPYING. If not, write to the Free Software
20 Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
25 $FUNCTION command_builtin
26 $SHORT_DOC command [-pVv] command [arg ...]
27 Runs COMMAND with ARGS ignoring shell functions. If you have a shell
28 function called `ls', and you wish to call the command `ls', you can
29 say "command ls". If the -p option is given, a default value is used
30 for PATH that is guaranteed to find all of the standard utilities. If
31 the -V or -v option is given, a string is printed describing COMMAND.
32 The -V option produces a more verbose description.
37 #if defined (HAVE_UNISTD_H)
41 #include "../bashansi.h"
44 #include "../execute_cmd.h"
46 #include "bashgetopt.h"
49 extern int subshell_environment;
51 static void restore_path ();
52 static char *get_standard_path ();
54 /* Run the commands mentioned in LIST without paying attention to shell
57 command_builtin (list)
60 int result, verbose, use_standard_path, opt;
61 char *old_path, *standard_path;
64 verbose = use_standard_path = 0;
65 reset_internal_getopt ();
66 while ((opt = internal_getopt (list, "pvV")) != -1)
71 use_standard_path = 1;
87 return (EXECUTION_SUCCESS);
93 for (any_found = 0; list; list = list->next)
95 found = describe_command (list->word->word, verbose, 0);
98 builtin_error ("%s: not found", list->word->word);
102 return (any_found ? EXECUTION_SUCCESS : EXECUTION_FAILURE);
105 #if defined (RESTRICTED_SHELL)
106 if (use_standard_path && restricted)
108 builtin_error ("restricted: cannot use -p");
109 return (EXECUTION_FAILURE);
113 begin_unwind_frame ("command_builtin");
115 /* We don't want this to be reparsed (consider command echo 'foo &'), so
116 just make a simple_command structure and call execute_command with it. */
117 if (use_standard_path)
119 old_path = get_string_value ("PATH");
120 /* If old_path is NULL, $PATH is unset. If so, we want to make sure
121 it's unset after this command completes. */
123 old_path = savestring (old_path);
124 add_unwind_protect ((Function *)restore_path, old_path);
126 standard_path = get_standard_path ();
127 bind_variable ("PATH", standard_path ? standard_path : "");
128 FREE (standard_path);
131 command = make_bare_simple_command ();
132 command->value.Simple->words = (WORD_LIST *)copy_word_list (list);
133 command->value.Simple->redirects = (REDIRECT *)NULL;
134 command->flags |= (CMD_NO_FUNCTIONS | CMD_INHIBIT_EXPANSION);
135 command->value.Simple->flags |= (CMD_NO_FUNCTIONS | CMD_INHIBIT_EXPANSION);
137 /* This breaks for things like ( cd /tmp ; command z ababa ; echo next )
138 or $(command echo a ; command echo b;) or even
139 { command echo a; command echo b; } & */
140 /* If we're in a subshell, see if we can get away without forking
141 again, since we've already forked to run this builtin. */
142 if (subshell_environment)
144 command->flags |= CMD_NO_FORK;
145 command->value.Simple->flags |= CMD_NO_FORK;
148 add_unwind_protect ((char *)dispose_command, command);
149 result = execute_command (command);
151 run_unwind_frame ("command_builtin");
156 /* Restore the value of the $PATH variable after replacing it when
157 executing `command -p'. */
164 bind_variable ("PATH", var);
168 unbind_variable ("PATH");
171 /* Return a value for PATH that is guaranteed to find all of the standard
172 utilities. This uses Posix.2 configuration variables, if present. It
173 uses a value defined in config.h as a last resort. */
177 #if defined (_CS_PATH) && defined (HAVE_CONFSTR)
181 len = (size_t)confstr (_CS_PATH, (char *)NULL, (size_t)0);
182 p = xmalloc ((int)len + 2);
184 confstr (_CS_PATH, p, len);
186 #else /* !_CSPATH || !HAVE_CONFSTR */
187 # if defined (CS_PATH)
188 return (savestring (CS_PATH));
190 return (savestring (STANDARD_UTILS_PATH));
191 # endif /* !CS_PATH */
192 #endif /* !_CS_PATH || !HAVE_CONFSTR */