#include <stdio.h> #include "test.h" #include "pci.h" void x86emu_dump_xregs(void); extern ptr current; extern int verbose; #ifndef _PC /* * This is derived from a number of PC system BIOS'es. The intent here is to * provide very primitive video support, before an EGA/VGA BIOS installs its * own interrupt vector. Here, "Ignored" calls should remain so. "Not * Implemented" denotes functionality that can be implemented should the need * arise. What are "Not Implemented" throughout are video memory accesses. * Also, very little input validity checking is done here. */ int int42_handler() { #if 0 if (verbose && X86_AH != 0x0e) { printf("int%x\n", current->num); x86emu_dump_xregs(); } switch (X86_AH) { case 0x00: /* Set Video Mode */ /* Enter: AL = video mode number */ /* Leave: Nothing */ /* Implemented (except for clearing the screen) */ { /* Localise */ int i; u16 ioport, int1d, regvals, tmp; u8 mode, cgamode, cgacolour; /* * Ignore all mode numbers but 0x00-0x13. Some systems also ignore * 0x0B and 0x0C, but don't do that here. */ if (X86_AL > 0x13) break; /* * You didn't think that was really the mode set, did you? There * are only so many slots in the video parameter table... */ mode = X86_AL; ioport = 0x03D4; switch (MEM_RB(0x0410) & 0x30) { case 0x30: /* MDA */ mode = 0x07; /* Force mode to 0x07 */ ioport = 0x03B4; break; case 0x10: /* CGA 40x25 */ if (mode >= 0x07) mode = 0x01; break; case 0x20: /* CGA 80x25 (MCGA?) */ if (mode >= 0x07) mode = 0x03; break; case 0x00: /* EGA/VGA */ if (mode >= 0x07) /* Don't try MDA timings */ mode = 0x01; /* !?!?! */ break; } /* Locate data in video parameter table */ int1d = MEM_RW(0x1d << 2); regvals = ((mode >> 1) << 4) + int1d; cgacolour = 0x30; if (mode == 0x06) { regvals -= 0x10; cgacolour = 0x3F; } /** Update BIOS Data Area **/ /* Video mode */ MEM_WB(0x0449, mode); /* Columns */ tmp = MEM_RB(mode + int1d + 0x48); MEM_WW(0x044A, tmp); /* Page length */ tmp = MEM_RW((mode & 0x06) + int1d + 0x40); MEM_WW(0x044C, tmp); /* Start Address */ MEM_WW(0x044E, 0); /* Cursor positions, one for each display page */ for (i = 0x0450; i < 0x0460; i += 2) MEM_WW(i, 0); /* Cursor start & end scanlines */ tmp = MEM_RB(regvals + 0x0B); MEM_WB(0x0460, tmp); tmp = MEM_RB(regvals + 0x0A); MEM_WB(0x0461, tmp); /* Current display page number */ MEM_WB(0x0462, 0); /* CRTC I/O address */ MEM_WW(0x0463, ioport); /* CGA Mode register value */ cgamode = MEM_RB(mode + int1d + 0x50); MEM_WB(0x0465, cgamode); /* CGA Colour register value */ MEM_WB(0x0466, cgacolour); /* Rows */ MEM_WB(0x0484, (25 - 1)); /* Programme the mode */ outb(ioport + 4, cgamode & 0x37); /* Turn off screen */ for (i = 0; i < 0x10; i++) { tmp = MEM_RB(regvals + i); outb(ioport, i); outb(ioport + 1, tmp); } outb(ioport + 5, cgacolour); /* Select colour mode */ outb(ioport + 4, cgamode); /* Turn on screen */ } break; case 0x01: /* Set Cursor Type */ /* Enter: CH = starting line for cursor */ /* CL = ending line for cursor */ /* Leave: Nothing */ /* Implemented */ { /* Localise */ u16 ioport = MEM_RW(0x0463); MEM_WB(0x0460, X86_CL); MEM_WB(0x0461, X86_CH); outb(ioport, 0x0A); outb(ioport + 1, X86_CH); outb(ioport, 0x0B); outb(ioport + 1, X86_CL); } break; case 0x02: /* Set Cursor Position */ /* Enter: BH = display page number */ /* DH = row */ /* DL = column */ /* Leave: Nothing */ /* Implemented */ { /* Localise */ u16 offset, ioport; MEM_WB((X86_BH << 1) + 0x0450, X86_DL); MEM_WB((X86_BH << 1) + 0x0451, X86_DH); if (X86_BH != MEM_RB(0x0462)) break; offset = (X86_DH * MEM_RW(0x044A)) + X86_DL; offset += MEM_RW(0x044E) << 1; ioport = MEM_RW(0x0463); outb(ioport, 0x0E); outb(ioport + 1, offset >> 8); outb(ioport, 0x0F); outb(ioport + 1, offset & 0xFF); } break; case 0x03: /* Get Cursor Position */ /* Enter: BH = display page number */ /* Leave: CH = starting line for cursor */ /* CL = ending line for cursor */ /* DH = row */ /* DL = column */ /* Implemented */ { /* Localise */ X86_CL = MEM_RB(0x0460); X86_CH = MEM_RB(0x0461); X86_DL = MEM_RB((X86_BH << 1) + 0x0450); X86_DH = MEM_RB((X86_BH << 1) + 0x0451); } break; case 0x04: /* Get Light Pen Position */ /* Enter: Nothing */ /* Leave: AH = 0x01 (down/triggered) or 0x00 (not) */ /* BX = pixel column */ /* CX = pixel row */ /* DH = character row */ /* DL = character column */ /* Not Implemented */ { /* Localise */ printf("int%x - Get Light Pen Position. " "Function not implemented.\n", current->num); x86emu_dump_xregs(); X86_AH = X86_BX = X86_CX = X86_DX = 0; } break; case 0x05: /* Set Display Page */ /* Enter: AL = display page number */ /* Leave: Nothing */ /* Implemented */ { /* Localise */ u16 start, ioport = MEM_RW(0x0463); u8 x, y; /* Calculate new start address */ MEM_WB(0x0462, X86_AL); start = X86_AL * MEM_RW(0x044C); MEM_WW(0x044E, start); start <<= 1; /* Update start address */ outb(ioport, 0x0C); outb(ioport + 1, start >> 8); outb(ioport, 0x0D); outb(ioport + 1, start & 0xFF); /* Switch cursor position */ y = MEM_RB((X86_AL << 1) + 0x0450); x = MEM_RB((X86_AL << 1) + 0x0451); start += (y * MEM_RW(0x044A)) + x; /* Update cursor position */ outb(ioport, 0x0E); outb(ioport + 1, start >> 8); outb(ioport, 0x0F); outb(ioport + 1, start & 0xFF); } break; case 0x06: /* Initialise or Scroll Window Up */ /* Enter: AL = lines to scroll up */ /* BH = attribute for blank */ /* CH = upper y of window */ /* CL = left x of window */ /* DH = lower y of window */ /* DL = right x of window */ /* Leave: Nothing */ /* Not Implemented */ { /* Localise */ printf("int%x: Initialise or Scroll Window Up - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; case 0x07: /* Initialise or Scroll Window Down */ /* Enter: AL = lines to scroll down */ /* BH = attribute for blank */ /* CH = upper y of window */ /* CL = left x of window */ /* DH = lower y of window */ /* DL = right x of window */ /* Leave: Nothing */ /* Not Implemented */ { /* Localise */ printf("int%x: Initialise or Scroll Window Down - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; case 0x08: /* Read Character and Attribute at Cursor */ /* Enter: BH = display page number */ /* Leave: AH = attribute */ /* AL = character */ /* Not Implemented */ { /* Localise */ printf ("int%x: Read Character and Attribute at Cursor - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); X86_AX = 0; } break; case 0x09: /* Write Character and Attribute at Cursor */ /* Enter: AL = character */ /* BH = display page number */ /* BL = attribute (text) or colour (graphics) */ /* CX = replication count */ /* Leave: Nothing */ /* Not Implemented */ { /* Localise */ printf ("int%x: Write Character and Attribute at Cursor - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; case 0x0a: /* Write Character at Cursor */ /* Enter: AL = character */ /* BH = display page number */ /* BL = colour */ /* CX = replication count */ /* Leave: Nothing */ /* Not Implemented */ { /* Localise */ printf("int%x: Write Character at Cursor - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; case 0x0b: /* Set Palette, Background or Border */ /* Enter: BH = 0x00 or 0x01 */ /* BL = colour or palette (respectively) */ /* Leave: Nothing */ /* Implemented */ { /* Localise */ u16 ioport = MEM_RW(0x0463) + 5; u8 cgacolour = MEM_RB(0x0466); if (X86_BH) { cgacolour &= 0xDF; cgacolour |= (X86_BL & 0x01) << 5; } else { cgacolour &= 0xE0; cgacolour |= X86_BL & 0x1F; } MEM_WB(0x0466, cgacolour); outb(ioport, cgacolour); } break; case 0x0c: /* Write Graphics Pixel */ /* Enter: AL = pixel value */ /* BH = display page number */ /* CX = column */ /* DX = row */ /* Leave: Nothing */ /* Not Implemented */ { /* Localise */ printf("int%x: Write Graphics Pixel - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; case 0x0d: /* Read Graphics Pixel */ /* Enter: BH = display page number */ /* CX = column */ /* DX = row */ /* Leave: AL = pixel value */ /* Not Implemented */ { /* Localise */ printf("int%x: Write Graphics Pixel - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); X86_AL = 0; } break; case 0x0e: /* Write Character in Teletype Mode */ /* Enter: AL = character */ /* BH = display page number */ /* BL = foreground colour */ /* Leave: Nothing */ /* Not Implemented */ /* WARNING: Emulation of BEL characters will require */ /* emulation of RTC and PC speaker I/O. */ /* Also, this recurses through int 0x10 */ /* which might or might not have been */ /* installed yet. */ { /* Localise */ #ifdef PARANOID printf("int%x: Write Character in Teletype Mode - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); #endif printf("%c", X86_AL); } break; case 0x0f: /* Get Video Mode */ /* Enter: Nothing */ /* Leave: AH = number of columns */ /* AL = video mode number */ /* BH = display page number */ /* Implemented */ { /* Localise */ X86_AH = MEM_RW(0x044A); X86_AL = MEM_RB(0x0449); X86_BH = MEM_RB(0x0462); } break; case 0x10: /* Colour Control (subfunction in AL) */ /* Enter: Various */ /* Leave: Various */ /* Ignored */ break; case 0x11: /* Font Control (subfunction in AL) */ /* Enter: Various */ /* Leave: Various */ /* Ignored */ break; case 0x12: /* Miscellaneous (subfunction in BL) */ /* Enter: Various */ /* Leave: Various */ /* Ignored. Previous code here optionally allowed */ /* the enabling and disabling of VGA, but no system */ /* BIOS I've come across actually implements it. */ break; case 0x13: /* Write String in Teletype Mode */ /* Enter: AL = write mode */ /* BL = attribute (if (AL & 0x02) == 0) */ /* CX = string length */ /* DH = row */ /* DL = column */ /* ES:BP = string segment:offset */ /* Leave: Nothing */ /* Not Implemented */ /* WARNING: Emulation of BEL characters will require */ /* emulation of RTC and PC speaker I/O. */ /* Also, this recurses through int 0x10 */ /* which might or might not have been */ /* installed yet. */ { /* Localise */ printf("int%x: Write String in Teletype Mode - " "Function not implemented.\n", current->num); x86emu_dump_xregs(); } break; default: /* Various extensions */ /* Enter: Various */ /* Leave: Various */ /* Ignored */ break; } #endif return 1; } #endif