2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
17 * Rountines to copy a bitmap on top of another bitmap, but
18 * only copying to pixels that are transparent.
20 * Routines to to inverse bitblitting -- well not really.
21 * We don't inverse bitblt like in the PC, but this code
22 * does set up a structure that blits around the cockpit
24 * d2x uses the "Mac" version for everything except __MSDOS__
32 #ifdef __MSDOS__ //ndef MACINTOSH
51 #define OPCODE_ADD 0x81
52 #define OPCODE_ESI 0xC6 // Followed by a dword (add esi, ????)
53 #define OPCODE_EDI 0xC7 // Followed by a dword (add edi, ????)
54 #define OPCODE_MOV_ECX 0xB9 // Followed by a dword (mov ecx,????)
55 #define OPCODE_MOVSB 0xA4 // movsb
56 #define OPCODE_16BIT 0x66 // movsw
57 #define OPCODE_MOVSD 0xA5 // movsd
58 #define OPCODE_REP 0xF3 // rep
59 #define OPCODE_RET 0xC3 // ret
60 #define OPCODE_MOV_EAX 0xB8 // mov eax, im dword
61 #define OPCODE_MOV_EBX 0xBB // mov ebx, im dword
62 #define OPCODE_CALL_EBX1 0xFF // call
63 #define OPCODE_CALL_EBX2 0xD3 // ebx
64 #define OPCODE_MOV_EDI 0xBF // mov edi, im dword
67 ubyte *Code_pointer = NULL;
69 int ibitblt_svga_page = 0;
75 void count_block( int ecx )
81 case 1: Code_counter++; ecx = 0; break; // MOVSB
82 case 2: Code_counter+=2; ecx = 0; break; // MOVSW
83 case 3: Code_counter+=3; ecx = 0; break; // MOVSW, MOVSB
84 case 4: Code_counter++; ecx = 0; break; // MOVSD
88 Code_counter++; // MOVSD
97 void move_and_count( int dsource, int ddest, int ecx )
115 linear_address += ddest; // Skip to next block
117 p1 = linear_address >> 16; o1 = linear_address & 0xFFFF;
118 p2 = (linear_address+ecx) >> 16;
119 if ( p1 != ibitblt_svga_page ) {
121 // MOV EAX, ?, CALL EBX
123 ibitblt_svga_page = p1;
126 Code_counter += 5; // mov edi, ????
132 nbytes = 0xFFFF-o1+1;
133 count_block( nbytes );
136 Code_counter += 7; // mov eax,???? call ebx
138 ibitblt_svga_page = p2;
140 Code_counter += 5; // mov edi, ????
142 nbytes = ecx - nbytes;
144 count_block( nbytes );
146 linear_address += ecx;
152 void draw_block( int ecx )
161 *Code_pointer++ = OPCODE_MOVSB;
166 *Code_pointer++ = OPCODE_16BIT;
167 *Code_pointer++ = OPCODE_MOVSD;
172 *Code_pointer++ = OPCODE_16BIT;
173 *Code_pointer++ = OPCODE_MOVSD;
174 *Code_pointer++ = OPCODE_MOVSB;
179 *Code_pointer++ = OPCODE_MOVSD;
187 *Code_pointer++ = OPCODE_MOVSD;
190 *Code_pointer++ = OPCODE_MOV_ECX;
191 iptr = (int *)Code_pointer;
193 Code_pointer = (ubyte *)iptr;
195 *Code_pointer++ = OPCODE_REP;
196 *Code_pointer++ = OPCODE_MOVSD;
204 void move_and_draw( int dsource, int ddest, int ecx )
213 *Code_pointer++ = OPCODE_ADD;
214 *Code_pointer++ = OPCODE_ESI;
215 iptr = (int *)Code_pointer;
217 Code_pointer = (ubyte *)iptr;
222 *Code_pointer++ = OPCODE_ADD;
223 *Code_pointer++ = OPCODE_EDI;
224 iptr = (int *)Code_pointer;
226 Code_pointer = (ubyte *)iptr;
234 linear_address += ddest; // Skip to next block
236 p1 = linear_address >> 16; o1 = linear_address & 0xFFFF;
237 p2 = (linear_address+ecx) >> 16;
238 if ( p1 != ibitblt_svga_page ) {
241 *Code_pointer++ = OPCODE_MOV_EAX;
243 memcpy( Code_pointer, &temp, sizeof(int) );
244 Code_pointer += sizeof(int);
246 *Code_pointer++ = OPCODE_CALL_EBX1;
247 *Code_pointer++ = OPCODE_CALL_EBX2;
248 ibitblt_svga_page = p1;
251 temp_offset = 0xA0000 + o1;
252 *Code_pointer++ = OPCODE_MOV_EDI;
253 iptr = (int *)Code_pointer;
254 *iptr++ = temp_offset;
255 Code_pointer = (ubyte *)iptr;
261 nbytes = 0xFFFF-o1+1;
262 draw_block( nbytes );
265 *Code_pointer++ = OPCODE_MOV_EAX;
267 memcpy( Code_pointer, &temp, sizeof(int) );
268 Code_pointer += sizeof(int);
270 *Code_pointer++ = OPCODE_CALL_EBX1;
271 *Code_pointer++ = OPCODE_CALL_EBX2;
272 ibitblt_svga_page = p2;
274 temp_offset = 0xA0000;
275 *Code_pointer++ = OPCODE_MOV_EDI;
276 iptr = (int *)Code_pointer;
277 *iptr++ = temp_offset;
278 Code_pointer = (ubyte *)iptr;
280 nbytes = ecx - nbytes;
282 draw_block( nbytes );
284 linear_address += ecx;
289 //-----------------------------------------------------------------------------------------
290 // Given bitmap, bmp, finds the size of the code
292 int gr_ibitblt_find_code_size_sub( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize, int dest_type )
296 int draw_mode = MODE_NONE;
297 int source_offset = 0;
299 int num_to_draw, draw_start_source, draw_start_dest;
302 Assert( (!(mask_bmp->bm_flags&BM_FLAG_RLE)) );
306 if ( dest_type == BM_SVGA ) {
307 Code_counter += 1+4; // move ebx, gr_vesa_set_page
308 Code_counter += 1+4; // move eax, 0
309 Code_counter += 2; // call ebx
310 ibitblt_svga_page = 0;
317 esi = source_offset = 0;
318 edi = dest_offset = 0;
319 draw_start_source = draw_start_dest = 0;
321 for ( y=sy; y<sy+sh; y++ ) {
322 for ( x=sx; x<sx+sw; x++ ) {
323 dest_offset = y*mask_bmp->bm_rowsize+x;
324 pixel = mask_bmp->bm_data[dest_offset];
326 switch ( draw_mode) {
328 move_and_count( draw_start_source-esi, draw_start_dest-edi, num_to_draw );
329 esi = draw_start_source + num_to_draw;
330 edi = draw_start_dest + num_to_draw;
336 draw_mode = MODE_SKIP;
338 switch ( draw_mode) {
341 draw_start_source = source_offset;
342 draw_start_dest = dest_offset;
349 draw_mode = MODE_DRAW;
353 if ( draw_mode == MODE_DRAW ) {
354 move_and_count( draw_start_source-esi, draw_start_dest-edi, num_to_draw );
355 esi = draw_start_source + num_to_draw;
356 edi = draw_start_dest + num_to_draw;
358 draw_mode = MODE_NONE;
359 source_offset += (srowsize - sw);
361 Code_counter++; // for return
363 //printf( "Code will be %d bytes\n", Code_counter );
365 Code_counter += 16; // for safety was 16
370 int gr_ibitblt_find_code_size( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize )
372 return gr_ibitblt_find_code_size_sub( mask_bmp, sx, sy, sw, sh, srowsize, BM_LINEAR );
375 int gr_ibitblt_find_code_size_svga( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize )
377 return gr_ibitblt_find_code_size_sub( mask_bmp, sx, sy, sw, sh, srowsize, BM_SVGA );
380 //-----------------------------------------------------------------------------------------
381 // Given bitmap, bmp, create code that transfers a bitmap of size sw*sh to position
382 // (sx,sy) on top of bmp, only overwritting transparent pixels of the bitmap.
384 ubyte *gr_ibitblt_create_mask_sub( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize, int dest_type )
388 int draw_mode = MODE_NONE;
389 int source_offset = 0;
391 int num_to_draw, draw_start_source, draw_start_dest;
397 Assert( (!(mask_bmp->bm_flags&BM_FLAG_RLE)) );
399 if ( dest_type == BM_SVGA )
400 code_size = gr_ibitblt_find_code_size_svga( mask_bmp, sx, sy, sw, sh, srowsize );
402 code_size = gr_ibitblt_find_code_size( mask_bmp, sx, sy, sw, sh, srowsize );
404 code = malloc( code_size );
410 if ( dest_type == BM_SVGA ) {
411 // MOV EBX, gr_vesa_setpage
412 *Code_pointer++ = OPCODE_MOV_EBX;
413 temp = (uint)gr_vesa_setpage;
414 memcpy( Code_pointer, &temp, sizeof(int) );
415 Code_pointer += sizeof(int);
417 *Code_pointer++ = OPCODE_MOV_EAX;
419 memcpy( Code_pointer, &temp, sizeof(int) );
420 Code_pointer += sizeof(int);
422 *Code_pointer++ = OPCODE_CALL_EBX1;
423 *Code_pointer++ = OPCODE_CALL_EBX2;
425 ibitblt_svga_page = 0;
431 esi = source_offset = 0;
432 edi = dest_offset = 0;
433 draw_start_source = draw_start_dest = 0;
435 for ( y=sy; y<sy+sh; y++ ) {
436 for ( x=sx; x<sx+sw; x++ ) {
437 dest_offset = y*mask_bmp->bm_rowsize+x;
438 pixel = mask_bmp->bm_data[dest_offset];
440 switch ( draw_mode) {
442 move_and_draw( draw_start_source-esi, draw_start_dest-edi, num_to_draw );
443 esi = draw_start_source + num_to_draw;
444 edi = draw_start_dest + num_to_draw;
450 draw_mode = MODE_SKIP;
452 switch ( draw_mode) {
455 draw_start_source = source_offset;
456 draw_start_dest = dest_offset;
463 draw_mode = MODE_DRAW;
467 if ( draw_mode == MODE_DRAW ) {
468 move_and_draw( draw_start_source-esi, draw_start_dest-edi, num_to_draw );
469 esi = draw_start_source + num_to_draw;
470 edi = draw_start_dest + num_to_draw;
472 draw_mode = MODE_NONE;
473 source_offset += (srowsize - sw);
475 *Code_pointer++ = OPCODE_RET;
477 if ( Code_pointer >= &code[code_size-1] )
478 Error( "ibitblt overwrote allocated code block\n" );
480 //printf( "Code is %d bytes\n", Code_pointer - code );
485 ubyte *gr_ibitblt_create_mask( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize )
487 return gr_ibitblt_create_mask_sub( mask_bmp, sx, sy, sw, sh, srowsize, BM_LINEAR );
490 ubyte *gr_ibitblt_create_mask_svga( grs_bitmap * mask_bmp, int sx, int sy, int sw, int sh, int srowsize )
492 return gr_ibitblt_create_mask_sub( mask_bmp, sx, sy, sw, sh, srowsize, BM_SVGA );
496 void gr_ibitblt_do_asm(char *start_si, char *start_di, ubyte * code);
497 #pragma aux gr_ibitblt_do_asm parm [esi] [edi] [eax] modify [ecx edi esi eax] = \
504 void gr_ibitblt(grs_bitmap * source_bmp, grs_bitmap * dest_bmp, ubyte * mask )
507 gr_ibitblt_do_asm( source_bmp->bm_data, dest_bmp->bm_data, mask );
511 void gr_ibitblt_find_hole_size( grs_bitmap * mask_bmp, int *minx, int *miny, int *maxx, int *maxy )
516 Assert( (!(mask_bmp->bm_flags&BM_FLAG_RLE)) );
518 *minx = mask_bmp->bm_w-1;
520 *miny = mask_bmp->bm_h-1;
523 for ( y=0; y<mask_bmp->bm_h; y++ )
524 for ( x=0; x<mask_bmp->bm_w; x++ ) {
525 c = mask_bmp->bm_data[mask_bmp->bm_rowsize*y+x];
527 if ( x < *minx ) *minx = x;
528 if ( y < *miny ) *miny = y;
529 if ( x > *maxx ) *maxx = x;
530 if ( y > *maxy ) *maxy = y;
536 Error( "Bitmap for ibitblt doesn't have transparency!\n" );
540 #else /* __MSDOS__ */ // was: /* !MACINTOSH */
552 #define MAX_WIDTH 640
553 #define MAX_SCANLINES 480
556 static short start_points[MAX_SCANLINES][MAX_HOLES];
557 static short hole_length[MAX_SCANLINES][MAX_HOLES];
558 static double *scanline = NULL;
560 void gr_ibitblt(grs_bitmap *src_bmp, grs_bitmap *dest_bmp)
562 int x, y, sw, sh, srowsize, drowsize, dstart, sy;
569 srowsize = src_bmp->bm_rowsize;
570 drowsize = dest_bmp->bm_rowsize;
571 src = src_bmp->bm_data;
572 dest = dest_bmp->bm_data;
575 while (start_points[sy][0] == -1) {
580 Assert(sw <= MAX_WIDTH);
581 Assert(sh <= MAX_SCANLINES);
582 for (y = sy; y < sy + sh; y++) {
583 for (x = 0; x < MAX_HOLES; x++) {
584 if (start_points[y][x] == -1)
586 dstart = start_points[y][x];
587 gr_linear_movsd(&(src[dstart]), &(dest[dstart]), hole_length[y][x]);
594 void gr_ibitblt_create_mask(grs_bitmap *mask_bmp, int sx, int sy, int sw, int sh, int srowsize)
600 Assert( (!(mask_bmp->bm_flags&BM_FLAG_RLE)) );
602 for (y = 0; y < MAX_SCANLINES; y++) {
603 for (x = 0; x < MAX_HOLES; x++) {
604 start_points[y][x] = -1;
605 hole_length[y][x] = -1;
609 for (y = sy; y < sy+sh; y++) {
612 for (x = sx; x < sx + sw; x++) {
613 if ((mode == FIND_START) && (mask_bmp->bm_data[mask_bmp->bm_rowsize*y+x] == TRANSPARENCY_COLOR)) {
614 start_points[y][count] = x;
616 } else if ((mode == FIND_STOP) && (mask_bmp->bm_data[mask_bmp->bm_rowsize*y+x] != TRANSPARENCY_COLOR)) {
617 hole_length[y][count] = x - start_points[y][count];
622 if (mode == FIND_STOP) {
623 hole_length[y][count] = x - start_points[y][count];
626 Assert(count <= MAX_HOLES);
630 void gr_ibitblt_find_hole_size(grs_bitmap *mask_bmp, int *minx, int *miny, int *maxx, int *maxy)
635 Assert( (!(mask_bmp->bm_flags&BM_FLAG_RLE)) );
636 Assert( mask_bmp->bm_flags&BM_FLAG_TRANSPARENT );
638 *minx = mask_bmp->bm_w - 1;
640 *miny = mask_bmp->bm_h - 1;
643 if (scanline == NULL)
644 scanline = (double *)malloc(sizeof(double) * (MAX_WIDTH / sizeof(double)));
646 for (y = 0; y < mask_bmp->bm_h; y++) {
647 for (x = 0; x < mask_bmp->bm_w; x++) {
648 c = mask_bmp->bm_data[mask_bmp->bm_rowsize*y+x];
649 if (c == TRANSPARENCY_COLOR) { // don't look for transparancy color here.
651 if (x < *minx) *minx = x;
652 if (y < *miny) *miny = y;
653 if (x > *maxx) *maxx = x;
654 if (y > *maxy) *maxy = y;
661 #endif /* __MSDOS__ */ // was: /* !MACINTOSH */