ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/Unix/video_x.cpp
(Generate patch)

Comparing SheepShaver/src/Unix/video_x.cpp (file contents):
Revision 1.6 by gbeauche, 2003-11-21T17:01:33Z vs.
Revision 1.26 by gbeauche, 2004-06-05T06:30:58Z

# Line 1 | Line 1
1   /*
2   *  video_x.cpp - Video/graphics emulation, X11 specific stuff
3   *
4 < *  SheepShaver (C) 1997-2002 Marc Hellwig and Christian Bauer
4 > *  SheepShaver (C) 1997-2004 Marc Hellwig and 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
# Line 27 | Line 27
27   #include <sys/ipc.h>
28   #include <sys/shm.h>
29   #include <errno.h>
30 + #include <pthread.h>
31  
32 < #ifdef HAVE_PTHREADS
32 < # include <pthread.h>
33 < #endif
32 > #include <algorithm>
33  
34   #ifdef ENABLE_XF86_DGA
35 < #include <X11/extensions/xf86dga.h>
35 > # include <X11/extensions/xf86dga.h>
36   #endif
37  
38   #ifdef ENABLE_XF86_VIDMODE
# Line 51 | Line 50
50   #define DEBUG 0
51   #include "debug.h"
52  
53 + #ifndef NO_STD_NAMESPACE
54 + using std::sort;
55 + #endif
56 +
57  
58   // Constants
59   const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes";
60 + static const bool hw_mac_cursor_accl = true;    // Flag: Enable MacOS to X11 copy of cursor?
61  
62   // Global variables
63   static int32 frame_skip;
64 + static int16 mouse_wheel_mode;
65 + static int16 mouse_wheel_lines;
66   static bool redraw_thread_active = false;       // Flag: Redraw thread installed
67 + static pthread_attr_t redraw_thread_attr;       // Redraw thread attributes
68   static pthread_t redraw_thread;                         // Redraw thread
69  
70   static bool local_X11;                                          // Flag: X server running on local machine?
# Line 90 | Line 97 | static int screen;                                                     // Screen numbe
97   static int xdepth;                                                      // Depth of X screen
98   static int depth;                                                       // Depth of Mac frame buffer
99   static Window rootwin, the_win;                         // Root window and our window
100 + static int num_depths = 0;                                      // Number of available X depths
101 + static int *avail_depths = NULL;                        // List of available X depths
102   static XVisualInfo visualInfo;
103   static Visual *vis;
104 + static int color_class;
105 + static int rshift, rloss, gshift, gloss, bshift, bloss; // Pixel format of DirectColor/TrueColor modes
106   static Colormap cmap[2];                                        // Two colormaps (DGA) for 8-bit mode
107 + static XColor x_palette[256];                           // Color palette to be used as CLUT and gamma table
108 +
109   static XColor black, white;
110   static unsigned long black_pixel, white_pixel;
111   static int eventmask;
112 < static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask;
113 < static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask;
112 > static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask;
113 > static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask;
114  
115   // Variables for window mode
116   static GC the_gc;
# Line 114 | Line 127 | static uint8 *the_buffer_copy = NULL;          /
127   static uint32 the_buffer_size;                          // Size of allocated the_buffer
128  
129   // Variables for DGA mode
117 static char *dga_screen_base;
118 static int dga_fb_width;
130   static int current_dga_cmap;
131  
132   #ifdef ENABLE_XF86_VIDMODE
# Line 124 | Line 135 | static XF86VidModeModeInfo **x_video_mod
135   static int num_x_video_modes;
136   #endif
137  
138 + // Mutex to protect palette
139 + #ifdef HAVE_SPINLOCKS
140 + static spinlock_t x_palette_lock = SPIN_LOCK_UNLOCKED;
141 + #define LOCK_PALETTE spin_lock(&x_palette_lock)
142 + #define UNLOCK_PALETTE spin_unlock(&x_palette_lock)
143 + #elif defined(HAVE_PTHREADS)
144 + static pthread_mutex_t x_palette_lock = PTHREAD_MUTEX_INITIALIZER;
145 + #define LOCK_PALETTE pthread_mutex_lock(&x_palette_lock)
146 + #define UNLOCK_PALETTE pthread_mutex_unlock(&x_palette_lock)
147 + #else
148 + #define LOCK_PALETTE
149 + #define UNLOCK_PALETTE
150 + #endif
151 +
152  
153   // Prototypes
154   static void *redraw_func(void *arg);
# Line 136 | Line 161 | extern Display *x_display;
161   // From sys_unix.cpp
162   extern void SysMountFirstFloppy(void);
163  
164 + // From clip_unix.cpp
165 + extern void ClipboardSelectionClear(XSelectionClearEvent *);
166 + extern void ClipboardSelectionRequest(XSelectionRequestEvent *);
167 +
168  
169   // Video acceleration through SIGSEGV
170   #ifdef ENABLE_VOSF
# Line 144 | Line 173 | extern void SysMountFirstFloppy(void);
173  
174  
175   /*
176 + *  Utility functions
177 + */
178 +
179 + // Get current video mode
180 + static inline int get_current_mode(void)
181 + {
182 +        return VModes[cur_mode].viAppleMode;
183 + }
184 +
185 + // Find palette size for given color depth
186 + static int palette_size(int mode)
187 + {
188 +        switch (mode) {
189 +        case APPLE_1_BIT: return 2;
190 +        case APPLE_2_BIT: return 4;
191 +        case APPLE_4_BIT: return 16;
192 +        case APPLE_8_BIT: return 256;
193 +        case APPLE_16_BIT: return 32;
194 +        case APPLE_32_BIT: return 256;
195 +        default: return 0;
196 +        }
197 + }
198 +
199 + // Return bits per pixel for requested depth
200 + static inline int bytes_per_pixel(int depth)
201 + {
202 +        int bpp;
203 +        switch (depth) {
204 +        case 8:
205 +                bpp = 1;
206 +                break;
207 +        case 15: case 16:
208 +                bpp = 2;
209 +                break;
210 +        case 24: case 32:
211 +                bpp = 4;
212 +                break;
213 +        default:
214 +                abort();
215 +        }
216 +        return bpp;
217 + }
218 +
219 + // Map video_mode depth ID to numerical depth value
220 + static inline int depth_of_video_mode(int mode)
221 + {
222 +        int depth;
223 +        switch (mode) {
224 +        case APPLE_1_BIT:
225 +                depth = 1;
226 +                break;
227 +        case APPLE_2_BIT:
228 +                depth = 2;
229 +                break;
230 +        case APPLE_4_BIT:
231 +                depth = 4;
232 +                break;
233 +        case APPLE_8_BIT:
234 +                depth = 8;
235 +                break;
236 +        case APPLE_16_BIT:
237 +                depth = 16;
238 +                break;
239 +        case APPLE_32_BIT:
240 +                depth = 32;
241 +                break;
242 +        default:
243 +                abort();
244 +        }
245 +        return depth;
246 + }
247 +
248 + // Map RGB color to pixel value (this only works in TrueColor/DirectColor visuals)
249 + static inline uint32 map_rgb(uint8 red, uint8 green, uint8 blue)
250 + {
251 +        return ((red >> rloss) << rshift) | ((green >> gloss) << gshift) | ((blue >> bloss) << bshift);
252 + }
253 +
254 +
255 + // Do we have a visual for handling the specified Mac depth? If so, set the
256 + // global variables "xdepth", "visualInfo", "vis" and "color_class".
257 + static bool find_visual_for_depth(int depth)
258 + {
259 +        D(bug("have_visual_for_depth(%d)\n", depth_of_video_mode(depth)));
260 +
261 +        // 1-bit works always and uses default visual
262 +        if (depth == APPLE_1_BIT) {
263 +                vis = DefaultVisual(x_display, screen);
264 +                visualInfo.visualid = XVisualIDFromVisual(vis);
265 +                int num = 0;
266 +                XVisualInfo *vi = XGetVisualInfo(x_display, VisualIDMask, &visualInfo, &num);
267 +                visualInfo = vi[0];
268 +                XFree(vi);
269 +                xdepth = visualInfo.depth;
270 +                color_class = visualInfo.c_class;
271 +                D(bug(" found visual ID 0x%02x, depth %d\n", visualInfo.visualid, xdepth));
272 +                return true;
273 +        }
274 +
275 +        // Calculate minimum and maximum supported X depth
276 +        int min_depth = 1, max_depth = 32;
277 +        switch (depth) {
278 + #ifdef ENABLE_VOSF
279 +                case APPLE_2_BIT:
280 +                case APPLE_4_BIT:       // VOSF blitters can convert 2/4/8-bit -> 8/16/32-bit
281 +                case APPLE_8_BIT:
282 +                        min_depth = 8;
283 +                        max_depth = 32;
284 +                        break;
285 + #else
286 +                case APPLE_2_BIT:
287 +                case APPLE_4_BIT:       // 2/4-bit requires VOSF blitters
288 +                        return false;
289 +                case APPLE_8_BIT:       // 8-bit without VOSF requires an 8-bit visual
290 +                        min_depth = 8;
291 +                        max_depth = 8;
292 +                        break;
293 + #endif
294 +                case APPLE_16_BIT:      // 16-bit requires a 15/16-bit visual
295 +                        min_depth = 15;
296 +                        max_depth = 16;
297 +                        break;
298 +                case APPLE_32_BIT:      // 32-bit requires a 24/32-bit visual
299 +                        min_depth = 24;
300 +                        max_depth = 32;
301 +                        break;
302 +        }
303 +        D(bug(" minimum required X depth is %d, maximum supported X depth is %d\n", min_depth, max_depth));
304 +
305 +        // Try to find a visual for one of the color depths
306 +        bool visual_found = false;
307 +        for (int i=0; i<num_depths && !visual_found; i++) {
308 +
309 +                xdepth = avail_depths[i];
310 +                D(bug(" trying to find visual for depth %d\n", xdepth));
311 +                if (xdepth < min_depth || xdepth > max_depth)
312 +                        continue;
313 +
314 +                // Determine best color class for this depth
315 +                switch (xdepth) {
316 +                        case 1: // Try StaticGray or StaticColor
317 +                                if (XMatchVisualInfo(x_display, screen, xdepth, StaticGray, &visualInfo)
318 +                                 || XMatchVisualInfo(x_display, screen, xdepth, StaticColor, &visualInfo))
319 +                                        visual_found = true;
320 +                                break;
321 +                        case 8: // Need PseudoColor
322 +                                if (XMatchVisualInfo(x_display, screen, xdepth, PseudoColor, &visualInfo))
323 +                                        visual_found = true;
324 +                                break;
325 +                        case 15:
326 +                        case 16:
327 +                        case 24:
328 +                        case 32: // Try DirectColor first, as this will allow gamma correction
329 +                                if (XMatchVisualInfo(x_display, screen, xdepth, DirectColor, &visualInfo)
330 +                                 || XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo))
331 +                                        visual_found = true;
332 +                                break;
333 +                        default:
334 +                                D(bug("  not a supported depth\n"));
335 +                                break;
336 +                }
337 +        }
338 +        if (!visual_found)
339 +                return false;
340 +
341 +        // Visual was found
342 +        vis = visualInfo.visual;
343 +        color_class = visualInfo.c_class;
344 +        D(bug(" found visual ID 0x%02x, depth %d, class ", visualInfo.visualid, xdepth));
345 + #if DEBUG
346 +        switch (color_class) {
347 +                case StaticGray: D(bug("StaticGray\n")); break;
348 +                case GrayScale: D(bug("GrayScale\n")); break;
349 +                case StaticColor: D(bug("StaticColor\n")); break;
350 +                case PseudoColor: D(bug("PseudoColor\n")); break;
351 +                case TrueColor: D(bug("TrueColor\n")); break;
352 +                case DirectColor: D(bug("DirectColor\n")); break;
353 +        }
354 + #endif
355 +        return true;
356 + }
357 +
358 +
359 + /*
360   *  Open display (window or fullscreen)
361   */
362  
363 + // Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget)
364 + static Atom WM_DELETE_WINDOW = (Atom)0;
365 + static void set_window_delete_protocol(Window w)
366 + {
367 +        WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false);
368 +        XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1);
369 + }
370 +
371 + // Wait until window is mapped/unmapped
372 + static void wait_mapped(Window w)
373 + {
374 +        XEvent e;
375 +        do {
376 +                XMaskEvent(x_display, StructureNotifyMask, &e);
377 +        } while ((e.type != MapNotify) || (e.xmap.event != w));
378 + }
379 +
380 + static void wait_unmapped(Window w)
381 + {
382 +        XEvent e;
383 +        do {
384 +                XMaskEvent(x_display, StructureNotifyMask, &e);
385 +        } while ((e.type != UnmapNotify) || (e.xmap.event != w));
386 + }
387 +
388   // Trap SHM errors
389   static bool shm_error = false;
390   static int (*old_error_handler)(Display *, XErrorEvent *);
# Line 169 | Line 407 | static bool open_window(int width, int h
407          // Set absolute mouse mode
408          ADBSetRelMouseMode(false);
409  
172        // Read frame skip prefs
173        frame_skip = PrefsFindInt32("frameskip");
174        if (frame_skip == 0)
175                frame_skip = 1;
176
410          // Create window
411          XSetWindowAttributes wattr;
412          wattr.event_mask = eventmask = win_eventmask;
413 <        wattr.background_pixel = black_pixel;
414 <        wattr.border_pixel = black_pixel;
413 >        wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0);
414 >        wattr.border_pixel = 0;
415          wattr.backing_store = NotUseful;
416 <
184 <        XSync(x_display, false);
416 >        wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]);
417          the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
418 <                InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWBackingStore, &wattr);
419 <        XSync(x_display, false);
418 >                InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWBackingStore | CWColormap, &wattr);
419 >
420 >        // Set window name
421          XStoreName(x_display, the_win, GetString(STR_WINDOW_TITLE));
189        XMapRaised(x_display, the_win);
190        XSync(x_display, false);
422  
423 <        // Set colormap
424 <        if (depth == 8) {
194 <                XSetWindowColormap(x_display, the_win, cmap[0]);
195 <                XSetWMColormapWindows(x_display, the_win, &the_win, 1);
196 <        }
423 >        // Set delete protocol property
424 >        set_window_delete_protocol(the_win);
425  
426          // Make window unresizable
427          XSizeHints *hints;
# Line 207 | Line 435 | static bool open_window(int width, int h
435                  XFree((char *)hints);
436          }
437  
438 +        // Show window
439 +        XMapWindow(x_display, the_win);
440 +        wait_mapped(the_win);
441 +
442          // 1-bit mode is big-endian; if the X server is little-endian, we can't
443          // use SHM because that doesn't allow changing the image byte order
444          bool need_msb_image = (depth == 1 && XImageByteOrder(x_display) == LSBFirst);
# Line 217 | Line 449 | static bool open_window(int width, int h
449  
450                  // Create SHM image ("height + 2" for safety)
451                  img = XShmCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height);
452 <                shminfo.shmid = shmget(IPC_PRIVATE, (height + 2) * img->bytes_per_line, IPC_CREAT | 0777);
452 >                shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777);
453 >                D(bug(" shm image created\n"));
454                  the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0);
455                  shminfo.shmaddr = img->data = (char *)the_buffer_copy;
456                  shminfo.readOnly = False;
# Line 236 | Line 469 | static bool open_window(int width, int h
469                          have_shm = true;
470                          shmctl(shminfo.shmid, IPC_RMID, 0);
471                  }
472 +                D(bug(" shm image attached\n"));
473          }
474  
475          // Create normal X image if SHM doesn't work ("height + 2" for safety)
476          if (!have_shm) {
477 <                int bytes_per_row = aligned_width;
244 <                switch (depth) {
245 <                        case 1:
246 <                                bytes_per_row /= 8;
247 <                                break;
248 <                        case 15:
249 <                        case 16:
250 <                                bytes_per_row *= 2;
251 <                                break;
252 <                        case 24:
253 <                        case 32:
254 <                                bytes_per_row *= 4;
255 <                                break;
256 <                }
477 >                int bytes_per_row = depth == 1 ? aligned_width/8 : TrivialBytesPerRow(aligned_width, DepthModeForPixelDepth(xdepth));
478                  the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row);
479                  img = XCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row);
480 +                D(bug(" X image created\n"));
481          }
482  
483          // 1-Bit mode is big-endian
484 <    if (depth == 1) {
484 >    if (need_msb_image) {
485          img->byte_order = MSBFirst;
486          img->bitmap_bit_order = MSBFirst;
487      }
# Line 281 | Line 503 | static bool open_window(int width, int h
503  
504          // Create GC
505          the_gc = XCreateGC(x_display, the_win, 0, 0);
506 <        XSetForeground(x_display, the_gc, black_pixel);
506 >        XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes);
507  
508          // Create cursor
509 <        cursor_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 4, 16, 16, 16, 2);
510 <        cursor_image->byte_order = MSBFirst;
511 <        cursor_image->bitmap_bit_order = MSBFirst;
512 <        cursor_mask_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 36, 16, 16, 16, 2);
513 <        cursor_mask_image->byte_order = MSBFirst;
514 <        cursor_mask_image->bitmap_bit_order = MSBFirst;
515 <        cursor_map = XCreatePixmap(x_display, the_win, 16, 16, 1);
516 <        cursor_mask_map = XCreatePixmap(x_display, the_win, 16, 16, 1);
517 <        cursor_gc = XCreateGC(x_display, cursor_map, 0, 0);
518 <        cursor_mask_gc = XCreateGC(x_display, cursor_mask_map, 0, 0);
519 <        mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, 0, 0);
520 <        cursor_changed = false;
509 >        if (hw_mac_cursor_accl) {
510 >                cursor_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 4, 16, 16, 16, 2);
511 >                cursor_image->byte_order = MSBFirst;
512 >                cursor_image->bitmap_bit_order = MSBFirst;
513 >                cursor_mask_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 36, 16, 16, 16, 2);
514 >                cursor_mask_image->byte_order = MSBFirst;
515 >                cursor_mask_image->bitmap_bit_order = MSBFirst;
516 >                cursor_map = XCreatePixmap(x_display, the_win, 16, 16, 1);
517 >                cursor_mask_map = XCreatePixmap(x_display, the_win, 16, 16, 1);
518 >                cursor_gc = XCreateGC(x_display, cursor_map, 0, 0);
519 >                cursor_mask_gc = XCreateGC(x_display, cursor_mask_map, 0, 0);
520 >                mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, 0, 0);
521 >                cursor_changed = false;
522 >        }
523 >
524 >        // Create no_cursor
525 >        else {
526 >                mac_cursor = XCreatePixmapCursor(x_display,
527 >                        XCreatePixmap(x_display, the_win, 1, 1, 1),
528 >                        XCreatePixmap(x_display, the_win, 1, 1, 1),
529 >                        &black, &white, 0, 0);
530 >                XDefineCursor(x_display, the_win, mac_cursor);
531 >        }
532  
533          // Init blitting routines
534          bool native_byte_order;
# Line 309 | Line 542 | static bool open_window(int width, int h
542   #endif
543  
544          // Set bytes per row
312        VModes[cur_mode].viRowBytes = img->bytes_per_line;
545          XSync(x_display, false);
546          return true;
547   }
# Line 321 | Line 553 | static bool open_dga(int width, int heig
553          // Set relative mouse mode
554          ADBSetRelMouseMode(true);
555  
556 +        // Create window
557 +        XSetWindowAttributes wattr;
558 +        wattr.event_mask = eventmask = dga_eventmask;
559 +        wattr.override_redirect = True;
560 +        wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]);
561 +        the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth,
562 +                InputOutput, vis, CWEventMask | CWOverrideRedirect |
563 +                (color_class == DirectColor ? CWColormap : 0), &wattr);
564 +
565 +        // Show window
566 +        XMapRaised(x_display, the_win);
567 +        wait_mapped(the_win);
568 +
569   #ifdef ENABLE_XF86_VIDMODE
570          // Switch to best mode
571          if (has_vidmode) {
# Line 337 | Line 582 | static bool open_dga(int width, int heig
582   #endif
583  
584          // Establish direct screen connection
585 +        XMoveResizeWindow(x_display, the_win, 0, 0, width, height);
586 +        XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0);
587          XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime);
588          XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
589 +
590 +        int v_width, v_bank, v_size;
591 +        XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size);
592          XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
593          XF86DGASetViewPort(x_display, screen, 0, 0);
594          XF86DGASetVidPage(x_display, screen, 0);
595  
596          // Set colormap
597 <        if (depth == 8)
597 >        if (!IsDirectMode(get_current_mode())) {
598 >                XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]);
599                  XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
349
350        // Set bytes per row
351        int bytes_per_row = (dga_fb_width + 7) & ~7;
352        switch (depth) {
353                case 15:
354                case 16:
355                        bytes_per_row *= 2;
356                        break;
357                case 24:
358                case 32:
359                        bytes_per_row *= 4;
360                        break;
600          }
601 +        XSync(x_display, false);
602  
603 +        // Init blitting routines
604 +        int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, DepthModeForPixelDepth(depth));
605   #if ENABLE_VOSF
606          bool native_byte_order;
607   #ifdef WORDS_BIGENDIAN
# Line 378 | Line 620 | static bool open_dga(int width, int heig
620            the_buffer_size = page_extend((height + 2) * bytes_per_row);
621            the_buffer_copy = (uint8 *)malloc(the_buffer_size);
622            the_buffer = (uint8 *)vm_acquire(the_buffer_size);
623 +          D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer));
624          }
625   #else
626          use_vosf = false;
384        the_buffer = dga_screen_base;
627   #endif
628   #endif
387        screen_base = (uint32)the_buffer;
629  
630 +        // Set frame buffer base
631 +        D(bug("the_buffer = %p, use_vosf = %d\n", the_buffer, use_vosf));
632 +        screen_base = (uint32)the_buffer;
633          VModes[cur_mode].viRowBytes = bytes_per_row;
390        XSync(x_display, false);
634          return true;
635   #else
636          ErrorAlert("SheepShaver has been compiled with DGA support disabled.");
# Line 397 | Line 640 | static bool open_dga(int width, int heig
640  
641   static bool open_display(void)
642   {
643 <        display_type = VModes[cur_mode].viType;
644 <        switch (VModes[cur_mode].viAppleMode) {
645 <                case APPLE_1_BIT:
646 <                        depth = 1;
647 <                        break;
648 <                case APPLE_2_BIT:
649 <                        depth = 2;
407 <                        break;
408 <                case APPLE_4_BIT:
409 <                        depth = 4;
410 <                        break;
411 <                case APPLE_8_BIT:
412 <                        depth = 8;
413 <                        break;
414 <                case APPLE_16_BIT:
415 <                        depth = xdepth == 15 ? 15 : 16;
416 <                        break;
417 <                case APPLE_32_BIT:
418 <                        depth = 32;
419 <                        break;
643 >        D(bug("open_display()\n"));
644 >        const VideoInfo &mode = VModes[cur_mode];
645 >
646 >        // Find best available X visual
647 >        if (!find_visual_for_depth(mode.viAppleMode)) {
648 >                ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
649 >                return false;
650          }
651  
652 +        // Create color maps
653 +        if (color_class == PseudoColor || color_class == DirectColor) {
654 +                cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll);
655 +                cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll);
656 +        } else {
657 +                cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocNone);
658 +                cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocNone);
659 +        }
660 +
661 +        // Find pixel format of direct modes
662 +        if (color_class == DirectColor || color_class == TrueColor) {
663 +                rshift = gshift = bshift = 0;
664 +                rloss = gloss = bloss = 8;
665 +                uint32 mask;
666 +                for (mask=vis->red_mask; !(mask&1); mask>>=1)
667 +                        ++rshift;
668 +                for (; mask&1; mask>>=1)
669 +                        --rloss;
670 +                for (mask=vis->green_mask; !(mask&1); mask>>=1)
671 +                        ++gshift;
672 +                for (; mask&1; mask>>=1)
673 +                        --gloss;
674 +                for (mask=vis->blue_mask; !(mask&1); mask>>=1)
675 +                        ++bshift;
676 +                for (; mask&1; mask>>=1)
677 +                        --bloss;
678 +        }
679 +
680 +        // Preset palette pixel values for CLUT or gamma table
681 +        if (color_class == DirectColor) {
682 +                int num = vis->map_entries;
683 +                for (int i=0; i<num; i++) {
684 +                        int c = (i * 256) / num;
685 +                        x_palette[i].pixel = map_rgb(c, c, c);
686 +                        x_palette[i].flags = DoRed | DoGreen | DoBlue;
687 +                }
688 +        } else if (color_class == PseudoColor) {
689 +                for (int i=0; i<256; i++) {
690 +                        x_palette[i].pixel = i;
691 +                        x_palette[i].flags = DoRed | DoGreen | DoBlue;
692 +                }
693 +        }
694 +
695 +        // Load gray ramp to color map
696 +        int num = (color_class == DirectColor ? vis->map_entries : 256);
697 +        for (int i=0; i<num; i++) {
698 +                int c = (i * 256) / num;
699 +                x_palette[i].red = c * 0x0101;
700 +                x_palette[i].green = c * 0x0101;
701 +                x_palette[i].blue = c * 0x0101;
702 +        }
703 +        if (color_class == PseudoColor || color_class == DirectColor) {
704 +                XStoreColors(x_display, cmap[0], x_palette, num);
705 +                XStoreColors(x_display, cmap[1], x_palette, num);
706 +        }
707 +
708 + #ifdef ENABLE_VOSF
709 +        // Load gray ramp to 8->16/32 expand map
710 +        if (!IsDirectMode(get_current_mode()) && xdepth > 8)
711 +                for (int i=0; i<256; i++)
712 +                        ExpandMap[i] = map_rgb(i, i, i);
713 + #endif
714 +
715 +        // Create display of requested type
716 +        display_type = mode.viType;
717 +        depth = depth_of_video_mode(mode.viAppleMode);
718 +
719          bool display_open = false;
720          if (display_type == DIS_SCREEN)
721                  display_open = open_dga(VModes[cur_mode].viXsize, VModes[cur_mode].viYsize);
# Line 466 | Line 763 | static void close_window(void)
763          if (the_gc)
764                  XFreeGC(x_display, the_gc);
765  
766 <        // Close window
767 <        XDestroyWindow(x_display, the_win);
766 >        XFlush(x_display);
767 >        XSync(x_display, false);
768   }
769  
770   // Close DGA mode
# Line 503 | Line 800 | static void close_display(void)
800          else if (display_type == DIS_WINDOW)
801                  close_window();
802  
803 +        // Close window
804 +        if (the_win) {
805 +                XUnmapWindow(x_display, the_win);
806 +                wait_unmapped(the_win);
807 +                XDestroyWindow(x_display, the_win);
808 +        }
809 +
810 +        // Free colormaps
811 +        if (cmap[0]) {
812 +                XFreeColormap(x_display, cmap[0]);
813 +                cmap[0] = 0;
814 +        }
815 +        if (cmap[1]) {
816 +                XFreeColormap(x_display, cmap[1]);
817 +                cmap[1] = 0;
818 +        }
819 +
820   #ifdef ENABLE_VOSF
821          if (use_vosf) {
822                  // Deinitialize VOSF
# Line 609 | Line 923 | static void keycode_init(void)
923          }
924   }
925  
926 < static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, long apple_mode, long apple_id, int type)
926 > // Find Apple mode matching best specified dimensions
927 > static int find_apple_resolution(int xsize, int ysize)
928 > {
929 >        int apple_id;
930 >        if (xsize < 800)
931 >                apple_id = APPLE_640x480;
932 >        else if (xsize < 1024)
933 >                apple_id = APPLE_800x600;
934 >        else if (xsize < 1152)
935 >                apple_id = APPLE_1024x768;
936 >        else if (xsize < 1280) {
937 >                if (ysize < 900)
938 >                        apple_id = APPLE_1152x768;
939 >                else
940 >                        apple_id = APPLE_1152x900;
941 >        }
942 >        else if (xsize < 1600)
943 >                apple_id = APPLE_1280x1024;
944 >        else
945 >                apple_id = APPLE_1600x1200;
946 >        return apple_id;
947 > }
948 >
949 > // Find mode in list of supported modes
950 > static int find_mode(int apple_mode, int apple_id, int type)
951 > {
952 >        for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) {
953 >                if (p->viType == type && p->viAppleID == apple_id && p->viAppleMode == apple_mode)
954 >                        return p - VModes;
955 >        }
956 >        return -1;
957 > }
958 >
959 > // Add mode to list of supported modes
960 > static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, int apple_mode, int apple_id, int type)
961   {
962          if (allow & test) {
963                  p->viType = type;
# Line 628 | Line 976 | static void add_mode(VideoInfo *&p, uint
976                                  p->viXsize = 1024;
977                                  p->viYsize = 768;
978                                  break;
979 +                        case APPLE_1152x768:
980 +                                p->viXsize = 1152;
981 +                                p->viYsize = 768;
982 +                                break;
983                          case APPLE_1152x900:
984                                  p->viXsize = 1152;
985                                  p->viYsize = 900;
# Line 641 | Line 993 | static void add_mode(VideoInfo *&p, uint
993                                  p->viYsize = 1200;
994                                  break;
995                  }
996 <                switch (apple_mode) {
645 <                        case APPLE_8_BIT:
646 <                                p->viRowBytes = p->viXsize;
647 <                                break;
648 <                        case APPLE_16_BIT:
649 <                                p->viRowBytes = p->viXsize * 2;
650 <                                break;
651 <                        case APPLE_32_BIT:
652 <                                p->viRowBytes = p->viXsize * 4;
653 <                                break;
654 <                }
996 >                p->viRowBytes = TrivialBytesPerRow(p->viXsize, apple_mode);
997                  p->viAppleMode = apple_mode;
998                  p->viAppleID = apple_id;
999                  p++;
1000          }
1001   }
1002  
1003 + // Add standard list of windowed modes for given color depth
1004 + static void add_window_modes(VideoInfo *&p, int window_modes, int mode)
1005 + {
1006 +        add_mode(p, window_modes, 1, mode, APPLE_W_640x480, DIS_WINDOW);
1007 +        add_mode(p, window_modes, 2, mode, APPLE_W_800x600, DIS_WINDOW);
1008 + }
1009 +
1010   static bool has_mode(int x, int y)
1011   {
1012   #ifdef ENABLE_XF86_VIDMODE
# Line 685 | Line 1034 | bool VideoInit(void)
1034          // Init keycode translation
1035          keycode_init();
1036  
1037 +        // Read frame skip prefs
1038 +        frame_skip = PrefsFindInt32("frameskip");
1039 +        if (frame_skip == 0)
1040 +                frame_skip = 1;
1041 +
1042 +        // Read mouse wheel prefs
1043 +        mouse_wheel_mode = PrefsFindInt32("mousewheelmode");
1044 +        mouse_wheel_lines = PrefsFindInt32("mousewheellines");
1045 +
1046          // Init variables
1047          private_data = NULL;
690        cur_mode = 0;   // Window 640x480
1048          video_activated = true;
1049  
1050          // Find screen and root window
1051          screen = XDefaultScreen(x_display);
1052          rootwin = XRootWindow(x_display, screen);
1053  
1054 +        // Get sorted list of available depths
1055 +        avail_depths = XListDepths(x_display, screen, &num_depths);
1056 +        if (avail_depths == NULL) {
1057 +                ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR));
1058 +                return false;
1059 +        }
1060 +        sort(avail_depths, avail_depths + num_depths);
1061 +        
1062          // Get screen depth
1063          xdepth = DefaultDepth(x_display, screen);
1064  
# Line 724 | Line 1089 | bool VideoInit(void)
1089          black_pixel = BlackPixel(x_display, screen);
1090          white_pixel = WhitePixel(x_display, screen);
1091  
727        // Get appropriate visual
728        int color_class;
729        switch (xdepth) {
730 #if 0
731                case 1:
732                        color_class = StaticGray;
733                        break;
734 #endif
735                case 8:
736                        color_class = PseudoColor;
737                        break;
738                case 15:
739                case 16:
740                case 24:
741                case 32:
742                        color_class = TrueColor;
743                        break;
744                default:
745                        ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR));
746                        return false;
747        }
748        if (!XMatchVisualInfo(x_display, screen, xdepth, color_class, &visualInfo)) {
749                ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
750                return false;
751        }
752        if (visualInfo.depth != xdepth) {
753                ErrorAlert(GetString(STR_NO_XVISUAL_ERR));
754                return false;
755        }
756        vis = visualInfo.visual;
757
1092          // Mac screen depth follows X depth (for now)
1093 <        depth = xdepth;
1094 <
1095 <        // Create color maps for 8 bit mode
1096 <        if (depth == 8) {
1097 <                cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll);
1098 <                cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll);
1099 <                XInstallColormap(x_display, cmap[0]);
1100 <                XInstallColormap(x_display, cmap[1]);
1093 >        int default_mode = APPLE_8_BIT;
1094 >        switch (DefaultDepth(x_display, screen)) {
1095 >        case 1:
1096 >                default_mode = APPLE_1_BIT;
1097 >                break;
1098 >        case 8:
1099 >                default_mode = APPLE_8_BIT;
1100 >                break;
1101 >        case 15: case 16:
1102 >                default_mode = APPLE_16_BIT;
1103 >                break;
1104 >        case 24: case 32:
1105 >                default_mode = APPLE_32_BIT;
1106 >                break;
1107          }
1108  
1109          // Construct video mode table
770        int mode = APPLE_8_BIT;
771        int bpr_mult = 8;
772        switch (depth) {
773                case 1:
774                        mode = APPLE_1_BIT;
775                        bpr_mult = 1;
776                        break;
777                case 8:
778                        mode = APPLE_8_BIT;
779                        bpr_mult = 8;
780                        break;
781                case 15:
782                case 16:
783                        mode = APPLE_16_BIT;
784                        bpr_mult = 16;
785                        break;
786                case 24:
787                case 32:
788                        mode = APPLE_32_BIT;
789                        bpr_mult = 32;
790                        break;
791        }
792
1110          uint32 window_modes = PrefsFindInt32("windowmodes");
1111          uint32 screen_modes = PrefsFindInt32("screenmodes");
1112          if (!has_dga)
# Line 798 | Line 1115 | bool VideoInit(void)
1115                  window_modes |= 3;      // Allow at least 640x480 and 800x600 window modes
1116  
1117          VideoInfo *p = VModes;
1118 <        add_mode(p, window_modes, 1, mode, APPLE_W_640x480, DIS_WINDOW);
1119 <        add_mode(p, window_modes, 2, mode, APPLE_W_800x600, DIS_WINDOW);
1118 >        for (unsigned int d = APPLE_1_BIT; d <= APPLE_32_BIT; d++)
1119 >                if (find_visual_for_depth(d))
1120 >                        add_window_modes(p, window_modes, d);
1121 >
1122          if (has_vidmode) {
1123                  if (has_mode(640, 480))
1124 <                        add_mode(p, screen_modes, 1, mode, APPLE_640x480, DIS_SCREEN);
1124 >                        add_mode(p, screen_modes, 1, default_mode, APPLE_640x480, DIS_SCREEN);
1125                  if (has_mode(800, 600))
1126 <                        add_mode(p, screen_modes, 2, mode, APPLE_800x600, DIS_SCREEN);
1126 >                        add_mode(p, screen_modes, 2, default_mode, APPLE_800x600, DIS_SCREEN);
1127                  if (has_mode(1024, 768))
1128 <                        add_mode(p, screen_modes, 4, mode, APPLE_1024x768, DIS_SCREEN);
1128 >                        add_mode(p, screen_modes, 4, default_mode, APPLE_1024x768, DIS_SCREEN);
1129 >                if (has_mode(1152, 768))
1130 >                        add_mode(p, screen_modes, 64, default_mode, APPLE_1152x768, DIS_SCREEN);
1131                  if (has_mode(1152, 900))
1132 <                        add_mode(p, screen_modes, 8, mode, APPLE_1152x900, DIS_SCREEN);
1132 >                        add_mode(p, screen_modes, 8, default_mode, APPLE_1152x900, DIS_SCREEN);
1133                  if (has_mode(1280, 1024))
1134 <                        add_mode(p, screen_modes, 16, mode, APPLE_1280x1024, DIS_SCREEN);
1134 >                        add_mode(p, screen_modes, 16, default_mode, APPLE_1280x1024, DIS_SCREEN);
1135                  if (has_mode(1600, 1200))
1136 <                        add_mode(p, screen_modes, 32, mode, APPLE_1600x1200, DIS_SCREEN);
1136 >                        add_mode(p, screen_modes, 32, default_mode, APPLE_1600x1200, DIS_SCREEN);
1137          } else if (screen_modes) {
1138                  int xsize = DisplayWidth(x_display, screen);
1139                  int ysize = DisplayHeight(x_display, screen);
1140 <                int apple_id;
820 <                if (xsize < 800)
821 <                        apple_id = APPLE_640x480;
822 <                else if (xsize < 1024)
823 <                        apple_id = APPLE_800x600;
824 <                else if (xsize < 1152)
825 <                        apple_id = APPLE_1024x768;
826 <                else if (xsize < 1280)
827 <                        apple_id = APPLE_1152x900;
828 <                else if (xsize < 1600)
829 <                        apple_id = APPLE_1280x1024;
830 <                else
831 <                        apple_id = APPLE_1600x1200;
1140 >                int apple_id = find_apple_resolution(xsize, ysize);
1141                  p->viType = DIS_SCREEN;
1142                  p->viRowBytes = 0;
1143                  p->viXsize = xsize;
1144                  p->viYsize = ysize;
1145 <                p->viAppleMode = mode;
1145 >                p->viAppleMode = default_mode;
1146                  p->viAppleID = apple_id;
1147                  p++;
1148          }
# Line 843 | Line 1152 | bool VideoInit(void)
1152          p->viAppleMode = 0;
1153          p->viAppleID = 0;
1154  
1155 < #ifdef ENABLE_XF86_DGA
1155 >        // Find default mode (window 640x480)
1156 >        cur_mode = -1;
1157          if (has_dga && screen_modes) {
1158 <                int v_bank, v_size;
1159 <                XF86DGAGetVideo(x_display, screen, &dga_screen_base, &dga_fb_width, &v_bank, &v_size);
1160 <                D(bug("DGA screen_base %p, v_width %d\n", dga_screen_base, dga_fb_width));
1158 >                int screen_width = DisplayWidth(x_display, screen);
1159 >                int screen_height = DisplayHeight(x_display, screen);
1160 >                int apple_id = find_apple_resolution(screen_width, screen_height);
1161 >                if (apple_id != -1)
1162 >                        cur_mode = find_mode(default_mode, apple_id, DIS_SCREEN);
1163 >        }
1164 >        if (cur_mode == -1) {
1165 >                // pick up first windowed mode available
1166 >                for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) {
1167 >                        if (p->viType == DIS_WINDOW && p->viAppleMode == default_mode) {
1168 >                                cur_mode = p - VModes;
1169 >                                break;
1170 >                        }
1171 >                }
1172 >        }
1173 >        assert(cur_mode != -1);
1174 >
1175 > #if DEBUG
1176 >        D(bug("Available video modes:\n"));
1177 >        for (p = VModes; p->viType != DIS_INVALID; p++) {
1178 >                int bits = depth_of_video_mode(p->viAppleMode);
1179 >                D(bug(" %dx%d (ID %02x), %d colors\n", p->viXsize, p->viYsize, p->viAppleID, 1 << bits));
1180          }
1181   #endif
1182  
# Line 862 | Line 1191 | bool VideoInit(void)
1191  
1192          // Start periodic thread
1193          XSync(x_display, false);
1194 <        redraw_thread_active = (pthread_create(&redraw_thread, NULL, redraw_func, NULL) == 0);
1194 >        Set_pthread_attr(&redraw_thread_attr, 0);
1195 >        redraw_thread_active = (pthread_create(&redraw_thread, &redraw_thread_attr, redraw_func, NULL) == 0);
1196          D(bug("Redraw thread installed (%ld)\n", redraw_thread));
1197          return true;
1198   }
# Line 894 | Line 1224 | void VideoExit(void)
1224                  close_display();
1225                  XFlush(x_display);
1226                  XSync(x_display, false);
897                if (depth == 8) {
898                        XFreeColormap(x_display, cmap[0]);
899                        XFreeColormap(x_display, cmap[1]);
900                }
1227          }
1228   }
1229  
# Line 961 | Line 1287 | static void resume_emul(void)
1287          // Reopen full screen display
1288          XGrabKeyboard(x_display, rootwin, 1, GrabModeAsync, GrabModeAsync, CurrentTime);
1289          XGrabPointer(x_display, rootwin, 1, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
1290 + #ifdef ENABLE_XF86_DGA
1291          XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse);
1292          XF86DGASetViewPort(x_display, screen, 0, 0);
1293 + #endif
1294          XSync(x_display, false);
1295  
1296          // the_buffer already contains the data to restore. i.e. since a temporary
# Line 1178 | Line 1506 | static void handle_events(void)
1506          for (;;) {
1507                  XEvent event;
1508  
1509 <                if (!XCheckMaskEvent(x_display, eventmask, &event))
1509 >                XDisplayLock();
1510 >                if (!XCheckMaskEvent(x_display, eventmask, &event)) {
1511 >                        // Handle clipboard events
1512 >                        if (XCheckTypedEvent(x_display, SelectionRequest, &event))
1513 >                                ClipboardSelectionRequest(&event.xselectionrequest);
1514 >                        else if (XCheckTypedEvent(x_display, SelectionClear, &event))
1515 >                                ClipboardSelectionClear(&event.xselectionclear);
1516 >
1517 >                        // Window "close" widget clicked
1518 >                        else if (XCheckTypedEvent(x_display, ClientMessage, &event)) {
1519 >                                if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) {
1520 >                                        ADBKeyDown(0x7f);       // Power key
1521 >                                        ADBKeyUp(0x7f);
1522 >                                }
1523 >                        }
1524 >
1525 >                        XDisplayUnlock();
1526                          break;
1527 +                }
1528 +                XDisplayUnlock();
1529  
1530                  switch (event.type) {
1531                          // Mouse button
# Line 1187 | Line 1533 | static void handle_events(void)
1533                                  unsigned int button = ((XButtonEvent *)&event)->button;
1534                                  if (button < 4)
1535                                          ADBMouseDown(button - 1);
1536 +                                else if (button < 6) {  // Wheel mouse
1537 +                                        if (mouse_wheel_mode == 0) {
1538 +                                                int key = (button == 5) ? 0x79 : 0x74;  // Page up/down
1539 +                                                ADBKeyDown(key);
1540 +                                                ADBKeyUp(key);
1541 +                                        } else {
1542 +                                                int key = (button == 5) ? 0x3d : 0x3e;  // Cursor up/down
1543 +                                                for(int i=0; i<mouse_wheel_lines; i++) {
1544 +                                                        ADBKeyDown(key);
1545 +                                                        ADBKeyUp(key);
1546 +                                                }
1547 +                                        }
1548 +                                }
1549                                  break;
1550                          }
1551                          case ButtonRelease: {
# Line 1196 | Line 1555 | static void handle_events(void)
1555                                  break;
1556                          }
1557  
1558 <                        // Mouse moved
1558 >                        // Mouse entered window
1559                          case EnterNotify:
1560 <                                ADBMouseMoved(((XMotionEvent *)&event)->x, ((XMotionEvent *)&event)->y);
1560 >                                if (event.xcrossing.mode != NotifyGrab && event.xcrossing.mode != NotifyUngrab)
1561 >                                        ADBMouseMoved(event.xmotion.x, event.xmotion.y);
1562                                  break;
1563 +
1564 +                        // Mouse moved
1565                          case MotionNotify:
1566 <                                ADBMouseMoved(((XMotionEvent *)&event)->x, ((XMotionEvent *)&event)->y);
1566 >                                ADBMouseMoved(event.xmotion.x, event.xmotion.y);
1567                                  break;
1568  
1569                          // Keyboard
# Line 1268 | Line 1630 | void VideoVBL(void)
1630   *  Install graphics acceleration
1631   */
1632  
1633 < #if 0
1634 < // Rectangle blitting
1635 < static void accl_bitblt(accl_params *p)
1633 > // Rectangle inversion
1634 > template< int bpp >
1635 > static inline void do_invrect(uint8 *dest, uint32 length)
1636   {
1637 <        D(bug("accl_bitblt\n"));
1637 > #define INVERT_1(PTR, OFS) ((uint8  *)(PTR))[OFS] = ~((uint8  *)(PTR))[OFS]
1638 > #define INVERT_2(PTR, OFS) ((uint16 *)(PTR))[OFS] = ~((uint16 *)(PTR))[OFS]
1639 > #define INVERT_4(PTR, OFS) ((uint32 *)(PTR))[OFS] = ~((uint32 *)(PTR))[OFS]
1640 > #define INVERT_8(PTR, OFS) ((uint64 *)(PTR))[OFS] = ~((uint64 *)(PTR))[OFS]
1641  
1642 <        // Get blitting parameters
1643 <        int16 src_X = p->src_rect[1] - p->src_bounds[1];
1644 <        int16 src_Y = p->src_rect[0] - p->src_bounds[0];
1645 <        int16 dest_X = p->dest_rect[1] - p->dest_bounds[1];
1646 <        int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0];
1647 <        int16 width = p->dest_rect[3] - p->dest_rect[1] - 1;
1283 <        int16 height = p->dest_rect[2] - p->dest_rect[0] - 1;
1284 <        D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y));
1285 <        D(bug(" width %d, height %d\n", width, height));
1642 > #ifndef UNALIGNED_PROFITABLE
1643 >        // Align on 16-bit boundaries
1644 >        if (bpp < 16 && (((uintptr)dest) & 1)) {
1645 >                INVERT_1(dest, 0);
1646 >                dest += 1; length -= 1;
1647 >        }
1648  
1649 <        // And perform the blit
1650 <        bitblt_hook(src_X, src_Y, dest_X, dest_Y, width, height);
1651 < }
1649 >        // Align on 32-bit boundaries
1650 >        if (bpp < 32 && (((uintptr)dest) & 2)) {
1651 >                INVERT_2(dest, 0);
1652 >                dest += 2; length -= 2;
1653 >        }
1654 > #endif
1655  
1656 < static bool accl_bitblt_hook(accl_params *p)
1657 < {
1658 <        D(bug("accl_draw_hook %p\n", p));
1656 >        // Invert 8-byte words
1657 >        if (length >= 8) {
1658 >                const int r = (length / 8) % 8;
1659 >                dest += r * 8;
1660  
1661 <        // Check if we can accelerate this bitblt
1662 <        if (p->src_base_addr == screen_base && p->dest_base_addr == screen_base &&
1663 <                display_type == DIS_SCREEN && bitblt_hook != NULL &&
1664 <                ((uint32 *)p)[0x18 >> 2] + ((uint32 *)p)[0x128 >> 2] == 0 &&
1665 <                ((uint32 *)p)[0x130 >> 2] == 0 &&
1666 <                p->transfer_mode == 0 &&
1667 <                p->src_row_bytes > 0 && ((uint32 *)p)[0x15c >> 2] > 0) {
1661 >                int n = ((length / 8) + 7) / 8;
1662 >                switch (r) {
1663 >                case 0: do {
1664 >                                dest += 64;
1665 >                                INVERT_8(dest, -8);
1666 >                case 7: INVERT_8(dest, -7);
1667 >                case 6: INVERT_8(dest, -6);
1668 >                case 5: INVERT_8(dest, -5);
1669 >                case 4: INVERT_8(dest, -4);
1670 >                case 3: INVERT_8(dest, -3);
1671 >                case 2: INVERT_8(dest, -2);
1672 >                case 1: INVERT_8(dest, -1);
1673 >                                } while (--n > 0);
1674 >                }
1675 >        }
1676  
1677 <                // Yes, set function pointer
1678 <                p->draw_proc = accl_bitblt;
1679 <                return true;
1677 >        // 32-bit cell to invert?
1678 >        if (length & 4) {
1679 >                INVERT_4(dest, 0);
1680 >                if (bpp <= 16)
1681 >                        dest += 4;
1682          }
1683 <        return false;
1683 >
1684 >        // 16-bit cell to invert?
1685 >        if (bpp <= 16 && (length & 2)) {
1686 >                INVERT_2(dest, 0);
1687 >                if (bpp <= 8)
1688 >                        dest += 2;
1689 >        }
1690 >
1691 >        // 8-bit cell to invert?
1692 >        if (bpp <= 8 && (length & 1))
1693 >                INVERT_1(dest, 0);
1694 >
1695 > #undef INVERT_1
1696 > #undef INVERT_2
1697 > #undef INVERT_4
1698 > #undef INVERT_8
1699   }
1700  
1701 < // Rectangle filling/inversion
1311 < static void accl_fillrect8(accl_params *p)
1701 > void NQD_invrect(uint32 p)
1702   {
1703 <        D(bug("accl_fillrect8\n"));
1703 >        D(bug("accl_invrect %08x\n", p));
1704  
1705 <        // Get filling parameters
1706 <        int16 dest_X = p->dest_rect[1] - p->dest_bounds[1];
1707 <        int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0];
1708 <        int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1;
1709 <        int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1;
1320 <        uint8 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen;
1705 >        // Get inversion parameters
1706 >        int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
1707 >        int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
1708 >        int16 width  = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
1709 >        int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
1710          D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y));
1711 <        D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max));
1711 >        D(bug(" width %d, height %d, bytes_per_row %d\n", width, height, (int32)ReadMacInt32(p + acclDestRowBytes)));
1712  
1713 <        // And perform the fill
1714 <        fillrect8_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color);
1713 >        //!!?? pen_mode == 14
1714 >
1715 >        // And perform the inversion
1716 >        const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize));
1717 >        const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
1718 >        uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp));
1719 >        width *= bpp;
1720 >        switch (bpp) {
1721 >        case 1:
1722 >                for (int i = 0; i < height; i++) {
1723 >                        do_invrect<8>(dest, width);
1724 >                        dest += dest_row_bytes;
1725 >                }
1726 >                break;
1727 >        case 2:
1728 >                for (int i = 0; i < height; i++) {
1729 >                        do_invrect<16>(dest, width);
1730 >                        dest += dest_row_bytes;
1731 >                }
1732 >                break;
1733 >        case 4:
1734 >                for (int i = 0; i < height; i++) {
1735 >                        do_invrect<32>(dest, width);
1736 >                        dest += dest_row_bytes;
1737 >                }
1738 >                break;
1739 >        }
1740   }
1741  
1742 < static void accl_fillrect32(accl_params *p)
1742 > // Rectangle filling
1743 > template< int bpp >
1744 > static inline void do_fillrect(uint8 *dest, uint32 color, uint32 length)
1745   {
1746 <        D(bug("accl_fillrect32\n"));
1746 > #define FILL_1(PTR, OFS, VAL) ((uint8  *)(PTR))[OFS] = (VAL)
1747 > #define FILL_2(PTR, OFS, VAL) ((uint16 *)(PTR))[OFS] = (VAL)
1748 > #define FILL_4(PTR, OFS, VAL) ((uint32 *)(PTR))[OFS] = (VAL)
1749 > #define FILL_8(PTR, OFS, VAL) ((uint64 *)(PTR))[OFS] = (VAL)
1750  
1751 <        // Get filling parameters
1752 <        int16 dest_X = p->dest_rect[1] - p->dest_bounds[1];
1753 <        int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0];
1754 <        int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1;
1755 <        int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1;
1756 <        uint32 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen;
1338 <        D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y));
1339 <        D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max));
1751 > #ifndef UNALIGNED_PROFITABLE
1752 >        // Align on 16-bit boundaries
1753 >        if (bpp < 16 && (((uintptr)dest) & 1)) {
1754 >                FILL_1(dest, 0, color);
1755 >                dest += 1; length -= 1;
1756 >        }
1757  
1758 <        // And perform the fill
1759 <        fillrect32_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color);
1758 >        // Align on 32-bit boundaries
1759 >        if (bpp < 32 && (((uintptr)dest) & 2)) {
1760 >                FILL_2(dest, 0, color);
1761 >                dest += 2; length -= 2;
1762 >        }
1763 > #endif
1764 >
1765 >        // Fill 8-byte words
1766 >        if (length >= 8) {
1767 >                const uint64 c = (((uint64)color) << 32) | color;
1768 >                const int r = (length / 8) % 8;
1769 >                dest += r * 8;
1770 >
1771 >                int n = ((length / 8) + 7) / 8;
1772 >                switch (r) {
1773 >                case 0: do {
1774 >                                dest += 64;
1775 >                                FILL_8(dest, -8, c);
1776 >                case 7: FILL_8(dest, -7, c);
1777 >                case 6: FILL_8(dest, -6, c);
1778 >                case 5: FILL_8(dest, -5, c);
1779 >                case 4: FILL_8(dest, -4, c);
1780 >                case 3: FILL_8(dest, -3, c);
1781 >                case 2: FILL_8(dest, -2, c);
1782 >                case 1: FILL_8(dest, -1, c);
1783 >                                } while (--n > 0);
1784 >                }
1785 >        }
1786 >
1787 >        // 32-bit cell to fill?
1788 >        if (length & 4) {
1789 >                FILL_4(dest, 0, color);
1790 >                if (bpp <= 16)
1791 >                        dest += 4;
1792 >        }
1793 >
1794 >        // 16-bit cell to fill?
1795 >        if (bpp <= 16 && (length & 2)) {
1796 >                FILL_2(dest, 0, color);
1797 >                if (bpp <= 8)
1798 >                        dest += 2;
1799 >        }
1800 >
1801 >        // 8-bit cell to fill?
1802 >        if (bpp <= 8 && (length & 1))
1803 >                FILL_1(dest, 0, color);
1804 >
1805 > #undef FILL_1
1806 > #undef FILL_2
1807 > #undef FILL_4
1808 > #undef FILL_8
1809   }
1810  
1811 < static void accl_invrect(accl_params *p)
1811 > void NQD_fillrect(uint32 p)
1812   {
1813 <        D(bug("accl_invrect\n"));
1813 >        D(bug("accl_fillrect %08x\n", p));
1814  
1815 <        // Get inversion parameters
1816 <        int16 dest_X = p->dest_rect[1] - p->dest_bounds[1];
1817 <        int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0];
1818 <        int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1;
1819 <        int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1;
1815 >        // Get filling parameters
1816 >        int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
1817 >        int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
1818 >        int16 width  = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
1819 >        int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
1820 >        uint32 color = htonl(ReadMacInt32(p + acclPenMode) == 8 ? ReadMacInt32(p + acclForePen) : ReadMacInt32(p + acclBackPen));
1821          D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y));
1822 <        D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max));
1823 <
1357 <        //!!?? pen_mode == 14
1822 >        D(bug(" width %d, height %d\n", width, height));
1823 >        D(bug(" bytes_per_row %d color %08x\n", (int32)ReadMacInt32(p + acclDestRowBytes), color));
1824  
1825 <        // And perform the inversion
1826 <        invrect_hook(dest_X, dest_Y, dest_X_max, dest_Y_max);
1825 >        // And perform the fill
1826 >        const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize));
1827 >        const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
1828 >        uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp));
1829 >        width *= bpp;
1830 >        switch (bpp) {
1831 >        case 1:
1832 >                for (int i = 0; i < height; i++) {
1833 >                        memset(dest, color, width);
1834 >                        dest += dest_row_bytes;
1835 >                }
1836 >                break;
1837 >        case 2:
1838 >                for (int i = 0; i < height; i++) {
1839 >                        do_fillrect<16>(dest, color, width);
1840 >                        dest += dest_row_bytes;
1841 >                }
1842 >                break;
1843 >        case 4:
1844 >                for (int i = 0; i < height; i++) {
1845 >                        do_fillrect<32>(dest, color, width);
1846 >                        dest += dest_row_bytes;
1847 >                }
1848 >                break;
1849 >        }
1850   }
1851  
1852 < static bool accl_fillrect_hook(accl_params *p)
1852 > bool NQD_fillrect_hook(uint32 p)
1853   {
1854 <        D(bug("accl_fillrect_hook %p\n", p));
1854 >        D(bug("accl_fillrect_hook %08x\n", p));
1855  
1856          // Check if we can accelerate this fillrect
1857 <        if (p->dest_base_addr == screen_base && ((uint32 *)p)[0x284 >> 2] != 0 && display_type == DIS_SCREEN) {
1858 <                if (p->transfer_mode == 8) {
1857 >        if (ReadMacInt32(p + 0x284) != 0 && ReadMacInt32(p + acclDestPixelSize) >= 8) {
1858 >                const int transfer_mode = ReadMacInt32(p + acclTransferMode);
1859 >                if (transfer_mode == 8) {
1860                          // Fill
1861 <                        if (p->dest_pixel_size == 8 && fillrect8_hook != NULL) {
1862 <                                p->draw_proc = accl_fillrect8;
1863 <                                return true;
1864 <                        } else if (p->dest_pixel_size == 32 && fillrect32_hook != NULL) {
1375 <                                p->draw_proc = accl_fillrect32;
1376 <                                return true;
1377 <                        }
1378 <                } else if (p->transfer_mode == 10 && invrect_hook != NULL) {
1861 >                        WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_FILLRECT));
1862 >                        return true;
1863 >                }
1864 >                else if (transfer_mode == 10) {
1865                          // Invert
1866 <                        p->draw_proc = accl_invrect;
1866 >                        WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_INVRECT));
1867                          return true;
1868                  }
1869          }
1870          return false;
1871   }
1872  
1873 + // Rectangle blitting
1874 + // TODO: optimize for VOSF and target pixmap == screen
1875 + void NQD_bitblt(uint32 p)
1876 + {
1877 +        D(bug("accl_bitblt %08x\n", p));
1878 +
1879 +        // Get blitting parameters
1880 +        int16 src_X  = (int16)ReadMacInt16(p + acclSrcRect + 2) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 2);
1881 +        int16 src_Y  = (int16)ReadMacInt16(p + acclSrcRect + 0) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 0);
1882 +        int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
1883 +        int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
1884 +        int16 width  = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
1885 +        int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
1886 +        D(bug(" src addr %08x, dest addr %08x\n", ReadMacInt32(p + acclSrcBaseAddr), ReadMacInt32(p + acclDestBaseAddr)));
1887 +        D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y));
1888 +        D(bug(" width %d, height %d\n", width, height));
1889 +
1890 +        // And perform the blit
1891 +        const int bpp = bytes_per_pixel(ReadMacInt32(p + acclSrcPixelSize));
1892 +        width *= bpp;
1893 +        if ((int32)ReadMacInt32(p + acclSrcRowBytes) > 0) {
1894 +                const int src_row_bytes = (int32)ReadMacInt32(p + acclSrcRowBytes);
1895 +                const int dst_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
1896 +                uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + (src_Y * src_row_bytes) + (src_X * bpp));
1897 +                uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dst_row_bytes) + (dest_X * bpp));
1898 +                for (int i = 0; i < height; i++) {
1899 +                        memmove(dst, src, width);
1900 +                        src += src_row_bytes;
1901 +                        dst += dst_row_bytes;
1902 +                }
1903 +        }
1904 +        else {
1905 +                const int src_row_bytes = -(int32)ReadMacInt32(p + acclSrcRowBytes);
1906 +                const int dst_row_bytes = -(int32)ReadMacInt32(p + acclDestRowBytes);
1907 +                uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + ((src_Y + height - 1) * src_row_bytes) + (src_X * bpp));
1908 +                uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + ((dest_Y + height - 1) * dst_row_bytes) + (dest_X * bpp));
1909 +                for (int i = height - 1; i >= 0; i--) {
1910 +                        memmove(dst, src, width);
1911 +                        src -= src_row_bytes;
1912 +                        dst -= dst_row_bytes;
1913 +                }
1914 +        }
1915 + }
1916 +
1917 + /*
1918 +  BitBlt transfer modes:
1919 +  0 : srcCopy
1920 +  1 : srcOr
1921 +  2 : srcXor
1922 +  3 : srcBic
1923 +  4 : notSrcCopy
1924 +  5 : notSrcOr
1925 +  6 : notSrcXor
1926 +  7 : notSrcBic
1927 +  32 : blend
1928 +  33 : addPin
1929 +  34 : addOver
1930 +  35 : subPin
1931 +  36 : transparent
1932 +  37 : adMax
1933 +  38 : subOver
1934 +  39 : adMin
1935 +  50 : hilite
1936 + */
1937 +
1938 + bool NQD_bitblt_hook(uint32 p)
1939 + {
1940 +        D(bug("accl_draw_hook %08x\n", p));
1941 +
1942 +        // Check if we can accelerate this bitblt
1943 +        if (ReadMacInt32(p + 0x018) + ReadMacInt32(p + 0x128) == 0 &&
1944 +                ReadMacInt32(p + 0x130) == 0 &&
1945 +                ReadMacInt32(p + acclSrcPixelSize) >= 8 &&
1946 +                ReadMacInt32(p + acclSrcPixelSize) == ReadMacInt32(p + acclDestPixelSize) &&
1947 +                (ReadMacInt32(p + acclSrcRowBytes) ^ ReadMacInt32(p + acclDestRowBytes)) >= 0 && // same sign?
1948 +                ReadMacInt32(p + acclTransferMode) == 0 &&                                                                               // srcCopy?
1949 +                ReadMacInt32(p + 0x15c) > 0) {
1950 +
1951 +                // Yes, set function pointer
1952 +                WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_BITBLT));
1953 +                return true;
1954 +        }
1955 +        return false;
1956 + }
1957 +
1958   // Wait for graphics operation to finish
1959 < static bool accl_sync_hook(void *arg)
1959 > bool NQD_sync_hook(uint32 arg)
1960   {
1961 <        D(bug("accl_sync_hook %p\n", arg));
1391 <        if (sync_hook != NULL)
1392 <                sync_hook();
1961 >        D(bug("accl_sync_hook %08x\n", arg));
1962          return true;
1963   }
1964  
1396 static struct accl_hook_info bitblt_hook_info = {accl_bitblt_hook, accl_sync_hook, ACCL_BITBLT};
1397 static struct accl_hook_info fillrect_hook_info = {accl_fillrect_hook, accl_sync_hook, ACCL_FILLRECT};
1398 #endif
1399
1965   void VideoInstallAccel(void)
1966   {
1967          // Install acceleration hooks
1968          if (PrefsFindBool("gfxaccel")) {
1969                  D(bug("Video: Installing acceleration hooks\n"));
1970 < //!!    NQDMisc(6, &bitblt_hook_info);
1971 < //              NQDMisc(6, &fillrect_hook_info);
1970 >                uint32 base;
1971 >
1972 >                SheepVar bitblt_hook_info(sizeof(accl_hook_info));
1973 >                base = bitblt_hook_info.addr();
1974 >                WriteMacInt32(base + 0, NativeTVECT(NATIVE_BITBLT_HOOK));
1975 >                WriteMacInt32(base + 4, NativeTVECT(NATIVE_SYNC_HOOK));
1976 >                WriteMacInt32(base + 8, ACCL_BITBLT);
1977 >                NQDMisc(6, bitblt_hook_info.ptr());
1978 >
1979 >                SheepVar fillrect_hook_info(sizeof(accl_hook_info));
1980 >                base = fillrect_hook_info.addr();
1981 >                WriteMacInt32(base + 0, NativeTVECT(NATIVE_FILLRECT_HOOK));
1982 >                WriteMacInt32(base + 4, NativeTVECT(NATIVE_SYNC_HOOK));
1983 >                WriteMacInt32(base + 8, ACCL_FILLRECT);
1984 >                NQDMisc(6, fillrect_hook_info.ptr());
1985          }
1986   }
1987  
# Line 1466 | Line 2044 | int16 video_mode_change(VidLocals *csSav
2044  
2045   void video_set_palette(void)
2046   {
2047 +        LOCK_PALETTE;
2048 +
2049 +        // Convert colors to XColor array
2050 +        int mode = get_current_mode();
2051 +        int num_in = palette_size(mode);
2052 +        int num_out = 256;
2053 +        bool stretch = false;
2054 +        if (IsDirectMode(mode)) {
2055 +                // If X is in 565 mode we have to stretch the gamma table from 32 to 64 entries
2056 +                num_out = vis->map_entries;
2057 +                stretch = true;
2058 +        }
2059 +        XColor *p = x_palette;
2060 +        for (int i=0; i<num_out; i++) {
2061 +                int c = (stretch ? (i * num_in) / num_out : i);
2062 +                p->red = mac_pal[c].red * 0x0101;
2063 +                p->green = mac_pal[c].green * 0x0101;
2064 +                p->blue = mac_pal[c].blue * 0x0101;
2065 +                p++;
2066 +        }
2067 +
2068 + #ifdef ENABLE_VOSF
2069 +        // Recalculate pixel color expansion map
2070 +        if (!IsDirectMode(mode) && xdepth > 8) {
2071 +                for (int i=0; i<256; i++) {
2072 +                        int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier)
2073 +                        ExpandMap[i] = map_rgb(mac_pal[c].red, mac_pal[c].green, mac_pal[c].blue);
2074 +                }
2075 +
2076 +                // We have to redraw everything because the interpretation of pixel values changed
2077 +                LOCK_VOSF;
2078 +                PFLAG_SET_ALL;
2079 +                UNLOCK_VOSF;
2080 +                memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize);
2081 +        }
2082 + #endif
2083 +
2084 +        // Tell redraw thread to change palette
2085          palette_changed = true;
2086 +
2087 +        UNLOCK_PALETTE;
2088 + }
2089 +
2090 +
2091 + /*
2092 + *  Can we set the MacOS cursor image into the window?
2093 + */
2094 +
2095 + bool video_can_change_cursor(void)
2096 + {
2097 +        return hw_mac_cursor_accl && (display_type != DIS_SCREEN);
2098   }
2099  
2100  
# Line 1593 | Line 2221 | static void update_display(void)
2221  
2222          // Refresh display
2223          if (high && wide) {
2224 +                XDisplayLock();
2225                  if (have_shm)
2226                          XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high, 0);
2227                  else
2228                          XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high);
2229 +                XDisplayUnlock();
2230          }
2231   }
2232  
2233 + const int VIDEO_REFRESH_HZ = 60;
2234 + const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ;
2235 +
2236 + static void handle_palette_changes(void)
2237 + {
2238 +        LOCK_PALETTE;
2239 +
2240 +        if (palette_changed && !emul_suspended) {
2241 +                palette_changed = false;
2242 +
2243 +                int mode = get_current_mode();
2244 +                if (color_class == PseudoColor || color_class == DirectColor) {
2245 +                        int num = vis->map_entries;
2246 +                        bool set_clut = true;
2247 +                        if (!IsDirectMode(mode) && color_class == DirectColor) {
2248 +                                if (display_type == DIS_WINDOW)
2249 +                                        set_clut = false; // Indexed mode on true color screen, don't set CLUT
2250 +                        }
2251 +
2252 +                        if (set_clut) {
2253 +                                XDisplayLock();
2254 +                                XStoreColors(x_display, cmap[0], x_palette, num);
2255 +                                XStoreColors(x_display, cmap[1], x_palette, num);
2256 +                                XSync(x_display, false);
2257 +                                XDisplayUnlock();
2258 +                        }
2259 +                }
2260 +
2261 + #ifdef ENABLE_XF86_DGA
2262 +                if (display_type == DIS_SCREEN) {
2263 +                        current_dga_cmap ^= 1;
2264 +                        if (!IsDirectMode(mode) && cmap[current_dga_cmap])
2265 +                                XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
2266 +                }
2267 + #endif
2268 +        }
2269 +
2270 +        UNLOCK_PALETTE;
2271 + }
2272 +
2273   static void *redraw_func(void *arg)
2274   {
2275 <        int tick_counter = 0;
1606 <        struct timespec req = {0, 16666667};
2275 >        int fd = ConnectionNumber(x_display);
2276  
2277 <        for (;;) {
2277 >        uint64 start = GetTicks_usec();
2278 >        int64 ticks = 0;
2279 >        uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY;
2280  
2281 <                // Wait
1611 <                nanosleep(&req, NULL);
2281 >        for (;;) {
2282  
2283                  // Pause if requested (during video mode switches)
2284                  while (thread_stop_req)
2285                          thread_stop_ack = true;
2286  
2287 <                // Handle X11 events
2288 <                handle_events();
2287 >                int64 delay = next - GetTicks_usec();
2288 >                if (delay < -VIDEO_REFRESH_DELAY) {
2289 >
2290 >                        // We are lagging far behind, so we reset the delay mechanism
2291 >                        next = GetTicks_usec();
2292 >
2293 >                } else if (delay <= 0) {
2294  
2295 <                // Quit DGA mode if requested
2296 <                if (quit_full_screen) {
2297 <                        quit_full_screen = false;
2298 <                        if (display_type == DIS_SCREEN) {
2295 >                        // Delay expired, refresh display
2296 >                        next += VIDEO_REFRESH_DELAY;
2297 >                        ticks++;
2298 >
2299 >                        // Handle X11 events
2300 >                        handle_events();
2301 >
2302 >                        // Quit DGA mode if requested
2303 >                        if (quit_full_screen) {
2304 >                                quit_full_screen = false;
2305 >                                if (display_type == DIS_SCREEN) {
2306 >                                        XDisplayLock();
2307   #ifdef ENABLE_XF86_DGA
2308 <                                XF86DGADirectVideo(x_display, screen, 0);
2309 <                                XUngrabPointer(x_display, CurrentTime);
2310 <                                XUngrabKeyboard(x_display, CurrentTime);
2311 < #endif
2312 <                                XSync(x_display, false);
2313 <                                quit_full_screen_ack = true;
2314 <                                return NULL;
2308 >                                        XF86DGADirectVideo(x_display, screen, 0);
2309 >                                        XUngrabPointer(x_display, CurrentTime);
2310 >                                        XUngrabKeyboard(x_display, CurrentTime);
2311 >                                        XUnmapWindow(x_display, the_win);
2312 >                                        wait_unmapped(the_win);
2313 >                                        XDestroyWindow(x_display, the_win);
2314 > #endif
2315 >                                        XSync(x_display, false);
2316 >                                        XDisplayUnlock();
2317 >                                        quit_full_screen_ack = true;
2318 >                                        return NULL;
2319 >                                }
2320                          }
1633                }
2321  
2322 <                // Refresh display and set cursor image in window mode
2323 <                if (display_type == DIS_WINDOW) {
2324 <                        tick_counter++;
2325 <                        if (tick_counter >= frame_skip) {
2326 <                                tick_counter = 0;
2322 >                        // Refresh display and set cursor image in window mode
2323 >                        static int tick_counter = 0;
2324 >                        if (display_type == DIS_WINDOW) {
2325 >                                tick_counter++;
2326 >                                if (tick_counter >= frame_skip) {
2327 >                                        tick_counter = 0;
2328  
2329 <                                // Update display
2329 >                                        // Update display
2330   #ifdef ENABLE_VOSF
2331 <                                if (use_vosf) {
2332 <                                        if (mainBuffer.dirty) {
2333 <                                                LOCK_VOSF;
2334 <                                                update_display_window_vosf();
2335 <                                                UNLOCK_VOSF;
2336 <                                                XSync(x_display, false); // Let the server catch up
2331 >                                        if (use_vosf) {
2332 >                                                XDisplayLock();
2333 >                                                if (mainBuffer.dirty) {
2334 >                                                        LOCK_VOSF;
2335 >                                                        update_display_window_vosf();
2336 >                                                        UNLOCK_VOSF;
2337 >                                                        XSync(x_display, false); // Let the server catch up
2338 >                                                }
2339 >                                                XDisplayUnlock();
2340                                          }
2341 <                                }
1651 <                                else
2341 >                                        else
2342   #endif
2343 <                                        update_display();
2343 >                                                update_display();
2344  
2345 <                                // Set new cursor image if it was changed
2346 <                                if (cursor_changed) {
2347 <                                        cursor_changed = false;
2348 <                                        memcpy(cursor_image->data, MacCursor + 4, 32);
2349 <                                        memcpy(cursor_mask_image->data, MacCursor + 36, 32);
2350 <                                        XFreeCursor(x_display, mac_cursor);
2351 <                                        XPutImage(x_display, cursor_map, cursor_gc, cursor_image, 0, 0, 0, 0, 16, 16);
2352 <                                        XPutImage(x_display, cursor_mask_map, cursor_mask_gc, cursor_mask_image, 0, 0, 0, 0, 16, 16);
2353 <                                        mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, MacCursor[2], MacCursor[3]);
2354 <                                        XDefineCursor(x_display, the_win, mac_cursor);
2345 >                                        // Set new cursor image if it was changed
2346 >                                        if (hw_mac_cursor_accl && cursor_changed) {
2347 >                                                cursor_changed = false;
2348 >                                                memcpy(cursor_image->data, MacCursor + 4, 32);
2349 >                                                memcpy(cursor_mask_image->data, MacCursor + 36, 32);
2350 >                                                XDisplayLock();
2351 >                                                XFreeCursor(x_display, mac_cursor);
2352 >                                                XPutImage(x_display, cursor_map, cursor_gc, cursor_image, 0, 0, 0, 0, 16, 16);
2353 >                                                XPutImage(x_display, cursor_mask_map, cursor_mask_gc, cursor_mask_image, 0, 0, 0, 0, 16, 16);
2354 >                                                mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, MacCursor[2], MacCursor[3]);
2355 >                                                XDefineCursor(x_display, the_win, mac_cursor);
2356 >                                                XDisplayUnlock();
2357 >                                        }
2358                                  }
2359                          }
1667                }
2360   #ifdef ENABLE_VOSF
2361 <                else if (use_vosf) {
2362 <                        // Update display (VOSF variant)
2363 <                        static int tick_counter = 0;
2364 <                        if (++tick_counter >= frame_skip) {
2365 <                                tick_counter = 0;
2366 <                                if (mainBuffer.dirty) {
2367 <                                        LOCK_VOSF;
2368 <                                        update_display_dga_vosf();
2369 <                                        UNLOCK_VOSF;
2361 >                        else if (use_vosf) {
2362 >                                // Update display (VOSF variant)
2363 >                                if (++tick_counter >= frame_skip) {
2364 >                                        tick_counter = 0;
2365 >                                        if (mainBuffer.dirty) {
2366 >                                                LOCK_VOSF;
2367 >                                                update_display_dga_vosf();
2368 >                                                UNLOCK_VOSF;
2369 >                                        }
2370                                  }
2371                          }
1680                }
2372   #endif
2373  
2374 <                // Set new palette if it was changed
2375 <                if (palette_changed && !emul_suspended) {
2376 <                        palette_changed = false;
2377 <                        XColor c[256];
2378 <                        for (int i=0; i<256; i++) {
2379 <                                c[i].pixel = i;
2380 <                                c[i].red = mac_pal[i].red * 0x0101;
2381 <                                c[i].green = mac_pal[i].green * 0x0101;
2382 <                                c[i].blue = mac_pal[i].blue * 0x0101;
2383 <                                c[i].flags = DoRed | DoGreen | DoBlue;
2384 <                        }
2385 <                        if (depth == 8) {
2386 <                                XStoreColors(x_display, cmap[0], c, 256);
2387 <                                XStoreColors(x_display, cmap[1], c, 256);
1697 < #ifdef ENABLE_XF86_DGA
1698 <                                if (display_type == DIS_SCREEN) {
1699 <                                        current_dga_cmap ^= 1;
1700 <                                        XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]);
1701 <                                }
1702 < #endif
1703 <                        }
2374 >                        // Set new palette if it was changed
2375 >                        handle_palette_changes();
2376 >
2377 >                } else {
2378 >
2379 >                        // No display refresh pending, check for X events
2380 >                        fd_set readfds;
2381 >                        FD_ZERO(&readfds);
2382 >                        FD_SET(fd, &readfds);
2383 >                        struct timeval timeout;
2384 >                        timeout.tv_sec = 0;
2385 >                        timeout.tv_usec = delay;
2386 >                        if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0)
2387 >                                handle_events();
2388                  }
2389          }
2390          return NULL;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines