+static int function_invoke(struct grub2_script *script,
+ void *data, int argc, char **argv)
+{
+ struct grub2_statement_function *fn = data;
+ char *name;
+ int i;
+
+ /* set positional parameters */
+ for (i = 1; i < argc; i++) {
+ name = talloc_asprintf(script, "%d", i);
+ script_env_set(script, name, argv[i]);
+ }
+
+ return statements_execute(script, fn->body);
+}
+
+int statement_function_execute(struct grub2_script *script,
+ struct grub2_statement *statement)
+{
+ struct grub2_statement_function *st = to_stmt_function(statement);
+ const char *name;
+
+ if (st->name->type == GRUB2_WORD_VAR)
+ name = expand_var(script, st->name);
+ else
+ name = st->name->text;
+
+ script_register_function(script, name, function_invoke, st);
+
+ return 0;
+}
+
+int statement_for_execute(struct grub2_script *script,
+ struct grub2_statement *statement)
+{
+ struct grub2_statement_for *st = to_stmt_for(statement);
+ const char *varname;
+ int i, rc = 0;
+
+ if (st->var->type == GRUB2_WORD_VAR)
+ expand_var(script, st->var);
+ varname = st->var->text;
+
+ process_expansions(script, st->list);
+
+ for (i = 0; i < st->list->argc; ++i) {
+ script_env_set(script, varname, st->list->argv[i]);
+ rc = statements_execute(script, st->body);
+ }
+
+ return rc;
+}
+