blob: e26dad1ea54e7777e2f5d4f8249fb74dc3a2e8a3 [file] [log] [blame]
Kevin O'Connorf13b0082008-08-17 11:26:42 -04001// Code to load disk image and start system boot.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05002//
Kevin O'Connorcadaf0e2010-07-26 23:47:26 -04003// Copyright (C) 2008-2010 Kevin O'Connor <kevin@koconnor.net>
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05004// Copyright (C) 2002 MandrakeSoft S.A.
5//
Kevin O'Connorb1b7c2a2009-01-15 20:52:58 -05006// This file may be distributed under the terms of the GNU LGPLv3 license.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05007
Kevin O'Connor10ad7992009-10-24 11:06:08 -04008#include "util.h" // dprintf
Kevin O'Connor9521e262008-07-04 13:04:29 -04009#include "biosvar.h" // GET_EBDA
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050010#include "config.h" // CONFIG_*
Kevin O'Connor180a9592008-03-04 22:50:53 -050011#include "disk.h" // cdrom_boot
Kevin O'Connor9521e262008-07-04 13:04:29 -040012#include "bregs.h" // struct bregs
Kevin O'Connorf13a1802010-12-29 11:52:33 -050013#include "boot.h" // func defs
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050014#include "cmos.h" // inb_cmos
Kevin O'Connorf13a1802010-12-29 11:52:33 -050015#include "paravirt.h" // romfile_loadfile
Kevin O'Connor8bf55032011-01-01 11:00:42 -050016#include "pci.h" //pci_bdf_to_*
Kevin O'Connorc659fde2008-12-28 23:43:20 -050017
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050018
19/****************************************************************
Kevin O'Connor031ef552010-12-27 19:26:57 -050020 * Boot priority ordering
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050021 ****************************************************************/
22
Kevin O'Connor3da2c1c2010-12-29 11:37:41 -050023static char **Bootorder;
24static int BootorderCount;
25
Kevin O'Connord1a17462010-12-24 11:17:03 -050026static void
27loadBootOrder(void)
28{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -040029 if (!CONFIG_BOOTORDER)
30 return;
31
Kevin O'Connord1a17462010-12-24 11:17:03 -050032 char *f = romfile_loadfile("bootorder", NULL);
33 if (!f)
34 return;
35
Kevin O'Connor8bf55032011-01-01 11:00:42 -050036 int i = 0;
Kevin O'Connor3da2c1c2010-12-29 11:37:41 -050037 BootorderCount = 1;
Kevin O'Connord1a17462010-12-24 11:17:03 -050038 while (f[i]) {
39 if (f[i] == '\n')
Kevin O'Connor3da2c1c2010-12-29 11:37:41 -050040 BootorderCount++;
Kevin O'Connord1a17462010-12-24 11:17:03 -050041 i++;
42 }
Kevin O'Connor3da2c1c2010-12-29 11:37:41 -050043 Bootorder = malloc_tmphigh(BootorderCount*sizeof(char*));
44 if (!Bootorder) {
Kevin O'Connord1a17462010-12-24 11:17:03 -050045 warn_noalloc();
46 free(f);
Kevin O'Connor4d0c5922011-01-26 21:04:01 -050047 BootorderCount = 0;
Kevin O'Connord1a17462010-12-24 11:17:03 -050048 return;
49 }
50
51 dprintf(3, "boot order:\n");
52 i = 0;
53 do {
Kevin O'Connor3da2c1c2010-12-29 11:37:41 -050054 Bootorder[i] = f;
Kevin O'Connord1a17462010-12-24 11:17:03 -050055 f = strchr(f, '\n');
Kevin O'Connor8bf55032011-01-01 11:00:42 -050056 if (f)
57 *(f++) = '\0';
Kevin O'Connor9e881a32011-01-08 12:06:54 -050058 nullTrailingSpace(Bootorder[i]);
Kevin O'Connor8bf55032011-01-01 11:00:42 -050059 dprintf(3, "%d: %s\n", i+1, Bootorder[i]);
60 i++;
61 } while (f);
62}
63
64// See if 'str' starts with 'glob' - if glob contains an '*' character
65// it will match any number of characters in str that aren't a '/' or
66// the next glob character.
67static char *
68glob_prefix(const char *glob, const char *str)
69{
70 for (;;) {
71 if (!*glob && (!*str || *str == '/'))
72 return (char*)str;
73 if (*glob == '*') {
74 if (!*str || *str == '/' || *str == glob[1])
75 glob++;
76 else
77 str++;
78 continue;
Kevin O'Connord1a17462010-12-24 11:17:03 -050079 }
Kevin O'Connor8bf55032011-01-01 11:00:42 -050080 if (*glob != *str)
81 return NULL;
82 glob++;
83 str++;
84 }
85}
86
87// Search the bootorder list for the given glob pattern.
88static int
89find_prio(const char *glob)
90{
91 dprintf(1, "Searching bootorder for: %s\n", glob);
92 int i;
93 for (i = 0; i < BootorderCount; i++)
94 if (glob_prefix(glob, Bootorder[i]))
95 return i+1;
96 return -1;
97}
98
99#define FW_PCI_DOMAIN "/pci@i0cf8"
100
Kevin O'Connor659c99d2011-06-20 23:29:15 -0400101static char *
102build_pci_path(char *buf, int max, const char *devname, struct pci_device *pci)
103{
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500104 // Build the string path of a bdf - for example: /pci@i0cf8/isa@1,2
105 char *p = buf;
Kevin O'Connor659c99d2011-06-20 23:29:15 -0400106 if (pci->parent) {
107 p = build_pci_path(p, max, "pci-bridge", pci->parent);
Kevin O'Connord08eb9c2011-01-10 00:48:45 -0500108 } else {
Kevin O'Connor659c99d2011-06-20 23:29:15 -0400109 if (pci->rootbus)
110 p += snprintf(p, max, "/pci-root@%x", pci->rootbus);
Kevin O'Connord08eb9c2011-01-10 00:48:45 -0500111 p += snprintf(p, buf+max-p, "%s", FW_PCI_DOMAIN);
112 }
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500113
Kevin O'Connor659c99d2011-06-20 23:29:15 -0400114 int dev = pci_bdf_to_dev(pci->bdf), fn = pci_bdf_to_fn(pci->bdf);
Kevin O'Connord08eb9c2011-01-10 00:48:45 -0500115 p += snprintf(p, buf+max-p, "/%s@%x", devname, dev);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500116 if (fn)
117 p += snprintf(p, buf+max-p, ",%x", fn);
118 return p;
Kevin O'Connord1a17462010-12-24 11:17:03 -0500119}
120
Kevin O'Connordc3a7d62011-07-09 14:33:56 -0400121int bootprio_find_pci_device(struct pci_device *pci)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500122{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400123 if (!CONFIG_BOOTORDER)
124 return -1;
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500125 // Find pci device - for example: /pci@i0cf8/ethernet@5
126 char desc[256];
Kevin O'Connordc3a7d62011-07-09 14:33:56 -0400127 build_pci_path(desc, sizeof(desc), "*", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500128 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500129}
130
Kevin O'Connor95b2e0c2011-07-09 14:42:11 -0400131int bootprio_find_ata_device(struct pci_device *pci, int chanid, int slave)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500132{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400133 if (!CONFIG_BOOTORDER)
134 return -1;
Kevin O'Connor95b2e0c2011-07-09 14:42:11 -0400135 if (!pci)
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500136 // support only pci machine for now
137 return -1;
138 // Find ata drive - for example: /pci@i0cf8/ide@1,1/drive@1/disk@0
139 char desc[256], *p;
Kevin O'Connor95b2e0c2011-07-09 14:42:11 -0400140 p = build_pci_path(desc, sizeof(desc), "*", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500141 snprintf(p, desc+sizeof(desc)-p, "/drive@%x/disk@%x", chanid, slave);
142 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500143}
144
Kevin O'Connor03e589c2011-07-09 14:35:37 -0400145int bootprio_find_fdc_device(struct pci_device *pci, int port, int fdid)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500146{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400147 if (!CONFIG_BOOTORDER)
148 return -1;
Kevin O'Connor03e589c2011-07-09 14:35:37 -0400149 if (!pci)
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500150 // support only pci machine for now
151 return -1;
152 // Find floppy - for example: /pci@i0cf8/isa@1/fdc@03f1/floppy@0
153 char desc[256], *p;
Kevin O'Connor03e589c2011-07-09 14:35:37 -0400154 p = build_pci_path(desc, sizeof(desc), "isa", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500155 snprintf(p, desc+sizeof(desc)-p, "/fdc@%04x/floppy@%x", port, fdid);
156 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500157}
158
Kevin O'Connorfce91892011-07-09 14:47:47 -0400159int bootprio_find_pci_rom(struct pci_device *pci, int instance)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500160{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400161 if (!CONFIG_BOOTORDER)
162 return -1;
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500163 // Find pci rom - for example: /pci@i0cf8/scsi@3:rom2
164 char desc[256], *p;
Kevin O'Connorfce91892011-07-09 14:47:47 -0400165 p = build_pci_path(desc, sizeof(desc), "*", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500166 if (instance)
167 snprintf(p, desc+sizeof(desc)-p, ":rom%d", instance);
168 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500169}
170
171int bootprio_find_named_rom(const char *name, int instance)
172{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400173 if (!CONFIG_BOOTORDER)
174 return -1;
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500175 // Find named rom - for example: /rom@genroms/linuxboot.bin
176 char desc[256], *p;
177 p = desc + snprintf(desc, sizeof(desc), "/rom@%s", name);
178 if (instance)
179 snprintf(p, desc+sizeof(desc)-p, ":rom%d", instance);
180 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500181}
182
Kevin O'Connor1355a882011-07-09 14:31:50 -0400183int bootprio_find_usb(struct pci_device *pci, u64 path)
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500184{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400185 if (!CONFIG_BOOTORDER)
186 return -1;
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500187 // Find usb - for example: /pci@i0cf8/usb@1,2/hub@1/network@0/ethernet@0
188 int i;
189 char desc[256], *p;
Kevin O'Connor1355a882011-07-09 14:31:50 -0400190 p = build_pci_path(desc, sizeof(desc), "usb", pci);
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500191 for (i=56; i>0; i-=8) {
192 int port = (path >> i) & 0xff;
193 if (port != 0xff)
Paolo Bonzini2762de02011-11-18 15:59:24 +0100194 p += snprintf(p, desc+sizeof(desc)-p, "/hub@%x", port+1);
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500195 }
Paolo Bonzini2762de02011-11-18 15:59:24 +0100196 snprintf(p, desc+sizeof(desc)-p, "/*@%x", (u32)(path & 0xff)+1);
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500197 return find_prio(desc);
198}
199
Kevin O'Connor031ef552010-12-27 19:26:57 -0500200
201/****************************************************************
202 * Boot setup
203 ****************************************************************/
204
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500205static int CheckFloppySig = 1;
206
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500207#define DEFAULT_PRIO 9999
208
209static int DefaultFloppyPrio = 101;
210static int DefaultCDPrio = 102;
211static int DefaultHDPrio = 103;
212static int DefaultBEVPrio = 104;
213
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500214void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500215boot_setup(void)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500216{
217 if (! CONFIG_BOOT)
218 return;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500219
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500220 SET_EBDA(boot_sequence, 0xffff);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500221
222 if (!CONFIG_COREBOOT) {
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500223 // On emulators, get boot order from nvram.
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500224 if (inb_cmos(CMOS_BIOS_BOOTFLAG1) & 1)
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500225 CheckFloppySig = 0;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500226 u32 bootorder = (inb_cmos(CMOS_BIOS_BOOTFLAG2)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500227 | ((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0xf0) << 4));
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500228 DefaultFloppyPrio = DefaultCDPrio = DefaultHDPrio
229 = DefaultBEVPrio = DEFAULT_PRIO;
230 int i;
231 for (i=101; i<104; i++) {
232 u32 val = bootorder & 0x0f;
233 bootorder >>= 4;
234 switch (val) {
235 case 1: DefaultFloppyPrio = i; break;
236 case 2: DefaultHDPrio = i; break;
237 case 3: DefaultCDPrio = i; break;
238 case 4: DefaultBEVPrio = i; break;
239 }
240 }
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500241 }
Gleb Natapovb9a75912010-12-23 11:29:38 +0200242
Kevin O'Connord1a17462010-12-24 11:17:03 -0500243 loadBootOrder();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500244}
245
Kevin O'Connord1a17462010-12-24 11:17:03 -0500246
247/****************************************************************
Kevin O'Connor031ef552010-12-27 19:26:57 -0500248 * BootList handling
Kevin O'Connord1a17462010-12-24 11:17:03 -0500249 ****************************************************************/
250
Kevin O'Connor031ef552010-12-27 19:26:57 -0500251struct bootentry_s {
252 int type;
253 union {
254 u32 data;
255 struct segoff_s vector;
256 struct drive_s *drive;
257 };
258 int priority;
259 const char *description;
260 struct bootentry_s *next;
261};
Kevin O'Connor031ef552010-12-27 19:26:57 -0500262static struct bootentry_s *BootList;
263
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500264#define IPL_TYPE_FLOPPY 0x01
265#define IPL_TYPE_HARDDISK 0x02
266#define IPL_TYPE_CDROM 0x03
267#define IPL_TYPE_CBFS 0x20
268#define IPL_TYPE_BEV 0x80
269#define IPL_TYPE_BCV 0x81
270
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500271static void
272bootentry_add(int type, int prio, u32 data, const char *desc)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500273{
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500274 if (! CONFIG_BOOT)
275 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500276 struct bootentry_s *be = malloc_tmp(sizeof(*be));
277 if (!be) {
278 warn_noalloc();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500279 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500280 }
281 be->type = type;
282 be->priority = prio;
283 be->data = data;
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500284 be->description = desc ?: "?";
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500285 dprintf(3, "Registering bootable: %s (type:%d prio:%d data:%x)\n"
286 , be->description, type, prio, data);
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500287
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500288 // Add entry in sorted order.
289 struct bootentry_s **pprev;
290 for (pprev = &BootList; *pprev; pprev = &(*pprev)->next) {
291 struct bootentry_s *pos = *pprev;
292 if (be->priority < pos->priority)
293 break;
294 if (be->priority > pos->priority)
295 continue;
296 if (be->type < pos->type)
297 break;
298 if (be->type > pos->type)
299 continue;
300 if (be->type <= IPL_TYPE_CDROM
301 && (be->drive->type < pos->drive->type
302 || (be->drive->type == pos->drive->type
303 && be->drive->cntl_id < pos->drive->cntl_id)))
304 break;
305 }
306 be->next = *pprev;
307 *pprev = be;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500308}
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500309
Kevin O'Connor031ef552010-12-27 19:26:57 -0500310// Return the given priority if it's set - defaultprio otherwise.
311static inline int defPrio(int priority, int defaultprio) {
312 return (priority < 0) ? defaultprio : priority;
313}
314
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500315// Add a BEV vector for a given pnp compatible option rom.
Gleb Natapov4c90a202010-12-07 13:50:54 +0200316void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500317boot_add_bev(u16 seg, u16 bev, u16 desc, int prio)
Gleb Natapov4c90a202010-12-07 13:50:54 +0200318{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500319 bootentry_add(IPL_TYPE_BEV, defPrio(prio, DefaultBEVPrio)
320 , SEGOFF(seg, bev).segoff
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500321 , desc ? MAKE_FLATPTR(seg, desc) : "Unknown");
322 DefaultBEVPrio = DEFAULT_PRIO;
Gleb Natapov4c90a202010-12-07 13:50:54 +0200323}
324
Kevin O'Connor0a924122009-02-08 19:43:47 -0500325// Add a bcv entry for an expansion card harddrive or legacy option rom
326void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500327boot_add_bcv(u16 seg, u16 ip, u16 desc, int prio)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500328{
Kevin O'Connor88e745e2012-01-14 11:58:14 -0500329 bootentry_add(IPL_TYPE_BCV, defPrio(prio, DefaultHDPrio)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500330 , SEGOFF(seg, ip).segoff
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500331 , desc ? MAKE_FLATPTR(seg, desc) : "Legacy option rom");
Kevin O'Connor0a924122009-02-08 19:43:47 -0500332}
333
Kevin O'Connor0a924122009-02-08 19:43:47 -0500334void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500335boot_add_floppy(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500336{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500337 bootentry_add(IPL_TYPE_FLOPPY, defPrio(prio, DefaultFloppyPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500338 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500339}
Kevin O'Connor0a924122009-02-08 19:43:47 -0500340
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500341void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500342boot_add_hd(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500343{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500344 bootentry_add(IPL_TYPE_HARDDISK, defPrio(prio, DefaultHDPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500345 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500346}
347
348void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500349boot_add_cd(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500350{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500351 bootentry_add(IPL_TYPE_CDROM, defPrio(prio, DefaultCDPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500352 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500353}
354
355// Add a CBFS payload entry
356void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500357boot_add_cbfs(void *data, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500358{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500359 bootentry_add(IPL_TYPE_CBFS, defPrio(prio, DEFAULT_PRIO), (u32)data, desc);
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500360}
361
362
363/****************************************************************
Kevin O'Connor0a924122009-02-08 19:43:47 -0500364 * Boot menu and BCV execution
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500365 ****************************************************************/
366
Kevin O'Connor73023002011-07-05 20:34:34 -0400367#define DEFAULT_BOOTMENU_WAIT 2500
368
Kevin O'Connor0a924122009-02-08 19:43:47 -0500369// Show IPL option menu.
370static void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500371interactive_bootmenu(void)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500372{
Kevin O'Connore7cc7642009-10-04 10:05:16 -0400373 if (! CONFIG_BOOTMENU || ! qemu_cfg_show_boot_menu())
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500374 return;
375
376 while (get_keystroke(0) >= 0)
377 ;
378
379 printf("Press F12 for boot menu.\n\n");
380
Kevin O'Connor73023002011-07-05 20:34:34 -0400381 u32 menutime = romfile_loadint("etc/boot-menu-wait", DEFAULT_BOOTMENU_WAIT);
Kevin O'Connor9a01a9c2010-08-25 21:07:48 -0400382 enable_bootsplash();
Kevin O'Connor73023002011-07-05 20:34:34 -0400383 int scan_code = get_keystroke(menutime);
Kevin O'Connor9a01a9c2010-08-25 21:07:48 -0400384 disable_bootsplash();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500385 if (scan_code != 0x86)
386 /* not F12 */
387 return;
388
389 while (get_keystroke(0) >= 0)
390 ;
391
392 printf("Select boot device:\n\n");
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400393 wait_threads();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500394
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500395 // Show menu items
396 struct bootentry_s *pos = BootList;
397 int maxmenu = 0;
398 while (pos) {
399 char desc[60];
400 maxmenu++;
401 printf("%d. %s\n", maxmenu
402 , strtcpy(desc, pos->description, ARRAY_SIZE(desc)));
403 pos = pos->next;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500404 }
405
Kevin O'Connor551caa22010-12-29 13:25:18 -0500406 // Get key press
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500407 for (;;) {
408 scan_code = get_keystroke(1000);
Kevin O'Connor551caa22010-12-29 13:25:18 -0500409 if (scan_code >= 1 && scan_code <= maxmenu+1)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500410 break;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500411 }
412 printf("\n");
Kevin O'Connor551caa22010-12-29 13:25:18 -0500413 if (scan_code == 0x01)
414 // ESC
415 return;
416
417 // Find entry and make top priority.
418 int choice = scan_code - 1;
419 struct bootentry_s **pprev = &BootList;
420 while (--choice)
421 pprev = &(*pprev)->next;
422 pos = *pprev;
423 *pprev = pos->next;
424 pos->next = BootList;
425 BootList = pos;
426 pos->priority = 0;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500427}
428
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500429// BEV (Boot Execution Vector) list
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500430struct bev_s {
431 int type;
432 u32 vector;
433};
434static struct bev_s BEV[20];
435static int BEVCount;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500436static int HaveHDBoot, HaveFDBoot;
437
Kevin O'Connor0a924122009-02-08 19:43:47 -0500438static void
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500439add_bev(int type, u32 vector)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500440{
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500441 if (type == IPL_TYPE_HARDDISK && HaveHDBoot++)
442 return;
443 if (type == IPL_TYPE_FLOPPY && HaveFDBoot++)
444 return;
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500445 if (BEVCount >= ARRAY_SIZE(BEV))
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500446 return;
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500447 struct bev_s *bev = &BEV[BEVCount++];
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500448 bev->type = type;
449 bev->vector = vector;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500450}
451
452// Prepare for boot - show menu and run bcvs.
453void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500454boot_prep(void)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500455{
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400456 if (! CONFIG_BOOT) {
457 wait_threads();
Kevin O'Connor0a924122009-02-08 19:43:47 -0500458 return;
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400459 }
Kevin O'Connor0a924122009-02-08 19:43:47 -0500460
Kevin O'Connora5826b52009-10-24 17:57:29 -0400461 // XXX - show available drives?
462
Kevin O'Connor0a924122009-02-08 19:43:47 -0500463 // Allow user to modify BCV/IPL order.
464 interactive_bootmenu();
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400465 wait_threads();
Kevin O'Connor0a924122009-02-08 19:43:47 -0500466
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500467 // Map drives and populate BEV list
468 struct bootentry_s *pos = BootList;
469 while (pos) {
470 switch (pos->type) {
471 case IPL_TYPE_BCV:
472 call_bcv(pos->vector.seg, pos->vector.offset);
473 add_bev(IPL_TYPE_HARDDISK, 0);
474 break;
475 case IPL_TYPE_FLOPPY:
476 map_floppy_drive(pos->drive);
477 add_bev(IPL_TYPE_FLOPPY, 0);
478 break;
479 case IPL_TYPE_HARDDISK:
480 map_hd_drive(pos->drive);
481 add_bev(IPL_TYPE_HARDDISK, 0);
482 break;
483 case IPL_TYPE_CDROM:
484 map_cd_drive(pos->drive);
485 // NO BREAK
486 default:
487 add_bev(pos->type, pos->data);
488 break;
489 }
490 pos = pos->next;
491 }
Kevin O'Connorafd05202009-08-16 12:21:44 -0400492
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500493 // If nothing added a floppy/hd boot - add it manually.
494 add_bev(IPL_TYPE_FLOPPY, 0);
495 add_bev(IPL_TYPE_HARDDISK, 0);
Kevin O'Connor0a924122009-02-08 19:43:47 -0500496}
497
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500498
499/****************************************************************
500 * Boot code (int 18/19)
501 ****************************************************************/
502
Kevin O'Connor0a924122009-02-08 19:43:47 -0500503// Jump to a bootup entry point.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500504static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500505call_boot_entry(struct segoff_s bootsegip, u8 bootdrv)
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500506{
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500507 dprintf(1, "Booting from %04x:%04x\n", bootsegip.seg, bootsegip.offset);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500508 struct bregs br;
509 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400510 br.flags = F_IF;
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500511 br.code = bootsegip;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500512 // Set the magic number in ax and the boot drive in dl.
513 br.dl = bootdrv;
514 br.ax = 0xaa55;
515 call16(&br);
516}
517
518// Boot from a disk (either floppy or harddrive)
519static void
520boot_disk(u8 bootdrv, int checksig)
521{
522 u16 bootseg = 0x07c0;
523
524 // Read sector
525 struct bregs br;
526 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400527 br.flags = F_IF;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500528 br.dl = bootdrv;
529 br.es = bootseg;
530 br.ah = 2;
531 br.al = 1;
532 br.cl = 1;
533 call16_int(0x13, &br);
534
535 if (br.flags & F_CF) {
536 printf("Boot failed: could not read the boot disk\n\n");
537 return;
538 }
539
540 if (checksig) {
541 struct mbr_s *mbr = (void*)0;
542 if (GET_FARVAR(bootseg, mbr->signature) != MBR_SIGNATURE) {
543 printf("Boot failed: not a bootable disk\n\n");
544 return;
545 }
546 }
547
548 /* Canonicalize bootseg:bootip */
549 u16 bootip = (bootseg & 0x0fff) << 4;
550 bootseg &= 0xf000;
551
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500552 call_boot_entry(SEGOFF(bootseg, bootip), bootdrv);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500553}
554
555// Boot from a CD-ROM
556static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500557boot_cdrom(struct drive_s *drive_g)
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500558{
559 if (! CONFIG_CDROM_BOOT)
560 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500561 printf("Booting from DVD/CD...\n");
Gleb Natapov4c90a202010-12-07 13:50:54 +0200562
Gleb Natapov4c90a202010-12-07 13:50:54 +0200563 int status = cdrom_boot(drive_g);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500564 if (status) {
Kevin O'Connorecbcf772010-12-29 13:26:01 -0500565 printf("Boot failed: Could not read from CDROM (code %04x)\n", status);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500566 return;
567 }
568
569 u16 ebda_seg = get_ebda_seg();
Kevin O'Connor669e6442009-08-11 22:36:30 -0400570 u8 bootdrv = GET_EBDA2(ebda_seg, cdemu.emulated_extdrive);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500571 u16 bootseg = GET_EBDA2(ebda_seg, cdemu.load_segment);
572 /* Canonicalize bootseg:bootip */
573 u16 bootip = (bootseg & 0x0fff) << 4;
574 bootseg &= 0xf000;
575
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500576 call_boot_entry(SEGOFF(bootseg, bootip), bootdrv);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500577}
578
Kevin O'Connore8f00ee2009-07-04 04:04:36 -0400579// Boot from a CBFS payload
Kevin O'Connor67823442009-04-13 14:14:51 -0400580static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500581boot_cbfs(struct cbfs_file *file)
Kevin O'Connor67823442009-04-13 14:14:51 -0400582{
Kevin O'Connord9c93612010-03-20 11:00:45 -0400583 if (!CONFIG_COREBOOT || !CONFIG_COREBOOT_FLASH)
Kevin O'Connor67823442009-04-13 14:14:51 -0400584 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500585 printf("Booting from CBFS...\n");
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500586 cbfs_run_payload(file);
Kevin O'Connor67823442009-04-13 14:14:51 -0400587}
588
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500589// Boot from a BEV entry on an optionrom.
590static void
591boot_rom(u32 vector)
592{
593 printf("Booting from ROM...\n");
594 struct segoff_s so;
595 so.segoff = vector;
596 call_boot_entry(so, 0);
597}
598
599// Determine next boot method and attempt a boot using it.
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500600static void
601do_boot(u16 seq_nr)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500602{
Kevin O'Connor40967022008-07-21 22:23:05 -0400603 if (! CONFIG_BOOT)
Kevin O'Connore07e18e2009-02-08 17:07:29 -0500604 panic("Boot support not compiled in.\n");
Kevin O'Connor40967022008-07-21 22:23:05 -0400605
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500606 if (seq_nr >= BEVCount) {
Kevin O'Connorff8c1412009-04-18 17:02:41 -0400607 printf("No bootable device.\n");
608 // Loop with irqs enabled - this allows ctrl+alt+delete to work.
609 for (;;)
Kevin O'Connor9c447c32010-05-23 10:24:22 -0400610 wait_irq();
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500611 }
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500612
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500613 // Boot the given BEV type.
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500614 struct bev_s *ie = &BEV[seq_nr];
Kevin O'Connorcadaf0e2010-07-26 23:47:26 -0400615 switch (ie->type) {
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400616 case IPL_TYPE_FLOPPY:
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500617 printf("Booting from Floppy...\n");
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500618 boot_disk(0x00, CheckFloppySig);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500619 break;
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400620 case IPL_TYPE_HARDDISK:
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500621 printf("Booting from Hard Disk...\n");
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500622 boot_disk(0x80, 1);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500623 break;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500624 case IPL_TYPE_CDROM:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500625 boot_cdrom((void*)ie->vector);
Kevin O'Connor67823442009-04-13 14:14:51 -0400626 break;
627 case IPL_TYPE_CBFS:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500628 boot_cbfs((void*)ie->vector);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500629 break;
630 case IPL_TYPE_BEV:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500631 boot_rom(ie->vector);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500632 break;
Kevin O'Connor180a9592008-03-04 22:50:53 -0500633 }
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500634
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500635 // Boot failed: invoke the boot recovery function
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400636 struct bregs br;
637 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400638 br.flags = F_IF;
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400639 call16_int(0x18, &br);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500640}
641
642// Boot Failure recovery: try the next device.
Kevin O'Connor52a300f2009-12-26 23:32:57 -0500643void VISIBLE32FLAT
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500644handle_18(void)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500645{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400646 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400647 debug_enter(NULL, DEBUG_HDL_18);
Kevin O'Connor08815372008-12-29 21:16:31 -0500648 u16 ebda_seg = get_ebda_seg();
649 u16 seq = GET_EBDA2(ebda_seg, boot_sequence) + 1;
650 SET_EBDA2(ebda_seg, boot_sequence, seq);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400651 do_boot(seq);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500652}
653
654// INT 19h Boot Load Service Entry Point
Kevin O'Connor52a300f2009-12-26 23:32:57 -0500655void VISIBLE32FLAT
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500656handle_19(void)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500657{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400658 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400659 debug_enter(NULL, DEBUG_HDL_19);
Kevin O'Connor08815372008-12-29 21:16:31 -0500660 SET_EBDA(boot_sequence, 0);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400661 do_boot(0);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500662}