← Back to branch summary

~darkmuggle-deactivatedaccount/ubuntu/quantal/grub2/fix-872244

« back to all changes in this revision

Viewing changes to debian/grub-extras/lua/grub_main.c

  • Committer: Bazaar Package Importer
  • Author(s): Colin Watson, Colin Watson, Evan Broder, Mario Limonciello
  • Date: 2010-11-24 13:59:55 UTC
  • mfrom: (1.17.6 upstream) (17.6.15 experimental)
  • Revision ID: james.westby@ubuntu.com-20101124135955-r6ii5sepayr7jt53
Tags: 1.99~20101124-1ubuntu1
https://launchpad.net/bugs/677758
[ Colin Watson ]
* Resynchronise with Debian experimental.  Remaining changes:
  - Adjust for default Ubuntu boot options ("quiet splash").
  - Default to hiding the menu; holding down Shift at boot will show it.
  - Set a monochromatic theme for Ubuntu.
  - Apply Ubuntu GRUB Legacy changes to legacy update-grub script: title,
    recovery mode, quiet option, tweak how memtest86+ is displayed, and
    use UUIDs where appropriate.
  - Fix backslash-escaping in merge_debconf_into_conf.
  - Remove "GNU/Linux" from default distributor string.
  - Add crashkernel= options if kdump and makedumpfile are available.
  - If other operating systems are installed, then automatically unhide
    the menu.  Otherwise, if GRUB_HIDDEN_TIMEOUT is 0, then use keystatus
    if available to check whether Shift is pressed.  If it is, show the
    menu, otherwise boot immediately.  If keystatus is not available, then
    fall back to a short delay interruptible with Escape.
  - Allow Shift to interrupt 'sleep --interruptible'.
  - Don't display introductory message about line editing unless we're
    actually offering a shell prompt.  Don't clear the screen just before
    booting if we never drew the menu in the first place.
  - Remove some verbose messages printed before reading the configuration
    file.
  - Suppress progress messages as the kernel and initrd load for
    non-recovery kernel menu entries.
  - Change prepare_grub_to_access_device to handle filesystems
    loop-mounted on file images.
  - Ignore devices loop-mounted from files in 10_linux.
  - Show the boot menu if the previous boot failed, that is if it failed
    to get to the end of one of the normal runlevels.
  - Don't generate /boot/grub/device.map during grub-install or
    grub-mkconfig by default.
  - Adjust upgrade version checks for Ubuntu.
  - Don't display "GRUB loading" unless Shift is held down.
  - Adjust versions of grub-doc and grub-legacy-doc conflicts to tolerate
    our backport of the grub-doc split.
  - Fix LVM/RAID probing in the absence of /boot/grub/device.map.
  - Look for .mo files in /usr/share/locale-langpack as well, in
    preference.
  - Make sure GRUB_TIMEOUT isn't quoted unnecessarily.
  - Probe all devices in 'grub-probe --target=drive' if
    /boot/grub/device.map is missing.
  - Build-depend on qemu-kvm rather than qemu-system for grub-pc tests.
  - Use qemu rather than qemu-system-i386.
  - Program vesafb on BIOS systems rather than efifb.
  - Add a grub-rescue-efi-amd64 package containing a rescue CD-ROM image
    for EFI-AMD64.
  - On Wubi, don't ask for an install device, but just update wubildr
    using the diverted grub-install.
  - When embedding the core image in a post-MBR gap, check for and avoid
    sectors matching any of a list of known signatures.
  - Disable video_bochs and video_cirrus on PC BIOS systems, as probing
    PCI space seems to break on some systems.
* Downgrade "ACPI shutdown failed" error to a debug message, since it can
  cause spurious test failures.

[ Evan Broder ]
* Enable lua from grub-extras.
* Incorporate the bitop library into lua.
* Add enum_pci function to grub module in lua.
* Switch back to gfxpayload=keep by default, unless the video hardware
  is known to not support it.

