sys/arch/i386/stand/boot/boot2.c

   1 /*      $NetBSD: boot2.c,v 1.60 2013/08/30 16:42:17 jmcneill Exp $      */
   2
   3 /*-
   4  * Copyright (c) 2008, 2009 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  17  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  18  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  20  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  26  * POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 /*
  30  * Copyright (c) 2003
  31  *      David Laight.  All rights reserved
  32  * Copyright (c) 1996, 1997, 1999
  33  *      Matthias Drochner.  All rights reserved.
  34  * Copyright (c) 1996, 1997
  35  *      Perry E. Metzger.  All rights reserved.
  36  * Copyright (c) 1997
  37  *      Jason R. Thorpe.  All rights reserved
  38  *
  39  * Redistribution and use in source and binary forms, with or without
  40  * modification, are permitted provided that the following conditions
  41  * are met:
  42  * 1. Redistributions of source code must retain the above copyright
  43  *    notice, this list of conditions and the following disclaimer.
  44  * 2. Redistributions in binary form must reproduce the above copyright
  45  *    notice, this list of conditions and the following disclaimer in the
  46  *    documentation and/or other materials provided with the distribution.
  47  * 3. All advertising materials mentioning features or use of this software
  48  *    must display the following acknowledgements:
  49  *      This product includes software developed for the NetBSD Project
  50  *      by Matthias Drochner.
  51  *      This product includes software developed for the NetBSD Project
  52  *      by Perry E. Metzger.
  53  * 4. The names of the authors may not be used to endorse or promote products
  54  *    derived from this software without specific prior written permission.
  55  *
  56  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  57  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  58  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  59  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  60  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  61  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  62  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  63  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  64  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  65  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  66  */
  67
  68 /* Based on stand/biosboot/main.c */
  69
  70 #include <sys/types.h>
  71 #include <sys/reboot.h>
  72 #include <sys/bootblock.h>
  73
  74 #include <lib/libsa/stand.h>
  75 #include <lib/libsa/ufs.h>
  76 #include <lib/libkern/libkern.h>
  77
  78 #include <libi386.h>
  79 #include <bootmod.h>
  80 #include <bootmenu.h>
  81 #include <vbe.h>
  82 #include "devopen.h"
  83
  84 #ifdef SUPPORT_PS2
  85 #include <biosmca.h>
  86 #endif
  87
  88 extern struct x86_boot_params boot_params;
  89
  90 extern  const char bootprog_name[], bootprog_rev[], bootprog_kernrev[];
  91
  92 int errno;
  93
  94 int boot_biosdev;
  95 daddr_t boot_biossector;
  96
  97 static const char * const names[][2] = {
  98         { "netbsd", "netbsd.gz" },
  99         { "onetbsd", "onetbsd.gz" },
 100         { "netbsd.old", "netbsd.old.gz" },
 101 };
 102
 103 #define NUMNAMES (sizeof(names)/sizeof(names[0]))
 104 #define DEFFILENAME names[0][0]
 105
 106 #define MAXDEVNAME 16
 107
 108 static char *default_devname;
 109 static int default_unit, default_partition;
 110 static const char *default_filename;
 111
 112 char *sprint_bootsel(const char *);
 113 void bootit(const char *, int, int);
 114 void print_banner(void);
 115 void boot2(int, uint64_t);
 116
 117 void    command_help(char *);
 118 void    command_ls(char *);
 119 void    command_quit(char *);
 120 void    command_boot(char *);
 121 void    command_dev(char *);
 122 void    command_consdev(char *);
 123 #ifndef SMALL
 124 void    command_menu(char *);
 125 #endif
 126 void    command_modules(char *);
 127 void    command_multiboot(char *);
 128 #ifdef __minix
 129 void    command_load_mods(char *);
 130 #endif
 131
 132 const struct bootblk_command commands[] = {
 133         { "help",       command_help },
 134         { "?",          command_help },
 135         { "ls",         command_ls },
 136         { "quit",       command_quit },
 137         { "boot",       command_boot },
 138         { "dev",        command_dev },
 139         { "consdev",    command_consdev },
 140 #ifndef SMALL
 141         { "menu",       command_menu },
 142 #endif
 143         { "modules",    command_modules },
 144         { "load",       module_add },
 145 #ifdef __minix
 146         { "load_mods",  command_load_mods },
 147 #endif
 148         { "multiboot",  command_multiboot },
 149         { "vesa",       command_vesa },
 150         { "splash",     splash_add },
 151         { "rndseed",    rnd_add },
 152         { "fs",         fs_add },
 153         { "userconf",   userconf_add },
 154         { NULL,         NULL },
 155 };
 156
 157 int
 158 parsebootfile(const char *fname, char **fsname, char **devname,
 159               int *unit, int *partition, const char **file)
 160 {
 161         const char *col;
 162
 163         *fsname = "ufs";
 164         *devname = default_devname;
 165         *unit = default_unit;
 166         *partition = default_partition;
 167         *file = default_filename;
 168
 169         if (fname == NULL)
 170                 return 0;
 171
 172         if ((col = strchr(fname, ':')) != NULL) {       /* device given */
 173                 static char savedevname[MAXDEVNAME+1];
 174                 int devlen;
 175                 int u = 0, p = 0;
 176                 int i = 0;
 177
 178                 devlen = col - fname;
 179                 if (devlen > MAXDEVNAME)
 180                         return EINVAL;
 181
 182 #define isvalidname(c) ((c) >= 'a' && (c) <= 'z')
 183                 if (!isvalidname(fname[i]))
 184                         return EINVAL;
 185                 do {
 186                         savedevname[i] = fname[i];
 187                         i++;
 188                 } while (isvalidname(fname[i]));
 189                 savedevname[i] = '\0';
 190
 191 #define isnum(c) ((c) >= '0' && (c) <= '9')
 192                 if (i < devlen) {
 193                         if (!isnum(fname[i]))
 194                                 return EUNIT;
 195                         do {
 196                                 u *= 10;
 197                                 u += fname[i++] - '0';
 198                         } while (isnum(fname[i]));
 199                 }
 200
 201 #define isvalidpart(c) ((c) >= 'a' && (c) <= 'z')
 202                 if (i < devlen) {
 203                         if (!isvalidpart(fname[i]))
 204                                 return EPART;
 205                         p = fname[i++] - 'a';
 206                 }
 207
 208                 if (i != devlen)
 209                         return ENXIO;
 210
 211                 *devname = savedevname;
 212                 *unit = u;
 213                 *partition = p;
 214                 fname = col + 1;
 215         }
 216
 217         if (*fname)
 218                 *file = fname;
 219
 220         return 0;
 221 }
 222
 223 char *
 224 sprint_bootsel(const char *filename)
 225 {
 226         char *fsname, *devname;
 227         int unit, partition;
 228         const char *file;
 229         static char buf[80];
 230
 231         if (parsebootfile(filename, &fsname, &devname, &unit,
 232                           &partition, &file) == 0) {
 233                 sprintf(buf, "%s%d%c:%s", devname, unit, 'a' + partition, file);
 234                 return buf;
 235         }
 236         return "(invalid)";
 237 }
 238
 239 static void
 240 clearit(void)
 241 {
 242
 243         if (bootconf.clear)
 244                 clear_pc_screen();
 245 }
 246
 247 void
 248 bootit(const char *filename, int howto, int tell)
 249 {
 250
 251         if (tell) {
 252                 printf("booting %s", sprint_bootsel(filename));
 253                 if (howto)
 254                         printf(" (howto 0x%x)", howto);
 255                 printf("\n");
 256         }
 257
 258         if (exec_netbsd(filename, 0, howto, boot_biosdev < 0x80, clearit) < 0)
 259                 printf("boot: %s: %s\n", sprint_bootsel(filename),
 260                        strerror(errno));
 261         else
 262                 printf("boot returned\n");
 263 }
 264
 265 void
 266 print_banner(void)
 267 {
 268
 269         clearit();
 270 #ifndef SMALL
 271         int n;
 272         if (bootconf.banner[0]) {
 273                 for (n = 0; bootconf.banner[n] && n < MAXBANNER; n++)
 274                         printf("%s\n", bootconf.banner[n]);
 275         } else {
 276 #endif /* !SMALL */
 277 #ifndef __minix
 278                 printf("\n"
 279                        ">> %s, Revision %s (from NetBSD %s)\n"
 280                        ">> Memory: %d/%d k\n",
 281                        bootprog_name, bootprog_rev, bootprog_kernrev,
 282                        getbasemem(), getextmem());
 283 #else
 284                 printf("\n"
 285                         "--- Welcome to MINIX 3. This is the boot monitor. ---\n"
 286                         "Memory: %d/%d k\n",
 287                         getbasemem(), getextmem());
 288 #endif
 289
 290 #ifndef SMALL
 291         }
 292 #endif /* !SMALL */
 293 }
 294
 295 /*
 296  * Called from the initial entry point boot_start in biosboot.S
 297  *
 298  * biosdev: BIOS drive number the system booted from
 299  * biossector: Sector number of the NetBSD partition
 300  */
 301 void
 302 boot2(int biosdev, uint64_t biossector)
 303 {
 304         extern char twiddle_toggle;
 305         int currname;
 306         char c;
 307
 308         twiddle_toggle = 1;     /* no twiddling until we're ready */
 309
 310         initio(boot_params.bp_consdev);
 311
 312 #ifdef SUPPORT_PS2
 313         biosmca();
 314 #endif
 315         gateA20();
 316
 317         boot_modules_enabled = !(boot_params.bp_flags
 318                                  & X86_BP_FLAGS_NOMODULES);
 319         if (boot_params.bp_flags & X86_BP_FLAGS_RESET_VIDEO)
 320                 biosvideomode();
 321
 322         vbe_init();
 323
 324         /* need to remember these */
 325         boot_biosdev = biosdev;
 326         boot_biossector = biossector;
 327
 328         /* try to set default device to what BIOS tells us */
 329         bios2dev(biosdev, biossector, &default_devname, &default_unit,
 330                  &default_partition);
 331
 332         /* if the user types "boot" without filename */
 333         default_filename = DEFFILENAME;
 334
 335 #ifndef SMALL
 336         if (!(boot_params.bp_flags & X86_BP_FLAGS_NOBOOTCONF)) {
 337                 parsebootconf(BOOTCONF);
 338         } else {
 339                 bootconf.timeout = boot_params.bp_timeout;
 340         }
 341
 342
 343         /*
 344          * If console set in boot.cfg, switch to it.
 345          * This will print the banner, so we don't need to explicitly do it
 346          */
 347         if (bootconf.consdev)
 348                 command_consdev(bootconf.consdev);
 349         else
 350                 print_banner();
 351
 352         /* Display the menu, if applicable */
 353         twiddle_toggle = 0;
 354         if (bootconf.nummenu > 0) {
 355                 /* Does not return */
 356                 doboottypemenu();
 357         }
 358
 359 #else
 360         twiddle_toggle = 0;
 361         print_banner();
 362 #endif
 363
 364         printf("Press return to boot now, any other key for boot menu\n");
 365         for (currname = 0; currname < NUMNAMES; currname++) {
 366                 printf("booting %s - starting in ",
 367                        sprint_bootsel(names[currname][0]));
 368
 369 #ifdef SMALL
 370                 c = awaitkey(boot_params.bp_timeout, 1);
 371 #else
 372                 c = awaitkey((bootconf.timeout < 0) ? 0 : bootconf.timeout, 1);
 373 #endif
 374                 if ((c != '\r') && (c != '\n') && (c != '\0')) {
 375                     if ((boot_params.bp_flags & X86_BP_FLAGS_PASSWORD) == 0) {
 376                         /* do NOT ask for password */
 377                         bootmenu(); /* does not return */
 378                     } else {
 379                         /* DO ask for password */
 380                         if (check_password((char *)boot_params.bp_password)) {
 381                             /* password ok */
 382                             printf("type \"?\" or \"help\" for help.\n");
 383                             bootmenu(); /* does not return */
 384                         } else {
 385                             /* bad password */
 386                             printf("Wrong password.\n");
 387                             currname = 0;
 388                             continue;
 389                         }
 390                     }
 391                 }
 392
 393                 /*
 394                  * try pairs of names[] entries, foo and foo.gz
 395                  */
 396                 /* don't print "booting..." again */
 397                 bootit(names[currname][0], 0, 0);
 398                 /* since it failed, try compressed bootfile. */
 399                 bootit(names[currname][1], 0, 1);
 400         }
 401
 402         bootmenu();     /* does not return */
 403 }
 404
 405 /* ARGSUSED */
 406 void
 407 command_help(char *arg)
 408 {
 409
 410         printf("commands are:\n"
 411                "boot [xdNx:][filename] [-12acdqsvxz]\n"
 412                "     (ex. \"hd0a:netbsd.old -s\"\n"
 413                "ls [path]\n"
 414                "dev xd[N[x]]:\n"
 415                "consdev {pc|com[0123]|com[0123]kbd|auto}\n"
 416                "vesa {modenum|on|off|enabled|disabled|list}\n"
 417 #ifndef SMALL
 418                "menu (reenters boot menu, if defined in boot.cfg)\n"
 419 #endif
 420                "modules {on|off|enabled|disabled}\n"
 421                "load {path_to_module}\n"
 422 #if defined(__minix)
 423                "load_mods {path_to_modules}, pattern might be used\n"
 424 #endif /* defined(__minix) */
 425                "multiboot [xdNx:][filename] [<args>]\n"
 426                "userconf {command}\n"
 427                "rndseed {path_to_rndseed_file}\n"
 428                "help|?\n"
 429                "quit\n");
 430 }
 431
 432 void
 433 command_ls(char *arg)
 434 {
 435         const char *save = default_filename;
 436
 437         default_filename = "/";
 438 #if !defined(__minix)
 439         ls(arg);
 440 #else
 441         ls(arg, NULL);
 442 #endif /* !defined(__minix) */
 443         default_filename = save;
 444 }
 445
 446 #if defined(__minix)
 447 void
 448 command_load_mods(char *arg)
 449 {
 450         const char *save = default_filename;
 451
 452         default_filename = "/";
 453         ls(arg, module_add);
 454         default_filename = save;
 455 }
 456 #endif /* defined(__minix) */
 457
 458 /* ARGSUSED */
 459 void
 460 command_quit(char *arg)
 461 {
 462
 463         printf("Exiting...\n");
 464         delay(1000000);
 465         reboot();
 466         /* Note: we shouldn't get to this point! */
 467         panic("Could not reboot!");
 468 }
 469
 470 void
 471 command_boot(char *arg)
 472 {
 473         char *filename;
 474         int howto, tell;
 475
 476         if (!parseboot(arg, &filename, &howto))
 477                 return;
 478
 479         tell = ((howto & AB_VERBOSE) != 0);
 480         if (filename != NULL) {
 481                 bootit(filename, howto, tell);
 482         } else {
 483                 int i;
 484
 485 #ifndef SMALL
 486                 bootdefault();
 487 #endif
 488                 for (i = 0; i < NUMNAMES; i++) {
 489                         bootit(names[i][0], howto, tell);
 490                         bootit(names[i][1], howto, tell);
 491                 }
 492         }
 493 }
 494
 495 void
 496 command_dev(char *arg)
 497 {
 498         static char savedevname[MAXDEVNAME + 1];
 499         char *fsname, *devname;
 500         const char *file; /* dummy */
 501
 502         if (*arg == '\0') {
 503                 biosdisk_probe();
 504                 printf("default %s%d%c\n", default_devname, default_unit,
 505                        'a' + default_partition);
 506                 return;
 507         }
 508
 509         if (strchr(arg, ':') == NULL ||
 510             parsebootfile(arg, &fsname, &devname, &default_unit,
 511                           &default_partition, &file)) {
 512                 command_help(NULL);
 513                 return;
 514         }
 515
 516         /* put to own static storage */
 517         strncpy(savedevname, devname, MAXDEVNAME + 1);
 518         default_devname = savedevname;
 519 }
 520
 521 static const struct cons_devs {
 522         const char      *name;
 523         u_int           tag;
 524 } cons_devs[] = {
 525         { "pc",         CONSDEV_PC },
 526         { "com0",       CONSDEV_COM0 },
 527         { "com1",       CONSDEV_COM1 },
 528         { "com2",       CONSDEV_COM2 },
 529         { "com3",       CONSDEV_COM3 },
 530         { "com0kbd",    CONSDEV_COM0KBD },
 531         { "com1kbd",    CONSDEV_COM1KBD },
 532         { "com2kbd",    CONSDEV_COM2KBD },
 533         { "com3kbd",    CONSDEV_COM3KBD },
 534         { "auto",       CONSDEV_AUTO },
 535         { NULL,         0 }
 536 };
 537
 538 void
 539 command_consdev(char *arg)
 540 {
 541         const struct cons_devs *cdp;
 542
 543         for (cdp = cons_devs; cdp->name; cdp++) {
 544                 if (strcmp(arg, cdp->name) == 0) {
 545                         initio(cdp->tag);
 546                         print_banner();
 547                         return;
 548                 }
 549         }
 550         printf("invalid console device.\n");
 551 }
 552
 553 #ifndef SMALL
 554 /* ARGSUSED */
 555 void
 556 command_menu(char *arg)
 557 {
 558
 559         if (bootconf.nummenu > 0) {
 560                 /* Does not return */
 561                 doboottypemenu();
 562         } else {
 563                 printf("No menu defined in boot.cfg\n");
 564         }
 565 }
 566 #endif /* !SMALL */
 567
 568 void
 569 command_modules(char *arg)
 570 {
 571
 572         if (strcmp(arg, "enabled") == 0 ||
 573             strcmp(arg, "on") == 0)
 574                 boot_modules_enabled = true;
 575         else if (strcmp(arg, "disabled") == 0 ||
 576             strcmp(arg, "off") == 0)
 577                 boot_modules_enabled = false;
 578         else
 579                 printf("invalid flag, must be 'enabled' or 'disabled'.\n");
 580 }
 581
 582 void
 583 command_multiboot(char *arg)
 584 {
 585         char *filename;
 586
 587         filename = arg;
 588         if (exec_multiboot(filename, gettrailer(arg)) < 0)
 589                 printf("multiboot: %s: %s\n", sprint_bootsel(filename),
 590                        strerror(errno));
 591         else
 592                 printf("boot returned\n");
 593 }
 594