ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/BeOS/video_beos.cpp
Revision: 1.15
Committed: 2004-01-12T15:29:23Z (20 years, 10 months ago) by cebix
Branch: MAIN
CVS Tags: nigel-build-16, nigel-build-15
Changes since 1.14: +1 -1 lines
Log Message:
Happy New Year! :)

File Contents

# User Rev Content
1 cebix 1.1 /*
2     * video_beos.cpp - Video/graphics emulation, BeOS specific stuff
3     *
4 cebix 1.15 * Basilisk II (C) 1997-2004 Christian Bauer
5 cebix 1.14 * Portions written by Marc Hellwig
6 cebix 1.1 *
7     * This program is free software; you can redistribute it and/or modify
8     * it under the terms of the GNU General Public License as published by
9     * the Free Software Foundation; either version 2 of the License, or
10     * (at your option) any later version.
11     *
12     * This program is distributed in the hope that it will be useful,
13     * but WITHOUT ANY WARRANTY; without even the implied warranty of
14     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15     * GNU General Public License for more details.
16     *
17     * You should have received a copy of the GNU General Public License
18     * along with this program; if not, write to the Free Software
19     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20     */
21    
22     #include <AppKit.h>
23     #include <InterfaceKit.h>
24     #include <GameKit.h>
25    
26     #include <stdio.h>
27     #include <string.h>
28    
29     #include "sysdeps.h"
30     #include "cpu_emulation.h"
31     #include "main.h"
32     #include "macos_util.h"
33     #include "prefs.h"
34     #include "adb.h"
35     #include "prefs.h"
36     #include "user_strings.h"
37 cebix 1.7 #include "about_window.h"
38 cebix 1.1 #include "video.h"
39    
40     #include "m68k.h"
41     #include "memory.h"
42     #include "readcpu.h"
43     #include "newcpu.h"
44    
45     #define DEBUG 0
46     #include "debug.h"
47    
48     #define DEBUGGER_AVAILABLE 0
49    
50    
51     // Messages
52     const uint32 MSG_REDRAW = 'draw';
53     const uint32 MSG_ABOUT_REQUESTED = B_ABOUT_REQUESTED;
54     const uint32 MSG_REF_5HZ = ' 5Hz';
55     const uint32 MSG_REF_7_5HZ = ' 7Hz';
56     const uint32 MSG_REF_10HZ = '10Hz';
57     const uint32 MSG_REF_15HZ = '15Hz';
58     const uint32 MSG_REF_30HZ = '30Hz';
59     const uint32 MSG_REF_60HZ = '60Hz';
60     const uint32 MSG_MOUNT = 'moun';
61     const uint32 MSG_DEBUGGER = 'dbug';
62    
63     // Display types
64     enum {
65     DISPLAY_WINDOW,
66     DISPLAY_SCREEN
67     };
68    
69     // From sys_beos.cpp
70     extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg);
71     extern void SysMountVolume(const char *name);
72    
73    
74     /*
75     * A simple view class for blitting a bitmap on the screen
76     */
77    
78     class BitmapView : public BView {
79     public:
80     BitmapView(BRect frame, BBitmap *bitmap) : BView(frame, "bitmap", B_FOLLOW_NONE, B_WILL_DRAW)
81     {
82     the_bitmap = bitmap;
83     }
84     virtual void Draw(BRect update)
85     {
86     DrawBitmap(the_bitmap, update, update);
87     }
88     virtual void MouseMoved(BPoint point, uint32 transit, const BMessage *message);
89    
90     private:
91     BBitmap *the_bitmap;
92     };
93    
94    
95     /*
96     * Window class
97     */
98    
99     class MacWindow : public BDirectWindow {
100     public:
101     MacWindow(BRect frame);
102     virtual ~MacWindow();
103     virtual void MessageReceived(BMessage *msg);
104     virtual void DirectConnected(direct_buffer_info *info);
105     virtual void WindowActivated(bool active);
106    
107     int32 frame_skip;
108     bool mouse_in_view; // Flag: Mouse pointer within bitmap view
109     uint8 remap_mac_be[256]; // For remapping of Mac colors to Be colors
110    
111     private:
112     static status_t tick_func(void *arg);
113    
114     thread_id tick_thread;
115     bool tick_thread_active; // Flag for quitting the tick thread
116    
117     BitmapView *main_view; // Main view for bitmap drawing
118     BBitmap *the_bitmap; // Mac screen bitmap
119     uint8 *the_buffer; // Mac frame buffer
120    
121     uint32 old_scroll_lock_state;
122    
123     bool supports_direct_mode; // Flag: Direct frame buffer access supported
124     sem_id drawing_sem;
125    
126     void *bits;
127     int32 bytes_per_row;
128     color_space pixel_format;
129     bool unclipped;
130     };
131    
132    
133     /*
134     * Screen class
135     */
136    
137     class MacScreen : public BWindowScreen {
138     public:
139 cebix 1.2 MacScreen(const char *name, int mode_bit, status_t *error);
140 cebix 1.1 virtual ~MacScreen();
141     virtual void Quit(void);
142     virtual void ScreenConnected(bool active);
143    
144     rgb_color palette[256]; // Color palette, 256 entries
145     bool palette_changed;
146    
147     private:
148     static status_t tick_func(void *arg);
149    
150     thread_id tick_thread;
151     bool tick_thread_active; // Flag for quitting the tick thread
152    
153     BView *main_view; // Main view for GetMouse()
154     uint8 *frame_backup; // Frame buffer backup when switching from/to different workspace
155     bool quitting; // Flag for ScreenConnected: We are quitting, don't pause emulator thread
156     bool screen_active;
157 cebix 1.8 bool first_time;
158 cebix 1.1 };
159    
160    
161     // Global variables
162     static int display_type = DISPLAY_WINDOW; // See enum above
163     static MacWindow *the_window = NULL; // Pointer to the window
164     static MacScreen *the_screen = NULL; // Pointer to the screen
165     static sem_id mac_os_lock = -1; // This is used to stop the MacOS thread when the Basilisk workspace is switched out
166     static uint8 MacCursor[68] = {16, 1}; // Mac cursor image
167    
168    
169     /*
170     * Initialization
171     */
172    
173 cebix 1.8 // Add resolution to list of supported modes and set VideoMonitor
174     static void set_video_monitor(uint32 width, uint32 height, uint32 bytes_per_row, int depth)
175     {
176     video_mode mode;
177    
178     mode.x = width;
179     mode.y = height;
180     mode.resolution_id = 0x80;
181     mode.bytes_per_row = bytes_per_row;
182    
183     switch (depth) {
184     case 1:
185     mode.depth = VDEPTH_1BIT;
186     break;
187     case 2:
188     mode.depth = VDEPTH_2BIT;
189     break;
190     case 4:
191     mode.depth = VDEPTH_4BIT;
192     break;
193     case 8:
194     mode.depth = VDEPTH_8BIT;
195     break;
196     case 15:
197     mode.depth = VDEPTH_16BIT;
198     break;
199     case 16:
200     mode.depth = VDEPTH_16BIT;
201     break;
202     case 24:
203     case 32:
204     mode.depth = VDEPTH_32BIT;
205     break;
206     }
207    
208     VideoModes.push_back(mode);
209 cebix 1.13 video_init_depth_list();
210 cebix 1.8 VideoMonitor.mode = mode;
211     }
212    
213    
214 cebix 1.1 bool VideoInit(bool classic)
215     {
216     // Create semaphore
217     mac_os_lock = create_sem(0, "MacOS Frame Buffer Lock");
218    
219     // Get screen mode from preferences
220     const char *mode_str = PrefsFindString("screen");
221    
222     // Determine type and mode
223     display_type = DISPLAY_WINDOW;
224     int width = 512, height = 384;
225     int scr_mode_bit = 0;
226     if (mode_str) {
227     if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2)
228     display_type = DISPLAY_WINDOW;
229     else if (sscanf(mode_str, "scr/%d", &scr_mode_bit) == 1)
230     display_type = DISPLAY_SCREEN;
231     }
232    
233     // Open display
234     switch (display_type) {
235     case DISPLAY_WINDOW:
236     the_window = new MacWindow(BRect(0, 0, width-1, height-1));
237     break;
238     case DISPLAY_SCREEN: {
239     status_t screen_error;
240     the_screen = new MacScreen(GetString(STR_WINDOW_TITLE), scr_mode_bit & 0x1f, &screen_error);
241     if (screen_error != B_NO_ERROR) {
242     the_screen->PostMessage(B_QUIT_REQUESTED);
243     while (the_screen)
244     snooze(200000);
245 cebix 1.10 ErrorAlert(STR_OPEN_SCREEN_ERR);
246 cebix 1.1 return false;
247     } else {
248     the_screen->Show();
249     acquire_sem(mac_os_lock);
250     }
251     break;
252     }
253     }
254     return true;
255     }
256    
257    
258     /*
259     * Deinitialization
260     */
261    
262     void VideoExit(void)
263     {
264     // Close display
265     switch (display_type) {
266     case DISPLAY_WINDOW:
267     if (the_window != NULL) {
268     the_window->PostMessage(B_QUIT_REQUESTED);
269     while (the_window)
270     snooze(200000);
271     }
272     break;
273     case DISPLAY_SCREEN:
274     if (the_screen != NULL) {
275     the_screen->PostMessage(B_QUIT_REQUESTED);
276     while (the_screen)
277     snooze(200000);
278     }
279     break;
280     }
281    
282     // Delete semaphore
283     delete_sem(mac_os_lock);
284     }
285    
286    
287     /*
288     * Set palette
289     */
290    
291 cebix 1.12 void video_set_palette(uint8 *pal, int num)
292 cebix 1.1 {
293     switch (display_type) {
294     case DISPLAY_WINDOW: {
295     BScreen screen(the_window);
296     for (int i=0; i<256; i++)
297     the_window->remap_mac_be[i] = screen.IndexForColor(pal[i*3], pal[i*3+1], pal[i*3+2]);
298     break;
299     }
300     case DISPLAY_SCREEN:
301     for (int i=0; i<256; i++) {
302     the_screen->palette[i].red = pal[i*3];
303     the_screen->palette[i].green = pal[i*3+1];
304     the_screen->palette[i].blue = pal[i*3+2];
305     }
306     the_screen->palette_changed = true;
307     break;
308     }
309     }
310    
311    
312     /*
313 cebix 1.9 * Switch video mode
314     */
315    
316     void video_switch_to_mode(const video_mode &mode)
317     {
318     }
319    
320    
321     /*
322 cebix 1.1 * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode)
323     */
324    
325     void VideoQuitFullScreen(void)
326     {
327     D(bug("VideoQuitFullScreen()\n"));
328     if (display_type == DISPLAY_SCREEN) {
329     if (the_screen != NULL) {
330     the_screen->PostMessage(B_QUIT_REQUESTED);
331     while (the_screen)
332     snooze(200000);
333     }
334     }
335     }
336    
337    
338     /*
339     * Video event handling (not neccessary under BeOS, handled by filter function)
340     */
341    
342     void VideoInterrupt(void)
343     {
344     release_sem(mac_os_lock);
345     while (acquire_sem(mac_os_lock) == B_INTERRUPTED) ;
346     }
347    
348    
349     /*
350     * Filter function for receiving mouse and keyboard events
351     */
352    
353     #define MENU_IS_POWER 0
354    
355     // Be -> Mac raw keycode translation table
356     static const uint8 keycode2mac[0x80] = {
357     0xff, 0x35, 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, // inv Esc F1 F2 F3 F4 F5 F6
358     0x62, 0x64, 0x65, 0x6d, 0x67, 0x6f, 0x69, 0x6b, // F7 F8 F9 F10 F11 F12 F13 F14
359     0x71, 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, // F15 ` 1 2 3 4 5 6
360     0x1a, 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x33, 0x72, // 7 8 9 0 - = BSP INS
361     0x73, 0x74, 0x47, 0x4b, 0x43, 0x4e, 0x30, 0x0c, // HOM PUP NUM / * - TAB Q
362     0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, 0x1f, // W E R T Y U I O
363     0x23, 0x21, 0x1e, 0x2a, 0x75, 0x77, 0x79, 0x59, // P [ ] \ DEL END PDN 7
364     0x5b, 0x5c, 0x45, 0x39, 0x00, 0x01, 0x02, 0x03, // 8 9 + CAP A S D F
365     0x05, 0x04, 0x26, 0x28, 0x25, 0x29, 0x27, 0x24, // G H J K L ; ' RET
366     0x56, 0x57, 0x58, 0x38, 0x06, 0x07, 0x08, 0x09, // 4 5 6 SHL Z X C V
367     0x0b, 0x2d, 0x2e, 0x2b, 0x2f, 0x2c, 0x38, 0x3e, // B N M , . / SHR CUP
368     0x53, 0x54, 0x55, 0x4c, 0x36, 0x37, 0x31, 0x37, // 1 2 3 ENT CTL ALT SPC ALT
369     0x36, 0x3b, 0x3d, 0x3c, 0x52, 0x41, 0x3a, 0x3a, // CTR CLF CDN CRT 0 . CMD CMD
370     #if MENU_IS_POWER
371     0x7f, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv
372     #else
373     0x32, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv
374     #endif
375     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv
376     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv
377     };
378    
379     static const uint8 modifier2mac[0x20] = {
380     #if MENU_IS_POWER
381     0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x7f, // SHF CMD inv CAP F14 NUM OPT MNU
382     #else
383     0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x32, // SHF CMD CTR CAP F14 NUM OPT MNU
384     #endif
385     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv
386     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv
387     0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv
388     };
389    
390     static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter)
391     {
392     switch (msg->what) {
393     case B_KEY_DOWN:
394     case B_KEY_UP: {
395     uint32 be_code = msg->FindInt32("key") & 0xff;
396     uint32 mac_code = keycode2mac[be_code];
397    
398     // Intercept Ctrl-F1 (mount floppy disk shortcut)
399     uint32 mods = msg->FindInt32("modifiers");
400     if (be_code == 0x02 && (mods & B_CONTROL_KEY))
401     SysMountVolume("/dev/disk/floppy/raw");
402    
403     if (mac_code == 0xff)
404     return B_DISPATCH_MESSAGE;
405     if (msg->what == B_KEY_DOWN)
406     ADBKeyDown(mac_code);
407     else
408     ADBKeyUp(mac_code);
409     return B_SKIP_MESSAGE;
410     }
411    
412     case B_MODIFIERS_CHANGED: {
413     uint32 mods = msg->FindInt32("modifiers");
414     uint32 old_mods = msg->FindInt32("be:old_modifiers");
415     uint32 changed = mods ^ old_mods;
416     uint32 mask = 1;
417     for (int i=0; i<32; i++, mask<<=1)
418     if (changed & mask) {
419     uint32 mac_code = modifier2mac[i];
420     if (mac_code == 0xff)
421     continue;
422     if (mods & mask)
423     ADBKeyDown(mac_code);
424     else
425     ADBKeyUp(mac_code);
426     }
427     return B_SKIP_MESSAGE;
428     }
429    
430     case B_MOUSE_MOVED: {
431     BPoint point;
432     msg->FindPoint("where", &point);
433     ADBMouseMoved(int(point.x), int(point.y));
434     return B_DISPATCH_MESSAGE; // Otherwise BitmapView::MouseMoved() wouldn't be called
435     }
436    
437     case B_MOUSE_DOWN: {
438     uint32 buttons = msg->FindInt32("buttons");
439     if (buttons & B_PRIMARY_MOUSE_BUTTON)
440     ADBMouseDown(0);
441     if (buttons & B_SECONDARY_MOUSE_BUTTON)
442     ADBMouseDown(1);
443     if (buttons & B_TERTIARY_MOUSE_BUTTON)
444     ADBMouseDown(2);
445     return B_SKIP_MESSAGE;
446     }
447    
448     case B_MOUSE_UP: // B_MOUSE_UP means "all buttons released"
449     ADBMouseUp(0);
450     ADBMouseUp(1);
451     ADBMouseUp(2);
452     return B_SKIP_MESSAGE;
453    
454     default:
455     return B_DISPATCH_MESSAGE;
456     }
457     }
458    
459    
460     /*
461     * Window constructor
462     */
463    
464     MacWindow::MacWindow(BRect frame) : BDirectWindow(frame, GetString(STR_WINDOW_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_CLOSABLE | B_NOT_ZOOMABLE)
465     {
466     supports_direct_mode = SupportsWindowMode();
467    
468     // Move window to right position
469     Lock();
470     MoveTo(80, 60);
471    
472     // Allocate bitmap and Mac frame buffer
473     uint32 x = frame.IntegerWidth() + 1;
474     uint32 y = frame.IntegerHeight() + 1;
475     the_bitmap = new BBitmap(frame, B_COLOR_8_BIT);
476     the_buffer = new uint8[x * (y + 2)]; // "y + 2" for safety
477    
478 cebix 1.8 // Add resolution and set VideoMonitor
479     set_video_monitor(x, y, x, 8);
480 cebix 1.1 #if REAL_ADDRESSING
481     VideoMonitor.mac_frame_base = (uint32)the_buffer;
482     #else
483     VideoMonitor.mac_frame_base = MacFrameBaseMac;
484     #endif
485    
486     #if !REAL_ADDRESSING
487     // Set variables for UAE memory mapping
488     MacFrameBaseHost = the_buffer;
489 cebix 1.8 MacFrameSize = x * y;
490 cebix 1.1 MacFrameLayout = FLAYOUT_DIRECT;
491     #endif
492    
493     // Create bitmap view
494     main_view = new BitmapView(frame, the_bitmap);
495     AddChild(main_view);
496     main_view->MakeFocus();
497    
498     // Read frame skip prefs
499     frame_skip = PrefsFindInt32("frameskip");
500     if (frame_skip == 0)
501     frame_skip = 1;
502    
503     // Set up menus
504     BRect bounds = Bounds();
505     bounds.OffsetBy(0, bounds.IntegerHeight() + 1);
506     BMenuItem *item;
507     BMenuBar *bar = new BMenuBar(bounds, "menu");
508     BMenu *menu = new BMenu(GetString(STR_WINDOW_MENU));
509     menu->AddItem(new BMenuItem(GetString(STR_WINDOW_ITEM_ABOUT), new BMessage(MSG_ABOUT_REQUESTED)));
510     menu->AddItem(new BSeparatorItem);
511     BMenu *submenu = new BMenu(GetString(STR_WINDOW_ITEM_REFRESH));
512     submenu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ)));
513     submenu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ)));
514     submenu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ)));
515     submenu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ)));
516     submenu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ)));
517     submenu->AddItem(new BMenuItem(GetString(STR_REF_60HZ_LAB), new BMessage(MSG_REF_60HZ)));
518     submenu->SetRadioMode(true);
519     if (frame_skip == 12) {
520     if ((item = submenu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL)
521     item->SetMarked(true);
522     } else if (frame_skip == 8) {
523     if ((item = submenu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL)
524     item->SetMarked(true);
525     } else if (frame_skip == 6) {
526     if ((item = submenu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL)
527     item->SetMarked(true);
528     } else if (frame_skip == 4) {
529     if ((item = submenu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL)
530     item->SetMarked(true);
531     } else if (frame_skip == 2) {
532     if ((item = submenu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL)
533     item->SetMarked(true);
534     } else if (frame_skip == 1) {
535     if ((item = submenu->FindItem(GetString(STR_REF_60HZ_LAB))) != NULL)
536     item->SetMarked(true);
537     }
538     menu->AddItem(submenu);
539     submenu = new BMenu(GetString(STR_WINDOW_ITEM_MOUNT));
540     SysCreateVolumeMenu(submenu, MSG_MOUNT);
541     menu->AddItem(submenu);
542     #if DEBUGGER_AVAILABLE
543     menu->AddItem(new BMenuItem("Debugger", new BMessage(MSG_DEBUGGER)));
544     #endif
545     bar->AddItem(menu);
546     AddChild(bar);
547     SetKeyMenuBar(bar);
548     int mbar_height = bar->Frame().IntegerHeight() + 1;
549    
550     // Resize window to fit menu bar
551     ResizeBy(0, mbar_height);
552    
553     // Set absolute mouse mode and get scroll lock state
554     ADBSetRelMouseMode(false);
555     mouse_in_view = true;
556     old_scroll_lock_state = modifiers() & B_SCROLL_LOCK;
557     if (old_scroll_lock_state)
558     SetTitle(GetString(STR_WINDOW_TITLE_FROZEN));
559     else
560     SetTitle(GetString(STR_WINDOW_TITLE));
561    
562     // Keep window aligned to 8-byte frame buffer boundaries for faster blitting
563     SetWindowAlignment(B_BYTE_ALIGNMENT, 8);
564    
565     // Create drawing semaphore (for direct mode)
566     drawing_sem = create_sem(0, "direct frame buffer access");
567    
568     // Start 60Hz interrupt
569     tick_thread_active = true;
570     tick_thread = spawn_thread(tick_func, "Window Redraw", B_DISPLAY_PRIORITY, this);
571     resume_thread(tick_thread);
572    
573     // Add filter for keyboard and mouse events
574     BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func);
575     main_view->AddFilter(filter);
576    
577     // Show window
578     Unlock();
579     Show();
580     Sync();
581     }
582    
583    
584     /*
585     * Window destructor
586     */
587    
588     MacWindow::~MacWindow()
589     {
590     // Restore cursor
591     mouse_in_view = false;
592     be_app->SetCursor(B_HAND_CURSOR);
593    
594     // Hide window
595     Hide();
596     Sync();
597    
598     // Stop 60Hz interrupt
599     status_t l;
600     tick_thread_active = false;
601     delete_sem(drawing_sem);
602     wait_for_thread(tick_thread, &l);
603    
604     // Free bitmap and frame buffer
605     delete the_bitmap;
606     delete[] the_buffer;
607    
608     // Tell emulator that we're done
609     the_window = NULL;
610     }
611    
612    
613     /*
614     * Window connected/disconnected
615     */
616    
617     void MacWindow::DirectConnected(direct_buffer_info *info)
618     {
619     switch (info->buffer_state & B_DIRECT_MODE_MASK) {
620     case B_DIRECT_STOP:
621     acquire_sem(drawing_sem);
622     break;
623     case B_DIRECT_MODIFY:
624     acquire_sem(drawing_sem);
625     case B_DIRECT_START:
626     bits = (void *)((uint8 *)info->bits + info->window_bounds.top * info->bytes_per_row + info->window_bounds.left * info->bits_per_pixel / 8);
627     bytes_per_row = info->bytes_per_row;
628     pixel_format = info->pixel_format;
629     unclipped = false;
630     if (info->clip_list_count == 1)
631     if (memcmp(&info->clip_bounds, &info->window_bounds, sizeof(clipping_rect)) == 0)
632     unclipped = true;
633     release_sem(drawing_sem);
634     break;
635     }
636     }
637    
638    
639     /*
640     * Handle redraw and menu messages
641     */
642    
643     void MacWindow::MessageReceived(BMessage *msg)
644     {
645     BMessage *msg2;
646    
647     switch (msg->what) {
648     case MSG_REDRAW: {
649    
650     // Prevent backlog of messages
651     MessageQueue()->Lock();
652     while ((msg2 = MessageQueue()->FindMessage(MSG_REDRAW, 0)) != NULL) {
653     MessageQueue()->RemoveMessage(msg2);
654     delete msg2;
655     }
656     MessageQueue()->Unlock();
657    
658     // Convert Mac screen buffer to BeOS palette and blit
659     uint8 *source = the_buffer - 1;
660     uint8 *dest = (uint8 *)the_bitmap->Bits() - 1;
661 cebix 1.8 uint32 length = VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y;
662 cebix 1.1 for (int i=0; i<length; i++)
663     *++dest = remap_mac_be[*++source];
664 cebix 1.8 BRect update_rect = BRect(0, 0, VideoMonitor.mode.x-1, VideoMonitor.mode.y-1);
665 cebix 1.1 main_view->DrawBitmapAsync(the_bitmap, update_rect, update_rect);
666     break;
667     }
668    
669     case MSG_ABOUT_REQUESTED: {
670 cebix 1.7 ShowAboutWindow();
671 cebix 1.1 break;
672     }
673    
674     case MSG_REF_5HZ:
675     PrefsReplaceInt32("frameskip", frame_skip = 12);
676     break;
677    
678     case MSG_REF_7_5HZ:
679     PrefsReplaceInt32("frameskip", frame_skip = 8);
680     break;
681    
682     case MSG_REF_10HZ:
683     PrefsReplaceInt32("frameskip", frame_skip = 6);
684     break;
685    
686     case MSG_REF_15HZ:
687     PrefsReplaceInt32("frameskip", frame_skip = 4);
688     break;
689    
690     case MSG_REF_30HZ:
691     PrefsReplaceInt32("frameskip", frame_skip = 2);
692     break;
693    
694     case MSG_REF_60HZ:
695     PrefsReplaceInt32("frameskip", frame_skip = 1);
696     break;
697    
698     case MSG_MOUNT: {
699     BMenuItem *source = NULL;
700     msg->FindPointer("source", (void **)&source);
701     if (source)
702     SysMountVolume(source->Label());
703     break;
704     }
705    
706     #if DEBUGGER_AVAILABLE
707     case MSG_DEBUGGER:
708     extern int debugging;
709     debugging = 1;
710     regs.spcflags |= SPCFLAG_BRK;
711     break;
712     #endif
713    
714     default:
715     BDirectWindow::MessageReceived(msg);
716     }
717     }
718    
719    
720     /*
721     * Window activated/deactivated
722     */
723    
724     void MacWindow::WindowActivated(bool active)
725     {
726     if (active) {
727     frame_skip = PrefsFindInt32("frameskip");
728     if (frame_skip == 0)
729     frame_skip = 1;
730     } else
731     frame_skip = 12; // 5Hz in background
732     }
733    
734    
735     /*
736     * 60Hz interrupt routine
737     */
738    
739     status_t MacWindow::tick_func(void *arg)
740     {
741     MacWindow *obj = (MacWindow *)arg;
742     static int tick_counter = 0;
743     while (obj->tick_thread_active) {
744    
745     tick_counter++;
746     if (tick_counter >= obj->frame_skip) {
747     tick_counter = 0;
748    
749     // Window title is determined by Scroll Lock state
750     uint32 scroll_lock_state = modifiers() & B_SCROLL_LOCK;
751     if (scroll_lock_state != obj->old_scroll_lock_state) {
752     if (scroll_lock_state)
753     obj->SetTitle(GetString(STR_WINDOW_TITLE_FROZEN));
754     else
755     obj->SetTitle(GetString(STR_WINDOW_TITLE));
756     obj->old_scroll_lock_state = scroll_lock_state;
757     }
758    
759     // Has the Mac started?
760     if (HasMacStarted()) {
761    
762     // Yes, set new cursor image if it was changed
763     if (memcmp(MacCursor+4, Mac2HostAddr(0x844), 64)) {
764 cebix 1.3 Mac2Host_memcpy(MacCursor+4, 0x844, 64); // Cursor image
765     MacCursor[2] = ReadMacInt8(0x885); // Hotspot
766 cebix 1.1 MacCursor[3] = ReadMacInt8(0x887);
767     be_app->SetCursor(MacCursor);
768     }
769     }
770    
771     // Refresh screen unless Scroll Lock is down
772     if (!scroll_lock_state) {
773    
774     // If direct frame buffer access is supported and the content area is completely visible,
775     // convert the Mac screen buffer directly. Otherwise, send a message to the window to do
776     // it into a bitmap
777     if (obj->supports_direct_mode) {
778     if (acquire_sem(obj->drawing_sem) != B_NO_ERROR)
779     return 0;
780     if (obj->unclipped && obj->pixel_format == B_CMAP8) {
781     uint8 *source = obj->the_buffer - 1;
782     uint8 *dest = (uint8 *)obj->bits;
783     uint32 bytes_per_row = obj->bytes_per_row;
784 cebix 1.8 int xsize = VideoMonitor.mode.x;
785     int ysize = VideoMonitor.mode.y;
786 cebix 1.1 for (int y=0; y<ysize; y++) {
787     uint32 *p = (uint32 *)dest - 1;
788     for (int x=0; x<xsize/4; x++) {
789     #if B_HOST_IS_BENDIAN
790     uint32 c = obj->remap_mac_be[*++source] << 24;
791     c |= obj->remap_mac_be[*++source] << 16;
792     c |= obj->remap_mac_be[*++source] << 8;
793     c |= obj->remap_mac_be[*++source];
794     #else
795     uint32 c = obj->remap_mac_be[*++source];
796     c |= obj->remap_mac_be[*++source] << 8;
797     c |= obj->remap_mac_be[*++source] << 16;
798     c |= obj->remap_mac_be[*++source] << 24;
799     #endif
800     *++p = c;
801     }
802     dest += bytes_per_row;
803     }
804     } else
805     obj->PostMessage(MSG_REDRAW);
806     release_sem(obj->drawing_sem);
807     } else
808     obj->PostMessage(MSG_REDRAW);
809     }
810     }
811     snooze(16666);
812     }
813     return 0;
814     }
815    
816    
817     /*
818     * Mouse moved in window
819     */
820    
821     void BitmapView::MouseMoved(BPoint point, uint32 transit, const BMessage *message)
822     {
823     switch (transit) {
824     case B_ENTERED_VIEW:
825     ((MacWindow *)Window())->mouse_in_view = true;
826     be_app->SetCursor(MacCursor);
827     break;
828     case B_EXITED_VIEW:
829     ((MacWindow *)Window())->mouse_in_view = false;
830     be_app->SetCursor(B_HAND_CURSOR);
831     break;
832     }
833     }
834    
835    
836     /*
837     * Screen constructor
838     */
839    
840 cebix 1.2 MacScreen::MacScreen(const char *name, int mode_bit, status_t *error) : BWindowScreen(name, 1 << mode_bit, error), tick_thread(-1)
841 cebix 1.1 {
842     // Set all variables
843     frame_backup = NULL;
844     palette_changed = false;
845     screen_active = false;
846 cebix 1.8 first_time = true;
847 cebix 1.1 quitting = false;
848    
849     // Set relative mouse mode
850     ADBSetRelMouseMode(true);
851    
852     // Create view to get mouse events
853     main_view = new BView(Frame(), NULL, B_FOLLOW_NONE, 0);
854     AddChild(main_view);
855    
856     // Start 60Hz interrupt
857     tick_thread_active = true;
858     tick_thread = spawn_thread(tick_func, "Polling sucks...", B_DISPLAY_PRIORITY, this);
859     resume_thread(tick_thread);
860    
861     // Add filter for keyboard and mouse events
862     BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func);
863     AddCommonFilter(filter);
864     }
865    
866    
867     /*
868     * Screen destructor
869     */
870    
871     MacScreen::~MacScreen()
872     {
873     // Stop 60Hz interrupt
874     if (tick_thread > 0) {
875     status_t l;
876     tick_thread_active = false;
877     wait_for_thread(tick_thread, &l);
878     }
879    
880     // Tell emulator that we're done
881     the_screen = NULL;
882     }
883    
884    
885     /*
886     * Screen closed
887     */
888    
889     void MacScreen::Quit(void)
890     {
891     // Tell ScreenConnected() that we are quitting
892     quitting = true;
893     BWindowScreen::Quit();
894     }
895    
896    
897     /*
898     * Screen connected/disconnected
899     */
900    
901     void MacScreen::ScreenConnected(bool active)
902     {
903     graphics_card_info *info = CardInfo();
904     screen_active = active;
905    
906     if (active == true) {
907    
908 cebix 1.8 // Add resolution and set VideoMonitor
909     if (first_time) {
910     set_video_monitor(info->width, info->height, info->bytes_per_row, info->bits_per_pixel);
911     first_time = false;
912     }
913    
914 cebix 1.1 // Set VideoMonitor
915     #if REAL_ADDRESSING
916     VideoMonitor.mac_frame_base = (uint32)info->frame_buffer;
917     #else
918     VideoMonitor.mac_frame_base = MacFrameBaseMac;
919     #endif
920    
921     #if !REAL_ADDRESSING
922     // Set variables for UAE memory mapping
923     MacFrameBaseHost = (uint8 *)info->frame_buffer;
924 cebix 1.8 MacFrameSize = VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y;
925 cebix 1.1 switch (info->bits_per_pixel) {
926     case 15:
927     MacFrameLayout = FLAYOUT_HOST_555;
928     break;
929     case 16:
930     MacFrameLayout = FLAYOUT_HOST_565;
931     break;
932     case 32:
933     MacFrameLayout = FLAYOUT_HOST_888;
934     break;
935     default:
936     MacFrameLayout = FLAYOUT_DIRECT;
937     break;
938     }
939     #endif
940    
941     // Copy from backup store to frame buffer
942     if (frame_backup != NULL) {
943 cebix 1.11 memcpy(info->frame_buffer, frame_backup, VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y);
944 cebix 1.1 delete[] frame_backup;
945     frame_backup = NULL;
946     }
947    
948     // Restore palette
949 cebix 1.11 if (VideoMonitor.mode.depth == VDEPTH_8BIT)
950 cebix 1.1 SetColorList(palette);
951    
952     // Restart/signal emulator thread
953     release_sem(mac_os_lock);
954    
955     } else {
956    
957     if (!quitting) {
958    
959     // Stop emulator thread
960     acquire_sem(mac_os_lock);
961    
962     // Create backup store and save frame buffer
963 cebix 1.8 frame_backup = new uint8[VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y];
964     memcpy(frame_backup, info->frame_buffer, VideoMonitor.mode.bytes_per_row * VideoMonitor.mode.y);
965 cebix 1.1 }
966     }
967     }
968    
969    
970     /*
971     * Screen 60Hz interrupt routine
972     */
973    
974     status_t MacScreen::tick_func(void *arg)
975     {
976     MacScreen *obj = (MacScreen *)arg;
977     while (obj->tick_thread_active) {
978    
979     // Wait
980     snooze(16667);
981    
982     // Workspace activated? Then poll the mouse and set the palette if needed
983     if (!obj->quitting && obj->LockWithTimeout(200000) == B_OK) {
984     if (obj->screen_active) {
985     BPoint pt;
986     uint32 button = 0;
987     if (obj->palette_changed) {
988     obj->palette_changed = false;
989     obj->SetColorList(obj->palette);
990     }
991     obj->main_view->GetMouse(&pt, &button);
992     set_mouse_position(320, 240);
993     ADBMouseMoved(int(pt.x) - 320, int(pt.y) - 240);
994     if (button & B_PRIMARY_MOUSE_BUTTON)
995     ADBMouseDown(0);
996     if (!(button & B_PRIMARY_MOUSE_BUTTON))
997     ADBMouseUp(0);
998     if (button & B_SECONDARY_MOUSE_BUTTON)
999     ADBMouseDown(1);
1000     if (!(button & B_SECONDARY_MOUSE_BUTTON))
1001     ADBMouseUp(1);
1002     if (button & B_TERTIARY_MOUSE_BUTTON)
1003     ADBMouseDown(2);
1004     if (!(button & B_TERTIARY_MOUSE_BUTTON))
1005     ADBMouseUp(2);
1006     }
1007     obj->Unlock();
1008     }
1009     }
1010     return 0;
1011     }