1 /* ----------------------------------------------------------------------- 2 * 3 * Copyright 2007-2009 H. Peter Anvin - All Rights Reserved 4 * Copyright 2009 Intel Corporation; author: H. Peter Anvin 5 * 6 * Permission is hereby granted, free of charge, to any person 7 * obtaining a copy of this software and associated documentation 8 * files (the "Software"), to deal in the Software without 9 * restriction, including without limitation the rights to use, 10 * copy, modify, merge, publish, distribute, sublicense, and/or 11 * sell copies of the Software, and to permit persons to whom 12 * the Software is furnished to do so, subject to the following 13 * conditions: 14 * 15 * The above copyright notice and this permission notice shall 16 * be included in all copies or substantial portions of the Software. 17 * 18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 19 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES 20 * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 21 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT 22 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, 23 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING 24 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR 25 * OTHER DEALINGS IN THE SOFTWARE. 26 * 27 * ----------------------------------------------------------------------- */ 28 29 #include "adjust.h" 30 31 .code16 32 .text 33 34 .globl bootsec 35 stack = 0x7c00 36 driveno = (stack-6) 37 sectors = (stack-8) 38 secpercyl = (stack-12) 39 40 BIOS_kbdflags = 0x417 41 BIOS_page = 0x462 42 43 /* gas/ld has issues with doing this as absolute addresses... */ 44 .section ".bootsec", "a", @nobits 45 .globl bootsec 46 bootsec: 47 .space 512 48 49 .text 50 .globl _start 51 _start: 52 .byte 0x33, 0xc0 /* xorw %ax, %ax */ 53 cli 54 movw %ax, %ds 55 movw %ax, %ss 56 movw $stack, %sp 57 movw %sp, %si 58 pushw %es /* es:di -> $PnP header */ 59 pushw %di 60 movw %ax, %es 61 sti 62 cld 63 64 /* Copy down to 0:0x600 */ 65 movw $_start, %di 66 movw $(512/2), %cx 67 rep; movsw 68 69 ljmpw $0, $next 70 next: 71 72 ADJUST_DRIVE 73 pushw %dx /* dl -> drive number */ 74 75 /* Check to see if we have EBIOS */ 76 pushw %dx /* drive number */ 77 movb $0x41, %ah /* %al == 0 already */ 78 movw $0x55aa, %bx 79 xorw %cx, %cx 80 xorb %dh, %dh 81 stc 82 int $0x13 83 jc 1f 84 cmpw $0xaa55, %bx 85 jne 1f 86 shrw %cx /* Bit 0 = fixed disk subset */ 87 jnc 1f 88 89 /* We have EBIOS; patch in the following code at 90 read_sector_cbios: movb $0x42, %ah ; jmp read_common */ 91 movl $0xeb42b4+((read_common-read_sector_cbios-4) << 24), \ 92 (read_sector_cbios) 93 94 1: 95 popw %dx 96 97 /* Get (C)HS geometry */ 98 movb $0x08, %ah 99 int $0x13 100 andw $0x3f, %cx /* Sector count */ 101 pushw %cx /* Save sectors on the stack */ 102 movzbw %dh, %ax /* dh = max head */ 103 incw %ax /* From 0-based max to count */ 104 mulw %cx /* Heads*sectors -> sectors per cylinder */ 105 106 /* Save sectors/cylinder on the stack */ 107 pushw %dx /* High word */ 108 pushw %ax /* Low word */ 109 110 xorl %eax, %eax /* Base */ 111 cdq /* Root (%edx <- 0) */ 112 call scan_partition_table 113 114 /* If we get here, we have no OS */ 115 missing_os: 116 call error 117 .ascii "Missing operating system.\r\n" 118 119 /* 120 * read_sector: read a single sector pointed to by %eax to 0x7c00. 121 * CF is set on error. All registers saved. 122 */ 123 read_sector: 124 pushal 125 xorl %edx, %edx 126 movw $bootsec, %bx 127 pushl %edx /* MSW of LBA */ 128 pushl %eax /* LSW of LBA */ 129 pushw %es /* Buffer segment */ 130 pushw %bx /* Buffer offset */ 131 pushw $1 /* Sector count */ 132 pushw $16 /* Size of packet */ 133 movw %sp, %si 134 135 /* This chunk is skipped if we have ebios */ 136 /* Do not clobber %eax before this chunk! */ 137 /* This also relies on %bx and %edx as set up above. */ 138 read_sector_cbios: 139 divl (secpercyl) 140 shlb $6, %ah 141 movb %ah, %cl 142 movb %al, %ch 143 xchgw %dx, %ax 144 divb (sectors) 145 movb %al, %dh 146 orb %ah, %cl 147 incw %cx /* Sectors are 1-based */ 148 movw $0x0201, %ax 149 150 read_common: 151 movb (driveno), %dl 152 int $0x13 153 leaw 16(%si), %sp /* Drop DAPA */ 154 popal 155 ret 156 157 /* 158 * read_partition_table: 159 * Read a partition table (pointed to by %eax), and copy 160 * the partition table into the ptab buffer. 161 * 162 * Clobbers %si, %di, and %cx, other registers preserved. 163 * %cx = 0 on exit. 164 * 165 * On error, CF is set and ptab is overwritten with junk. 166 */ 167 ptab = _start+446 168 169 read_partition_table: 170 call read_sector 171 movw $bootsec+446, %si 172 movw $ptab, %di 173 movw $(16*4/2), %cx 174 rep ; movsw 175 ret 176 177 /* 178 * scan_partition_table: 179 * Scan a partition table currently loaded in the partition table 180 * area. Preserve all registers. 181 * 182 * On entry: 183 * %eax - base (location of this partition table) 184 * %edx - root (offset from MBR, or 0 for MBR) 185 * 186 * These get pushed into stack slots: 187 * 28(%bp) - %eax - base 188 * 20(%bp) - %edx - root 189 */ 190 191 scan_partition_table: 192 pushal 193 movw %sp, %bp 194 195 /* Search for active partitions */ 196 movw $ptab, %bx 197 movw $4, %cx 198 xorw %ax, %ax 199 push %bx 200 push %cx 201 5: 202 testb $0x80, (%bx) 203 jz 6f 204 incw %ax 205 movw %bx, %si 206 6: 207 addw $16, %bx 208 loopw 5b 209 210 decw %ax /* Number of active partitions found */ 211 jz boot 212 jns too_many_active 213 214 /* No active partitions found, look for extended partitions */ 215 popw %cx /* %cx <- 4 */ 216 popw %bx /* %bx <- ptab */ 217 7: 218 movb 4(%bx), %al 219 cmpb $0x0f, %al /* 0x0f = Win9x extended */ 220 je 8f 221 andb $~0x80, %al /* 0x85 = Linux extended */ 222 cmpb $0x05, %al /* 0x05 = MS-DOS extended */ 223 jne 9f 224 225 /* It is an extended partition. Read the extended partition and 226 try to scan it. If the scan returns, re-load the current 227 partition table and resume scan. */ 228 8: 229 movl 8(%bx), %eax /* Partition table offset */ 230 movl 20(%bp), %edx /* "Root" */ 231 addl %edx, %eax /* Compute location of new ptab */ 232 andl %edx, %edx /* Is this the MBR? */ 233 jnz 10f 234 movl %eax, %edx /* Offset -> root if this was MBR */ 235 10: 236 call read_partition_table 237 jc 11f 238 call scan_partition_table 239 11: 240 /* This returned, so we need to reload the current partition table */ 241 movl 28(%bp), %eax /* "Base" */ 242 call read_partition_table 243 244 /* fall through */ 245 9: 246 /* Not an extended partition */ 247 addw $16, %bx 248 loopw 7b 249 250 /* Nothing found, return */ 251 popal 252 ret 253 254 too_many_active: 255 call error 256 .ascii "Multiple active partitions.\r\n" 257 258 /* 259 * boot: invoke the actual bootstrap. (%si) points to the partition 260 * table entry, and 28(%bp) has the partition table base. 261 */ 262 boot: 263 movl 8(%si), %eax 264 addl 28(%bp), %eax 265 movl %eax, 8(%si) /* Adjust in-memory partition table entry */ 266 call read_sector 267 jc disk_error 268 269 /* Check if the read sector is a XFS superblock */ 270 cmpl $0x42534658, (bootsec) /* "XFSB" */ 271 jne no_xfs 272 273 /* We put the Syslinux boot sector at offset 0x800 (4 sectors), so we 274 * need to adjust %eax (%eax + 4) to read the right sector into 0x7C00. 275 */ 276 addl $0x800 >> 0x09, %eax /* plus 4 sectors */ 277 call read_sector 278 jc disk_error 279 280 no_xfs: 281 cmpw $0xaa55, (bootsec+510) 282 jne missing_os /* Not a valid boot sector */ 283 movw $driveno, %sp /* driveno == bootsec-6 */ 284 popw %dx /* dl -> drive number */ 285 popw %di /* es:di -> $PnP vector */ 286 popw %es 287 cli 288 jmpw *%sp /* %sp == bootsec */ 289 290 disk_error: 291 call error 292 .ascii "Operating system load error.\r\n" 293 294 /* 295 * Print error messages. This is invoked with "call", with the 296 * error message at the return address. 297 */ 298 error: 299 popw %si 300 2: 301 lodsb 302 movb $0x0e, %ah 303 movb (BIOS_page), %bh 304 movb $0x07, %bl 305 int $0x10 /* May destroy %bp */ 306 cmpb $10, %al /* Newline? */ 307 jne 2b 308 309 int $0x18 /* Boot failure */ 310 die: 311 hlt 312 jmp die 313