[ Mario Limonciello ]
* Built part_msdos and vfat into bootx64.efi (LP: #677758)

Show diffs side-by-side

added added

removed removed

Lines of Context:
debian/grub-extras/lua/grub_main.c
 
1
/*
 
2
 *  GRUB  --  GRand Unified Bootloader
 
3
 *  Copyright (C) 2009  Free Software Foundation, Inc.
 
4
 *
 
5
 *  GRUB is free software: you can redistribute it and/or modify
 
6
 *  it under the terms of the GNU General Public License as published by
 
7
 *  the Free Software Foundation, either version 3 of the License, or
 
8
 *  (at your option) any later version.
 
9
 *
 
10
 *  GRUB is distributed in the hope that it will be useful,
 
11
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 
12
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
13
 *  GNU General Public License for more details.
 
14
 *
 
15
 *  You should have received a copy of the GNU General Public License
 
16
 *  along with GRUB.  If not, see <http://www.gnu.org/licenses/>.
 
17
 */
 
18
 
 
19
#include "lua.h"
 
20
#include "lauxlib.h"
 
21
#include "lualib.h"
 
22
#include "grub_lib.h"
 
23
 
 
24
#include <grub/dl.h>
 
25
#include <grub/command.h>
 
26
#include <grub/i18n.h>
 
27
#include <grub/misc.h>
 
28
#include <grub/normal.h>
 
29
 
 
30
static const char *
 
31
scan_str (const char *s1, const char *s2)
 
32
{
 
33
  while (*s1)
 
34
    {
 
35
      const char *p = s2;
 
36
 
 
37
      while (*p)
 
38
        {
 
39
          if (*s1 == *p)
 
40
            return s1;
 
41
          p++;
 
42
        }
 
43
 
 
44
      s1++;
 
45
    }
 
46
 
 
47
  return s1;
 
48
}
 
49
 
 
50
int
 
51
strcspn (const char *s1, const char *s2)
 
52
{
 
53
  const char *r;
 
54
 
 
55
  r = scan_str (s1, s2);
 
56
  return r - s1;
 
57
}
 
58
 
 
59
char *
 
60
strpbrk (const char *s1, const char *s2)
 
61
{
 
62
  const char *r;
 
63
 
 
64
  r = scan_str (s1, s2);
 
65
  return (*r) ? (char *) r : 0;
 
66
}
 
67
 
 
68
void *
 
69
memchr (const void *s, int c, size_t n)
 
70
{
 
71
  const unsigned char *p = s;
 
72
 
 
73
  while (n)
 
74
    {
 
75
      if (*p == c)
 
76
        return (void *) p;
 
77
 
 
78
      n--;
 
79
      p++;
 
80
    }
 
81
 
 
82
  return 0;
 
83
}
 
84
 
 
85
static lua_State *state;
 
86
 
 
87
/* Call `grub_error' to report a Lua error.  The error message string must be
 
88
   on the top of the Lua stack (at index -1).  The error message is popped off
 
89
   the Lua stack before this function returns.  */
 
90
static void
 
91
handle_lua_error (const char *error_type)
 
92
{
 
93
  const char *error_msg;
 
94
  error_msg = lua_tostring (state, -1);
 
95
  if (error_msg == NULL)
 
96
    error_msg = "(error message not a string)";
 
97
  grub_error (GRUB_ERR_BAD_ARGUMENT, "%s: %s", error_type, error_msg);
 
98
  /* Pop the error message.  */
 
99
  lua_pop (state, 1);
 
100
}
 
101
 
 
102
/* Taken from lua.c */
 
103
static int
 
104
incomplete (lua_State * L, int status)
 
105
{
 
106
  if (status == LUA_ERRSYNTAX)
 
107
    {
 
108
      size_t lmsg;
 
109
      const char *msg = lua_tolstring (L, -1, &lmsg);
 
110
      const char *tp = msg + lmsg - (sizeof (LUA_QL ("<eof>")) - 1);
 
111
      if (strstr (msg, LUA_QL ("<eof>")) == tp)
 
112
        {
 
113
          lua_pop (L, 1);
 
114
          return 1;
 
115
        }
 
116
    }
 
117
  return 0;                     /* else... */
 
118
}
 
119
 
 
120
static grub_err_t
 
121
interactive (void)
 
122
{
 
123
  char *ps1 = "lua> ";
 
124
  char *ps2 = "lua>> ";
 
125
  char *prompt = ps1;
 
126
  char *line;
 
127
  char *chunk = NULL;
 
128
  size_t len;
 
129
  size_t oldlen = 0;
 
130
  int r;
 
131
 
 
132
  grub_printf ("%s", N_ ("Welcome to lua, press the escape key to exit."));
 
133
 
 
134
  while ((line = grub_cmdline_get (prompt)) != NULL)
 
135
    {
 
136
      /* len = lenght of chunk + line + newline character */
 
137
      len = oldlen + grub_strlen (line) + 1;
 
138
      chunk = grub_realloc (chunk, len + 1);
 
139
      grub_strcpy (chunk + oldlen , line);
 
140
      chunk[len - 1] = '\n';
 
141
      chunk[len] = '\0';
 
142
      grub_free (line);
 
143
 
 
144
      r = luaL_loadbuffer (state, chunk, len, "stdin");
 
145
      if (!r)
 
146
        {
 
147
          /* No error: Execute this chunk and prepare to read another */
 
148
          r = lua_pcall (state, 0, 0, 0);
 
149
          if (r)
 
150
            {
 
151
              handle_lua_error ("Lua");
 
152
              grub_print_error ();
 
153
            }
 
154
 
 
155
          grub_free (chunk);
 
156
          chunk = NULL;
 
157
          len = 0;
 
158
          prompt = ps1;
 
159
        }
 
160
      else if (incomplete (state, r))
 
161
        {
 
162
          /* Chunk is incomplete, try reading another line */
 
163
          prompt = ps2;
 
164
        }
 
165
      else if (r == LUA_ERRSYNTAX)
 
166
        {
 
167
          handle_lua_error ("Lua");
 
168
          grub_print_error ();
 
169
 
 
170
          /* This chunk is garbage, try starting another one */
 
171
          grub_free (chunk);
 
172
          chunk = NULL;
 
173
          len = 0;
 
174
          prompt = ps1;
 
175
        }
 
176
      else
 
177
        {
 
178
          /* Handle errors other than syntax errors (out of memory, etc.) */
 
179
          grub_free (chunk);
 
180
          handle_lua_error ("Lua parser failed");
 
181
          return grub_errno;
 
182
        }
 
183
 
 
184
      oldlen = len;
 
185
    }
 
186
 
 
187
  grub_free (chunk);
 
188
  lua_gc (state, LUA_GCCOLLECT, 0);
 
189
 
 
190
  return grub_errno;
 
191
}
 
192
 
 
193
static grub_err_t
 
194
grub_cmd_lua (grub_command_t cmd __attribute__ ((unused)),
 
195
              int argc, char **args)
 
196
{
 
197
  if (argc == 1)
 
198
    {
 
199
      if (luaL_loadfile (state, args[0]))
 
200
        {
 
201
          handle_lua_error ("Lua");
 
202
        }
 
203
      else if (lua_pcall (state, 0, 0, 0))
 
204
        {
 
205
          handle_lua_error ("Lua");
 
206
        }
 
207
    }
 
208
  else if (argc == 0)
 
209
    {
 
210
      return interactive ();
 
211
    }
 
212
  else
 
213
    {
 
214
      return grub_error (GRUB_ERR_BAD_ARGUMENT, "1 or 0 arguments expected");
 
215
    }
 
216
 
 
217
  return grub_errno;
 
218
}
 
219
 
 
220
static grub_command_t cmd;
 
221
 
 
222
GRUB_MOD_INIT (lua)
 
223
{
 
224
  (void) mod;
 
225
 
 
226
  state = lua_open ();
 
227
  if (state)
 
228
    {
 
229
      lua_gc (state, LUA_GCSTOP, 0);
 
230
      luaL_openlibs (state);
 
231
      luaL_register (state, "grub", grub_lua_lib);
 
232
      lua_gc (state, LUA_GCRESTART, 0);
 
233
      cmd = grub_register_command ("lua", grub_cmd_lua, N_("[FILE]"),
 
234
                                   N_ ("Run lua script FILE or start interactive lua shell"));
 
235
    }
 
236
}
 
237
 
 
238
GRUB_MOD_FINI (lua)
 
239
{
 
240
  if (state)
 
241
    {
 
242
      lua_close (state);
 
243
      grub_unregister_command (cmd);
 
244
    }
 
245
}