wok-current annotate linld/stuff/src/LOAD.CPP @ rev 19571

linld: large image support with VCPI
author Pascal Bellard <pascal.bellard@slitaz.org>
date Thu Dec 22 21:06:17 2016 +0100 (2016-12-22)
parents 7f92b23984dc
children 23fc786c04e8
rev   line source
pascal@19515 1 // This file is distributed under GPL
pascal@19515 2
pascal@19515 3 #include "crtl.h"
pascal@19515 4 #include "common.h"
pascal@19515 5
pascal@19515 6 /***************
pascal@19515 7 Memory layout assumed by kernel boot process
pascal@19515 8 --------------------------------------------
pascal@19515 9 Note: claims that kernel setup is relocatable are
pascal@19515 10 still not 100% valid:
pascal@19515 11 bzImage decompressing trashes 10000-8ffff range,
pascal@19515 12 so rm loader -> pm kernel info is lost if it was here...
pascal@19515 13 So I had to stick to 90000.
pascal@19515 14
pascal@19515 15 10000000+------------------------+ <- 256m
pascal@19515 16 | initrd | initrd is at top of mem, but
pascal@19515 17 | | not higher than 256m
pascal@19515 18 +------------------------+
pascal@19515 19 +------------------------+
pascal@19515 20 | bzImage | bzImage is at 1m
pascal@19515 21 | | VCPI/XMS/64k offset tricks used...
pascal@19515 22 00100000+------------------------+ <- 1m
pascal@19515 23 | video, BIOS etc | Do not use.
pascal@19515 24 000A0000+------------------------+
pascal@19515 25 | Reserved for BIOS | Do not use. Reserved for BIOS EBDA.
pascal@19515 26 0009A000+------------------------+ <- stack top for kernel rm code
pascal@19515 27 | Cmdline |
pascal@19515 28 00098000+------------------------+ <- heap top for kernel rm code
pascal@19515 29 | Kernel setup | The kernel real-mode code.
pascal@19515 30 00090200+------------------------+
pascal@19515 31 | Kernel boot sector | The kernel legacy boot sector.
pascal@19515 32 00090000+------------------------+
pascal@19515 33 | Zapped by ungzip | Historically zImages were loaded here
pascal@19515 34 | (zImage once was here) | bzImages use this space for ungzipping
pascal@19515 35 00010000+------------------------+
pascal@19515 36 | Boot loader | <- Boot sector entry point 0000:7C00
pascal@19515 37 00001000+------------------------+
pascal@19515 38 | Reserved for MBR/BIOS |
pascal@19515 39 00000800+------------------------+
pascal@19515 40 | Typically used by MBR |
pascal@19515 41 00000600+------------------------+
pascal@19515 42 | BIOS use only |
pascal@19515 43 00000000+------------------------+
pascal@19515 44 */
pascal@19515 45
pascal@19538 46 struct kernelparams_t {
pascal@19515 47 u8 setup_sects; // 01F1 The size of the setup in sectors
pascal@19515 48 // boot sector is NOT included here
pascal@19515 49 u16 ro_flag; // 01F2 If set, the root is mounted readonly
pascal@19515 50 u16 syssize; // 01F4 DO NOT USE - for bootsect.S use only:
pascal@19515 51 // size of pm part of kernel
pascal@19515 52 // (in 16 byte units, rounded up)
pascal@19515 53 u16 swap_dev; // 01F6 DO NOT USE - obsolete
pascal@19515 54 u16 ram_size; // 01F8 DO NOT USE - for bootsect.S use only:
pascal@19515 55 // if nonzero then kernel
pascal@19515 56 // (driver/block/ramdisk.c: rd_load())
pascal@19515 57 // will try to load the contents for the ramdisk
pascal@19515 58 // from the "root_dev" which MUST then have the
pascal@19515 59 // floppyMAJOR
pascal@19515 60 // The file-system on that floppy must be MINIX
pascal@19515 61 // If rd_load() succeeds it sets the root_dev
pascal@19515 62 // to the ramdisk for mounting it
pascal@19515 63 u16 vid_mode; // 01FA Video mode control
pascal@19515 64 u16 root_dev; // 01FC Default root device number
pascal@19515 65 u16 boot_flag; // 01FE 0xAA55 magic number
pascal@19515 66 u16 jump; // 0200 Jump instruction
pascal@19515 67 u32 header; // 0202 Magic signature "HdrS"
pascal@19515 68 u16 version; // 0206 Boot protocol version supported
pascal@19515 69 u16 realmode_switch_ofs; // 0208 Hook called just before rm->pm
pascal@19515 70 u16 realmode_switch_seg;
pascal@19515 71 u16 start_sys_seg; // 020E
pascal@19515 72 u16 kernel_version; // 020C Points to kernel version string
pascal@19515 73 u8 type_of_loader; // 0210 Boot loader identifier
pascal@19515 74 u8 loadflags; // 0211 Boot protocol option flags
pascal@19515 75 u16 setup_move_size;// 0212 Move to high memory size (used with hooks)
pascal@19515 76 u32 code32_start; // 0214 Boot loader hook (see below)
pascal@19515 77 u32 initrd_buf; // 0218 initrd load address (set by boot loader)
pascal@19515 78 u32 initrd_size; // 021C initrd size (set by boot loader)
pascal@19515 79 u32 bootsect_kludge;// 0220 DO NOT USE - for bootsect.S use only
pascal@19515 80 u16 heap_end_ptr; // 0224 Free memory after setup end
pascal@19515 81 u16 pad1; // 0226 Unused
pascal@19515 82 u32 cmd_line_ptr; // 0228 32-bit pointer to the kernel command line
pascal@19515 83 u8 pad30[0x400-0x22c]; // 022C
pascal@19515 84 // 02D0 up to 32 20-byte mem info structs from
pascal@19515 85 // int 0x15 fn 0xe820
pascal@19515 86 }; //__attribute((packed));
pascal@19515 87
pascal@19538 88 struct first1k_t {
pascal@19538 89 // these two set by rm setup:
pascal@19538 90 u16 curr_curs; // 0000 saved cursor position
pascal@19538 91 u16 ext_mem_size; // 0002 extended memory size in Kb (from int 0x15 fn 0x88)
pascal@19538 92 u8 pad00[0x20-4];
pascal@19538 93 // old-style cmdline (not used in LINLD (yet?))
pascal@19538 94 u16 cl_magic; // 0020 commandline magic number (=0xA33F)
pascal@19538 95 u16 cl_ofs; // 0022 commandline offset
pascal@19538 96 u8 pad10[0x80-0x24];
pascal@19538 97 // these two set by rm setup:
pascal@19538 98 u8 hd0_disk_par[16]; // 0080 hd0-disk-parameter from intvector 0x41
pascal@19538 99 u8 hd1_disk_par[16]; // 0090 hd1-disk-parameter from intvector 0x46
pascal@19538 100 u8 pad20[0x01e0-0xa0];
pascal@19538 101 // this is set by rm setup:
pascal@19538 102 u32 alt_mem_size; // 01E0 extended memory size in Kb (from int 0x15 fn 0xe801)
pascal@19571 103 u8 pad28[0x01f1-0x1e4];
pascal@19538 104 struct kernelparams_t params;
pascal@19538 105 }; //__attribute((packed));
pascal@19538 106
pascal@19515 107 #if sizeof(first1k_t)!=0x400
pascal@19515 108 #error BUG: Bad first1k
pascal@19515 109 #endif
pascal@19515 110
pascal@19515 111 const u32 HdrS = 'H' + ('d'<<8) + (u32('r')<<16) + (u32('S')<<24);
pascal@19515 112
pascal@19515 113 u8* rm_buf;
pascal@19571 114 u16 rm_size;
pascal@19515 115 u8 pm_high;
pascal@19571 116 extern struct image_himem pm, initrd;
pascal@19515 117
pascal@19515 118 // register value to launch the kernel real mode code
pascal@19515 119 #ifdef NO386
pascal@19515 120 static u32 csip;
pascal@19515 121 extern "C" u16 topseg();
pascal@19515 122 #else
pascal@19515 123 static u32 csip=0x90200000;
pascal@19515 124 #define topseg() 0x9000
pascal@19515 125 #endif
pascal@19515 126
pascal@19515 127 static const char kernel_file_error[] = "Can't use kernel file";
pascal@19515 128 char* load_kernel() {
pascal@19515 129
pascal@19515 130 #ifdef NO386
pascal@19515 131 csip=((u32)(topseg()+0x20)<<16);
pascal@19515 132 #endif
pascal@19515 133 // Open kernel, read first kb, check it
pascal@19515 134 pm.errmsg = kernel_file_error;
pascal@19515 135 open_image(kernel_name, &pm);
pascal@19515 136
pascal@19515 137 char *version_string;
pascal@19515 138 {
pascal@19515 139 struct first1k_t *first1k;
pascal@19538 140 struct kernelparams_t *kernelparams;
pascal@19515 141 first1k = (first1k_t*) (rm_buf = malloc_or_die(_32k));
pascal@19538 142 kernelparams = &first1k->params;
pascal@19515 143 {
pascal@19515 144 u16 rm_seek;
pascal@19515 145
pascal@19515 146 // Do not use malloc below until heap_top adjustment (see <*>)
pascal@19515 147 if (read(pm.fd, rm_buf, rm_seek=0x400) != 0x400) {
pascal@19515 148 readfail:
pascal@19515 149 die(kernel_file_error);
pascal@19515 150 }
pascal@19515 151
pascal@19571 152 if(kernelparams->setup_sects == 0) {
pascal@19515 153 #if 1
pascal@19515 154 if(* (int *) &first1k->pad10[0x3F-0x24] == 0x3AE8) {
pascal@19571 155 lseekset(pm.fd,rm_seek=0x200);
pascal@19515 156 csip=((u32)topseg()<<16)+0x0042;
pascal@19515 157 }
pascal@19515 158 else
pascal@19515 159 #endif
pascal@19538 160 kernelparams->setup_sects=4;
pascal@19515 161 }
pascal@19538 162 rm_size = 0x200*(kernelparams->setup_sects+1); // 0th sector is not counted there
pascal@19538 163 if(rm_size>_32k || kernelparams->boot_flag != 0xAA55)
pascal@19515 164 die("It's not a kernel");
pascal@19515 165 heap_top = rm_buf+rm_size; // <*>
pascal@19515 166
pascal@19515 167 // Read remaining rm loader
pascal@19515 168
pascal@19515 169 {
pascal@19515 170 u16 cnt = rm_size-rm_seek;
pascal@19515 171 if (read(pm.fd, rm_buf+rm_seek, cnt) != cnt) goto readfail;
pascal@19515 172 }
pascal@19515 173 }
pascal@19515 174
pascal@19515 175 // Tell rm loader some info
pascal@19515 176
pascal@19538 177 if(vid_mode) kernelparams->vid_mode = vid_mode;
pascal@19538 178 if(root_dev) kernelparams->root_dev = root_dev;
pascal@19515 179 version_string = 0;
pascal@19515 180
pascal@19515 181 #if 1
pascal@19538 182 if(kernelparams->header == HdrS) { // starting linux 1.3.73
pascal@19538 183 if(kernelparams->loadflags & 1) {
pascal@19515 184 #else
pascal@19538 185 if((kernelparams->header != HdrS) || (kernelparams->loadflags & 1) == 0)
pascal@19515 186 die("I can't load bzImage low");
pascal@19515 187 {
pascal@19515 188 {
pascal@19515 189 #endif
pascal@19515 190 pm_high++;
pascal@19515 191
pascal@19515 192 // Hook on int15 to work around fn 88 DOS breakage
pascal@19515 193 hook_int15_88();
pascal@19515 194
pascal@19515 195 // * will be called just before rm -> pm
pascal@19571 196 extern void far last_ditch();
pascal@19571 197 kernelparams->realmode_switch_ofs = ofs((void *)last_ditch);
pascal@19538 198 kernelparams->realmode_switch_seg = seg(last_ditch);
pascal@19515 199 }
pascal@19538 200 if(kernelparams->kernel_version)
pascal@19538 201 version_string = (char *) first1k+kernelparams->kernel_version+0x200;
pascal@19538 202 kernelparams->type_of_loader = 0xff; // kernel do not know us (yet :-)
pascal@19538 203 if(kernelparams->version >= 0x201) {
pascal@19515 204 // * offset limit of the setup heap
pascal@19515 205 // heap_end_ptr appears to be relative to the start of setup (ofs 0x0200)
pascal@19538 206 kernelparams->heap_end_ptr = _32k-0x0200;
pascal@19538 207 kernelparams->loadflags |= 0x80; // says to rm loader it's ok to use heap
pascal@19515 208 }
pascal@19515 209 // * if we will ever stop moving ourself to 0x90000
pascal@19515 210 // we must say setup.S how much to move
pascal@19538 211 //kernelparams->setup_move_size = _32k;
pascal@19538 212 if(kernelparams->version >= 0x202) { // starting linux 2.4.0-test3-pre3
pascal@19538 213 kernelparams->cmd_line_ptr = (((u32)(topseg()+0x0800))<<4);
pascal@19515 214 goto cmd_line_ok;
pascal@19515 215 }
pascal@19515 216 }
pascal@19515 217 first1k->cl_magic = 0xA33F;
pascal@19515 218 first1k->cl_ofs = 0x8000;
pascal@19515 219 }
pascal@19515 220
pascal@19515 221 cmd_line_ok:
pascal@19515 222 // Check and enable A20 if needed
pascal@19515 223 enable_a20_or_die();
pascal@19515 224
pascal@19515 225 // Read remaining kernel (pm part)
pascal@19515 226 // Try to load kernel high, maybe even blindly storing it
pascal@19515 227 // in unallocated memory as a last resort
pascal@19515 228
pascal@19571 229 {
pascal@19571 230 struct image_himem *m = &pm;
pascal@19571 231 m->fallback = (u32((u16(_CS)+0x1FFF)&0xF000)<<4);
pascal@19571 232 m->size -= rm_size;
pascal@19571 233 m->chunk_size -= rm_size;
pascal@19571 234 if(m->fallback+m->size > (((u32)topseg())<<4) || pm_high) {
pascal@19571 235 m->fallback = _1m+_64k;
pascal@19515 236 }
pascal@19515 237
pascal@19571 238 load_image(m);
pascal@19571 239 }
pascal@19515 240 return version_string;
pascal@19515 241 }
pascal@19515 242
pascal@19515 243 // Read initrd if needed
pascal@19515 244
pascal@19515 245 void load_initrd() {
pascal@19515 246 struct image_himem *m = &initrd;
pascal@19571 247 if (!initrd_name && !m->fd) return;
pascal@19538 248 m->errmsg = "Can't use initrd file";
pascal@19538 249 if (!pm.errmsg) {
pascal@19515 250 noinitrd:
pascal@19538 251 puts(m->errmsg);
pascal@19515 252 return;
pascal@19515 253 }
pascal@19515 254 open_image(initrd_name, m);
pascal@19515 255
pascal@19515 256 m->fallback = (memtop()-m->size) & (~PAGE_MASK);
pascal@19515 257 if (m->fallback < pm.fallback + pm.size) {
pascal@19515 258 close(m->fd);
pascal@19515 259 goto noinitrd;
pascal@19515 260 }
pascal@19515 261
pascal@19515 262 load_image(m);
pascal@19571 263 struct kernelparams_t *kernelparams = &(((first1k_t*) rm_buf)->params);
pascal@19538 264 if(kernelparams->header == HdrS) {
pascal@19538 265 kernelparams->initrd_buf = m->fallback;
pascal@19538 266 kernelparams->initrd_size = m->size;
pascal@19515 267 }
pascal@19515 268 }
pascal@19515 269
pascal@19515 270 void boot_kernel() {
pascal@19515 271
pascal@19515 272 // Shrink stack: we won't need much of it now and have no malloc() plans
pascal@19515 273 {
pascal@19515 274 u16 new_SP=u16(heap_top)+0x100;
pascal@19515 275 if(_SP>new_SP) _SP=new_SP;
pascal@19515 276 }
pascal@19571 277 if( (u16(_SP)>>4)+u16(_CS) >= topseg() ) {
pascal@19515 278 // Oops! We can stomp on our toes... better stop now
pascal@19515 279 die("Loaded too close to 9000:0");
pascal@19515 280 }
pascal@19515 281
pascal@19515 282 cli(); // we start doing destructive things to DOS
pascal@19515 283
pascal@19571 284 // Move rm loader & commandline to 0x90000, Jump to kernel rm code
pascal@19571 285 set_sregs_jump_seg_ofs(csip);
pascal@19515 286 }