ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/gfxaccel.cpp
Revision: 1.5
Committed: 2006-05-13T17:12:18Z (18 years, 6 months ago) by gbeauche
Branch: MAIN
Changes since 1.4: +44 -8 lines
Log Message:
NQD dirty boxes, generic code
+ while we are at it, also rename a few NQD related NativeOps.

File Contents

# User Rev Content
1 gbeauche 1.1 /*
2     * gfxaccel.cpp - Generic Native QuickDraw acceleration
3     *
4 gbeauche 1.3 * SheepShaver (C) 1997-2005 Marc Hellwig and Christian Bauer
5 gbeauche 1.1 *
6     * This program is free software; you can redistribute it and/or modify
7     * it under the terms of the GNU General Public License as published by
8     * the Free Software Foundation; either version 2 of the License, or
9     * (at your option) any later version.
10     *
11     * This program is distributed in the hope that it will be useful,
12     * but WITHOUT ANY WARRANTY; without even the implied warranty of
13     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14     * GNU General Public License for more details.
15     *
16     * You should have received a copy of the GNU General Public License
17     * along with this program; if not, write to the Free Software
18     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19     */
20    
21     #include "sysdeps.h"
22    
23     #include "prefs.h"
24     #include "video.h"
25     #include "video_defs.h"
26    
27     #define DEBUG 0
28     #include "debug.h"
29    
30    
31     /*
32     * Utility functions
33     */
34    
35     // Return bytes per pixel for requested depth
36     static inline int bytes_per_pixel(int depth)
37     {
38     int bpp;
39     switch (depth) {
40     case 8:
41     bpp = 1;
42     break;
43     case 15: case 16:
44     bpp = 2;
45     break;
46     case 24: case 32:
47     bpp = 4;
48     break;
49     default:
50     abort();
51     }
52     return bpp;
53     }
54    
55 gbeauche 1.5 // Pass-through dirty areas to redraw functions
56     static inline void NQD_set_dirty_area(uint32 p)
57     {
58     if (ReadMacInt32(p + acclDestBaseAddr) == screen_base) {
59     int16 x = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
60     int16 y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
61     int16 w = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
62     int16 h = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
63     video_set_dirty_area(x, y, w, h);
64     }
65     }
66    
67 gbeauche 1.1
68     /*
69     * Rectangle inversion
70     */
71    
72     template< int bpp >
73     static inline void do_invrect(uint8 *dest, uint32 length)
74     {
75     #define INVERT_1(PTR, OFS) ((uint8 *)(PTR))[OFS] = ~((uint8 *)(PTR))[OFS]
76     #define INVERT_2(PTR, OFS) ((uint16 *)(PTR))[OFS] = ~((uint16 *)(PTR))[OFS]
77     #define INVERT_4(PTR, OFS) ((uint32 *)(PTR))[OFS] = ~((uint32 *)(PTR))[OFS]
78     #define INVERT_8(PTR, OFS) ((uint64 *)(PTR))[OFS] = ~((uint64 *)(PTR))[OFS]
79    
80     #ifndef UNALIGNED_PROFITABLE
81     // Align on 16-bit boundaries
82     if (bpp < 16 && (((uintptr)dest) & 1)) {
83     INVERT_1(dest, 0);
84     dest += 1; length -= 1;
85     }
86    
87     // Align on 32-bit boundaries
88     if (bpp < 32 && (((uintptr)dest) & 2)) {
89     INVERT_2(dest, 0);
90     dest += 2; length -= 2;
91     }
92     #endif
93    
94     // Invert 8-byte words
95     if (length >= 8) {
96     const int r = (length / 8) % 8;
97     dest += r * 8;
98    
99     int n = ((length / 8) + 7) / 8;
100     switch (r) {
101     case 0: do {
102     dest += 64;
103     INVERT_8(dest, -8);
104     case 7: INVERT_8(dest, -7);
105     case 6: INVERT_8(dest, -6);
106     case 5: INVERT_8(dest, -5);
107     case 4: INVERT_8(dest, -4);
108     case 3: INVERT_8(dest, -3);
109     case 2: INVERT_8(dest, -2);
110     case 1: INVERT_8(dest, -1);
111     } while (--n > 0);
112     }
113     }
114    
115     // 32-bit cell to invert?
116     if (length & 4) {
117     INVERT_4(dest, 0);
118     if (bpp <= 16)
119     dest += 4;
120     }
121    
122     // 16-bit cell to invert?
123     if (bpp <= 16 && (length & 2)) {
124     INVERT_2(dest, 0);
125     if (bpp <= 8)
126     dest += 2;
127     }
128    
129     // 8-bit cell to invert?
130     if (bpp <= 8 && (length & 1))
131     INVERT_1(dest, 0);
132    
133     #undef INVERT_1
134     #undef INVERT_2
135     #undef INVERT_4
136     #undef INVERT_8
137     }
138    
139     void NQD_invrect(uint32 p)
140     {
141     D(bug("accl_invrect %08x\n", p));
142    
143     // Get inversion parameters
144     int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
145     int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
146     int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
147     int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
148     D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y));
149     D(bug(" width %d, height %d, bytes_per_row %d\n", width, height, (int32)ReadMacInt32(p + acclDestRowBytes)));
150    
151     //!!?? pen_mode == 14
152    
153     // And perform the inversion
154     const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize));
155     const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
156     uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp));
157     width *= bpp;
158     switch (bpp) {
159     case 1:
160     for (int i = 0; i < height; i++) {
161     do_invrect<8>(dest, width);
162     dest += dest_row_bytes;
163     }
164     break;
165     case 2:
166     for (int i = 0; i < height; i++) {
167     do_invrect<16>(dest, width);
168     dest += dest_row_bytes;
169     }
170     break;
171     case 4:
172     for (int i = 0; i < height; i++) {
173     do_invrect<32>(dest, width);
174     dest += dest_row_bytes;
175     }
176     break;
177     }
178     }
179    
180    
181     /*
182     * Rectangle filling
183     */
184    
185     template< int bpp >
186     static inline void do_fillrect(uint8 *dest, uint32 color, uint32 length)
187     {
188     #define FILL_1(PTR, OFS, VAL) ((uint8 *)(PTR))[OFS] = (VAL)
189     #define FILL_2(PTR, OFS, VAL) ((uint16 *)(PTR))[OFS] = (VAL)
190     #define FILL_4(PTR, OFS, VAL) ((uint32 *)(PTR))[OFS] = (VAL)
191     #define FILL_8(PTR, OFS, VAL) ((uint64 *)(PTR))[OFS] = (VAL)
192    
193     #ifndef UNALIGNED_PROFITABLE
194     // Align on 16-bit boundaries
195     if (bpp < 16 && (((uintptr)dest) & 1)) {
196     FILL_1(dest, 0, color);
197     dest += 1; length -= 1;
198     }
199    
200     // Align on 32-bit boundaries
201     if (bpp < 32 && (((uintptr)dest) & 2)) {
202     FILL_2(dest, 0, color);
203     dest += 2; length -= 2;
204     }
205     #endif
206    
207     // Fill 8-byte words
208     if (length >= 8) {
209     const uint64 c = (((uint64)color) << 32) | color;
210     const int r = (length / 8) % 8;
211     dest += r * 8;
212    
213     int n = ((length / 8) + 7) / 8;
214     switch (r) {
215     case 0: do {
216     dest += 64;
217     FILL_8(dest, -8, c);
218     case 7: FILL_8(dest, -7, c);
219     case 6: FILL_8(dest, -6, c);
220     case 5: FILL_8(dest, -5, c);
221     case 4: FILL_8(dest, -4, c);
222     case 3: FILL_8(dest, -3, c);
223     case 2: FILL_8(dest, -2, c);
224     case 1: FILL_8(dest, -1, c);
225     } while (--n > 0);
226     }
227     }
228    
229     // 32-bit cell to fill?
230     if (length & 4) {
231     FILL_4(dest, 0, color);
232     if (bpp <= 16)
233     dest += 4;
234     }
235    
236     // 16-bit cell to fill?
237     if (bpp <= 16 && (length & 2)) {
238     FILL_2(dest, 0, color);
239     if (bpp <= 8)
240     dest += 2;
241     }
242    
243     // 8-bit cell to fill?
244     if (bpp <= 8 && (length & 1))
245     FILL_1(dest, 0, color);
246    
247     #undef FILL_1
248     #undef FILL_2
249     #undef FILL_4
250     #undef FILL_8
251     }
252    
253     void NQD_fillrect(uint32 p)
254     {
255     D(bug("accl_fillrect %08x\n", p));
256    
257     // Get filling parameters
258     int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
259     int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
260     int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
261     int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
262     uint32 color = htonl(ReadMacInt32(p + acclPenMode) == 8 ? ReadMacInt32(p + acclForePen) : ReadMacInt32(p + acclBackPen));
263     D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y));
264     D(bug(" width %d, height %d\n", width, height));
265     D(bug(" bytes_per_row %d color %08x\n", (int32)ReadMacInt32(p + acclDestRowBytes), color));
266    
267     // And perform the fill
268     const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize));
269     const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
270     uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp));
271     width *= bpp;
272     switch (bpp) {
273     case 1:
274     for (int i = 0; i < height; i++) {
275     memset(dest, color, width);
276     dest += dest_row_bytes;
277     }
278     break;
279     case 2:
280     for (int i = 0; i < height; i++) {
281     do_fillrect<16>(dest, color, width);
282     dest += dest_row_bytes;
283     }
284     break;
285     case 4:
286     for (int i = 0; i < height; i++) {
287     do_fillrect<32>(dest, color, width);
288     dest += dest_row_bytes;
289     }
290     break;
291     }
292     }
293    
294     bool NQD_fillrect_hook(uint32 p)
295     {
296     D(bug("accl_fillrect_hook %08x\n", p));
297 gbeauche 1.5 NQD_set_dirty_area(p);
298 gbeauche 1.1
299     // Check if we can accelerate this fillrect
300     if (ReadMacInt32(p + 0x284) != 0 && ReadMacInt32(p + acclDestPixelSize) >= 8) {
301     const int transfer_mode = ReadMacInt32(p + acclTransferMode);
302     if (transfer_mode == 8) {
303     // Fill
304 gbeauche 1.5 WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_FILLRECT));
305 gbeauche 1.1 return true;
306     }
307     else if (transfer_mode == 10) {
308     // Invert
309 gbeauche 1.5 WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_INVRECT));
310 gbeauche 1.1 return true;
311     }
312     }
313     return false;
314     }
315    
316    
317     /*
318     * Isomorphic rectangle blitting
319     */
320    
321     void NQD_bitblt(uint32 p)
322     {
323     D(bug("accl_bitblt %08x\n", p));
324    
325     // Get blitting parameters
326     int16 src_X = (int16)ReadMacInt16(p + acclSrcRect + 2) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 2);
327     int16 src_Y = (int16)ReadMacInt16(p + acclSrcRect + 0) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 0);
328     int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2);
329     int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0);
330     int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2);
331     int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0);
332     D(bug(" src addr %08x, dest addr %08x\n", ReadMacInt32(p + acclSrcBaseAddr), ReadMacInt32(p + acclDestBaseAddr)));
333     D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y));
334     D(bug(" width %d, height %d\n", width, height));
335    
336     // And perform the blit
337     const int bpp = bytes_per_pixel(ReadMacInt32(p + acclSrcPixelSize));
338     width *= bpp;
339     if ((int32)ReadMacInt32(p + acclSrcRowBytes) > 0) {
340     const int src_row_bytes = (int32)ReadMacInt32(p + acclSrcRowBytes);
341     const int dst_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes);
342     uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + (src_Y * src_row_bytes) + (src_X * bpp));
343     uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dst_row_bytes) + (dest_X * bpp));
344     for (int i = 0; i < height; i++) {
345     memmove(dst, src, width);
346     src += src_row_bytes;
347     dst += dst_row_bytes;
348     }
349     }
350     else {
351     const int src_row_bytes = -(int32)ReadMacInt32(p + acclSrcRowBytes);
352     const int dst_row_bytes = -(int32)ReadMacInt32(p + acclDestRowBytes);
353     uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + ((src_Y + height - 1) * src_row_bytes) + (src_X * bpp));
354     uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + ((dest_Y + height - 1) * dst_row_bytes) + (dest_X * bpp));
355     for (int i = height - 1; i >= 0; i--) {
356     memmove(dst, src, width);
357     src -= src_row_bytes;
358     dst -= dst_row_bytes;
359     }
360     }
361     }
362    
363     /*
364     BitBlt transfer modes:
365     0 : srcCopy
366     1 : srcOr
367     2 : srcXor
368     3 : srcBic
369     4 : notSrcCopy
370     5 : notSrcOr
371     6 : notSrcXor
372     7 : notSrcBic
373     32 : blend
374     33 : addPin
375     34 : addOver
376     35 : subPin
377     36 : transparent
378     37 : adMax
379     38 : subOver
380     39 : adMin
381     50 : hilite
382     */
383    
384     bool NQD_bitblt_hook(uint32 p)
385     {
386     D(bug("accl_draw_hook %08x\n", p));
387 gbeauche 1.5 NQD_set_dirty_area(p);
388 gbeauche 1.1
389     // Check if we can accelerate this bitblt
390     if (ReadMacInt32(p + 0x018) + ReadMacInt32(p + 0x128) == 0 &&
391     ReadMacInt32(p + 0x130) == 0 &&
392     ReadMacInt32(p + acclSrcPixelSize) >= 8 &&
393     ReadMacInt32(p + acclSrcPixelSize) == ReadMacInt32(p + acclDestPixelSize) &&
394 gbeauche 1.4 (int32)(ReadMacInt32(p + acclSrcRowBytes) ^ ReadMacInt32(p + acclDestRowBytes)) >= 0 && // same sign?
395     ReadMacInt32(p + acclTransferMode) == 0 && // srcCopy?
396     (int32)ReadMacInt32(p + 0x15c) > 0) {
397 gbeauche 1.1
398     // Yes, set function pointer
399 gbeauche 1.5 WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_BITBLT));
400 gbeauche 1.1 return true;
401     }
402     return false;
403     }
404    
405 gbeauche 1.5 // Unknown hook
406     bool NQD_unknown_hook(uint32 arg)
407     {
408     D(bug("accl_unknown_hook %08x\n", arg));
409     NQD_set_dirty_area(arg);
410    
411     return false;
412     }
413    
414 gbeauche 1.1 // Wait for graphics operation to finish
415     bool NQD_sync_hook(uint32 arg)
416     {
417     D(bug("accl_sync_hook %08x\n", arg));
418     return true;
419     }
420    
421    
422     /*
423     * Install Native QuickDraw acceleration hooks
424     */
425    
426     void VideoInstallAccel(void)
427     {
428     // Install acceleration hooks
429     if (PrefsFindBool("gfxaccel")) {
430     D(bug("Video: Installing acceleration hooks\n"));
431     uint32 base;
432    
433     SheepVar bitblt_hook_info(sizeof(accl_hook_info));
434     base = bitblt_hook_info.addr();
435 gbeauche 1.5 WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_BITBLT_HOOK));
436     WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK));
437 gbeauche 1.1 WriteMacInt32(base + 8, ACCL_BITBLT);
438 gbeauche 1.2 NQDMisc(6, bitblt_hook_info.addr());
439 gbeauche 1.1
440     SheepVar fillrect_hook_info(sizeof(accl_hook_info));
441     base = fillrect_hook_info.addr();
442 gbeauche 1.5 WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_FILLRECT_HOOK));
443     WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK));
444 gbeauche 1.1 WriteMacInt32(base + 8, ACCL_FILLRECT);
445 gbeauche 1.2 NQDMisc(6, fillrect_hook_info.addr());
446 gbeauche 1.5
447     for (int op = 0; op < 8; op++) {
448     switch (op) {
449     case ACCL_BITBLT:
450     case ACCL_FILLRECT:
451     continue;
452     }
453     SheepVar unknown_hook_info(sizeof(accl_hook_info));
454     base = unknown_hook_info.addr();
455     WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_UNKNOWN_HOOK));
456     WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK));
457     WriteMacInt32(base + 8, op);
458     NQDMisc(6, unknown_hook_info.addr());
459     }
460 gbeauche 1.1 }
461     }