2 * Copyright (c) 1991-1997 Søren Schmidt
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer,
10 * in this position and unchanged.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 * $FreeBSD: src/lib/libvgl/bitmap.c,v 1.4 1999/11/08 11:37:39 yokota Exp $
29 * $DragonFly: src/lib/libvgl/bitmap.c,v 1.3 2004/06/19 18:55:47 joerg Exp $
32 #include <sys/types.h>
34 #include <machine/console.h>
37 #define min(x, y) (((x) < (y)) ? (x) : (y))
39 static byte mask
[8] = {0xff, 0x7f, 0x3f, 0x1f, 0x0f, 0x07, 0x03, 0x01};
40 static int color2bit
[16] = {0x00000000, 0x00000001, 0x00000100, 0x00000101,
41 0x00010000, 0x00010001, 0x00010100, 0x00010101,
42 0x01000000, 0x01000001, 0x01000100, 0x01000101,
43 0x01010000, 0x01010001, 0x01010100, 0x01010101};
46 WriteVerticalLine(VGLBitmap
*dst
, int x
, int y
, int width
, byte
*line
)
48 int i
, pos
, last
, planepos
, start_offset
, end_offset
, offset
;
50 unsigned int word
= 0;
57 start_offset
= (x
& 0x07);
58 end_offset
= (x
+ width
) & 0x07;
59 i
= (width
+ start_offset
) / 8;
63 VGLPlane
[1] = VGLPlane
[0] + i
;
64 VGLPlane
[2] = VGLPlane
[1] + i
;
65 VGLPlane
[3] = VGLPlane
[2] + i
;
68 last
= 8 - start_offset
;
71 while (pos
< last
&& pos
< width
)
72 word
= (word
<<1) | color2bit
[line
[pos
++]&0x0f];
73 VGLPlane
[0][planepos
] = word
;
74 VGLPlane
[1][planepos
] = word
>>8;
75 VGLPlane
[2][planepos
] = word
>>16;
76 VGLPlane
[3][planepos
] = word
>>24;
82 word
<<= (8 - end_offset
);
83 VGLPlane
[0][planepos
] = word
;
84 VGLPlane
[1][planepos
] = word
>>8;
85 VGLPlane
[2][planepos
] = word
>>16;
86 VGLPlane
[3][planepos
] = word
>>24;
88 if (start_offset
|| end_offset
)
91 outb(0x3ce, 0x01); outb(0x3cf, 0x00); /* set/reset enable */
92 outb(0x3ce, 0x08); outb(0x3cf, 0xff); /* bit mask */
98 pos
= VGLAdpInfo
.va_line_width
*y
+ x
/8;
99 if (dst
->Type
== VIDBUF4
) {
101 VGLPlane
[i
][planepos
] |= dst
->Bitmap
[pos
+planepos
] & mask
[end_offset
];
103 VGLPlane
[i
][0] |= dst
->Bitmap
[pos
] & ~mask
[start_offset
];
104 bcopy(&VGLPlane
[i
][0], dst
->Bitmap
+ pos
, width
);
105 } else { /* VIDBUF4S */
107 offset
= VGLSetSegment(pos
+ planepos
);
108 VGLPlane
[i
][planepos
] |= dst
->Bitmap
[offset
] & mask
[end_offset
];
110 offset
= VGLSetSegment(pos
);
112 VGLPlane
[i
][0] |= dst
->Bitmap
[offset
] & ~mask
[start_offset
];
113 for (last
= width
; ; ) {
114 len
= min(VGLAdpInfo
.va_window_size
- offset
, last
);
115 bcopy(&VGLPlane
[i
][width
- last
], dst
->Bitmap
+ offset
, len
);
120 offset
= VGLSetSegment(pos
);
126 address
= dst
->Bitmap
+ VGLAdpInfo
.va_line_width
* y
+ x
/4;
127 for (i
=0; i
<4; i
++) {
129 outb(0x3c5, 0x01 << ((x
+ i
)%4));
130 for (planepos
=0, pos
=i
; pos
<width
; planepos
++, pos
+=4)
131 address
[planepos
] = line
[pos
];
137 pos
= dst
->VXsize
* y
+ x
;
139 offset
= VGLSetSegment(pos
);
140 i
= min(VGLAdpInfo
.va_window_size
- offset
, width
);
141 bcopy(line
, dst
->Bitmap
+ offset
, i
);
149 address
= dst
->Bitmap
+ dst
->VXsize
* y
+ x
;
150 bcopy(line
, address
, width
);
159 ReadVerticalLine(VGLBitmap
*src
, int x
, int y
, int width
, byte
*line
)
161 int i
, bit
, pos
, count
, planepos
, start_offset
, end_offset
, offset
;
168 start_offset
= (x
& 0x07);
169 end_offset
= (x
+ width
) & 0x07;
170 count
= (width
+ start_offset
) / 8;
173 VGLPlane
[0] = VGLBuf
;
174 VGLPlane
[1] = VGLPlane
[0] + count
;
175 VGLPlane
[2] = VGLPlane
[1] + count
;
176 VGLPlane
[3] = VGLPlane
[2] + count
;
177 for (i
=0; i
<4; i
++) {
180 pos
= VGLAdpInfo
.va_line_width
*y
+ x
/8;
181 for (width2
= count
; width2
> 0; ) {
182 offset
= VGLSetSegment(pos
);
183 len
= min(VGLAdpInfo
.va_window_size
- offset
, width2
);
184 bcopy(src
->Bitmap
+ offset
, &VGLPlane
[i
][count
- width2
], len
);
191 address
= src
->Bitmap
+ VGLAdpInfo
.va_line_width
* y
+ x
/8;
192 start_offset
= (x
& 0x07);
193 end_offset
= (x
+ width
) & 0x07;
194 count
= (width
+ start_offset
) / 8;
197 VGLPlane
[0] = VGLBuf
;
198 VGLPlane
[1] = VGLPlane
[0] + count
;
199 VGLPlane
[2] = VGLPlane
[1] + count
;
200 VGLPlane
[3] = VGLPlane
[2] + count
;
201 for (i
=0; i
<4; i
++) {
204 bcopy(address
, &VGLPlane
[i
][0], count
);
209 bit
= 7 - start_offset
;
210 while (pos
< width
) {
211 for (; bit
>= 0 && pos
< width
; bit
--, pos
++) {
212 line
[pos
] = (VGLPlane
[0][planepos
] & (1<<bit
) ? 1 : 0) |
213 ((VGLPlane
[1][planepos
] & (1<<bit
) ? 1 : 0) << 1) |
214 ((VGLPlane
[2][planepos
] & (1<<bit
) ? 1 : 0) << 2) |
215 ((VGLPlane
[3][planepos
] & (1<<bit
) ? 1 : 0) << 3);
222 address
= src
->Bitmap
+ VGLAdpInfo
.va_line_width
* y
+ x
/4;
223 for (i
=0; i
<4; i
++) {
225 outb(0x3cf, (x
+ i
)%4);
226 for (planepos
=0, pos
=i
; pos
<width
; planepos
++, pos
+=4)
227 line
[pos
] = address
[planepos
];
233 pos
= src
->VXsize
* y
+ x
;
235 offset
= VGLSetSegment(pos
);
236 i
= min(VGLAdpInfo
.va_window_size
- offset
, width
);
237 bcopy(src
->Bitmap
+ offset
, line
, i
);
245 address
= src
->Bitmap
+ src
->VXsize
* y
+ x
;
246 bcopy(address
, line
, width
);
254 __VGLBitmapCopy(VGLBitmap
*src
, int srcx
, int srcy
,
255 VGLBitmap
*dst
, int dstx
, int dsty
, int width
, int hight
)
257 int srcline
, dstline
;
259 if (srcx
>src
->VXsize
|| srcy
>src
->VYsize
260 || dstx
>dst
->VXsize
|| dsty
>dst
->VYsize
)
263 width
=width
+srcx
; dstx
-=srcx
; srcx
=0;
266 hight
=hight
+srcy
; dsty
-=srcy
; srcy
=0;
269 width
=width
+dstx
; srcx
-=dstx
; dstx
=0;
272 hight
=hight
+dsty
; srcy
-=dsty
; dsty
=0;
274 if (srcx
+width
> src
->VXsize
)
275 width
=src
->VXsize
-srcx
;
276 if (srcy
+hight
> src
->VYsize
)
277 hight
=src
->VYsize
-srcy
;
278 if (dstx
+width
> dst
->VXsize
)
279 width
=dst
->VXsize
-dstx
;
280 if (dsty
+hight
> dst
->VYsize
)
281 hight
=dst
->VYsize
-dsty
;
282 if (width
< 0 || hight
< 0)
284 if (src
->Type
== MEMBUF
) {
285 for (srcline
=srcy
, dstline
=dsty
; srcline
<srcy
+hight
; srcline
++, dstline
++) {
286 WriteVerticalLine(dst
, dstx
, dstline
, width
,
287 (src
->Bitmap
+(srcline
*src
->VXsize
)+srcx
));
290 else if (dst
->Type
== MEMBUF
) {
291 for (srcline
=srcy
, dstline
=dsty
; srcline
<srcy
+hight
; srcline
++, dstline
++) {
292 ReadVerticalLine(src
, srcx
, srcline
, width
,
293 (dst
->Bitmap
+(dstline
*dst
->VXsize
)+dstx
));
297 byte buffer
[2048]; /* XXX */
300 if (width
> sizeof(buffer
)) {
307 for (srcline
=srcy
, dstline
=dsty
; srcline
<srcy
+hight
; srcline
++, dstline
++) {
308 ReadVerticalLine(src
, srcx
, srcline
, width
, p
);
309 WriteVerticalLine(dst
, dstx
, dstline
, width
, p
);
311 if (width
> sizeof(buffer
))
318 VGLBitmapCopy(VGLBitmap
*src
, int srcx
, int srcy
,
319 VGLBitmap
*dst
, int dstx
, int dsty
, int width
, int hight
)
323 VGLMouseFreeze(dstx
, dsty
, width
, hight
, 0);
324 error
= __VGLBitmapCopy(src
, srcx
, srcy
, dst
, dstx
, dsty
, width
, hight
);
330 *VGLBitmapCreate(int type
, int xsize
, int ysize
, byte
*bits
)
336 if (xsize
< 0 || ysize
< 0)
338 object
= (VGLBitmap
*)malloc(sizeof(*object
));
342 object
->Xsize
= xsize
;
343 object
->Ysize
= ysize
;
344 object
->VXsize
= xsize
;
345 object
->VYsize
= ysize
;
348 object
->Bitmap
= bits
;
353 VGLBitmapDestroy(VGLBitmap
*object
)
356 free(object
->Bitmap
);
361 VGLBitmapAllocateBits(VGLBitmap
*object
)
363 object
->Bitmap
= (byte
*)malloc(object
->VXsize
*object
->VYsize
);
364 if (object
->Bitmap
== NULL
)