1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
#include <u.h>
#include <libc.h>
#include <bio.h>
#include <ttf.h>
#include "impl.h"
TTBitmap *
ttfnewbitmap(int w, int h)
{
TTBitmap *b;
b = mallocz(sizeof(TTBitmap), 1);
if(b == nil) return nil;
b->width = w;
b->height = h;
b->stride = w + 7 >> 3;
b->bit = mallocz(b->stride * h, 1);
if(b->bit == nil){
free(b);
return nil;
}
return b;
}
void
ttffreebitmap(TTBitmap *b)
{
if(b == nil) return;
free(b->bit);
free(b);
}
void
ttfblit(TTBitmap *dst, int dx, int dy, TTBitmap *src, int sx0, int sy0, int sx1, int sy1)
{
uchar *sp, *dp;
u32int b;
int x, y, ss, ds, dx1, dy1;
if(sx0 < 0) sx0 = 0;
if(sy0 < 0) sy0 = 0;
if(sx1 > src->width) sx1 = src->width;
if(sy1 > src->height) sy1 = src->height;
if(dx < 0){
sx0 -= dx;
dx = 0;
}
if(dy < 0){
sy0 -= dy;
dy = 0;
}
dx1 = dx + sx1 - sx0;
dy1 = dy + sy1 - sy0;
if(dx1 > dst->width){
sx1 -= dx1 - dst->width;
dx1 = dst->width;
}
if(dy1 > dst->height) sy1 -= dy1 - dst->height;
if(sx1 <= sx0 || sy1 <= sy0) return;
ss = src->stride - ((sx1-1 >> 3) - (sx0 >> 3) + 1);
ds = dst->stride - ((dx1-1 >> 3) - (dx >> 3) + 1);
sp = src->bit + sy0 * src->stride + (sx0 >> 3);
dp = dst->bit + dy * dst->stride + (dx >> 3);
y = sy1 - sy0;
do{
if(sx0 >> 3 == sx1 >> 3){
b = (*sp++ << 8 & 0xff << 8-(sx0 & 7)) & -0x10000 >> (sx1 & 7);
if((sx0 & 7) == 0) b >>= 8;
x = (dx & 7) + (sx1 - sx0);
}else{
if((sx0 & 7) != 0)
b = *sp++ << 8 & 0xff << (-sx0 & 7);
else
b = 0;
x = (sx1 >> 3) - (sx0+7 >> 3);
while(--x >= 0){
b |= *sp++;
*dp++ |= b >> (dx & 7) + (-sx0 & 7);
b <<= 8;
}
if((sx1 & 7) != 0)
b |= *sp++ & -0x100 >> (sx1 & 7);
x = (dx & 7) + (-sx0 & 7) + (sx1 & 7);
}
for(; x > 0; x -= 8){
*dp++ |= b >> (dx & 7) + (-sx0 & 7);
b <<= 8;
}
sp += ss;
dp += ds;
}while(--y > 0);
}
|
