ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/Unix/video_vosf.h
Revision: 1.5
Committed: 2000-10-08T18:41:35Z (24 years, 1 month ago) by cebix
Content type: text/plain
Branch: MAIN
Changes since 1.4: +1 -1 lines
Log Message:
added SA_SIGINFO to sa_flags when sa_sigaction is used

File Contents

# Content
1 /*
2 * video_vosf.h - Video/graphics emulation, video on SEGV signals support
3 *
4 * Basilisk II (C) 1997-2000 Christian Bauer
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 #ifndef VIDEO_VOSF_H
22 #define VIDEO_VOSF_H
23
24 // Note: this file is #include'd in video_x.cpp
25 #ifdef ENABLE_VOSF
26
27 /*
28 * Page-aligned memory allocation
29 */
30
31 // Align on page boundaries
32 static uintptr align_on_page_boundary(uintptr size)
33 {
34 const uint32 page_size = getpagesize();
35 const uint32 page_mask = page_size - 1;
36 return (size + page_mask) & ~page_mask;
37 }
38
39 // Allocate memory on page boundary
40 static void * allocate_framebuffer(uint32 size, uint8 * hint = 0)
41 {
42 // Remind that the system can allocate at 0x00000000...
43 return mmap((caddr_t)hint, size, PROT_READ | PROT_WRITE, MAP_PRIVATE, zero_fd, 0);
44 }
45
46
47 /*
48 * Screen depth identification
49 */
50
51 enum {
52 ID_DEPTH_UNKNOWN = -1,
53 ID_DEPTH_1,
54 ID_DEPTH_8,
55 ID_DEPTH_15,
56 ID_DEPTH_16,
57 ID_DEPTH_24,
58 ID_DEPTH_32 = ID_DEPTH_24,
59 ID_DEPTH_COUNT
60 };
61
62 static int depth_id(int depth)
63 {
64 int id;
65 switch (depth) {
66 case 1 : id = ID_DEPTH_1; break;
67 case 8 : id = ID_DEPTH_8; break;
68 case 15 : id = ID_DEPTH_15; break;
69 case 16 : id = ID_DEPTH_16; break;
70 case 24 : id = ID_DEPTH_24; break;
71 case 32 : id = ID_DEPTH_32; break;
72 default : id = ID_DEPTH_UNKNOWN;
73 }
74 return id;
75 }
76
77
78 /*
79 * Frame buffer copy function templates
80 */
81
82 // No conversion required
83
84 #define MEMCPY_PROFITABLE
85 #ifdef MEMCPY_PROFITABLE
86 static void do_fbcopy_raw(uint8 * dest, const uint8 * source, uint32 length)
87 {
88 memcpy(dest, source, length);
89 }
90 #else
91 #define FB_BLIT_1(dst, src) (dst = (src))
92 #define FB_BLIT_2(dst, src) (dst = (src))
93 #define FB_DEPTH 0
94 #define FB_FUNC_NAME do_fbcopy_raw
95 #include "video_blit.h"
96 #endif
97
98
99 // RGB 555
100
101 #ifdef WORDS_BIGENDIAN
102 # define FB_FUNC_NAME do_fbcopy_15_obo
103 #else
104 # define FB_FUNC_NAME do_fbcopy_15_nbo
105 #endif
106
107 #define FB_BLIT_1(dst, src) \
108 (dst = (((src) >> 8) & 0xff) | (((src) & 0xff) << 8))
109
110 #define FB_BLIT_2(dst, src) \
111 (dst = (((src) >> 8) & 0x00ff00ff) | (((src) & 0x00ff00ff) << 8))
112
113 #define FB_DEPTH 15
114 #include "video_blit.h"
115
116
117 // RGB 565
118
119 #ifdef WORDS_BIGENDIAN
120
121 // native byte order
122
123 #define FB_BLIT_1(dst, src) \
124 (dst = (((src) & 0x1f) | (((src) << 1) & 0xffc0)))
125
126 #define FB_BLIT_2(dst, src) \
127 (dst = (((src) & 0x001f001f) | (((src) << 1) & 0xffc0ffc0)))
128
129 #define FB_DEPTH 16
130 #define FB_FUNC_NAME do_fbcopy_16_nbo
131 #include "video_blit.h"
132
133 // opposite byte order (untested)
134
135 #define FB_BLIT_1(dst, src) \
136 (dst = ((((src) >> 6) & 0xff) | (((src) & 0x60) << 9)))
137
138 #define FB_BLIT_2(dst, src) \
139 (dst = ((((src) >> 6) & 0x00ff00ff) | (((src) & 0x00600060) << 9)))
140
141 #define FB_DEPTH 16
142 #define FB_FUNC_NAME do_fbcopy_16_obo
143 #include "video_blit.h"
144
145 #else
146
147 // native byte order
148
149 #define FB_BLIT_1(dst, src) \
150 (dst = (((src) >> 8) & 0x001f) | (((src) << 9) & 0xfe00) | (((src) >> 7) & 0x01c0))
151
152 #define FB_BLIT_2(dst, src) \
153 (dst = (((src) >> 8) & 0x001f001f) | (((src) << 9) & 0xfe00fe00) | (((src) >> 7) & 0x01c001c0))
154
155 #define FB_DEPTH 16
156 #define FB_FUNC_NAME do_fbcopy_16_nbo
157 #include "video_blit.h"
158
159 // opposite byte order (untested)
160
161 #define FB_BLIT_1(dst, src) \
162 (dst = (((src) & 0x1f00) | (((src) << 1) & 0xe0fe) | (((src) >> 15) & 1)))
163
164 #define FB_BLIT_2(dst, src) \
165 (dst = (((src) & 0x1f001f00) | (((src) << 1) & 0xe0fee0fe) | (((src) >> 15) & 0x10001)))
166
167 #define FB_DEPTH 16
168 #define FB_FUNC_NAME do_fbcopy_16_obo
169 #include "video_blit.h"
170
171 #endif
172
173 // RGB 888
174
175 #ifdef WORDS_BIGENDIAN
176 # define FB_FUNC_NAME do_fbcopy_24_obo
177 #else
178 # define FB_FUNC_NAME do_fbcopy_24_nbo
179 #endif
180
181 #define FB_BLIT_1(dst, src) \
182 (dst = (src))
183
184 #define FB_BLIT_2(dst, src) \
185 (dst = (((src) >> 24) & 0xff) | (((src) >> 8) & 0xff00) | (((src) & 0xff00) << 8) | (((src) & 0xff) << 24))
186
187 #define FB_DEPTH 24
188 #include "video_blit.h"
189
190
191 /*
192 * Frame buffer copy functions map table
193 */
194
195 typedef void (*fbcopy_func)(uint8 *, const uint8 *, uint32);
196 static fbcopy_func do_update_framebuffer;
197
198 #define FBCOPY_FUNC(aHandler) do_ ## aHandler
199
200 #if REAL_ADDRESSING || DIRECT_ADDRESSING
201 #define WD(X) { FBCOPY_FUNC(X), FBCOPY_FUNC(X) }
202 #else
203 #define WD(X) { FBCOPY_FUNC(fbcopy_raw), FBCOPY_FUNC(fbcopy_raw) }
204 #endif
205
206 // fb_copy_funcs[depth_id][native_byte_order][dga_mode]
207 // NT : not tested
208 // OK : has been successfully tested
209 // NBO : native byte order
210 // OBO : opposite byte order
211 static fbcopy_func fbcopy_funcs[ID_DEPTH_COUNT][2][2] = {
212 #ifdef WORDS_BIGENDIAN
213 /* opposite byte order native byte order */
214 /* 1 bpp */ { WD(fbcopy_raw) , WD(fbcopy_raw) }, // NT
215 /* 8 bpp */ { WD(fbcopy_raw) , WD(fbcopy_raw) }, // OK (NBO)
216 /* 15 bpp */ { WD(fbcopy_15_obo) , WD(fbcopy_raw) }, // NT
217 /* 16 bpp */ { WD(fbcopy_16_obo) , WD(fbcopy_16_nbo) }, // NT
218 /* 24 bpp */ { WD(fbcopy_24_obo) , WD(fbcopy_raw) } // NT
219 #else
220 /* opposite byte order native byte order */
221 /* 1 bpp */ { WD(fbcopy_raw) , WD(fbcopy_raw) }, // NT
222 /* 8 bpp */ { WD(fbcopy_raw) , WD(fbcopy_raw) }, // OK (NBO)
223 /* 15 bpp */ { WD(fbcopy_raw) , WD(fbcopy_15_nbo) }, // OK (NBO)
224 /* 16 bpp */ { WD(fbcopy_16_obo) , WD(fbcopy_16_nbo) }, // OK (NBO)
225 /* 24 bpp */ { WD(fbcopy_raw) , WD(fbcopy_24_nbo) } // NT
226 #endif
227 };
228
229 #undef WD
230
231 #define FBCOPY_FUNC_ERROR \
232 ErrorAlert("Invalid screen depth")
233
234 #define GET_FBCOPY_FUNC(aDepth, aNativeByteOrder, aDisplay) \
235 ((depth_id(aDepth) == ID_DEPTH_UNKNOWN) ? ( FBCOPY_FUNC_ERROR, (fbcopy_func)0 ) : \
236 fbcopy_funcs[depth_id(aDepth)][(aNativeByteOrder)][(aDisplay) == DISPLAY_DGA ? 1 : 0])
237
238
239 /*
240 * Screen fault handler
241 */
242
243 static inline void do_handle_screen_fault(uintptr addr)
244 {
245 if ((addr < mainBuffer.memStart) || (addr >= mainBuffer.memEnd)) {
246 fprintf(stderr, "Segmentation fault at 0x%08X\n", addr);
247 abort();
248 }
249
250 const int page = (addr - mainBuffer.memStart) >> mainBuffer.pageBits;
251 caddr_t page_ad = (caddr_t)(addr & ~(mainBuffer.pageSize - 1));
252 #ifdef HAVE_PTHREADS
253 pthread_mutex_lock(&Screen_draw_lock);
254 #endif
255 PFLAG_SET(page);
256 mprotect(page_ad, mainBuffer.pageSize, PROT_READ | PROT_WRITE);
257 #ifdef HAVE_PTHREADS
258 pthread_mutex_unlock(&Screen_draw_lock);
259 #endif
260 }
261
262 #if defined(HAVE_SIGINFO_T)
263 static void Screen_fault_handler(int, siginfo_t * sip, void *)
264 {
265 D(bug("Screen_fault_handler: ADDR=0x%08X\n", sip->si_addr));
266 do_handle_screen_fault((uintptr)sip->si_addr);
267 }
268 #elif defined(HAVE_SIGCONTEXT_SUBTERFUGE)
269 # if defined(__i386__) && defined(__linux__)
270 static void Screen_fault_handler(int, struct sigcontext scs)
271 {
272 D(bug("Screen_fault_handler: ADDR=0x%08X from IP=0x%08X\n", scs.cr2, scs.eip));
273 do_handle_screen_fault((uintptr)scs.cr2);
274 }
275 # else
276 # error "No suitable subterfuge for Video on SEGV signals"
277 # endif
278 #else
279 # error "Can't do Video on SEGV signals"
280 #endif
281
282
283 /*
284 * Screen fault handler initialization
285 */
286
287 #if defined(HAVE_SIGINFO_T)
288 static bool Screen_fault_handler_init()
289 {
290 // Setup SIGSEGV handler to process writes to frame buffer
291 sigemptyset(&vosf_sa.sa_mask);
292 vosf_sa.sa_sigaction = Screen_fault_handler;
293 vosf_sa.sa_flags = SA_SIGINFO;
294 return (sigaction(SIGSEGV, &vosf_sa, NULL) == 0);
295 }
296 #elif defined(HAVE_SIGCONTEXT_SUBTERFUGE)
297 static bool Screen_fault_handler_init()
298 {
299 // Setup SIGSEGV handler to process writes to frame buffer
300 sigemptyset(&vosf_sa.sa_mask);
301 vosf_sa.sa_handler = (void (*)(int)) Screen_fault_handler;
302 vosf_sa.sa_flags = 0;
303 return (sigaction(SIGSEGV, &vosf_sa, NULL) == 0);
304 }
305 #endif
306
307
308 /*
309 * Update display for Windowed mode and VOSF
310 */
311
312 static inline void update_display_window_vosf(void)
313 {
314 int page = 0;
315 for (;;) {
316 while (PFLAG_ISCLEAR_4(page))
317 page += 4;
318
319 while (PFLAG_ISCLEAR(page))
320 page++;
321
322 if (page >= mainBuffer.pageCount)
323 break;
324
325 const int first_page = page;
326 while ((page < mainBuffer.pageCount) && PFLAG_ISSET(page)) {
327 PFLAG_CLEAR(page);
328 ++page;
329 }
330
331 // Make the dirty pages read-only again
332 const int32 offset = first_page << mainBuffer.pageBits;
333 const uint32 length = (page - first_page) << mainBuffer.pageBits;
334 mprotect((caddr_t)(mainBuffer.memStart + offset), length, PROT_READ);
335
336 // There is at least one line to update
337 const int y1 = mainBuffer.pageInfo[first_page].top;
338 const int y2 = mainBuffer.pageInfo[page - 1].bottom;
339 const int height = y2 - y1 + 1;
340
341 const int bytes_per_row = VideoMonitor.bytes_per_row;
342 const int bytes_per_pixel = VideoMonitor.bytes_per_row / VideoMonitor.x;
343 int i, j;
344
345 // Check for first column from left and first column
346 // from right that have changed
347 int x1 = VideoMonitor.x * bytes_per_pixel - 1;
348 for (j = y1; j <= y2; j++) {
349 uint8 * const p1 = &the_buffer[j * bytes_per_row];
350 uint8 * const p2 = &the_buffer_copy[j * bytes_per_row];
351 for (i = 0; i < x1; i++) {
352 if (p1[i] != p2[i]) {
353 x1 = i;
354 break;
355 }
356 }
357 }
358 x1 /= bytes_per_pixel;
359
360 int x2 = x1 * bytes_per_pixel;
361 for (j = y2; j >= y1; j--) {
362 uint8 * const p1 = &the_buffer[j * bytes_per_row];
363 uint8 * const p2 = &the_buffer_copy[j * bytes_per_row];
364 for (i = VideoMonitor.x * bytes_per_pixel - 1; i > x2; i--) {
365 if (p1[i] != p2[i]) {
366 x2 = i;
367 break;
368 }
369 }
370 }
371 x2 /= bytes_per_pixel;
372
373 // Update the_host_buffer and copy of the_buffer
374 // There is at least one pixel to copy
375 const int width = x2 - x1 + 1;
376 i = y1 * bytes_per_row + x1 * bytes_per_pixel;
377 for (j = y1; j <= y2; j++) {
378 do_update_framebuffer(the_host_buffer + i, the_buffer + i, bytes_per_pixel * width);
379 memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * width);
380 i += bytes_per_row;
381 }
382
383 if (have_shm)
384 XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, width, height, 0);
385 else
386 XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, width, height);
387 }
388 }
389
390
391 /*
392 * Update display for DGA mode and VOSF
393 * (only in Direct Addressing mode)
394 */
395
396 #if REAL_ADDRESSING || DIRECT_ADDRESSING
397 static inline void update_display_dga_vosf(void)
398 {
399 int page = 0;
400 for (;;) {
401 while (PFLAG_ISCLEAR_4(page))
402 page += 4;
403
404 while (PFLAG_ISCLEAR(page))
405 page++;
406
407 if (page >= mainBuffer.pageCount)
408 break;
409
410 const int first_page = page;
411 while ((page < mainBuffer.pageCount) && PFLAG_ISSET(page)) {
412 PFLAG_CLEAR(page);
413 ++page;
414 }
415
416 // Make the dirty pages read-only again
417 const int32 offset = first_page << mainBuffer.pageBits;
418 const uint32 length = (page - first_page) << mainBuffer.pageBits;
419 mprotect((caddr_t)(mainBuffer.memStart + offset), length, PROT_READ);
420
421 // I am sure that y2 >= y1 and depth != 1
422 const int y1 = mainBuffer.pageInfo[first_page].top;
423 const int y2 = mainBuffer.pageInfo[page - 1].bottom;
424
425 const int bytes_per_row = VideoMonitor.bytes_per_row;
426 const int bytes_per_pixel = VideoMonitor.bytes_per_row / VideoMonitor.x;
427 int i, j;
428
429 // Check for first column from left and first column
430 // from right that have changed
431 int x1 = VideoMonitor.x * bytes_per_pixel - 1;
432 for (j = y1; j <= y2; j++) {
433 uint8 * const p1 = &the_buffer[j * bytes_per_row];
434 uint8 * const p2 = &the_buffer_copy[j * bytes_per_row];
435 for (i = 0; i < x1; i++) {
436 if (p1[i] != p2[i]) {
437 x1 = i;
438 break;
439 }
440 }
441 }
442 x1 /= bytes_per_pixel;
443
444 int x2 = x1 * bytes_per_pixel;
445 for (j = y2; j >= y1; j--) {
446 uint8 * const p1 = &the_buffer[j * bytes_per_row];
447 uint8 * const p2 = &the_buffer_copy[j * bytes_per_row];
448 for (i = VideoMonitor.x * bytes_per_pixel - 1; i > x2; i--) {
449 if (p1[i] != p2[i]) {
450 x2 = i;
451 break;
452 }
453 }
454 }
455 x2 /= bytes_per_pixel;
456
457 // Update the_host_buffer and copy of the_buffer
458 // There should be at least one pixel to copy
459 const int width = x2 - x1 + 1;
460 i = y1 * bytes_per_row + x1 * bytes_per_pixel;
461 for (j = y1; j <= y2; j++) {
462 do_update_framebuffer(the_host_buffer + i, the_buffer + i, bytes_per_pixel * width);
463 memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * width);
464 i += bytes_per_row;
465 }
466 }
467 }
468 #endif
469
470 #endif /* ENABLE_VOSF */
471
472 #endif /* VIDEO_VOSF_H */