ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/Unix/video_x.cpp
Revision: 1.40
Committed: 2001-06-27T19:03:37Z (23 years, 5 months ago) by cebix
Branch: MAIN
Changes since 1.39: +50 -37 lines
Log Message:
added infrastructure for resolution/depth switching (currently, all video
drivers only support one mode, the one selected by the user)

File Contents

# Content
1 /*
2 * video_x.cpp - Video/graphics emulation, X11 specific stuff
3 *
4 * Basilisk II (C) 1997-2001 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 #ifdef ENABLE_VOSF
56 # include <fcntl.h>
57 # include <sys/mman.h>
58 # include "sigsegv.h"
59 # include "vm_alloc.h"
60 #endif
61
62 #include "cpu_emulation.h"
63 #include "main.h"
64 #include "adb.h"
65 #include "macos_util.h"
66 #include "prefs.h"
67 #include "user_strings.h"
68 #include "video.h"
69
70 #define DEBUG 0
71 #include "debug.h"
72
73
74 // Display types
75 enum {
76 DISPLAY_WINDOW, // X11 window, using MIT SHM extensions if possible
77 DISPLAY_DGA // DGA fullscreen display
78 };
79
80 // Constants
81 const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes";
82 const char FBDEVICES_FILE_NAME[] = DATADIR "/fbdevices";
83
84
85 // Global variables
86 static int32 frame_skip; // Prefs items
87 static int16 mouse_wheel_mode = 1;
88 static int16 mouse_wheel_lines = 3;
89
90 static int display_type = DISPLAY_WINDOW; // See enum above
91 static bool local_X11; // Flag: X server running on local machine?
92 static uint8 *the_buffer; // Mac frame buffer
93
94 #ifdef HAVE_PTHREADS
95 static bool redraw_thread_active = false; // Flag: Redraw thread installed
96 static volatile bool redraw_thread_cancel = false; // Flag: Cancel Redraw thread
97 static pthread_t redraw_thread; // Redraw thread
98 #endif
99
100 static bool has_dga = false; // Flag: Video DGA capable
101 static bool has_vidmode = false; // Flag: VidMode extension available
102
103 static bool ctrl_down = false; // Flag: Ctrl key pressed
104 static bool caps_on = false; // Flag: Caps Lock on
105 static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread
106 static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread
107 static bool emul_suspended = false; // Flag: Emulator suspended
108
109 static bool classic_mode = false; // Flag: Classic Mac video mode
110
111 static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms
112 static int keycode_table[256]; // X keycode -> Mac keycode translation table
113
114 // X11 variables
115 static int screen; // Screen number
116 static int xdepth; // Depth of X screen
117 static int depth; // Depth of Mac frame buffer
118 static Window rootwin, the_win; // Root window and our window
119 static XVisualInfo visualInfo;
120 static Visual *vis;
121 static Colormap cmap[2]; // Two colormaps (DGA) for 8-bit mode
122 static XColor black, white;
123 static unsigned long black_pixel, white_pixel;
124 static int eventmask;
125 static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask;
126 static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask;
127 static Atom WM_DELETE_WINDOW = (Atom)0;
128
129 static XColor palette[256]; // Color palette for 8-bit mode
130 static bool palette_changed = false; // Flag: Palette changed, redraw thread must set new colors
131 #ifdef HAVE_PTHREADS
132 static pthread_mutex_t palette_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect palette
133 #define LOCK_PALETTE pthread_mutex_lock(&palette_lock)
134 #define UNLOCK_PALETTE pthread_mutex_unlock(&palette_lock)
135 #else
136 #define LOCK_PALETTE
137 #define UNLOCK_PALETTE
138 #endif
139
140 // Variables for window mode
141 static GC the_gc;
142 static XImage *img = NULL;
143 static XShmSegmentInfo shminfo;
144 static Cursor mac_cursor;
145 static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer
146 static bool have_shm = false; // Flag: SHM extensions available
147 static bool updt_box[17][17]; // Flag for Update
148 static int nr_boxes;
149 static const int sm_uptd[] = {4,1,6,3,0,5,2,7};
150 static int sm_no_boxes[] = {1,8,32,64,128,300};
151
152 // Variables for XF86 DGA mode
153 static int current_dga_cmap; // Number (0 or 1) of currently installed DGA colormap
154 static Window suspend_win; // "Suspend" window
155 static void *fb_save = NULL; // Saved frame buffer for suspend
156 #ifdef HAVE_PTHREADS
157 static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer
158 #define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock);
159 #define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock);
160 #else
161 #define LOCK_FRAME_BUFFER
162 #define UNLOCK_FRAME_BUFFER
163 #endif
164
165 // Variables for fbdev DGA mode
166 const char FBDEVICE_FILE_NAME[] = "/dev/fb";
167 static int fbdev_fd;
168
169 #ifdef ENABLE_XF86_VIDMODE
170 // Variables for XF86 VidMode support
171 static XF86VidModeModeInfo **x_video_modes; // Array of all available modes
172 static int num_x_video_modes;
173 #endif
174
175 #ifdef ENABLE_VOSF
176 static bool use_vosf = true; // Flag: VOSF enabled
177 #else
178 static const bool use_vosf = false; // Flag: VOSF enabled
179 #endif
180
181 #ifdef ENABLE_VOSF
182 // Variables for Video on SEGV support (taken from the Win32 port)
183 static uint8 *the_host_buffer; // Host frame buffer in VOSF mode
184 static uint32 the_buffer_size; // Size of allocated the_buffer
185
186 struct ScreenPageInfo {
187 int top, bottom; // Mapping between this virtual page and Mac scanlines
188 };
189
190 struct ScreenInfo {
191 uintptr memBase; // Real start address
192 uintptr memStart; // Start address aligned to page boundary
193 uintptr memEnd; // Address of one-past-the-end of the screen
194 uint32 memLength; // Length of the memory addressed by the screen pages
195
196 uint32 pageSize; // Size of a page
197 int pageBits; // Shift count to get the page number
198 uint32 pageCount; // Number of pages allocated to the screen
199
200 bool dirty; // Flag: set if the frame buffer was touched
201 char * dirtyPages; // Table of flags set if page was altered
202 ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines
203 };
204
205 static ScreenInfo mainBuffer;
206
207 #define PFLAG_SET_VALUE 0x00
208 #define PFLAG_CLEAR_VALUE 0x01
209 #define PFLAG_SET_VALUE_4 0x00000000
210 #define PFLAG_CLEAR_VALUE_4 0x01010101
211 #define PFLAG_SET(page) mainBuffer.dirtyPages[page] = PFLAG_SET_VALUE
212 #define PFLAG_CLEAR(page) mainBuffer.dirtyPages[page] = PFLAG_CLEAR_VALUE
213 #define PFLAG_ISSET(page) (mainBuffer.dirtyPages[page] == PFLAG_SET_VALUE)
214 #define PFLAG_ISCLEAR(page) (mainBuffer.dirtyPages[page] != PFLAG_SET_VALUE)
215
216 #ifdef UNALIGNED_PROFITABLE
217 # define PFLAG_ISSET_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_SET_VALUE_4)
218 # define PFLAG_ISCLEAR_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_CLEAR_VALUE_4)
219 #else
220 # define PFLAG_ISSET_4(page) \
221 PFLAG_ISSET(page ) && PFLAG_ISSET(page+1) \
222 && PFLAG_ISSET(page+2) && PFLAG_ISSET(page+3)
223 # define PFLAG_ISCLEAR_4(page) \
224 PFLAG_ISCLEAR(page ) && PFLAG_ISCLEAR(page+1) \
225 && PFLAG_ISCLEAR(page+2) && PFLAG_ISCLEAR(page+3)
226 #endif
227
228 // Set the selected page range [ first_page, last_page [ into the SET state
229 #define PFLAG_SET_RANGE(first_page, last_page) \
230 memset(mainBuffer.dirtyPages + (first_page), PFLAG_SET_VALUE, \
231 (last_page) - (first_page))
232
233 // Set the selected page range [ first_page, last_page [ into the CLEAR state
234 #define PFLAG_CLEAR_RANGE(first_page, last_page) \
235 memset(mainBuffer.dirtyPages + (first_page), PFLAG_CLEAR_VALUE, \
236 (last_page) - (first_page))
237
238 #define PFLAG_SET_ALL do { \
239 PFLAG_SET_RANGE(0, mainBuffer.pageCount); \
240 mainBuffer.dirty = true; \
241 } while (0)
242
243 #define PFLAG_CLEAR_ALL do { \
244 PFLAG_CLEAR_RANGE(0, mainBuffer.pageCount); \
245 mainBuffer.dirty = false; \
246 } while (0)
247
248 // Set the following macro definition to 1 if your system
249 // provides a really fast strchr() implementation
250 //#define HAVE_FAST_STRCHR 0
251
252 static inline int find_next_page_set(int page)
253 {
254 #if HAVE_FAST_STRCHR
255 char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_SET_VALUE);
256 return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount;
257 #else
258 while (PFLAG_ISCLEAR_4(page))
259 page += 4;
260 while (PFLAG_ISCLEAR(page))
261 page++;
262 return page;
263 #endif
264 }
265
266 static inline int find_next_page_clear(int page)
267 {
268 #if HAVE_FAST_STRCHR
269 char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_CLEAR_VALUE);
270 return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount;
271 #else
272 while (PFLAG_ISSET_4(page))
273 page += 4;
274 while (PFLAG_ISSET(page))
275 page++;
276 return page;
277 #endif
278 }
279
280 static int zero_fd = -1;
281
282 #ifdef HAVE_PTHREADS
283 static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact)
284 #define LOCK_VOSF pthread_mutex_lock(&vosf_lock);
285 #define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock);
286 #else
287 #define LOCK_VOSF
288 #define UNLOCK_VOSF
289 #endif
290
291 static int log_base_2(uint32 x)
292 {
293 uint32 mask = 0x80000000;
294 int l = 31;
295 while (l >= 0 && (x & mask) == 0) {
296 mask >>= 1;
297 l--;
298 }
299 return l;
300 }
301 #endif /* ENABLE_VOSF */
302
303 // VideoRefresh function
304 void VideoRefreshInit(void);
305 static void (*video_refresh)(void);
306
307 // Prototypes
308 static void *redraw_func(void *arg);
309 static int event2keycode(XKeyEvent &ev);
310
311
312 // From main_unix.cpp
313 extern char *x_display_name;
314 extern Display *x_display;
315
316 // From sys_unix.cpp
317 extern void SysMountFirstFloppy(void);
318
319 #ifdef ENABLE_VOSF
320 # include "video_vosf.h"
321 #endif
322
323
324 /*
325 * Initialization
326 */
327
328 // Add resolution to list of supported modes and set VideoMonitor
329 static void set_video_monitor(uint32 width, uint32 height, uint32 bytes_per_row, bool native_byte_order)
330 {
331 video_mode mode;
332 #if !REAL_ADDRESSING && !DIRECT_ADDRESSING
333 int layout = FLAYOUT_DIRECT;
334 switch (depth) {
335 case 1:
336 layout = FLAYOUT_DIRECT;
337 break;
338 case 8:
339 layout = FLAYOUT_DIRECT;
340 break;
341 case 15:
342 layout = FLAYOUT_HOST_555;
343 break;
344 case 16:
345 layout = FLAYOUT_HOST_565;
346 break;
347 case 24:
348 case 32:
349 layout = FLAYOUT_HOST_888;
350 break;
351 }
352 if (native_byte_order)
353 MacFrameLayout = layout;
354 else
355 MacFrameLayout = FLAYOUT_DIRECT;
356 #endif
357
358 mode.x = width;
359 mode.y = height;
360 mode.resolution_id = 0x80;
361 mode.bytes_per_row = bytes_per_row;
362
363 switch (depth) {
364 case 1:
365 mode.depth = VDEPTH_1BIT;
366 break;
367 case 2:
368 mode.depth = VDEPTH_2BIT;
369 break;
370 case 4:
371 mode.depth = VDEPTH_4BIT;
372 break;
373 case 8:
374 mode.depth = VDEPTH_8BIT;
375 break;
376 case 15:
377 mode.depth = VDEPTH_16BIT;
378 break;
379 case 16:
380 mode.depth = VDEPTH_16BIT;
381 break;
382 case 24:
383 case 32:
384 mode.depth = VDEPTH_32BIT;
385 break;
386 }
387
388 VideoModes.push_back(mode);
389 VideoMonitor.mode = mode;
390 }
391
392 // Set window name and class
393 static void set_window_name(Window w, int name)
394 {
395 const char *str = GetString(name);
396 XStoreName(x_display, w, str);
397 XSetIconName(x_display, w, str);
398
399 XClassHint *hints;
400 hints = XAllocClassHint();
401 if (hints) {
402 hints->res_name = "BasiliskII";
403 hints->res_class = "BasiliskII";
404 XSetClassHint(x_display, w, hints);
405 XFree(hints);
406 }
407 }
408
409 // Set window input focus flag
410 static void set_window_focus(Window w)
411 {
412 XWMHints *hints = XAllocWMHints();
413 if (hints) {
414 hints->input = True;
415 hints->initial_state = NormalState;
416 hints->flags = InputHint | StateHint;
417 XSetWMHints(x_display, w, hints);
418 XFree(hints);
419 }
420 }
421
422 // Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget)
423 static void set_window_delete_protocol(Window w)
424 {
425 WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false);
426 XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1);
427 }
428
429 // Wait until window is mapped/unmapped
430 void wait_mapped(Window w)
431 {
432 XEvent e;
433 do {
434 XMaskEvent(x_display, StructureNotifyMask, &e);
435 } while ((e.type != MapNotify) || (e.xmap.event != w));
436 }
437
438 void wait_unmapped(Window w)
439 {
440 XEvent e;
441 do {
442 XMaskEvent(x_display, StructureNotifyMask, &e);
443 } while ((e.type != UnmapNotify) || (e.xmap.event != w));
444 }
445
446 // Trap SHM errors
447 static bool shm_error = false;
448 static int (*old_error_handler)(Display *, XErrorEvent *);
449
450 static int error_handler(Display *d, XErrorEvent *e)
451 {
452 if (e->error_code == BadAccess) {
453 shm_error = true;
454 return 0;
455 } else
456 return old_error_handler(d, e);
457 }
458
459 // Init window mode
460 static bool init_window(int width, int height)
461 {
462 int aligned_width = (width + 15) & ~15;
463 int aligned_height = (height + 15) & ~15;
464
465 // Set absolute mouse mode
466 ADBSetRelMouseMode(false);
467
468 // Read frame skip prefs
469 frame_skip = PrefsFindInt32("frameskip");
470
471 // Create window
472 XSetWindowAttributes wattr;
473 wattr.event_mask = eventmask = win_eventmask;
474 wattr.background_pixel = black_pixel;
475 wattr.colormap = cmap[0];
476
477 the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
478 InputOutput, vis, CWEventMask | CWBackPixel | (depth == 8 ? CWColormap : 0), &wattr);
479
480 // Set window name/class
481 set_window_name(the_win, STR_WINDOW_TITLE);
482
483 // Indicate that we want keyboard input
484 set_window_focus(the_win);
485
486 // Set delete protocol property
487 set_window_delete_protocol(the_win);
488
489 // Make window unresizable
490 {
491 XSizeHints *hints = XAllocSizeHints();
492 if (hints) {
493 hints->min_width = width;
494 hints->max_width = width;
495 hints->min_height = height;
496 hints->max_height = height;
497 hints->flags = PMinSize | PMaxSize;
498 XSetWMNormalHints(x_display, the_win, hints);
499 XFree(hints);
500 }
501 }
502
503 // Show window
504 XMapWindow(x_display, the_win);
505 wait_mapped(the_win);
506
507 // Try to create and attach SHM image
508 have_shm = false;
509 if (depth != 1 && local_X11 && XShmQueryExtension(x_display)) {
510
511 // Create SHM image ("height + 2" for safety)
512 img = XShmCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height);
513 shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777);
514 the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0);
515 shminfo.shmaddr = img->data = (char *)the_buffer_copy;
516 shminfo.readOnly = False;
517
518 // Try to attach SHM image, catching errors
519 shm_error = false;
520 old_error_handler = XSetErrorHandler(error_handler);
521 XShmAttach(x_display, &shminfo);
522 XSync(x_display, false);
523 XSetErrorHandler(old_error_handler);
524 if (shm_error) {
525 shmdt(shminfo.shmaddr);
526 XDestroyImage(img);
527 shminfo.shmid = -1;
528 } else {
529 have_shm = true;
530 shmctl(shminfo.shmid, IPC_RMID, 0);
531 }
532 }
533
534 // Create normal X image if SHM doesn't work ("height + 2" for safety)
535 if (!have_shm) {
536 int bytes_per_row = aligned_width;
537 switch (depth) {
538 case 1:
539 bytes_per_row /= 8;
540 break;
541 case 15:
542 case 16:
543 bytes_per_row *= 2;
544 break;
545 case 24:
546 case 32:
547 bytes_per_row *= 4;
548 break;
549 }
550 the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row);
551 img = XCreateImage(x_display, vis, depth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row);
552 }
553
554 // 1-Bit mode is big-endian
555 if (depth == 1) {
556 img->byte_order = MSBFirst;
557 img->bitmap_bit_order = MSBFirst;
558 }
559
560 #ifdef ENABLE_VOSF
561 // Allocate memory for frame buffer (SIZE is extended to page-boundary)
562 the_host_buffer = the_buffer_copy;
563 the_buffer_size = page_extend((aligned_height + 2) * img->bytes_per_line);
564 the_buffer_copy = (uint8 *)vm_acquire(the_buffer_size);
565 the_buffer = (uint8 *)vm_acquire(the_buffer_size);
566 #else
567 // Allocate memory for frame buffer
568 the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line);
569 #endif
570
571 // Create GC
572 the_gc = XCreateGC(x_display, the_win, 0, 0);
573 XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes);
574
575 // Create no_cursor
576 mac_cursor = XCreatePixmapCursor(x_display,
577 XCreatePixmap(x_display, the_win, 1, 1, 1),
578 XCreatePixmap(x_display, the_win, 1, 1, 1),
579 &black, &white, 0, 0);
580 XDefineCursor(x_display, the_win, mac_cursor);
581
582 // Add resolution and set VideoMonitor
583 bool native_byte_order;
584 #ifdef WORDS_BIGENDIAN
585 native_byte_order = (XImageByteOrder(x_display) == MSBFirst);
586 #else
587 native_byte_order = (XImageByteOrder(x_display) == LSBFirst);
588 #endif
589 #ifdef ENABLE_VOSF
590 Screen_blitter_init(&visualInfo, native_byte_order);
591 #endif
592 set_video_monitor(width, height, img->bytes_per_line, native_byte_order);
593
594 #if REAL_ADDRESSING || DIRECT_ADDRESSING
595 VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer);
596 #else
597 VideoMonitor.mac_frame_base = MacFrameBaseMac;
598 #endif
599 return true;
600 }
601
602 // Init fbdev DGA display
603 static bool init_fbdev_dga(char *in_fb_name)
604 {
605 #ifdef ENABLE_FBDEV_DGA
606 // Find the maximum depth available
607 int ndepths, max_depth(0);
608 int *depths = XListDepths(x_display, screen, &ndepths);
609 if (depths == NULL) {
610 printf("FATAL: Could not determine the maximal depth available\n");
611 return false;
612 } else {
613 while (ndepths-- > 0) {
614 if (depths[ndepths] > max_depth)
615 max_depth = depths[ndepths];
616 }
617 }
618
619 // Get fbdevices file path from preferences
620 const char *fbd_path = PrefsFindString("fbdevicefile");
621
622 // Open fbdevices file
623 FILE *fp = fopen(fbd_path ? fbd_path : FBDEVICES_FILE_NAME, "r");
624 if (fp == NULL) {
625 char str[256];
626 sprintf(str, GetString(STR_NO_FBDEVICE_FILE_ERR), fbd_path ? fbd_path : FBDEVICES_FILE_NAME, strerror(errno));
627 ErrorAlert(str);
628 return false;
629 }
630
631 int fb_depth; // supported depth
632 uint32 fb_offset; // offset used for mmap(2)
633 char fb_name[20];
634 char line[256];
635 bool device_found = false;
636 while (fgets(line, 255, fp)) {
637 // Read line
638 int len = strlen(line);
639 if (len == 0)
640 continue;
641 line[len - 1] = '\0';
642
643 // Comments begin with "#" or ";"
644 if ((line[0] == '#') || (line[0] == ';') || (line[0] == '\0'))
645 continue;
646
647 if ((sscanf(line, "%19s %d %x", &fb_name, &fb_depth, &fb_offset) == 3)
648 && (strcmp(fb_name, in_fb_name) == 0) && (fb_depth == max_depth)) {
649 device_found = true;
650 break;
651 }
652 }
653
654 // fbdevices file completely read
655 fclose(fp);
656
657 // Frame buffer name not found ? Then, display warning
658 if (!device_found) {
659 char str[256];
660 sprintf(str, GetString(STR_FBDEV_NAME_ERR), in_fb_name, max_depth);
661 ErrorAlert(str);
662 return false;
663 }
664
665 int width = DisplayWidth(x_display, screen);
666 int height = DisplayHeight(x_display, screen);
667 depth = fb_depth; // max_depth
668
669 // Set relative mouse mode
670 ADBSetRelMouseMode(false);
671
672 // Create window
673 XSetWindowAttributes wattr;
674 wattr.event_mask = eventmask = dga_eventmask;
675 wattr.background_pixel = white_pixel;
676 wattr.override_redirect = True;
677 wattr.colormap = cmap[0];
678
679 the_win = XCreateWindow(x_display, rootwin,
680 0, 0, width, height,
681 0, xdepth, InputOutput, vis,
682 CWEventMask | CWBackPixel | CWOverrideRedirect | (depth == 8 ? CWColormap : 0),
683 &wattr);
684
685 // Set window name/class
686 set_window_name(the_win, STR_WINDOW_TITLE);
687
688 // Indicate that we want keyboard input
689 set_window_focus(the_win);
690
691 // Show window
692 XMapRaised(x_display, the_win);
693 wait_mapped(the_win);
694
695 // Grab mouse and keyboard
696 XGrabKeyboard(x_display, the_win, True,
697 GrabModeAsync, GrabModeAsync, CurrentTime);
698 XGrabPointer(x_display, the_win, True,
699 PointerMotionMask | ButtonPressMask | ButtonReleaseMask,
700 GrabModeAsync, GrabModeAsync, the_win, None, CurrentTime);
701
702 // Set VideoMonitor
703 int bytes_per_row = width;
704 switch (depth) {
705 case 1:
706 bytes_per_row = ((width | 7) & ~7) >> 3;
707 break;
708 case 15:
709 case 16:
710 bytes_per_row *= 2;
711 break;
712 case 24:
713 case 32:
714 bytes_per_row *= 4;
715 break;
716 }
717
718 if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_PRIVATE, fbdev_fd, fb_offset)) == MAP_FAILED) {
719 if ((the_buffer = (uint8 *) mmap(NULL, height * bytes_per_row, PROT_READ | PROT_WRITE, MAP_SHARED, fbdev_fd, fb_offset)) == MAP_FAILED) {
720 char str[256];
721 sprintf(str, GetString(STR_FBDEV_MMAP_ERR), strerror(errno));
722 ErrorAlert(str);
723 return false;
724 }
725 }
726
727 #if ENABLE_VOSF
728 #if REAL_ADDRESSING || DIRECT_ADDRESSING
729 // Screen_blitter_init() returns TRUE if VOSF is mandatory
730 // i.e. the framebuffer update function is not Blit_Copy_Raw
731 use_vosf = Screen_blitter_init(&visualInfo, true);
732
733 if (use_vosf) {
734 // Allocate memory for frame buffer (SIZE is extended to page-boundary)
735 the_host_buffer = the_buffer;
736 the_buffer_size = page_extend((height + 2) * bytes_per_row);
737 the_buffer_copy = (uint8 *)vm_acquire(the_buffer_size);
738 the_buffer = (uint8 *)vm_acquire(the_buffer_size);
739 }
740 #else
741 use_vosf = false;
742 #endif
743 #endif
744
745 set_video_monitor(width, height, bytes_per_row, true);
746 #if REAL_ADDRESSING || DIRECT_ADDRESSING
747 VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer);
748 #else
749 VideoMonitor.mac_frame_base = MacFrameBaseMac;
750 #endif
751 return true;
752 #else
753 ErrorAlert("Basilisk II has been compiled with fbdev DGA support disabled.");
754 return false;
755 #endif
756 }
757
758 // Init XF86 DGA display
759 static bool init_xf86_dga(int width, int height)
760 {
761 #ifdef ENABLE_XF86_DGA
762 // Set relative mouse mode
763 ADBSetRelMouseMode(true);
764
765 #ifdef ENABLE_XF86_VIDMODE
766 // Switch to best mode
767 if (has_vidmode) {
768 int best = 0;
769 for (int i=1; i<num_x_video_modes; i++) {
770 if (x_video_modes[i]->hdisplay >= width && x_video_modes[i]->vdisplay >= height &&
771 x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) {
772 best = i;
773 }
774 }
775 XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]);
776 XF86VidModeSetViewPort(x_display, screen, 0, 0);
777 XSync(x_display, false);
778 }
779 #endif
780
781 // Create window
782 XSetWindowAttributes wattr;
783 wattr.event_mask = eventmask = dga_eventmask;
784 wattr.override_redirect = True;
785
786 the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
787 InputOutput, vis, CWEventMask | CWOverrideRedirect, &wattr);
788
789 // Set window name/class
790 set_window_name(the_win, STR_WINDOW_TITLE);
791
792 // Indicate that we want keyboard input
793 set_window_focus(the_win);
794
795 // Show window
796 XMapRaised(x_display, the_win);
797 wait_mapped(the_win);
798
799 // Establish direct screen connection
800 XMoveResizeWindow(x_display, the_win, 0, 0, width, height);
801 XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0);
802 XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime);
803 XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
804
805 int v_width, v_bank, v_size;
806 XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size);
807 XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
808 XF86DGASetViewPort(x_display, screen, 0, 0);
809 XF86DGASetVidPage(x_display, screen, 0);
810
811 // Set colormap
812 if (depth == 8) {
813 XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]);
814 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
815 }
816 XSync(x_display, false);
817
818 // Set VideoMonitor
819 int bytes_per_row = (v_width + 7) & ~7;
820 switch (depth) {
821 case 1:
822 bytes_per_row /= 8;
823 break;
824 case 15:
825 case 16:
826 bytes_per_row *= 2;
827 break;
828 case 24:
829 case 32:
830 bytes_per_row *= 4;
831 break;
832 }
833
834 #ifdef VIDEO_VOSF
835 #if REAL_ADDRESSING || DIRECT_ADDRESSING
836 // Screen_blitter_init() returns TRUE if VOSF is mandatory
837 // i.e. the framebuffer update function is not Blit_Copy_Raw
838 use_vosf = Screen_blitter_init(&visualInfo, true);
839
840 if (use_vosf) {
841 // Allocate memory for frame buffer (SIZE is extended to page-boundary)
842 the_host_buffer = the_buffer;
843 the_buffer_size = page_extend((height + 2) * bytes_per_row);
844 the_buffer_copy = (uint8 *)vm_acquire(the_buffer_size);
845 the_buffer = (uint8 *)vm_acquire(the_buffer_size);
846 }
847 #else
848 use_vosf = false;
849 #endif
850 #endif
851
852 set_video_monitor(width, height, bytes_per_row, true);
853 #if REAL_ADDRESSING || DIRECT_ADDRESSING
854 VideoMonitor.mac_frame_base = Host2MacAddr(the_buffer);
855 // MacFrameLayout = FLAYOUT_DIRECT;
856 #else
857 VideoMonitor.mac_frame_base = MacFrameBaseMac;
858 #endif
859 return true;
860 #else
861 ErrorAlert("Basilisk II has been compiled with XF86 DGA support disabled.");
862 return false;
863 #endif
864 }
865
866 // Init keycode translation table
867 static void keycode_init(void)
868 {
869 bool use_kc = PrefsFindBool("keycodes");
870 if (use_kc) {
871
872 // Get keycode file path from preferences
873 const char *kc_path = PrefsFindString("keycodefile");
874
875 // Open keycode table
876 FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r");
877 if (f == NULL) {
878 char str[256];
879 sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno));
880 WarningAlert(str);
881 return;
882 }
883
884 // Default translation table
885 for (int i=0; i<256; i++)
886 keycode_table[i] = -1;
887
888 // Search for server vendor string, then read keycodes
889 const char *vendor = ServerVendor(x_display);
890 bool vendor_found = false;
891 char line[256];
892 while (fgets(line, 255, f)) {
893 // Read line
894 int len = strlen(line);
895 if (len == 0)
896 continue;
897 line[len-1] = 0;
898
899 // Comments begin with "#" or ";"
900 if (line[0] == '#' || line[0] == ';' || line[0] == 0)
901 continue;
902
903 if (vendor_found) {
904 // Read keycode
905 int x_code, mac_code;
906 if (sscanf(line, "%d %d", &x_code, &mac_code) == 2)
907 keycode_table[x_code & 0xff] = mac_code;
908 else
909 break;
910 } else {
911 // Search for vendor string
912 if (strstr(vendor, line) == vendor)
913 vendor_found = true;
914 }
915 }
916
917 // Keycode file completely read
918 fclose(f);
919 use_keycodes = vendor_found;
920
921 // Vendor not found? Then display warning
922 if (!vendor_found) {
923 char str[256];
924 sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME);
925 WarningAlert(str);
926 return;
927 }
928 }
929 }
930
931 bool VideoInitBuffer()
932 {
933 #ifdef ENABLE_VOSF
934 if (use_vosf) {
935 const uint32 page_size = getpagesize();
936 const uint32 page_mask = page_size - 1;
937
938 mainBuffer.memBase = (uintptr) the_buffer;
939 // Align the frame buffer on page boundary
940 mainBuffer.memStart = (uintptr)((((unsigned long) the_buffer) + page_mask) & ~page_mask);
941 mainBuffer.memLength = the_buffer_size;
942 mainBuffer.memEnd = mainBuffer.memStart + mainBuffer.memLength;
943
944 mainBuffer.pageSize = page_size;
945 mainBuffer.pageCount = (mainBuffer.memLength + page_mask)/mainBuffer.pageSize;
946 mainBuffer.pageBits = log_base_2(mainBuffer.pageSize);
947
948 if (mainBuffer.dirtyPages != 0)
949 free(mainBuffer.dirtyPages);
950
951 mainBuffer.dirtyPages = (char *) malloc(mainBuffer.pageCount + 2);
952
953 if (mainBuffer.pageInfo != 0)
954 free(mainBuffer.pageInfo);
955
956 mainBuffer.pageInfo = (ScreenPageInfo *) malloc(mainBuffer.pageCount * sizeof(ScreenPageInfo));
957
958 if ((mainBuffer.dirtyPages == 0) || (mainBuffer.pageInfo == 0))
959 return false;
960
961 mainBuffer.dirty = false;
962
963 PFLAG_CLEAR_ALL;
964 // Safety net to insure the loops in the update routines will terminate
965 // See a discussion in <video_vosf.h> for further details
966 PFLAG_CLEAR(mainBuffer.pageCount);
967 PFLAG_SET(mainBuffer.pageCount+1);
968
969 uint32 a = 0;
970 for (int i = 0; i < mainBuffer.pageCount; i++) {
971 int y1 = a / VideoMonitor.mode.bytes_per_row;
972 if (y1 >= VideoMonitor.mode.y)
973 y1 = VideoMonitor.mode.y - 1;
974
975 int y2 = (a + mainBuffer.pageSize) / VideoMonitor.mode.bytes_per_row;
976 if (y2 >= VideoMonitor.mode.y)
977 y2 = VideoMonitor.mode.y - 1;
978
979 mainBuffer.pageInfo[i].top = y1;
980 mainBuffer.pageInfo[i].bottom = y2;
981
982 a += mainBuffer.pageSize;
983 if (a > mainBuffer.memLength)
984 a = mainBuffer.memLength;
985 }
986
987 // We can now write-protect the frame buffer
988 if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0)
989 return false;
990 }
991 #endif
992 return true;
993 }
994
995 bool VideoInit(bool classic)
996 {
997 #ifdef ENABLE_VOSF
998 // Open /dev/zero
999 zero_fd = open("/dev/zero", O_RDWR);
1000 if (zero_fd < 0) {
1001 char str[256];
1002 sprintf(str, GetString(STR_NO_DEV_ZERO_ERR), strerror(errno));
1003 ErrorAlert(str);
1004 return false;
1005 }
1006
1007 // Zero the mainBuffer structure
1008 mainBuffer.dirtyPages = 0;
1009 mainBuffer.pageInfo = 0;
1010 #endif
1011
1012 // Check if X server runs on local machine
1013 local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0)
1014 || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0);
1015
1016 // Init keycode translation
1017 keycode_init();
1018
1019 // Read prefs
1020 mouse_wheel_mode = PrefsFindInt32("mousewheelmode");
1021 mouse_wheel_lines = PrefsFindInt32("mousewheellines");
1022
1023 // Find screen and root window
1024 screen = XDefaultScreen(x_display);
1025 rootwin = XRootWindow(x_display, screen);
1026
1027 // Get screen depth
1028 xdepth = DefaultDepth(x_display, screen);
1029
1030 #ifdef ENABLE_FBDEV_DGA
1031 // Frame buffer name
1032 char fb_name[20];
1033
1034 // Could do fbdev dga ?
1035 if ((fbdev_fd = open(FBDEVICE_FILE_NAME, O_RDWR)) != -1)
1036 has_dga = true;
1037 else
1038 has_dga = false;
1039 #endif
1040
1041 #ifdef ENABLE_XF86_DGA
1042 // DGA available?
1043 int dga_event_base, dga_error_base;
1044 if (local_X11 && XF86DGAQueryExtension(x_display, &dga_event_base, &dga_error_base)) {
1045 int dga_flags = 0;
1046 XF86DGAQueryDirectVideo(x_display, screen, &dga_flags);
1047 has_dga = dga_flags & XF86DGADirectPresent;
1048 } else
1049 has_dga = false;
1050 #endif
1051
1052 #ifdef ENABLE_XF86_VIDMODE
1053 // VidMode available?
1054 int vm_event_base, vm_error_base;
1055 has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base);
1056 if (has_vidmode)
1057 XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes);
1058 #endif
1059
1060 // Find black and white colors
1061 XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black);
1062 XAllocColor(x_display, DefaultColormap(x_display, screen), &black);
1063 XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white);
1064 XAllocColor(x_display, DefaultColormap(x_display, screen), &white);
1065 black_pixel = BlackPixel(x_display, screen);
1066 white_pixel = WhitePixel(x_display, screen);
1067
1068 // Get appropriate visual
1069 int color_class;
1070 switch (xdepth) {
1071 case 1:
1072 color_class = StaticGray;
1073 break;
1074 case 8:
1075 color_class = PseudoColor;
1076 break;
1077 case 15:
1078 case 16:
1079 case 24:
1080 case 32:
1081 color_class = TrueColor;
1082 break;
1083 default:
1084 ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR));
1085 return false;
1086 }
1087 if (!XMatchVisualInfo(x_display, screen, xdepth, color_class, &visualInfo)) {
1088 ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
1089 return false;
1090 }
1091 if (visualInfo.depth != xdepth) {
1092 ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
1093 return false;
1094 }
1095 vis = visualInfo.visual;
1096
1097 // Mac screen depth is always 1 bit in Classic mode, but follows X depth otherwise
1098 classic_mode = classic;
1099 if (classic)
1100 depth = 1;
1101 else
1102 depth = xdepth;
1103
1104 // Create color maps for 8 bit mode
1105 if (depth == 8) {
1106 cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll);
1107 cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll);
1108 XInstallColormap(x_display, cmap[0]);
1109 XInstallColormap(x_display, cmap[1]);
1110 }
1111
1112 // Get screen mode from preferences
1113 const char *mode_str;
1114 if (classic)
1115 mode_str = "win/512/342";
1116 else
1117 mode_str = PrefsFindString("screen");
1118
1119 // Determine type and mode
1120 int width = 512, height = 384;
1121 display_type = DISPLAY_WINDOW;
1122 if (mode_str) {
1123 if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2)
1124 display_type = DISPLAY_WINDOW;
1125 #ifdef ENABLE_FBDEV_DGA
1126 else if (has_dga && sscanf(mode_str, "dga/%19s", fb_name) == 1) {
1127 #else
1128 else if (has_dga && sscanf(mode_str, "dga/%d/%d", &width, &height) == 2) {
1129 #endif
1130 display_type = DISPLAY_DGA;
1131 if (width > DisplayWidth(x_display, screen))
1132 width = DisplayWidth(x_display, screen);
1133 if (height > DisplayHeight(x_display, screen))
1134 height = DisplayHeight(x_display, screen);
1135 }
1136 if (width <= 0)
1137 width = DisplayWidth(x_display, screen);
1138 if (height <= 0)
1139 height = DisplayHeight(x_display, screen);
1140 }
1141
1142 // Initialize according to display type
1143 switch (display_type) {
1144 case DISPLAY_WINDOW:
1145 if (!init_window(width, height))
1146 return false;
1147 break;
1148 case DISPLAY_DGA:
1149 #ifdef ENABLE_FBDEV_DGA
1150 if (!init_fbdev_dga(fb_name))
1151 #else
1152 if (!init_xf86_dga(width, height))
1153 #endif
1154 return false;
1155 break;
1156 }
1157
1158 // Lock down frame buffer
1159 LOCK_FRAME_BUFFER;
1160
1161 #if !REAL_ADDRESSING && !DIRECT_ADDRESSING
1162 // Set variables for UAE memory mapping
1163 MacFrameBaseHost = the_buffer;
1164 MacFrameSize = VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y;
1165
1166 // No special frame buffer in Classic mode (frame buffer is in Mac RAM)
1167 if (classic)
1168 MacFrameLayout = FLAYOUT_NONE;
1169 #endif
1170
1171 #ifdef ENABLE_VOSF
1172 if (use_vosf) {
1173 // Initialize the mainBuffer structure
1174 if (!VideoInitBuffer()) {
1175 // TODO: STR_VOSF_INIT_ERR ?
1176 ErrorAlert("Could not initialize Video on SEGV signals");
1177 return false;
1178 }
1179
1180 // Initialize the handler for SIGSEGV
1181 if (!sigsegv_install_handler(screen_fault_handler)) {
1182 // TODO: STR_VOSF_INIT_ERR ?
1183 ErrorAlert("Could not initialize Video on SEGV signals");
1184 return false;
1185 }
1186 }
1187 #endif
1188
1189 // Initialize VideoRefresh function
1190 VideoRefreshInit();
1191
1192 XSync(x_display, false);
1193
1194 #ifdef HAVE_PTHREADS
1195 // Start redraw/input thread
1196 redraw_thread_active = (pthread_create(&redraw_thread, NULL, redraw_func, NULL) == 0);
1197 if (!redraw_thread_active) {
1198 printf("FATAL: cannot create redraw thread\n");
1199 return false;
1200 }
1201 #endif
1202 return true;
1203 }
1204
1205
1206 /*
1207 * Deinitialization
1208 */
1209
1210 void VideoExit(void)
1211 {
1212 #ifdef HAVE_PTHREADS
1213 // Stop redraw thread
1214 if (redraw_thread_active) {
1215 redraw_thread_cancel = true;
1216 #ifdef HAVE_PTHREAD_CANCEL
1217 pthread_cancel(redraw_thread);
1218 #endif
1219 pthread_join(redraw_thread, NULL);
1220 redraw_thread_active = false;
1221 }
1222 #endif
1223
1224 // Unlock frame buffer
1225 UNLOCK_FRAME_BUFFER;
1226
1227 // Close window and server connection
1228 if (x_display != NULL) {
1229 XSync(x_display, false);
1230
1231 #ifdef ENABLE_XF86_DGA
1232 if (display_type == DISPLAY_DGA) {
1233 XF86DGADirectVideo(x_display, screen, 0);
1234 XUngrabPointer(x_display, CurrentTime);
1235 XUngrabKeyboard(x_display, CurrentTime);
1236 }
1237 #endif
1238
1239 #ifdef ENABLE_XF86_VIDMODE
1240 if (has_vidmode && display_type == DISPLAY_DGA)
1241 XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]);
1242 #endif
1243
1244 #ifdef ENABLE_FBDEV_DGA
1245 if (display_type == DISPLAY_DGA) {
1246 XUngrabPointer(x_display, CurrentTime);
1247 XUngrabKeyboard(x_display, CurrentTime);
1248 close(fbdev_fd);
1249 }
1250 #endif
1251
1252 XFlush(x_display);
1253 XSync(x_display, false);
1254 if (depth == 8) {
1255 XFreeColormap(x_display, cmap[0]);
1256 XFreeColormap(x_display, cmap[1]);
1257 }
1258
1259 if (!use_vosf) {
1260 if (the_buffer) {
1261 free(the_buffer);
1262 the_buffer = NULL;
1263 }
1264
1265 if (!have_shm && the_buffer_copy) {
1266 free(the_buffer_copy);
1267 the_buffer_copy = NULL;
1268 }
1269 }
1270 #ifdef ENABLE_VOSF
1271 else {
1272 if (the_buffer != (uint8 *)VM_MAP_FAILED) {
1273 vm_release(the_buffer, the_buffer_size);
1274 the_buffer = 0;
1275 }
1276
1277 if (the_buffer_copy != (uint8 *)VM_MAP_FAILED) {
1278 vm_release(the_buffer_copy, the_buffer_size);
1279 the_buffer_copy = 0;
1280 }
1281 }
1282 #endif
1283 }
1284
1285 #ifdef ENABLE_VOSF
1286 if (use_vosf) {
1287 // Clear mainBuffer data
1288 if (mainBuffer.pageInfo) {
1289 free(mainBuffer.pageInfo);
1290 mainBuffer.pageInfo = 0;
1291 }
1292
1293 if (mainBuffer.dirtyPages) {
1294 free(mainBuffer.dirtyPages);
1295 mainBuffer.dirtyPages = 0;
1296 }
1297 }
1298
1299 // Close /dev/zero
1300 if (zero_fd > 0)
1301 close(zero_fd);
1302 #endif
1303 }
1304
1305
1306 /*
1307 * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode)
1308 */
1309
1310 void VideoQuitFullScreen(void)
1311 {
1312 D(bug("VideoQuitFullScreen()\n"));
1313 if (display_type == DISPLAY_DGA)
1314 quit_full_screen = true;
1315 }
1316
1317
1318 /*
1319 * Mac VBL interrupt
1320 */
1321
1322 void VideoInterrupt(void)
1323 {
1324 // Emergency quit requested? Then quit
1325 if (emerg_quit)
1326 QuitEmulator();
1327
1328 // Temporarily give up frame buffer lock (this is the point where
1329 // we are suspended when the user presses Ctrl-Tab)
1330 UNLOCK_FRAME_BUFFER;
1331 LOCK_FRAME_BUFFER;
1332 }
1333
1334
1335 /*
1336 * Set palette
1337 */
1338
1339 void video_set_palette(uint8 *pal)
1340 {
1341 LOCK_PALETTE;
1342
1343 // Convert colors to XColor array
1344 for (int i=0; i<256; i++) {
1345 palette[i].pixel = i;
1346 palette[i].red = pal[i*3] * 0x0101;
1347 palette[i].green = pal[i*3+1] * 0x0101;
1348 palette[i].blue = pal[i*3+2] * 0x0101;
1349 palette[i].flags = DoRed | DoGreen | DoBlue;
1350 }
1351
1352 // Tell redraw thread to change palette
1353 palette_changed = true;
1354
1355 UNLOCK_PALETTE;
1356 }
1357
1358
1359 /*
1360 * Suspend/resume emulator
1361 */
1362
1363 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1364 static void suspend_emul(void)
1365 {
1366 if (display_type == DISPLAY_DGA) {
1367 // Release ctrl key
1368 ADBKeyUp(0x36);
1369 ctrl_down = false;
1370
1371 // Lock frame buffer (this will stop the MacOS thread)
1372 LOCK_FRAME_BUFFER;
1373
1374 // Save frame buffer
1375 fb_save = malloc(VideoMonitor.mode.y * VideoMonitor.mode.bytes_per_row);
1376 if (fb_save)
1377 memcpy(fb_save, the_buffer, VideoMonitor.mode.y * VideoMonitor.mode.bytes_per_row);
1378
1379 // Close full screen display
1380 #ifdef ENABLE_XF86_DGA
1381 XF86DGADirectVideo(x_display, screen, 0);
1382 #endif
1383 XUngrabPointer(x_display, CurrentTime);
1384 XUngrabKeyboard(x_display, CurrentTime);
1385 XUnmapWindow(x_display, the_win);
1386 wait_unmapped(the_win);
1387
1388 // Open "suspend" window
1389 XSetWindowAttributes wattr;
1390 wattr.event_mask = KeyPressMask;
1391 wattr.background_pixel = black_pixel;
1392
1393 suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth,
1394 InputOutput, vis, CWEventMask | CWBackPixel, &wattr);
1395 set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE);
1396 set_window_focus(suspend_win);
1397 XMapWindow(x_display, suspend_win);
1398 emul_suspended = true;
1399 }
1400 }
1401
1402 static void resume_emul(void)
1403 {
1404 // Close "suspend" window
1405 XDestroyWindow(x_display, suspend_win);
1406 XSync(x_display, false);
1407
1408 // Reopen full screen display
1409 XMapRaised(x_display, the_win);
1410 wait_mapped(the_win);
1411 XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0);
1412 XGrabKeyboard(x_display, rootwin, 1, GrabModeAsync, GrabModeAsync, CurrentTime);
1413 XGrabPointer(x_display, rootwin, 1, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
1414 #ifdef ENABLE_XF86_DGA
1415 XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
1416 XF86DGASetViewPort(x_display, screen, 0, 0);
1417 #endif
1418 XSync(x_display, false);
1419
1420 // the_buffer already contains the data to restore. i.e. since a temporary
1421 // frame buffer is used when VOSF is actually used, fb_save is therefore
1422 // not necessary.
1423 #ifdef ENABLE_VOSF
1424 if (use_vosf) {
1425 LOCK_VOSF;
1426 PFLAG_SET_ALL;
1427 UNLOCK_VOSF;
1428 memset(the_buffer_copy, 0, VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y);
1429 }
1430 #endif
1431
1432 // Restore frame buffer
1433 if (fb_save) {
1434 #ifdef ENABLE_VOSF
1435 // Don't copy fb_save to the temporary frame buffer in VOSF mode
1436 if (!use_vosf)
1437 #endif
1438 memcpy(the_buffer, fb_save, VideoMonitor.mode.y * VideoMonitor.mode.bytes_per_row);
1439 free(fb_save);
1440 fb_save = NULL;
1441 }
1442
1443 #ifdef ENABLE_XF86_DGA
1444 if (depth == 8)
1445 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
1446 #endif
1447
1448 // Unlock frame buffer (and continue MacOS thread)
1449 UNLOCK_FRAME_BUFFER;
1450 emul_suspended = false;
1451 }
1452 #endif
1453
1454
1455 /*
1456 * Translate key event to Mac keycode
1457 */
1458
1459 static int kc_decode(KeySym ks)
1460 {
1461 switch (ks) {
1462 case XK_A: case XK_a: return 0x00;
1463 case XK_B: case XK_b: return 0x0b;
1464 case XK_C: case XK_c: return 0x08;
1465 case XK_D: case XK_d: return 0x02;
1466 case XK_E: case XK_e: return 0x0e;
1467 case XK_F: case XK_f: return 0x03;
1468 case XK_G: case XK_g: return 0x05;
1469 case XK_H: case XK_h: return 0x04;
1470 case XK_I: case XK_i: return 0x22;
1471 case XK_J: case XK_j: return 0x26;
1472 case XK_K: case XK_k: return 0x28;
1473 case XK_L: case XK_l: return 0x25;
1474 case XK_M: case XK_m: return 0x2e;
1475 case XK_N: case XK_n: return 0x2d;
1476 case XK_O: case XK_o: return 0x1f;
1477 case XK_P: case XK_p: return 0x23;
1478 case XK_Q: case XK_q: return 0x0c;
1479 case XK_R: case XK_r: return 0x0f;
1480 case XK_S: case XK_s: return 0x01;
1481 case XK_T: case XK_t: return 0x11;
1482 case XK_U: case XK_u: return 0x20;
1483 case XK_V: case XK_v: return 0x09;
1484 case XK_W: case XK_w: return 0x0d;
1485 case XK_X: case XK_x: return 0x07;
1486 case XK_Y: case XK_y: return 0x10;
1487 case XK_Z: case XK_z: return 0x06;
1488
1489 case XK_1: case XK_exclam: return 0x12;
1490 case XK_2: case XK_at: return 0x13;
1491 case XK_3: case XK_numbersign: return 0x14;
1492 case XK_4: case XK_dollar: return 0x15;
1493 case XK_5: case XK_percent: return 0x17;
1494 case XK_6: return 0x16;
1495 case XK_7: return 0x1a;
1496 case XK_8: return 0x1c;
1497 case XK_9: return 0x19;
1498 case XK_0: return 0x1d;
1499
1500 case XK_grave: case XK_asciitilde: return 0x0a;
1501 case XK_minus: case XK_underscore: return 0x1b;
1502 case XK_equal: case XK_plus: return 0x18;
1503 case XK_bracketleft: case XK_braceleft: return 0x21;
1504 case XK_bracketright: case XK_braceright: return 0x1e;
1505 case XK_backslash: case XK_bar: return 0x2a;
1506 case XK_semicolon: case XK_colon: return 0x29;
1507 case XK_apostrophe: case XK_quotedbl: return 0x27;
1508 case XK_comma: case XK_less: return 0x2b;
1509 case XK_period: case XK_greater: return 0x2f;
1510 case XK_slash: case XK_question: return 0x2c;
1511
1512 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1513 case XK_Tab: if (ctrl_down) {suspend_emul(); return -1;} else return 0x30;
1514 #else
1515 case XK_Tab: return 0x30;
1516 #endif
1517 case XK_Return: return 0x24;
1518 case XK_space: return 0x31;
1519 case XK_BackSpace: return 0x33;
1520
1521 case XK_Delete: return 0x75;
1522 case XK_Insert: return 0x72;
1523 case XK_Home: case XK_Help: return 0x73;
1524 case XK_End: return 0x77;
1525 #ifdef __hpux
1526 case XK_Prior: return 0x74;
1527 case XK_Next: return 0x79;
1528 #else
1529 case XK_Page_Up: return 0x74;
1530 case XK_Page_Down: return 0x79;
1531 #endif
1532
1533 case XK_Control_L: return 0x36;
1534 case XK_Control_R: return 0x36;
1535 case XK_Shift_L: return 0x38;
1536 case XK_Shift_R: return 0x38;
1537 case XK_Alt_L: return 0x37;
1538 case XK_Alt_R: return 0x37;
1539 case XK_Meta_L: return 0x3a;
1540 case XK_Meta_R: return 0x3a;
1541 case XK_Menu: return 0x32;
1542 case XK_Caps_Lock: return 0x39;
1543 case XK_Num_Lock: return 0x47;
1544
1545 case XK_Up: return 0x3e;
1546 case XK_Down: return 0x3d;
1547 case XK_Left: return 0x3b;
1548 case XK_Right: return 0x3c;
1549
1550 case XK_Escape: if (ctrl_down) {quit_full_screen = true; emerg_quit = true; return -1;} else return 0x35;
1551
1552 case XK_F1: if (ctrl_down) {SysMountFirstFloppy(); return -1;} else return 0x7a;
1553 case XK_F2: return 0x78;
1554 case XK_F3: return 0x63;
1555 case XK_F4: return 0x76;
1556 case XK_F5: return 0x60;
1557 case XK_F6: return 0x61;
1558 case XK_F7: return 0x62;
1559 case XK_F8: return 0x64;
1560 case XK_F9: return 0x65;
1561 case XK_F10: return 0x6d;
1562 case XK_F11: return 0x67;
1563 case XK_F12: return 0x6f;
1564
1565 case XK_Print: return 0x69;
1566 case XK_Scroll_Lock: return 0x6b;
1567 case XK_Pause: return 0x71;
1568
1569 #if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End)
1570 case XK_KP_0: case XK_KP_Insert: return 0x52;
1571 case XK_KP_1: case XK_KP_End: return 0x53;
1572 case XK_KP_2: case XK_KP_Down: return 0x54;
1573 case XK_KP_3: case XK_KP_Next: return 0x55;
1574 case XK_KP_4: case XK_KP_Left: return 0x56;
1575 case XK_KP_5: case XK_KP_Begin: return 0x57;
1576 case XK_KP_6: case XK_KP_Right: return 0x58;
1577 case XK_KP_7: case XK_KP_Home: return 0x59;
1578 case XK_KP_8: case XK_KP_Up: return 0x5b;
1579 case XK_KP_9: case XK_KP_Prior: return 0x5c;
1580 case XK_KP_Decimal: case XK_KP_Delete: return 0x41;
1581 #else
1582 case XK_KP_0: return 0x52;
1583 case XK_KP_1: return 0x53;
1584 case XK_KP_2: return 0x54;
1585 case XK_KP_3: return 0x55;
1586 case XK_KP_4: return 0x56;
1587 case XK_KP_5: return 0x57;
1588 case XK_KP_6: return 0x58;
1589 case XK_KP_7: return 0x59;
1590 case XK_KP_8: return 0x5b;
1591 case XK_KP_9: return 0x5c;
1592 case XK_KP_Decimal: return 0x41;
1593 #endif
1594 case XK_KP_Add: return 0x45;
1595 case XK_KP_Subtract: return 0x4e;
1596 case XK_KP_Multiply: return 0x43;
1597 case XK_KP_Divide: return 0x4b;
1598 case XK_KP_Enter: return 0x4c;
1599 case XK_KP_Equal: return 0x51;
1600 }
1601 return -1;
1602 }
1603
1604 static int event2keycode(XKeyEvent &ev)
1605 {
1606 KeySym ks;
1607 int as;
1608 int i = 0;
1609
1610 do {
1611 ks = XLookupKeysym(&ev, i++);
1612 as = kc_decode(ks);
1613 if (as != -1)
1614 return as;
1615 } while (ks != NoSymbol);
1616
1617 return -1;
1618 }
1619
1620
1621 /*
1622 * X event handling
1623 */
1624
1625 static void handle_events(void)
1626 {
1627 while (XPending(x_display)) {
1628 XEvent event;
1629 XNextEvent(x_display, &event);
1630
1631 switch (event.type) {
1632 // Mouse button
1633 case ButtonPress: {
1634 unsigned int button = event.xbutton.button;
1635 if (button < 4)
1636 ADBMouseDown(button - 1);
1637 else if (button < 6) { // Wheel mouse
1638 if (mouse_wheel_mode == 0) {
1639 int key = (button == 5) ? 0x79 : 0x74; // Page up/down
1640 ADBKeyDown(key);
1641 ADBKeyUp(key);
1642 } else {
1643 int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down
1644 for(int i=0; i<mouse_wheel_lines; i++) {
1645 ADBKeyDown(key);
1646 ADBKeyUp(key);
1647 }
1648 }
1649 }
1650 break;
1651 }
1652 case ButtonRelease: {
1653 unsigned int button = event.xbutton.button;
1654 if (button < 4)
1655 ADBMouseUp(button - 1);
1656 break;
1657 }
1658
1659 // Mouse moved
1660 case EnterNotify:
1661 case MotionNotify:
1662 ADBMouseMoved(event.xmotion.x, event.xmotion.y);
1663 break;
1664
1665 // Keyboard
1666 case KeyPress: {
1667 int code;
1668 if (use_keycodes) {
1669 event2keycode(event.xkey); // This is called to process the hotkeys
1670 code = keycode_table[event.xkey.keycode & 0xff];
1671 } else
1672 code = event2keycode(event.xkey);
1673 if (code != -1) {
1674 if (!emul_suspended) {
1675 if (code == 0x39) { // Caps Lock pressed
1676 if (caps_on) {
1677 ADBKeyUp(code);
1678 caps_on = false;
1679 } else {
1680 ADBKeyDown(code);
1681 caps_on = true;
1682 }
1683 } else
1684 ADBKeyDown(code);
1685 if (code == 0x36)
1686 ctrl_down = true;
1687 } else {
1688 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1689 if (code == 0x31)
1690 resume_emul(); // Space wakes us up
1691 #endif
1692 }
1693 }
1694 break;
1695 }
1696 case KeyRelease: {
1697 int code;
1698 if (use_keycodes) {
1699 event2keycode(event.xkey); // This is called to process the hotkeys
1700 code = keycode_table[event.xkey.keycode & 0xff];
1701 } else
1702 code = event2keycode(event.xkey);
1703 if (code != -1 && code != 0x39) { // Don't propagate Caps Lock releases
1704 ADBKeyUp(code);
1705 if (code == 0x36)
1706 ctrl_down = false;
1707 }
1708 break;
1709 }
1710
1711 // Hidden parts exposed, force complete refresh of window
1712 case Expose:
1713 if (display_type == DISPLAY_WINDOW) {
1714 #ifdef ENABLE_VOSF
1715 if (use_vosf) { // VOSF refresh
1716 LOCK_VOSF;
1717 PFLAG_SET_ALL;
1718 UNLOCK_VOSF;
1719 memset(the_buffer_copy, 0, VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y);
1720 }
1721 else
1722 #endif
1723 if (frame_skip == 0) { // Dynamic refresh
1724 int x1, y1;
1725 for (y1=0; y1<16; y1++)
1726 for (x1=0; x1<16; x1++)
1727 updt_box[x1][y1] = true;
1728 nr_boxes = 16 * 16;
1729 } else // Static refresh
1730 memset(the_buffer_copy, 0, VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y);
1731 }
1732 break;
1733
1734 // Window "close" widget clicked
1735 case ClientMessage:
1736 if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) {
1737 ADBKeyDown(0x7f); // Power key
1738 ADBKeyUp(0x7f);
1739 }
1740 break;
1741 }
1742 }
1743 }
1744
1745
1746 /*
1747 * Window display update
1748 */
1749
1750 // Dynamic display update (variable frame rate for each box)
1751 static void update_display_dynamic(int ticker)
1752 {
1753 int y1, y2, y2s, y2a, i, x1, xm, xmo, ymo, yo, yi, yil, xi;
1754 int xil = 0;
1755 int rxm = 0, rxmo = 0;
1756 int bytes_per_row = VideoMonitor.mode.bytes_per_row;
1757 int bytes_per_pixel = VideoMonitor.mode.bytes_per_row / VideoMonitor.mode.x;
1758 int rx = VideoMonitor.mode.bytes_per_row / 16;
1759 int ry = VideoMonitor.mode.y / 16;
1760 int max_box;
1761
1762 y2s = sm_uptd[ticker % 8];
1763 y2a = 8;
1764 for (i = 0; i < 6; i++)
1765 if (ticker % (2 << i))
1766 break;
1767 max_box = sm_no_boxes[i];
1768
1769 if (y2a) {
1770 for (y1=0; y1<16; y1++) {
1771 for (y2=y2s; y2 < ry; y2 += y2a) {
1772 i = ((y1 * ry) + y2) * bytes_per_row;
1773 for (x1=0; x1<16; x1++, i += rx) {
1774 if (updt_box[x1][y1] == false) {
1775 if (memcmp(&the_buffer_copy[i], &the_buffer[i], rx)) {
1776 updt_box[x1][y1] = true;
1777 nr_boxes++;
1778 }
1779 }
1780 }
1781 }
1782 }
1783 }
1784
1785 if ((nr_boxes <= max_box) && (nr_boxes)) {
1786 for (y1=0; y1<16; y1++) {
1787 for (x1=0; x1<16; x1++) {
1788 if (updt_box[x1][y1] == true) {
1789 if (rxm == 0)
1790 xm = x1;
1791 rxm += rx;
1792 updt_box[x1][y1] = false;
1793 }
1794 if (((updt_box[x1+1][y1] == false) || (x1 == 15)) && (rxm)) {
1795 if ((rxmo != rxm) || (xmo != xm) || (yo != y1 - 1)) {
1796 if (rxmo) {
1797 xi = xmo * rx;
1798 yi = ymo * ry;
1799 xil = rxmo;
1800 yil = (yo - ymo +1) * ry;
1801 }
1802 rxmo = rxm;
1803 xmo = xm;
1804 ymo = y1;
1805 }
1806 rxm = 0;
1807 yo = y1;
1808 }
1809 if (xil) {
1810 i = (yi * bytes_per_row) + xi;
1811 for (y2=0; y2 < yil; y2++, i += bytes_per_row)
1812 memcpy(&the_buffer_copy[i], &the_buffer[i], xil);
1813 if (depth == 1) {
1814 if (have_shm)
1815 XShmPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil, 0);
1816 else
1817 XPutImage(x_display, the_win, the_gc, img, xi * 8, yi, xi * 8, yi, xil * 8, yil);
1818 } else {
1819 if (have_shm)
1820 XShmPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil, 0);
1821 else
1822 XPutImage(x_display, the_win, the_gc, img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil);
1823 }
1824 xil = 0;
1825 }
1826 if ((x1 == 15) && (y1 == 15) && (rxmo)) {
1827 x1--;
1828 xi = xmo * rx;
1829 yi = ymo * ry;
1830 xil = rxmo;
1831 yil = (yo - ymo +1) * ry;
1832 rxmo = 0;
1833 }
1834 }
1835 }
1836 nr_boxes = 0;
1837 }
1838 }
1839
1840 // Static display update (fixed frame rate, but incremental)
1841 static void update_display_static(void)
1842 {
1843 // Incremental update code
1844 int wide = 0, high = 0, x1, x2, y1, y2, i, j;
1845 int bytes_per_row = VideoMonitor.mode.bytes_per_row;
1846 int bytes_per_pixel = VideoMonitor.mode.bytes_per_row / VideoMonitor.mode.x;
1847 uint8 *p, *p2;
1848
1849 // Check for first line from top and first line from bottom that have changed
1850 y1 = 0;
1851 for (j=0; j<VideoMonitor.mode.y; j++) {
1852 if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) {
1853 y1 = j;
1854 break;
1855 }
1856 }
1857 y2 = y1 - 1;
1858 for (j=VideoMonitor.mode.y-1; j>=y1; j--) {
1859 if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) {
1860 y2 = j;
1861 break;
1862 }
1863 }
1864 high = y2 - y1 + 1;
1865
1866 // Check for first column from left and first column from right that have changed
1867 if (high) {
1868 if (depth == 1) {
1869 x1 = VideoMonitor.mode.x - 1;
1870 for (j=y1; j<=y2; j++) {
1871 p = &the_buffer[j * bytes_per_row];
1872 p2 = &the_buffer_copy[j * bytes_per_row];
1873 for (i=0; i<(x1>>3); i++) {
1874 if (*p != *p2) {
1875 x1 = i << 3;
1876 break;
1877 }
1878 p++; p2++;
1879 }
1880 }
1881 x2 = x1;
1882 for (j=y1; j<=y2; j++) {
1883 p = &the_buffer[j * bytes_per_row];
1884 p2 = &the_buffer_copy[j * bytes_per_row];
1885 p += bytes_per_row;
1886 p2 += bytes_per_row;
1887 for (i=(VideoMonitor.mode.x>>3); i>(x2>>3); i--) {
1888 p--; p2--;
1889 if (*p != *p2) {
1890 x2 = (i << 3) + 7;
1891 break;
1892 }
1893 }
1894 }
1895 wide = x2 - x1 + 1;
1896
1897 // Update copy of the_buffer
1898 if (high && wide) {
1899 for (j=y1; j<=y2; j++) {
1900 i = j * bytes_per_row + (x1 >> 3);
1901 memcpy(the_buffer_copy + i, the_buffer + i, wide >> 3);
1902 }
1903 }
1904
1905 } else {
1906 x1 = VideoMonitor.mode.x;
1907 for (j=y1; j<=y2; j++) {
1908 p = &the_buffer[j * bytes_per_row];
1909 p2 = &the_buffer_copy[j * bytes_per_row];
1910 for (i=0; i<x1*bytes_per_pixel; i++) {
1911 if (*p != *p2) {
1912 x1 = i / bytes_per_pixel;
1913 break;
1914 }
1915 p++; p2++;
1916 }
1917 }
1918 x2 = x1;
1919 for (j=y1; j<=y2; j++) {
1920 p = &the_buffer[j * bytes_per_row];
1921 p2 = &the_buffer_copy[j * bytes_per_row];
1922 p += bytes_per_row;
1923 p2 += bytes_per_row;
1924 for (i=VideoMonitor.mode.x*bytes_per_pixel; i>x2*bytes_per_pixel; i--) {
1925 p--;
1926 p2--;
1927 if (*p != *p2) {
1928 x2 = i / bytes_per_pixel;
1929 break;
1930 }
1931 }
1932 }
1933 wide = x2 - x1;
1934
1935 // Update copy of the_buffer
1936 if (high && wide) {
1937 for (j=y1; j<=y2; j++) {
1938 i = j * bytes_per_row + x1 * bytes_per_pixel;
1939 memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide);
1940 }
1941 }
1942 }
1943 }
1944
1945 // Refresh display
1946 if (high && wide) {
1947 if (have_shm)
1948 XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high, 0);
1949 else
1950 XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high);
1951 }
1952 }
1953
1954
1955 /*
1956 * Screen refresh functions
1957 */
1958
1959 // We suggest the compiler to inline the next two functions so that it
1960 // may specialise the code according to the current screen depth and
1961 // display type. A clever compiler would do that job by itself though...
1962
1963 // NOTE: update_display_vosf is inlined too
1964
1965 static inline void possibly_quit_dga_mode()
1966 {
1967 #if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA)
1968 // Quit DGA mode if requested
1969 if (quit_full_screen) {
1970 quit_full_screen = false;
1971 #ifdef ENABLE_XF86_DGA
1972 XF86DGADirectVideo(x_display, screen, 0);
1973 #endif
1974 XUngrabPointer(x_display, CurrentTime);
1975 XUngrabKeyboard(x_display, CurrentTime);
1976 XUnmapWindow(x_display, the_win);
1977 XSync(x_display, false);
1978 }
1979 #endif
1980 }
1981
1982 static inline void handle_palette_changes(int depth, int display_type)
1983 {
1984 LOCK_PALETTE;
1985
1986 if (palette_changed) {
1987 palette_changed = false;
1988 if (depth == 8) {
1989 XStoreColors(x_display, cmap[0], palette, 256);
1990 XStoreColors(x_display, cmap[1], palette, 256);
1991 XSync(x_display, false);
1992
1993 #ifdef ENABLE_XF86_DGA
1994 if (display_type == DISPLAY_DGA) {
1995 current_dga_cmap ^= 1;
1996 XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
1997 }
1998 #endif
1999 }
2000 }
2001
2002 UNLOCK_PALETTE;
2003 }
2004
2005 static void video_refresh_dga(void)
2006 {
2007 // Quit DGA mode if requested
2008 possibly_quit_dga_mode();
2009
2010 // Handle X events
2011 handle_events();
2012
2013 // Handle palette changes
2014 handle_palette_changes(depth, DISPLAY_DGA);
2015 }
2016
2017 #ifdef ENABLE_VOSF
2018 #if REAL_ADDRESSING || DIRECT_ADDRESSING
2019 static void video_refresh_dga_vosf(void)
2020 {
2021 // Quit DGA mode if requested
2022 possibly_quit_dga_mode();
2023
2024 // Handle X events
2025 handle_events();
2026
2027 // Handle palette changes
2028 handle_palette_changes(depth, DISPLAY_DGA);
2029
2030 // Update display (VOSF variant)
2031 static int tick_counter = 0;
2032 if (++tick_counter >= frame_skip) {
2033 tick_counter = 0;
2034 if (mainBuffer.dirty) {
2035 LOCK_VOSF;
2036 update_display_dga_vosf();
2037 UNLOCK_VOSF;
2038 }
2039 }
2040 }
2041 #endif
2042
2043 static void video_refresh_window_vosf(void)
2044 {
2045 // Quit DGA mode if requested
2046 possibly_quit_dga_mode();
2047
2048 // Handle X events
2049 handle_events();
2050
2051 // Handle palette changes
2052 handle_palette_changes(depth, DISPLAY_WINDOW);
2053
2054 // Update display (VOSF variant)
2055 static int tick_counter = 0;
2056 if (++tick_counter >= frame_skip) {
2057 tick_counter = 0;
2058 if (mainBuffer.dirty) {
2059 LOCK_VOSF;
2060 update_display_window_vosf();
2061 UNLOCK_VOSF;
2062 XSync(x_display, false); // Let the server catch up
2063 }
2064 }
2065 }
2066 #endif // def ENABLE_VOSF
2067
2068 static void video_refresh_window_static(void)
2069 {
2070 // Handle X events
2071 handle_events();
2072
2073 // Handle_palette changes
2074 handle_palette_changes(depth, DISPLAY_WINDOW);
2075
2076 // Update display (static variant)
2077 static int tick_counter = 0;
2078 if (++tick_counter >= frame_skip) {
2079 tick_counter = 0;
2080 update_display_static();
2081 }
2082 }
2083
2084 static void video_refresh_window_dynamic(void)
2085 {
2086 // Handle X events
2087 handle_events();
2088
2089 // Handle_palette changes
2090 handle_palette_changes(depth, DISPLAY_WINDOW);
2091
2092 // Update display (dynamic variant)
2093 static int tick_counter = 0;
2094 tick_counter++;
2095 update_display_dynamic(tick_counter);
2096 }
2097
2098
2099 /*
2100 * Thread for screen refresh, input handling etc.
2101 */
2102
2103 void VideoRefreshInit(void)
2104 {
2105 // TODO: set up specialised 8bpp VideoRefresh handlers ?
2106 if (display_type == DISPLAY_DGA) {
2107 #if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING)
2108 if (use_vosf)
2109 video_refresh = video_refresh_dga_vosf;
2110 else
2111 #endif
2112 video_refresh = video_refresh_dga;
2113 }
2114 else {
2115 #ifdef ENABLE_VOSF
2116 if (use_vosf)
2117 video_refresh = video_refresh_window_vosf;
2118 else
2119 #endif
2120 if (frame_skip == 0)
2121 video_refresh = video_refresh_window_dynamic;
2122 else
2123 video_refresh = video_refresh_window_static;
2124 }
2125 }
2126
2127 void VideoRefresh(void)
2128 {
2129 // TODO: make main_unix/VideoRefresh call directly video_refresh() ?
2130 video_refresh();
2131 }
2132
2133 #ifdef HAVE_PTHREADS
2134 static void *redraw_func(void *arg)
2135 {
2136 uint64 start = GetTicks_usec();
2137 int64 ticks = 0;
2138 uint64 next = GetTicks_usec();
2139 while (!redraw_thread_cancel) {
2140 video_refresh();
2141 next += 16667;
2142 int64 delay = next - GetTicks_usec();
2143 if (delay > 0)
2144 Delay_usec(delay);
2145 else if (delay < -16667)
2146 next = GetTicks_usec();
2147 ticks++;
2148 }
2149 uint64 end = GetTicks_usec();
2150 // printf("%Ld ticks in %Ld usec = %Ld ticks/sec\n", ticks, end - start, ticks * 1000000 / (end - start));
2151 return NULL;
2152 }
2153 #endif