AmigActive 25

home *** CD-ROM | disk | FTP | other *** search

/ AmigActive 25 / AACD 25.iso / AACD / Utilities / BasiliskII / src / Unix / video_x.cpp < prev next >

Wrap

C/C++ Source or Header | 2001-05-20 | 55.7 KB | 2,145 lines

/* * video_x.cpp - Video/graphics emulation, X11 specific stuff * * 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 * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* * NOTES: * The Ctrl key works like a qualifier for special actions: * Ctrl-Tab = suspend DGA mode * Ctrl-Esc = emergency quit * Ctrl-F1 = mount floppy */ #include "sysdeps.h" #include <X11/Xlib.h> #include <X11/Xutil.h> #include <X11/keysym.h> #include <X11/extensions/XShm.h> #include <sys/ipc.h> #include <sys/shm.h> #include <errno.h> #ifdef HAVE_PTHREADS # include <pthread.h> #endif #ifdef ENABLE_XF86_DGA # include <X11/extensions/xf86dga.h> #endif #ifdef ENABLE_XF86_VIDMODE # include <X11/extensions/xf86vmode.h> #endif #ifdef ENABLE_FBDEV_DGA # include <sys/mman.h> #endif #ifdef ENABLE_VOSF # include <fcntl.h> # include <sys/mman.h> # include "sigsegv.h" #endif #include "cpu_emulation.h" #include "main.h" #include "adb.h" #include "macos_util.h" #include "prefs.h" #include "user_strings.h" #include "video.h" #define DEBUG 0 #include "debug.h" // Display types enum { DISPLAY_WINDOW, // X11 window, using MIT SHM extensions if possible DISPLAY_DGA // DGA fullscreen display }; // Constants const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; const char FBDEVICES_FILE_NAME[] = DATADIR "/fbdevices"; // Global variables static int32 frame_skip; // Prefs items static int16 mouse_wheel_mode = 1; static int16 mouse_wheel_lines = 3; static int display_type = DISPLAY_WINDOW; // See enum above static bool local_X11; // Flag: X server running on local machine? static uint8 *the_buffer; // Mac frame buffer #ifdef HAVE_PTHREADS static bool redraw_thread_active = false; // Flag: Redraw thread installed static volatile bool redraw_thread_cancel = false; // Flag: Cancel Redraw thread static pthread_t redraw_thread; // Redraw thread #endif static bool has_dga = false; // Flag: Video DGA capable static bool has_vidmode = false; // Flag: VidMode extension available static bool ctrl_down = false; // Flag: Ctrl key pressed static bool caps_on = false; // Flag: Caps Lock on static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread static bool emul_suspended = false; // Flag: Emulator suspended static bool classic_mode = false; // Flag: Classic Mac video mode static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms static int keycode_table[256]; // X keycode -> Mac keycode translation table // X11 variables static int screen; // Screen number static int xdepth; // Depth of X screen static int depth; // Depth of Mac frame buffer static Window rootwin, the_win; // Root window and our window static XVisualInfo visualInfo; static Visual *vis; static Colormap cmap[2]; // Two colormaps (DGA) for 8-bit mode static XColor black, white; static unsigned long black_pixel, white_pixel; static int eventmask; static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask; static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask; static Atom WM_DELETE_WINDOW = (Atom)0; static XColor palette[256]; // Color palette for 8-bit mode static bool palette_changed = false; // Flag: Palette changed, redraw thread must set new colors #ifdef HAVE_PTHREADS static pthread_mutex_t palette_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect palette #define LOCK_PALETTE pthread_mutex_lock(&palette_lock) #define UNLOCK_PALETTE pthread_mutex_unlock(&palette_lock) #else #define LOCK_PALETTE #define UNLOCK_PALETTE #endif // Variables for window mode static GC the_gc; static XImage *img = NULL; static XShmSegmentInfo shminfo; static Cursor mac_cursor; static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer static bool have_shm = false; // Flag: SHM extensions available static bool updt_box[17][17]; // Flag for Update static int nr_boxes; static const int sm_uptd[] = {4,1,6,3,0,5,2,7}; static int sm_no_boxes[] = {1,8,32,64,128,300}; // Variables for XF86 DGA mode static int current_dga_cmap; // Number (0 or 1) of currently installed DGA colormap static Window suspend_win; // "Suspend" window static void *fb_save = NULL; // Saved frame buffer for suspend #ifdef HAVE_PTHREADS static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer #define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock); #define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock); #else #define LOCK_FRAME_BUFFER #define UNLOCK_FRAME_BUFFER #endif // Variables for fbdev DGA mode const char FBDEVICE_FILE_NAME[] = "/dev/fb"; static int fbdev_fd; #ifdef ENABLE_XF86_VIDMODE // Variables for XF86 VidMode support static XF86VidModeModeInfo **x_video_modes; // Array of all available modes static int num_x_video_modes; #endif #ifdef ENABLE_VOSF static bool use_vosf = true; // Flag: VOSF enabled #else static const bool use_vosf = false; // Flag: VOSF enabled #endif #ifdef ENABLE_VOSF // Variables for Video on SEGV support (taken from the Win32 port) static uint8 *the_host_buffer; // Host frame buffer in VOSF mode static uint32 the_buffer_size; // Size of allocated the_buffer struct ScreenPageInfo { int top, bottom; // Mapping between this virtual page and Mac scanlines }; struct ScreenInfo { uint32 memBase; // Real start address uint32 memStart; // Start address aligned to page boundary uint32 memEnd; // Address of one-past-the-end of the screen uint32 memLength; // Length of the memory addressed by the screen pages uint32 pageSize; // Size of a page int pageBits; // Shift count to get the page number uint32 pageCount; // Number of pages allocated to the screen bool dirty; // Flag: set if the frame buffer was touched char * dirtyPages; // Table of flags set if page was altered ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines }; static ScreenInfo mainBuffer; #define PFLAG_SET_VALUE 0x00 #define PFLAG_CLEAR_VALUE 0x01 #define PFLAG_SET_VALUE_4 0x00000000 #define PFLAG_CLEAR_VALUE_4 0x01010101 #define PFLAG_SET(page) mainBuffer.dirtyPages[page] = PFLAG_SET_VALUE #define PFLAG_CLEAR(page) mainBuffer.dirtyPages[page] = PFLAG_CLEAR_VALUE #define PFLAG_ISSET(page) (mainBuffer.dirtyPages[page] == PFLAG_SET_VALUE) #define PFLAG_ISCLEAR(page) (mainBuffer.dirtyPages[page] != PFLAG_SET_VALUE) #ifdef UNALIGNED_PROFITABLE # define PFLAG_ISSET_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_SET_VALUE_4) # define PFLAG_ISCLEAR_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_CLEAR_VALUE_4) #else # define PFLAG_ISSET_4(page) \ PFLAG_ISSET(page ) && PFLAG_ISSET(page+1) \ && PFLAG_ISSET(page+2) && PFLAG_ISSET(page+3) # define PFLAG_ISCLEAR_4(page) \ PFLAG_ISCLEAR(page ) && PFLAG_ISCLEAR(page+1) \ && PFLAG_ISCLEAR(page+2) && PFLAG_ISCLEAR(page+3) #endif // Set the selected page range [ first_page, last_page [ into the SET state #define PFLAG_SET_RANGE(first_page, last_page) \ memset(mainBuffer.dirtyPages + (first_page), PFLAG_SET_VALUE, \ (last_page) - (first_page)) // Set the selected page range [ first_page, last_page [ into the CLEAR state #define PFLAG_CLEAR_RANGE(first_page, last_page) \ memset(mainBuffer.dirtyPages + (first_page), PFLAG_CLEAR_VALUE, \ (last_page) - (first_page)) #define PFLAG_SET_ALL do { \ PFLAG_SET_RANGE(0, mainBuffer.pageCount); \ mainBuffer.dirty = true; \ } while (0) #define PFLAG_CLEAR_ALL do { \ PFLAG_CLEAR_RANGE(0, mainBuffer.pageCount); \ mainBuffer.dirty = false; \ } while (0) // Set the following macro definition to 1 if your system // provides a really fast strchr() implementation //#define HAVE_FAST_STRCHR 0 static inline int find_next_page_set(int page) { #if HAVE_FAST_STRCHR char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_SET_VALUE); return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; #else while (PFLAG_ISCLEAR_4(page)) page += 4; while (PFLAG_ISCLEAR(page)) page++; return page; #endif } static inline int find_next_page_clear(int page) { #if HAVE_FAST_STRCHR char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_CLEAR_VALUE); return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; #else while (PFLAG_ISSET_4(page)) page += 4; while (PFLAG_ISSET(page)) page++; return page; #endif } static int zero_fd = -1; #ifdef HAVE_PTHREADS static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact) #define LOCK_VOSF pthread_mutex_lock(&vosf_lock); #define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock); #else #define LOCK_VOSF #define UNLOCK_VOSF #endif static int log_base_2(uint32 x) { uint32 mask = 0x80000000; int l = 31; while (l >= 0 && (x & mask) == 0) { mask >>= 1; l--; } return l; } #endif /* ENABLE_VOSF */ // VideoRefresh function void VideoRefreshInit(void); static void (*video_refresh)(void); // Prototypes static void *redraw_func(void *arg); static int event2keycode(XKeyEvent &ev); // From main_unix.cpp extern char *x_display_name; extern Display *x_display; // From sys_unix.cpp extern void SysMountFirstFloppy(void); #ifdef ENABLE_VOSF # include "video_vosf.h" #endif /* * Initialization */ // Set VideoMonitor according to video mode void set_video_monitor(int width, int height, int bytes_per_row, bool native_byte_order) { #if !REAL_ADDRESSING && !DIRECT_ADDRESSING int layout = FLAYOUT_DIRECT; switch (depth) { case 1: layout = FLAYOUT_DIRECT; break; case 8: layout = FLAYOUT_DIRECT; break; case 15: layout = FLAYOUT_HOST_555; break; case 16: layout = FLAYOUT_HOST_565; break; case 24: case 32: layout = FLAYOUT_HOST_888; break; } if (native_byte_order) MacFrameLayout = layout; else MacFrameLayout = FLAYOUT_DIRECT; #endif switch (depth) { case 1: VideoMonitor.mode = VMODE_1BIT; break; case 8: VideoMonitor.mode = VMODE_8BIT; break; case 15: VideoMonitor.mode = VMODE_16BIT; break; case 16: VideoMonitor.mode = VMODE_16BIT; break; case 24: case 32: VideoMonitor.mode = VMODE_32BIT; break; } VideoMonitor.x = width; VideoMonitor.y = height; VideoMonitor.bytes_per_row = bytes_per_row; } // Set window name and class static void set_window_name(Window w, int name) { const char *str = GetString(name); XStoreName(x_display, w, str); XSetIconName(x_display, w, str); XClassHint *hints; hints = XAllocClassHint(); if (hints) { hints->res_name = "BasiliskII"; hints->res_class = "BasiliskII"; XSetClassHint(x_display, w, hints); XFree(hints); } } // Set window input focus flag static void set_window_focus(Window w) { XWMHints *hints = XAllocWMHints(); if (hints) { hints->input = True; hints->initial_state = NormalState; hints->flags = InputHint | StateHint; XSetWMHints(x_display, w, hints); XFree(hints); } } // Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget) static void set_window_delete_protocol(Window w) { WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false); XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1); } // Wait until window is mapped/unmapped void wait_mapped(Window w) { XEvent e; do { XMaskEvent(x_display, StructureNotifyMask, &e); } while ((e.type != MapNotify) || (e.xmap.event != w)); } void wait_unmapped(Window w) { XEvent e; do { XMaskEvent(x_display, StructureNotifyMask, &e); } while ((e.type != UnmapNotify) || (e.xmap.event != w)); } // Trap SHM errors static bool shm_error = false; static int (*old_error_handler)(Display *, XErrorEvent *); static int error_handler(Display *d, XErrorEvent *e) { if (e->error_code == BadAccess) { shm_error = true; return 0; } else return old_error_handler(d, e); } // Init window mode static bool init_window(int width, int height) { int aligned_width = (width + 15) & ~15; int aligned_height = (height + 15) & ~15; // Set absolute mouse mode ADBSetRelMouseMode(false); // Read frame skip prefs frame_skip = PrefsFindInt32("frameskip"); // Create window XSetWindowAttributes wattr; wattr.event_mask = eventmask = win_eventmask; wattr.background_pixel = black_pixel; wattr.colormap = cmap[0]; the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, InputOutput, vis, CWEventMask | CWBackPixel | (depth == 8 ? CWColormap : 0), &wattr); // Set window name/class set_window_name(the_win, STR_WINDOW_TITLE); // Indicate that we want keyboard input set_window_focus(the_win); // Set delete protocol property set_window_delete_protocol(the_win); // Make window unresizable { XSizeHints *hints = XAllocSizeHints(); if (hints) { hints->min_width = width; hints->max_width = width; hints->min_height = height; hints->max_height = height; hints->flags = PMinSize | PMaxSize; XSetWMNormalHints(x_display, the_win, hints); XFree(hints); } } // Show window XMapWindow(x_display, the_win); wait_mapped(the_win); // Try to create and attach SHM image have_shm = false; if (depth != 1 && local_X11 && XShmQueryExtension(x_display)) { // Create SHM image ("height + 2" for safety) img = XShmCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height); shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777); the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0); shminfo.shmaddr = img->data = (char *)the_buffer_copy; shminfo.readOnly = False; // Try to attach SHM image, catching errors shm_error = false; old_error_handler = XSetErrorHandler(error_handler); XShmAttach(x_display, &shminfo); XSync(x_display, false); XSetErrorHandler(old_error_handler); if (shm_error) { shmdt(shminfo.shmaddr); XDestroyImage(img); shminfo.shmid = -1; } else { have_shm = true; shmctl(shminfo.shmid, IPC_RMID, 0); } } // Create normal X image if SHM doesn't work ("height + 2" for safety) if (!have_shm) { int bytes_per_row = aligned_width; switch (depth) { case 1: bytes_per_row /= 8; break; case 15: case 16: bytes_per_row *= 2; break; case 24: case 32: bytes_per_row *= 4; break; } the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row); img = XCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row); } // 1-Bit mode is big-endian if (depth == 1) { img->byte_order = MSBFirst; img->bitmap_bit_order = MSBFirst; } #ifdef ENABLE_VOSF // Allocate a page-aligned chunk of memory for frame buffer the_buffer_size = align_on_page_boundary((aligned_height + 2) * img->bytes_per_line); the_host_buffer = the_buffer_copy; the_buffer_copy = (uint8 *)allocate_framebuffer(the_buffer_size); memset(the_buffer_copy, 0, the_buffer_size); the_buffer = (uint8 *)allocate_framebuffer(the_buffer_size); memset(the_buffer, 0, the_buffer_size); #else // Allocate memory for frame buffer the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line); #endif // Create GC the_gc = XCreateGC(x_display, the_win, 0, 0); XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes); // Create no_cursor mac_cursor = XCreatePixmapCursor(x_display, XCreatePixmap(x_display, the_win, 1, 1, 1), XCreatePixmap(x_display, the_win, 1, 1, 1), &black, &white, 0, 0); XDefineCursor(x_display, the_win, mac_cursor); // Set VideoMonitor bool native_byte_order; #ifdef WORDS_BIGENDIAN native_byte_order = (XImageByteOrder(x_display) == MSBFirst); #else native_byte_order = (XImageByteOrder(x_display) == LSBFirst); #endif #ifdef ENABLE_VOSF Screen_blitter_init(&visualInfo, native_byte_order); #endif set_video_monitor(width, height, img->bytes_per_line, native_byte_order); #if REAL_ADDRESSING || DIRECT_ADDRESSING VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer); #else VideoMonitor.mac_frame_base = MacFrameBaseMac; #endif return true; } // Init fbdev DGA display static bool init_fbdev_dga(char *in_fb_name) { #ifdef ENABLE_FBDEV_DGA // Find the maximum depth available int ndepths, max_depth(0); int *depths = XListDepths(x_display, screen, &ndepths); if (depths == NULL) { printf("FATAL: Could not determine the maximal depth available\n"); return false; } else { while (ndepths-- > 0) { if (depths[ndepths] > max_depth) max_depth = depths[ndepths]; } } // Get fbdevices file path from preferences const char *fbd_path = PrefsFindString("fbdevicefile"); // Open fbdevices file FILE *fp = fopen(fbd_path ? fbd_path : FBDEVICES_FILE_NAME, "r"); if (fp == NULL) { char str[256]; sprintf(str, GetString(STR_NO_FBDEVICE_FILE_ERR), fbd_path ? fbd_path : FBDEVICES_FILE_NAME, strerror(errno)); ErrorAlert(str); return false; } int fb_depth; // supported depth uint32 fb_offset; // offset used for mmap(2) char fb_name[20]; char line[256]; bool device_found = false; while (fgets(line, 255, fp)) { // Read line int len = strlen(line); if (len == 0) continue; line[len - 1] = '\0'; // Comments begin with "#" or ";" if ((line[0] == '#') || (line[0] == ';') || (line[0] == '\0')) continue; if ((sscanf(line, "%19s %d %x", &fb_name, &fb_depth, &fb_offset) == 3) && (strcmp(fb_name, in_fb_name) == 0) && (fb_depth == max_depth)) { device_found = true; break; } } // fbdevices file completely read fclose(fp); // Frame buffer name not found ? Then, display warning if (!device_found) { char str[256]; sprintf(str, GetString(STR_FBDEV_NAME_ERR), in_fb_name, max_depth); ErrorAlert(str); return false; } int width = DisplayWidth(x_display, screen); int height = DisplayHeight(x_display, screen); depth = fb_depth; // max_depth // Set relative mouse mode ADBSetRelMouseMode(false); // Create window XSetWindowAttributes wattr; wattr.event_mask = eventmask = dga_eventmask; wattr.background_pixel = white_pixel; wattr.override_redirect = True; wattr.colormap = cmap[0]; the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, InputOutput, vis, CWEventMask | CWBackPixel | CWOverrideRedirect | (depth == 8 ? CWColormap : 0), &wattr); // Set window name/class set_window_name(the_win, STR_WINDOW_TITLE); // Indicate that we want keyboard input set_window_focus(the_win); // Show window XMapRaised(x_display, the_win); wait_mapped(the_win); // Grab mouse and keyboard XGrabKeyboard(x_display, the_win, True, GrabModeAsync, GrabModeAsync, CurrentTime); XGrabPointer(x_display, the_win, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, the_win, None, CurrentTime); // Set VideoMonitor int bytes_per_row = width; switch (depth) { case 1: bytes_per_row = ((width | 7) & ~7) >> 3; break; case 15: case 16: bytes_per_row *= 2; break; case 24: case 32: bytes_per_row *= 4; break; } if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_PRIVATE, fbdev_fd, fb_offset)) == MAP_FAILED) { if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_SHARED, fbdev_fd, fb_offset)) == MAP_FAILED) { char str[256]; sprintf(str, GetString(STR_FBDEV_MMAP_ERR), strerror(errno)); ErrorAlert(str); return false; } } #if ENABLE_VOSF #if REAL_ADDRESSING || DIRECT_ADDRESSING // Screen_blitter_init() returns TRUE if VOSF is mandatory // i.e. the framebuffer update function is not Blit_Copy_Raw use_vosf = Screen_blitter_init(&visualInfo, true); if (use_vosf) { the_host_buffer = the_buffer; the_buffer_size = align_on_page_boundary((height + 2) * bytes_per_row); the_buffer_copy = (uint8 *)malloc(the_buffer_size); memset(the_buffer_copy, 0, the_buffer_size); the_buffer = (uint8 *)allocate_framebuffer(the_buffer_size); memset(the_buffer, 0, the_buffer_size); } #else use_vosf = false; #endif #endif set_video_monitor(width, height, bytes_per_row, true); #if REAL_ADDRESSING || DIRECT_ADDRESSING VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer); #else VideoMonitor.mac_frame_base = MacFrameBaseMac; #endif return true; #else ErrorAlert("Basilisk II has been compiled with fbdev DGA support disabled."); return false; #endif } // Init XF86 DGA display static bool init_xf86_dga(int width, int height) { #ifdef ENABLE_XF86_DGA // Set relative mouse mode ADBSetRelMouseMode(true); #ifdef ENABLE_XF86_VIDMODE // Switch to best mode if (has_vidmode) { int best = 0; for (int i=1; i<num_x_video_modes; i++) { if (x_video_modes[i]->hdisplay >= width && x_video_modes[i]->vdisplay >= height && x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) { best = i; } } XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); XF86VidModeSetViewPort(x_display, screen, 0, 0); XSync(x_display, false); } #endif // Create window XSetWindowAttributes wattr; wattr.event_mask = eventmask = dga_eventmask; wattr.override_redirect = True; the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, InputOutput, vis, CWEventMask | CWOverrideRedirect, &wattr); // Set window name/class set_window_name(the_win, STR_WINDOW_TITLE); // Indicate that we want keyboard input set_window_focus(the_win); // Show window XMapRaised(x_display, the_win); wait_mapped(the_win); // Establish direct screen connection XMoveResizeWindow(x_display, the_win, 0, 0, width, height); XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); int v_width, v_bank, v_size; XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size); XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); XF86DGASetViewPort(x_display, screen, 0, 0); XF86DGASetVidPage(x_display, screen, 0); // Set colormap if (depth == 8) { XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]); XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); } XSync(x_display, false); // Set VideoMonitor int bytes_per_row = (v_width + 7) & ~7; switch (depth) { case 1: bytes_per_row /= 8; break; case 15: case 16: bytes_per_row *= 2; break; case 24: case 32: bytes_per_row *= 4; break; } #if REAL_ADDRESSING || DIRECT_ADDRESSING // Screen_blitter_init() returns TRUE if VOSF is mandatory // i.e. the framebuffer update function is not Blit_Copy_Raw use_vosf = Screen_blitter_init(&visualInfo, true); if (use_vosf) { the_host_buffer = the_buffer; the_buffer_size = align_on_page_boundary((height + 2) * bytes_per_row); the_buffer_copy = (uint8 *)malloc(the_buffer_size); memset(the_buffer_copy, 0, the_buffer_size); the_buffer = (uint8 *)allocate_framebuffer(the_buffer_size); memset(the_buffer, 0, the_buffer_size); } #elif defined(ENABLE_VOSF) // The UAE memory handlers will already handle color conversion, if needed. use_vosf = false; #endif set_video_monitor(width, height, bytes_per_row, true); #if REAL_ADDRESSING || DIRECT_ADDRESSING VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer); // MacFrameLayout = FLAYOUT_DIRECT; #else VideoMonitor.mac_frame_base = MacFrameBaseMac; #endif return true; #else ErrorAlert("Basilisk II has been compiled with XF86 DGA support disabled."); return false; #endif } // Init keycode translation table static void keycode_init(void) { bool use_kc = PrefsFindBool("keycodes"); if (use_kc) { // Get keycode file path from preferences const char *kc_path = PrefsFindString("keycodefile"); // Open keycode table FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); if (f == NULL) { char str[256]; sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); WarningAlert(str); return; } // Default translation table for (int i=0; i<256; i++) keycode_table[i] = -1; // Search for server vendor string, then read keycodes const char *vendor = ServerVendor(x_display); bool vendor_found = false; char line[256]; while (fgets(line, 255, f)) { // Read line int len = strlen(line); if (len == 0) continue; line[len-1] = 0; // Comments begin with "#" or ";" if (line[0] == '#' || line[0] == ';' || line[0] == 0) continue; if (vendor_found) { // Read keycode int x_code, mac_code; if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) keycode_table[x_code & 0xff] = mac_code; else break; } else { // Search for vendor string if (strstr(vendor, line) == vendor) vendor_found = true; } } // Keycode file completely read fclose(f); use_keycodes = vendor_found; // Vendor not found? Then display warning if (!vendor_found) { char str[256]; sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME); WarningAlert(str); return; } } } bool VideoInitBuffer() { #ifdef ENABLE_VOSF if (use_vosf) { const uint32 page_size = getpagesize(); const uint32 page_mask = page_size - 1; mainBuffer.memBase = (uint32) the_buffer; // Align the frame buffer on page boundary mainBuffer.memStart = (uint32)((((unsigned long) the_buffer) + page_mask) & ~page_mask); mainBuffer.memLength = the_buffer_size; mainBuffer.memEnd = mainBuffer.memStart + mainBuffer.memLength; mainBuffer.pageSize = page_size; mainBuffer.pageCount = (mainBuffer.memLength + page_mask)/mainBuffer.pageSize; mainBuffer.pageBits = log_base_2(mainBuffer.pageSize); if (mainBuffer.dirtyPages != 0) free(mainBuffer.dirtyPages); mainBuffer.dirtyPages = (char *) malloc(mainBuffer.pageCount + 2); if (mainBuffer.pageInfo != 0) free(mainBuffer.pageInfo); mainBuffer.pageInfo = (ScreenPageInfo *) malloc(mainBuffer.pageCount * sizeof(ScreenPageInfo)); if ((mainBuffer.dirtyPages == 0) || (mainBuffer.pageInfo == 0)) return false; mainBuffer.dirty = false; PFLAG_CLEAR_ALL; // Safety net to insure the loops in the update routines will terminate // See a discussion in <video_vosf.h> for further details PFLAG_CLEAR(mainBuffer.pageCount); PFLAG_SET(mainBuffer.pageCount+1); uint32 a = 0; for (int i = 0; i < mainBuffer.pageCount; i++) { int y1 = a / VideoMonitor.bytes_per_row; if (y1 >= VideoMonitor.y) y1 = VideoMonitor.y - 1; int y2 = (a + mainBuffer.pageSize) / VideoMonitor.bytes_per_row; if (y2 >= VideoMonitor.y) y2 = VideoMonitor.y - 1; mainBuffer.pageInfo[i].top = y1; mainBuffer.pageInfo[i].bottom = y2; a += mainBuffer.pageSize; if (a > mainBuffer.memLength) a = mainBuffer.memLength; } // We can now write-protect the frame buffer if (mprotect((caddr_t)mainBuffer.memStart, mainBuffer.memLength, PROT_READ) != 0) return false; } #endif return true; } bool VideoInit(bool classic) { #ifdef ENABLE_VOSF // Open /dev/zero zero_fd = open("/dev/zero", O_RDWR); if (zero_fd < 0) { char str[256]; sprintf(str, GetString(STR_NO_DEV_ZERO_ERR), strerror(errno)); ErrorAlert(str); return false; } // Zero the mainBuffer structure mainBuffer.dirtyPages = 0; mainBuffer.pageInfo = 0; #endif // Check if X server runs on local machine local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0) || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0); // Init keycode translation keycode_init(); // Read prefs mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); mouse_wheel_lines = PrefsFindInt32("mousewheellines"); // Find screen and root window screen = XDefaultScreen(x_display); rootwin = XRootWindow(x_display, screen); // Get screen depth xdepth = DefaultDepth(x_display, screen); #ifdef ENABLE_FBDEV_DGA // Frame buffer name char fb_name[20]; // Could do fbdev dga ? if ((fbdev_fd = open(FBDEVICE_FILE_NAME, O_RDWR)) != -1) has_dga = true; else has_dga = false; #endif #ifdef ENABLE_XF86_DGA // DGA available? int dga_event_base, dga_error_base; if (local_X11 && XF86DGAQueryExtension(x_display, &dga_event_base, &dga_error_base)) { int dga_flags = 0; XF86DGAQueryDirectVideo(x_display, screen, &dga_flags); has_dga = dga_flags & XF86DGADirectPresent; } else has_dga = false; #endif #ifdef ENABLE_XF86_VIDMODE // VidMode available? int vm_event_base, vm_error_base; has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base); if (has_vidmode) XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes); #endif // Find black and white colors XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black); XAllocColor(x_display, DefaultColormap(x_display, screen), &black); XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white); XAllocColor(x_display, DefaultColormap(x_display, screen), &white); black_pixel = BlackPixel(x_display, screen); white_pixel = WhitePixel(x_display, screen); // Get appropriate visual int color_class; switch (xdepth) { case 1: color_class = StaticGray; break; case 8: color_class = PseudoColor; break; case 15: case 16: case 24: case 32: color_class = TrueColor; break; default: ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR)); return false; } if (!XMatchVisualInfo(x_display, screen, xdepth, color_class, &visualInfo)) { ErrorAlert(GetString(STR_NO_XVISUAL_ERR)); return false; } if (visualInfo.depth != xdepth) { ErrorAlert(GetString(STR_NO_XVISUAL_ERR)); return false; } vis = visualInfo.visual; // Mac screen depth is always 1 bit in Classic mode, but follows X depth otherwise classic_mode = classic; if (classic) depth = 1; else depth = xdepth; // Create color maps for 8 bit mode if (depth == 8) { cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll); cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll); XInstallColormap(x_display, cmap[0]); XInstallColormap(x_display, cmap[1]); } // Get screen mode from preferences const char *mode_str; if (classic) mode_str = "win/512/342"; else mode_str = PrefsFindString("screen"); // Determine type and mode int width = 512, height = 384; display_type = DISPLAY_WINDOW; if (mode_str) { if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2) display_type = DISPLAY_WINDOW; #ifdef ENABLE_FBDEV_DGA else if (has_dga && sscanf(mode_str, "dga/%19s", fb_name) == 1) { #else else if (has_dga && sscanf(mode_str, "dga/%d/%d", &width, &height) == 2) { #endif display_type = DISPLAY_DGA; if (width > DisplayWidth(x_display, screen)) width = DisplayWidth(x_display, screen); if (height > DisplayHeight(x_display, screen)) height = DisplayHeight(x_display, screen); } if (width <= 0) width = DisplayWidth(x_display, screen); if (height <= 0) height = DisplayHeight(x_display, screen); } // Initialize according to display type switch (display_type) { case DISPLAY_WINDOW: if (!init_window(width, height)) return false; break; case DISPLAY_DGA: #ifdef ENABLE_FBDEV_DGA if (!init_fbdev_dga(fb_name)) #else if (!init_xf86_dga(width, height)) #endif return false; break; } // Lock down frame buffer LOCK_FRAME_BUFFER; #if !REAL_ADDRESSING && !DIRECT_ADDRESSING // Set variables for UAE memory mapping MacFrameBaseHost = the_buffer; MacFrameSize = VideoMonitor.bytes_per_row * VideoMonitor.y; // No special frame buffer in Classic mode (frame buffer is in Mac RAM) if (classic) MacFrameLayout = FLAYOUT_NONE; #endif #ifdef ENABLE_VOSF if (use_vosf) { // Initialize the mainBuffer structure if (!VideoInitBuffer()) { // TODO: STR_VOSF_INIT_ERR ? ErrorAlert("Could not initialize Video on SEGV signals"); return false; } // Initialize the handler for SIGSEGV if (!sigsegv_install_handler(screen_fault_handler)) { // TODO: STR_VOSF_INIT_ERR ? ErrorAlert("Could not initialize Video on SEGV signals"); return false; } } #endif // Initialize VideoRefresh function VideoRefreshInit(); XSync(x_display, false); #ifdef HAVE_PTHREADS // Start redraw/input thread redraw_thread_active = (pthread_create(&redraw_thread, NULL, redraw_func, NULL) == 0); if (!redraw_thread_active) { printf("FATAL: cannot create redraw thread\n"); return false; } #endif return true; } /* * Deinitialization */ void VideoExit(void) { #ifdef HAVE_PTHREADS // Stop redraw thread if (redraw_thread_active) { redraw_thread_cancel = true; #ifdef HAVE_PTHREAD_CANCEL pthread_cancel(redraw_thread); #endif pthread_join(redraw_thread, NULL); redraw_thread_active = false; } #endif // Unlock frame buffer UNLOCK_FRAME_BUFFER; // Close window and server connection if (x_display != NULL) { XSync(x_display, false); #ifdef ENABLE_XF86_DGA if (display_type == DISPLAY_DGA) { XF86DGADirectVideo(x_display, screen, 0); XUngrabPointer(x_display, CurrentTime); XUngrabKeyboard(x_display, CurrentTime); } #endif #ifdef ENABLE_XF86_VIDMODE if (has_vidmode && display_type == DISPLAY_DGA) XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]); #endif #ifdef ENABLE_FBDEV_DGA if (display_type == DISPLAY_DGA) { XUngrabPointer(x_display, CurrentTime); XUngrabKeyboard(x_display, CurrentTime); close(fbdev_fd); } #endif XFlush(x_display); XSync(x_display, false); if (depth == 8) { XFreeColormap(x_display, cmap[0]); XFreeColormap(x_display, cmap[1]); } if (!use_vosf) { if (the_buffer) { free(the_buffer); the_buffer = NULL; } if (!have_shm && the_buffer_copy) { free(the_buffer_copy); the_buffer_copy = NULL; } } #ifdef ENABLE_VOSF else { if (the_buffer != (uint8 *)MAP_FAILED) { munmap((caddr_t)the_buffer, the_buffer_size); the_buffer = 0; } if (the_buffer_copy != (uint8 *)MAP_FAILED) { munmap((caddr_t)the_buffer_copy, the_buffer_size); the_buffer_copy = 0; } } #endif } #ifdef ENABLE_VOSF if (use_vosf) { // Clear mainBuffer data if (mainBuffer.pageInfo) { free(mainBuffer.pageInfo); mainBuffer.pageInfo = 0; } if (mainBuffer.dirtyPages) { free(mainBuffer.dirtyPages); mainBuffer.dirtyPages = 0; } } // Close /dev/zero if (zero_fd > 0) close(zero_fd); #endif } /* * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) */ void VideoQuitFullScreen(void) { D(bug("VideoQuitFullScreen()\n")); if (display_type == DISPLAY_DGA) quit_full_screen = true; } /* * Mac VBL interrupt */ void VideoInterrupt(void) { // Emergency quit requested? Then quit if (emerg_quit) QuitEmulator(); // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; LOCK_FRAME_BUFFER; } /* * Set palette */ void video_set_palette(uint8 *pal) { LOCK_PALETTE; // Convert colors to XColor array for (int i=0; i<256; i++) { palette[i].pixel = i; palette[i].red = pal[i*3] * 0x0101; palette[i].green = pal[i*3+1] * 0x0101; palette[i].blue = pal[i*3+2] * 0x0101; palette[i].flags = DoRed | DoGreen | DoBlue; } // Tell redraw thread to change palette palette_changed = true; UNLOCK_PALETTE; } /* * Suspend/resume emulator */ #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) static void suspend_emul(void) { if (display_type == DISPLAY_DGA) { // Release ctrl key ADBKeyUp(0x36); ctrl_down = false; // Lock frame buffer (this will stop the MacOS thread) LOCK_FRAME_BUFFER; // Save frame buffer fb_save = malloc(VideoMonitor.y * VideoMonitor.bytes_per_row); if (fb_save) memcpy(fb_save, the_buffer, VideoMonitor.y * VideoMonitor.bytes_per_row); // Close full screen display #ifdef ENABLE_XF86_DGA XF86DGADirectVideo(x_display, screen, 0); #endif XUngrabPointer(x_display, CurrentTime); XUngrabKeyboard(x_display, CurrentTime); XUnmapWindow(x_display, the_win); wait_unmapped(the_win); // Open "suspend" window XSetWindowAttributes wattr; wattr.event_mask = KeyPressMask; wattr.background_pixel = black_pixel; suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth, InputOutput, vis, CWEventMask | CWBackPixel, &wattr); set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE); set_window_focus(suspend_win); XMapWindow(x_display, suspend_win); emul_suspended = true; } } static void resume_emul(void) { // Close "suspend" window XDestroyWindow(x_display, suspend_win); XSync(x_display, false); // Reopen full screen display XMapRaised(x_display, the_win); wait_mapped(the_win); XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); XGrabKeyboard(x_display, rootwin, 1, GrabModeAsync, GrabModeAsync, CurrentTime); XGrabPointer(x_display, rootwin, 1, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); #ifdef ENABLE_XF86_DGA XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); XF86DGASetViewPort(x_display, screen, 0, 0); #endif XSync(x_display, false); // the_buffer already contains the data to restore. i.e. since a temporary // frame buffer is used when VOSF is actually used, fb_save is therefore // not necessary. #ifdef ENABLE_VOSF if (use_vosf) { LOCK_VOSF; PFLAG_SET_ALL; UNLOCK_VOSF; memset(the_buffer_copy, 0, VideoMonitor.bytes_per_row * VideoMonitor.y); } #endif // Restore frame buffer if (fb_save) { #ifdef ENABLE_VOSF // Don't copy fb_save to the temporary frame buffer in VOSF mode if (!use_vosf) #endif memcpy(the_buffer, fb_save, VideoMonitor.y * VideoMonitor.bytes_per_row); free(fb_save); fb_save = NULL; } #ifdef ENABLE_XF86_DGA if (depth == 8) XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); #endif // Unlock frame buffer (and continue MacOS thread) UNLOCK_FRAME_BUFFER; emul_suspended = false; } #endif /* * Translate key event to Mac keycode */ static int kc_decode(KeySym ks) { switch (ks) { case XK_A: case XK_a: return 0x00; case XK_B: case XK_b: return 0x0b; case XK_C: case XK_c: return 0x08; case XK_D: case XK_d: return 0x02; case XK_E: case XK_e: return 0x0e; case XK_F: case XK_f: return 0x03; case XK_G: case XK_g: return 0x05; case XK_H: case XK_h: return 0x04; case XK_I: case XK_i: return 0x22; case XK_J: case XK_j: return 0x26; case XK_K: case XK_k: return 0x28; case XK_L: case XK_l: return 0x25; case XK_M: case XK_m: return 0x2e; case XK_N: case XK_n: return 0x2d; case XK_O: case XK_o: return 0x1f; case XK_P: case XK_p: return 0x23; case XK_Q: case XK_q: return 0x0c; case XK_R: case XK_r: return 0x0f; case XK_S: case XK_s: return 0x01; case XK_T: case XK_t: return 0x11; case XK_U: case XK_u: return 0x20; case XK_V: case XK_v: return 0x09; case XK_W: case XK_w: return 0x0d; case XK_X: case XK_x: return 0x07; case XK_Y: case XK_y: return 0x10; case XK_Z: case XK_z: return 0x06; case XK_1: case XK_exclam: return 0x12; case XK_2: case XK_at: return 0x13; case XK_3: case XK_numbersign: return 0x14; case XK_4: case XK_dollar: return 0x15; case XK_5: case XK_percent: return 0x17; case XK_6: return 0x16; case XK_7: return 0x1a; case XK_8: return 0x1c; case XK_9: return 0x19; case XK_0: return 0x1d; case XK_grave: case XK_asciitilde: return 0x0a; case XK_minus: case XK_underscore: return 0x1b; case XK_equal: case XK_plus: return 0x18; case XK_bracketleft: case XK_braceleft: return 0x21; case XK_bracketright: case XK_braceright: return 0x1e; case XK_backslash: case XK_bar: return 0x2a; case XK_semicolon: case XK_colon: return 0x29; case XK_apostrophe: case XK_quotedbl: return 0x27; case XK_comma: case XK_less: return 0x2b; case XK_period: case XK_greater: return 0x2f; case XK_slash: case XK_question: return 0x2c; #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) case XK_Tab: if (ctrl_down) {suspend_emul(); return -1;} else return 0x30; #else case XK_Tab: return 0x30; #endif case XK_Return: return 0x24; case XK_space: return 0x31; case XK_BackSpace: return 0x33; case XK_Delete: return 0x75; case XK_Insert: return 0x72; case XK_Home: case XK_Help: return 0x73; case XK_End: return 0x77; #ifdef __hpux case XK_Prior: return 0x74; case XK_Next: return 0x79; #else case XK_Page_Up: return 0x74; case XK_Page_Down: return 0x79; #endif case XK_Control_L: return 0x36; case XK_Control_R: return 0x36; case XK_Shift_L: return 0x38; case XK_Shift_R: return 0x38; case XK_Alt_L: return 0x37; case XK_Alt_R: return 0x37; case XK_Meta_L: return 0x3a; case XK_Meta_R: return 0x3a; case XK_Menu: return 0x32; case XK_Caps_Lock: return 0x39; case XK_Num_Lock: return 0x47; case XK_Up: return 0x3e; case XK_Down: return 0x3d; case XK_Left: return 0x3b; case XK_Right: return 0x3c; case XK_Escape: if (ctrl_down) {quit_full_screen = true; emerg_quit = true; return -1;} else return 0x35; case XK_F1: if (ctrl_down) {SysMountFirstFloppy(); return -1;} else return 0x7a; case XK_F2: return 0x78; case XK_F3: return 0x63; case XK_F4: return 0x76; case XK_F5: return 0x60; case XK_F6: return 0x61; case XK_F7: return 0x62; case XK_F8: return 0x64; case XK_F9: return 0x65; case XK_F10: return 0x6d; case XK_F11: return 0x67; case XK_F12: return 0x6f; case XK_Print: return 0x69; case XK_Scroll_Lock: return 0x6b; case XK_Pause: return 0x71; #if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End) case XK_KP_0: case XK_KP_Insert: return 0x52; case XK_KP_1: case XK_KP_End: return 0x53; case XK_KP_2: case XK_KP_Down: return 0x54; case XK_KP_3: case XK_KP_Next: return 0x55; case XK_KP_4: case XK_KP_Left: return 0x56; case XK_KP_5: case XK_KP_Begin: return 0x57; case XK_KP_6: case XK_KP_Right: return 0x58; case XK_KP_7: case XK_KP_Home: return 0x59; case XK_KP_8: case XK_KP_Up: return 0x5b; case XK_KP_9: case XK_KP_Prior: return 0x5c; case XK_KP_Decimal: case XK_KP_Delete: return 0x41; #else case XK_KP_0: return 0x52; case XK_KP_1: return 0x53; case XK_KP_2: return 0x54; case XK_KP_3: return 0x55; case XK_KP_4: return 0x56; case XK_KP_5: return 0x57; case XK_KP_6: return 0x58; case XK_KP_7: return 0x59; case XK_KP_8: return 0x5b; case XK_KP_9: return 0x5c; case XK_KP_Decimal: return 0x41; #endif case XK_KP_Add: return 0x45; case XK_KP_Subtract: return 0x4e; case XK_KP_Multiply: return 0x43; case XK_KP_Divide: return 0x4b; case XK_KP_Enter: return 0x4c; case XK_KP_Equal: return 0x51; } return -1; } static int event2keycode(XKeyEvent &ev) { KeySym ks; int as; int i = 0; do { ks = XLookupKeysym(&ev, i++); as = kc_decode(ks); if (as != -1) return as; } while (ks != NoSymbol); return -1; } /* * X event handling */ static void handle_events(void) { while (XPending(x_display)) { XEvent event; XNextEvent(x_display, &event); switch (event.type) { // Mouse button case ButtonPress: { unsigned int button = event.xbutton.button; if (button < 4) ADBMouseDown(button - 1); else if (button < 6) { // Wheel mouse if (mouse_wheel_mode == 0) { int key = (button == 5) ? 0x79 : 0x74; // Page up/down ADBKeyDown(key); ADBKeyUp(key); } else { int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down for(int i=0; i<mouse_wheel_lines; i++) { ADBKeyDown(key); ADBKeyUp(key); } } } break; } case ButtonRelease: { unsigned int button = event.xbutton.button; if (button < 4) ADBMouseUp(button - 1); break; } // Mouse moved case EnterNotify: case MotionNotify: ADBMouseMoved(event.xmotion.x, event.xmotion.y); break; // Keyboard case KeyPress: { int code; if (use_keycodes) { event2keycode(event.xkey); // This is called to process the hotkeys code = keycode_table[event.xkey.keycode & 0xff]; } else code = event2keycode(event.xkey); if (code != -1) { if (!emul_suspended) { if (code == 0x39) { // Caps Lock pressed if (caps_on) { ADBKeyUp(code); caps_on = false; } else { ADBKeyDown(code); caps_on = true; } } else ADBKeyDown(code); if (code == 0x36) ctrl_down = true; } else { #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) if (code == 0x31) resume_emul(); // Space wakes us up #endif } } break; } case KeyRelease: { int code; if (use_keycodes) { event2keycode(event.xkey); // This is called to process the hotkeys code = keycode_table[event.xkey.keycode & 0xff]; } else code = event2keycode(event.xkey); if (code != -1 && code != 0x39) { // Don't propagate Caps Lock releases ADBKeyUp(code); if (code == 0x36) ctrl_down = false; } break; } // Hidden parts exposed, force complete refresh of window case Expose: if (display_type == DISPLAY_WINDOW) { #ifdef ENABLE_VOSF if (use_vosf) { // VOSF refresh LOCK_VOSF; PFLAG_SET_ALL; UNLOCK_VOSF; memset(the_buffer_copy, 0, VideoMonitor.bytes_per_row * VideoMonitor.y); } else #endif if (frame_skip == 0) { // Dynamic refresh int x1, y1; for (y1=0; y1<16; y1++) for (x1=0; x1<16; x1++) updt_box[x1][y1] = true; nr_boxes = 16 * 16; } else // Static refresh memset(the_buffer_copy, 0, VideoMonitor.bytes_per_row * VideoMonitor.y); } break; // Window "close" widget clicked case ClientMessage: if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) { ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); } break; } } } /* * Window display update */ // Dynamic display update (variable frame rate for each box) static void update_display_dynamic(int ticker) { int y1, y2, y2s, y2a, i, x1, xm, xmo, ymo, yo, yi, yil, xi; int xil = 0; int rxm = 0, rxmo = 0; int bytes_per_row = VideoMonitor.bytes_per_row; int bytes_per_pixel = VideoMonitor.bytes_per_row / VideoMonitor.x; int rx = VideoMonitor.bytes_per_row / 16; int ry = VideoMonitor.y / 16; int max_box; y2s = sm_uptd[ticker % 8]; y2a = 8; for (i = 0; i < 6; i++) if (ticker % (2 << i)) break; max_box = sm_no_boxes[i]; if (y2a) { for (y1=0; y1<16; y1++) { for (y2=y2s; y2 < ry; y2 += y2a) { i = ((y1 * ry) + y2) * bytes_per_row; for (x1=0; x1<16; x1++, i += rx) { if (updt_box[x1][y1] == false) { if (memcmp(&the_buffer_copy[i], &the_buffer[i], rx)) { updt_box[x1][y1] = true; nr_boxes++; } } } } } } if ((nr_boxes <= max_box) && (nr_boxes)) { for (y1=0; y1<16; y1++) { for (x1=0; x1<16; x1++) { if (updt_box[x1][y1] == true) { if (rxm == 0) xm = x1; rxm += rx; updt_box[x1][y1] = false; } if (((updt_box[x1+1][y1] == false) || (x1 == 15)) && (rxm)) { if ((rxmo != rxm) || (xmo != xm) || (yo != y1 - 1)) { if (rxmo) { xi = xmo * rx; yi = ymo * ry; xil = rxmo; yil = (yo - ymo +1) * ry; } rxmo = rxm; xmo = xm; ymo = y1; } rxm = 0; yo = y1; } if (xil) { i = (yi * bytes_per_row) + xi; for (y2=0; y2 < yil; y2++, i += bytes_per_row) memcpy(&the_buffer_copy[i], &the_buffer[i], xil); if (depth == 1) { if (have_shm) XShmPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil, 0); else XPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil); } else { if (have_shm) XShmPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil, 0); else XPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil); } xil = 0; } if ((x1 == 15) && (y1 == 15) && (rxmo)) { x1--; xi = xmo * rx; yi = ymo * ry; xil = rxmo; yil = (yo - ymo +1) * ry; rxmo = 0; } } } nr_boxes = 0; } } // Static display update (fixed frame rate, but incremental) static void update_display_static(void) { // Incremental update code int wide = 0, high = 0, x1, x2, y1, y2, i, j; int bytes_per_row = VideoMonitor.bytes_per_row; int bytes_per_pixel = VideoMonitor.bytes_per_row / VideoMonitor.x; uint8 *p, *p2; // Check for first line from top and first line from bottom that have changed y1 = 0; for (j=0; j<VideoMonitor.y; j++) { if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { y1 = j; break; } } y2 = y1 - 1; for (j=VideoMonitor.y-1; j>=y1; j--) { if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { y2 = j; break; } } high = y2 - y1 + 1; // Check for first column from left and first column from right that have changed if (high) { if (depth == 1) { x1 = VideoMonitor.x - 1; for (j=y1; j<=y2; j++) { p = &the_buffer[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; for (i=0; i<(x1>>3); i++) { if (*p != *p2) { x1 = i << 3; break; } p++; p2++; } } x2 = x1; for (j=y1; j<=y2; j++) { p = &the_buffer[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; p += bytes_per_row; p2 += bytes_per_row; for (i=(VideoMonitor.x>>3); i>(x2>>3); i--) { p--; p2--; if (*p != *p2) { x2 = (i << 3) + 7; break; } } } wide = x2 - x1 + 1; // Update copy of the_buffer if (high && wide) { for (j=y1; j<=y2; j++) { i = j * bytes_per_row + (x1 >> 3); memcpy(the_buffer_copy + i, the_buffer + i, wide >> 3); } } } else { x1 = VideoMonitor.x; for (j=y1; j<=y2; j++) { p = &the_buffer[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; for (i=0; i<x1*bytes_per_pixel; i++) { if (*p != *p2) { x1 = i / bytes_per_pixel; break; } p++; p2++; } } x2 = x1; for (j=y1; j<=y2; j++) { p = &the_buffer[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; p += bytes_per_row; p2 += bytes_per_row; for (i=VideoMonitor.x*bytes_per_pixel; i>x2*bytes_per_pixel; i--) { p--; p2--; if (*p != *p2) { x2 = i / bytes_per_pixel; break; } } } wide = x2 - x1; // Update copy of the_buffer if (high && wide) { for (j=y1; j<=y2; j++) { i = j * bytes_per_row + x1 * bytes_per_pixel; memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); } } } } // Refresh display if (high && wide) { if (have_shm) XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high, 0); else XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high); } } /* * Screen refresh functions */ // We suggest the compiler to inline the next two functions so that it // may specialise the code according to the current screen depth and // display type. A clever compiler would do that job by itself though... // NOTE: update_display_vosf is inlined too static inline void possibly_quit_dga_mode() { #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) // Quit DGA mode if requested if (quit_full_screen) { quit_full_screen = false; #ifdef ENABLE_XF86_DGA XF86DGADirectVideo(x_display, screen, 0); #endif XUngrabPointer(x_display, CurrentTime); XUngrabKeyboard(x_display, CurrentTime); XUnmapWindow(x_display, the_win); XSync(x_display, false); } #endif } static inline void handle_palette_changes(int depth, int display_type) { LOCK_PALETTE; if (palette_changed) { palette_changed = false; if (depth == 8) { XStoreColors(x_display, cmap[0], palette, 256); XStoreColors(x_display, cmap[1], palette, 256); XSync(x_display, false); #ifdef ENABLE_XF86_DGA if (display_type == DISPLAY_DGA) { current_dga_cmap ^= 1; XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); } #endif } } UNLOCK_PALETTE; } static void video_refresh_dga(void) { // Quit DGA mode if requested possibly_quit_dga_mode(); // Handle X events handle_events(); // Handle palette changes handle_palette_changes(depth, DISPLAY_DGA); } #ifdef ENABLE_VOSF #if REAL_ADDRESSING || DIRECT_ADDRESSING static void video_refresh_dga_vosf(void) { // Quit DGA mode if requested possibly_quit_dga_mode(); // Handle X events handle_events(); // Handle palette changes handle_palette_changes(depth, DISPLAY_DGA); // Update display (VOSF variant) static int tick_counter = 0; if (++tick_counter >= frame_skip) { tick_counter = 0; if (mainBuffer.dirty) { LOCK_VOSF; update_display_dga_vosf(); UNLOCK_VOSF; } } } #endif static void video_refresh_window_vosf(void) { // Quit DGA mode if requested possibly_quit_dga_mode(); // Handle X events handle_events(); // Handle palette changes handle_palette_changes(depth, DISPLAY_WINDOW); // Update display (VOSF variant) static int tick_counter = 0; if (++tick_counter >= frame_skip) { tick_counter = 0; if (mainBuffer.dirty) { LOCK_VOSF; update_display_window_vosf(); UNLOCK_VOSF; XSync(x_display, false); // Let the server catch up } } } #endif // def ENABLE_VOSF static void video_refresh_window_static(void) { // Handle X events handle_events(); // Handle_palette changes handle_palette_changes(depth, DISPLAY_WINDOW); // Update display (static variant) static int tick_counter = 0; if (++tick_counter >= frame_skip) { tick_counter = 0; update_display_static(); } } static void video_refresh_window_dynamic(void) { // Handle X events handle_events(); // Handle_palette changes handle_palette_changes(depth, DISPLAY_WINDOW); // Update display (dynamic variant) static int tick_counter = 0; tick_counter++; update_display_dynamic(tick_counter); } /* * Thread for screen refresh, input handling etc. */ void VideoRefreshInit(void) { // TODO: set up specialised 8bpp VideoRefresh handlers ? if (display_type == DISPLAY_DGA) { #if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) if (use_vosf) video_refresh = video_refresh_dga_vosf; else #endif video_refresh = video_refresh_dga; } else { #ifdef ENABLE_VOSF if (use_vosf) video_refresh = video_refresh_window_vosf; else #endif if (frame_skip == 0) video_refresh = video_refresh_window_dynamic; else video_refresh = video_refresh_window_static; } } void VideoRefresh(void) { // TODO: make main_unix/VideoRefresh call directly video_refresh() ? video_refresh(); } #ifdef HAVE_PTHREADS static void *redraw_func(void *arg) { uint64 start = GetTicks_usec(); int64 ticks = 0; uint64 next = GetTicks_usec(); while (!redraw_thread_cancel) { video_refresh(); next += 16667; int64 delay = next - GetTicks_usec(); if (delay > 0) Delay_usec(delay); else if (delay < -16667) next = GetTicks_usec(); ticks++; } uint64 end = GetTicks_usec(); // printf("%Ld ticks in %Ld usec = %Ld ticks/sec\n", ticks, end - start, ticks * 1000000 / (end - start)); return NULL; } #endif