Imported from ../bash-2.0.tar.gz.
[platform/upstream/bash.git] / builtins / builtin.def
1 This file is builtin.def, from which is created builtin.c.
2 It implements the builtin "builtin" in Bash.
3
4 Copyright (C) 1987, 1989, 1991 Free Software Foundation, Inc.
5
6 This file is part of GNU Bash, the Bourne Again SHell.
7
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
11 version.
12
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
16 for more details.
17
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.
21
22 $PRODUCES builtin.c
23
24 $BUILTIN builtin
25 $FUNCTION builtin_builtin
26 $SHORT_DOC builtin [shell-builtin [arg ...]]
27 Run a shell builtin.  This is useful when you wish to rename a
28 shell builtin to be a function, but need the functionality of the
29 builtin within the function itself.
30 $END
31 #include <config.h>
32
33 #if defined (HAVE_UNISTD_H)
34 #  include <unistd.h>
35 #endif
36
37 #include "../shell.h"
38 #include "common.h"
39
40 extern char *this_command_name;
41
42 /* Run the command mentioned in list directly, without going through the
43    normal alias/function/builtin/filename lookup process. */
44 int
45 builtin_builtin (list)
46      WORD_LIST *list;
47 {
48   Function *function;
49   register char *command;
50
51   if (!list)
52     return (EXECUTION_SUCCESS);
53
54   command = (list->word->word);
55 #if defined (DISABLED_BUILTINS)
56   function = builtin_address (command);
57 #else /* !DISABLED_BUILTINS */
58   function = find_shell_builtin (command);
59 #endif /* !DISABLED_BUILTINS */
60
61   if (!function)
62     {
63       builtin_error ("%s: not a shell builtin", command);
64       return (EXECUTION_FAILURE);
65     }
66   else
67     {
68       this_command_name = command;
69       list = list->next;
70       return ((*function) (list));
71     }
72 }