ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/Unix/video_x.cpp
Revision: 1.15
Committed: 2000-07-13T13:47:12Z (24 years ago) by cebix
Branch: MAIN
Changes since 1.14: +141 -101 lines
Log Message:
- first version to run natively on NetBSD/m68k

File Contents

# Content
1 /*
2 * video_x.cpp - Video/graphics emulation, X11 specific stuff
3 *
4 * Basilisk II (C) 1997-2000 Christian Bauer
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 /*
22 * NOTES:
23 * The Ctrl key works like a qualifier for special actions:
24 * Ctrl-Tab = suspend DGA mode
25 * Ctrl-Esc = emergency quit
26 * Ctrl-F1 = mount floppy
27 */
28
29 #include "sysdeps.h"
30
31 #include <X11/Xlib.h>
32 #include <X11/Xutil.h>
33 #include <X11/keysym.h>
34 #include <X11/extensions/XShm.h>
35 #include <sys/ipc.h>
36 #include <sys/shm.h>
37 #include <errno.h>
38
39 #ifdef HAVE_PTHREADS
40 # include <pthread.h>
41 #endif
42
43 #ifdef ENABLE_XF86_DGA
44 # include <X11/extensions/xf86dga.h>
45 #endif
46
47 #ifdef ENABLE_XF86_VIDMODE
48 # include <X11/extensions/xf86vmode.h>
49 #endif
50
51 #ifdef ENABLE_FBDEV_DGA
52 # include <sys/mman.h>
53 #endif
54
55 #include "cpu_emulation.h"
56 #include "main.h"
57 #include "adb.h"
58 #include "macos_util.h"
59 #include "prefs.h"
60 #include "user_strings.h"
61 #include "video.h"
62
63 #define DEBUG 1
64 #include "debug.h"
65
66
67 // Display types
68 enum {
69 DISPLAY_WINDOW, // X11 window, using MIT SHM extensions if possible
70 DISPLAY_DGA // DGA fullscreen display
71 };
72
73 // Constants
74 const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes";
75 const char FBDEVICES_FILE_NAME[] = DATADIR "/fbdevices";
76
77
78 // Global variables
79 static int32 frame_skip; // Prefs items
80 static int16 mouse_wheel_mode = 1;
81 static int16 mouse_wheel_lines = 3;
82
83 static int display_type = DISPLAY_WINDOW; // See enum above
84 static uint8 *the_buffer; // Mac frame buffer
85
86 #ifdef HAVE_PTHREADS
87 static bool redraw_thread_active = false; // Flag: Redraw thread installed
88 static volatile bool redraw_thread_cancel = false; // Flag: Cancel Redraw thread
89 static pthread_t redraw_thread; // Redraw thread
90 #endif
91
92 static bool has_dga = false; // Flag: Video DGA capable
93 static bool has_vidmode = false; // Flag: VidMode extension available
94
95 static bool ctrl_down = false; // Flag: Ctrl key pressed
96 static bool caps_on = false; // Flag: Caps Lock on
97 static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread
98 static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread
99 static bool emul_suspended = false; // Flag: Emulator suspended
100
101 static bool classic_mode = false; // Flag: Classic Mac video mode
102
103 static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms
104 static int keycode_table[256]; // X keycode -> Mac keycode translation table
105
106 // X11 variables
107 static int screen; // Screen number
108 static int xdepth; // Depth of X screen
109 static int depth; // Depth of Mac frame buffer
110 static Window rootwin, the_win; // Root window and our window
111 static XVisualInfo visualInfo;
112 static Visual *vis;
113 static Colormap cmap[2]; // Two colormaps (DGA) for 8-bit mode
114 static XColor black, white;
115 static unsigned long black_pixel, white_pixel;
116 static int eventmask;
117 static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask;
118 static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask;
119
120 static XColor palette[256]; // Color palette for 8-bit mode
121 static bool palette_changed = false; // Flag: Palette changed, redraw thread must set new colors
122 #ifdef HAVE_PTHREADS
123 static pthread_mutex_t palette_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect palette
124 #endif
125
126 // Variables for window mode
127 static GC the_gc;
128 static XImage *img = NULL;
129 static XShmSegmentInfo shminfo;
130 static XImage *cursor_image, *cursor_mask_image;
131 static Pixmap cursor_map, cursor_mask_map;
132 static Cursor mac_cursor;
133 static GC cursor_gc, cursor_mask_gc;
134 static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer
135 static uint8 the_cursor[64]; // Cursor image data
136 static bool have_shm = false; // Flag: SHM extensions available
137 static bool updt_box[17][17]; // Flag for Update
138 static int nr_boxes;
139 static const int sm_uptd[] = {4,1,6,3,0,5,2,7};
140 static int sm_no_boxes[] = {1,8,32,64,128,300};
141
142 // Variables for XF86 DGA mode
143 static int current_dga_cmap; // Number (0 or 1) of currently installed DGA colormap
144 static Window suspend_win; // "Suspend" window
145 static void *fb_save = NULL; // Saved frame buffer for suspend
146 #ifdef HAVE_PTHREADS
147 static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer
148 #endif
149
150 // Variables for fbdev DGA mode
151 const char FBDEVICE_FILE_NAME[] = "/dev/fb";
152 static int fbdev_fd;
153
154 #ifdef ENABLE_XF86_VIDMODE
155 // Variables for XF86 VidMode support
156 static XF86VidModeModeInfo **x_video_modes; // Array of all available modes
157 static int num_x_video_modes;
158 #endif
159
160
161 // Prototypes
162 static void *redraw_func(void *arg);
163 static int event2keycode(XKeyEvent *ev);
164
165
166 // From main_unix.cpp
167 extern Display *x_display;
168
169 // From sys_unix.cpp
170 extern void SysMountFirstFloppy(void);
171
172
173 /*
174 * Initialization
175 */
176
177 // Set VideoMonitor according to video mode
178 void set_video_monitor(int width, int height, int bytes_per_row, bool native_byte_order)
179 {
180 #if !REAL_ADDRESSING
181 int layout = FLAYOUT_DIRECT;
182 switch (depth) {
183 case 1:
184 layout = FLAYOUT_DIRECT;
185 break;
186 case 8:
187 layout = FLAYOUT_DIRECT;
188 break;
189 case 15:
190 layout = FLAYOUT_HOST_555;
191 break;
192 case 16:
193 layout = FLAYOUT_HOST_565;
194 break;
195 case 24:
196 case 32:
197 layout = FLAYOUT_HOST_888;
198 break;
199 }
200 if (native_byte_order)
201 MacFrameLayout = layout;
202 else
203 MacFrameLayout = FLAYOUT_DIRECT;
204 #endif
205 switch (depth) {
206 case 1:
207 VideoMonitor.mode = VMODE_1BIT;
208 break;
209 case 8:
210 VideoMonitor.mode = VMODE_8BIT;
211 break;
212 case 15:
213 VideoMonitor.mode = VMODE_16BIT;
214 break;
215 case 16:
216 VideoMonitor.mode = VMODE_16BIT;
217 break;
218 case 24:
219 case 32:
220 VideoMonitor.mode = VMODE_32BIT;
221 break;
222 }
223 VideoMonitor.x = width;
224 VideoMonitor.y = height;
225 VideoMonitor.bytes_per_row = bytes_per_row;
226 }
227
228 // Trap SHM errors
229 static bool shm_error = false;
230 static int (*old_error_handler)(Display *, XErrorEvent *);
231
232 static int error_handler(Display *d, XErrorEvent *e)
233 {
234 if (e->error_code == BadAccess) {
235 shm_error = true;
236 return 0;
237 } else
238 return old_error_handler(d, e);
239 }
240
241 // Init window mode
242 static bool init_window(int width, int height)
243 {
244 int aligned_width = (width + 15) & ~15;
245 int aligned_height = (height + 15) & ~15;
246
247 // Set absolute mouse mode
248 ADBSetRelMouseMode(false);
249
250 // Read frame skip prefs
251 frame_skip = PrefsFindInt32("frameskip");
252 if (frame_skip == 0)
253 frame_skip = 1;
254
255 // Create window
256 XSetWindowAttributes wattr;
257 wattr.event_mask = eventmask = win_eventmask;
258 wattr.background_pixel = black_pixel;
259 wattr.border_pixel = black_pixel;
260 wattr.backing_store = NotUseful;
261 wattr.save_under = false;
262 wattr.backing_planes = xdepth;
263
264 XSync(x_display, false);
265 the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
266 InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel |
267 CWBackingStore | CWBackingPlanes, &wattr);
268 XSync(x_display, false);
269 XStoreName(x_display, the_win, GetString(STR_WINDOW_TITLE));
270 XMapRaised(x_display, the_win);
271 XSync(x_display, false);
272
273 // Set colormap
274 if (depth == 8) {
275 XSetWindowColormap(x_display, the_win, cmap[0]);
276 XSetWMColormapWindows(x_display, the_win, &the_win, 1);
277 }
278
279 // Make window unresizable
280 XSizeHints *hints;
281 if ((hints = XAllocSizeHints()) != NULL) {
282 hints->min_width = width;
283 hints->max_width = width;
284 hints->min_height = height;
285 hints->max_height = height;
286 hints->flags = PMinSize | PMaxSize;
287 XSetWMNormalHints(x_display, the_win, hints);
288 XFree((char *)hints);
289 }
290
291 // Try to create and attach SHM image
292 have_shm = false;
293 if (depth != 1 && XShmQueryExtension(x_display)) {
294
295 // Create SHM image ("height + 2" for safety)
296 img = XShmCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height);
297 shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777);
298 the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0);
299 shminfo.shmaddr = img->data = (char *)the_buffer_copy;
300 shminfo.readOnly = False;
301
302 // Try to attach SHM image, catching errors
303 shm_error = false;
304 old_error_handler = XSetErrorHandler(error_handler);
305 XShmAttach(x_display, &shminfo);
306 XSync(x_display, false);
307 XSetErrorHandler(old_error_handler);
308 if (shm_error) {
309 shmdt(shminfo.shmaddr);
310 XDestroyImage(img);
311 shminfo.shmid = -1;
312 } else {
313 have_shm = true;
314 shmctl(shminfo.shmid, IPC_RMID, 0);
315 }
316 }
317
318 // Create normal X image if SHM doesn't work ("height + 2" for safety)
319 if (!have_shm) {
320 int bytes_per_row = aligned_width;
321 switch (depth) {
322 case 1:
323 bytes_per_row /= 8;
324 break;
325 case 15:
326 case 16:
327 bytes_per_row *= 2;
328 break;
329 case 24:
330 case 32:
331 bytes_per_row *= 4;
332 break;
333 }
334 the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row);
335 img = XCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row);
336 }
337
338 // 1-Bit mode is big-endian
339 if (depth == 1) {
340 img->byte_order = MSBFirst;
341 img->bitmap_bit_order = MSBFirst;
342 }
343
344 // Allocate memory for frame buffer copy
345 the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line);
346
347 // Create GC
348 the_gc = XCreateGC(x_display, the_win, 0, 0);
349 XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes);
350
351 // Create no_cursor
352 mac_cursor = XCreatePixmapCursor (x_display,
353 XCreatePixmap (x_display, the_win, 1, 1, 1),
354 XCreatePixmap (x_display, the_win, 1, 1, 1),
355 &black, &white, 0, 0);
356 XDefineCursor (x_display, the_win, mac_cursor);
357
358 // Set VideoMonitor
359 #ifdef WORDS_BIGENDIAN
360 set_video_monitor(width, height, img->bytes_per_line, img->bitmap_bit_order == MSBFirst);
361 #else
362 set_video_monitor(width, height, img->bytes_per_line, img->bitmap_bit_order == LSBFirst);
363 #endif
364
365 #if REAL_ADDRESSING
366 VideoMonitor.mac_frame_base = (uint32)the_buffer;
367 #else
368 VideoMonitor.mac_frame_base = MacFrameBaseMac;
369 #endif
370 return true;
371 }
372
373 // Init fbdev DGA display
374 static bool init_fbdev_dga(char *in_fb_name)
375 {
376 #ifdef ENABLE_FBDEV_DGA
377 // Find the maximum depth available
378 int ndepths, max_depth(0);
379 int *depths = XListDepths(x_display, screen, &ndepths);
380 if (depths == NULL) {
381 printf("FATAL: Could not determine the maximal depth available\n");
382 return false;
383 } else {
384 while (ndepths-- > 0) {
385 if (depths[ndepths] > max_depth)
386 max_depth = depths[ndepths];
387 }
388 }
389
390 // Get fbdevices file path from preferences
391 const char *fbd_path = PrefsFindString("fbdevicefile");
392
393 // Open fbdevices file
394 FILE *fp = fopen(fbd_path ? fbd_path : FBDEVICES_FILE_NAME, "r");
395 if (fp == NULL) {
396 char str[256];
397 sprintf(str, GetString(STR_NO_FBDEVICE_FILE_ERR), fbd_path ? fbd_path : FBDEVICES_FILE_NAME, strerror(errno));
398 ErrorAlert(str);
399 return false;
400 }
401
402 int fb_depth; // supported depth
403 uint32 fb_offset; // offset used for mmap(2)
404 char fb_name[20];
405 char line[256];
406 bool device_found = false;
407 while (fgets(line, 255, fp)) {
408 // Read line
409 int len = strlen(line);
410 if (len == 0)
411 continue;
412 line[len - 1] = '\0';
413
414 // Comments begin with "#" or ";"
415 if ((line[0] == '#') || (line[0] == ';') || (line[0] == '\0'))
416 continue;
417
418 if ((sscanf(line, "%19s %d %x", &fb_name, &fb_depth, &fb_offset) == 3)
419 && (strcmp(fb_name, in_fb_name) == 0) && (fb_depth == max_depth)) {
420 device_found = true;
421 break;
422 }
423 }
424
425 // fbdevices file completely read
426 fclose(fp);
427
428 // Frame buffer name not found ? Then, display warning
429 if (!device_found) {
430 char str[256];
431 sprintf(str, GetString(STR_FBDEV_NAME_ERR), in_fb_name, max_depth);
432 ErrorAlert(str);
433 return false;
434 }
435
436 int width = DisplayWidth(x_display, screen);
437 int height = DisplayHeight(x_display, screen);
438 depth = fb_depth; // max_depth
439
440 // Set relative mouse mode
441 ADBSetRelMouseMode(false);
442
443 // Create window
444 XSetWindowAttributes wattr;
445 wattr.override_redirect = True;
446 wattr.backing_store = NotUseful;
447 wattr.background_pixel = white_pixel;
448 wattr.border_pixel = black_pixel;
449 wattr.event_mask = eventmask = dga_eventmask;
450
451 XSync(x_display, false);
452 the_win = XCreateWindow(x_display, rootwin,
453 0, 0, width, height,
454 0, xdepth, InputOutput, vis,
455 CWEventMask|CWBackPixel|CWBorderPixel|CWOverrideRedirect|CWBackingStore,
456 &wattr);
457 XSync(x_display, false);
458 XMapRaised(x_display, the_win);
459 XSync(x_display, false);
460
461 // Grab mouse and keyboard
462 XGrabKeyboard(x_display, the_win, True,
463 GrabModeAsync, GrabModeAsync, CurrentTime);
464 XGrabPointer(x_display, the_win, True,
465 PointerMotionMask | ButtonPressMask | ButtonReleaseMask,
466 GrabModeAsync, GrabModeAsync, the_win, None, CurrentTime);
467
468 // Set colormap
469 if (depth == 8) {
470 XSetWindowColormap(x_display, the_win, cmap[0]);
471 XSetWMColormapWindows(x_display, the_win, &the_win, 1);
472 }
473
474 // Set VideoMonitor
475 int bytes_per_row = width;
476 switch (depth) {
477 case 1:
478 bytes_per_row = ((width | 7) & ~7) >> 3;
479 break;
480 case 15:
481 case 16:
482 bytes_per_row *= 2;
483 break;
484 case 24:
485 case 32:
486 bytes_per_row *= 4;
487 break;
488 }
489
490 if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_PRIVATE, fbdev_fd, fb_offset)) == MAP_FAILED) {
491 if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_SHARED, fbdev_fd, fb_offset)) == MAP_FAILED) {
492 char str[256];
493 sprintf(str, GetString(STR_FBDEV_MMAP_ERR), strerror(errno));
494 ErrorAlert(str);
495 return false;
496 }
497 }
498
499 set_video_monitor(width, height, bytes_per_row, true);
500 #if REAL_ADDRESSING
501 VideoMonitor.mac_frame_base = (uint32)the_buffer;
502 #else
503 VideoMonitor.mac_frame_base = MacFrameBaseMac;
504 #endif
505 return true;
506 #else
507 ErrorAlert("Basilisk II has been compiled with fbdev DGA support disabled.");
508 return false;
509 #endif
510 }
511
512 // Init XF86 DGA display
513 static bool init_xf86_dga(int width, int height)
514 {
515 #ifdef ENABLE_XF86_DGA
516 // Set relative mouse mode
517 ADBSetRelMouseMode(true);
518
519 #ifdef ENABLE_XF86_VIDMODE
520 // Switch to best mode
521 if (has_vidmode) {
522 int best = 0;
523 for (int i=1; i<num_x_video_modes; i++) {
524 if (x_video_modes[i]->hdisplay >= width && x_video_modes[i]->vdisplay >= height &&
525 x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) {
526 best = i;
527 }
528 }
529 XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]);
530 XF86VidModeSetViewPort(x_display, screen, 0, 0);
531 }
532 #endif
533
534 // Create window
535 XSetWindowAttributes wattr;
536 wattr.event_mask = eventmask = dga_eventmask;
537 wattr.border_pixel = black_pixel;
538 wattr.override_redirect = True;
539
540 XSync(x_display, false);
541 the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
542 InputOutput, vis, CWEventMask | CWBorderPixel | CWOverrideRedirect, &wattr);
543 XSync(x_display, false);
544 XStoreName(x_display, the_win, GetString(STR_WINDOW_TITLE));
545 XMapRaised(x_display, the_win);
546 XSync(x_display, false);
547
548 // Establish direct screen connection
549 XMoveResizeWindow(x_display, the_win, 0, 0, width, height);
550 XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0);
551 XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime);
552 XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
553
554 int v_width, v_bank, v_size;
555 XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size);
556 XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
557 XF86DGASetViewPort(x_display, screen, 0, 0);
558 XF86DGASetVidPage(x_display, screen, 0);
559
560 // Set colormap
561 if (depth == 8) {
562 XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]);
563 XSetWMColormapWindows(x_display, the_win, &the_win, 1);
564 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
565 }
566
567 // Set VideoMonitor
568 int bytes_per_row = (v_width + 7) & ~7;
569 switch (depth) {
570 case 1:
571 bytes_per_row /= 8;
572 break;
573 case 15:
574 case 16:
575 bytes_per_row *= 2;
576 break;
577 case 24:
578 case 32:
579 bytes_per_row *= 4;
580 break;
581 }
582 set_video_monitor(width, height, bytes_per_row, true);
583 #if REAL_ADDRESSING
584 VideoMonitor.mac_frame_base = (uint32)the_buffer;
585 MacFrameLayout = FLAYOUT_DIRECT;
586 #else
587 VideoMonitor.mac_frame_base = MacFrameBaseMac;
588 #endif
589 return true;
590 #else
591 ErrorAlert("Basilisk II has been compiled with XF86 DGA support disabled.");
592 return false;
593 #endif
594 }
595
596 // Init keycode translation table
597 static void keycode_init(void)
598 {
599 bool use_kc = PrefsFindBool("keycodes");
600 if (use_kc) {
601
602 // Get keycode file path from preferences
603 const char *kc_path = PrefsFindString("keycodefile");
604
605 // Open keycode table
606 FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r");
607 if (f == NULL) {
608 char str[256];
609 sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno));
610 WarningAlert(str);
611 return;
612 }
613
614 // Default translation table
615 for (int i=0; i<256; i++)
616 keycode_table[i] = -1;
617
618 // Search for server vendor string, then read keycodes
619 const char *vendor = ServerVendor(x_display);
620 bool vendor_found = false;
621 char line[256];
622 while (fgets(line, 255, f)) {
623 // Read line
624 int len = strlen(line);
625 if (len == 0)
626 continue;
627 line[len-1] = 0;
628
629 // Comments begin with "#" or ";"
630 if (line[0] == '#' || line[0] == ';' || line[0] == 0)
631 continue;
632
633 if (vendor_found) {
634 // Read keycode
635 int x_code, mac_code;
636 if (sscanf(line, "%d %d", &x_code, &mac_code) == 2)
637 keycode_table[x_code & 0xff] = mac_code;
638 else
639 break;
640 } else {
641 // Search for vendor string
642 if (strstr(vendor, line) == vendor)
643 vendor_found = true;
644 }
645 }
646
647 // Keycode file completely read
648 fclose(f);
649 use_keycodes = vendor_found;
650
651 // Vendor not found? Then display warning
652 if (!vendor_found) {
653 char str[256];
654 sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME);
655 WarningAlert(str);
656 return;
657 }
658 }
659 }
660
661 bool VideoInit(bool classic)
662 {
663 // Init keycode translation
664 keycode_init();
665
666 // Read prefs
667 mouse_wheel_mode = PrefsFindInt16("mousewheelmode");
668 mouse_wheel_lines = PrefsFindInt16("mousewheellines");
669
670 // Find screen and root window
671 screen = XDefaultScreen(x_display);
672 rootwin = XRootWindow(x_display, screen);
673
674 // Get screen depth
675 xdepth = DefaultDepth(x_display, screen);
676
677 #ifdef ENABLE_FBDEV_DGA
678 // Frame buffer name
679 char fb_name[20];
680
681 // Could do fbdev dga ?
682 if ((fbdev_fd = open(FBDEVICE_FILE_NAME, O_RDWR)) != -1)
683 has_dga = true;
684 else
685 has_dga = false;
686 #endif
687
688 #ifdef ENABLE_XF86_DGA
689 // DGA available?
690 int dga_event_base, dga_error_base;
691 if (XF86DGAQueryExtension(x_display, &dga_event_base, &dga_error_base)) {
692 int dga_flags = 0;
693 XF86DGAQueryDirectVideo(x_display, screen, &dga_flags);
694 has_dga = dga_flags & XF86DGADirectPresent;
695 } else
696 has_dga = false;
697 #endif
698
699 #ifdef ENABLE_XF86_VIDMODE
700 // VidMode available?
701 int vm_event_base, vm_error_base;
702 has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base);
703 if (has_vidmode)
704 XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes);
705 #endif
706
707 // Find black and white colors
708 XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black);
709 XAllocColor(x_display, DefaultColormap(x_display, screen), &black);
710 XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white);
711 XAllocColor(x_display, DefaultColormap(x_display, screen), &white);
712 black_pixel = BlackPixel(x_display, screen);
713 white_pixel = WhitePixel(x_display, screen);
714
715 // Get appropriate visual
716 int color_class;
717 switch (xdepth) {
718 case 1:
719 color_class = StaticGray;
720 break;
721 case 8:
722 color_class = PseudoColor;
723 break;
724 case 15:
725 case 16:
726 case 24:
727 case 32:
728 color_class = TrueColor;
729 break;
730 default:
731 ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR));
732 return false;
733 }
734 if (!XMatchVisualInfo(x_display, screen, xdepth, color_class, &visualInfo)) {
735 ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
736 return false;
737 }
738 if (visualInfo.depth != xdepth) {
739 ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
740 return false;
741 }
742 vis = visualInfo.visual;
743
744 // Mac screen depth is always 1 bit in Classic mode, but follows X depth otherwise
745 classic_mode = classic;
746 if (classic)
747 depth = 1;
748 else
749 depth = xdepth;
750
751 // Create color maps for 8 bit mode
752 if (depth == 8) {
753 cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll);
754 cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll);
755 XInstallColormap(x_display, cmap[0]);
756 XInstallColormap(x_display, cmap[1]);
757 }
758
759 // Get screen mode from preferences
760 const char *mode_str;
761 if (classic)
762 mode_str = "win/512/342";
763 else
764 mode_str = PrefsFindString("screen");
765
766 // Determine type and mode
767 int width = 512, height = 384;
768 display_type = DISPLAY_WINDOW;
769 if (mode_str) {
770 if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2)
771 display_type = DISPLAY_WINDOW;
772 #ifdef ENABLE_FBDEV_DGA
773 else if (has_dga && sscanf(mode_str, "dga/%19s", fb_name) == 1) {
774 #else
775 else if (has_dga && sscanf(mode_str, "dga/%d/%d", &width, &height) == 2) {
776 #endif
777 display_type = DISPLAY_DGA;
778 if (width > DisplayWidth(x_display, screen))
779 width = DisplayWidth(x_display, screen);
780 if (height > DisplayHeight(x_display, screen))
781 height = DisplayHeight(x_display, screen);
782 }
783 if (width <= 0)
784 width = DisplayWidth(x_display, screen);
785 if (height <= 0)
786 height = DisplayHeight(x_display, screen);
787 }
788
789 // Initialize according to display type
790 switch (display_type) {
791 case DISPLAY_WINDOW:
792 if (!init_window(width, height))
793 return false;
794 break;
795 case DISPLAY_DGA:
796 #ifdef ENABLE_FBDEV_DGA
797 if (!init_fbdev_dga(fb_name))
798 #else
799 if (!init_xf86_dga(width, height))
800 #endif
801 return false;
802 break;
803 }
804
805 #ifdef HAVE_PTHREADS
806 // Lock down frame buffer
807 pthread_mutex_lock(&frame_buffer_lock);
808 #endif
809
810 #if !REAL_ADDRESSING
811 // Set variables for UAE memory mapping
812 MacFrameBaseHost = the_buffer;
813 MacFrameSize = VideoMonitor.bytes_per_row * VideoMonitor.y;
814
815 // No special frame buffer in Classic mode (frame buffer is in Mac RAM)
816 if (classic)
817 MacFrameLayout = FLAYOUT_NONE;
818 #endif
819
820 XSync(x_display, false);
821
822 #ifdef HAVE_PTHREADS
823 // Start redraw/input thread
824 redraw_thread_active = (pthread_create(&redraw_thread, NULL, redraw_func, NULL) == 0);
825 if (!redraw_thread_active) {
826 printf("FATAL: cannot create redraw thread\n");
827 return false;
828 }
829 #endif
830 return true;
831 }
832
833
834 /*
835 * Deinitialization
836 */
837
838 void VideoExit(void)
839 {
840 #ifdef HAVE_PTHREADS
841 // Stop redraw thread
842 if (redraw_thread_active) {
843 redraw_thread_cancel = true;
844 #ifdef HAVE_PTHREAD_CANCEL
845 pthread_cancel(redraw_thread);
846 #endif
847 pthread_join(redraw_thread, NULL);
848 redraw_thread_active = false;
849 }
850 #endif
851
852 #ifdef HAVE_PTHREADS
853 // Unlock frame buffer
854 pthread_mutex_unlock(&frame_buffer_lock);
855 #endif
856
857 // Close window and server connection
858 if (x_display != NULL) {
859 XSync(x_display, false);
860
861 #ifdef ENABLE_XF86_DGA
862 if (display_type == DISPLAY_DGA) {
863 XF86DGADirectVideo(x_display, screen, 0);
864 XUngrabPointer(x_display, CurrentTime);
865 XUngrabKeyboard(x_display, CurrentTime);
866 }
867 #endif
868
869 #ifdef ENABLE_XF86_VIDMODE
870 if (has_vidmode && display_type == DISPLAY_DGA)
871 XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]);
872 #endif
873
874 #ifdef ENABLE_FBDEV_DGA
875 if (display_type == DISPLAY_DGA) {
876 XUngrabPointer(x_display, CurrentTime);
877 XUngrabKeyboard(x_display, CurrentTime);
878 close(fbdev_fd);
879 }
880 #endif
881
882 XFlush(x_display);
883 XSync(x_display, false);
884 if (depth == 8) {
885 XFreeColormap(x_display, cmap[0]);
886 XFreeColormap(x_display, cmap[1]);
887 }
888
889 if (the_buffer) {
890 free(the_buffer);
891 the_buffer = NULL;
892 }
893
894 if (!have_shm && the_buffer_copy) {
895 free(the_buffer_copy);
896 the_buffer_copy = NULL;
897 }
898 }
899 }
900
901
902 /*
903 * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode)
904 */
905
906 void VideoQuitFullScreen(void)
907 {
908 D(bug("VideoQuitFullScreen()\n"));
909 if (display_type == DISPLAY_DGA)
910 quit_full_screen = true;
911 }
912
913
914 /*
915 * Mac VBL interrupt
916 */
917
918 void VideoInterrupt(void)
919 {
920 // Emergency quit requested? Then quit
921 if (emerg_quit)
922 QuitEmulator();
923
924 #ifdef HAVE_PTHREADS
925 // Temporarily give up frame buffer lock (this is the point where
926 // we are suspended when the user presses Ctrl-Tab)
927 pthread_mutex_unlock(&frame_buffer_lock);
928 pthread_mutex_lock(&frame_buffer_lock);
929 #endif
930 }
931
932
933 /*
934 * Set palette
935 */
936
937 void video_set_palette(uint8 *pal)
938 {
939 #ifdef HAVE_PTHREDS
940 pthread_mutex_lock(&palette_lock);
941 #endif
942
943 // Convert colors to XColor array
944 for (int i=0; i<256; i++) {
945 palette[i].pixel = i;
946 palette[i].red = pal[i*3] * 0x0101;
947 palette[i].green = pal[i*3+1] * 0x0101;
948 palette[i].blue = pal[i*3+2] * 0x0101;
949 palette[i].flags = DoRed | DoGreen | DoBlue;
950 }
951
952 // Tell redraw thread to change palette
953 palette_changed = true;
954
955 #ifdef HAVE_PTHREADS
956 pthread_mutex_unlock(&palette_lock);
957 #endif
958 }
959
960
961 /*
962 * Suspend/resume emulator
963 */
964
965 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
966 static void suspend_emul(void)
967 {
968 if (display_type == DISPLAY_DGA) {
969 // Release ctrl key
970 ADBKeyUp(0x36);
971 ctrl_down = false;
972
973 #ifdef HAVE_PTHREADS
974 // Lock frame buffer (this will stop the MacOS thread)
975 pthread_mutex_lock(&frame_buffer_lock);
976 #endif
977
978 // Save frame buffer
979 fb_save = malloc(VideoMonitor.y * VideoMonitor.bytes_per_row);
980 if (fb_save)
981 memcpy(fb_save, the_buffer, VideoMonitor.y * VideoMonitor.bytes_per_row);
982
983 // Close full screen display
984 #ifdef ENABLE_XF86_DGA
985 XF86DGADirectVideo(x_display, screen, 0);
986 #endif
987 XUngrabPointer(x_display, CurrentTime);
988 XUngrabKeyboard(x_display, CurrentTime);
989 XUnmapWindow(x_display, the_win);
990 XSync(x_display, false);
991
992 // Open "suspend" window
993 XSetWindowAttributes wattr;
994 wattr.event_mask = KeyPressMask;
995 wattr.background_pixel = black_pixel;
996 wattr.border_pixel = black_pixel;
997 wattr.backing_store = Always;
998 wattr.backing_planes = xdepth;
999 wattr.colormap = DefaultColormap(x_display, screen);
1000
1001 XSync(x_display, false);
1002 suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth,
1003 InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel |
1004 CWBackingStore | CWBackingPlanes | (xdepth == 8 ? CWColormap : 0), &wattr);
1005 XSync(x_display, false);
1006 XStoreName(x_display, suspend_win, GetString(STR_SUSPEND_WINDOW_TITLE));
1007 XMapRaised(x_display, suspend_win);
1008 XSync(x_display, false);
1009 emul_suspended = true;
1010 }
1011 }
1012
1013 static void resume_emul(void)
1014 {
1015 // Close "suspend" window
1016 XDestroyWindow(x_display, suspend_win);
1017 XSync(x_display, false);
1018
1019 // Reopen full screen display
1020 XMapRaised(x_display, the_win);
1021 XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0);
1022 XSync(x_display, false);
1023 XGrabKeyboard(x_display, rootwin, 1, GrabModeAsync, GrabModeAsync, CurrentTime);
1024 XGrabPointer(x_display, rootwin, 1, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
1025 #ifdef ENABLE_XF86_DGA
1026 XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
1027 XF86DGASetViewPort(x_display, screen, 0, 0);
1028 #endif
1029 XSync(x_display, false);
1030
1031 // Restore frame buffer
1032 if (fb_save) {
1033 memcpy(the_buffer, fb_save, VideoMonitor.y * VideoMonitor.bytes_per_row);
1034 free(fb_save);
1035 fb_save = NULL;
1036 }
1037
1038 #ifdef ENABLE_XF86_DGA
1039 if (depth == 8)
1040 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
1041 #endif
1042
1043 #ifdef HAVE_PTHREADS
1044 // Unlock frame buffer (and continue MacOS thread)
1045 pthread_mutex_unlock(&frame_buffer_lock);
1046 emul_suspended = false;
1047 #endif
1048 }
1049 #endif
1050
1051
1052 /*
1053 * Translate key event to Mac keycode
1054 */
1055
1056 static int kc_decode(KeySym ks)
1057 {
1058 switch (ks) {
1059 case XK_A: case XK_a: return 0x00;
1060 case XK_B: case XK_b: return 0x0b;
1061 case XK_C: case XK_c: return 0x08;
1062 case XK_D: case XK_d: return 0x02;
1063 case XK_E: case XK_e: return 0x0e;
1064 case XK_F: case XK_f: return 0x03;
1065 case XK_G: case XK_g: return 0x05;
1066 case XK_H: case XK_h: return 0x04;
1067 case XK_I: case XK_i: return 0x22;
1068 case XK_J: case XK_j: return 0x26;
1069 case XK_K: case XK_k: return 0x28;
1070 case XK_L: case XK_l: return 0x25;
1071 case XK_M: case XK_m: return 0x2e;
1072 case XK_N: case XK_n: return 0x2d;
1073 case XK_O: case XK_o: return 0x1f;
1074 case XK_P: case XK_p: return 0x23;
1075 case XK_Q: case XK_q: return 0x0c;
1076 case XK_R: case XK_r: return 0x0f;
1077 case XK_S: case XK_s: return 0x01;
1078 case XK_T: case XK_t: return 0x11;
1079 case XK_U: case XK_u: return 0x20;
1080 case XK_V: case XK_v: return 0x09;
1081 case XK_W: case XK_w: return 0x0d;
1082 case XK_X: case XK_x: return 0x07;
1083 case XK_Y: case XK_y: return 0x10;
1084 case XK_Z: case XK_z: return 0x06;
1085
1086 case XK_1: case XK_exclam: return 0x12;
1087 case XK_2: case XK_at: return 0x13;
1088 case XK_3: case XK_numbersign: return 0x14;
1089 case XK_4: case XK_dollar: return 0x15;
1090 case XK_5: case XK_percent: return 0x17;
1091 case XK_6: return 0x16;
1092 case XK_7: return 0x1a;
1093 case XK_8: return 0x1c;
1094 case XK_9: return 0x19;
1095 case XK_0: return 0x1d;
1096
1097 case XK_grave: case XK_asciitilde: return 0x0a;
1098 case XK_minus: case XK_underscore: return 0x1b;
1099 case XK_equal: case XK_plus: return 0x18;
1100 case XK_bracketleft: case XK_braceleft: return 0x21;
1101 case XK_bracketright: case XK_braceright: return 0x1e;
1102 case XK_backslash: case XK_bar: return 0x2a;
1103 case XK_semicolon: case XK_colon: return 0x29;
1104 case XK_apostrophe: case XK_quotedbl: return 0x27;
1105 case XK_comma: case XK_less: return 0x2b;
1106 case XK_period: case XK_greater: return 0x2f;
1107 case XK_slash: case XK_question: return 0x2c;
1108
1109 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1110 case XK_Tab: if (ctrl_down) {suspend_emul(); return -1;} else return 0x30;
1111 #else
1112 case XK_Tab: return 0x30;
1113 #endif
1114 case XK_Return: return 0x24;
1115 case XK_space: return 0x31;
1116 case XK_BackSpace: return 0x33;
1117
1118 case XK_Delete: return 0x75;
1119 case XK_Insert: return 0x72;
1120 case XK_Home: case XK_Help: return 0x73;
1121 case XK_End: return 0x77;
1122 #ifdef __hpux
1123 case XK_Prior: return 0x74;
1124 case XK_Next: return 0x79;
1125 #else
1126 case XK_Page_Up: return 0x74;
1127 case XK_Page_Down: return 0x79;
1128 #endif
1129
1130 case XK_Control_L: return 0x36;
1131 case XK_Control_R: return 0x36;
1132 case XK_Shift_L: return 0x38;
1133 case XK_Shift_R: return 0x38;
1134 case XK_Alt_L: return 0x37;
1135 case XK_Alt_R: return 0x37;
1136 case XK_Meta_L: return 0x3a;
1137 case XK_Meta_R: return 0x3a;
1138 case XK_Menu: return 0x32;
1139 case XK_Caps_Lock: return 0x39;
1140 case XK_Num_Lock: return 0x47;
1141
1142 case XK_Up: return 0x3e;
1143 case XK_Down: return 0x3d;
1144 case XK_Left: return 0x3b;
1145 case XK_Right: return 0x3c;
1146
1147 case XK_Escape: if (ctrl_down) {quit_full_screen = true; emerg_quit = true; return -1;} else return 0x35;
1148
1149 case XK_F1: if (ctrl_down) {SysMountFirstFloppy(); return -1;} else return 0x7a;
1150 case XK_F2: return 0x78;
1151 case XK_F3: return 0x63;
1152 case XK_F4: return 0x76;
1153 case XK_F5: return 0x60;
1154 case XK_F6: return 0x61;
1155 case XK_F7: return 0x62;
1156 case XK_F8: return 0x64;
1157 case XK_F9: return 0x65;
1158 case XK_F10: return 0x6d;
1159 case XK_F11: return 0x67;
1160 case XK_F12: return 0x6f;
1161
1162 case XK_Print: return 0x69;
1163 case XK_Scroll_Lock: return 0x6b;
1164 case XK_Pause: return 0x71;
1165
1166 #if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End)
1167 case XK_KP_0: case XK_KP_Insert: return 0x52;
1168 case XK_KP_1: case XK_KP_End: return 0x53;
1169 case XK_KP_2: case XK_KP_Down: return 0x54;
1170 case XK_KP_3: case XK_KP_Next: return 0x55;
1171 case XK_KP_4: case XK_KP_Left: return 0x56;
1172 case XK_KP_5: case XK_KP_Begin: return 0x57;
1173 case XK_KP_6: case XK_KP_Right: return 0x58;
1174 case XK_KP_7: case XK_KP_Home: return 0x59;
1175 case XK_KP_8: case XK_KP_Up: return 0x5b;
1176 case XK_KP_9: case XK_KP_Prior: return 0x5c;
1177 case XK_KP_Decimal: case XK_KP_Delete: return 0x41;
1178 #else
1179 case XK_KP_0: return 0x52;
1180 case XK_KP_1: return 0x53;
1181 case XK_KP_2: return 0x54;
1182 case XK_KP_3: return 0x55;
1183 case XK_KP_4: return 0x56;
1184 case XK_KP_5: return 0x57;
1185 case XK_KP_6: return 0x58;
1186 case XK_KP_7: return 0x59;
1187 case XK_KP_8: return 0x5b;
1188 case XK_KP_9: return 0x5c;
1189 case XK_KP_Decimal: return 0x41;
1190 #endif
1191 case XK_KP_Add: return 0x45;
1192 case XK_KP_Subtract: return 0x4e;
1193 case XK_KP_Multiply: return 0x43;
1194 case XK_KP_Divide: return 0x4b;
1195 case XK_KP_Enter: return 0x4c;
1196 case XK_KP_Equal: return 0x51;
1197 }
1198 return -1;
1199 }
1200
1201 static int event2keycode(XKeyEvent *ev)
1202 {
1203 KeySym ks;
1204 int as;
1205 int i = 0;
1206
1207 do {
1208 ks = XLookupKeysym(ev, i++);
1209 as = kc_decode(ks);
1210 if (as != -1)
1211 return as;
1212 } while (ks != NoSymbol);
1213
1214 return -1;
1215 }
1216
1217
1218 /*
1219 * X event handling
1220 */
1221
1222 static void handle_events(void)
1223 {
1224 XEvent event;
1225 for (;;) {
1226 if (!XCheckMaskEvent(x_display, eventmask, &event))
1227 break;
1228
1229 switch (event.type) {
1230 // Mouse button
1231 case ButtonPress: {
1232 unsigned int button = ((XButtonEvent *)&event)->button;
1233 if (button < 4)
1234 ADBMouseDown(button - 1);
1235 else if (button < 6) { // Wheel mouse
1236 if (mouse_wheel_mode == 0) {
1237 int key = (button == 5) ? 0x79 : 0x74; // Page up/down
1238 ADBKeyDown(key);
1239 ADBKeyUp(key);
1240 } else {
1241 int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down
1242 for(int i=0; i<mouse_wheel_lines; i++) {
1243 ADBKeyDown(key);
1244 ADBKeyUp(key);
1245 }
1246 }
1247 }
1248 break;
1249 }
1250 case ButtonRelease: {
1251 unsigned int button = ((XButtonEvent *)&event)->button;
1252 if (button < 4)
1253 ADBMouseUp(button - 1);
1254 break;
1255 }
1256
1257 // Mouse moved
1258 case EnterNotify:
1259 ADBMouseMoved(((XMotionEvent *)&event)->x, ((XMotionEvent *)&event)->y);
1260 break;
1261 case MotionNotify:
1262 ADBMouseMoved(((XMotionEvent *)&event)->x, ((XMotionEvent *)&event)->y);
1263 break;
1264
1265 // Keyboard
1266 case KeyPress: {
1267 int code;
1268 if (use_keycodes) {
1269 event2keycode((XKeyEvent *)&event); // This is called to process the hotkeys
1270 code = keycode_table[((XKeyEvent *)&event)->keycode & 0xff];
1271 } else
1272 code = event2keycode((XKeyEvent *)&event);
1273 if (code != -1) {
1274 if (!emul_suspended) {
1275 if (code == 0x39) { // Caps Lock pressed
1276 if (caps_on) {
1277 ADBKeyUp(code);
1278 caps_on = false;
1279 } else {
1280 ADBKeyDown(code);
1281 caps_on = true;
1282 }
1283 } else
1284 ADBKeyDown(code);
1285 if (code == 0x36)
1286 ctrl_down = true;
1287 } else {
1288 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1289 if (code == 0x31)
1290 resume_emul(); // Space wakes us up
1291 #endif
1292 }
1293 }
1294 break;
1295 }
1296 case KeyRelease: {
1297 int code;
1298 if (use_keycodes) {
1299 event2keycode((XKeyEvent *)&event); // This is called to process the hotkeys
1300 code = keycode_table[((XKeyEvent *)&event)->keycode & 0xff];
1301 } else
1302 code = event2keycode((XKeyEvent *)&event);
1303 if (code != -1 && code != 0x39) { // Don't propagate Caps Lock releases
1304 ADBKeyUp(code);
1305 if (code == 0x36)
1306 ctrl_down = false;
1307 }
1308 break;
1309 }
1310
1311 // Hidden parts exposed, force complete refresh of window
1312 case Expose:
1313 if (display_type == DISPLAY_WINDOW) {
1314 int x1, y1;
1315 for (y1=0; y1<16; y1++)
1316 for (x1=0; x1<16; x1++)
1317 updt_box[x1][y1] = true;
1318 nr_boxes = 16 * 16;
1319 }
1320 break;
1321 }
1322 }
1323 }
1324
1325
1326 /*
1327 * Window display update
1328 */
1329
1330 static void update_display(int ticker)
1331 {
1332 int y1, y2, y2s, y2a, i, x1, xm, xmo, ymo, yo, yi, yil, xic, xicl, xi;
1333 int xil = 0;
1334 int rxm = 0, rxmo = 0;
1335 int bytes_per_row = VideoMonitor.bytes_per_row;
1336 int bytes_per_pixel = VideoMonitor.bytes_per_row / VideoMonitor.x;
1337 int rx = VideoMonitor.bytes_per_row / 16;
1338 int ry = VideoMonitor.y / 16;
1339 int max_box;
1340
1341 y2s = sm_uptd[ticker % 8];
1342 y2a = 8;
1343 for (i = 0; i < 6; i++)
1344 if (ticker % (2 << i))
1345 break;
1346 max_box = sm_no_boxes[i];
1347
1348 if (y2a) {
1349 for (y1=0; y1<16; y1++) {
1350 for (y2=y2s; y2 < ry; y2 += y2a) {
1351 i = ((y1 * ry) + y2) * bytes_per_row;
1352 for (x1=0; x1<16; x1++, i += rx) {
1353 if (updt_box[x1][y1] == false) {
1354 if (memcmp(&the_buffer_copy[i], &the_buffer[i], rx)) {
1355 updt_box[x1][y1] = true;
1356 nr_boxes++;
1357 }
1358 }
1359 }
1360 }
1361 }
1362 }
1363
1364 if ((nr_boxes <= max_box) && (nr_boxes)) {
1365 for (y1=0; y1<16; y1++) {
1366 for (x1=0; x1<16; x1++) {
1367 if (updt_box[x1][y1] == true) {
1368 if (rxm == 0)
1369 xm = x1;
1370 rxm += rx;
1371 updt_box[x1][y1] = false;
1372 }
1373 if (((updt_box[x1+1][y1] == false) || (x1 == 15)) && (rxm)) {
1374 if ((rxmo != rxm) || (xmo != xm) || (yo != y1 - 1)) {
1375 if (rxmo) {
1376 xi = xmo * rx;
1377 yi = ymo * ry;
1378 xil = rxmo;
1379 yil = (yo - ymo +1) * ry;
1380 }
1381 rxmo = rxm;
1382 xmo = xm;
1383 ymo = y1;
1384 }
1385 rxm = 0;
1386 yo = y1;
1387 }
1388 if (xil) {
1389 i = (yi * bytes_per_row) + xi;
1390 for (y2=0; y2 < yil; y2++, i += bytes_per_row)
1391 memcpy(&the_buffer_copy[i], &the_buffer[i], xil);
1392 if (depth == 1) {
1393 if (have_shm)
1394 XShmPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil, 0);
1395 else
1396 XPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil);
1397 } else {
1398 if (have_shm)
1399 XShmPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil, 0);
1400 else
1401 XPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil);
1402 }
1403 xil = 0;
1404 }
1405 if ((x1 == 15) && (y1 == 15) && (rxmo)) {
1406 x1--;
1407 xi = xmo * rx;
1408 yi = ymo * ry;
1409 xil = rxmo;
1410 yil = (yo - ymo +1) * ry;
1411 rxmo = 0;
1412 }
1413 }
1414 }
1415 nr_boxes = 0;
1416 }
1417 }
1418
1419
1420 /*
1421 * Thread for screen refresh, input handling etc.
1422 */
1423
1424 void VideoRefresh(void)
1425 {
1426 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1427 // Quit DGA mode if requested
1428 if (quit_full_screen) {
1429 quit_full_screen = false;
1430 if (display_type == DISPLAY_DGA) {
1431 #ifdef ENABLE_XF86_DGA
1432 XF86DGADirectVideo(x_display, screen, 0);
1433 #endif
1434 XUngrabPointer(x_display, CurrentTime);
1435 XUngrabKeyboard(x_display, CurrentTime);
1436 XUnmapWindow(x_display, the_win);
1437 XSync(x_display, false);
1438 }
1439 }
1440 #endif
1441
1442 // Handle X events
1443 handle_events();
1444
1445 // Handle palette changes
1446 #ifdef HAVE_PTHREADS
1447 pthread_mutex_lock(&palette_lock);
1448 #endif
1449 if (palette_changed) {
1450 palette_changed = false;
1451 if (depth == 8) {
1452 XStoreColors(x_display, cmap[0], palette, 256);
1453 XStoreColors(x_display, cmap[1], palette, 256);
1454
1455 #ifdef ENABLE_XF86_DGA
1456 if (display_type == DISPLAY_DGA) {
1457 current_dga_cmap ^= 1;
1458 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
1459 }
1460 #endif
1461 }
1462 }
1463 #ifdef HAVE_PTHREADS
1464 pthread_mutex_unlock(&palette_lock);
1465 #endif
1466
1467 // In window mode, update display
1468 static int tick_counter = 0;
1469 if (display_type == DISPLAY_WINDOW) {
1470 tick_counter++;
1471 update_display(tick_counter);
1472 }
1473 }
1474
1475 #ifdef HAVE_PTHREADS
1476 static void *redraw_func(void *arg)
1477 {
1478 while (!redraw_thread_cancel) {
1479 #ifdef HAVE_NANOSLEEP
1480 struct timespec req = {0, 16666667};
1481 nanosleep(&req, NULL);
1482 #else
1483 usleep(16667);
1484 #endif
1485 VideoRefresh();
1486 }
1487 return NULL;
1488 }
1489 #endif