X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=src%2Fsystem.c;h=898c3ccc9f6c86b52af3ea6b11455e533a872254;hb=34203cdf8a89c747e221005850a4558252235360;hp=d9ff5a7609e6c73a9d9244551a25fc47b6c00386;hpb=9521e26a164eb4689b34d82a5de0d998bdd4c4dc;p=seabios.git diff --git a/src/system.c b/src/system.c index d9ff5a7..898c3cc 100644 --- a/src/system.c +++ b/src/system.c @@ -1,11 +1,11 @@ -// 16bit system callbacks +// Handler for int 0x15 "system" calls // // Copyright (C) 2008 Kevin O'Connor // Copyright (C) 2002 MandrakeSoft S.A. // -// This file may be distributed under the terms of the GNU GPLv3 license. +// This file may be distributed under the terms of the GNU LGPLv3 license. -#include "util.h" // irq_restore +#include "util.h" // memcpy_far #include "biosvar.h" // BIOS_CONFIG_TABLE #include "ioport.h" // inb #include "memmap.h" // E820_RAM @@ -19,12 +19,12 @@ set_a20(u8 cond) // get current setting first u8 newval, oldval = inb(PORT_A20); if (cond) - newval = oldval | 0x02; + newval = oldval | A20_ENABLE_BIT; else - newval = oldval & ~0x02; + newval = oldval & ~A20_ENABLE_BIT; outb(newval, PORT_A20); - return (newval & 0x02) != 0; + return (oldval & A20_ENABLE_BIT) != 0; } static void @@ -44,7 +44,7 @@ handle_152401(struct bregs *regs) static void handle_152402(struct bregs *regs) { - regs->al = !!(inb(PORT_A20) & 0x20); + regs->al = (inb(PORT_A20) & A20_ENABLE_BIT) != 0; set_code_success(regs); } @@ -58,7 +58,7 @@ handle_152403(struct bregs *regs) static void handle_1524XX(struct bregs *regs) { - set_code_fail(regs, RET_EUNSUPPORTED); + set_code_unimplemented(regs, RET_EUNSUPPORTED); } static void @@ -101,84 +101,67 @@ handle_1587(struct bregs *regs) // 20..27 CS zeros filled in by BIOS // 28..2f SS zeros filled in by BIOS - //es:si - //eeee0 - //0ssss - //----- - // check for access rights of source & dest here // Initialize GDT descriptor - SET_SEG(ES, regs->es); - u16 si = regs->si; - u16 base15_00 = (regs->es << 4) + si; - u16 base23_16 = regs->es >> 12; - if (base15_00 < (u16)(regs->es<<4)) - base23_16++; - SET_VAR(ES, *(u16*)(si+0x08+0), 47); // limit 15:00 = 6 * 8bytes/descriptor - SET_VAR(ES, *(u16*)(si+0x08+2), base15_00);// base 15:00 - SET_VAR(ES, *(u8 *)(si+0x08+4), base23_16);// base 23:16 - SET_VAR(ES, *(u8 *)(si+0x08+5), 0x93); // access - SET_VAR(ES, *(u16*)(si+0x08+6), 0x0000); // base 31:24/reserved/limit 19:16 - + u32 si = regs->si; + u64 *gdt_far = (void*)si; + u16 gdt_seg = regs->es; + u32 loc = (u32)MAKE_FLATPTR(gdt_seg, gdt_far); + SET_FARVAR(gdt_seg, gdt_far[1], GDT_DATA | GDT_LIMIT((6*sizeof(u64))-1) + | GDT_BASE(loc)); // Initialize CS descriptor - SET_VAR(ES, *(u16*)(si+0x20+0), 0xffff);// limit 15:00 = normal 64K limit - SET_VAR(ES, *(u16*)(si+0x20+2), 0x0000);// base 15:00 - SET_VAR(ES, *(u8 *)(si+0x20+4), 0x000f);// base 23:16 - SET_VAR(ES, *(u8 *)(si+0x20+5), 0x9b); // access - SET_VAR(ES, *(u16*)(si+0x20+6), 0x0000);// base 31:24/reserved/limit 19:16 - + SET_FARVAR(gdt_seg, gdt_far[4], GDT_CODE | GDT_LIMIT(BUILD_BIOS_SIZE-1) + | GDT_BASE(BUILD_BIOS_ADDR)); // Initialize SS descriptor - u16 ss = GET_SEG(SS); - base15_00 = ss << 4; - base23_16 = ss >> 12; - SET_VAR(ES, *(u16*)(si+0x28+0), 0xffff); // limit 15:00 = normal 64K limit - SET_VAR(ES, *(u16*)(si+0x28+2), base15_00);// base 15:00 - SET_VAR(ES, *(u8 *)(si+0x28+4), base23_16);// base 23:16 - SET_VAR(ES, *(u8 *)(si+0x28+5), 0x93); // access - SET_VAR(ES, *(u16*)(si+0x28+6), 0x0000); // base 31:24/reserved/limit 19:16 + loc = (u32)MAKE_FLATPTR(GET_SEG(SS), 0); + SET_FARVAR(gdt_seg, gdt_far[5], GDT_DATA | GDT_LIMIT(0x0ffff) + | GDT_BASE(loc)); u16 count = regs->cx; asm volatile( // Load new descriptor tables - "lgdtw %%es:0x8(%%si)\n" - "lidtw %%cs:pmode_IDT_info\n" + " lgdtw %%es:(1<<3)(%%si)\n" + " lidtw %%cs:pmode_IDT_info\n" - // set PE bit in CR0 - "movl %%cr0, %%eax\n" - "orb $0x01, %%al\n" - "movl %%eax, %%cr0\n" + // Enable protected mode + " movl %%cr0, %%eax\n" + " orl $" __stringify(CR0_PE) ", %%eax\n" + " movl %%eax, %%cr0\n" // far jump to flush CPU queue after transition to protected mode - "ljmpw $0x0020, $1f\n" - "1:\n" + " ljmpw $(4<<3), $1f\n" // GDT points to valid descriptor table, now load DS, ES - "movw $0x10, %%ax\n" // 010 000 = 2nd descriptor in table, TI=GDT, RPL=00 - "movw %%ax, %%ds\n" - "movw $0x18, %%ax\n" // 011 000 = 3rd descriptor in table, TI=GDT, RPL=00 - "movw %%ax, %%es\n" + "1:movw $(2<<3), %%ax\n" // 2nd descriptor in table, TI=GDT, RPL=00 + " movw %%ax, %%ds\n" + " movw $(3<<3), %%ax\n" // 3rd descriptor in table, TI=GDT, RPL=00 + " movw %%ax, %%es\n" // move CX words from DS:SI to ES:DI - "xorw %%si, %%si\n" - "xorw %%di, %%di\n" - "rep movsw\n" + " xorw %%si, %%si\n" + " xorw %%di, %%di\n" + " rep movsw\n" - // reset PG bit in CR0 ??? - "movl %%cr0, %%eax\n" - "andb $0xfe, %%al\n" - "movl %%eax, %%cr0\n" + // Restore DS and ES segment limits to 0xffff + " movw $(5<<3), %%ax\n" // 5th descriptor in table (SS) + " movw %%ax, %%ds\n" + " movw %%ax, %%es\n" + + // Disable protected mode + " movl %%cr0, %%eax\n" + " andl $~" __stringify(CR0_PE) ", %%eax\n" + " movl %%eax, %%cr0\n" // far jump to flush CPU queue after transition to real mode - "ljmpw $0xf000, $2f\n" - "2:\n" + " ljmpw $" __stringify(SEG_BIOS) ", $2f\n" // restore IDT to normal real-mode defaults - "lidt %%cs:rmode_IDT_info\n" + "2:lidtw %%cs:rmode_IDT_info\n" // Restore %ds (from %ss) - "movw %%ss, %%ax\n" - "movw %%ax, %%ds\n" + " movw %%ss, %%ax\n" + " movw %%ax, %%ds\n" : "+c"(count), "+S"(si) : : "eax", "di", "cc"); // XXX - also clobbers %es @@ -191,7 +174,7 @@ handle_1587(struct bregs *regs) static void handle_1588(struct bregs *regs) { - u32 rs = GET_EBDA(ram_size); + u32 rs = GET_GLOBAL(RamSize); // According to Ralf Brown's interrupt the limit should be 15M, // but real machines mostly return max. 63M. @@ -202,6 +185,47 @@ handle_1588(struct bregs *regs) set_success(regs); } +// Switch to protected mode +static void +handle_1589(struct bregs *regs) +{ + set_a20(1); + + set_pics(regs->bl, regs->bh); + + u64 *gdt_far = (void*)(regs->si + 0); + u16 gdt_seg = regs->es; + SET_FARVAR(gdt_seg, gdt_far[7], GDT_CODE | GDT_LIMIT(BUILD_BIOS_SIZE-1) + | GDT_BASE(BUILD_BIOS_ADDR)); + + regs->ds = 3<<3; // 3rd gdt descriptor is %ds + regs->es = 4<<3; // 4th gdt descriptor is %es + regs->code.seg = 6<<3; // 6th gdt descriptor is %cs + + set_code_success(regs); + + asm volatile( + // Load new descriptor tables + " lgdtw %%es:(1<<3)(%%si)\n" + " lidtw %%es:(2<<3)(%%si)\n" + + // Enable protected mode + " movl %%cr0, %%eax\n" + " orl $" __stringify(CR0_PE) ", %%eax\n" + " movl %%eax, %%cr0\n" + + // far jump to flush CPU queue after transition to protected mode + " ljmpw $(7<<3), $1f\n" + + // GDT points to valid descriptor table, now load SS + "1:movw $(5<<3), %%ax\n" + " movw %%ax, %%ds\n" + " movw %%ax, %%ss\n" + : + : "S"(gdt_far) + : "eax", "cc"); +} + // Device busy interrupt. Called by Int 16h when no key available static void handle_1590(struct bregs *regs) @@ -218,7 +242,7 @@ handle_1591(struct bregs *regs) static void handle_154f(struct bregs *regs) { - set_fail_silent(regs); + set_invalid_silent(regs); } static void @@ -232,7 +256,7 @@ handle_15c0(struct bregs *regs) static void handle_15c1(struct bregs *regs) { - regs->es = GET_BDA(ebda_seg); + regs->es = get_ebda_seg(); set_success(regs); } @@ -246,7 +270,7 @@ handle_15e801(struct bregs *regs) // regs.u.r16.ax = 0; // regs.u.r16.bx = 0; - u32 rs = GET_EBDA(ram_size); + u32 rs = GET_GLOBAL(RamSize); // Get the amount of extended memory (above 1M) if (rs > 16*1024*1024) { @@ -266,30 +290,36 @@ handle_15e801(struct bregs *regs) set_success(regs); } +// Info on e820 map location and size. +struct e820entry e820_list[CONFIG_MAX_E820] VAR16VISIBLE; +int e820_count VAR16VISIBLE; + static void handle_15e820(struct bregs *regs) { - int count = GET_EBDA(e820_count); - if (regs->edx != 0x534D4150 || regs->bx >= count) { - set_code_fail(regs, RET_EUNSUPPORTED); + int count = GET_GLOBAL(e820_count); + if (regs->edx != 0x534D4150 || regs->bx >= count + || regs->ecx < sizeof(e820_list[0])) { + set_code_invalid(regs, RET_EUNSUPPORTED); return; } - struct e820entry *e = &((struct e820entry *)GET_EBDA(e820_loc))[regs->bx]; - memcpy(MAKE_FARPTR(regs->es, regs->di), e, sizeof(*e)); + memcpy_far(regs->es, (void*)(regs->di+0) + , get_global_seg(), &e820_list[regs->bx] + , sizeof(e820_list[0])); if (regs->bx == count-1) regs->ebx = 0; else regs->ebx++; regs->eax = 0x534D4150; - regs->ecx = sizeof(*e); + regs->ecx = sizeof(e820_list[0]); set_success(regs); } static void handle_15e8XX(struct bregs *regs) { - set_code_fail(regs, RET_EUNSUPPORTED); + set_code_unimplemented(regs, RET_EUNSUPPORTED); } static void @@ -305,7 +335,7 @@ handle_15e8(struct bregs *regs) static void handle_15XX(struct bregs *regs) { - set_code_fail(regs, RET_EUNSUPPORTED); + set_code_unimplemented(regs, RET_EUNSUPPORTED); } // INT 15h System Services Entry Point @@ -318,10 +348,12 @@ handle_15(struct bregs *regs) case 0x4f: handle_154f(regs); break; case 0x52: handle_1552(regs); break; case 0x53: handle_1553(regs); break; + case 0x5f: handle_155f(regs); break; case 0x83: handle_1583(regs); break; case 0x86: handle_1586(regs); break; case 0x87: handle_1587(regs); break; case 0x88: handle_1588(regs); break; + case 0x89: handle_1589(regs); break; case 0x90: handle_1590(regs); break; case 0x91: handle_1591(regs); break; case 0xc0: handle_15c0(regs); break; @@ -331,67 +363,3 @@ handle_15(struct bregs *regs) default: handle_15XX(regs); break; } } - -// INT 12h Memory Size Service Entry Point -void VISIBLE16 -handle_12(struct bregs *regs) -{ - debug_enter(regs, DEBUG_HDL_12); - regs->ax = GET_BDA(mem_size_kb); -} - -// INT 11h Equipment List Service Entry Point -void VISIBLE16 -handle_11(struct bregs *regs) -{ - debug_enter(regs, DEBUG_HDL_11); - regs->ax = GET_BDA(equipment_list_flags); -} - -// INT 05h Print Screen Service Entry Point -void VISIBLE16 -handle_05(struct bregs *regs) -{ - debug_enter(regs, DEBUG_HDL_05); -} - -// INT 10h Video Support Service Entry Point -void VISIBLE16 -handle_10(struct bregs *regs) -{ - debug_enter(regs, DEBUG_HDL_10); - // dont do anything, since the VGA BIOS handles int10h requests -} - -void VISIBLE16 -handle_nmi() -{ - debug_isr(DEBUG_ISR_nmi); - BX_PANIC("NMI Handler called\n"); -} - -void -mathcp_setup() -{ - dprintf(3, "math cp init\n"); - // 80x87 coprocessor installed - SETBITS_BDA(equipment_list_flags, 0x02); - // Enable IRQ13 (handle_75) - unmask_pic2(PIC2_IRQ13); -} - -// INT 75 - IRQ13 - MATH COPROCESSOR EXCEPTION -void VISIBLE16 -handle_75() -{ - debug_isr(DEBUG_ISR_75); - - // clear irq13 - outb(0, PORT_MATH_CLEAR); - // clear interrupt - eoi_pic2(); - // legacy nmi call - struct bregs br; - memset(&br, 0, sizeof(br)); - call16_int(0x02, &br); -}