--- BasiliskII/src/AmigaOS/video_amiga.cpp 1999/10/03 14:16:25 1.1.1.1 +++ BasiliskII/src/AmigaOS/video_amiga.cpp 2001/06/27 19:03:35 1.13 @@ -1,7 +1,7 @@ /* * video_amiga.cpp - Video/graphics emulation, AmigaOS specific stuff * - * Basilisk II (C) 1997-1999 Christian Bauer + * Basilisk II (C) 1997-2001 Christian Bauer * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -22,6 +22,7 @@ #include #include #include +#include #include #include #include @@ -29,15 +30,17 @@ #include #include #include +#include #include "sysdeps.h" +#include "cpu_emulation.h" #include "main.h" #include "adb.h" #include "prefs.h" #include "user_strings.h" #include "video.h" -#define DEBUG 1 +#define DEBUG 0 #include "debug.h" @@ -45,7 +48,8 @@ enum { DISPLAY_WINDOW, DISPLAY_PIP, - DISPLAY_SCREEN + DISPLAY_SCREEN_P96, + DISPLAY_SCREEN_CGFX }; // Global variables @@ -54,6 +58,8 @@ static int display_type = DISPLAY_WINDOW static struct Screen *the_screen = NULL; static struct Window *the_win = NULL; static struct BitMap *the_bitmap = NULL; +static UWORD *null_pointer = NULL; // Blank mouse pointer data +static UWORD *current_pointer = (UWORD *)-1; // Currently visible mouse pointer data static LONG black_pen = -1, white_pen = -1; static struct Process *periodic_proc = NULL; // Periodic process @@ -89,6 +95,45 @@ static void periodic_func(void); * Initialization */ +// Add resolution to list of supported modes and set VideoMonitor +static void set_video_monitor(uint32 width, uint32 height, uint32 bytes_per_row, int depth) +{ + video_mode mode; + + mode.x = width; + mode.y = height; + mode.resolution_id = 0x80; + mode.bytes_per_row = bytes_per_row; + + switch (depth) { + case 1: + mode.depth = VDEPTH_1BIT; + break; + case 2: + mode.depth = VDEPTH_2BIT; + break; + case 4: + mode.depth = VDEPTH_4BIT; + break; + case 8: + mode.depth = VDEPTH_8BIT; + break; + case 15: + mode.depth = VDEPTH_16BIT; + break; + case 16: + mode.depth = VDEPTH_16BIT; + break; + case 24: + case 32: + mode.depth = VDEPTH_32BIT; + break; + } + + VideoModes.push_back(mode); + VideoMonitor.mode = mode; +} + // Open window static bool init_window(int width, int height) { @@ -107,7 +152,7 @@ static bool init_window(int width, int h WA_DragBar, TRUE, WA_DepthGadget, TRUE, WA_SizeGadget, FALSE, - WA_Title, GetString(STR_WINDOW_TITLE), + WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), TAG_END ); if (the_win == NULL) { @@ -122,12 +167,9 @@ static bool init_window(int width, int h return false; } - // Set VideoMonitor + // Add resolution and set VideoMonitor + set_video_monitor(width, height, the_bitmap->BytesPerRow, 1); VideoMonitor.mac_frame_base = (uint32)the_bitmap->Planes[0]; - VideoMonitor.bytes_per_row = the_bitmap->BytesPerRow; - VideoMonitor.x = width; - VideoMonitor.y = height; - VideoMonitor.mode = VMODE_1BIT; // Set FgPen and BgPen black_pen = ObtainBestPenA(the_win->WScreen->ViewPort.ColorMap, 0, 0, 0, NULL); @@ -150,7 +192,7 @@ static bool init_pip(int width, int heig P96PIP_SourceFormat, RGBFB_R5G5B5, P96PIP_SourceWidth, width, P96PIP_SourceHeight, height, - P96PIP_ErrorCode, &error, + P96PIP_ErrorCode, (ULONG)&error, WA_Left, 0, WA_Top, 0, WA_InnerWidth, width, WA_InnerHeight, height, WA_SimpleRefresh, TRUE, @@ -161,8 +203,8 @@ static bool init_pip(int width, int heig WA_DragBar, TRUE, WA_DepthGadget, TRUE, WA_SizeGadget, FALSE, - WA_Title, GetString(STR_WINDOW_TITLE), - WA_PubScreenName, "Workbench", + WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), + WA_PubScreenName, (ULONG)"Workbench", TAG_END ); if (the_win == NULL || error) { @@ -171,35 +213,26 @@ static bool init_pip(int width, int heig } // Find bitmap - p96PIP_GetTags(the_win, P96PIP_SourceBitMap, &the_bitmap, TAG_END); + p96PIP_GetTags(the_win, P96PIP_SourceBitMap, (ULONG)&the_bitmap, TAG_END); - // Set VideoMonitor + // Add resolution and set VideoMonitor + set_video_monitor(width, height, p96GetBitMapAttr(the_bitmap, P96BMA_BYTESPERROW), 16); VideoMonitor.mac_frame_base = p96GetBitMapAttr(the_bitmap, P96BMA_MEMORY); - VideoMonitor.bytes_per_row = p96GetBitMapAttr(the_bitmap, P96BMA_BYTESPERROW); - VideoMonitor.x = width; - VideoMonitor.y = height; - VideoMonitor.mode = VMODE_16BIT; return true; } -// Open screen (requires Picasso96 as we need chunky modes) -static bool init_screen(ULONG mode_id) +// Open Picasso96 screen +static bool init_screen_p96(ULONG mode_id) { // Set relative mouse mode ADBSetRelMouseMode(true); - // Check if the mode is a Picasso96 mode - if (!p96GetModeIDAttr(mode_id, P96IDA_ISP96)) { - ErrorAlert(GetString(STR_NO_P96_MODE_ERR)); - return false; - } - // Check if the mode is one we can handle uint32 depth = p96GetModeIDAttr(mode_id, P96IDA_DEPTH); uint32 format = p96GetModeIDAttr(mode_id, P96IDA_RGBFORMAT); + switch (depth) { case 8: - VideoMonitor.mode = VMODE_8BIT; break; case 15: case 16: @@ -207,7 +240,6 @@ static bool init_screen(ULONG mode_id) ErrorAlert(GetString(STR_WRONG_SCREEN_FORMAT_ERR)); return false; } - VideoMonitor.mode = VMODE_16BIT; break; case 24: case 32: @@ -215,7 +247,6 @@ static bool init_screen(ULONG mode_id) ErrorAlert(GetString(STR_WRONG_SCREEN_FORMAT_ERR)); return false; } - VideoMonitor.mode = VMODE_32BIT; break; default: ErrorAlert(GetString(STR_WRONG_SCREEN_DEPTH_ERR)); @@ -225,13 +256,11 @@ static bool init_screen(ULONG mode_id) // Yes, get width and height uint32 width = p96GetModeIDAttr(mode_id, P96IDA_WIDTH); uint32 height = p96GetModeIDAttr(mode_id, P96IDA_HEIGHT); - VideoMonitor.x = width; - VideoMonitor.y = height; // Open screen the_screen = p96OpenScreenTags( P96SA_DisplayID, mode_id, - P96SA_Title, GetString(STR_WINDOW_TITLE), + P96SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), P96SA_Quiet, TRUE, P96SA_NoMemory, TRUE, P96SA_NoSprite, TRUE, @@ -252,7 +281,7 @@ static bool init_screen(ULONG mode_id) WA_Activate, TRUE, WA_RMBTrap, TRUE, WA_ReportMouse, TRUE, - WA_CustomScreen, the_screen, + WA_CustomScreen, (ULONG)the_screen, TAG_END ); if (the_win == NULL) { @@ -260,15 +289,106 @@ static bool init_screen(ULONG mode_id) return false; } - // Set VideoMonitor ScreenToFront(the_screen); + + // Add resolution and set VideoMonitor + set_video_monitor(width, height, p96GetBitMapAttr(the_screen->RastPort.BitMap, P96BMA_BYTESPERROW), depth); VideoMonitor.mac_frame_base = p96GetBitMapAttr(the_screen->RastPort.BitMap, P96BMA_MEMORY); - VideoMonitor.bytes_per_row = p96GetBitMapAttr(the_screen->RastPort.BitMap, P96BMA_BYTESPERROW); + return true; +} + +// Open CyberGraphX screen +static bool init_screen_cgfx(ULONG mode_id) +{ + // Set relative mouse mode + ADBSetRelMouseMode(true); + + // Check if the mode is one we can handle + uint32 depth = GetCyberIDAttr(CYBRIDATTR_DEPTH, mode_id); + uint32 format = GetCyberIDAttr(CYBRIDATTR_PIXFMT, mode_id); + + switch (depth) { + case 8: + break; + case 15: + case 16: + // !!! PIXFMT_RGB15 is correct !!! + if (format != PIXFMT_RGB15) { + ErrorAlert(GetString(STR_WRONG_SCREEN_FORMAT_ERR)); + return false; + } + break; + case 24: + case 32: + if (format != PIXFMT_ARGB32) { + ErrorAlert(GetString(STR_WRONG_SCREEN_FORMAT_ERR)); + return false; + } + break; + default: + ErrorAlert(GetString(STR_WRONG_SCREEN_DEPTH_ERR)); + return false; + } + + // Yes, get width and height + uint32 width = GetCyberIDAttr(CYBRIDATTR_WIDTH, mode_id); + uint32 height = GetCyberIDAttr(CYBRIDATTR_HEIGHT, mode_id); + + // Open screen + the_screen = OpenScreenTags(NULL, + SA_DisplayID, mode_id, + SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), + SA_Quiet, TRUE, + SA_Exclusive, TRUE, + TAG_END + ); + if (the_screen == NULL) { + ErrorAlert(GetString(STR_OPEN_SCREEN_ERR)); + return false; + } + + // Open window + the_win = OpenWindowTags(NULL, + WA_Left, 0, WA_Top, 0, + WA_Width, width, WA_Height, height, + WA_NoCareRefresh, TRUE, + WA_Borderless, TRUE, + WA_Activate, TRUE, + WA_RMBTrap, TRUE, + WA_ReportMouse, TRUE, + WA_CustomScreen, (ULONG)the_screen, + TAG_END + ); + if (the_win == NULL) { + ErrorAlert(GetString(STR_OPEN_WINDOW_ERR)); + return false; + } + + ScreenToFront(the_screen); + static UWORD ptr[] = { 0, 0, 0, 0 }; + SetPointer(the_win, ptr, 0, 0, 0, 0); // Hide mouse pointer + + // Set VideoMonitor + ULONG frame_base; + APTR handle = LockBitMapTags(the_screen->RastPort.BitMap, + LBMI_BASEADDRESS, (ULONG)&frame_base, + TAG_END + ); + UnLockBitMap(handle); + set_video_monitor(width, height, GetCyberMapAttr(the_screen->RastPort.BitMap, CYBRMATTR_XMOD), depth); + VideoMonitor.mac_frame_base = frame_base; return true; } bool VideoInit(bool classic) { + // Allocate blank mouse pointer data + null_pointer = (UWORD *)AllocMem(12, MEMF_PUBLIC | MEMF_CHIP | MEMF_CLEAR); + if (null_pointer == NULL) { + ErrorAlert(GetString(STR_NO_MEM_ERR)); + return false; + } + // Read frame skip prefs frame_skip = PrefsFindInt32("frameskip"); if (frame_skip == 0) @@ -290,8 +410,16 @@ bool VideoInit(bool classic) display_type = DISPLAY_WINDOW; else if (sscanf(mode_str, "pip/%d/%d", &width, &height) == 2 && P96Base) display_type = DISPLAY_PIP; - else if (sscanf(mode_str, "scr/%08lx", &mode_id) == 1 && P96Base) - display_type = DISPLAY_SCREEN; + else if (sscanf(mode_str, "scr/%08lx", &mode_id) == 1 && (CyberGfxBase || P96Base)) { + if (P96Base && p96GetModeIDAttr(mode_id, P96IDA_ISP96)) + display_type = DISPLAY_SCREEN_P96; + else if (CyberGfxBase && IsCyberModeID(mode_id)) + display_type = DISPLAY_SCREEN_CGFX; + else { + ErrorAlert(GetString(STR_NO_P96_MODE_ERR)); + return false; + } + } } // Open display @@ -306,16 +434,21 @@ bool VideoInit(bool classic) return false; break; - case DISPLAY_SCREEN: - if (!init_screen(mode_id)) + case DISPLAY_SCREEN_P96: + if (!init_screen_p96(mode_id)) + return false; + break; + + case DISPLAY_SCREEN_CGFX: + if (!init_screen_cgfx(mode_id)) return false; break; } // Start periodic process periodic_proc = CreateNewProcTags( - NP_Entry, periodic_func, - NP_Name, "Basilisk II IDCMP Handler", + NP_Entry, (ULONG)periodic_func, + NP_Name, (ULONG)"Basilisk II IDCMP Handler", NP_Priority, 0, TAG_END ); @@ -366,16 +499,37 @@ void VideoExit(void) p96PIP_Close(the_win); break; - case DISPLAY_SCREEN: + case DISPLAY_SCREEN_P96: // Close window if (the_win) CloseWindow(the_win); // Close screen - if (the_screen) + if (the_screen) { p96CloseScreen(the_screen); + the_screen = NULL; + } break; + + case DISPLAY_SCREEN_CGFX: + + // Close window + if (the_win) + CloseWindow(the_win); + + // Close screen + if (the_screen) { + CloseScreen(the_screen); + the_screen = NULL; + } + break; + } + + // Free mouse pointer + if (null_pointer) { + FreeMem(null_pointer, 12); + null_pointer = NULL; } } @@ -386,7 +540,7 @@ void VideoExit(void) void video_set_palette(uint8 *pal) { - if (display_type == DISPLAY_SCREEN) { + if (display_type == DISPLAY_SCREEN_P96 || display_type == DISPLAY_SCREEN_CGFX) { // Convert palette to 32 bits ULONG table[2 + 256 * 3]; @@ -429,7 +583,7 @@ static __saveds void periodic_func(void) if (win_port) { win_mask = 1 << win_port->mp_SigBit; the_win->UserPort = win_port; - ModifyIDCMP(the_win, IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_RAWKEY | (display_type == DISPLAY_SCREEN ? IDCMP_DELTAMOVE : 0)); + ModifyIDCMP(the_win, IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_RAWKEY | ((display_type == DISPLAY_SCREEN_P96 || display_type == DISPLAY_SCREEN_CGFX) ? IDCMP_DELTAMOVE : 0)); } // Start 60Hz timer for window refresh @@ -462,7 +616,7 @@ static __saveds void periodic_func(void) // Timer tick, update display BltTemplate(the_bitmap->Planes[0], 0, the_bitmap->BytesPerRow, the_win->RPort, - the_win->BorderLeft, the_win->BorderTop, VideoMonitor.x, VideoMonitor.y); + the_win->BorderLeft, the_win->BorderTop, VideoMonitor.mode.x, VideoMonitor.mode.y); // Restart timer timer_io->tr_node.io_Command = TR_ADDREQUEST; @@ -487,10 +641,26 @@ static __saveds void periodic_func(void) // Handle message according to class switch (cl) { case IDCMP_MOUSEMOVE: - if (display_type == DISPLAY_SCREEN) + if (display_type == DISPLAY_SCREEN_P96 || display_type == DISPLAY_SCREEN_CGFX) ADBMouseMoved(mx, my); - else + else { ADBMouseMoved(mx - the_win->BorderLeft, my - the_win->BorderTop); + if (mx < the_win->BorderLeft + || my < the_win->BorderTop + || mx >= the_win->BorderLeft + VideoMonitor.mode.x + || my >= the_win->BorderTop + VideoMonitor.mode.y) { + if (current_pointer) { + ClearPointer(the_win); + current_pointer = NULL; + } + } else { + if (current_pointer != null_pointer) { + // Hide mouse pointer inside window + SetPointer(the_win, null_pointer, 1, 16, 0, 0); + current_pointer = null_pointer; + } + } + } break; case IDCMP_MOUSEBUTTONS: @@ -511,6 +681,13 @@ static __saveds void periodic_func(void) case IDCMP_RAWKEY: if (qualifier & IEQUALIFIER_REPEAT) // Keyboard repeat is done by MacOS break; + if ((qualifier & (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL)) == + (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL) && code == 0x5f) { + SetInterruptFlag(INTFLAG_NMI); + TriggerInterrupt(); + break; + } + if (code & IECODE_UP_PREFIX) ADBKeyUp(keycode2mac[code & 0x7f]); else