rom/dosboot/dosboot_init.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Boot AROS
   6     Lang: english
   7 */
   8
   9 #include <string.h>
  10 #include <stdlib.h>
  11
  12 #include <aros/debug.h>
  13 #include <exec/alerts.h>
  14 #include <aros/asmcall.h>
  15 #include <aros/bootloader.h>
  16 #include <exec/lists.h>
  17 #include <exec/memory.h>
  18 #include <exec/resident.h>
  19 #include <exec/types.h>
  20 #include <libraries/configvars.h>
  21 #include <libraries/expansion.h>
  22 #include <libraries/expansionbase.h>
  23 #include <libraries/partition.h>
  24 #include <utility/tagitem.h>
  25 #include <devices/bootblock.h>
  26 #include <devices/timer.h>
  27 #include <dos/dosextens.h>
  28 #include <resources/filesysres.h>
  29
  30 #include <proto/exec.h>
  31 #include <proto/expansion.h>
  32 #include <proto/partition.h>
  33 #include <proto/bootloader.h>
  34
  35 #include LC_LIBDEFS_FILE
  36
  37 #include "dosboot_intern.h"
  38 #include "menu.h"
  39
  40 /* Delay just like Dos/Delay(), ticks are
  41  * in 1/50th of a second.
  42  */
  43 static void bootDelay(ULONG timeout)
  44 {
  45     struct timerequest  timerio;
  46     struct MsgPort      timermp;
  47
  48     memset(&timermp, 0, sizeof(timermp));
  49
  50     timermp.mp_Node.ln_Type = NT_MSGPORT;
  51     timermp.mp_Flags        = PA_SIGNAL;
  52     timermp.mp_SigBit       = SIGB_SINGLE;
  53     timermp.mp_SigTask      = FindTask(NULL);
  54     NEWLIST(&timermp.mp_MsgList);
  55
  56     timerio.tr_node.io_Message.mn_Node.ln_Type = NT_REPLYMSG;
  57     timerio.tr_node.io_Message.mn_ReplyPort    = &timermp;
  58     timerio.tr_node.io_Message.mn_Length       = sizeof(timermp);
  59
  60     if (OpenDevice("timer.device", UNIT_VBLANK, (struct IORequest *)&timerio, 0) != 0) {
  61         D(bug("dosboot: Can't open timer.device unit 0\n"));
  62         return;
  63     }
  64
  65     timerio.tr_node.io_Command                 = TR_ADDREQUEST;
  66     timerio.tr_time.tv_secs                    = timeout / TICKS_PER_SECOND;
  67     timerio.tr_time.tv_micro                   = 1000000UL / TICKS_PER_SECOND * (timeout % TICKS_PER_SECOND);
  68
  69     SetSignal(0, SIGF_SINGLE);
  70
  71     DoIO(&timerio.tr_node);
  72
  73     CloseDevice((struct IORequest *)&timerio);
  74 }
  75
  76 int dosboot_Init(LIBBASETYPEPTR LIBBASE)
  77 {
  78     struct ExpansionBase *ExpansionBase;
  79     void *BootLoaderBase;
  80     BOOL WantBootMenu = FALSE;
  81     ULONG t;
  82
  83     LIBBASE->delayTicks = 50;
  84
  85     D(bug("dosboot_Init: GO GO GO!\n"));
  86
  87     ExpansionBase = (APTR)OpenLibrary("expansion.library", 0);
  88
  89     D(bug("[Strap] ExpansionBase 0x%p\n", ExpansionBase));
  90     if( ExpansionBase == NULL )
  91     {
  92         D(bug( "Could not open expansion.library, something's wrong!\n"));
  93         Alert(AT_DeadEnd | AG_OpenLib | AN_BootStrap | AO_ExpansionLib);
  94     }
  95
  96     ExpansionBase->Flags |= EBF_SILENTSTART;
  97
  98     LIBBASE->bm_ExpansionBase = ExpansionBase;
  99
 100     /*
 101      * Search the kernel parameters for the bootdelay=%d string. It determines the
 102      * delay in seconds.
 103      */
 104     if ((BootLoaderBase = OpenResource("bootloader.resource")) != NULL)
 105     {
 106         struct List *args = GetBootInfo(BL_Args);
 107
 108         if (args)
 109         {
 110             struct Node *node;
 111
 112             ForeachNode(args, node)
 113             {
 114                 if (0 == strncmp(node->ln_Name, "bootdelay=", 10))
 115                 {
 116                     ULONG delay = atoi(&node->ln_Name[10]);
 117
 118                     D(bug("[Boot] delay of %d seconds requested.", delay));
 119                     if (delay)
 120                         bootDelay(delay * 50);
 121                 }
 122                 else if (0 == stricmp(node->ln_Name, "bootmenu"))
 123                 {
 124                     D(bug("[BootMenu] bootmenu_Init: Forced with bootloader argument\n"));
 125                     WantBootMenu = TRUE;
 126                 }
 127                 /*
 128                  * TODO: The following two flags should have corresponding switches
 129                  * in 'display options' page.
 130                  */
 131                 else if (0 == stricmp(node->ln_Name, "nomonitors"))
 132                 {
 133                     LIBBASE->db_BootFlags |= BF_NO_DISPLAY_DRIVERS;
 134                 }
 135                 else if (0 == stricmp(node->ln_Name, "nocomposition"))
 136                 {
 137                     LIBBASE->db_BootFlags |= BF_NO_COMPOSITION;
 138                 }
 139                 else if (0 == strnicmp(node->ln_Name, "bootdevice=", 11))
 140                 {
 141                     LIBBASE->db_BootDevice = &node->ln_Name[11];
 142                     selectBootDevice(LIBBASE);
 143                 }
 144             }
 145         }
 146     }
 147
 148     /* Scan for any additional partition volumes */
 149     dosboot_BootScan(LIBBASE);
 150
 151     /* Show the boot menu if needed */
 152     bootmenu_Init(LIBBASE, WantBootMenu);
 153
 154     /* We want to be able to find ourselves in RTF_AFTERDOS */
 155     LIBBASE->bm_Screen = NULL;
 156     AddResource(&LIBBASE->db_Node);
 157
 158     /* Attempt to boot until we succeed */
 159     for (;;)
 160     {
 161         dosboot_BootStrap(LIBBASE);
 162
 163         if (!LIBBASE->bm_Screen)
 164             LIBBASE->bm_Screen = NoBootMediaScreen(LIBBASE);
 165
 166         D(bug("No bootable disk was found.\n"));
 167         D(bug("Please insert a bootable disk in any drive.\n"));
 168         D(bug("Retrying in 3 seconds...\n"));
 169
 170         for (t = 0; t < 150; t += LIBBASE->delayTicks)
 171         {
 172             bootDelay(LIBBASE->delayTicks);
 173
 174             if (LIBBASE->bm_Screen)
 175                 anim_Animate(LIBBASE->bm_Screen, LIBBASE);
 176         }
 177     }
 178
 179     /* We never get here */
 180     return FALSE;
 181 }
 182
 183 ADD2INITLIB(dosboot_Init, 1)