///////////////////////////////////////////////////////////////////////// // $Id: win32.cc,v 1.53 2003-05-07 19:15:46 vruppert Exp $ ///////////////////////////////////////////////////////////////////////// // // Copyright (C) 2002 MandrakeSoft S.A. // // MandrakeSoft S.A. // 43, rue d'Aboukir // 75002 Paris - France // http://www.linux-mandrake.com/ // http://www.mandrakesoft.com/ // // This library is free software; you can redistribute it and/or // modify it under the terms of the GNU Lesser General Public // License as published by the Free Software Foundation; either // version 2 of the License, or (at your option) any later version. // // This library is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // Lesser General Public License for more details. // // You should have received a copy of the GNU Lesser General Public // License along with this library; if not, write to the Free Software // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA // Much of this file was written by: // David Ross // dross@pobox.com // Define BX_PLUGGABLE in files that can be compiled into plugins. For // platforms that require a special tag on exported symbols, BX_PLUGGABLE // is used to know when we are exporting symbols and when we are importing. #define BX_PLUGGABLE #include "bochs.h" #if BX_WITH_WIN32 #include "win32res.h" #include "font/vga.bitmap.h" // windows.h is included by bochs.h #include #include class bx_win32_gui_c : public bx_gui_c { public: bx_win32_gui_c (void) {} DECLARE_GUI_VIRTUAL_METHODS() }; // declare one instance of the gui object and call macro to insert the // plugin code static bx_win32_gui_c *theGui = NULL; IMPLEMENT_GUI_PLUGIN_CODE(win32) #define LOG_THIS theGui-> #ifdef __MINGW32__ #if BX_SHOW_IPS #include #endif #endif #define EXIT_GUI_SHUTDOWN 1 #define EXIT_GMH_FAILURE 2 #define EXIT_FONT_BITMAP_ERROR 3 #define EXIT_NORMAL 4 #define EXIT_HEADER_BITMAP_ERROR 5 // Keyboard/mouse stuff #define SCANCODE_BUFSIZE 20 #define MOUSE_PRESSED 0x20000000 #define HEADERBAR_CLICKED 0x08000000 #define MOUSE_MOTION 0x22000000 void enq_key_event(Bit32u, Bit32u); void enq_mouse_event(void); struct QueueEvent { Bit32u key_event; int mouse_x; int mouse_y; int mouse_button_state; }; QueueEvent* deq_key_event(void); static QueueEvent keyevents[SCANCODE_BUFSIZE]; static unsigned head=0, tail=0; static int mouse_button_state = 0; static int ms_xdelta=0, ms_ydelta=0; static int ms_lastx=0, ms_lasty=0; static int ms_savedx=0, ms_savedy=0; static BOOL mouseCaptureMode; static unsigned long workerThread = 0; static DWORD workerThreadID = 0; // Graphics screen stuff static unsigned x_tilesize = 0, y_tilesize = 0; static BITMAPINFO* bitmap_info=(BITMAPINFO*)0; static RGBQUAD* cmap_index; // indeces into system colormap static HBITMAP MemoryBitmap = NULL; static HDC MemoryDC = NULL; static RECT updated_area; static BOOL updated_area_valid = FALSE; // Textmode cursor HBITMAP cursorBmp; // Headerbar stuff HWND hwndTB; unsigned bx_bitmap_entries; struct { HBITMAP bmap; unsigned xdim; unsigned ydim; } bx_bitmaps[BX_MAX_PIXMAPS]; static struct { unsigned bmap_id; void (*f)(void); } bx_headerbar_entry[BX_MAX_HEADERBAR_ENTRIES]; static unsigned bx_headerbar_y = 0; static int bx_headerbar_entries; static unsigned bx_hb_separator; // Misc stuff static unsigned dimension_x, dimension_y; static unsigned stretched_x, stretched_y; static unsigned stretch_factor=1; static unsigned prev_block_cursor_x = 0; static unsigned prev_block_cursor_y = 0; static HBITMAP vgafont[256]; static unsigned x_edge=0, y_edge=0, y_caption=0; static int yChar = 16; static HFONT hFont[3]; static int FontId = 2; static char szAppName[] = "Bochs for Windows"; static char szWindowName[] = "Bochs for Windows - Display"; typedef struct { HINSTANCE hInstance; CRITICAL_SECTION drawCS; CRITICAL_SECTION keyCS; CRITICAL_SECTION mouseCS; int kill; // reason for terminateEmul(int) BOOL UIinited; HWND mainWnd; HWND simWnd; } sharedThreadInfo; sharedThreadInfo stInfo; LRESULT CALLBACK mainWndProc (HWND, UINT, WPARAM, LPARAM); LRESULT CALLBACK simWndProc (HWND, UINT, WPARAM, LPARAM); VOID UIThread(PVOID); void terminateEmul(int); void create_vga_font(void); static unsigned char reverse_bitorder(unsigned char); void DrawBitmap (HDC, HBITMAP, int, int, DWORD, unsigned char cColor); void DrawChar (HDC, unsigned char, int, int, unsigned char cColor, int, int); void updateUpdated(int,int,int,int); static void headerbar_click(int x); void InitFont(void); void DestroyFont(void); Bit32u win32_to_bx_key[0x59] = { /* 0x00 - 0x0f */ 0, BX_KEY_ESC, BX_KEY_1, BX_KEY_2, BX_KEY_3, BX_KEY_4, BX_KEY_5, BX_KEY_6, BX_KEY_7, BX_KEY_8, BX_KEY_9, BX_KEY_0, BX_KEY_MINUS, BX_KEY_EQUALS, BX_KEY_BACKSPACE, BX_KEY_TAB, /* 0x10 - 0x1f */ BX_KEY_Q, BX_KEY_W, BX_KEY_E, BX_KEY_R, BX_KEY_T, BX_KEY_Y, BX_KEY_U, BX_KEY_I, BX_KEY_O, BX_KEY_P, BX_KEY_LEFT_BRACKET, BX_KEY_RIGHT_BRACKET, BX_KEY_ENTER, BX_KEY_CTRL_L, BX_KEY_A, BX_KEY_S, /* 0x20 - 0x2f */ BX_KEY_D, BX_KEY_F, BX_KEY_G, BX_KEY_H, BX_KEY_J, BX_KEY_K, BX_KEY_L, BX_KEY_SEMICOLON, BX_KEY_SINGLE_QUOTE, BX_KEY_GRAVE, BX_KEY_SHIFT_L, BX_KEY_BACKSLASH, BX_KEY_Z, BX_KEY_X, BX_KEY_C, BX_KEY_V, /* 0x30 - 0x3f */ BX_KEY_B, BX_KEY_N, BX_KEY_M, BX_KEY_COMMA, BX_KEY_PERIOD, BX_KEY_SLASH, BX_KEY_SHIFT_R, BX_KEY_KP_MULTIPLY, BX_KEY_ALT_L, BX_KEY_SPACE, BX_KEY_CAPS_LOCK, BX_KEY_F1, BX_KEY_F2, BX_KEY_F3, BX_KEY_F4, BX_KEY_F5, /* 0x40 - 0x4f */ BX_KEY_F6, BX_KEY_F7, BX_KEY_F8, BX_KEY_F9, BX_KEY_F10, BX_KEY_PAUSE, BX_KEY_SCRL_LOCK, BX_KEY_KP_HOME, BX_KEY_KP_UP, BX_KEY_KP_PAGE_UP, BX_KEY_KP_SUBTRACT, BX_KEY_KP_LEFT, BX_KEY_KP_5, BX_KEY_KP_RIGHT, BX_KEY_KP_ADD, BX_KEY_KP_END, /* 0x50 - 0x58 */ BX_KEY_KP_DOWN, BX_KEY_KP_PAGE_DOWN, BX_KEY_KP_INSERT, BX_KEY_KP_DELETE, 0, 0, BX_KEY_LEFT_BACKSLASH, BX_KEY_F11, BX_KEY_F12 }; /* Macro to convert WM_ button state to BX button state */ #ifdef __MINGW32__ VOID CALLBACK MyTimer(HWND,UINT,UINT,DWORD); void alarm(int); void bx_signal_handler(int); #endif static void processMouseXY( int x, int y, int windows_state, int implied_state_change) { int bx_state; int old_bx_state; EnterCriticalSection( &stInfo.mouseCS); bx_state=( ( windows_state & MK_LBUTTON) ? 1 : 0 ) + ( ( windows_state & MK_RBUTTON) ? 2 : 0); old_bx_state=bx_state ^ implied_state_change; if ( old_bx_state!=mouse_button_state) { /* Make up for missing message */ BX_INFO(( "&&&missing mouse state change")); EnterCriticalSection( &stInfo.keyCS); enq_mouse_event(); mouse_button_state=old_bx_state; enq_key_event( mouse_button_state, MOUSE_PRESSED); LeaveCriticalSection( &stInfo.keyCS); } ms_ydelta=ms_savedy-y; ms_xdelta=x-ms_savedx; ms_lastx=x; ms_lasty=y; if ( bx_state!=mouse_button_state) { EnterCriticalSection( &stInfo.keyCS); enq_mouse_event(); mouse_button_state=bx_state; enq_key_event( mouse_button_state, MOUSE_PRESSED); LeaveCriticalSection( &stInfo.keyCS); } LeaveCriticalSection( &stInfo.mouseCS); } static void resetDelta() { EnterCriticalSection( &stInfo.mouseCS); ms_savedx=ms_lastx; ms_savedy=ms_lasty; ms_ydelta=ms_xdelta=0; LeaveCriticalSection( &stInfo.mouseCS); } static void cursorWarped() { EnterCriticalSection( &stInfo.mouseCS); EnterCriticalSection( &stInfo.keyCS); enq_mouse_event(); LeaveCriticalSection( &stInfo.keyCS); ms_lastx=stretched_x/2; ms_lasty=stretched_y/2; ms_savedx=ms_lastx; ms_savedy=ms_lasty; LeaveCriticalSection( &stInfo.mouseCS); } // GUI thread must be dead/done in order to call terminateEmul void terminateEmul(int reason) { // We know that Critical Sections were inited when x_tilesize has been set // See bx_win32_gui_c::specific_init if (x_tilesize != 0) { DeleteCriticalSection (&stInfo.drawCS); DeleteCriticalSection (&stInfo.keyCS); DeleteCriticalSection (&stInfo.mouseCS); } x_tilesize = 0; if (MemoryDC) DeleteDC (MemoryDC); if (MemoryBitmap) DeleteObject (MemoryBitmap); if ( bitmap_info) delete[] (char*)bitmap_info; for (unsigned b=0; bbmiHeader.biSize=sizeof(BITMAPINFOHEADER); bitmap_info->bmiHeader.biWidth=x_tilesize; // Height is negative for top-down bitmap bitmap_info->bmiHeader.biHeight= -y_tilesize; bitmap_info->bmiHeader.biPlanes=1; bitmap_info->bmiHeader.biBitCount=8; bitmap_info->bmiHeader.biCompression=BI_RGB; bitmap_info->bmiHeader.biSizeImage=x_tilesize*y_tilesize; // I think these next two figures don't matter; saying 45 pixels/centimeter bitmap_info->bmiHeader.biXPelsPerMeter=4500; bitmap_info->bmiHeader.biYPelsPerMeter=4500; bitmap_info->bmiHeader.biClrUsed=256; bitmap_info->bmiHeader.biClrImportant=0; cmap_index=bitmap_info->bmiColors; // start out with all color map indeces pointing to Black cmap_index[0] = black_quad; for (unsigned i=1; i<256; i++) { cmap_index[i] = cmap_index[0]; } x_edge = GetSystemMetrics(SM_CXFIXEDFRAME); y_edge = GetSystemMetrics(SM_CYFIXEDFRAME); y_caption = GetSystemMetrics(SM_CYCAPTION); if (stInfo.hInstance) workerThread = _beginthread (UIThread, 0, NULL); else terminateEmul(EXIT_GMH_FAILURE); // Wait for a window before continuing if ((stInfo.kill == 0) && (FindWindow(szAppName, NULL) == NULL)) Sleep(500); // Now set this thread's priority to below normal because this is where // the emulated CPU runs, and it hogs the real CPU SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_BELOW_NORMAL); if (bx_options.Oprivate_colormap->get ()) BX_INFO(( "private_colormap option ignored.")); // load keymap tables if(bx_options.keyboard.OuseMapping->get()) { bx_keymap.loadKeymap(NULL); // I have no function to convert X windows symbols } } // This thread controls the GUI window. VOID UIThread(PVOID pvoid) { MSG msg; HDC hdc; WNDCLASS wndclass; RECT wndRect, wndRect2; workerThreadID = GetCurrentThreadId(); wndclass.style = CS_HREDRAW | CS_VREDRAW; wndclass.lpfnWndProc = mainWndProc; wndclass.cbClsExtra = 0; wndclass.cbWndExtra = 0; wndclass.hInstance = stInfo.hInstance; wndclass.hIcon = LoadIcon (stInfo.hInstance, MAKEINTRESOURCE(ICON_BOCHS)); wndclass.hCursor = LoadCursor (NULL, IDC_ARROW); wndclass.hbrBackground = (HBRUSH) GetStockObject (BLACK_BRUSH); wndclass.lpszMenuName = NULL; wndclass.lpszClassName = szAppName; RegisterClass (&wndclass); wndclass.style = CS_HREDRAW | CS_VREDRAW; wndclass.lpfnWndProc = simWndProc; wndclass.cbClsExtra = 0; wndclass.cbWndExtra = 0; wndclass.hInstance = stInfo.hInstance; wndclass.hIcon = NULL; wndclass.hCursor = LoadCursor (NULL, IDC_ARROW); wndclass.hbrBackground = (HBRUSH) GetStockObject (BLACK_BRUSH); wndclass.lpszMenuName = NULL; wndclass.lpszClassName = "SIMWINDOW"; RegisterClass (&wndclass); stInfo.mainWnd = CreateWindow (szAppName, szWindowName, WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX, CW_USEDEFAULT, CW_USEDEFAULT, dimension_x + x_edge * 2, dimension_y + y_edge * 2 + y_caption, NULL, NULL, stInfo.hInstance, NULL); if (stInfo.mainWnd) { ShowWindow (stInfo.mainWnd, SW_SHOW); InitCommonControls(); hwndTB = CreateWindowEx(0, TOOLBARCLASSNAME, (LPSTR) NULL, WS_CHILD | CCS_ADJUSTABLE, 0, 0, 0, 0, stInfo.mainWnd, (HMENU) 100, stInfo.hInstance, NULL); SendMessage(hwndTB, TB_BUTTONSTRUCTSIZE, (WPARAM) sizeof(TBBUTTON), 0); SendMessage(hwndTB, TB_SETBITMAPSIZE, 0, (LPARAM)MAKELONG(32, 32)); ShowWindow(hwndTB, SW_SHOW); GetClientRect(stInfo.mainWnd, &wndRect); GetClientRect(hwndTB, &wndRect2); bx_headerbar_y = wndRect2.bottom - wndRect2.top; SetWindowPos(stInfo.mainWnd, NULL, 0, 0, stretched_x + x_edge * 2, stretched_y + bx_headerbar_y + y_edge * 2 + y_caption, SWP_NOMOVE|SWP_NOZORDER); UpdateWindow (stInfo.mainWnd); stInfo.simWnd = CreateWindow("SIMWINDOW", "", WS_CHILD, 0, bx_headerbar_y, wndRect.right - wndRect.left, wndRect.bottom - wndRect.top - bx_headerbar_y, stInfo.mainWnd, NULL, stInfo.hInstance, NULL); /* needed for the Japanese versions of Windows */ if (stInfo.simWnd) { HMODULE hm; hm = GetModuleHandle("USER32"); if (hm) { BOOL (WINAPI *enableime)(HWND, BOOL); enableime = (BOOL (WINAPI *)(HWND, BOOL))GetProcAddress(hm, "WINNLSEnableIME"); if (enableime) { enableime(stInfo.simWnd, FALSE); BX_INFO(("IME disabled")); } } } ShowWindow(stInfo.simWnd, SW_SHOW); UpdateWindow (stInfo.simWnd); SetFocus(stInfo.simWnd); ShowCursor(!mouseCaptureMode); GetWindowRect(stInfo.simWnd, &wndRect); SetCursorPos(wndRect.left + stretched_x/2, wndRect.top + stretched_y/2); cursorWarped(); hdc = GetDC(stInfo.simWnd); MemoryBitmap = CreateCompatibleBitmap(hdc, BX_MAX_XRES, BX_MAX_YRES); MemoryDC = CreateCompatibleDC(hdc); ReleaseDC(stInfo.simWnd, hdc); if (MemoryBitmap && MemoryDC) { stInfo.UIinited = TRUE; while (GetMessage (&msg, NULL, 0, 0)) { TranslateMessage (&msg); DispatchMessage (&msg); } } } stInfo.kill = EXIT_GUI_SHUTDOWN; _endthread(); } LRESULT CALLBACK mainWndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam) { switch (iMsg) { case WM_CREATE: bx_options.Omouse_enabled->set (mouseCaptureMode); if (mouseCaptureMode) SetWindowText(hwnd, "Bochs for Windows [F12 to release mouse]"); else SetWindowText(hwnd, "Bochs for Windows [F12 enables mouse]"); return 0; case WM_COMMAND: if (LOWORD(wParam) >= 101) { EnterCriticalSection(&stInfo.keyCS); enq_key_event(LOWORD(wParam)-101, HEADERBAR_CLICKED); LeaveCriticalSection(&stInfo.keyCS); } break; case WM_SETFOCUS: SetFocus(stInfo.simWnd); return 0; case WM_CLOSE: SendMessage(stInfo.simWnd, WM_CLOSE, 0, 0); break; case WM_DESTROY: PostQuitMessage (0); return 0; } return DefWindowProc (hwnd, iMsg, wParam, lParam); } LRESULT CALLBACK simWndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam) { HDC hdc, hdcMem; PAINTSTRUCT ps; RECT wndRect; switch (iMsg) { case WM_CREATE: InitFont(); SetTimer (hwnd, 1, 330, NULL); return 0; case WM_TIMER: // If mouse escaped, bring it back if ( mouseCaptureMode) { GetWindowRect(hwnd, &wndRect); SetCursorPos(wndRect.left + stretched_x/2, wndRect.top + stretched_y/2); cursorWarped(); } bx_options.Omouse_enabled->set (mouseCaptureMode); return 0; case WM_PAINT: EnterCriticalSection(&stInfo.drawCS); hdc = BeginPaint (hwnd, &ps); hdcMem = CreateCompatibleDC (hdc); SelectObject (hdcMem, MemoryBitmap); StretchBlt(hdc, ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right - ps.rcPaint.left + 1, ps.rcPaint.bottom - ps.rcPaint.top + 1, hdcMem, ps.rcPaint.left/stretch_factor, ps.rcPaint.top, (ps.rcPaint.right - ps.rcPaint.left+1)/stretch_factor, (ps.rcPaint.bottom - ps.rcPaint.top+1),SRCCOPY); DeleteDC (hdcMem); EndPaint (hwnd, &ps); LeaveCriticalSection(&stInfo.drawCS); return 0; case WM_MOUSEMOVE: processMouseXY( LOWORD(lParam), HIWORD(lParam), wParam, 0); return 0; case WM_LBUTTONDOWN: case WM_LBUTTONDBLCLK: case WM_LBUTTONUP: processMouseXY( LOWORD(lParam), HIWORD(lParam), wParam, 1); return 0; case WM_RBUTTONDOWN: case WM_RBUTTONDBLCLK: case WM_RBUTTONUP: processMouseXY( LOWORD(lParam), HIWORD(lParam), wParam, 2); case WM_CLOSE: return DefWindowProc (hwnd, iMsg, wParam, lParam); case WM_DESTROY: KillTimer (hwnd, 1); stInfo.UIinited = FALSE; DestroyFont(); return 0; case WM_KEYDOWN: case WM_SYSKEYDOWN: if (wParam == VK_F12) { mouseCaptureMode = !mouseCaptureMode; bx_options.Omouse_enabled->set (mouseCaptureMode); ShowCursor(!mouseCaptureMode); ShowCursor(!mouseCaptureMode); // somehow one didn't do the trick (win98) GetWindowRect(hwnd, &wndRect); SetCursorPos(wndRect.left + stretched_x/2, wndRect.top + stretched_y/2); cursorWarped(); if (mouseCaptureMode) SetWindowText(stInfo.mainWnd, "Bochs for Windows [Press F12 to release mouse capture]"); else SetWindowText(stInfo.mainWnd, "Bochs for Windows [F12 enables the mouse in Bochs]"); } else { EnterCriticalSection(&stInfo.keyCS); enq_key_event(HIWORD (lParam) & 0x01FF, BX_KEY_PRESSED); LeaveCriticalSection(&stInfo.keyCS); } return 0; case WM_KEYUP: case WM_SYSKEYUP: EnterCriticalSection(&stInfo.keyCS); enq_key_event(HIWORD (lParam) & 0x01FF, BX_KEY_RELEASED); LeaveCriticalSection(&stInfo.keyCS); return 0; case WM_CHAR: case WM_DEADCHAR: case WM_SYSCHAR: case WM_SYSDEADCHAR: return 0; } return DefWindowProc (hwnd, iMsg, wParam, lParam); } void enq_key_event(Bit32u key, Bit32u press_release) { if (((tail+1) % SCANCODE_BUFSIZE) == head) { BX_ERROR(( "enq_scancode: buffer full")); return; } keyevents[tail].key_event = key | press_release; tail = (tail + 1) % SCANCODE_BUFSIZE; } void enq_mouse_event(void) { EnterCriticalSection( &stInfo.mouseCS); if ( ms_xdelta || ms_ydelta) { if (((tail+1) % SCANCODE_BUFSIZE) == head) { BX_ERROR(( "enq_scancode: buffer full" )); return; } QueueEvent& current=keyevents[tail]; current.key_event=MOUSE_MOTION; current.mouse_x=ms_xdelta; current.mouse_y=ms_ydelta; current.mouse_button_state=mouse_button_state; resetDelta(); tail = (tail + 1) % SCANCODE_BUFSIZE; } LeaveCriticalSection( &stInfo.mouseCS); } QueueEvent* deq_key_event(void) { QueueEvent* key; if ( head == tail ) { BX_ERROR(("deq_scancode: buffer empty")); return((QueueEvent*)0); } key = &keyevents[head]; head = (head + 1) % SCANCODE_BUFSIZE; return(key); } // ::HANDLE_EVENTS() // // Called periodically (vga_update_interval in .bochsrc) so the // the gui code can poll for keyboard, mouse, and other // relevant events. void bx_win32_gui_c::handle_events(void) { Bit32u key; Bit32u key_event; // printf("# Hey!!!\n"); if (stInfo.kill) terminateEmul(stInfo.kill); // Handle mouse moves enq_mouse_event(); // Handle keyboard and mouse clicks EnterCriticalSection(&stInfo.keyCS); while (head != tail) { QueueEvent* queue_event=deq_key_event(); if ( ! queue_event) break; key = queue_event->key_event; if ( key==MOUSE_MOTION) { DEV_mouse_motion( queue_event->mouse_x, queue_event->mouse_y, queue_event->mouse_button_state); } // Check for mouse buttons first else if ( key & MOUSE_PRESSED) { // printf("# click!\n"); DEV_mouse_motion( 0, 0, LOWORD(key)); } else if (key & HEADERBAR_CLICKED) { headerbar_click(LOWORD(key)); } else { if (key & 0x0100) { // It's an extended key switch (key & 0xff) { case 0x1C: key_event = BX_KEY_KP_ENTER; break; case 0x1D: key_event = BX_KEY_CTRL_R; break; case 0x35: key_event = BX_KEY_KP_DIVIDE; break; case 0x38: // This makes the "AltGr" key on European keyboards work DEV_kbd_gen_scancode(BX_KEY_CTRL_L | BX_KEY_RELEASED); key_event = BX_KEY_ALT_R; break; case 0x45: key_event = BX_KEY_NUM_LOCK; break; case 0x47: key_event = BX_KEY_HOME; break; case 0x48: key_event = BX_KEY_UP; break; case 0x49: key_event = BX_KEY_PAGE_UP; break; case 0x4B: key_event = BX_KEY_LEFT; break; case 0x4D: key_event = BX_KEY_RIGHT; break; case 0x4F: key_event = BX_KEY_END; break; case 0x50: key_event = BX_KEY_DOWN; break; case 0x51: key_event = BX_KEY_PAGE_DOWN; break; case 0x52: key_event = BX_KEY_INSERT; break; case 0x53: key_event = BX_KEY_DELETE; break; case 0x5B: key_event = BX_KEY_WIN_L; break; case 0x5C: key_event = BX_KEY_WIN_R; break; case 0x5D: key_event = BX_KEY_MENU; break; } } else { key_event = win32_to_bx_key[key & 0xff]; } if (key & BX_KEY_RELEASED) key_event |= BX_KEY_RELEASED; DEV_kbd_gen_scancode(key_event); } } LeaveCriticalSection(&stInfo.keyCS); } // ::FLUSH() // // Called periodically, requesting that the gui code flush all pending // screen update requests. void bx_win32_gui_c::flush(void) { EnterCriticalSection( &stInfo.drawCS); if (updated_area_valid) { // slight bugfix updated_area.right++; updated_area.bottom++; InvalidateRect( stInfo.simWnd, &updated_area, FALSE); updated_area_valid = FALSE; } LeaveCriticalSection( &stInfo.drawCS); } // ::CLEAR_SCREEN() // // Called to request that the VGA region is cleared. Don't // clear the area that defines the headerbar. void bx_win32_gui_c::clear_screen(void) { HGDIOBJ oldObj; if (!stInfo.UIinited) return; EnterCriticalSection(&stInfo.drawCS); oldObj = SelectObject(MemoryDC, MemoryBitmap); PatBlt(MemoryDC, 0, 0, stretched_x, stretched_y, BLACKNESS); SelectObject(MemoryDC, oldObj); updateUpdated(0, 0, dimension_x-1, dimension_y-1); LeaveCriticalSection(&stInfo.drawCS); } // ::TEXT_UPDATE() // // Called in a VGA text mode, to update the screen with // new content. // // old_text: array of character/attributes making up the contents // of the screen from the last call. See below // new_text: array of character/attributes making up the current // contents, which should now be displayed. See below // // format of old_text & new_text: each is 80*nrows*2 bytes long. // This represents 80 characters wide by 'nrows' high, with // each character being 2 bytes. The first by is the // character value, the second is the attribute byte. // I currently don't handle the attribute byte. // // cursor_x: new x location of cursor // cursor_y: new y location of cursor void bx_win32_gui_c::text_update(Bit8u *old_text, Bit8u *new_text, unsigned long cursor_x, unsigned long cursor_y, bx_vga_tminfo_t tm_info, unsigned nrows) { HDC hdc; unsigned char cChar; unsigned i, x, y; Bit8u cs_start, cs_end; unsigned nchars, ncols; unsigned char data[64]; BOOL forceUpdate = FALSE; if (charmap_updated) { for (unsigned c = 0; c<256; c++) { if (char_changed[c]) { memset(data, 0, sizeof(data)); for (unsigned i=0; i<32; i++) data[i*2] = vga_charmap[c*32+i]; SetBitmapBits(vgafont[c], 64, data); char_changed[c] = 0; } } forceUpdate = TRUE; charmap_updated = 0; } cs_start = tm_info.cs_start; cs_end = tm_info.cs_end; if (!stInfo.UIinited) return; EnterCriticalSection(&stInfo.drawCS); hdc = GetDC(stInfo.simWnd); ncols = dimension_x/8; // Number of characters on screen, variable number of rows nchars = ncols*nrows; if ( (prev_block_cursor_y*ncols + prev_block_cursor_x) < nchars) { cChar = new_text[(prev_block_cursor_y*ncols + prev_block_cursor_x)*2]; if (yChar >= 14) { DrawBitmap(hdc, vgafont[cChar], prev_block_cursor_x*8, prev_block_cursor_y*yChar, SRCCOPY, new_text[((prev_block_cursor_y*ncols + prev_block_cursor_x)*2)+1]); } else { DrawChar(hdc, cChar, prev_block_cursor_x*8, prev_block_cursor_y*yChar, new_text[((prev_block_cursor_y*ncols + prev_block_cursor_x)*2)+1], 1, 0); } } for (i=0; i=14) { DrawBitmap(hdc, vgafont[cChar], x*8, y*yChar, SRCCOPY, new_text[i+1]); } else { DrawChar(hdc, cChar, x*8, y*yChar, new_text[i+1], 1, 0); } } } prev_block_cursor_x = cursor_x; prev_block_cursor_y = cursor_y; // now draw character at new block cursor location in reverse if (((cursor_y*ncols + cursor_x) < nchars ) && (cs_start <= cs_end)) { cChar = new_text[(cursor_y*ncols + cursor_x)*2]; if (yChar>=14) { memset(data, 0, sizeof(data)); for (unsigned i=0; i<32; i++) { data[i*2] = reverse_bitorder(bx_vgafont[cChar].data[i]); if ((i >= cs_start) && (i <= cs_end)) data[i*2] = 255 - data[i*2]; } SetBitmapBits(cursorBmp, 64, data); DrawBitmap(hdc, cursorBmp, cursor_x*8, cursor_y*yChar, SRCCOPY, new_text[((cursor_y*ncols + cursor_x)*2)+1]); } else { char cAttr = new_text[((cursor_y*ncols + cursor_x)*2)+1]; DrawChar(hdc, cChar, cursor_x*8, cursor_y*yChar, cAttr, cs_start, cs_end); } } ReleaseDC(stInfo.simWnd, hdc); LeaveCriticalSection(&stInfo.drawCS); } int bx_win32_gui_c::get_clipboard_text(Bit8u **bytes, Bit32s *nbytes) { if (OpenClipboard(stInfo.simWnd)) { HGLOBAL hg = GetClipboardData(CF_TEXT); char *data = (char *)GlobalLock(hg); *nbytes = strlen(data); *bytes = new Bit8u[1 + *nbytes]; BX_INFO (("found %d bytes on the clipboard", *nbytes)); memcpy (*bytes, data, *nbytes+1); BX_INFO (("first byte is 0x%02x", *bytes[0])); GlobalUnlock(hg); CloseClipboard(); return 1; // *bytes will be freed in bx_keyb_c::paste_bytes or // bx_keyb_c::service_paste_buf, using delete []. } else { BX_ERROR (("paste: could not open clipboard")); return 0; } } int bx_win32_gui_c::set_clipboard_text(char *text_snapshot, Bit32u len) { if (OpenClipboard(stInfo.simWnd)) { HANDLE hMem = GlobalAlloc(GMEM_ZEROINIT, len); EmptyClipboard(); lstrcpy((char *)hMem, text_snapshot); SetClipboardData(CF_TEXT, hMem); CloseClipboard(); GlobalFree(hMem); return 1; } else { BX_ERROR (("copy: could not open clipboard")); return 0; } } // ::PALETTE_CHANGE() // // Allocate a color in the native GUI, for this color, and put // it in the colormap location 'index'. // returns: 0=no screen update needed (color map change has direct effect) // 1=screen updated needed (redraw using current colormap) bx_bool bx_win32_gui_c::palette_change(unsigned index, unsigned red, unsigned green, unsigned blue) { cmap_index[index].rgbRed = red; cmap_index[index].rgbBlue = blue; cmap_index[index].rgbGreen = green; return(1); } // ::GRAPHICS_TILE_UPDATE() // // Called to request that a tile of graphics be drawn to the // screen, since info in this region has changed. // // tile: array of 8bit values representing a block of pixels with // dimension equal to the 'tilewidth' & 'tileheight' parameters to // ::specific_init(). Each value specifies an index into the // array of colors you allocated for ::palette_change() // x0: x origin of tile // y0: y origin of tile // // note: origin of tile and of window based on (0,0) being in the upper // left of the window. void bx_win32_gui_c::graphics_tile_update(Bit8u *tile, unsigned x0, unsigned y0) { HDC hdc; HGDIOBJ oldObj; EnterCriticalSection(&stInfo.drawCS); hdc = GetDC(stInfo.simWnd); oldObj = SelectObject(MemoryDC, MemoryBitmap); StretchDIBits( MemoryDC, x0, y0, x_tilesize, y_tilesize, 0, 0, x_tilesize, y_tilesize, tile, bitmap_info, DIB_RGB_COLORS, SRCCOPY); SelectObject(MemoryDC, oldObj); updateUpdated(x0, y0, x0 + x_tilesize - 1, y0 + y_tilesize - 1); ReleaseDC(stInfo.simWnd, hdc); LeaveCriticalSection(&stInfo.drawCS); } // ::DIMENSION_UPDATE() // // Called when the VGA mode changes it's X,Y dimensions. // Resize the window to this size, but you need to add on // the height of the headerbar to the Y value. // // x: new VGA x size // y: new VGA y size (add headerbar_y parameter from ::specific_init(). void bx_win32_gui_c::dimension_update(unsigned x, unsigned y, unsigned fheight) { if (fheight > 0) { if (fheight >= 14) { FontId = 2; yChar = fheight; } else if (fheight > 12) { FontId = 1; yChar = 14; } else { FontId = 0; yChar = 12; } y = y * yChar / fheight; } if ( x==dimension_x && y==dimension_y) return; dimension_x = x; dimension_y = y; stretched_x = dimension_x; stretched_y = dimension_y; stretch_factor = 1; while ( stretched_x<400) { stretched_x *= 2; stretch_factor *= 2; } SetWindowPos(stInfo.mainWnd, HWND_TOP, 0, 0, stretched_x + x_edge * 2, stretched_y + bx_headerbar_y + y_edge * 2 + y_caption, SWP_NOMOVE | SWP_NOZORDER); MoveWindow(hwndTB, 0, 0, stretched_x, bx_headerbar_y, TRUE); MoveWindow(stInfo.simWnd, 0, bx_headerbar_y, stretched_x, stretched_y, TRUE); } // ::CREATE_BITMAP() // // Create a monochrome bitmap of size 'xdim' by 'ydim', which will // be drawn in the headerbar. Return an integer ID to the bitmap, // with which the bitmap can be referenced later. // // bmap: packed 8 pixels-per-byte bitmap. The pixel order is: // bit0 is the left most pixel, bit7 is the right most pixel. // xdim: x dimension of bitmap // ydim: y dimension of bitmap unsigned bx_win32_gui_c::create_bitmap(const unsigned char *bmap, unsigned xdim, unsigned ydim) { unsigned char *data; TBADDBITMAP tbab; if (bx_bitmap_entries >= BX_MAX_PIXMAPS) terminateEmul(EXIT_HEADER_BITMAP_ERROR); bx_bitmaps[bx_bitmap_entries].bmap = CreateBitmap(xdim,ydim,1,1,NULL); if (!bx_bitmaps[bx_bitmap_entries].bmap) terminateEmul(EXIT_HEADER_BITMAP_ERROR); data = new unsigned char[ydim * xdim/8]; for (unsigned i=0; i BX_MAX_HEADERBAR_ENTRIES ) terminateEmul(EXIT_HEADER_BITMAP_ERROR); bx_headerbar_entries++; hb_index = bx_headerbar_entries - 1; memset(tbb,0,sizeof(tbb)); if (bx_hb_separator==0) { tbb[0].iBitmap = 0; tbb[0].idCommand = 0; tbb[0].fsState = 0; tbb[0].fsStyle = TBSTYLE_SEP; SendMessage(hwndTB, TB_ADDBUTTONS, 1,(LPARAM)(LPTBBUTTON)&tbb); } tbb[0].iBitmap = bmap_id; tbb[0].idCommand = hb_index + 101; tbb[0].fsState = TBSTATE_ENABLED; tbb[0].fsStyle = TBSTYLE_BUTTON; if (alignment == BX_GRAVITY_LEFT) { SendMessage(hwndTB, TB_INSERTBUTTON, bx_hb_separator,(LPARAM)(LPTBBUTTON)&tbb); bx_hb_separator++; } else { // BX_GRAVITY_RIGHT SendMessage(hwndTB, TB_INSERTBUTTON, bx_hb_separator+1, (LPARAM)(LPTBBUTTON)&tbb); } if (hb_index==0) { SendMessage(hwndTB, TB_AUTOSIZE, 0, 0); GetWindowRect(hwndTB, &R); bx_headerbar_y = R.bottom - R.top + 1; } bx_headerbar_entry[hb_index].bmap_id = bmap_id; bx_headerbar_entry[hb_index].f = f; return(hb_index); } // ::SHOW_HEADERBAR() // // Show (redraw) the current headerbar, which is composed of // currently installed bitmaps. void bx_win32_gui_c::show_headerbar(void) { } // ::REPLACE_BITMAP() // // Replace the bitmap installed in the headerbar ID slot 'hbar_id', // with the one specified by 'bmap_id'. 'bmap_id' will have // been generated by ::create_bitmap(). The old and new bitmap // must be of the same size. This allows the bitmap the user // sees to change, when some action occurs. For example when // the user presses on the floppy icon, it then displays // the ejected status. // // hbar_id: headerbar slot ID // bmap_id: bitmap ID void bx_win32_gui_c::replace_bitmap(unsigned hbar_id, unsigned bmap_id) { if (bmap_id != bx_headerbar_entry[hbar_id].bmap_id) { bx_headerbar_entry[hbar_id].bmap_id = bmap_id; SendMessage(hwndTB, TB_CHANGEBITMAP, (WPARAM)hbar_id+101, (LPARAM) MAKELPARAM(bmap_id, 0)); } } // ::EXIT() // // Called before bochs terminates, to allow for a graceful // exit from the native GUI mechanism. void bx_win32_gui_c::exit(void) { printf("# In bx_win32_gui_c::exit(void)!\n"); // kill thread first... PostMessage(stInfo.mainWnd, WM_CLOSE, 0, 0); // Wait until it dies while ((stInfo.kill == 0) && (workerThreadID != 0)) Sleep(500); if (!stInfo.kill) terminateEmul(EXIT_NORMAL); } void create_vga_font(void) { unsigned char data[64]; // VGA font is 8wide x 16high for (unsigned c = 0; c<256; c++) { vgafont[c] = CreateBitmap(8,32,1,1,NULL); if (!vgafont[c]) terminateEmul(EXIT_FONT_BITMAP_ERROR); memset(data, 0, sizeof(data)); for (unsigned i=0; i<16; i++) data[i*2] = reverse_bitorder(bx_vgafont[c].data[i]); SetBitmapBits(vgafont[c], 64, data); } } unsigned char reverse_bitorder(unsigned char b) { unsigned char ret=0; for (unsigned i=0; i<8; i++) { ret |= (b & 0x01) << (7-i); b >>= 1; } return(ret); } COLORREF GetColorRef(unsigned char attr) { return RGB(cmap_index[attr].rgbRed, cmap_index[attr].rgbGreen, cmap_index[attr].rgbBlue); } void DrawBitmap (HDC hdc, HBITMAP hBitmap, int xStart, int yStart, DWORD dwRop, unsigned char cColor) { BITMAP bm; HDC hdcMem; POINT ptSize, ptOrg; HGDIOBJ oldObj; hdcMem = CreateCompatibleDC (hdc); SelectObject (hdcMem, hBitmap); SetMapMode (hdcMem, GetMapMode (hdc)); GetObject (hBitmap, sizeof (BITMAP), (LPVOID) &bm); ptSize.x = bm.bmWidth; ptSize.y = yChar; DPtoLP (hdc, &ptSize, 1); ptOrg.x = 0; ptOrg.y = 0; DPtoLP (hdcMem, &ptOrg, 1); // BitBlt (hdc, xStart, yStart, ptSize.x, ptSize.y, hdcMem, ptOrg.x, // ptOrg.y, dwRop); oldObj = SelectObject(MemoryDC, MemoryBitmap); // BitBlt(MemoryDC, xStart, yStart, ptSize.x, ptSize.y, hdcMem, ptOrg.x, // ptOrg.y, dwRop); //Colors taken from Ralf Browns interrupt list. //(0=black, 1=blue, 2=red, 3=purple, 4=green, 5=cyan, 6=yellow, 7=white) //The highest background bit usually means blinking characters. No idea //how to implement that so for now it's just implemented as color. //Note: it is also possible to program the VGA controller to have the //high bit for the foreground color enable blinking characters. COLORREF crFore = SetTextColor(MemoryDC, GetColorRef(DEV_vga_get_actl_pal_idx((cColor>>4)&0xf))); COLORREF crBack = SetBkColor(MemoryDC, GetColorRef(DEV_vga_get_actl_pal_idx(cColor&0xf))); BitBlt (MemoryDC, xStart, yStart, ptSize.x, ptSize.y, hdcMem, ptOrg.x, ptOrg.y, dwRop); SetBkColor(MemoryDC, crBack); SetTextColor(MemoryDC, crFore); SelectObject(MemoryDC, oldObj); updateUpdated(xStart, yStart, ptSize.x + xStart - 1, ptSize.y + yStart - 1); DeleteDC (hdcMem); } void updateUpdated(int x1, int y1, int x2, int y2) { x1*=stretch_factor; x2*=stretch_factor; if (!updated_area_valid) { updated_area.left = x1 ; updated_area.top = y1 ; updated_area.right = x2 ; updated_area.bottom = y2 ; } else { if (x1 < updated_area.left) updated_area.left = x1 ; if (y1 < updated_area.top) updated_area.top = y1 ; if (x2 > updated_area.right) updated_area.right = x2 ; if (y2 > updated_area.bottom) updated_area.bottom = y2; } updated_area_valid = TRUE; } void headerbar_click(int x) { if (x < bx_headerbar_entries) { bx_headerbar_entry[x].f(); } } #ifdef __MINGW32__ #if BX_SHOW_IPS VOID CALLBACK MyTimer(HWND hwnd,UINT uMsg, UINT idEvent, DWORD dwTime) { bx_signal_handler(SIGALRM); } void alarm (int time) { UINT idTimer; SetTimer(stInfo.simWnd,idTimer,time*1000,MyTimer); } #endif #endif void bx_win32_gui_c::mouse_enabled_changed_specific (bx_bool val) { } void DrawChar (HDC hdc, unsigned char c, int xStart, int yStart, unsigned char cColor, int cs_start, int cs_end) { HDC hdcMem; POINT ptSize, ptOrg; HGDIOBJ oldObj; char str[2]; HFONT hFontOld; hdcMem = CreateCompatibleDC (hdc); SetMapMode (hdcMem, GetMapMode (hdc)); ptSize.x = 8; ptSize.y = yChar; DPtoLP (hdc, &ptSize, 1); ptOrg.x = 0; ptOrg.y = 0; DPtoLP (hdcMem, &ptOrg, 1); oldObj = SelectObject(MemoryDC, MemoryBitmap); hFontOld=(HFONT)SelectObject(MemoryDC, hFont[FontId]); //Colors taken from Ralf Browns interrupt list. //(0=black, 1=blue, 2=red, 3=purple, 4=green, 5=cyan, 6=yellow, 7=white) //The highest background bit usually means blinking characters. No idea //how to implement that so for now it's just implemented as color. //Note: it is also possible to program the VGA controller to have the //high bit for the foreground color enable blinking characters. COLORREF crFore = SetTextColor(MemoryDC, GetColorRef(DEV_vga_get_actl_pal_idx(cColor&0xf))); COLORREF crBack = SetBkColor(MemoryDC, GetColorRef(DEV_vga_get_actl_pal_idx((cColor>>4)&0xf))); str[0]=c; str[1]=0; int y = FontId == 2 ? 16 : 8; TextOut(MemoryDC, xStart, yStart, str, 1); if (cs_start <= cs_end && cs_start < y) { RECT rc; SetBkColor(MemoryDC, GetColorRef(cColor&0xf)); SetTextColor(MemoryDC, GetColorRef((cColor>>4)&0xf)); rc.left = xStart+0; rc.right = xStart+8; if (cs_end >= y) cs_end = y-1; rc.top = yStart+cs_start*yChar/y; rc.bottom = yStart+(cs_end+1)*yChar/y; ExtTextOut(MemoryDC, xStart, yStart, ETO_CLIPPED|ETO_OPAQUE, &rc, str, 1, NULL); } SetBkColor(MemoryDC, crBack); SetTextColor(MemoryDC, crFore); SelectObject(MemoryDC, hFontOld); SelectObject(MemoryDC, oldObj); updateUpdated(xStart, yStart, ptSize.x + xStart - 1, ptSize.y + yStart - 1); DeleteDC (hdcMem); } void InitFont(void) { LOGFONT lf; int i; lf.lfWidth = 8; lf.lfEscapement = 0; lf.lfOrientation = 0; lf.lfWeight = FW_MEDIUM; lf.lfItalic = FALSE; lf.lfUnderline=FALSE; lf.lfStrikeOut=FALSE; lf.lfCharSet=OEM_CHARSET; lf.lfOutPrecision=OUT_DEFAULT_PRECIS; lf.lfClipPrecision=CLIP_DEFAULT_PRECIS; lf.lfQuality=DEFAULT_QUALITY; lf.lfPitchAndFamily=FIXED_PITCH | FF_DONTCARE; wsprintf(lf.lfFaceName, "Lucida Console"); for (i=0; i < 3; i++) { lf.lfHeight = 12 + i * 2; hFont[i]=CreateFontIndirect(&lf); } } void DestroyFont(void) { int i; for(i = 0; i < 3; i++) { DeleteObject(hFont[i]); } } #endif /* if BX_WITH_WIN32 */