blob: 1a2218ea7a221c611ac3d4cdc41b3b3245d8006d [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'Connor38fcbfe2008-02-25 22:30:47 -05009#include "config.h" // CONFIG_*
Kevin O'Connor180a9592008-03-04 22:50:53 -050010#include "disk.h" // cdrom_boot
Kevin O'Connor9521e262008-07-04 13:04:29 -040011#include "bregs.h" // struct bregs
Kevin O'Connorf13a1802010-12-29 11:52:33 -050012#include "boot.h" // func defs
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050013#include "cmos.h" // inb_cmos
Kevin O'Connor59d6ca52012-05-31 00:20:55 -040014#include "paravirt.h" // qemu_cfg_show_boot_menu
15#include "pci.h" // pci_bdf_to_*
Kevin O'Connorea274782012-03-08 07:49:09 -050016#include "usb.h" // struct usbdevice_s
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
Paolo Bonzinic5c488f2012-02-27 17:22:23 +0100131int bootprio_find_scsi_device(struct pci_device *pci, int target, int lun)
132{
133 if (!CONFIG_BOOTORDER)
134 return -1;
135 if (!pci)
136 // support only pci machine for now
137 return -1;
138 // Find scsi drive - for example: /pci@i0cf8/scsi@5/channel@0/disk@1,0
139 char desc[256], *p;
140 p = build_pci_path(desc, sizeof(desc), "*", pci);
141 snprintf(p, desc+sizeof(desc)-p, "/*@0/*@%d,%d", target, lun);
142 return find_prio(desc);
143}
144
Kevin O'Connor95b2e0c2011-07-09 14:42:11 -0400145int bootprio_find_ata_device(struct pci_device *pci, int chanid, int slave)
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'Connor95b2e0c2011-07-09 14:42:11 -0400149 if (!pci)
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500150 // support only pci machine for now
151 return -1;
152 // Find ata drive - for example: /pci@i0cf8/ide@1,1/drive@1/disk@0
153 char desc[256], *p;
Kevin O'Connor95b2e0c2011-07-09 14:42:11 -0400154 p = build_pci_path(desc, sizeof(desc), "*", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500155 snprintf(p, desc+sizeof(desc)-p, "/drive@%x/disk@%x", chanid, slave);
156 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500157}
158
Kevin O'Connor03e589c2011-07-09 14:35:37 -0400159int bootprio_find_fdc_device(struct pci_device *pci, int port, int fdid)
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'Connor03e589c2011-07-09 14:35:37 -0400163 if (!pci)
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500164 // support only pci machine for now
165 return -1;
166 // Find floppy - for example: /pci@i0cf8/isa@1/fdc@03f1/floppy@0
167 char desc[256], *p;
Kevin O'Connor03e589c2011-07-09 14:35:37 -0400168 p = build_pci_path(desc, sizeof(desc), "isa", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500169 snprintf(p, desc+sizeof(desc)-p, "/fdc@%04x/floppy@%x", port, fdid);
170 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500171}
172
Kevin O'Connorfce91892011-07-09 14:47:47 -0400173int bootprio_find_pci_rom(struct pci_device *pci, int instance)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500174{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400175 if (!CONFIG_BOOTORDER)
176 return -1;
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500177 // Find pci rom - for example: /pci@i0cf8/scsi@3:rom2
178 char desc[256], *p;
Kevin O'Connorfce91892011-07-09 14:47:47 -0400179 p = build_pci_path(desc, sizeof(desc), "*", pci);
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500180 if (instance)
181 snprintf(p, desc+sizeof(desc)-p, ":rom%d", instance);
182 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500183}
184
185int bootprio_find_named_rom(const char *name, int instance)
186{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400187 if (!CONFIG_BOOTORDER)
188 return -1;
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500189 // Find named rom - for example: /rom@genroms/linuxboot.bin
190 char desc[256], *p;
191 p = desc + snprintf(desc, sizeof(desc), "/rom@%s", name);
192 if (instance)
193 snprintf(p, desc+sizeof(desc)-p, ":rom%d", instance);
194 return find_prio(desc);
Kevin O'Connor031ef552010-12-27 19:26:57 -0500195}
196
Kevin O'Connorea274782012-03-08 07:49:09 -0500197static char *
198build_usb_path(char *buf, int max, struct usbhub_s *hub)
199{
200 if (!hub->usbdev)
201 // Root hub - nothing to add.
202 return buf;
203 char *p = build_usb_path(buf, max, hub->usbdev->hub);
204 p += snprintf(p, buf+max-p, "/hub@%x", hub->usbdev->port+1);
205 return p;
206}
207
Kevin O'Connor7fa31b52012-06-13 08:47:03 -0400208int bootprio_find_usb(struct usbdevice_s *usbdev, int lun)
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500209{
Kevin O'Connor49bf57b2011-05-10 22:08:30 -0400210 if (!CONFIG_BOOTORDER)
211 return -1;
Kevin O'Connor7fa31b52012-06-13 08:47:03 -0400212 // Find usb - for example: /pci@i0cf8/usb@1,2/storage@1/channel@0/disk@0,0
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500213 char desc[256], *p;
Kevin O'Connorea274782012-03-08 07:49:09 -0500214 p = build_pci_path(desc, sizeof(desc), "usb", usbdev->hub->cntl->pci);
215 p = build_usb_path(p, desc+sizeof(desc)-p, usbdev->hub);
Kevin O'Connor7fa31b52012-06-13 08:47:03 -0400216 snprintf(p, desc+sizeof(desc)-p, "/storage@%x/*@0/*@0,%d"
217 , usbdev->port+1, lun);
218 int ret = find_prio(desc);
219 if (ret >= 0)
220 return ret;
221 // Try usb-host/redir - for example: /pci@i0cf8/usb@1,2/usb-host@1
222 snprintf(p, desc+sizeof(desc)-p, "/usb-*@%x", usbdev->port+1);
Kevin O'Connorc2002a12010-12-31 14:38:10 -0500223 return find_prio(desc);
224}
225
Kevin O'Connor031ef552010-12-27 19:26:57 -0500226
227/****************************************************************
228 * Boot setup
229 ****************************************************************/
230
Kevin O'Connord4f7d902013-03-05 17:52:21 +0800231static int BootRetryTime;
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500232static int CheckFloppySig = 1;
233
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500234#define DEFAULT_PRIO 9999
235
236static int DefaultFloppyPrio = 101;
237static int DefaultCDPrio = 102;
238static int DefaultHDPrio = 103;
239static int DefaultBEVPrio = 104;
240
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500241void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500242boot_setup(void)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500243{
244 if (! CONFIG_BOOT)
245 return;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500246
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500247 if (!CONFIG_COREBOOT) {
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500248 // On emulators, get boot order from nvram.
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500249 if (inb_cmos(CMOS_BIOS_BOOTFLAG1) & 1)
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500250 CheckFloppySig = 0;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500251 u32 bootorder = (inb_cmos(CMOS_BIOS_BOOTFLAG2)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500252 | ((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0xf0) << 4));
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500253 DefaultFloppyPrio = DefaultCDPrio = DefaultHDPrio
254 = DefaultBEVPrio = DEFAULT_PRIO;
255 int i;
256 for (i=101; i<104; i++) {
257 u32 val = bootorder & 0x0f;
258 bootorder >>= 4;
259 switch (val) {
260 case 1: DefaultFloppyPrio = i; break;
261 case 2: DefaultHDPrio = i; break;
262 case 3: DefaultCDPrio = i; break;
263 case 4: DefaultBEVPrio = i; break;
264 }
265 }
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500266 }
Gleb Natapovb9a75912010-12-23 11:29:38 +0200267
Kevin O'Connord4f7d902013-03-05 17:52:21 +0800268 BootRetryTime = romfile_loadint("etc/boot-fail-wait", 60*1000);
269
Kevin O'Connord1a17462010-12-24 11:17:03 -0500270 loadBootOrder();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500271}
272
Kevin O'Connord1a17462010-12-24 11:17:03 -0500273
274/****************************************************************
Kevin O'Connor031ef552010-12-27 19:26:57 -0500275 * BootList handling
Kevin O'Connord1a17462010-12-24 11:17:03 -0500276 ****************************************************************/
277
Kevin O'Connor031ef552010-12-27 19:26:57 -0500278struct bootentry_s {
279 int type;
280 union {
281 u32 data;
282 struct segoff_s vector;
283 struct drive_s *drive;
284 };
285 int priority;
286 const char *description;
287 struct bootentry_s *next;
288};
Kevin O'Connor031ef552010-12-27 19:26:57 -0500289static struct bootentry_s *BootList;
290
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500291#define IPL_TYPE_FLOPPY 0x01
292#define IPL_TYPE_HARDDISK 0x02
293#define IPL_TYPE_CDROM 0x03
294#define IPL_TYPE_CBFS 0x20
295#define IPL_TYPE_BEV 0x80
296#define IPL_TYPE_BCV 0x81
Kevin O'Connor54ae5432013-01-12 16:36:11 -0500297#define IPL_TYPE_HALT 0xf0
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500298
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500299static void
300bootentry_add(int type, int prio, u32 data, const char *desc)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500301{
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500302 if (! CONFIG_BOOT)
303 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500304 struct bootentry_s *be = malloc_tmp(sizeof(*be));
305 if (!be) {
306 warn_noalloc();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500307 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500308 }
309 be->type = type;
310 be->priority = prio;
311 be->data = data;
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500312 be->description = desc ?: "?";
Kevin O'Connor8bf55032011-01-01 11:00:42 -0500313 dprintf(3, "Registering bootable: %s (type:%d prio:%d data:%x)\n"
314 , be->description, type, prio, data);
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500315
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500316 // Add entry in sorted order.
317 struct bootentry_s **pprev;
318 for (pprev = &BootList; *pprev; pprev = &(*pprev)->next) {
319 struct bootentry_s *pos = *pprev;
320 if (be->priority < pos->priority)
321 break;
322 if (be->priority > pos->priority)
323 continue;
324 if (be->type < pos->type)
325 break;
326 if (be->type > pos->type)
327 continue;
328 if (be->type <= IPL_TYPE_CDROM
329 && (be->drive->type < pos->drive->type
330 || (be->drive->type == pos->drive->type
331 && be->drive->cntl_id < pos->drive->cntl_id)))
332 break;
333 }
334 be->next = *pprev;
335 *pprev = be;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500336}
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500337
Kevin O'Connor031ef552010-12-27 19:26:57 -0500338// Return the given priority if it's set - defaultprio otherwise.
339static inline int defPrio(int priority, int defaultprio) {
340 return (priority < 0) ? defaultprio : priority;
341}
342
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500343// Add a BEV vector for a given pnp compatible option rom.
Gleb Natapov4c90a202010-12-07 13:50:54 +0200344void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500345boot_add_bev(u16 seg, u16 bev, u16 desc, int prio)
Gleb Natapov4c90a202010-12-07 13:50:54 +0200346{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500347 bootentry_add(IPL_TYPE_BEV, defPrio(prio, DefaultBEVPrio)
348 , SEGOFF(seg, bev).segoff
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500349 , desc ? MAKE_FLATPTR(seg, desc) : "Unknown");
350 DefaultBEVPrio = DEFAULT_PRIO;
Gleb Natapov4c90a202010-12-07 13:50:54 +0200351}
352
Kevin O'Connor0a924122009-02-08 19:43:47 -0500353// Add a bcv entry for an expansion card harddrive or legacy option rom
354void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500355boot_add_bcv(u16 seg, u16 ip, u16 desc, int prio)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500356{
Kevin O'Connor88e745e2012-01-14 11:58:14 -0500357 bootentry_add(IPL_TYPE_BCV, defPrio(prio, DefaultHDPrio)
Kevin O'Connor031ef552010-12-27 19:26:57 -0500358 , SEGOFF(seg, ip).segoff
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500359 , desc ? MAKE_FLATPTR(seg, desc) : "Legacy option rom");
Kevin O'Connor0a924122009-02-08 19:43:47 -0500360}
361
Kevin O'Connor0a924122009-02-08 19:43:47 -0500362void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500363boot_add_floppy(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500364{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500365 bootentry_add(IPL_TYPE_FLOPPY, defPrio(prio, DefaultFloppyPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500366 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500367}
Kevin O'Connor0a924122009-02-08 19:43:47 -0500368
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500369void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500370boot_add_hd(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500371{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500372 bootentry_add(IPL_TYPE_HARDDISK, defPrio(prio, DefaultHDPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500373 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500374}
375
376void
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500377boot_add_cd(struct drive_s *drive_g, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500378{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500379 bootentry_add(IPL_TYPE_CDROM, defPrio(prio, DefaultCDPrio)
Kevin O'Connorca2bc1c2010-12-29 21:41:19 -0500380 , (u32)drive_g, desc);
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500381}
382
383// Add a CBFS payload entry
384void
Kevin O'Connor031ef552010-12-27 19:26:57 -0500385boot_add_cbfs(void *data, const char *desc, int prio)
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500386{
Kevin O'Connor031ef552010-12-27 19:26:57 -0500387 bootentry_add(IPL_TYPE_CBFS, defPrio(prio, DEFAULT_PRIO), (u32)data, desc);
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500388}
389
390
391/****************************************************************
Kevin O'Connor0a924122009-02-08 19:43:47 -0500392 * Boot menu and BCV execution
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500393 ****************************************************************/
394
Kevin O'Connor73023002011-07-05 20:34:34 -0400395#define DEFAULT_BOOTMENU_WAIT 2500
396
Kevin O'Connor0a924122009-02-08 19:43:47 -0500397// Show IPL option menu.
398static void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500399interactive_bootmenu(void)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500400{
Kevin O'Connore7cc7642009-10-04 10:05:16 -0400401 if (! CONFIG_BOOTMENU || ! qemu_cfg_show_boot_menu())
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500402 return;
403
404 while (get_keystroke(0) >= 0)
405 ;
406
Kevin O'Connor57174c72012-12-21 22:52:50 -0500407 printf("\nPress F12 for boot menu.\n\n");
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500408
Kevin O'Connor73023002011-07-05 20:34:34 -0400409 u32 menutime = romfile_loadint("etc/boot-menu-wait", DEFAULT_BOOTMENU_WAIT);
Kevin O'Connor9a01a9c2010-08-25 21:07:48 -0400410 enable_bootsplash();
Kevin O'Connor73023002011-07-05 20:34:34 -0400411 int scan_code = get_keystroke(menutime);
Kevin O'Connor9a01a9c2010-08-25 21:07:48 -0400412 disable_bootsplash();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500413 if (scan_code != 0x86)
414 /* not F12 */
415 return;
416
417 while (get_keystroke(0) >= 0)
418 ;
419
420 printf("Select boot device:\n\n");
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400421 wait_threads();
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500422
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500423 // Show menu items
424 struct bootentry_s *pos = BootList;
425 int maxmenu = 0;
426 while (pos) {
427 char desc[60];
428 maxmenu++;
429 printf("%d. %s\n", maxmenu
430 , strtcpy(desc, pos->description, ARRAY_SIZE(desc)));
431 pos = pos->next;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500432 }
433
Kevin O'Connor551caa22010-12-29 13:25:18 -0500434 // Get key press
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500435 for (;;) {
436 scan_code = get_keystroke(1000);
Kevin O'Connor551caa22010-12-29 13:25:18 -0500437 if (scan_code >= 1 && scan_code <= maxmenu+1)
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500438 break;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500439 }
440 printf("\n");
Kevin O'Connor551caa22010-12-29 13:25:18 -0500441 if (scan_code == 0x01)
442 // ESC
443 return;
444
445 // Find entry and make top priority.
446 int choice = scan_code - 1;
447 struct bootentry_s **pprev = &BootList;
448 while (--choice)
449 pprev = &(*pprev)->next;
450 pos = *pprev;
451 *pprev = pos->next;
452 pos->next = BootList;
453 BootList = pos;
454 pos->priority = 0;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500455}
456
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500457// BEV (Boot Execution Vector) list
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500458struct bev_s {
459 int type;
460 u32 vector;
461};
462static struct bev_s BEV[20];
463static int BEVCount;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500464static int HaveHDBoot, HaveFDBoot;
465
Kevin O'Connor0a924122009-02-08 19:43:47 -0500466static void
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500467add_bev(int type, u32 vector)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500468{
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500469 if (type == IPL_TYPE_HARDDISK && HaveHDBoot++)
470 return;
471 if (type == IPL_TYPE_FLOPPY && HaveFDBoot++)
472 return;
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500473 if (BEVCount >= ARRAY_SIZE(BEV))
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500474 return;
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500475 struct bev_s *bev = &BEV[BEVCount++];
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500476 bev->type = type;
477 bev->vector = vector;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500478}
479
480// Prepare for boot - show menu and run bcvs.
481void
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500482boot_prep(void)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500483{
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400484 if (! CONFIG_BOOT) {
485 wait_threads();
Kevin O'Connor0a924122009-02-08 19:43:47 -0500486 return;
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400487 }
Kevin O'Connor0a924122009-02-08 19:43:47 -0500488
Kevin O'Connora5826b52009-10-24 17:57:29 -0400489 // XXX - show available drives?
490
Kevin O'Connor0a924122009-02-08 19:43:47 -0500491 // Allow user to modify BCV/IPL order.
492 interactive_bootmenu();
Kevin O'Connore438b0c2010-05-01 12:20:33 -0400493 wait_threads();
Kevin O'Connor0a924122009-02-08 19:43:47 -0500494
Kevin O'Connor54ae5432013-01-12 16:36:11 -0500495 int haltprio = find_prio("HALT");
496 if (haltprio >= 0)
497 bootentry_add(IPL_TYPE_HALT, haltprio, 0, "HALT");
498
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500499 // Map drives and populate BEV list
500 struct bootentry_s *pos = BootList;
501 while (pos) {
502 switch (pos->type) {
503 case IPL_TYPE_BCV:
504 call_bcv(pos->vector.seg, pos->vector.offset);
505 add_bev(IPL_TYPE_HARDDISK, 0);
506 break;
507 case IPL_TYPE_FLOPPY:
508 map_floppy_drive(pos->drive);
509 add_bev(IPL_TYPE_FLOPPY, 0);
510 break;
511 case IPL_TYPE_HARDDISK:
512 map_hd_drive(pos->drive);
513 add_bev(IPL_TYPE_HARDDISK, 0);
514 break;
515 case IPL_TYPE_CDROM:
516 map_cd_drive(pos->drive);
517 // NO BREAK
518 default:
519 add_bev(pos->type, pos->data);
520 break;
521 }
522 pos = pos->next;
523 }
Kevin O'Connorafd05202009-08-16 12:21:44 -0400524
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500525 // If nothing added a floppy/hd boot - add it manually.
526 add_bev(IPL_TYPE_FLOPPY, 0);
527 add_bev(IPL_TYPE_HARDDISK, 0);
Kevin O'Connor0a924122009-02-08 19:43:47 -0500528}
529
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500530
531/****************************************************************
532 * Boot code (int 18/19)
533 ****************************************************************/
534
Kevin O'Connor0a924122009-02-08 19:43:47 -0500535// Jump to a bootup entry point.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500536static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500537call_boot_entry(struct segoff_s bootsegip, u8 bootdrv)
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500538{
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500539 dprintf(1, "Booting from %04x:%04x\n", bootsegip.seg, bootsegip.offset);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500540 struct bregs br;
541 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400542 br.flags = F_IF;
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500543 br.code = bootsegip;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500544 // Set the magic number in ax and the boot drive in dl.
545 br.dl = bootdrv;
546 br.ax = 0xaa55;
Kevin O'Connorc7ffbac2012-03-25 11:04:10 -0400547 farcall16(&br);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500548}
549
550// Boot from a disk (either floppy or harddrive)
551static void
552boot_disk(u8 bootdrv, int checksig)
553{
554 u16 bootseg = 0x07c0;
555
556 // Read sector
557 struct bregs br;
558 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400559 br.flags = F_IF;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500560 br.dl = bootdrv;
561 br.es = bootseg;
562 br.ah = 2;
563 br.al = 1;
564 br.cl = 1;
565 call16_int(0x13, &br);
566
567 if (br.flags & F_CF) {
568 printf("Boot failed: could not read the boot disk\n\n");
569 return;
570 }
571
572 if (checksig) {
573 struct mbr_s *mbr = (void*)0;
574 if (GET_FARVAR(bootseg, mbr->signature) != MBR_SIGNATURE) {
575 printf("Boot failed: not a bootable disk\n\n");
576 return;
577 }
578 }
579
580 /* Canonicalize bootseg:bootip */
581 u16 bootip = (bootseg & 0x0fff) << 4;
582 bootseg &= 0xf000;
583
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500584 call_boot_entry(SEGOFF(bootseg, bootip), bootdrv);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500585}
586
587// Boot from a CD-ROM
588static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500589boot_cdrom(struct drive_s *drive_g)
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500590{
591 if (! CONFIG_CDROM_BOOT)
592 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500593 printf("Booting from DVD/CD...\n");
Gleb Natapov4c90a202010-12-07 13:50:54 +0200594
Gleb Natapov4c90a202010-12-07 13:50:54 +0200595 int status = cdrom_boot(drive_g);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500596 if (status) {
Kevin O'Connorecbcf772010-12-29 13:26:01 -0500597 printf("Boot failed: Could not read from CDROM (code %04x)\n", status);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500598 return;
599 }
600
Kevin O'Connord3140832012-05-13 22:46:12 -0400601 u8 bootdrv = CDEmu.emulated_extdrive;
602 u16 bootseg = CDEmu.load_segment;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500603 /* Canonicalize bootseg:bootip */
604 u16 bootip = (bootseg & 0x0fff) << 4;
605 bootseg &= 0xf000;
606
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500607 call_boot_entry(SEGOFF(bootseg, bootip), bootdrv);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500608}
609
Kevin O'Connore8f00ee2009-07-04 04:04:36 -0400610// Boot from a CBFS payload
Kevin O'Connor67823442009-04-13 14:14:51 -0400611static void
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500612boot_cbfs(struct cbfs_file *file)
Kevin O'Connor67823442009-04-13 14:14:51 -0400613{
Kevin O'Connord9c93612010-03-20 11:00:45 -0400614 if (!CONFIG_COREBOOT || !CONFIG_COREBOOT_FLASH)
Kevin O'Connor67823442009-04-13 14:14:51 -0400615 return;
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500616 printf("Booting from CBFS...\n");
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500617 cbfs_run_payload(file);
Kevin O'Connor67823442009-04-13 14:14:51 -0400618}
619
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500620// Boot from a BEV entry on an optionrom.
621static void
622boot_rom(u32 vector)
623{
624 printf("Booting from ROM...\n");
625 struct segoff_s so;
626 so.segoff = vector;
627 call_boot_entry(so, 0);
628}
629
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400630// Unable to find bootable device - warn user and eventually retry.
631static void
632boot_fail(void)
633{
Kevin O'Connord4f7d902013-03-05 17:52:21 +0800634 if (BootRetryTime == (u32)-1)
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400635 printf("No bootable device.\n");
636 else
Kevin O'Connord4f7d902013-03-05 17:52:21 +0800637 printf("No bootable device. Retrying in %d seconds.\n"
638 , BootRetryTime/1000);
639 // Wait for 'BootRetryTime' milliseconds and then reboot.
640 u32 end = calc_future_timer(BootRetryTime);
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400641 for (;;) {
Kevin O'Connord4f7d902013-03-05 17:52:21 +0800642 if (BootRetryTime != (u32)-1 && check_timer(end))
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400643 break;
Kevin O'Connor94c749c2012-05-28 11:44:02 -0400644 yield_toirq();
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400645 }
646 printf("Rebooting.\n");
647 struct bregs br;
648 memset(&br, 0, sizeof(br));
649 br.code = SEGOFF(SEG_BIOS, (u32)reset_vector);
Kevin O'Connorc7ffbac2012-03-25 11:04:10 -0400650 farcall16big(&br);
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400651}
652
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500653// Determine next boot method and attempt a boot using it.
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500654static void
Kevin O'Connor9d8e0a62012-05-13 12:23:58 -0400655do_boot(int seq_nr)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500656{
Kevin O'Connor40967022008-07-21 22:23:05 -0400657 if (! CONFIG_BOOT)
Kevin O'Connore07e18e2009-02-08 17:07:29 -0500658 panic("Boot support not compiled in.\n");
Kevin O'Connor40967022008-07-21 22:23:05 -0400659
Kevin O'Connorb8fcf462012-05-12 22:12:22 -0400660 if (seq_nr >= BEVCount)
661 boot_fail();
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500662
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500663 // Boot the given BEV type.
Kevin O'Connor7bb15842010-12-29 11:25:14 -0500664 struct bev_s *ie = &BEV[seq_nr];
Kevin O'Connorcadaf0e2010-07-26 23:47:26 -0400665 switch (ie->type) {
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400666 case IPL_TYPE_FLOPPY:
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500667 printf("Booting from Floppy...\n");
Kevin O'Connorbaaadb62010-12-29 11:18:04 -0500668 boot_disk(0x00, CheckFloppySig);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500669 break;
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400670 case IPL_TYPE_HARDDISK:
Kevin O'Connor72eee3e2010-12-27 19:07:49 -0500671 printf("Booting from Hard Disk...\n");
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500672 boot_disk(0x80, 1);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500673 break;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500674 case IPL_TYPE_CDROM:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500675 boot_cdrom((void*)ie->vector);
Kevin O'Connor67823442009-04-13 14:14:51 -0400676 break;
677 case IPL_TYPE_CBFS:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500678 boot_cbfs((void*)ie->vector);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500679 break;
680 case IPL_TYPE_BEV:
Kevin O'Connorf13a1802010-12-29 11:52:33 -0500681 boot_rom(ie->vector);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500682 break;
Kevin O'Connor54ae5432013-01-12 16:36:11 -0500683 case IPL_TYPE_HALT:
684 boot_fail();
685 break;
Kevin O'Connor180a9592008-03-04 22:50:53 -0500686 }
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500687
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500688 // Boot failed: invoke the boot recovery function
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400689 struct bregs br;
690 memset(&br, 0, sizeof(br));
Kevin O'Connorf8e800d2009-09-24 21:01:16 -0400691 br.flags = F_IF;
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400692 call16_int(0x18, &br);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500693}
694
Kevin O'Connor9d8e0a62012-05-13 12:23:58 -0400695int BootSequence VARLOW = -1;
696
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500697// Boot Failure recovery: try the next device.
Kevin O'Connor52a300f2009-12-26 23:32:57 -0500698void VISIBLE32FLAT
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500699handle_18(void)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500700{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400701 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400702 debug_enter(NULL, DEBUG_HDL_18);
Kevin O'Connor9d8e0a62012-05-13 12:23:58 -0400703 int seq = BootSequence + 1;
704 BootSequence = seq;
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400705 do_boot(seq);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500706}
707
708// INT 19h Boot Load Service Entry Point
Kevin O'Connor52a300f2009-12-26 23:32:57 -0500709void VISIBLE32FLAT
Kevin O'Connor1ca05b02010-01-03 17:43:37 -0500710handle_19(void)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500711{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400712 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400713 debug_enter(NULL, DEBUG_HDL_19);
Kevin O'Connor9d8e0a62012-05-13 12:23:58 -0400714 BootSequence = 0;
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400715 do_boot(0);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500716}