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

File Contents

# User Rev Content
1 cebix 1.1 /*
2     * video.cpp - Video/graphics emulation
3     *
4 cebix 1.7 * Basilisk II (C) 1997-2001 Christian Bauer
5 cebix 1.1 * Portions (C) 1997-1999 Marc Hellwig
6     *
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     /*
23     * SEE ALSO
24     * Inside Macintosh: Devices, chapter 1 "Device Manager"
25     * Designing Cards and Drivers for the Macintosh Family, Second Edition
26     */
27    
28     #include <stdio.h>
29    
30     #include "sysdeps.h"
31     #include "cpu_emulation.h"
32     #include "main.h"
33     #include "macos_util.h"
34     #include "video.h"
35     #include "video_defs.h"
36    
37     #define DEBUG 0
38     #include "debug.h"
39    
40    
41 cebix 1.9 // List of supported video modes
42     vector<video_mode> VideoModes;
43    
44 cebix 1.1 // Description of the main monitor
45 cebix 1.9 monitor_desc VideoMonitor;
46 cebix 1.1
47     // Local variables (per monitor)
48     struct {
49 cebix 1.9 monitor_desc *desc; // Pointer to description of monitor handled by this instance of the driver
50 cebix 1.1 uint8 palette[256 * 3]; // Color palette, 256 entries, RGB
51     bool luminance_mapping; // Luminance mapping on/off
52     bool interrupts_enabled; // VBL interrupts on/off
53 cebix 1.9 uint16 current_mode; // Currently selected depth/resolution
54     uint32 current_id;
55     uint16 preferred_mode; // Preferred depth/resolution
56     uint32 preferred_id;
57 cebix 1.1 } VidLocal;
58    
59    
60     /*
61 cebix 1.9 * Check whether specified resolution ID is one of the supported resolutions
62     */
63    
64     static bool has_resolution(uint32 id)
65     {
66     vector<video_mode>::const_iterator i = VideoModes.begin(), end = VideoModes.end();
67     while (i != end) {
68     if (i->resolution_id == id)
69     return true;
70     ++i;
71     }
72     return false;
73     }
74    
75    
76     /*
77     * Find maximum supported depth for given resolution ID
78     */
79    
80     static video_depth max_depth_of_resolution(uint32 id)
81     {
82     video_depth m = VDEPTH_1BIT;
83     vector<video_mode>::const_iterator i = VideoModes.begin(), end = VideoModes.end();
84     while (i != end) {
85     if (i->depth > m)
86     m = i->depth;
87     ++i;
88     }
89     return m;
90     }
91    
92    
93     /*
94     * Get X/Y size of specified resolution
95     */
96    
97     static void get_size_of_resolution(uint32 id, uint32 &x, uint32 &y)
98     {
99     vector<video_mode>::const_iterator i = VideoModes.begin(), end = VideoModes.end();
100     while (i != end) {
101     if (i->resolution_id == id) {
102     x = i->x;
103     y = i->y;
104     return;
105     }
106     ++i;
107     }
108     }
109    
110    
111     /*
112 cebix 1.1 * Driver Open() routine
113     */
114    
115 cebix 1.2 int16 VideoDriverOpen(uint32 pb, uint32 dce)
116 cebix 1.1 {
117 cebix 1.2 D(bug("VideoDriverOpen\n"));
118 cebix 1.1
119 cebix 1.9 // This shouldn't happen unless the platform-specific video code is broken
120     if (VideoModes.empty())
121     fprintf(stderr, "No valid video modes found (broken video driver?)\n");
122    
123 cebix 1.1 // Init local variables
124     VidLocal.desc = &VideoMonitor;
125     VidLocal.luminance_mapping = false;
126     VidLocal.interrupts_enabled = false;
127 cebix 1.9 VidLocal.current_mode = DepthToAppleMode(VidLocal.desc->mode.depth);
128     VidLocal.current_id = VidLocal.desc->mode.resolution_id;
129     VidLocal.preferred_mode = VidLocal.current_mode;
130     VidLocal.preferred_id = VidLocal.current_id;
131 cebix 1.1
132     // Init color palette (solid gray)
133     if (!IsDirectMode(VidLocal.desc->mode)) {
134     for (int i=0; i<256; i++) {
135     VidLocal.palette[i * 3 + 0] = 127;
136     VidLocal.palette[i * 3 + 1] = 127;
137     VidLocal.palette[i * 3 + 2] = 127;
138     }
139     video_set_palette(VidLocal.palette);
140     }
141     return noErr;
142     }
143    
144    
145     /*
146     * Driver Control() routine
147     */
148    
149 cebix 1.2 int16 VideoDriverControl(uint32 pb, uint32 dce)
150 cebix 1.1 {
151     uint16 code = ReadMacInt16(pb + csCode);
152     uint32 param = ReadMacInt32(pb + csParam);
153 cebix 1.2 D(bug("VideoDriverControl %d\n", code));
154 cebix 1.1 switch (code) {
155    
156 cebix 1.9 case cscSetMode: { // Set color depth
157     uint16 mode = ReadMacInt16(param + csMode);
158     D(bug(" SetMode %04x\n", mode));
159     //!! switch mode
160 cebix 1.1 WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base);
161 cebix 1.9 //!! VidLocal.current_mode = mode;
162     if (mode != VidLocal.current_mode)
163     return paramErr;
164     else
165     return noErr;
166     }
167 cebix 1.1
168     case cscSetEntries: { // Set palette
169     D(bug(" SetEntries table %08lx, count %d, start %d\n", ReadMacInt32(param + csTable), ReadMacInt16(param + csCount), ReadMacInt16(param + csStart)));
170     if (IsDirectMode(VidLocal.desc->mode))
171     return controlErr;
172    
173     uint32 s_pal = ReadMacInt32(param + csTable); // Source palette
174     uint8 *d_pal; // Destination palette
175     uint16 count = ReadMacInt16(param + csCount);
176     if (!s_pal || count > 255)
177     return paramErr;
178    
179     if (ReadMacInt16(param + csStart) == 0xffff) { // Indexed
180     for (uint32 i=0; i<=count; i++) {
181     d_pal = VidLocal.palette + ReadMacInt16(s_pal) * 3;
182     uint8 red = (uint16)ReadMacInt16(s_pal + 2) >> 8;
183     uint8 green = (uint16)ReadMacInt16(s_pal + 4) >> 8;
184     uint8 blue = (uint16)ReadMacInt16(s_pal + 6) >> 8;
185     if (VidLocal.luminance_mapping)
186     red = green = blue = (red * 0x4ccc + green * 0x970a + blue * 0x1c29) >> 16;
187     *d_pal++ = red;
188     *d_pal++ = green;
189     *d_pal++ = blue;
190     s_pal += 8;
191     }
192     } else { // Sequential
193     d_pal = VidLocal.palette + ReadMacInt16(param + csStart) * 3;
194     for (uint32 i=0; i<=count; i++) {
195     uint8 red = (uint16)ReadMacInt16(s_pal + 2) >> 8;
196     uint8 green = (uint16)ReadMacInt16(s_pal + 4) >> 8;
197     uint8 blue = (uint16)ReadMacInt16(s_pal + 6) >> 8;
198     if (VidLocal.luminance_mapping)
199     red = green = blue = (red * 0x4ccc + green * 0x970a + blue * 0x1c29) >> 16;
200     *d_pal++ = red;
201     *d_pal++ = green;
202     *d_pal++ = blue;
203     s_pal += 8;
204     }
205     }
206     video_set_palette(VidLocal.palette);
207     return noErr;
208     }
209    
210     case cscSetGamma: // Set gamma table
211     D(bug(" SetGamma\n"));
212 cebix 1.9 //!!
213 cebix 1.1 return noErr;
214    
215     case cscGrayPage: { // Fill page with dithered gray pattern
216     D(bug(" GrayPage %d\n", ReadMacInt16(param + csPage)));
217     if (ReadMacInt16(param + csPage))
218     return paramErr;
219    
220     uint32 pattern[6] = {
221     0xaaaaaaaa, // 1 bpp
222     0xcccccccc, // 2 bpp
223     0xf0f0f0f0, // 4 bpp
224     0xff00ff00, // 8 bpp
225     0xffff0000, // 16 bpp
226     0xffffffff // 32 bpp
227     };
228     uint32 p = VidLocal.desc->mac_frame_base;
229 cebix 1.9 uint32 pat = pattern[VidLocal.desc->mode.depth];
230     for (uint32 y=0; y<VidLocal.desc->mode.y; y++) {
231     for (uint32 x=0; x<VidLocal.desc->mode.bytes_per_row; x+=4) {
232 cebix 1.8 WriteMacInt32(p + x, pat);
233 cebix 1.9 if (VidLocal.desc->mode.depth == VDEPTH_32BIT)
234 cebix 1.1 pat = ~pat;
235     }
236 cebix 1.9 p += VidLocal.desc->mode.bytes_per_row;
237 cebix 1.1 pat = ~pat;
238     }
239     return noErr;
240     }
241    
242     case cscSetGray: // Enable/disable luminance mapping
243     D(bug(" SetGray %02x\n", ReadMacInt8(param + csMode)));
244     VidLocal.luminance_mapping = ReadMacInt8(param + csMode);
245     return noErr;
246    
247     case cscSetInterrupt: // Enable/disable VBL
248     D(bug(" SetInterrupt %02x\n", ReadMacInt8(param + csMode)));
249     VidLocal.interrupts_enabled = (ReadMacInt8(param + csMode) == 0);
250     return noErr;
251    
252 cebix 1.9 // case cscDirectSetEntries:
253    
254     case cscSetDefaultMode: { // Set default color depth
255     uint16 mode = ReadMacInt16(param + csMode);
256     D(bug(" SetDefaultMode %04x\n", mode));
257     VidLocal.preferred_mode = mode;
258     return noErr;
259     }
260    
261     case cscSwitchMode: { // Switch video mode (depth and resolution)
262     uint16 mode = ReadMacInt16(param + csMode);
263     uint32 id = ReadMacInt32(param + csData);
264     D(bug(" SwitchMode %04x, %08x\n", mode, id));
265     //!! switch mode
266     WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base);
267     //!! VidLocal.current_mode = mode;
268     //!! VidLocal.current_id = id;
269     if (mode != VidLocal.current_mode || id != VidLocal.current_id)
270     return paramErr;
271     else
272     return noErr;
273     }
274    
275     case cscSavePreferredConfiguration: {
276     uint16 mode = ReadMacInt16(param + csMode);
277     uint32 id = ReadMacInt32(param + csData);
278     D(bug(" SavePreferredConfiguration %04x, %08x\n", mode, id));
279     VidLocal.preferred_mode = mode;
280     VidLocal.preferred_id = id;
281     return noErr;
282     }
283    
284 cebix 1.1 default:
285 cebix 1.2 printf("WARNING: Unknown VideoDriverControl(%d)\n", code);
286 cebix 1.1 return controlErr;
287     }
288     }
289    
290    
291     /*
292     * Driver Status() routine
293     */
294    
295 cebix 1.2 int16 VideoDriverStatus(uint32 pb, uint32 dce)
296 cebix 1.1 {
297     uint16 code = ReadMacInt16(pb + csCode);
298     uint32 param = ReadMacInt32(pb + csParam);
299 cebix 1.2 D(bug("VideoDriverStatus %d\n", code));
300 cebix 1.1 switch (code) {
301    
302 cebix 1.9 case cscGetMode: // Get current color depth
303     D(bug(" GetMode -> %04x, base %08x\n", VidLocal.current_mode, VidLocal.desc->mac_frame_base));
304     WriteMacInt16(param + csMode, VidLocal.current_mode);
305     WriteMacInt16(param + csPage, 0);
306     WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base);
307     return noErr;
308    
309     // case cscGetEntries:
310    
311 cebix 1.1 case cscGetPageCnt: // Get number of pages
312 cebix 1.9 D(bug(" GetPageCnt -> 1\n"));
313 cebix 1.1 WriteMacInt16(param + csPage, 1);
314     return noErr;
315    
316     case cscGetPageBase: // Get page base address
317 cebix 1.9 D(bug(" GetPageBase -> %08x\n", VidLocal.desc->mac_frame_base));
318 cebix 1.1 WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base);
319     return noErr;
320    
321     case cscGetGray: // Get luminance mapping flag
322 cebix 1.9 D(bug(" GetGray -> %d\n", VidLocal.luminance_mapping));
323     WriteMacInt8(param, VidLocal.luminance_mapping ? 1 : 0);
324 cebix 1.1 return noErr;
325    
326     case cscGetInterrupt: // Get interrupt disable flag
327 cebix 1.9 D(bug(" GetInterrupt -> %d\n", VidLocal.interrupts_enabled));
328     WriteMacInt8(param, VidLocal.interrupts_enabled ? 0 : 1);
329 cebix 1.1 return noErr;
330    
331 cebix 1.9 // case cscGetGamma:
332    
333     case cscGetDefaultMode: // Get default color depth
334     D(bug(" GetDefaultMode -> %04x\n", VidLocal.preferred_mode));
335     WriteMacInt16(param + csMode, VidLocal.preferred_mode);
336 cebix 1.1 return noErr;
337    
338 cebix 1.9 case cscGetCurMode: // Get current video mode (depth and resolution)
339     D(bug(" GetCurMode -> %04x/%08x\n", VidLocal.current_mode, VidLocal.current_id));
340     WriteMacInt16(param + csMode, VidLocal.current_mode);
341     WriteMacInt32(param + csData, VidLocal.current_id);
342 cebix 1.1 WriteMacInt16(param + csPage, 0);
343     WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base);
344     return noErr;
345    
346     case cscGetConnection: // Get monitor information
347     D(bug(" GetConnection\n"));
348     WriteMacInt16(param + csDisplayType, 6); // 21" Multiscan
349     WriteMacInt8(param + csConnectTaggedType, 6);
350     WriteMacInt8(param + csConnectTaggedData, 0x23);
351     WriteMacInt32(param + csConnectFlags, 0x03); // All modes valid and safe
352     WriteMacInt32(param + csDisplayComponent, 0);
353     return noErr;
354    
355 cebix 1.9 case cscGetModeBaseAddress: // Get frame buffer base address
356     D(bug(" GetModeBaseAddress -> %08x\n", VidLocal.desc->mac_frame_base));
357     WriteMacInt32(param + csBaseAddr, VidLocal.desc->mac_frame_base); // Base address of video RAM for the current DisplayModeID and relative bit depth
358 cebix 1.1 return noErr;
359    
360 cebix 1.9 case cscGetPreferredConfiguration: // Get default video mode (depth and resolution)
361     D(bug(" GetPreferredConfiguration -> %04x/%08x\n", VidLocal.preferred_mode, VidLocal.preferred_id));
362     WriteMacInt16(param + csMode, VidLocal.preferred_mode);
363     WriteMacInt32(param + csData, VidLocal.preferred_id);
364     return noErr;
365    
366     case cscGetNextResolution: { // Called iteratively to obtain a list of all supported resolutions
367     uint32 id = ReadMacInt32(param + csPreviousDisplayModeID);
368     D(bug(" GetNextResolution %08x\n", id));
369    
370     switch (id) {
371     case 0:
372     // Return current resolution
373     id = VidLocal.current_id;
374     break;
375    
376     case 0xfffffffe:
377     // Return first supported resolution
378     id = 0x80;
379     while (!has_resolution(id))
380     id++;
381     break;
382    
383     default:
384     // Get next resolution
385     if (!has_resolution(id))
386     return paramErr;
387     id++;
388     while (!has_resolution(id) && id < 0x100)
389     id++;
390     if (id == 0x100) { // No more resolutions
391     WriteMacInt32(param + csRIDisplayModeID, 0xfffffffd);
392     return noErr;
393     }
394     break;
395     }
396    
397     WriteMacInt32(param + csRIDisplayModeID, id);
398     uint32 x, y;
399     get_size_of_resolution(id, x, y);
400     WriteMacInt32(param + csHorizontalPixels, x);
401     WriteMacInt32(param + csVerticalLines, y);
402     WriteMacInt32(param + csRefreshRate, 75 << 16);
403     WriteMacInt16(param + csMaxDepthMode, DepthToAppleMode(max_depth_of_resolution(id)));
404     uint32 flags = 0xb; // mode valid, safe and shown in Monitors panel
405     if (id == VidLocal.preferred_id)
406     flags |= 4; // default mode
407     WriteMacInt32(param + csResolutionFlags, flags);
408 jlachmann 1.5 return noErr;
409 cebix 1.9 }
410 jlachmann 1.5
411 cebix 1.9 case cscGetVideoParameters: { // Get information about specified resolution/depth
412     uint32 id = ReadMacInt32(param + csDisplayModeID);
413     uint16 mode = ReadMacInt16(param + csDepthMode);
414     D(bug(" GetVideoParameters %04x/%08x\n", mode, id));
415    
416     vector<video_mode>::const_iterator i = VideoModes.begin(), end = VideoModes.end();
417     while (i != end) {
418     if (DepthToAppleMode(i->depth) == mode && i->resolution_id == id) {
419     uint32 vp = ReadMacInt32(param + csVPBlockPtr);
420     WriteMacInt32(vp + vpBaseOffset, 0);
421     WriteMacInt16(vp + vpRowBytes, i->bytes_per_row);
422     WriteMacInt16(vp + vpBounds, 0);
423     WriteMacInt16(vp + vpBounds + 2, 0);
424     WriteMacInt16(vp + vpBounds + 4, i->y);
425     WriteMacInt16(vp + vpBounds + 6, i->x);
426     WriteMacInt16(vp + vpVersion, 0);
427     WriteMacInt16(vp + vpPackType, 0);
428     WriteMacInt32(vp + vpPackSize, 0);
429     WriteMacInt32(vp + vpHRes, 0x00480000);
430     WriteMacInt32(vp + vpVRes, 0x00480000);
431     uint32 pix_type, pix_size, cmp_count, cmp_size, dev_type;
432     switch (i->depth) {
433     case VDEPTH_1BIT:
434     pix_type = 0; pix_size = 1;
435     cmp_count = 1; cmp_size = 1;
436     dev_type = 0; // CLUT
437     break;
438     case VDEPTH_2BIT:
439     pix_type = 0; pix_size = 2;
440     cmp_count = 1; cmp_size = 2;
441     dev_type = 0; // CLUT
442     break;
443     case VDEPTH_4BIT:
444     pix_type = 0; pix_size = 4;
445     cmp_count = 1; cmp_size = 4;
446     dev_type = 0; // CLUT
447     break;
448     case VDEPTH_8BIT:
449     pix_type = 0; pix_size = 8;
450     cmp_count = 1; cmp_size = 8;
451     dev_type = 0; // CLUT
452     break;
453     case VDEPTH_16BIT:
454     pix_type = 0x10; pix_size = 16;
455     cmp_count = 3; cmp_size = 5;
456     dev_type = 2; // direct
457     break;
458     case VDEPTH_32BIT:
459     pix_type = 0x10; pix_size = 32;
460     cmp_count = 3; cmp_size = 8;
461     dev_type = 2; // direct
462     break;
463     }
464     WriteMacInt16(vp + vpPixelType, pix_type);
465     WriteMacInt16(vp + vpPixelSize, pix_size);
466     WriteMacInt16(vp + vpCmpCount, cmp_count);
467     WriteMacInt16(vp + vpCmpSize, cmp_size);
468     WriteMacInt32(param + csPageCount, 1);
469     WriteMacInt32(param + csDeviceType, dev_type);
470     return noErr;
471     }
472     ++i;
473     }
474     return paramErr; // specified resolution/depth not supported
475     }
476    
477     case cscGetModeTiming: { // Get video timing for specified resolution
478     uint32 id = ReadMacInt32(param + csTimingMode);
479     D(bug(" GetModeTiming %08x\n", id));
480     if (!has_resolution(id))
481     return paramErr;
482    
483     WriteMacInt32(param + csTimingFormat, FOURCC('d', 'e', 'c', 'l'));
484     WriteMacInt32(param + csTimingData, 0); // unknown
485     uint32 flags = 0xb; // mode valid, safe and shown in Monitors panel
486     if (id == VidLocal.preferred_id)
487     flags |= 4; // default mode
488     WriteMacInt32(param + csTimingFlags, flags);
489 cebix 1.1 return noErr;
490 cebix 1.9 }
491 cebix 1.1
492     default:
493 cebix 1.2 printf("WARNING: Unknown VideoDriverStatus(%d)\n", code);
494 cebix 1.1 return statusErr;
495     }
496     }