]> git.ipfire.org Git - thirdparty/systemd.git/blame - src/boot/efi/boot.c
boot: efi - remove a couple of Loader* variables
[thirdparty/systemd.git] / src / boot / efi / boot.c
CommitLineData
0fa2cac4
KS
1/*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
2
3/*
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU Lesser General Public License as published by
6 * the Free Software Foundation; either version 2.1 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * Copyright (C) 2012-2015 Kay Sievers <kay@vrfy.org>
15 * Copyright (C) 2012-2015 Harald Hoyer <harald@redhat.com>
16 */
17
18#include <efi.h>
19#include <efilib.h>
20
21#include "util.h"
22#include "console.h"
23#include "graphics.h"
24#include "pefile.h"
25#include "linux.h"
26
27#ifndef EFI_OS_INDICATIONS_BOOT_TO_FW_UI
28#define EFI_OS_INDICATIONS_BOOT_TO_FW_UI 0x0000000000000001ULL
29#endif
30
31/* magic string to find in the binary image */
e7dd673d 32static const char __attribute__((used)) magic[] = "#### LoaderInfo: systemd-boot " VERSION " ####";
0fa2cac4
KS
33
34static const EFI_GUID global_guid = EFI_GLOBAL_VARIABLE;
35
36enum loader_type {
37 LOADER_UNDEFINED,
38 LOADER_EFI,
39 LOADER_LINUX
40};
41
42typedef struct {
43 CHAR16 *file;
44 CHAR16 *title_show;
45 CHAR16 *title;
46 CHAR16 *version;
47 CHAR16 *machine_id;
48 EFI_HANDLE *device;
49 enum loader_type type;
50 CHAR16 *loader;
51 CHAR16 *options;
0fa2cac4
KS
52 CHAR16 key;
53 EFI_STATUS (*call)(VOID);
54 BOOLEAN no_autoselect;
55 BOOLEAN non_unique;
56} ConfigEntry;
57
58typedef struct {
59 ConfigEntry **entries;
60 UINTN entry_count;
61 INTN idx_default;
62 INTN idx_default_efivar;
63 UINTN timeout_sec;
64 UINTN timeout_sec_config;
65 INTN timeout_sec_efivar;
66 CHAR16 *entry_default_pattern;
0fa2cac4
KS
67 CHAR16 *entry_oneshot;
68 CHAR16 *options_edit;
0fa2cac4
KS
69} Config;
70
71static VOID cursor_left(UINTN *cursor, UINTN *first)
72{
73 if ((*cursor) > 0)
74 (*cursor)--;
75 else if ((*first) > 0)
76 (*first)--;
77}
78
79static VOID cursor_right(UINTN *cursor, UINTN *first, UINTN x_max, UINTN len)
80{
81 if ((*cursor)+1 < x_max)
82 (*cursor)++;
83 else if ((*first) + (*cursor) < len)
84 (*first)++;
85}
86
87static BOOLEAN line_edit(CHAR16 *line_in, CHAR16 **line_out, UINTN x_max, UINTN y_pos) {
88 CHAR16 *line;
89 UINTN size;
90 UINTN len;
91 UINTN first;
92 CHAR16 *print;
93 UINTN cursor;
94 UINTN clear;
95 BOOLEAN exit;
96 BOOLEAN enter;
97
98 if (!line_in)
99 line_in = L"";
100 size = StrLen(line_in) + 1024;
101 line = AllocatePool(size * sizeof(CHAR16));
102 StrCpy(line, line_in);
103 len = StrLen(line);
104 print = AllocatePool((x_max+1) * sizeof(CHAR16));
105
106 uefi_call_wrapper(ST->ConOut->EnableCursor, 2, ST->ConOut, TRUE);
107
108 first = 0;
109 cursor = 0;
110 clear = 0;
111 enter = FALSE;
112 exit = FALSE;
113 while (!exit) {
114 EFI_STATUS err;
115 UINT64 key;
116 UINTN i;
117
118 i = len - first;
119 if (i >= x_max-1)
120 i = x_max-1;
121 CopyMem(print, line + first, i * sizeof(CHAR16));
122 while (clear > 0 && i < x_max-1) {
123 clear--;
124 print[i++] = ' ';
125 }
126 print[i] = '\0';
127
128 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_pos);
129 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, print);
130 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
131
132 err = console_key_read(&key, TRUE);
133 if (EFI_ERROR(err))
134 continue;
135
136 switch (key) {
137 case KEYPRESS(0, SCAN_ESC, 0):
138 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'c'):
139 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'g'):
140 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('c')):
141 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('g')):
142 exit = TRUE;
143 break;
144
145 case KEYPRESS(0, SCAN_HOME, 0):
146 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'a'):
147 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('a')):
148 /* beginning-of-line */
149 cursor = 0;
150 first = 0;
151 continue;
152
153 case KEYPRESS(0, SCAN_END, 0):
154 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'e'):
155 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('e')):
156 /* end-of-line */
157 cursor = len - first;
158 if (cursor+1 >= x_max) {
159 cursor = x_max-1;
160 first = len - (x_max-1);
161 }
162 continue;
163
164 case KEYPRESS(0, SCAN_DOWN, 0):
165 case KEYPRESS(EFI_ALT_PRESSED, 0, 'f'):
166 case KEYPRESS(EFI_CONTROL_PRESSED, SCAN_RIGHT, 0):
167 /* forward-word */
168 while (line[first + cursor] && line[first + cursor] == ' ')
169 cursor_right(&cursor, &first, x_max, len);
170 while (line[first + cursor] && line[first + cursor] != ' ')
171 cursor_right(&cursor, &first, x_max, len);
172 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
173 continue;
174
175 case KEYPRESS(0, SCAN_UP, 0):
176 case KEYPRESS(EFI_ALT_PRESSED, 0, 'b'):
177 case KEYPRESS(EFI_CONTROL_PRESSED, SCAN_LEFT, 0):
178 /* backward-word */
179 if ((first + cursor) > 0 && line[first + cursor-1] == ' ') {
180 cursor_left(&cursor, &first);
181 while ((first + cursor) > 0 && line[first + cursor] == ' ')
182 cursor_left(&cursor, &first);
183 }
184 while ((first + cursor) > 0 && line[first + cursor-1] != ' ')
185 cursor_left(&cursor, &first);
186 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
187 continue;
188
189 case KEYPRESS(0, SCAN_RIGHT, 0):
190 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'f'):
191 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('f')):
192 /* forward-char */
193 if (first + cursor == len)
194 continue;
195 cursor_right(&cursor, &first, x_max, len);
196 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
197 continue;
198
199 case KEYPRESS(0, SCAN_LEFT, 0):
200 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'b'):
201 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('b')):
202 /* backward-char */
203 cursor_left(&cursor, &first);
204 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
205 continue;
206
207 case KEYPRESS(EFI_ALT_PRESSED, 0, 'd'):
208 /* kill-word */
209 clear = 0;
210 for (i = first + cursor; i < len && line[i] == ' '; i++)
211 clear++;
212 for (; i < len && line[i] != ' '; i++)
213 clear++;
214
215 for (i = first + cursor; i + clear < len; i++)
216 line[i] = line[i + clear];
217 len -= clear;
218 line[len] = '\0';
219 continue;
220
221 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'w'):
222 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('w')):
223 case KEYPRESS(EFI_ALT_PRESSED, 0, CHAR_BACKSPACE):
224 /* backward-kill-word */
225 clear = 0;
226 if ((first + cursor) > 0 && line[first + cursor-1] == ' ') {
227 cursor_left(&cursor, &first);
228 clear++;
229 while ((first + cursor) > 0 && line[first + cursor] == ' ') {
230 cursor_left(&cursor, &first);
231 clear++;
232 }
233 }
234 while ((first + cursor) > 0 && line[first + cursor-1] != ' ') {
235 cursor_left(&cursor, &first);
236 clear++;
237 }
238 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, cursor, y_pos);
239
240 for (i = first + cursor; i + clear < len; i++)
241 line[i] = line[i + clear];
242 len -= clear;
243 line[len] = '\0';
244 continue;
245
246 case KEYPRESS(0, SCAN_DELETE, 0):
247 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'd'):
248 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('d')):
249 if (len == 0)
250 continue;
251 if (first + cursor == len)
252 continue;
253 for (i = first + cursor; i < len; i++)
254 line[i] = line[i+1];
255 clear = 1;
256 len--;
257 continue;
258
259 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'k'):
260 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('k')):
261 /* kill-line */
262 line[first + cursor] = '\0';
263 clear = len - (first + cursor);
264 len = first + cursor;
265 continue;
266
267 case KEYPRESS(0, 0, CHAR_LINEFEED):
268 case KEYPRESS(0, 0, CHAR_CARRIAGE_RETURN):
269 if (StrCmp(line, line_in) != 0) {
270 *line_out = line;
271 line = NULL;
272 }
273 enter = TRUE;
274 exit = TRUE;
275 break;
276
277 case KEYPRESS(0, 0, CHAR_BACKSPACE):
278 if (len == 0)
279 continue;
280 if (first == 0 && cursor == 0)
281 continue;
282 for (i = first + cursor-1; i < len; i++)
283 line[i] = line[i+1];
284 clear = 1;
285 len--;
286 if (cursor > 0)
287 cursor--;
288 if (cursor > 0 || first == 0)
289 continue;
290 /* show full line if it fits */
291 if (len < x_max) {
292 cursor = first;
293 first = 0;
294 continue;
295 }
296 /* jump left to see what we delete */
297 if (first > 10) {
298 first -= 10;
299 cursor = 10;
300 } else {
301 cursor = first;
302 first = 0;
303 }
304 continue;
305
306 case KEYPRESS(0, 0, ' ') ... KEYPRESS(0, 0, '~'):
307 case KEYPRESS(0, 0, 0x80) ... KEYPRESS(0, 0, 0xffff):
308 if (len+1 == size)
309 continue;
310 for (i = len; i > first + cursor; i--)
311 line[i] = line[i-1];
312 line[first + cursor] = KEYCHAR(key);
313 len++;
314 line[len] = '\0';
315 if (cursor+1 < x_max)
316 cursor++;
317 else if (first + cursor < len)
318 first++;
319 continue;
320 }
321 }
322
323 uefi_call_wrapper(ST->ConOut->EnableCursor, 2, ST->ConOut, FALSE);
324 FreePool(print);
325 FreePool(line);
326 return enter;
327}
328
329static UINTN entry_lookup_key(Config *config, UINTN start, CHAR16 key) {
330 UINTN i;
331
332 if (key == 0)
333 return -1;
334
335 /* select entry by number key */
336 if (key >= '1' && key <= '9') {
337 i = key - '0';
338 if (i > config->entry_count)
339 i = config->entry_count;
340 return i-1;
341 }
342
343 /* find matching key in config entries */
344 for (i = start; i < config->entry_count; i++)
345 if (config->entries[i]->key == key)
346 return i;
347
348 for (i = 0; i < start; i++)
349 if (config->entries[i]->key == key)
350 return i;
351
352 return -1;
353}
354
7361099e 355static VOID print_status(Config *config, CHAR16 *loaded_image_path) {
0fa2cac4
KS
356 UINT64 key;
357 UINTN i;
358 CHAR16 *s;
359 CHAR8 *b;
360 UINTN x;
361 UINTN y;
362 UINTN size;
0fa2cac4
KS
363
364 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
365 uefi_call_wrapper(ST->ConOut->ClearScreen, 1, ST->ConOut);
366
04155c67 367 Print(L"systemd-boot version: " VERSION "\n");
0fa2cac4
KS
368 Print(L"architecture: " EFI_MACHINE_TYPE_NAME "\n");
369 Print(L"loaded image: %s\n", loaded_image_path);
370 Print(L"UEFI specification: %d.%02d\n", ST->Hdr.Revision >> 16, ST->Hdr.Revision & 0xffff);
371 Print(L"firmware vendor: %s\n", ST->FirmwareVendor);
372 Print(L"firmware version: %d.%02d\n", ST->FirmwareRevision >> 16, ST->FirmwareRevision & 0xffff);
373
374 if (uefi_call_wrapper(ST->ConOut->QueryMode, 4, ST->ConOut, ST->ConOut->Mode->Mode, &x, &y) == EFI_SUCCESS)
375 Print(L"console size: %d x %d\n", x, y);
376
377 if (efivar_get_raw(&global_guid, L"SecureBoot", &b, &size) == EFI_SUCCESS) {
378 Print(L"SecureBoot: %s\n", *b > 0 ? L"enabled" : L"disabled");
379 FreePool(b);
380 }
381
382 if (efivar_get_raw(&global_guid, L"SetupMode", &b, &size) == EFI_SUCCESS) {
383 Print(L"SetupMode: %s\n", *b > 0 ? L"setup" : L"user");
384 FreePool(b);
385 }
386
387 if (efivar_get_raw(&global_guid, L"OsIndicationsSupported", &b, &size) == EFI_SUCCESS) {
388 Print(L"OsIndicationsSupported: %d\n", (UINT64)*b);
389 FreePool(b);
390 }
391 Print(L"\n");
392
393 Print(L"timeout: %d\n", config->timeout_sec);
394 if (config->timeout_sec_efivar >= 0)
395 Print(L"timeout (EFI var): %d\n", config->timeout_sec_efivar);
396 Print(L"timeout (config): %d\n", config->timeout_sec_config);
397 if (config->entry_default_pattern)
398 Print(L"default pattern: '%s'\n", config->entry_default_pattern);
0fa2cac4
KS
399 Print(L"\n");
400
401 Print(L"config entry count: %d\n", config->entry_count);
402 Print(L"entry selected idx: %d\n", config->idx_default);
403 if (config->idx_default_efivar >= 0)
404 Print(L"entry EFI var idx: %d\n", config->idx_default_efivar);
405 Print(L"\n");
406
407 if (efivar_get_int(L"LoaderConfigTimeout", &i) == EFI_SUCCESS)
408 Print(L"LoaderConfigTimeout: %d\n", i);
409 if (config->entry_oneshot)
410 Print(L"LoaderEntryOneShot: %s\n", config->entry_oneshot);
0fa2cac4
KS
411 if (efivar_get(L"LoaderDevicePartUUID", &s) == EFI_SUCCESS) {
412 Print(L"LoaderDevicePartUUID: %s\n", s);
413 FreePool(s);
414 }
415 if (efivar_get(L"LoaderEntryDefault", &s) == EFI_SUCCESS) {
416 Print(L"LoaderEntryDefault: %s\n", s);
417 FreePool(s);
418 }
419
420 Print(L"\n--- press key ---\n\n");
421 console_key_read(&key, TRUE);
422
423 for (i = 0; i < config->entry_count; i++) {
424 ConfigEntry *entry;
425
426 if (key == KEYPRESS(0, SCAN_ESC, 0) || key == KEYPRESS(0, 0, 'q'))
427 break;
428
429 entry = config->entries[i];
0fa2cac4
KS
430 Print(L"config entry: %d/%d\n", i+1, config->entry_count);
431 if (entry->file)
432 Print(L"file '%s'\n", entry->file);
433 Print(L"title show '%s'\n", entry->title_show);
434 if (entry->title)
435 Print(L"title '%s'\n", entry->title);
436 if (entry->version)
437 Print(L"version '%s'\n", entry->version);
438 if (entry->machine_id)
439 Print(L"machine-id '%s'\n", entry->machine_id);
440 if (entry->device) {
441 EFI_DEVICE_PATH *device_path;
442 CHAR16 *str;
443
444 device_path = DevicePathFromHandle(entry->device);
445 if (device_path) {
446 str = DevicePathToStr(device_path);
447 Print(L"device handle '%s'\n", str);
448 FreePool(str);
449 }
450 }
451 if (entry->loader)
452 Print(L"loader '%s'\n", entry->loader);
453 if (entry->options)
454 Print(L"options '%s'\n", entry->options);
0fa2cac4
KS
455 Print(L"auto-select %s\n", entry->no_autoselect ? L"no" : L"yes");
456 if (entry->call)
457 Print(L"internal call yes\n");
458
459 Print(L"\n--- press key ---\n\n");
460 console_key_read(&key, TRUE);
461 }
462
463 uefi_call_wrapper(ST->ConOut->ClearScreen, 1, ST->ConOut);
464}
465
7361099e 466static BOOLEAN menu_run(Config *config, ConfigEntry **chosen_entry, CHAR16 *loaded_image_path) {
0fa2cac4
KS
467 EFI_STATUS err;
468 UINTN visible_max;
469 UINTN idx_highlight;
470 UINTN idx_highlight_prev;
471 UINTN idx_first;
472 UINTN idx_last;
473 BOOLEAN refresh;
474 BOOLEAN highlight;
475 UINTN i;
476 UINTN line_width;
477 CHAR16 **lines;
478 UINTN x_start;
479 UINTN y_start;
480 UINTN x_max;
481 UINTN y_max;
482 CHAR16 *status;
483 CHAR16 *clearline;
484 INTN timeout_remain;
485 INT16 idx;
486 BOOLEAN exit = FALSE;
487 BOOLEAN run = TRUE;
488 BOOLEAN wait = FALSE;
489
490 graphics_mode(FALSE);
491 uefi_call_wrapper(ST->ConIn->Reset, 2, ST->ConIn, FALSE);
492 uefi_call_wrapper(ST->ConOut->EnableCursor, 2, ST->ConOut, FALSE);
493 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
494
495 /* draw a single character to make ClearScreen work on some firmware */
496 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, L" ");
497 uefi_call_wrapper(ST->ConOut->ClearScreen, 1, ST->ConOut);
498
499 err = uefi_call_wrapper(ST->ConOut->QueryMode, 4, ST->ConOut, ST->ConOut->Mode->Mode, &x_max, &y_max);
500 if (EFI_ERROR(err)) {
501 x_max = 80;
502 y_max = 25;
503 }
504
505 /* we check 10 times per second for a keystroke */
506 if (config->timeout_sec > 0)
507 timeout_remain = config->timeout_sec * 10;
508 else
509 timeout_remain = -1;
510
511 idx_highlight = config->idx_default;
512 idx_highlight_prev = 0;
513
514 visible_max = y_max - 2;
515
516 if ((UINTN)config->idx_default >= visible_max)
517 idx_first = config->idx_default-1;
518 else
519 idx_first = 0;
520
521 idx_last = idx_first + visible_max-1;
522
523 refresh = TRUE;
524 highlight = FALSE;
525
526 /* length of the longest entry */
527 line_width = 5;
528 for (i = 0; i < config->entry_count; i++) {
529 UINTN entry_len;
530
531 entry_len = StrLen(config->entries[i]->title_show);
532 if (line_width < entry_len)
533 line_width = entry_len;
534 }
535 if (line_width > x_max-6)
536 line_width = x_max-6;
537
538 /* offsets to center the entries on the screen */
539 x_start = (x_max - (line_width)) / 2;
540 if (config->entry_count < visible_max)
541 y_start = ((visible_max - config->entry_count) / 2) + 1;
542 else
543 y_start = 0;
544
545 /* menu entries title lines */
546 lines = AllocatePool(sizeof(CHAR16 *) * config->entry_count);
547 for (i = 0; i < config->entry_count; i++) {
548 UINTN j, k;
549
550 lines[i] = AllocatePool(((x_max+1) * sizeof(CHAR16)));
551 for (j = 0; j < x_start; j++)
552 lines[i][j] = ' ';
553
554 for (k = 0; config->entries[i]->title_show[k] != '\0' && j < x_max; j++, k++)
555 lines[i][j] = config->entries[i]->title_show[k];
556
557 for (; j < x_max; j++)
558 lines[i][j] = ' ';
559 lines[i][x_max] = '\0';
560 }
561
562 status = NULL;
563 clearline = AllocatePool((x_max+1) * sizeof(CHAR16));
564 for (i = 0; i < x_max; i++)
565 clearline[i] = ' ';
566 clearline[i] = 0;
567
568 while (!exit) {
569 UINT64 key;
570
571 if (refresh) {
572 for (i = 0; i < config->entry_count; i++) {
573 if (i < idx_first || i > idx_last)
574 continue;
575 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_start + i - idx_first);
576 if (i == idx_highlight)
577 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut,
578 EFI_BLACK|EFI_BACKGROUND_LIGHTGRAY);
579 else
580 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut,
581 EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
582 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, lines[i]);
583 if ((INTN)i == config->idx_default_efivar) {
584 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, x_start-3, y_start + i - idx_first);
585 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, L"=>");
586 }
587 }
588 refresh = FALSE;
589 } else if (highlight) {
590 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_start + idx_highlight_prev - idx_first);
591 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
592 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, lines[idx_highlight_prev]);
593 if ((INTN)idx_highlight_prev == config->idx_default_efivar) {
594 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, x_start-3, y_start + idx_highlight_prev - idx_first);
595 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, L"=>");
596 }
597
598 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_start + idx_highlight - idx_first);
599 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_BLACK|EFI_BACKGROUND_LIGHTGRAY);
600 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, lines[idx_highlight]);
601 if ((INTN)idx_highlight == config->idx_default_efivar) {
602 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, x_start-3, y_start + idx_highlight - idx_first);
603 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, L"=>");
604 }
605 highlight = FALSE;
606 }
607
608 if (timeout_remain > 0) {
609 FreePool(status);
610 status = PoolPrint(L"Boot in %d sec.", (timeout_remain + 5) / 10);
611 }
612
613 /* print status at last line of screen */
614 if (status) {
615 UINTN len;
616 UINTN x;
617
618 /* center line */
619 len = StrLen(status);
620 if (len < x_max)
621 x = (x_max - len) / 2;
622 else
623 x = 0;
624 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
625 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_max-1);
626 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, clearline + (x_max - x));
627 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, status);
628 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, clearline+1 + x + len);
629 }
630
631 err = console_key_read(&key, wait);
632 if (EFI_ERROR(err)) {
633 /* timeout reached */
634 if (timeout_remain == 0) {
635 exit = TRUE;
636 break;
637 }
638
639 /* sleep and update status */
640 if (timeout_remain > 0) {
641 uefi_call_wrapper(BS->Stall, 1, 100 * 1000);
642 timeout_remain--;
643 continue;
644 }
645
646 /* timeout disabled, wait for next key */
647 wait = TRUE;
648 continue;
649 }
650
651 timeout_remain = -1;
652
653 /* clear status after keystroke */
654 if (status) {
655 FreePool(status);
656 status = NULL;
657 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
658 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_max-1);
659 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, clearline+1);
660 }
661
662 idx_highlight_prev = idx_highlight;
663
664 switch (key) {
665 case KEYPRESS(0, SCAN_UP, 0):
666 case KEYPRESS(0, 0, 'k'):
667 if (idx_highlight > 0)
668 idx_highlight--;
669 break;
670
671 case KEYPRESS(0, SCAN_DOWN, 0):
672 case KEYPRESS(0, 0, 'j'):
673 if (idx_highlight < config->entry_count-1)
674 idx_highlight++;
675 break;
676
677 case KEYPRESS(0, SCAN_HOME, 0):
678 case KEYPRESS(EFI_ALT_PRESSED, 0, '<'):
679 if (idx_highlight > 0) {
680 refresh = TRUE;
681 idx_highlight = 0;
682 }
683 break;
684
685 case KEYPRESS(0, SCAN_END, 0):
686 case KEYPRESS(EFI_ALT_PRESSED, 0, '>'):
687 if (idx_highlight < config->entry_count-1) {
688 refresh = TRUE;
689 idx_highlight = config->entry_count-1;
690 }
691 break;
692
693 case KEYPRESS(0, SCAN_PAGE_UP, 0):
694 if (idx_highlight > visible_max)
695 idx_highlight -= visible_max;
696 else
697 idx_highlight = 0;
698 break;
699
700 case KEYPRESS(0, SCAN_PAGE_DOWN, 0):
701 idx_highlight += visible_max;
702 if (idx_highlight > config->entry_count-1)
703 idx_highlight = config->entry_count-1;
704 break;
705
706 case KEYPRESS(0, 0, CHAR_LINEFEED):
707 case KEYPRESS(0, 0, CHAR_CARRIAGE_RETURN):
708 exit = TRUE;
709 break;
710
711 case KEYPRESS(0, SCAN_F1, 0):
712 case KEYPRESS(0, 0, 'h'):
713 case KEYPRESS(0, 0, '?'):
714 status = StrDuplicate(L"(d)efault, (t/T)timeout, (e)dit, (v)ersion (Q)uit (P)rint (h)elp");
715 break;
716
717 case KEYPRESS(0, 0, 'Q'):
718 exit = TRUE;
719 run = FALSE;
720 break;
721
722 case KEYPRESS(0, 0, 'd'):
723 if (config->idx_default_efivar != (INTN)idx_highlight) {
724 /* store the selected entry in a persistent EFI variable */
725 efivar_set(L"LoaderEntryDefault", config->entries[idx_highlight]->file, TRUE);
726 config->idx_default_efivar = idx_highlight;
727 status = StrDuplicate(L"Default boot entry selected.");
728 } else {
729 /* clear the default entry EFI variable */
730 efivar_set(L"LoaderEntryDefault", NULL, TRUE);
731 config->idx_default_efivar = -1;
732 status = StrDuplicate(L"Default boot entry cleared.");
733 }
734 refresh = TRUE;
735 break;
736
737 case KEYPRESS(0, 0, '-'):
738 case KEYPRESS(0, 0, 'T'):
739 if (config->timeout_sec_efivar > 0) {
740 config->timeout_sec_efivar--;
741 efivar_set_int(L"LoaderConfigTimeout", config->timeout_sec_efivar, TRUE);
742 if (config->timeout_sec_efivar > 0)
743 status = PoolPrint(L"Menu timeout set to %d sec.", config->timeout_sec_efivar);
744 else
745 status = StrDuplicate(L"Menu disabled. Hold down key at bootup to show menu.");
746 } else if (config->timeout_sec_efivar <= 0){
747 config->timeout_sec_efivar = -1;
748 efivar_set(L"LoaderConfigTimeout", NULL, TRUE);
749 if (config->timeout_sec_config > 0)
750 status = PoolPrint(L"Menu timeout of %d sec is defined by configuration file.",
751 config->timeout_sec_config);
752 else
753 status = StrDuplicate(L"Menu disabled. Hold down key at bootup to show menu.");
754 }
755 break;
756
757 case KEYPRESS(0, 0, '+'):
758 case KEYPRESS(0, 0, 't'):
759 if (config->timeout_sec_efivar == -1 && config->timeout_sec_config == 0)
760 config->timeout_sec_efivar++;
761 config->timeout_sec_efivar++;
762 efivar_set_int(L"LoaderConfigTimeout", config->timeout_sec_efivar, TRUE);
763 if (config->timeout_sec_efivar > 0)
764 status = PoolPrint(L"Menu timeout set to %d sec.",
765 config->timeout_sec_efivar);
766 else
767 status = StrDuplicate(L"Menu disabled. Hold down key at bootup to show menu.");
768 break;
769
770 case KEYPRESS(0, 0, 'e'):
771 /* only the options of configured entries can be edited */
772 if (config->entries[idx_highlight]->type == LOADER_UNDEFINED)
773 break;
774 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_LIGHTGRAY|EFI_BACKGROUND_BLACK);
775 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_max-1);
776 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, clearline+1);
777 if (line_edit(config->entries[idx_highlight]->options, &config->options_edit, x_max-1, y_max-1))
778 exit = TRUE;
779 uefi_call_wrapper(ST->ConOut->SetCursorPosition, 3, ST->ConOut, 0, y_max-1);
780 uefi_call_wrapper(ST->ConOut->OutputString, 2, ST->ConOut, clearline+1);
781 break;
782
783 case KEYPRESS(0, 0, 'v'):
e7dd673d 784 status = PoolPrint(L"systemd-boot " VERSION " (" EFI_MACHINE_TYPE_NAME "), UEFI Specification %d.%02d, Vendor %s %d.%02d",
0fa2cac4
KS
785 ST->Hdr.Revision >> 16, ST->Hdr.Revision & 0xffff,
786 ST->FirmwareVendor, ST->FirmwareRevision >> 16, ST->FirmwareRevision & 0xffff);
787 break;
788
789 case KEYPRESS(0, 0, 'P'):
7361099e 790 print_status(config, loaded_image_path);
0fa2cac4
KS
791 refresh = TRUE;
792 break;
793
794 case KEYPRESS(EFI_CONTROL_PRESSED, 0, 'l'):
795 case KEYPRESS(EFI_CONTROL_PRESSED, 0, CHAR_CTRL('l')):
796 refresh = TRUE;
797 break;
798
799 default:
800 /* jump with a hotkey directly to a matching entry */
801 idx = entry_lookup_key(config, idx_highlight+1, KEYCHAR(key));
802 if (idx < 0)
803 break;
804 idx_highlight = idx;
805 refresh = TRUE;
806 }
807
808 if (idx_highlight > idx_last) {
809 idx_last = idx_highlight;
810 idx_first = 1 + idx_highlight - visible_max;
811 refresh = TRUE;
812 }
813 if (idx_highlight < idx_first) {
814 idx_first = idx_highlight;
815 idx_last = idx_highlight + visible_max-1;
816 refresh = TRUE;
817 }
818
819 idx_last = idx_first + visible_max-1;
820
821 if (!refresh && idx_highlight != idx_highlight_prev)
822 highlight = TRUE;
823 }
824
825 *chosen_entry = config->entries[idx_highlight];
826
827 for (i = 0; i < config->entry_count; i++)
828 FreePool(lines[i]);
829 FreePool(lines);
830 FreePool(clearline);
831
832 uefi_call_wrapper(ST->ConOut->SetAttribute, 2, ST->ConOut, EFI_WHITE|EFI_BACKGROUND_BLACK);
833 uefi_call_wrapper(ST->ConOut->ClearScreen, 1, ST->ConOut);
834 return run;
835}
836
837static VOID config_add_entry(Config *config, ConfigEntry *entry) {
838 if ((config->entry_count & 15) == 0) {
839 UINTN i;
840
841 i = config->entry_count + 16;
842 if (config->entry_count == 0)
843 config->entries = AllocatePool(sizeof(VOID *) * i);
844 else
845 config->entries = ReallocatePool(config->entries,
846 sizeof(VOID *) * config->entry_count, sizeof(VOID *) * i);
847 }
848 config->entries[config->entry_count++] = entry;
849}
850
851static VOID config_entry_free(ConfigEntry *entry) {
852 FreePool(entry->title_show);
853 FreePool(entry->title);
854 FreePool(entry->machine_id);
855 FreePool(entry->loader);
856 FreePool(entry->options);
857}
858
859static BOOLEAN is_digit(CHAR16 c)
860{
861 return (c >= '0') && (c <= '9');
862}
863
864static UINTN c_order(CHAR16 c)
865{
866 if (c == '\0')
867 return 0;
868 if (is_digit(c))
869 return 0;
870 else if ((c >= 'a') && (c <= 'z'))
871 return c;
872 else
873 return c + 0x10000;
874}
875
876static INTN str_verscmp(CHAR16 *s1, CHAR16 *s2)
877{
878 CHAR16 *os1 = s1;
879 CHAR16 *os2 = s2;
880
881 while (*s1 || *s2) {
882 INTN first;
883
884 while ((*s1 && !is_digit(*s1)) || (*s2 && !is_digit(*s2))) {
885 INTN order;
886
887 order = c_order(*s1) - c_order(*s2);
888 if (order)
889 return order;
890 s1++;
891 s2++;
892 }
893
894 while (*s1 == '0')
895 s1++;
896 while (*s2 == '0')
897 s2++;
898
899 first = 0;
900 while (is_digit(*s1) && is_digit(*s2)) {
901 if (first == 0)
902 first = *s1 - *s2;
903 s1++;
904 s2++;
905 }
906
907 if (is_digit(*s1))
908 return 1;
909 if (is_digit(*s2))
910 return -1;
911
912 if (first)
913 return first;
914 }
915
916 return StrCmp(os1, os2);
917}
918
919static CHAR8 *line_get_key_value(CHAR8 *content, CHAR8 *sep, UINTN *pos, CHAR8 **key_ret, CHAR8 **value_ret) {
920 CHAR8 *line;
921 UINTN linelen;
922 CHAR8 *value;
923
924skip:
925 line = content + *pos;
926 if (*line == '\0')
927 return NULL;
928
929 linelen = 0;
930 while (line[linelen] && !strchra((CHAR8 *)"\n\r", line[linelen]))
931 linelen++;
932
933 /* move pos to next line */
934 *pos += linelen;
935 if (content[*pos])
936 (*pos)++;
937
938 /* empty line */
939 if (linelen == 0)
940 goto skip;
941
942 /* terminate line */
943 line[linelen] = '\0';
944
945 /* remove leading whitespace */
946 while (strchra((CHAR8 *)" \t", *line)) {
947 line++;
948 linelen--;
949 }
950
951 /* remove trailing whitespace */
952 while (linelen > 0 && strchra(sep, line[linelen-1]))
953 linelen--;
954 line[linelen] = '\0';
955
956 if (*line == '#')
957 goto skip;
958
959 /* split key/value */
960 value = line;
961 while (*value && !strchra(sep, *value))
962 value++;
963 if (*value == '\0')
964 goto skip;
965 *value = '\0';
966 value++;
967 while (*value && strchra(sep, *value))
968 value++;
969
970 /* unquote */
971 if (value[0] == '\"' && line[linelen-1] == '\"') {
972 value++;
973 line[linelen-1] = '\0';
974 }
975
976 *key_ret = line;
977 *value_ret = value;
978 return line;
979}
980
981static VOID config_defaults_load_from_file(Config *config, CHAR8 *content) {
982 CHAR8 *line;
983 UINTN pos = 0;
984 CHAR8 *key, *value;
985
986 line = content;
987 while ((line = line_get_key_value(content, (CHAR8 *)" \t", &pos, &key, &value))) {
988 if (strcmpa((CHAR8 *)"timeout", key) == 0) {
989 CHAR16 *s;
990
991 s = stra_to_str(value);
992 config->timeout_sec_config = Atoi(s);
993 config->timeout_sec = config->timeout_sec_config;
994 FreePool(s);
995 continue;
996 }
997
998 if (strcmpa((CHAR8 *)"default", key) == 0) {
999 FreePool(config->entry_default_pattern);
1000 config->entry_default_pattern = stra_to_str(value);
1001 StrLwr(config->entry_default_pattern);
1002 continue;
1003 }
0fa2cac4
KS
1004 }
1005}
1006
1007static VOID config_entry_add_from_file(Config *config, EFI_HANDLE *device, CHAR16 *file, CHAR8 *content, CHAR16 *loaded_image_path) {
1008 ConfigEntry *entry;
1009 CHAR8 *line;
1010 UINTN pos = 0;
1011 CHAR8 *key, *value;
1012 UINTN len;
1013 CHAR16 *initrd = NULL;
1014
1015 entry = AllocateZeroPool(sizeof(ConfigEntry));
1016
1017 line = content;
1018 while ((line = line_get_key_value(content, (CHAR8 *)" \t", &pos, &key, &value))) {
1019 if (strcmpa((CHAR8 *)"title", key) == 0) {
1020 FreePool(entry->title);
1021 entry->title = stra_to_str(value);
1022 continue;
1023 }
1024
1025 if (strcmpa((CHAR8 *)"version", key) == 0) {
1026 FreePool(entry->version);
1027 entry->version = stra_to_str(value);
1028 continue;
1029 }
1030
1031 if (strcmpa((CHAR8 *)"machine-id", key) == 0) {
1032 FreePool(entry->machine_id);
1033 entry->machine_id = stra_to_str(value);
1034 continue;
1035 }
1036
1037 if (strcmpa((CHAR8 *)"linux", key) == 0) {
1038 FreePool(entry->loader);
1039 entry->type = LOADER_LINUX;
1040 entry->loader = stra_to_path(value);
1041 entry->key = 'l';
1042 continue;
1043 }
1044
1045 if (strcmpa((CHAR8 *)"efi", key) == 0) {
1046 entry->type = LOADER_EFI;
1047 FreePool(entry->loader);
1048 entry->loader = stra_to_path(value);
1049
1050 /* do not add an entry for ourselves */
1051 if (StriCmp(entry->loader, loaded_image_path) == 0) {
1052 entry->type = LOADER_UNDEFINED;
1053 break;
1054 }
1055 continue;
1056 }
1057
1058 if (strcmpa((CHAR8 *)"architecture", key) == 0) {
1059 /* do not add an entry for an EFI image of architecture not matching with that of the image */
1060 if (strcmpa((CHAR8 *)EFI_MACHINE_TYPE_NAME, value) != 0) {
1061 entry->type = LOADER_UNDEFINED;
1062 break;
1063 }
1064 continue;
1065 }
1066
1067 if (strcmpa((CHAR8 *)"initrd", key) == 0) {
1068 CHAR16 *new;
1069
1070 new = stra_to_path(value);
1071 if (initrd) {
1072 CHAR16 *s;
1073
1074 s = PoolPrint(L"%s initrd=%s", initrd, new);
1075 FreePool(initrd);
1076 initrd = s;
1077 } else
1078 initrd = PoolPrint(L"initrd=%s", new);
1079 FreePool(new);
1080 continue;
1081 }
1082
1083 if (strcmpa((CHAR8 *)"options", key) == 0) {
1084 CHAR16 *new;
1085
1086 new = stra_to_str(value);
1087 if (entry->options) {
1088 CHAR16 *s;
1089
1090 s = PoolPrint(L"%s %s", entry->options, new);
1091 FreePool(entry->options);
1092 entry->options = s;
1093 } else {
1094 entry->options = new;
1095 new = NULL;
1096 }
1097 FreePool(new);
1098 continue;
1099 }
0fa2cac4
KS
1100 }
1101
1102 if (entry->type == LOADER_UNDEFINED) {
1103 config_entry_free(entry);
1104 FreePool(initrd);
1105 FreePool(entry);
1106 return;
1107 }
1108
1109 /* add initrd= to options */
1110 if (entry->type == LOADER_LINUX && initrd) {
1111 if (entry->options) {
1112 CHAR16 *s;
1113
1114 s = PoolPrint(L"%s %s", initrd, entry->options);
1115 FreePool(entry->options);
1116 entry->options = s;
1117 } else {
1118 entry->options = initrd;
1119 initrd = NULL;
1120 }
1121 }
1122 FreePool(initrd);
1123
0fa2cac4
KS
1124 entry->device = device;
1125 entry->file = StrDuplicate(file);
1126 len = StrLen(entry->file);
1127 /* remove ".conf" */
1128 if (len > 5)
1129 entry->file[len - 5] = '\0';
1130 StrLwr(entry->file);
1131
1132 config_add_entry(config, entry);
1133}
1134
1135static VOID config_load(Config *config, EFI_HANDLE *device, EFI_FILE *root_dir, CHAR16 *loaded_image_path) {
1136 EFI_FILE_HANDLE entries_dir;
1137 EFI_STATUS err;
1138 CHAR8 *content = NULL;
1139 UINTN sec;
1140 UINTN len;
1141 UINTN i;
1142
1143 len = file_read(root_dir, L"\\loader\\loader.conf", 0, 0, &content);
1144 if (len > 0)
1145 config_defaults_load_from_file(config, content);
1146 FreePool(content);
1147
1148 err = efivar_get_int(L"LoaderConfigTimeout", &sec);
1149 if (!EFI_ERROR(err)) {
1150 config->timeout_sec_efivar = sec;
1151 config->timeout_sec = sec;
1152 } else
1153 config->timeout_sec_efivar = -1;
1154
1155 err = uefi_call_wrapper(root_dir->Open, 5, root_dir, &entries_dir, L"\\loader\\entries", EFI_FILE_MODE_READ, 0ULL);
1156 if (!EFI_ERROR(err)) {
1157 for (;;) {
1158 CHAR16 buf[256];
1159 UINTN bufsize;
1160 EFI_FILE_INFO *f;
1161 CHAR8 *content = NULL;
1162 UINTN len;
1163
1164 bufsize = sizeof(buf);
1165 err = uefi_call_wrapper(entries_dir->Read, 3, entries_dir, &bufsize, buf);
1166 if (bufsize == 0 || EFI_ERROR(err))
1167 break;
1168
1169 f = (EFI_FILE_INFO *) buf;
1170 if (f->FileName[0] == '.')
1171 continue;
1172 if (f->Attribute & EFI_FILE_DIRECTORY)
1173 continue;
1174 len = StrLen(f->FileName);
1175 if (len < 6)
1176 continue;
1177 if (StriCmp(f->FileName + len - 5, L".conf") != 0)
1178 continue;
1179
1180 len = file_read(entries_dir, f->FileName, 0, 0, &content);
1181 if (len > 0)
1182 config_entry_add_from_file(config, device, f->FileName, content, loaded_image_path);
1183 FreePool(content);
1184 }
1185 uefi_call_wrapper(entries_dir->Close, 1, entries_dir);
1186 }
1187
1188 /* sort entries after version number */
1189 for (i = 1; i < config->entry_count; i++) {
1190 BOOLEAN more;
1191 UINTN k;
1192
1193 more = FALSE;
1194 for (k = 0; k < config->entry_count - i; k++) {
1195 ConfigEntry *entry;
1196
1197 if (str_verscmp(config->entries[k]->file, config->entries[k+1]->file) <= 0)
1198 continue;
1199 entry = config->entries[k];
1200 config->entries[k] = config->entries[k+1];
1201 config->entries[k+1] = entry;
1202 more = TRUE;
1203 }
1204 if (!more)
1205 break;
1206 }
1207}
1208
1209static VOID config_default_entry_select(Config *config) {
1210 CHAR16 *var;
1211 EFI_STATUS err;
1212 UINTN i;
1213
1214 /*
1215 * The EFI variable to specify a boot entry for the next, and only the
1216 * next reboot. The variable is always cleared directly after it is read.
1217 */
1218 err = efivar_get(L"LoaderEntryOneShot", &var);
1219 if (!EFI_ERROR(err)) {
1220 BOOLEAN found = FALSE;
1221
1222 for (i = 0; i < config->entry_count; i++) {
1223 if (StrCmp(config->entries[i]->file, var) == 0) {
1224 config->idx_default = i;
1225 found = TRUE;
1226 break;
1227 }
1228 }
1229
1230 config->entry_oneshot = StrDuplicate(var);
1231 efivar_set(L"LoaderEntryOneShot", NULL, TRUE);
1232 FreePool(var);
1233 if (found)
1234 return;
1235 }
1236
1237 /*
1238 * The EFI variable to select the default boot entry overrides the
1239 * configured pattern. The variable can be set and cleared by pressing
1240 * the 'd' key in the loader selection menu, the entry is marked with
1241 * an '*'.
1242 */
1243 err = efivar_get(L"LoaderEntryDefault", &var);
1244 if (!EFI_ERROR(err)) {
1245 BOOLEAN found = FALSE;
1246
1247 for (i = 0; i < config->entry_count; i++) {
1248 if (StrCmp(config->entries[i]->file, var) == 0) {
1249 config->idx_default = i;
1250 config->idx_default_efivar = i;
1251 found = TRUE;
1252 break;
1253 }
1254 }
1255 FreePool(var);
1256 if (found)
1257 return;
1258 }
1259 config->idx_default_efivar = -1;
1260
1261 if (config->entry_count == 0)
1262 return;
1263
1264 /*
1265 * Match the pattern from the end of the list to the start, find last
1266 * entry (largest number) matching the given pattern.
1267 */
1268 if (config->entry_default_pattern) {
1269 i = config->entry_count;
1270 while (i--) {
1271 if (config->entries[i]->no_autoselect)
1272 continue;
1273 if (MetaiMatch(config->entries[i]->file, config->entry_default_pattern)) {
1274 config->idx_default = i;
1275 return;
1276 }
1277 }
1278 }
1279
1280 /* select the last suitable entry */
1281 i = config->entry_count;
1282 while (i--) {
1283 if (config->entries[i]->no_autoselect)
1284 continue;
1285 config->idx_default = i;
1286 return;
1287 }
1288
1289 /* no entry found */
1290 config->idx_default = -1;
1291}
1292
1293/* generate a unique title, avoiding non-distinguishable menu entries */
1294static VOID config_title_generate(Config *config) {
1295 UINTN i, k;
1296 BOOLEAN unique;
1297
1298 /* set title */
1299 for (i = 0; i < config->entry_count; i++) {
1300 CHAR16 *title;
1301
1302 FreePool(config->entries[i]->title_show);
1303 title = config->entries[i]->title;
1304 if (!title)
1305 title = config->entries[i]->file;
1306 config->entries[i]->title_show = StrDuplicate(title);
1307 }
1308
1309 unique = TRUE;
1310 for (i = 0; i < config->entry_count; i++) {
1311 for (k = 0; k < config->entry_count; k++) {
1312 if (i == k)
1313 continue;
1314 if (StrCmp(config->entries[i]->title_show, config->entries[k]->title_show) != 0)
1315 continue;
1316
1317 unique = FALSE;
1318 config->entries[i]->non_unique = TRUE;
1319 config->entries[k]->non_unique = TRUE;
1320 }
1321 }
1322 if (unique)
1323 return;
1324
1325 /* add version to non-unique titles */
1326 for (i = 0; i < config->entry_count; i++) {
1327 CHAR16 *s;
1328
1329 if (!config->entries[i]->non_unique)
1330 continue;
1331 if (!config->entries[i]->version)
1332 continue;
1333
1334 s = PoolPrint(L"%s (%s)", config->entries[i]->title_show, config->entries[i]->version);
1335 FreePool(config->entries[i]->title_show);
1336 config->entries[i]->title_show = s;
1337 config->entries[i]->non_unique = FALSE;
1338 }
1339
1340 unique = TRUE;
1341 for (i = 0; i < config->entry_count; i++) {
1342 for (k = 0; k < config->entry_count; k++) {
1343 if (i == k)
1344 continue;
1345 if (StrCmp(config->entries[i]->title_show, config->entries[k]->title_show) != 0)
1346 continue;
1347
1348 unique = FALSE;
1349 config->entries[i]->non_unique = TRUE;
1350 config->entries[k]->non_unique = TRUE;
1351 }
1352 }
1353 if (unique)
1354 return;
1355
1356 /* add machine-id to non-unique titles */
1357 for (i = 0; i < config->entry_count; i++) {
1358 CHAR16 *s;
1359 CHAR16 *m;
1360
1361 if (!config->entries[i]->non_unique)
1362 continue;
1363 if (!config->entries[i]->machine_id)
1364 continue;
1365
1366 m = StrDuplicate(config->entries[i]->machine_id);
1367 m[8] = '\0';
1368 s = PoolPrint(L"%s (%s)", config->entries[i]->title_show, m);
1369 FreePool(config->entries[i]->title_show);
1370 config->entries[i]->title_show = s;
1371 config->entries[i]->non_unique = FALSE;
1372 FreePool(m);
1373 }
1374
1375 unique = TRUE;
1376 for (i = 0; i < config->entry_count; i++) {
1377 for (k = 0; k < config->entry_count; k++) {
1378 if (i == k)
1379 continue;
1380 if (StrCmp(config->entries[i]->title_show, config->entries[k]->title_show) != 0)
1381 continue;
1382
1383 unique = FALSE;
1384 config->entries[i]->non_unique = TRUE;
1385 config->entries[k]->non_unique = TRUE;
1386 }
1387 }
1388 if (unique)
1389 return;
1390
1391 /* add file name to non-unique titles */
1392 for (i = 0; i < config->entry_count; i++) {
1393 CHAR16 *s;
1394
1395 if (!config->entries[i]->non_unique)
1396 continue;
1397 s = PoolPrint(L"%s (%s)", config->entries[i]->title_show, config->entries[i]->file);
1398 FreePool(config->entries[i]->title_show);
1399 config->entries[i]->title_show = s;
1400 config->entries[i]->non_unique = FALSE;
1401 }
1402}
1403
1404static BOOLEAN config_entry_add_call(Config *config, CHAR16 *title, EFI_STATUS (*call)(VOID)) {
1405 ConfigEntry *entry;
1406
1407 entry = AllocateZeroPool(sizeof(ConfigEntry));
1408 entry->title = StrDuplicate(title);
1409 entry->call = call;
1410 entry->no_autoselect = TRUE;
1411 config_add_entry(config, entry);
1412 return TRUE;
1413}
1414
1415static ConfigEntry *config_entry_add_loader(Config *config, EFI_HANDLE *device,
1416 enum loader_type type,CHAR16 *file, CHAR16 key, CHAR16 *title, CHAR16 *loader) {
1417 ConfigEntry *entry;
1418
1419 entry = AllocateZeroPool(sizeof(ConfigEntry));
1420 entry->type = type;
1421 entry->title = StrDuplicate(title);
1422 entry->device = device;
1423 entry->loader = StrDuplicate(loader);
1424 entry->file = StrDuplicate(file);
1425 StrLwr(entry->file);
1426 entry->key = key;
1427 config_add_entry(config, entry);
1428
1429 return entry;
1430}
1431
1432static BOOLEAN config_entry_add_loader_auto(Config *config, EFI_HANDLE *device, EFI_FILE *root_dir, CHAR16 *loaded_image_path,
1433 CHAR16 *file, CHAR16 key, CHAR16 *title, CHAR16 *loader) {
1434 EFI_FILE_HANDLE handle;
1435 ConfigEntry *entry;
1436 EFI_STATUS err;
1437
1438 /* do not add an entry for ourselves */
1439 if (loaded_image_path && StriCmp(loader, loaded_image_path) == 0)
1440 return FALSE;
1441
1442 /* check existence */
1443 err = uefi_call_wrapper(root_dir->Open, 5, root_dir, &handle, loader, EFI_FILE_MODE_READ, 0ULL);
1444 if (EFI_ERROR(err))
1445 return FALSE;
1446 uefi_call_wrapper(handle->Close, 1, handle);
1447
1448 entry = config_entry_add_loader(config, device, LOADER_UNDEFINED, file, key, title, loader);
1449 if (!entry)
1450 return FALSE;
1451
1452 /* do not boot right away into auto-detected entries */
1453 entry->no_autoselect = TRUE;
1454
0fa2cac4
KS
1455 return TRUE;
1456}
1457
1458static VOID config_entry_add_osx(Config *config) {
1459 EFI_STATUS err;
1460 UINTN handle_count = 0;
1461 EFI_HANDLE *handles = NULL;
1462
1463 err = LibLocateHandle(ByProtocol, &FileSystemProtocol, NULL, &handle_count, &handles);
1464 if (!EFI_ERROR(err)) {
1465 UINTN i;
1466
1467 for (i = 0; i < handle_count; i++) {
1468 EFI_FILE *root;
1469 BOOLEAN found;
1470
1471 root = LibOpenRoot(handles[i]);
1472 if (!root)
1473 continue;
1474 found = config_entry_add_loader_auto(config, handles[i], root, NULL, L"auto-osx", 'a', L"OS X",
1475 L"\\System\\Library\\CoreServices\\boot.efi");
1476 uefi_call_wrapper(root->Close, 1, root);
1477 if (found)
1478 break;
1479 }
1480
1481 FreePool(handles);
1482 }
1483}
1484
1485static VOID config_entry_add_linux( Config *config, EFI_LOADED_IMAGE *loaded_image, EFI_FILE *root_dir) {
1486 EFI_FILE_HANDLE linux_dir;
1487 EFI_STATUS err;
1488
1489 err = uefi_call_wrapper(root_dir->Open, 5, root_dir, &linux_dir, L"\\EFI\\Linux", EFI_FILE_MODE_READ, 0ULL);
1490 if (!EFI_ERROR(err)) {
1491 for (;;) {
1492 CHAR16 buf[256];
1493 UINTN bufsize;
1494 EFI_FILE_INFO *f;
1495 CHAR8 *sections[] = {
1496 (UINT8 *)".osrel",
1497 NULL
1498 };
1499 UINTN offs[ELEMENTSOF(sections)-1] = {};
1500 UINTN szs[ELEMENTSOF(sections)-1] = {};
1501 UINTN addrs[ELEMENTSOF(sections)-1] = {};
1502 CHAR8 *content = NULL;
1503 UINTN len;
1504 CHAR8 *line;
1505 UINTN pos = 0;
1506 CHAR8 *key, *value;
1507 CHAR16 *os_name = NULL;
1508 CHAR16 *os_id = NULL;
1509 CHAR16 *os_version = NULL;
1510
1511 bufsize = sizeof(buf);
1512 err = uefi_call_wrapper(linux_dir->Read, 3, linux_dir, &bufsize, buf);
1513 if (bufsize == 0 || EFI_ERROR(err))
1514 break;
1515
1516 f = (EFI_FILE_INFO *) buf;
1517 if (f->FileName[0] == '.')
1518 continue;
1519 if (f->Attribute & EFI_FILE_DIRECTORY)
1520 continue;
1521 len = StrLen(f->FileName);
1522 if (len < 5)
1523 continue;
1524 if (StriCmp(f->FileName + len - 4, L".efi") != 0)
1525 continue;
1526
1527 /* look for an .osrel section in the .efi binary */
1528 err = pefile_locate_sections(linux_dir, f->FileName, sections, addrs, offs, szs);
1529 if (EFI_ERROR(err))
1530 continue;
1531
1532 len = file_read(linux_dir, f->FileName, offs[0], szs[0], &content);
1533 if (len <= 0)
1534 continue;
1535
1536 /* read properties from the embedded os-release file */
1537 line = content;
1538 while ((line = line_get_key_value(content, (CHAR8 *)"=", &pos, &key, &value))) {
1539 if (strcmpa((CHAR8 *)"PRETTY_NAME", key) == 0) {
1540 os_name = stra_to_str(value);
1541 continue;
1542 }
1543
1544 if (strcmpa((CHAR8 *)"ID", key) == 0) {
1545 os_id = stra_to_str(value);
1546 continue;
1547 }
1548
1549 if (strcmpa((CHAR8 *)"VERSION_ID", key) == 0) {
1550 os_version = stra_to_str(value);
1551 continue;
1552 }
1553 }
1554
1555 if (os_name && os_id && os_version) {
1556 CHAR16 *conf;
1557 CHAR16 *path;
1558
1559 conf = PoolPrint(L"%s-%s", os_id, os_version);
1560 path = PoolPrint(L"\\EFI\\Linux\\%s", f->FileName);
1561 config_entry_add_loader(config, loaded_image->DeviceHandle, LOADER_LINUX, conf, 'l', os_name, path);
1562 FreePool(conf);
1563 FreePool(path);
1564 FreePool(os_name);
1565 FreePool(os_id);
1566 FreePool(os_version);
1567 }
1568
1569 FreePool(content);
1570 }
1571 uefi_call_wrapper(linux_dir->Close, 1, linux_dir);
1572 }
1573}
1574
1575static EFI_STATUS image_start(EFI_HANDLE parent_image, const Config *config, const ConfigEntry *entry) {
1576 EFI_HANDLE image;
1577 EFI_DEVICE_PATH *path;
1578 CHAR16 *options;
1579 EFI_STATUS err;
1580
1581 path = FileDevicePath(entry->device, entry->loader);
1582 if (!path) {
1583 Print(L"Error getting device path.");
1584 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1585 return EFI_INVALID_PARAMETER;
1586 }
1587
1588 err = uefi_call_wrapper(BS->LoadImage, 6, FALSE, parent_image, path, NULL, 0, &image);
1589 if (EFI_ERROR(err)) {
1590 Print(L"Error loading %s: %r", entry->loader, err);
1591 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1592 goto out;
1593 }
1594
1595 if (config->options_edit)
1596 options = config->options_edit;
1597 else if (entry->options)
1598 options = entry->options;
1599 else
1600 options = NULL;
1601 if (options) {
1602 EFI_LOADED_IMAGE *loaded_image;
1603
1604 err = uefi_call_wrapper(BS->OpenProtocol, 6, image, &LoadedImageProtocol, (VOID **)&loaded_image,
1605 parent_image, NULL, EFI_OPEN_PROTOCOL_GET_PROTOCOL);
1606 if (EFI_ERROR(err)) {
1607 Print(L"Error getting LoadedImageProtocol handle: %r", err);
1608 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1609 goto out_unload;
1610 }
1611 loaded_image->LoadOptions = options;
1612 loaded_image->LoadOptionsSize = (StrLen(loaded_image->LoadOptions)+1) * sizeof(CHAR16);
1613 }
1614
1615 efivar_set_time_usec(L"LoaderTimeExecUSec", 0);
1616 err = uefi_call_wrapper(BS->StartImage, 3, image, NULL, NULL);
1617out_unload:
1618 uefi_call_wrapper(BS->UnloadImage, 1, image);
1619out:
1620 FreePool(path);
1621 return err;
1622}
1623
1624static EFI_STATUS reboot_into_firmware(VOID) {
1625 CHAR8 *b;
1626 UINTN size;
1627 UINT64 osind;
1628 EFI_STATUS err;
1629
1630 osind = EFI_OS_INDICATIONS_BOOT_TO_FW_UI;
1631
1632 err = efivar_get_raw(&global_guid, L"OsIndications", &b, &size);
1633 if (!EFI_ERROR(err))
1634 osind |= (UINT64)*b;
1635 FreePool(b);
1636
1637 err = efivar_set_raw(&global_guid, L"OsIndications", (CHAR8 *)&osind, sizeof(UINT64), TRUE);
1638 if (EFI_ERROR(err))
1639 return err;
1640
1641 err = uefi_call_wrapper(RT->ResetSystem, 4, EfiResetCold, EFI_SUCCESS, 0, NULL);
1642 Print(L"Error calling ResetSystem: %r", err);
1643 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1644 return err;
1645}
1646
1647static VOID config_free(Config *config) {
1648 UINTN i;
1649
1650 for (i = 0; i < config->entry_count; i++)
1651 config_entry_free(config->entries[i]);
1652 FreePool(config->entries);
1653 FreePool(config->entry_default_pattern);
1654 FreePool(config->options_edit);
1655 FreePool(config->entry_oneshot);
0fa2cac4
KS
1656}
1657
1658EFI_STATUS efi_main(EFI_HANDLE image, EFI_SYSTEM_TABLE *sys_table) {
1659 CHAR16 *s;
1660 CHAR8 *b;
1661 UINTN size;
1662 EFI_LOADED_IMAGE *loaded_image;
1663 EFI_FILE *root_dir;
1664 CHAR16 *loaded_image_path;
1665 EFI_DEVICE_PATH *device_path;
1666 EFI_STATUS err;
1667 Config config;
1668 UINT64 init_usec;
1669 BOOLEAN menu = FALSE;
1670
1671 InitializeLib(image, sys_table);
1672 init_usec = time_usec();
1673 efivar_set_time_usec(L"LoaderTimeInitUSec", init_usec);
e7dd673d 1674 efivar_set(L"LoaderInfo", L"systemd-boot " VERSION, FALSE);
0fa2cac4
KS
1675 s = PoolPrint(L"%s %d.%02d", ST->FirmwareVendor, ST->FirmwareRevision >> 16, ST->FirmwareRevision & 0xffff);
1676 efivar_set(L"LoaderFirmwareInfo", s, FALSE);
1677 FreePool(s);
1678 s = PoolPrint(L"UEFI %d.%02d", ST->Hdr.Revision >> 16, ST->Hdr.Revision & 0xffff);
1679 efivar_set(L"LoaderFirmwareType", s, FALSE);
1680 FreePool(s);
1681
1682 err = uefi_call_wrapper(BS->OpenProtocol, 6, image, &LoadedImageProtocol, (VOID **)&loaded_image,
1683 image, NULL, EFI_OPEN_PROTOCOL_GET_PROTOCOL);
1684 if (EFI_ERROR(err)) {
1685 Print(L"Error getting a LoadedImageProtocol handle: %r ", err);
1686 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1687 return err;
1688 }
1689
1690 /* export the device path this image is started from */
1691 device_path = DevicePathFromHandle(loaded_image->DeviceHandle);
1692 if (device_path) {
0fa2cac4
KS
1693 EFI_DEVICE_PATH *path, *paths;
1694
0fa2cac4
KS
1695 paths = UnpackDevicePath(device_path);
1696 for (path = paths; !IsDevicePathEnd(path); path = NextDevicePathNode(path)) {
1697 HARDDRIVE_DEVICE_PATH *drive;
1698 CHAR16 uuid[37];
1699
1700 if (DevicePathType(path) != MEDIA_DEVICE_PATH)
1701 continue;
1702 if (DevicePathSubType(path) != MEDIA_HARDDRIVE_DP)
1703 continue;
1704 drive = (HARDDRIVE_DEVICE_PATH *)path;
1705 if (drive->SignatureType != SIGNATURE_TYPE_GUID)
1706 continue;
1707
1708 GuidToString(uuid, (EFI_GUID *)&drive->Signature);
1709 efivar_set(L"LoaderDevicePartUUID", uuid, FALSE);
1710 break;
1711 }
1712 FreePool(paths);
1713 }
1714
1715 root_dir = LibOpenRoot(loaded_image->DeviceHandle);
1716 if (!root_dir) {
1717 Print(L"Unable to open root directory: %r ", err);
1718 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1719 return EFI_LOAD_ERROR;
1720 }
1721
1722
1723 /* the filesystem path to this image, to prevent adding ourselves to the menu */
1724 loaded_image_path = DevicePathToStr(loaded_image->FilePath);
1725 efivar_set(L"LoaderImageIdentifier", loaded_image_path, FALSE);
1726
1727 /* scan "\loader\entries\*.conf" files */
1728 ZeroMem(&config, sizeof(Config));
1729 config_load(&config, loaded_image->DeviceHandle, root_dir, loaded_image_path);
1730
0fa2cac4
KS
1731 /* if we find some well-known loaders, add them to the end of the list */
1732 config_entry_add_linux(&config, loaded_image, root_dir);
1733 config_entry_add_loader_auto(&config, loaded_image->DeviceHandle, root_dir, loaded_image_path,
1734 L"auto-windows", 'w', L"Windows Boot Manager", L"\\EFI\\Microsoft\\Boot\\bootmgfw.efi");
1735 config_entry_add_loader_auto(&config, loaded_image->DeviceHandle, root_dir, loaded_image_path,
1736 L"auto-efi-shell", 's', L"EFI Shell", L"\\shell" EFI_MACHINE_TYPE_NAME ".efi");
1737 config_entry_add_loader_auto(&config, loaded_image->DeviceHandle, root_dir, loaded_image_path,
1738 L"auto-efi-default", '\0', L"EFI Default Loader", L"\\EFI\\Boot\\boot" EFI_MACHINE_TYPE_NAME ".efi");
1739 config_entry_add_osx(&config);
0fa2cac4
KS
1740
1741 if (efivar_get_raw(&global_guid, L"OsIndicationsSupported", &b, &size) == EFI_SUCCESS) {
1742 UINT64 osind = (UINT64)*b;
1743
1744 if (osind & EFI_OS_INDICATIONS_BOOT_TO_FW_UI)
1745 config_entry_add_call(&config, L"Reboot Into Firmware Interface", reboot_into_firmware);
1746 FreePool(b);
1747 }
1748
1749 if (config.entry_count == 0) {
1750 Print(L"No loader found. Configuration files in \\loader\\entries\\*.conf are needed.");
1751 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1752 goto out;
1753 }
1754
1755 config_title_generate(&config);
1756
1757 /* select entry by configured pattern or EFI LoaderDefaultEntry= variable*/
1758 config_default_entry_select(&config);
1759
1760 /* if no configured entry to select from was found, enable the menu */
1761 if (config.idx_default == -1) {
1762 config.idx_default = 0;
1763 if (config.timeout_sec == 0)
1764 config.timeout_sec = 10;
1765 }
1766
1767 /* select entry or show menu when key is pressed or timeout is set */
1768 if (config.timeout_sec == 0) {
1769 UINT64 key;
1770
1771 err = console_key_read(&key, FALSE);
1772 if (!EFI_ERROR(err)) {
1773 INT16 idx;
1774
1775 /* find matching key in config entries */
1776 idx = entry_lookup_key(&config, config.idx_default, KEYCHAR(key));
1777 if (idx >= 0)
1778 config.idx_default = idx;
1779 else
1780 menu = TRUE;
1781 }
1782 } else
1783 menu = TRUE;
1784
1785 for (;;) {
1786 ConfigEntry *entry;
1787
1788 entry = config.entries[config.idx_default];
1789 if (menu) {
1790 efivar_set_time_usec(L"LoaderTimeMenuUSec", 0);
1791 uefi_call_wrapper(BS->SetWatchdogTimer, 4, 0, 0x10000, 0, NULL);
7361099e 1792 if (!menu_run(&config, &entry, loaded_image_path))
0fa2cac4
KS
1793 break;
1794
1795 /* run special entry like "reboot" */
1796 if (entry->call) {
1797 entry->call();
1798 continue;
1799 }
0fa2cac4
KS
1800 }
1801
1802 /* export the selected boot entry to the system */
1803 efivar_set(L"LoaderEntrySelected", entry->file, FALSE);
1804
1805 uefi_call_wrapper(BS->SetWatchdogTimer, 4, 5 * 60, 0x10000, 0, NULL);
1806 err = image_start(image, &config, entry);
20b1538d 1807 if (EFI_ERROR(err)) {
37fa3690 1808 graphics_mode(FALSE);
20b1538d 1809 Print(L"\nFailed to execute %s (%s): %r\n", entry->title, entry->loader, err);
0fa2cac4
KS
1810 uefi_call_wrapper(BS->Stall, 1, 3 * 1000 * 1000);
1811 goto out;
1812 }
1813
1814 menu = TRUE;
1815 config.timeout_sec = 0;
1816 }
1817 err = EFI_SUCCESS;
1818out:
1819 FreePool(loaded_image_path);
1820 config_free(&config);
1821 uefi_call_wrapper(root_dir->Close, 1, root_dir);
1822 uefi_call_wrapper(BS->CloseProtocol, 4, image, &LoadedImageProtocol, image, NULL);
1823 return err;
1824}