2N/A/* execute.c -- Execute a GRUB script. */
2N/A/*
2N/A * GRUB -- GRand Unified Bootloader
2N/A * Copyright (C) 2005,2007,2008,2009,2010 Free Software Foundation, Inc.
2N/A * Copyright (c) 2010, 2012, Oracle and/or its affiliates. All rights reserved.
2N/A *
2N/A * GRUB is free software: you can redistribute it and/or modify
2N/A * it under the terms of the GNU General Public License as published by
2N/A * the Free Software Foundation, either version 3 of the License, or
2N/A * (at your option) any later version.
2N/A *
2N/A * GRUB is distributed in the hope that it will be useful,
2N/A * but WITHOUT ANY WARRANTY; without even the implied warranty of
2N/A * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
2N/A * GNU General Public License for more details.
2N/A *
2N/A * You should have received a copy of the GNU General Public License
2N/A * along with GRUB. If not, see <http://www.gnu.org/licenses/>.
2N/A */
2N/A
2N/A#include <grub/misc.h>
2N/A#include <grub/mm.h>
2N/A#include <grub/env.h>
2N/A#include <grub/script_sh.h>
2N/A#include <grub/command.h>
2N/A#include <grub/menu.h>
2N/A#include <grub/lib/arg.h>
2N/A#include <grub/normal.h>
2N/A#include <grub/extcmd.h>
2N/A
2N/A/* Max digits for a char is 3 (0xFF is 255), similarly for an int it
2N/A is sizeof (int) * 3, and one extra for a possible -ve sign. */
2N/A#define ERRNO_DIGITS_MAX (sizeof (int) * 3 + 1)
2N/A
2N/Astatic unsigned long is_continue;
2N/Astatic unsigned long active_loops;
2N/Astatic unsigned long active_breaks;
2N/Astatic unsigned long function_return;
2N/A
2N/A#define GRUB_SCRIPT_SCOPE_MALLOCED 1
2N/A#define GRUB_SCRIPT_SCOPE_ARGS_MALLOCED 2
2N/A
2N/A/* Scope for grub script functions. */
2N/Astruct grub_script_scope
2N/A{
2N/A unsigned flags;
2N/A unsigned shifts;
2N/A struct grub_script_argv argv;
2N/A};
2N/Astatic struct grub_script_scope *scope = 0;
2N/A
2N/A/* Wildcard translator for GRUB script. */
2N/Astruct grub_script_wildcard_translator *grub_wildcard_translator;
2N/A
2N/Astatic void
2N/Areplace_scope (struct grub_script_scope *new_scope)
2N/A{
2N/A if (scope)
2N/A {
2N/A scope->argv.argc += scope->shifts;
2N/A scope->argv.args -= scope->shifts;
2N/A
2N/A if (scope->flags & GRUB_SCRIPT_SCOPE_ARGS_MALLOCED)
2N/A grub_script_argv_free (&scope->argv);
2N/A
2N/A if (scope->flags & GRUB_SCRIPT_SCOPE_MALLOCED)
2N/A grub_free (scope);
2N/A }
2N/A scope = new_scope;
2N/A}
2N/A
2N/Agrub_err_t
2N/Agrub_script_break (grub_command_t cmd, int argc, char *argv[])
2N/A{
2N/A char *p = 0;
2N/A unsigned long count;
2N/A
2N/A if (argc == 0)
2N/A count = 1;
2N/A
2N/A else if ((argc > 1) || (count = grub_strtoul (argv[0], &p, 10)) == 0 ||
2N/A (*p != '\0'))
2N/A return grub_error (GRUB_ERR_BAD_ARGUMENT, "bad break");
2N/A
2N/A is_continue = grub_strcmp (cmd->name, "break") ? 1 : 0;
2N/A active_breaks = count;
2N/A if (active_breaks > active_loops)
2N/A active_breaks = active_loops;
2N/A return GRUB_ERR_NONE;
2N/A}
2N/A
2N/Agrub_err_t
2N/Agrub_script_shift (grub_command_t cmd __attribute__((unused)),
2N/A int argc, char *argv[])
2N/A{
2N/A char *p = 0;
2N/A unsigned long n = 0;
2N/A
2N/A if (! scope)
2N/A return GRUB_ERR_NONE;
2N/A
2N/A if (argc == 0)
2N/A n = 1;
2N/A
2N/A else if (argc > 1)
2N/A return GRUB_ERR_BAD_ARGUMENT;
2N/A
2N/A else
2N/A {
2N/A n = grub_strtoul (argv[0], &p, 10);
2N/A if (*p != '\0')
2N/A return GRUB_ERR_BAD_ARGUMENT;
2N/A }
2N/A
2N/A if (n > scope->argv.argc)
2N/A return GRUB_ERR_BAD_ARGUMENT;
2N/A
2N/A scope->shifts += n;
2N/A scope->argv.argc -= n;
2N/A scope->argv.args += n;
2N/A return GRUB_ERR_NONE;
2N/A}
2N/A
2N/Agrub_err_t
2N/Agrub_script_setparams (grub_command_t cmd __attribute__((unused)),
2N/A int argc, char **args)
2N/A{
2N/A struct grub_script_scope *new_scope;
2N/A struct grub_script_argv argv = { 0, 0, 0 };
2N/A
2N/A if (! scope)
2N/A return GRUB_ERR_INVALID_COMMAND;
2N/A
2N/A new_scope = grub_malloc (sizeof (*new_scope));
2N/A if (! new_scope)
2N/A return grub_errno;
2N/A
2N/A if (grub_script_argv_make (&argv, argc, args))
2N/A {
2N/A grub_free (new_scope);
2N/A return grub_errno;
2N/A }
2N/A
2N/A new_scope->shifts = 0;
2N/A new_scope->argv = argv;
2N/A new_scope->flags = GRUB_SCRIPT_SCOPE_MALLOCED |
2N/A GRUB_SCRIPT_SCOPE_ARGS_MALLOCED;
2N/A
2N/A replace_scope (new_scope);
2N/A return GRUB_ERR_NONE;
2N/A}
2N/A
2N/Agrub_err_t
2N/Agrub_script_return (grub_command_t cmd __attribute__((unused)),
2N/A int argc, char *argv[])
2N/A{
2N/A char *p;
2N/A unsigned long n;
2N/A
2N/A if (! scope || argc > 1)
2N/A return grub_error (GRUB_ERR_BAD_ARGUMENT, "not in function scope");
2N/A
2N/A if (argc == 0)
2N/A {
2N/A function_return = 1;
2N/A return grub_strtoul (grub_env_get ("?"), NULL, 10);
2N/A }
2N/A
2N/A n = grub_strtoul (argv[0], &p, 10);
2N/A if (*p != '\0')
2N/A return grub_error (GRUB_ERR_BAD_ARGUMENT, "bad argument");
2N/A
2N/A function_return = 1;
2N/A return n ? grub_error (GRUB_ERR_TEST_FAILURE, "false") : GRUB_ERR_NONE;
2N/A}
2N/A
2N/Astatic int
2N/Agrub_env_special (const char *name)
2N/A{
2N/A if (grub_isdigit (name[0]) ||
2N/A grub_strcmp (name, "#") == 0 ||
2N/A grub_strcmp (name, "*") == 0 ||
2N/A grub_strcmp (name, "@") == 0)
2N/A return 1;
2N/A return 0;
2N/A}
2N/A
2N/Astatic char **
2N/Agrub_script_env_get (const char *name, grub_script_arg_type_t type)
2N/A{
2N/A unsigned i;
2N/A struct grub_script_argv result = { 0, 0, 0 };
2N/A
2N/A if (grub_script_argv_next (&result))
2N/A goto fail;
2N/A
2N/A if (! grub_env_special (name))
2N/A {
2N/A const char *v = grub_env_get (name);
2N/A if (v && v[0])
2N/A {
2N/A if (type == GRUB_SCRIPT_ARG_TYPE_VAR)
2N/A {
2N/A if (grub_script_argv_split_append (&result, v))
2N/A goto fail;
2N/A }
2N/A else
2N/A if (grub_script_argv_append (&result, v, grub_strlen (v)))
2N/A goto fail;
2N/A }
2N/A }
2N/A else if (! scope)
2N/A {
2N/A if (grub_script_argv_append (&result, 0, 0))
2N/A goto fail;
2N/A }
2N/A else if (grub_strcmp (name, "#") == 0)
2N/A {
2N/A char buffer[ERRNO_DIGITS_MAX + 1];
2N/A grub_snprintf (buffer, sizeof (buffer), "%u", scope->argv.argc);
2N/A if (grub_script_argv_append (&result, buffer, grub_strlen (buffer)))
2N/A goto fail;
2N/A }
2N/A else if (grub_strcmp (name, "*") == 0)
2N/A {
2N/A for (i = 0; i < scope->argv.argc; i++)
2N/A if (type == GRUB_SCRIPT_ARG_TYPE_VAR)
2N/A {
2N/A if (i != 0 && grub_script_argv_next (&result))
2N/A goto fail;
2N/A
2N/A if (grub_script_argv_split_append (&result, scope->argv.args[i]))
2N/A goto fail;
2N/A }
2N/A else
2N/A {
2N/A if (i != 0 && grub_script_argv_append (&result, " ", 1))
2N/A goto fail;
2N/A
2N/A if (grub_script_argv_append (&result, scope->argv.args[i],
2N/A grub_strlen (scope->argv.args[i])))
2N/A goto fail;
2N/A }
2N/A }
2N/A else if (grub_strcmp (name, "@") == 0)
2N/A {
2N/A for (i = 0; i < scope->argv.argc; i++)
2N/A {
2N/A if (i != 0 && grub_script_argv_next (&result))
2N/A goto fail;
2N/A
2N/A if (type == GRUB_SCRIPT_ARG_TYPE_VAR)
2N/A {
2N/A if (grub_script_argv_split_append (&result, scope->argv.args[i]))
2N/A goto fail;
2N/A }
2N/A else
2N/A if (grub_script_argv_append (&result, scope->argv.args[i],
2N/A grub_strlen (scope->argv.args[i])))
2N/A goto fail;
2N/A }
2N/A }
2N/A else
2N/A {
2N/A unsigned long num = grub_strtoul (name, 0, 10);
2N/A if (num == 0)
2N/A ; /* XXX no file name, for now. */
2N/A
2N/A else if (num <= scope->argv.argc)
2N/A {
2N/A if (type == GRUB_SCRIPT_ARG_TYPE_VAR)
2N/A {
2N/A if (grub_script_argv_split_append (&result,
2N/A scope->argv.args[num - 1]))
2N/A goto fail;
2N/A }
2N/A else
2N/A if (grub_script_argv_append (&result, scope->argv.args[num - 1],
2N/A grub_strlen (scope->argv.args[num - 1])
2N/A ))
2N/A goto fail;
2N/A }
2N/A }
2N/A
2N/A return result.args;
2N/A
2N/A fail:
2N/A
2N/A grub_script_argv_free (&result);
2N/A return 0;
2N/A}
2N/A
2N/Astatic grub_err_t
2N/Agrub_script_env_set (const char *name, const char *val)
2N/A{
2N/A if (grub_env_special (name))
2N/A return grub_error (GRUB_ERR_BAD_ARGUMENT, "bad variable name");
2N/A
2N/A return grub_env_set (name, val);
2N/A}
2N/A
2N/A/* Convert arguments in ARGLIST into ARGV form. */
2N/Astatic int
2N/Agrub_script_arglist_to_argv (struct grub_script_arglist *arglist,
2N/A struct grub_script_argv *argv)
2N/A{
2N/A int i;
2N/A char **values = 0;
2N/A struct grub_script_arg *arg = 0;
2N/A struct grub_script_argv result = { 0, 0, 0 };
2N/A
2N/A auto int NESTED_FUNC_ATTR append (char *s, int escape_type);
2N/A int NESTED_FUNC_ATTR append (char *s, int escape_type)
2N/A {
2N/A int r;
2N/A char *p = 0;
2N/A
2N/A if (! grub_wildcard_translator || escape_type == 0)
2N/A return grub_script_argv_append (&result, s, grub_strlen (s));
2N/A
2N/A if (escape_type > 0)
2N/A p = grub_wildcard_translator->escape (s);
2N/A else if (escape_type < 0)
2N/A p = grub_wildcard_translator->unescape (s);
2N/A
2N/A if (! p)
2N/A return 1;
2N/A
2N/A r = grub_script_argv_append (&result, p, grub_strlen (p));
2N/A grub_free (p);
2N/A return r;
2N/A }
2N/A
2N/A for (; arglist && arglist->arg; arglist = arglist->next)
2N/A {
2N/A if (grub_script_argv_next (&result))
2N/A goto fail;
2N/A
2N/A arg = arglist->arg;
2N/A while (arg)
2N/A {
2N/A switch (arg->type)
2N/A {
2N/A case GRUB_SCRIPT_ARG_TYPE_VAR:
2N/A case GRUB_SCRIPT_ARG_TYPE_DQVAR:
2N/A values = grub_script_env_get (arg->str, arg->type);
2N/A for (i = 0; values && values[i]; i++)
2N/A {
2N/A if (i != 0 && grub_script_argv_next (&result))
2N/A goto fail;
2N/A
2N/A if (arg->type == GRUB_SCRIPT_ARG_TYPE_VAR)
2N/A {
2N/A if (grub_script_argv_append (&result, values[i],
2N/A grub_strlen (values[i])))
2N/A goto fail;
2N/A }
2N/A else
2N/A {
2N/A if (append (values[i], 1))
2N/A goto fail;
2N/A }
2N/A
2N/A grub_free (values[i]);
2N/A }
2N/A grub_free (values);
2N/A break;
2N/A
2N/A case GRUB_SCRIPT_ARG_TYPE_BLOCK:
2N/A if (grub_script_argv_append (&result, "{", 1)
2N/A || grub_script_argv_append (&result, arg->str,
2N/A grub_strlen (arg->str))
2N/A || grub_script_argv_append (&result, "}", 1))
2N/A goto fail;
2N/A result.script = arg->script;
2N/A break;
2N/A
2N/A case GRUB_SCRIPT_ARG_TYPE_TEXT:
2N/A if (grub_strlen (arg->str) &&
2N/A grub_script_argv_append (&result, arg->str,
2N/A grub_strlen (arg->str)))
2N/A goto fail;
2N/A break;
2N/A
2N/A case GRUB_SCRIPT_ARG_TYPE_DQSTR:
2N/A case GRUB_SCRIPT_ARG_TYPE_SQSTR:
2N/A if (append (arg->str, 1))
2N/A goto fail;
2N/A break;
2N/A }
2N/A arg = arg->next;
2N/A }
2N/A }
2N/A
2N/A if (! result.args[result.argc - 1])
2N/A result.argc--;
2N/A
2N/A /* Perform wildcard expansion. */
2N/A
2N/A if (grub_wildcard_translator)
2N/A {
2N/A int j;
2N/A int failed = 0;
2N/A char **expansions = 0;
2N/A struct grub_script_argv unexpanded = result;
2N/A
2N/A result.argc = 0;
2N/A result.args = 0;
2N/A for (i = 0; unexpanded.args[i]; i++)
2N/A {
2N/A if (grub_wildcard_translator->expand (unexpanded.args[i],
2N/A &expansions))
2N/A {
2N/A grub_script_argv_free (&unexpanded);
2N/A goto fail;
2N/A }
2N/A
2N/A if (! expansions)
2N/A {
2N/A grub_script_argv_next (&result);
2N/A append (unexpanded.args[i], -1);
2N/A }
2N/A else
2N/A {
2N/A for (j = 0; expansions[j]; j++)
2N/A {
2N/A failed = (failed || grub_script_argv_next (&result) ||
2N/A append (expansions[j], -1));
2N/A grub_free (expansions[j]);
2N/A }
2N/A grub_free (expansions);
2N/A
2N/A if (failed)
2N/A {
2N/A grub_script_argv_free (&unexpanded);
2N/A goto fail;
2N/A }
2N/A }
2N/A }
2N/A grub_script_argv_free (&unexpanded);
2N/A }
2N/A
2N/A *argv = result;
2N/A return 0;
2N/A
2N/A fail:
2N/A
2N/A grub_script_argv_free (&result);
2N/A return 1;
2N/A}
2N/A
2N/Astatic grub_err_t
2N/Agrub_script_execute_cmd (struct grub_script_cmd *cmd)
2N/A{
2N/A int ret;
2N/A char errnobuf[ERRNO_DIGITS_MAX + 1];
2N/A extern int grub_more, real_grub_more;
2N/A
2N/A if (cmd == 0)
2N/A return 0;
2N/A
2N/A ret = cmd->exec (cmd);
2N/A grub_more = real_grub_more;
2N/A
2N/A grub_snprintf (errnobuf, sizeof (errnobuf), "%d", ret);
2N/A grub_env_set ("?", errnobuf);
2N/A return ret;
2N/A}
2N/A
2N/A/* Execute a function call. */
2N/Agrub_err_t
2N/Agrub_script_function_call (grub_script_function_t func, int argc, char **args)
2N/A{
2N/A grub_err_t ret = 0;
2N/A unsigned long loops = active_loops;
2N/A struct grub_script_scope *old_scope;
2N/A struct grub_script_scope new_scope;
2N/A
2N/A active_loops = 0;
2N/A new_scope.flags = 0;
2N/A new_scope.shifts = 0;
2N/A new_scope.argv.argc = argc;
2N/A new_scope.argv.args = args;
2N/A
2N/A old_scope = scope;
2N/A scope = &new_scope;
2N/A
2N/A ret = grub_script_execute (func->func);
2N/A
2N/A function_return = 0;
2N/A active_loops = loops;
2N/A replace_scope (old_scope); /* free any scopes by setparams */
2N/A return ret;
2N/A}
2N/A
2N/A/* Execute a source script. */
2N/Agrub_err_t
2N/Agrub_script_execute_sourcecode (const char *source, int argc, char **args)
2N/A{
2N/A grub_err_t ret = 0;
2N/A struct grub_script *parsed_script;
2N/A struct grub_script_scope new_scope;
2N/A struct grub_script_scope *old_scope;
2N/A
2N/A auto grub_err_t getline (char **line, int cont);
2N/A grub_err_t getline (char **line, int cont __attribute__ ((unused)))
2N/A {
2N/A const char *p;
2N/A
2N/A if (! source)
2N/A {
2N/A *line = 0;
2N/A return 0;
2N/A }
2N/A
2N/A p = grub_strchr (source, '\n');
2N/A
2N/A if (p)
2N/A *line = grub_strndup (source, p - source);
2N/A else
2N/A *line = grub_strdup (source);
2N/A source = p ? p + 1 : 0;
2N/A return 0;
2N/A }
2N/A
2N/A new_scope.argv.argc = argc;
2N/A new_scope.argv.args = args;
2N/A new_scope.flags = 0;
2N/A
2N/A old_scope = scope;
2N/A scope = &new_scope;
2N/A
2N/A while (source)
2N/A {
2N/A char *line;
2N/A
2N/A getline (&line, 0);
2N/A parsed_script = grub_script_parse (line, getline);
2N/A if (! parsed_script)
2N/A {
2N/A ret = grub_errno;
2N/A break;
2N/A }
2N/A
2N/A ret = grub_script_execute (parsed_script);
2N/A grub_free (line);
2N/A }
2N/A
2N/A scope = old_scope;
2N/A return ret;
2N/A}
2N/A
2N/A/* Execute a single command line. */
2N/Agrub_err_t
2N/Agrub_script_execute_cmdline (struct grub_script_cmd *cmd)
2N/A{
2N/A struct grub_script_cmdline *cmdline = (struct grub_script_cmdline *) cmd;
2N/A grub_command_t grubcmd;
2N/A grub_err_t ret = 0;
2N/A grub_script_function_t func = 0;
2N/A char errnobuf[18];
2N/A char *cmdname;
2N/A int argc;
2N/A char **args;
2N/A int invert;
2N/A struct grub_script_argv argv = { 0, 0, 0 };
2N/A
2N/A /* Lookup the command. */
2N/A if (grub_script_arglist_to_argv (cmdline->arglist, &argv) || ! argv.args[0])
2N/A return grub_errno;
2N/A
2N/A invert = 0;
2N/A argc = argv.argc - 1;
2N/A args = argv.args + 1;
2N/A cmdname = argv.args[0];
2N/A if (grub_strcmp (cmdname, "!") == 0)
2N/A {
2N/A if (argv.argc < 2 || ! argv.args[1])
2N/A {
2N/A grub_script_argv_free (&argv);
2N/A return grub_error (GRUB_ERR_BAD_ARGUMENT, "missing arguments");
2N/A }
2N/A
2N/A invert = 1;
2N/A argc = argv.argc - 2;
2N/A args = argv.args + 2;
2N/A cmdname = argv.args[1];
2N/A }
2N/A grubcmd = grub_command_find (cmdname);
2N/A if (! grubcmd)
2N/A {
2N/A grub_errno = GRUB_ERR_NONE;
2N/A
2N/A /* It's not a GRUB command, try all functions. */
2N/A func = grub_script_function_find (cmdname);
2N/A if (! func)
2N/A {
2N/A /* As a last resort, try if it is an assignment. */
2N/A char *assign = grub_strdup (cmdname);
2N/A char *eq = grub_strchr (assign, '=');
2N/A
2N/A if (eq)
2N/A {
2N/A /* This was set because the command was not found. */
2N/A grub_errno = GRUB_ERR_NONE;
2N/A
2N/A /* Create two strings and set the variable. */
2N/A *eq = '\0';
2N/A eq++;
2N/A grub_script_env_set (assign, eq);
2N/A }
2N/A grub_free (assign);
2N/A
2N/A grub_snprintf (errnobuf, sizeof (errnobuf), "%d", grub_errno);
2N/A grub_script_env_set ("?", errnobuf);
2N/A
2N/A grub_script_argv_free (&argv);
2N/A grub_print_error ();
2N/A
2N/A return 0;
2N/A }
2N/A }
2N/A
2N/A /* Execute the GRUB command or function. */
2N/A if (grubcmd)
2N/A {
2N/A if (grub_extractor_level && !(grubcmd->flags
2N/A & GRUB_COMMAND_FLAG_EXTRACTOR))
2N/A ret = grub_error (GRUB_ERR_EXTRACTOR,
2N/A "%s isn't allowed to execute in an extractor",
2N/A cmdname);
2N/A else if ((grubcmd->flags & GRUB_COMMAND_FLAG_BLOCKS) &&
2N/A (grubcmd->flags & GRUB_COMMAND_FLAG_EXTCMD))
2N/A ret = grub_extcmd_dispatcher (grubcmd, argc, args, argv.script);
2N/A else
2N/A ret = (grubcmd->func) (grubcmd, argc, args);
2N/A }
2N/A else
2N/A ret = grub_script_function_call (func, argc, args);
2N/A
2N/A if (invert)
2N/A {
2N/A if (ret == GRUB_ERR_TEST_FAILURE)
2N/A grub_errno = ret = GRUB_ERR_NONE;
2N/A else if (ret == GRUB_ERR_NONE)
2N/A ret = grub_error (GRUB_ERR_TEST_FAILURE, "false");
2N/A else
2N/A {
2N/A grub_print_error ();
2N/A ret = GRUB_ERR_NONE;
2N/A }
2N/A }
2N/A
2N/A /* Free arguments. */
2N/A grub_script_argv_free (&argv);
2N/A
2N/A if (grub_errno == GRUB_ERR_TEST_FAILURE)
2N/A grub_errno = GRUB_ERR_NONE;
2N/A
2N/A grub_print_error ();
2N/A
2N/A grub_snprintf (errnobuf, sizeof (errnobuf), "%d", ret);
2N/A grub_env_set ("?", errnobuf);
2N/A
2N/A return ret;
2N/A}
2N/A
2N/A/* Execute a block of one or more commands. */
2N/Agrub_err_t
2N/Agrub_script_execute_cmdlist (struct grub_script_cmd *list)
2N/A{
2N/A int ret = 0;
2N/A struct grub_script_cmd *cmd;
2N/A
2N/A /* Loop over every command and execute it. */
2N/A for (cmd = list->next; cmd; cmd = cmd->next)
2N/A {
2N/A if (active_breaks)
2N/A break;
2N/A
2N/A ret = grub_script_execute_cmd (cmd);
2N/A
2N/A if (function_return)
2N/A break;
2N/A }
2N/A
2N/A return ret;
2N/A}
2N/A
2N/A/* Execute an if statement. */
2N/Agrub_err_t
2N/Agrub_script_execute_cmdif (struct grub_script_cmd *cmd)
2N/A{
2N/A int ret;
2N/A const char *result;
2N/A struct grub_script_cmdif *cmdif = (struct grub_script_cmdif *) cmd;
2N/A
2N/A /* Check if the commands results in a true or a false. The value is
2N/A read from the env variable `?'. */
2N/A ret = grub_script_execute_cmd (cmdif->exec_to_evaluate);
2N/A if (function_return)
2N/A return ret;
2N/A
2N/A result = grub_env_get ("?");
2N/A grub_errno = GRUB_ERR_NONE;
2N/A
2N/A /* Execute the `if' or the `else' part depending on the value of
2N/A `?'. */
2N/A if (result && ! grub_strcmp (result, "0"))
2N/A return grub_script_execute_cmd (cmdif->exec_on_true);
2N/A else
2N/A return grub_script_execute_cmd (cmdif->exec_on_false);
2N/A}
2N/A
2N/A/* Execute a for statement. */
2N/Agrub_err_t
2N/Agrub_script_execute_cmdfor (struct grub_script_cmd *cmd)
2N/A{
2N/A unsigned i;
2N/A grub_err_t result;
2N/A struct grub_script_argv argv = { 0, 0, 0 };
2N/A struct grub_script_cmdfor *cmdfor = (struct grub_script_cmdfor *) cmd;
2N/A
2N/A if (grub_script_arglist_to_argv (cmdfor->words, &argv))
2N/A return grub_errno;
2N/A
2N/A active_loops++;
2N/A result = 0;
2N/A for (i = 0; i < argv.argc; i++)
2N/A {
2N/A if (is_continue && active_breaks == 1)
2N/A active_breaks = 0;
2N/A
2N/A if (! active_breaks)
2N/A {
2N/A grub_script_env_set (cmdfor->name->str, argv.args[i]);
2N/A result = grub_script_execute_cmd (cmdfor->list);
2N/A if (function_return)
2N/A break;
2N/A }
2N/A }
2N/A
2N/A if (active_breaks)
2N/A active_breaks--;
2N/A
2N/A active_loops--;
2N/A grub_script_argv_free (&argv);
2N/A return result;
2N/A}
2N/A
2N/A/* Execute a "while" or "until" command. */
2N/Agrub_err_t
2N/Agrub_script_execute_cmdwhile (struct grub_script_cmd *cmd)
2N/A{
2N/A int result;
2N/A struct grub_script_cmdwhile *cmdwhile = (struct grub_script_cmdwhile *) cmd;
2N/A
2N/A active_loops++;
2N/A do {
2N/A result = grub_script_execute_cmd (cmdwhile->cond);
2N/A if (function_return)
2N/A break;
2N/A
2N/A if (cmdwhile->until ? !result : result)
2N/A break;
2N/A
2N/A result = grub_script_execute_cmd (cmdwhile->list);
2N/A if (function_return)
2N/A break;
2N/A
2N/A if (active_breaks == 1 && is_continue)
2N/A active_breaks = 0;
2N/A
2N/A if (active_breaks)
2N/A break;
2N/A
2N/A } while (1); /* XXX Put a check for ^C here */
2N/A
2N/A if (active_breaks)
2N/A active_breaks--;
2N/A
2N/A active_loops--;
2N/A return result;
2N/A}
2N/A
2N/A/* Execute any GRUB pre-parsed command or script. */
2N/Agrub_err_t
2N/Agrub_script_execute (struct grub_script *script)
2N/A{
2N/A if (script == 0)
2N/A return 0;
2N/A
2N/A return grub_script_execute_cmd (script->cmd);
2N/A}
2N/A