| /* | |
| * BIOS interrupt 10h handler | |
| */ | |
| #include <stdlib.h> | |
| #include "miscemu.h" | |
| #include "vga.h" | |
| /* #define DEBUG_INT */ | |
| #include "debug.h" | |
| #include "console.h" | |
| static void conv_text_mode_attributes(char attribute, int *fg, int *bg, | |
| int *wattribute); | |
| static void write_char_attribute_at_cursor(char output, char page_num, | |
| char attribute, short times); | |
| static void scroll_window(int direction, char lines, char row1, | |
| char col1, char row2, char col2, char attribute); | |
| static int color_pallet[16]; | |
| #define SCROLL_UP 1 | |
| #define SCROLL_DOWN 2 | |
| /********************************************************************** | |
| * INT_Int10Handler | |
| * | |
| * Handler for int 10h (video). | |
| * | |
| * NOTE: | |
| * Most INT 10 functions for text-mode, CGA, EGA, and VGA cards | |
| * are present in this list. (SVGA and XGA are not) That is not | |
| * to say that all these functions should be supported, but if | |
| * anyone is braindamaged enough to want to emulate one of these | |
| * beasts then this should get you started. | |
| * | |
| * NOTE: | |
| * Several common graphical extensions used by Microsoft hook | |
| * off of here. I have *not* added them to this list (yet). They | |
| * include: | |
| * | |
| * MSHERC.COM - More functionality for Hercules cards. | |
| * EGA.SYS (also MOUSE.COM) - More for EGA cards. | |
| * | |
| * Yes, MS also added this support into their mouse driver. Don't | |
| * ask me, I don't work for them. | |
| * | |
| * Joseph Pranevich - 9/98 | |
| */ | |
| void WINAPI INT_Int10Handler( CONTEXT *context ) | |
| { | |
| static int registered_colors = FALSE; | |
| static int video_mode = 7; | |
| static int video_columns = 80; | |
| if (!registered_colors) | |
| { | |
| /* Colors: | |
| 0000b black 1000b dark gray | |
| 0001b blue 1001b light blue | |
| 0010b green 1010b light green | |
| 0011b cyan 1011b light cyan | |
| 0100b red 1100b light red | |
| 0101b magenta 1101b light magenta | |
| 0110b brown 1110b yellow | |
| 0111b light gray 1111b white | |
| */ | |
| /* These AllocColor calls have the side-effect of triggering | |
| ternimal initialization as xx_Init() is no longer called on | |
| startup. Which is what we want anyway. */ | |
| color_pallet[0] = CONSOLE_AllocColor(WINE_BLACK); | |
| color_pallet[1] = CONSOLE_AllocColor(WINE_BLUE); | |
| color_pallet[2] = CONSOLE_AllocColor(WINE_GREEN); | |
| color_pallet[3] = CONSOLE_AllocColor(WINE_CYAN); | |
| color_pallet[4] = CONSOLE_AllocColor(WINE_RED); | |
| color_pallet[5] = CONSOLE_AllocColor(WINE_MAGENTA); | |
| color_pallet[6] = CONSOLE_AllocColor(WINE_BROWN); | |
| color_pallet[7] = CONSOLE_AllocColor(WINE_LIGHT_GRAY); | |
| color_pallet[8] = CONSOLE_AllocColor(WINE_DARK_GRAY); | |
| color_pallet[9] = CONSOLE_AllocColor(WINE_LIGHT_BLUE); | |
| color_pallet[10] = CONSOLE_AllocColor(WINE_LIGHT_GREEN); | |
| color_pallet[11] = CONSOLE_AllocColor(WINE_LIGHT_CYAN); | |
| color_pallet[12] = CONSOLE_AllocColor(WINE_LIGHT_RED); | |
| color_pallet[13] = CONSOLE_AllocColor(WINE_LIGHT_MAGENTA); | |
| color_pallet[14] = CONSOLE_AllocColor(WINE_YELLOW); | |
| color_pallet[15] = CONSOLE_AllocColor(WINE_WHITE); | |
| } | |
| switch(AH_reg(context)) { | |
| case 0x00: /* SET VIDEO MODE */ | |
| /* Text Modes: */ | |
| /* (mode) (text rows/cols) | |
| 0x00 - 40x25 | |
| 0x01 - 40x25 | |
| 0x02 - 80x25 | |
| 0x03 - 80x25 or 80x43 or 80x50 (assume 80x25) | |
| 0x07 - 80x25 | |
| */ | |
| switch (AL_reg(context)) { | |
| case 0x00: /* 40x25 */ | |
| case 0x01: | |
| VGA_Exit(); | |
| TRACE(int10, "Set Video Mode - Set to Text - 0x0%x\n", | |
| AL_reg(context)); | |
| CONSOLE_ResizeScreen(40, 25); | |
| CONSOLE_ClearScreen(); | |
| video_mode = AL_reg(context); | |
| video_columns = 40; | |
| break; | |
| case 0x02: | |
| case 0x03: | |
| case 0x07: | |
| VGA_Exit(); | |
| TRACE(int10, "Set Video Mode - Set to Text - 0x0%x\n", | |
| AL_reg(context)); | |
| CONSOLE_ResizeScreen(80, 25); | |
| CONSOLE_ClearScreen(); | |
| video_mode = AL_reg(context); | |
| video_columns = 80; | |
| break; | |
| case 0x13: | |
| TRACE(int10, "Setting VGA 320x200 256-color mode\n"); | |
| VGA_SetMode(320,200,8); | |
| video_mode = AL_reg(context); | |
| break; | |
| default: | |
| FIXME(int10, "Set Video Mode (0x%x) - Not Supported\n", | |
| AL_reg(context)); | |
| } | |
| break; | |
| case 0x01: /* SET CURSOR SHAPE */ | |
| FIXME(int10, "Set Cursor Shape - Not Supported\n"); | |
| break; | |
| case 0x02: /* SET CURSOR POSITION */ | |
| /* BH = Page Number */ /* Not supported */ | |
| /* DH = Row */ /* 0 is left */ | |
| /* DL = Column */ /* 0 is top */ | |
| if (BH_reg(context)) | |
| { | |
| FIXME(int10, "Set Cursor Position: Cannot set to page %d\n", | |
| BH_reg(context)); | |
| } | |
| else | |
| { | |
| CONSOLE_MoveCursor(DH_reg(context), DL_reg(context)); | |
| TRACE(int10, "Set Cursor Position: %d %d\n", DH_reg(context), | |
| DL_reg(context)); | |
| } | |
| break; | |
| case 0x03: /* GET CURSOR POSITION AND SIZE */ | |
| FIXME(int10, "Get Cursor Position and Size - Not Supported\n"); | |
| CX_reg(context) = 0x0000; /* Bogus cursor data */ | |
| DX_reg(context) = 0x0000; | |
| break; | |
| case 0x04: /* READ LIGHT PEN POSITION */ | |
| FIXME(int10, "Read Light Pen Position - Not Supported\n"); | |
| AH_reg(context) = 0x00; /* Not down */ | |
| break; | |
| case 0x05: /* SELECT ACTIVE DISPLAY PAGE */ | |
| FIXME(int10, "Select Active Display Page - Not Supported\n"); | |
| break; | |
| case 0x06: /* SCROLL UP WINDOW */ | |
| /* AL = Lines to scroll */ | |
| /* BH = Attribute */ | |
| /* CH,CL = row, col upper-left */ | |
| /* DH,DL = row, col lower-right */ | |
| scroll_window(SCROLL_UP, AL_reg(context), CH_reg(context), | |
| CL_reg(context), DH_reg(context), DL_reg(context), | |
| BH_reg(context)); | |
| TRACE(int10, "Scroll Up Window %d\n", AL_reg(context)); | |
| break; | |
| case 0x07: /* SCROLL DOWN WINDOW */ | |
| /* AL = Lines to scroll */ | |
| /* BH = Attribute */ | |
| /* CH,CL = row, col upper-left */ | |
| /* DH,DL = row, col lower-right */ | |
| scroll_window(SCROLL_DOWN, AL_reg(context), CH_reg(context), | |
| CL_reg(context), DH_reg(context), DL_reg(context), | |
| BH_reg(context)); | |
| TRACE(int10, "Scroll Down Window %d\n", AL_reg(context)); | |
| break; | |
| case 0x08: /* READ CHARACTER AND ATTRIBUTE AT CURSOR POSITION */ | |
| { | |
| /* Note here that color data returned is bogus, will fix later. */ | |
| char ch; | |
| int bg, fg, attr; | |
| if (BH_reg(context)) /* Write to different page */ | |
| { | |
| FIXME(int10, "Read Character and Attribute at Cursor Position -" | |
| " Can't read from non-0 page\n"); | |
| AL_reg(context) = ' '; /* That page is blank */ | |
| AH_reg(context) = 7; | |
| } | |
| else | |
| { | |
| TRACE(int10, | |
| "Read Character and Attribute at Cursor Position\n"); | |
| CONSOLE_GetCharacterAtCursor(&ch, &fg, &bg, &attr); | |
| AL_reg(context) = ch; | |
| AH_reg(context) = 7; /* FIXME: We're assuming wh on bl */ | |
| } | |
| } | |
| break; | |
| case 0x09: /* WRITE CHARACTER AND ATTRIBUTE AT CURSOR POSITION */ | |
| /* AL = Character to display. */ | |
| /* BH = Page Number */ /* We can't write to non-0 pages, yet. */ | |
| /* BL = Attribute / Color */ | |
| /* CX = Times to Write Char */ | |
| /* Note here that the cursor is not advanced. */ | |
| write_char_attribute_at_cursor(AL_reg(context), BH_reg(context), | |
| BL_reg(context), CX_reg(context)); | |
| if (CX_reg(context) > 1) | |
| TRACE(int10, "Write Character and Attribute at Cursor Position " | |
| "(Rep. %d) %c\n", CX_reg(context), AL_reg(context)); | |
| else | |
| TRACE(int10, "Write Character and Attribute at Cursor" | |
| "Position: %c\n", AL_reg(context)); | |
| break; | |
| case 0x0a: /* WRITE CHARACTER ONLY AT CURSOR POSITION */ | |
| /* AL = Character to display. */ | |
| /* BH = Page Number */ /* We can't write to non-0 pages, yet. */ | |
| /* CX = Times to Write Char */ | |
| TRACE(int10, "Write Character at Cursor\n"); | |
| write_char_attribute_at_cursor(AL_reg(context), BH_reg(context), | |
| 0, CX_reg(context)); | |
| break; | |
| case 0x0b: | |
| switch BH_reg(context) { | |
| case 0x00: /* SET BACKGROUND/BORDER COLOR */ | |
| /* In text modes, this sets only the border */ | |
| TRACE(int10, "Set Background/Border Color - Ignored\n"); | |
| break; | |
| case 0x01: /* SET PALETTE */ | |
| FIXME(int10, "Set Palette - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "INT 10 AH = 0x0b BH = 0x%x - Unknown\n", | |
| BH_reg(context)); | |
| break; | |
| } | |
| break; | |
| case 0x0c: /* WRITE GRAPHICS PIXEL */ | |
| /* Not in graphics mode, can ignore w/o error */ | |
| FIXME(int10, "Write Graphics Pixel - Not Supported\n"); | |
| break; | |
| case 0x0d: /* READ GRAPHICS PIXEL */ | |
| /* Not in graphics mode, can ignore w/o error */ | |
| FIXME(int10, "Read Graphics Pixel - Not Supported\n"); | |
| break; | |
| case 0x0e: /* TELETYPE OUTPUT */ | |
| TRACE(int10, "Teletype Output\n"); | |
| CONSOLE_Write(AL_reg(context), 0, 0, 0); | |
| break; | |
| case 0x0f: /* GET CURRENT VIDEO MODE */ | |
| TRACE(int10, "Get Current Video Mode\n"); | |
| /* Note: This should not be a constant value. */ | |
| AL_reg(context) = video_mode; | |
| AH_reg(context) = video_columns; | |
| BH_reg(context) = 0; /* Display page 0 */ | |
| break; | |
| case 0x10: | |
| switch AL_reg(context) { | |
| case 0x00: /* SET SINGLE PALETTE REGISTER */ | |
| FIXME(int10, "Set Single Palette Register - Not Supported\n"); | |
| break; | |
| case 0x01: /* SET BORDER (OVERSCAN) */ | |
| /* Text terminals have no overscan */ | |
| TRACE(int10, "Set Border (Overscan) - Ignored\n"); | |
| break; | |
| case 0x02: /* SET ALL PALETTE REGISTERS */ | |
| FIXME(int10, "Set all palette registers - Not Supported\n"); | |
| break; | |
| case 0x03: /* TOGGLE INTENSITY/BLINKING BIT */ | |
| FIXME(int10, "Toggle Intensity/Blinking Bit - Not Supported\n"); | |
| break; | |
| case 0x07: /* GET INDIVIDUAL PALETTE REGISTER */ | |
| FIXME(int10, "Get Individual Palette Register - Not Supported\n"); | |
| break; | |
| case 0x08: /* READ OVERSCAN (BORDER COLOR) REGISTER */ | |
| FIXME(int10, | |
| "Read Overscan (Border Color) Register - Not Supported\n"); | |
| break; | |
| case 0x09: /* READ ALL PALETTE REGISTERS AND OVERSCAN REGISTER */ | |
| FIXME(int10, | |
| "Read All Palette Registers and Overscan Register " | |
| " - Not Supported\n"); | |
| break; | |
| case 0x10: /* SET INDIVIDUAL DAC REGISTER */ | |
| FIXME(int10, "Set Individual DAC register - Not Supported\n"); | |
| break; | |
| case 0x12: /* SET BLOCK OF DAC REGISTERS */ | |
| FIXME(int10, "Set Block of DAC registers - Not Supported\n"); | |
| break; | |
| case 0x13: /* SELECT VIDEO DAC COLOR PAGE */ | |
| FIXME(int10, "Select video DAC color page - Not Supported\n"); | |
| break; | |
| case 0x15: /* READ INDIVIDUAL DAC REGISTER */ | |
| FIXME(int10, "Read individual DAC register - Not Supported\n"); | |
| break; | |
| case 0x17: /* READ BLOCK OF DAC REGISTERS */ | |
| FIXME(int10, "Read block of DAC registers - Not Supported\n"); | |
| break; | |
| case 0x18: /* SET PEL MASK */ | |
| FIXME(int10, "Set PEL mask - Not Supported\n"); | |
| break; | |
| case 0x19: /* READ PEL MASK */ | |
| FIXME(int10, "Read PEL mask - Not Supported\n"); | |
| break; | |
| case 0x1a: /* GET VIDEO DAC COLOR PAGE STATE */ | |
| FIXME(int10, "Get video DAC color page state - Not Supported\n"); | |
| break; | |
| case 0x1b: /* PERFORM GRAY-SCALE SUMMING */ | |
| FIXME(int10, "Perform Gray-scale summing - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "INT 10 AH = 0x10 AL = 0x%x - Unknown\n", | |
| AL_reg(context)); | |
| break; | |
| } | |
| break; | |
| case 0x11: /* TEXT MODE CHARGEN */ | |
| /* Note that second subfunction is *almost* identical. */ | |
| /* See INTERRUPT.A for details. */ | |
| switch AH_reg(context) { | |
| case 0x00: /* LOAD USER SPECIFIED PATTERNS */ | |
| case 0x10: | |
| FIXME(int10, "Load User Specified Patterns - Not Supported\n"); | |
| break; | |
| case 0x01: /* LOAD ROM MONOCHROME PATTERNS */ | |
| case 0x11: | |
| FIXME(int10, "Load ROM Monochrome Patterns - Not Supported\n"); | |
| break; | |
| case 0x02: /* LOAD ROM 8x8 DOUBLE-DOT PATTERNS */ | |
| case 0x12: | |
| FIXME(int10, | |
| "Load ROM 8x8 Double Dot Patterns - Not Supported\n"); | |
| break; | |
| case 0x03: /* SET BLOCK SPECIFIER */ | |
| FIXME(int10, "Set Block Specifier - Not Supported\n"); | |
| break; | |
| case 0x04: /* LOAD ROM 8x16 CHARACTER SET */ | |
| case 0x14: | |
| FIXME(int10, "Load ROM 8x16 Character Set - Not Supported\n"); | |
| break; | |
| case 0x20: /* SET USER 8x16 GRAPHICS CHARS */ | |
| FIXME(int10, "Set User 8x16 Graphics Chars - Not Supported\n"); | |
| break; | |
| case 0x21: /* SET USER GRAPICS CHARACTERS */ | |
| FIXME(int10, "Set User Graphics Characters - Not Supported\n"); | |
| break; | |
| case 0x22: /* SET ROM 8x14 GRAPHICS CHARS */ | |
| FIXME(int10, "Set ROM 8x14 Graphics Chars - Not Supported\n"); | |
| break; | |
| case 0x23: /* SET ROM 8x8 DBL DOT CHARS */ | |
| FIXME(int10, | |
| "Set ROM 8x8 Dbl Dot Chars (Graphics) - Not Supported\n"); | |
| break; | |
| case 0x24: /* LOAD 8x16 GRAPHIC CHARS */ | |
| FIXME(int10, "Load 8x16 Graphic Chars - Not Supported\n"); | |
| break; | |
| case 0x30: /* GET FONT INFORMATION */ | |
| FIXME(int10, "Get Font Information - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "INT 10 AH = 0x11 AL = 0x%x - Unknown\n", | |
| AL_reg(context)); | |
| break; | |
| } | |
| break; | |
| case 0x12: /* ALTERNATE FUNCTION SELECT */ | |
| switch BL_reg(context) { | |
| case 0x10: /* GET EGA INFO */ | |
| TRACE(int10, "EGA Info Requested\n"); | |
| BH_reg(context) = 0x00; /* Color screen */ | |
| BL_reg(context) = 0x03; /* 256K EGA card */ | |
| CH_reg(context) = 0x00; /* Switch settings?? */ | |
| CL_reg(context) = 0x09; /* EGA+ card */ | |
| break; | |
| case 0x20: /* ALTERNATE PRTSC */ | |
| FIXME(int10, "Install Alternate Print Screen - Not Supported\n"); | |
| break; | |
| case 0x30: /* SELECT VERTICAL RESOULTION */ | |
| FIXME(int10, "Select Vertical Resoultion - Not Supported\n"); | |
| break; | |
| case 0x31: /* ENABLE/DISABLE PALETTE LOADING */ | |
| FIXME(int10, "Palette Loading - Not Supported\n"); | |
| break; | |
| case 0x32: /* ENABLE/DISABLE VIDEO ADDRERSSING */ | |
| FIXME(int10, "Video Addressing - Not Supported\n"); | |
| break; | |
| case 0x33: /* ENABLE/DISABLE GRAY SCALE SUMMING */ | |
| FIXME(int10, "Gray Scale Summing - Not Supported\n"); | |
| break; | |
| case 0x34: /* ENABLE/DISABLE CURSOR EMULATION */ | |
| FIXME(int10, "Cursor Emulation - Not Supported\n"); | |
| break; | |
| case 0x36: /* VIDEO ADDRESS CONTROL */ | |
| FIXME(int10, "Video Address Control - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "INT 10 AH = 0x11 AL = 0x%x - Unknown\n", | |
| AL_reg(context)); | |
| break; | |
| } | |
| break; | |
| case 0x13: /* WRITE STRING */ | |
| /* This one does not imply that string be at cursor. */ | |
| FIXME(int10, "Write String - Not Supported\n"); | |
| break; | |
| case 0x1a: | |
| switch AL_reg(context) { | |
| case 0x00: /* GET DISPLAY COMBINATION CODE */ | |
| TRACE(int10, "Get Display Combination Code\n"); | |
| AL_reg(context) = 0x1a; | |
| BH_reg(context) = 0x08; /* VGA w/ color analog display */ | |
| BL_reg(context) = 0x00; /* No secondary hardware */ | |
| break; | |
| case 0x01: /* SET DISPLAY COMBINATION CODE */ | |
| FIXME(int10, "Set Display Combination Code - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "INT 10 AH = 0x1a AL = 0x%x - Unknown\n", | |
| AL_reg(context)); | |
| break; | |
| } | |
| break; | |
| case 0x1b: /* FUNCTIONALITY/STATE INFORMATION */ | |
| FIXME(int10, "Get Functionality/State Information - Not Supported\n"); | |
| break; | |
| case 0x1c: /* SAVE/RESTORE VIDEO STATE */ | |
| FIXME(int10, "Save/Restore Video State - Not Supported\n"); | |
| break; | |
| default: | |
| FIXME(int10, "Unknown - 0x%x\n", AH_reg(context)); | |
| INT_BARF( context, 0x10 ); | |
| } | |
| } | |
| static void write_char_attribute_at_cursor(char output, char page_num, | |
| char attribute, short times) | |
| { | |
| /* Contrary to the interrupt list, this routine should not advance | |
| the cursor. To keep this logic simple, we won't use the | |
| CONSOLE_Put() routine. | |
| */ | |
| int wattribute, fg_color, bg_color; | |
| char x, y; | |
| if (page_num) /* Only support one text page right now */ | |
| { | |
| FIXME(int10, "Cannot write to alternate page %d", page_num); | |
| return; | |
| } | |
| conv_text_mode_attributes(attribute, &fg_color, &bg_color, | |
| &wattribute); | |
| TRACE(int10, "Fore: %d Back: %d\n", fg_color, bg_color); | |
| CONSOLE_GetCursorPosition(&x, &y); | |
| while (times) | |
| { | |
| CONSOLE_Write(output, fg_color, bg_color, attribute); | |
| times--; | |
| } | |
| CONSOLE_MoveCursor(x, y); | |
| } | |
| static void conv_text_mode_attributes(char attribute, int *fg, int *bg, | |
| int *wattribute) | |
| { | |
| /* This is a local function to convert the text-mode attributes | |
| to Wine's color and attribute scheme */ | |
| /* Foreground Color is stored in bits 3 through 0 */ | |
| /* Background Color is stored in bits 6 through 4 */ | |
| /* If this has bit 7 set, then we need to blink */ | |
| *fg = color_pallet[attribute & 15]; | |
| *bg = color_pallet[(attribute & 112) / 16]; | |
| *wattribute = attribute & 128; | |
| } | |
| static void scroll_window(int direction, char lines, char row1, | |
| char col1, char row2, char col2, char attribute) | |
| { | |
| int wattribute, bg_color, fg_color; | |
| conv_text_mode_attributes(attribute, &fg_color, &bg_color, | |
| &wattribute); | |
| if (!lines) /* Actually, clear the window */ | |
| { | |
| CONSOLE_ClearWindow(row1, col1, row2, col2, bg_color, wattribute); | |
| } | |
| else if (direction == SCROLL_UP) | |
| { | |
| CONSOLE_ScrollUpWindow(row1, col1, row2, col2, lines, bg_color, | |
| wattribute); | |
| } | |
| else | |
| { | |
| CONSOLE_ScrollDownWindow(row1, col1, row2, col2, lines, bg_color, | |
| wattribute); | |
| } | |
| } | |