Blame


1 76193d7c 2003-09-30 devnull #include <u.h>
2 76193d7c 2003-09-30 devnull #include <libc.h>
3 76193d7c 2003-09-30 devnull #include <draw.h>
4 76193d7c 2003-09-30 devnull #include <memdraw.h>
5 76193d7c 2003-09-30 devnull
6 76193d7c 2003-09-30 devnull enum
7 76193d7c 2003-09-30 devnull {
8 76193d7c 2003-09-30 devnull Arrow1 = 8,
9 76193d7c 2003-09-30 devnull Arrow2 = 10,
10 76193d7c 2003-09-30 devnull Arrow3 = 3,
11 76193d7c 2003-09-30 devnull };
12 76193d7c 2003-09-30 devnull
13 76193d7c 2003-09-30 devnull static
14 76193d7c 2003-09-30 devnull int
15 76193d7c 2003-09-30 devnull lmin(int a, int b)
16 76193d7c 2003-09-30 devnull {
17 76193d7c 2003-09-30 devnull if(a < b)
18 76193d7c 2003-09-30 devnull return a;
19 76193d7c 2003-09-30 devnull return b;
20 76193d7c 2003-09-30 devnull }
21 76193d7c 2003-09-30 devnull
22 76193d7c 2003-09-30 devnull static
23 76193d7c 2003-09-30 devnull int
24 76193d7c 2003-09-30 devnull lmax(int a, int b)
25 76193d7c 2003-09-30 devnull {
26 76193d7c 2003-09-30 devnull if(a > b)
27 76193d7c 2003-09-30 devnull return a;
28 76193d7c 2003-09-30 devnull return b;
29 76193d7c 2003-09-30 devnull }
30 76193d7c 2003-09-30 devnull
31 76193d7c 2003-09-30 devnull #ifdef NOTUSED
32 76193d7c 2003-09-30 devnull /*
33 76193d7c 2003-09-30 devnull * Rather than line clip, we run the Bresenham loop over the full line,
34 76193d7c 2003-09-30 devnull * and clip on each pixel. This is more expensive but means that
35 76193d7c 2003-09-30 devnull * lines look the same regardless of how the windowing has tiled them.
36 76193d7c 2003-09-30 devnull * For speed, we check for clipping outside the loop and make the
37 76193d7c 2003-09-30 devnull * test easy when possible.
38 76193d7c 2003-09-30 devnull */
39 76193d7c 2003-09-30 devnull
40 76193d7c 2003-09-30 devnull static
41 76193d7c 2003-09-30 devnull void
42 76193d7c 2003-09-30 devnull horline1(Memimage *dst, Point p0, Point p1, int srcval, Rectangle clipr)
43 76193d7c 2003-09-30 devnull {
44 76193d7c 2003-09-30 devnull int x, y, dy, deltay, deltax, maxx;
45 76193d7c 2003-09-30 devnull int dd, easy, e, bpp, m, m0;
46 76193d7c 2003-09-30 devnull uchar *d;
47 76193d7c 2003-09-30 devnull
48 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
49 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
50 76193d7c 2003-09-30 devnull dd = dst->width*sizeof(u32int);
51 76193d7c 2003-09-30 devnull dy = 1;
52 76193d7c 2003-09-30 devnull if(deltay < 0){
53 76193d7c 2003-09-30 devnull dd = -dd;
54 76193d7c 2003-09-30 devnull deltay = -deltay;
55 76193d7c 2003-09-30 devnull dy = -1;
56 76193d7c 2003-09-30 devnull }
57 76193d7c 2003-09-30 devnull maxx = lmin(p1.x, clipr.max.x-1);
58 76193d7c 2003-09-30 devnull bpp = dst->depth;
59 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
60 76193d7c 2003-09-30 devnull m = m0 >> (p0.x&(7/dst->depth))*bpp;
61 76193d7c 2003-09-30 devnull easy = ptinrect(p0, clipr) && ptinrect(p1, clipr);
62 76193d7c 2003-09-30 devnull e = 2*deltay - deltax;
63 76193d7c 2003-09-30 devnull y = p0.y;
64 76193d7c 2003-09-30 devnull d = byteaddr(dst, p0);
65 76193d7c 2003-09-30 devnull deltay *= 2;
66 76193d7c 2003-09-30 devnull deltax = deltay - 2*deltax;
67 76193d7c 2003-09-30 devnull for(x=p0.x; x<=maxx; x++){
68 76193d7c 2003-09-30 devnull if(easy || (clipr.min.x<=x && clipr.min.y<=y && y<clipr.max.y))
69 76193d7c 2003-09-30 devnull *d ^= (*d^srcval) & m;
70 76193d7c 2003-09-30 devnull if(e > 0){
71 76193d7c 2003-09-30 devnull y += dy;
72 76193d7c 2003-09-30 devnull d += dd;
73 76193d7c 2003-09-30 devnull e += deltax;
74 76193d7c 2003-09-30 devnull }else
75 76193d7c 2003-09-30 devnull e += deltay;
76 76193d7c 2003-09-30 devnull d++;
77 76193d7c 2003-09-30 devnull m >>= bpp;
78 76193d7c 2003-09-30 devnull if(m == 0)
79 76193d7c 2003-09-30 devnull m = m0;
80 76193d7c 2003-09-30 devnull }
81 76193d7c 2003-09-30 devnull }
82 76193d7c 2003-09-30 devnull
83 76193d7c 2003-09-30 devnull static
84 76193d7c 2003-09-30 devnull void
85 76193d7c 2003-09-30 devnull verline1(Memimage *dst, Point p0, Point p1, int srcval, Rectangle clipr)
86 76193d7c 2003-09-30 devnull {
87 76193d7c 2003-09-30 devnull int x, y, deltay, deltax, maxy;
88 76193d7c 2003-09-30 devnull int easy, e, bpp, m, m0, dd;
89 76193d7c 2003-09-30 devnull uchar *d;
90 76193d7c 2003-09-30 devnull
91 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
92 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
93 76193d7c 2003-09-30 devnull dd = 1;
94 76193d7c 2003-09-30 devnull if(deltax < 0){
95 76193d7c 2003-09-30 devnull dd = -1;
96 76193d7c 2003-09-30 devnull deltax = -deltax;
97 76193d7c 2003-09-30 devnull }
98 76193d7c 2003-09-30 devnull maxy = lmin(p1.y, clipr.max.y-1);
99 76193d7c 2003-09-30 devnull bpp = dst->depth;
100 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
101 76193d7c 2003-09-30 devnull m = m0 >> (p0.x&(7/dst->depth))*bpp;
102 76193d7c 2003-09-30 devnull easy = ptinrect(p0, clipr) && ptinrect(p1, clipr);
103 76193d7c 2003-09-30 devnull e = 2*deltax - deltay;
104 76193d7c 2003-09-30 devnull x = p0.x;
105 76193d7c 2003-09-30 devnull d = byteaddr(dst, p0);
106 76193d7c 2003-09-30 devnull deltax *= 2;
107 76193d7c 2003-09-30 devnull deltay = deltax - 2*deltay;
108 76193d7c 2003-09-30 devnull for(y=p0.y; y<=maxy; y++){
109 76193d7c 2003-09-30 devnull if(easy || (clipr.min.y<=y && clipr.min.x<=x && x<clipr.max.x))
110 76193d7c 2003-09-30 devnull *d ^= (*d^srcval) & m;
111 76193d7c 2003-09-30 devnull if(e > 0){
112 76193d7c 2003-09-30 devnull x += dd;
113 76193d7c 2003-09-30 devnull d += dd;
114 76193d7c 2003-09-30 devnull e += deltay;
115 76193d7c 2003-09-30 devnull }else
116 76193d7c 2003-09-30 devnull e += deltax;
117 76193d7c 2003-09-30 devnull d += dst->width*sizeof(u32int);
118 76193d7c 2003-09-30 devnull m >>= bpp;
119 76193d7c 2003-09-30 devnull if(m == 0)
120 76193d7c 2003-09-30 devnull m = m0;
121 76193d7c 2003-09-30 devnull }
122 76193d7c 2003-09-30 devnull }
123 76193d7c 2003-09-30 devnull
124 76193d7c 2003-09-30 devnull static
125 76193d7c 2003-09-30 devnull void
126 76193d7c 2003-09-30 devnull horliner(Memimage *dst, Point p0, Point p1, Memimage *src, Point dsrc, Rectangle clipr)
127 76193d7c 2003-09-30 devnull {
128 76193d7c 2003-09-30 devnull int x, y, sx, sy, deltay, deltax, minx, maxx;
129 76193d7c 2003-09-30 devnull int bpp, m, m0;
130 76193d7c 2003-09-30 devnull uchar *d, *s;
131 76193d7c 2003-09-30 devnull
132 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
133 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
134 76193d7c 2003-09-30 devnull sx = drawreplxy(src->r.min.x, src->r.max.x, p0.x+dsrc.x);
135 76193d7c 2003-09-30 devnull minx = lmax(p0.x, clipr.min.x);
136 76193d7c 2003-09-30 devnull maxx = lmin(p1.x, clipr.max.x-1);
137 76193d7c 2003-09-30 devnull bpp = dst->depth;
138 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
139 76193d7c 2003-09-30 devnull m = m0 >> (minx&(7/dst->depth))*bpp;
140 76193d7c 2003-09-30 devnull for(x=minx; x<=maxx; x++){
141 76193d7c 2003-09-30 devnull y = p0.y + (deltay*(x-p0.x)+deltax/2)/deltax;
142 76193d7c 2003-09-30 devnull if(clipr.min.y<=y && y<clipr.max.y){
143 76193d7c 2003-09-30 devnull d = byteaddr(dst, Pt(x, y));
144 76193d7c 2003-09-30 devnull sy = drawreplxy(src->r.min.y, src->r.max.y, y+dsrc.y);
145 76193d7c 2003-09-30 devnull s = byteaddr(src, Pt(sx, sy));
146 76193d7c 2003-09-30 devnull *d ^= (*d^*s) & m;
147 76193d7c 2003-09-30 devnull }
148 76193d7c 2003-09-30 devnull if(++sx >= src->r.max.x)
149 76193d7c 2003-09-30 devnull sx = src->r.min.x;
150 76193d7c 2003-09-30 devnull m >>= bpp;
151 76193d7c 2003-09-30 devnull if(m == 0)
152 76193d7c 2003-09-30 devnull m = m0;
153 76193d7c 2003-09-30 devnull }
154 76193d7c 2003-09-30 devnull }
155 76193d7c 2003-09-30 devnull
156 76193d7c 2003-09-30 devnull static
157 76193d7c 2003-09-30 devnull void
158 76193d7c 2003-09-30 devnull verliner(Memimage *dst, Point p0, Point p1, Memimage *src, Point dsrc, Rectangle clipr)
159 76193d7c 2003-09-30 devnull {
160 76193d7c 2003-09-30 devnull int x, y, sx, sy, deltay, deltax, miny, maxy;
161 76193d7c 2003-09-30 devnull int bpp, m, m0;
162 76193d7c 2003-09-30 devnull uchar *d, *s;
163 76193d7c 2003-09-30 devnull
164 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
165 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
166 76193d7c 2003-09-30 devnull sy = drawreplxy(src->r.min.y, src->r.max.y, p0.y+dsrc.y);
167 76193d7c 2003-09-30 devnull miny = lmax(p0.y, clipr.min.y);
168 76193d7c 2003-09-30 devnull maxy = lmin(p1.y, clipr.max.y-1);
169 76193d7c 2003-09-30 devnull bpp = dst->depth;
170 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
171 76193d7c 2003-09-30 devnull for(y=miny; y<=maxy; y++){
172 76193d7c 2003-09-30 devnull if(deltay == 0) /* degenerate line */
173 76193d7c 2003-09-30 devnull x = p0.x;
174 76193d7c 2003-09-30 devnull else
175 76193d7c 2003-09-30 devnull x = p0.x + (deltax*(y-p0.y)+deltay/2)/deltay;
176 76193d7c 2003-09-30 devnull if(clipr.min.x<=x && x<clipr.max.x){
177 76193d7c 2003-09-30 devnull m = m0 >> (x&(7/dst->depth))*bpp;
178 76193d7c 2003-09-30 devnull d = byteaddr(dst, Pt(x, y));
179 76193d7c 2003-09-30 devnull sx = drawreplxy(src->r.min.x, src->r.max.x, x+dsrc.x);
180 76193d7c 2003-09-30 devnull s = byteaddr(src, Pt(sx, sy));
181 76193d7c 2003-09-30 devnull *d ^= (*d^*s) & m;
182 76193d7c 2003-09-30 devnull }
183 76193d7c 2003-09-30 devnull if(++sy >= src->r.max.y)
184 76193d7c 2003-09-30 devnull sy = src->r.min.y;
185 76193d7c 2003-09-30 devnull }
186 76193d7c 2003-09-30 devnull }
187 76193d7c 2003-09-30 devnull
188 76193d7c 2003-09-30 devnull static
189 76193d7c 2003-09-30 devnull void
190 76193d7c 2003-09-30 devnull horline(Memimage *dst, Point p0, Point p1, Memimage *src, Point dsrc, Rectangle clipr)
191 76193d7c 2003-09-30 devnull {
192 76193d7c 2003-09-30 devnull int x, y, deltay, deltax, minx, maxx;
193 76193d7c 2003-09-30 devnull int bpp, m, m0;
194 76193d7c 2003-09-30 devnull uchar *d, *s;
195 76193d7c 2003-09-30 devnull
196 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
197 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
198 76193d7c 2003-09-30 devnull minx = lmax(p0.x, clipr.min.x);
199 76193d7c 2003-09-30 devnull maxx = lmin(p1.x, clipr.max.x-1);
200 76193d7c 2003-09-30 devnull bpp = dst->depth;
201 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
202 76193d7c 2003-09-30 devnull m = m0 >> (minx&(7/dst->depth))*bpp;
203 76193d7c 2003-09-30 devnull for(x=minx; x<=maxx; x++){
204 76193d7c 2003-09-30 devnull y = p0.y + (deltay*(x-p0.x)+deltay/2)/deltax;
205 76193d7c 2003-09-30 devnull if(clipr.min.y<=y && y<clipr.max.y){
206 76193d7c 2003-09-30 devnull d = byteaddr(dst, Pt(x, y));
207 76193d7c 2003-09-30 devnull s = byteaddr(src, addpt(dsrc, Pt(x, y)));
208 76193d7c 2003-09-30 devnull *d ^= (*d^*s) & m;
209 76193d7c 2003-09-30 devnull }
210 76193d7c 2003-09-30 devnull m >>= bpp;
211 76193d7c 2003-09-30 devnull if(m == 0)
212 76193d7c 2003-09-30 devnull m = m0;
213 76193d7c 2003-09-30 devnull }
214 76193d7c 2003-09-30 devnull }
215 76193d7c 2003-09-30 devnull
216 76193d7c 2003-09-30 devnull static
217 76193d7c 2003-09-30 devnull void
218 76193d7c 2003-09-30 devnull verline(Memimage *dst, Point p0, Point p1, Memimage *src, Point dsrc, Rectangle clipr)
219 76193d7c 2003-09-30 devnull {
220 76193d7c 2003-09-30 devnull int x, y, deltay, deltax, miny, maxy;
221 76193d7c 2003-09-30 devnull int bpp, m, m0;
222 76193d7c 2003-09-30 devnull uchar *d, *s;
223 76193d7c 2003-09-30 devnull
224 76193d7c 2003-09-30 devnull deltax = p1.x - p0.x;
225 76193d7c 2003-09-30 devnull deltay = p1.y - p0.y;
226 76193d7c 2003-09-30 devnull miny = lmax(p0.y, clipr.min.y);
227 76193d7c 2003-09-30 devnull maxy = lmin(p1.y, clipr.max.y-1);
228 76193d7c 2003-09-30 devnull bpp = dst->depth;
229 76193d7c 2003-09-30 devnull m0 = 0xFF^(0xFF>>bpp);
230 76193d7c 2003-09-30 devnull for(y=miny; y<=maxy; y++){
231 76193d7c 2003-09-30 devnull if(deltay == 0) /* degenerate line */
232 76193d7c 2003-09-30 devnull x = p0.x;
233 76193d7c 2003-09-30 devnull else
234 76193d7c 2003-09-30 devnull x = p0.x + deltax*(y-p0.y)/deltay;
235 76193d7c 2003-09-30 devnull if(clipr.min.x<=x && x<clipr.max.x){
236 76193d7c 2003-09-30 devnull m = m0 >> (x&(7/dst->depth))*bpp;
237 76193d7c 2003-09-30 devnull d = byteaddr(dst, Pt(x, y));
238 76193d7c 2003-09-30 devnull s = byteaddr(src, addpt(dsrc, Pt(x, y)));
239 76193d7c 2003-09-30 devnull *d ^= (*d^*s) & m;
240 76193d7c 2003-09-30 devnull }
241 76193d7c 2003-09-30 devnull }
242 76193d7c 2003-09-30 devnull }
243 76193d7c 2003-09-30 devnull #endif /* NOTUSED */
244 76193d7c 2003-09-30 devnull
245 76193d7c 2003-09-30 devnull static Memimage*
246 76193d7c 2003-09-30 devnull membrush(int radius)
247 76193d7c 2003-09-30 devnull {
248 76193d7c 2003-09-30 devnull static Memimage *brush;
249 76193d7c 2003-09-30 devnull static int brushradius;
250 76193d7c 2003-09-30 devnull
251 76193d7c 2003-09-30 devnull if(brush==nil || brushradius!=radius){
252 76193d7c 2003-09-30 devnull freememimage(brush);
253 76193d7c 2003-09-30 devnull brush = allocmemimage(Rect(0, 0, 2*radius+1, 2*radius+1), memopaque->chan);
254 76193d7c 2003-09-30 devnull if(brush != nil){
255 76193d7c 2003-09-30 devnull memfillcolor(brush, DTransparent); /* zeros */
256 76193d7c 2003-09-30 devnull memellipse(brush, Pt(radius, radius), radius, radius, -1, memopaque, Pt(radius, radius), S);
257 76193d7c 2003-09-30 devnull }
258 76193d7c 2003-09-30 devnull brushradius = radius;
259 76193d7c 2003-09-30 devnull }
260 76193d7c 2003-09-30 devnull return brush;
261 76193d7c 2003-09-30 devnull }
262 76193d7c 2003-09-30 devnull
263 76193d7c 2003-09-30 devnull static
264 76193d7c 2003-09-30 devnull void
265 76193d7c 2003-09-30 devnull discend(Point p, int radius, Memimage *dst, Memimage *src, Point dsrc, int op)
266 76193d7c 2003-09-30 devnull {
267 76193d7c 2003-09-30 devnull Memimage *disc;
268 76193d7c 2003-09-30 devnull Rectangle r;
269 76193d7c 2003-09-30 devnull
270 76193d7c 2003-09-30 devnull disc = membrush(radius);
271 76193d7c 2003-09-30 devnull if(disc != nil){
272 76193d7c 2003-09-30 devnull r.min.x = p.x - radius;
273 76193d7c 2003-09-30 devnull r.min.y = p.y - radius;
274 76193d7c 2003-09-30 devnull r.max.x = p.x + radius+1;
275 76193d7c 2003-09-30 devnull r.max.y = p.y + radius+1;
276 76193d7c 2003-09-30 devnull memdraw(dst, r, src, addpt(r.min, dsrc), disc, Pt(0,0), op);
277 76193d7c 2003-09-30 devnull }
278 76193d7c 2003-09-30 devnull }
279 76193d7c 2003-09-30 devnull
280 76193d7c 2003-09-30 devnull static
281 76193d7c 2003-09-30 devnull void
282 76193d7c 2003-09-30 devnull arrowend(Point tip, Point *pp, int end, int sin, int cos, int radius)
283 76193d7c 2003-09-30 devnull {
284 76193d7c 2003-09-30 devnull int x1, x2, x3;
285 76193d7c 2003-09-30 devnull
286 76193d7c 2003-09-30 devnull /* before rotation */
287 76193d7c 2003-09-30 devnull if(end == Endarrow){
288 76193d7c 2003-09-30 devnull x1 = Arrow1;
289 76193d7c 2003-09-30 devnull x2 = Arrow2;
290 76193d7c 2003-09-30 devnull x3 = Arrow3;
291 76193d7c 2003-09-30 devnull }else{
292 76193d7c 2003-09-30 devnull x1 = (end>>5) & 0x1FF; /* distance along line from end of line to tip */
293 76193d7c 2003-09-30 devnull x2 = (end>>14) & 0x1FF; /* distance along line from barb to tip */
294 76193d7c 2003-09-30 devnull x3 = (end>>23) & 0x1FF; /* distance perpendicular from edge of line to barb */
295 76193d7c 2003-09-30 devnull }
296 76193d7c 2003-09-30 devnull
297 76193d7c 2003-09-30 devnull /* comments follow track of right-facing arrowhead */
298 76193d7c 2003-09-30 devnull pp->x = tip.x+((2*radius+1)*sin/2-x1*cos); /* upper side of shaft */
299 76193d7c 2003-09-30 devnull pp->y = tip.y-((2*radius+1)*cos/2+x1*sin);
300 76193d7c 2003-09-30 devnull pp++;
301 76193d7c 2003-09-30 devnull pp->x = tip.x+((2*radius+2*x3+1)*sin/2-x2*cos); /* upper barb */
302 76193d7c 2003-09-30 devnull pp->y = tip.y-((2*radius+2*x3+1)*cos/2+x2*sin);
303 76193d7c 2003-09-30 devnull pp++;
304 76193d7c 2003-09-30 devnull pp->x = tip.x;
305 76193d7c 2003-09-30 devnull pp->y = tip.y;
306 76193d7c 2003-09-30 devnull pp++;
307 76193d7c 2003-09-30 devnull pp->x = tip.x+(-(2*radius+2*x3+1)*sin/2-x2*cos); /* lower barb */
308 76193d7c 2003-09-30 devnull pp->y = tip.y-(-(2*radius+2*x3+1)*cos/2+x2*sin);
309 76193d7c 2003-09-30 devnull pp++;
310 76193d7c 2003-09-30 devnull pp->x = tip.x+(-(2*radius+1)*sin/2-x1*cos); /* lower side of shaft */
311 76193d7c 2003-09-30 devnull pp->y = tip.y+((2*radius+1)*cos/2-x1*sin);
312 76193d7c 2003-09-30 devnull }
313 76193d7c 2003-09-30 devnull
314 76193d7c 2003-09-30 devnull void
315 76193d7c 2003-09-30 devnull _memimageline(Memimage *dst, Point p0, Point p1, int end0, int end1, int radius, Memimage *src, Point sp, Rectangle clipr, int op)
316 76193d7c 2003-09-30 devnull {
317 76193d7c 2003-09-30 devnull /*
318 76193d7c 2003-09-30 devnull * BUG: We should really really pick off purely horizontal and purely
319 76193d7c 2003-09-30 devnull * vertical lines and handle them separately with calls to memimagedraw
320 76193d7c 2003-09-30 devnull * on rectangles.
321 76193d7c 2003-09-30 devnull */
322 76193d7c 2003-09-30 devnull
323 76193d7c 2003-09-30 devnull int hor;
324 76193d7c 2003-09-30 devnull int sin, cos, dx, dy, t;
325 76193d7c 2003-09-30 devnull Rectangle oclipr, r;
326 76193d7c 2003-09-30 devnull Point q, pts[10], *pp, d;
327 76193d7c 2003-09-30 devnull
328 76193d7c 2003-09-30 devnull if(radius < 0)
329 76193d7c 2003-09-30 devnull return;
330 76193d7c 2003-09-30 devnull if(rectclip(&clipr, dst->r) == 0)
331 76193d7c 2003-09-30 devnull return;
332 76193d7c 2003-09-30 devnull if(rectclip(&clipr, dst->clipr) == 0)
333 76193d7c 2003-09-30 devnull return;
334 76193d7c 2003-09-30 devnull d = subpt(sp, p0);
335 76193d7c 2003-09-30 devnull if(rectclip(&clipr, rectsubpt(src->clipr, d)) == 0)
336 76193d7c 2003-09-30 devnull return;
337 76193d7c 2003-09-30 devnull if((src->flags&Frepl)==0 && rectclip(&clipr, rectsubpt(src->r, d))==0)
338 76193d7c 2003-09-30 devnull return;
339 76193d7c 2003-09-30 devnull /* this means that only verline() handles degenerate lines (p0==p1) */
340 76193d7c 2003-09-30 devnull hor = (abs(p1.x-p0.x) > abs(p1.y-p0.y));
341 76193d7c 2003-09-30 devnull /*
342 76193d7c 2003-09-30 devnull * Clipping is a little peculiar. We can't use Sutherland-Cohen
343 76193d7c 2003-09-30 devnull * clipping because lines are wide. But this is probably just fine:
344 76193d7c 2003-09-30 devnull * we do all math with the original p0 and p1, but clip when deciding
345 76193d7c 2003-09-30 devnull * what pixels to draw. This means the layer code can call this routine,
346 76193d7c 2003-09-30 devnull * using clipr to define the region being written, and get the same set
347 76193d7c 2003-09-30 devnull * of pixels regardless of the dicing.
348 76193d7c 2003-09-30 devnull */
349 76193d7c 2003-09-30 devnull if((hor && p0.x>p1.x) || (!hor && p0.y>p1.y)){
350 76193d7c 2003-09-30 devnull q = p0;
351 76193d7c 2003-09-30 devnull p0 = p1;
352 76193d7c 2003-09-30 devnull p1 = q;
353 76193d7c 2003-09-30 devnull t = end0;
354 76193d7c 2003-09-30 devnull end0 = end1;
355 76193d7c 2003-09-30 devnull end1 = t;
356 76193d7c 2003-09-30 devnull }
357 76193d7c 2003-09-30 devnull
358 76193d7c 2003-09-30 devnull if((p0.x == p1.x || p0.y == p1.y) && (end0&0x1F) == Endsquare && (end1&0x1F) == Endsquare){
359 76193d7c 2003-09-30 devnull r.min = p0;
360 76193d7c 2003-09-30 devnull r.max = p1;
361 76193d7c 2003-09-30 devnull if(p0.x == p1.x){
362 76193d7c 2003-09-30 devnull r.min.x -= radius;
363 76193d7c 2003-09-30 devnull r.max.x += radius+1;
364 76193d7c 2003-09-30 devnull }
365 76193d7c 2003-09-30 devnull else{
366 76193d7c 2003-09-30 devnull r.min.y -= radius;
367 76193d7c 2003-09-30 devnull r.max.y += radius+1;
368 76193d7c 2003-09-30 devnull }
369 76193d7c 2003-09-30 devnull oclipr = dst->clipr;
370 76193d7c 2003-09-30 devnull dst->clipr = clipr;
371 76193d7c 2003-09-30 devnull memimagedraw(dst, r, src, sp, memopaque, sp, op);
372 76193d7c 2003-09-30 devnull dst->clipr = oclipr;
373 76193d7c 2003-09-30 devnull return;
374 76193d7c 2003-09-30 devnull }
375 76193d7c 2003-09-30 devnull
376 76193d7c 2003-09-30 devnull /* Hard: */
377 76193d7c 2003-09-30 devnull /* draw thick line using polygon fill */
378 76193d7c 2003-09-30 devnull icossin2(p1.x-p0.x, p1.y-p0.y, &cos, &sin);
379 76193d7c 2003-09-30 devnull dx = (sin*(2*radius+1))/2;
380 76193d7c 2003-09-30 devnull dy = (cos*(2*radius+1))/2;
381 76193d7c 2003-09-30 devnull pp = pts;
382 76193d7c 2003-09-30 devnull oclipr = dst->clipr;
383 76193d7c 2003-09-30 devnull dst->clipr = clipr;
384 76193d7c 2003-09-30 devnull q.x = ICOSSCALE*p0.x+ICOSSCALE/2-cos/2;
385 76193d7c 2003-09-30 devnull q.y = ICOSSCALE*p0.y+ICOSSCALE/2-sin/2;
386 76193d7c 2003-09-30 devnull switch(end0 & 0x1F){
387 76193d7c 2003-09-30 devnull case Enddisc:
388 76193d7c 2003-09-30 devnull discend(p0, radius, dst, src, d, op);
389 76193d7c 2003-09-30 devnull /* fall through */
390 76193d7c 2003-09-30 devnull case Endsquare:
391 76193d7c 2003-09-30 devnull default:
392 76193d7c 2003-09-30 devnull pp->x = q.x-dx;
393 76193d7c 2003-09-30 devnull pp->y = q.y+dy;
394 76193d7c 2003-09-30 devnull pp++;
395 76193d7c 2003-09-30 devnull pp->x = q.x+dx;
396 76193d7c 2003-09-30 devnull pp->y = q.y-dy;
397 76193d7c 2003-09-30 devnull pp++;
398 76193d7c 2003-09-30 devnull break;
399 76193d7c 2003-09-30 devnull case Endarrow:
400 76193d7c 2003-09-30 devnull arrowend(q, pp, end0, -sin, -cos, radius);
401 76193d7c 2003-09-30 devnull _memfillpolysc(dst, pts, 5, ~0, src, addpt(pts[0], mulpt(d, ICOSSCALE)), 1, 10, 1, op);
402 76193d7c 2003-09-30 devnull pp[1] = pp[4];
403 76193d7c 2003-09-30 devnull pp += 2;
404 76193d7c 2003-09-30 devnull }
405 76193d7c 2003-09-30 devnull q.x = ICOSSCALE*p1.x+ICOSSCALE/2+cos/2;
406 76193d7c 2003-09-30 devnull q.y = ICOSSCALE*p1.y+ICOSSCALE/2+sin/2;
407 76193d7c 2003-09-30 devnull switch(end1 & 0x1F){
408 76193d7c 2003-09-30 devnull case Enddisc:
409 76193d7c 2003-09-30 devnull discend(p1, radius, dst, src, d, op);
410 76193d7c 2003-09-30 devnull /* fall through */
411 76193d7c 2003-09-30 devnull case Endsquare:
412 76193d7c 2003-09-30 devnull default:
413 76193d7c 2003-09-30 devnull pp->x = q.x+dx;
414 76193d7c 2003-09-30 devnull pp->y = q.y-dy;
415 76193d7c 2003-09-30 devnull pp++;
416 76193d7c 2003-09-30 devnull pp->x = q.x-dx;
417 76193d7c 2003-09-30 devnull pp->y = q.y+dy;
418 76193d7c 2003-09-30 devnull pp++;
419 76193d7c 2003-09-30 devnull break;
420 76193d7c 2003-09-30 devnull case Endarrow:
421 76193d7c 2003-09-30 devnull arrowend(q, pp, end1, sin, cos, radius);
422 76193d7c 2003-09-30 devnull _memfillpolysc(dst, pp, 5, ~0, src, addpt(pts[0], mulpt(d, ICOSSCALE)), 1, 10, 1, op);
423 76193d7c 2003-09-30 devnull pp[1] = pp[4];
424 76193d7c 2003-09-30 devnull pp += 2;
425 76193d7c 2003-09-30 devnull }
426 76193d7c 2003-09-30 devnull _memfillpolysc(dst, pts, pp-pts, ~0, src, addpt(pts[0], mulpt(d, ICOSSCALE)), 0, 10, 1, op);
427 76193d7c 2003-09-30 devnull dst->clipr = oclipr;
428 76193d7c 2003-09-30 devnull return;
429 76193d7c 2003-09-30 devnull }
430 76193d7c 2003-09-30 devnull
431 76193d7c 2003-09-30 devnull void
432 76193d7c 2003-09-30 devnull memimageline(Memimage *dst, Point p0, Point p1, int end0, int end1, int radius, Memimage *src, Point sp, int op)
433 76193d7c 2003-09-30 devnull {
434 76193d7c 2003-09-30 devnull _memimageline(dst, p0, p1, end0, end1, radius, src, sp, dst->clipr, op);
435 76193d7c 2003-09-30 devnull }
436 76193d7c 2003-09-30 devnull
437 76193d7c 2003-09-30 devnull /*
438 76193d7c 2003-09-30 devnull * Simple-minded conservative code to compute bounding box of line.
439 76193d7c 2003-09-30 devnull * Result is probably a little larger than it needs to be.
440 76193d7c 2003-09-30 devnull */
441 76193d7c 2003-09-30 devnull static
442 76193d7c 2003-09-30 devnull void
443 76193d7c 2003-09-30 devnull addbbox(Rectangle *r, Point p)
444 76193d7c 2003-09-30 devnull {
445 76193d7c 2003-09-30 devnull if(r->min.x > p.x)
446 76193d7c 2003-09-30 devnull r->min.x = p.x;
447 76193d7c 2003-09-30 devnull if(r->min.y > p.y)
448 76193d7c 2003-09-30 devnull r->min.y = p.y;
449 76193d7c 2003-09-30 devnull if(r->max.x < p.x+1)
450 76193d7c 2003-09-30 devnull r->max.x = p.x+1;
451 76193d7c 2003-09-30 devnull if(r->max.y < p.y+1)
452 76193d7c 2003-09-30 devnull r->max.y = p.y+1;
453 76193d7c 2003-09-30 devnull }
454 76193d7c 2003-09-30 devnull
455 76193d7c 2003-09-30 devnull int
456 76193d7c 2003-09-30 devnull memlineendsize(int end)
457 76193d7c 2003-09-30 devnull {
458 76193d7c 2003-09-30 devnull int x3;
459 76193d7c 2003-09-30 devnull
460 76193d7c 2003-09-30 devnull if((end&0x3F) != Endarrow)
461 76193d7c 2003-09-30 devnull return 0;
462 76193d7c 2003-09-30 devnull if(end == Endarrow)
463 76193d7c 2003-09-30 devnull x3 = Arrow3;
464 76193d7c 2003-09-30 devnull else
465 76193d7c 2003-09-30 devnull x3 = (end>>23) & 0x1FF;
466 76193d7c 2003-09-30 devnull return x3;
467 76193d7c 2003-09-30 devnull }
468 76193d7c 2003-09-30 devnull
469 76193d7c 2003-09-30 devnull Rectangle
470 76193d7c 2003-09-30 devnull memlinebbox(Point p0, Point p1, int end0, int end1, int radius)
471 76193d7c 2003-09-30 devnull {
472 76193d7c 2003-09-30 devnull Rectangle r, r1;
473 76193d7c 2003-09-30 devnull int extra;
474 76193d7c 2003-09-30 devnull
475 76193d7c 2003-09-30 devnull r.min.x = 10000000;
476 76193d7c 2003-09-30 devnull r.min.y = 10000000;
477 76193d7c 2003-09-30 devnull r.max.x = -10000000;
478 76193d7c 2003-09-30 devnull r.max.y = -10000000;
479 76193d7c 2003-09-30 devnull extra = lmax(memlineendsize(end0), memlineendsize(end1));
480 76193d7c 2003-09-30 devnull r1 = insetrect(canonrect(Rpt(p0, p1)), -(radius+extra));
481 76193d7c 2003-09-30 devnull addbbox(&r, r1.min);
482 76193d7c 2003-09-30 devnull addbbox(&r, r1.max);
483 76193d7c 2003-09-30 devnull return r;
484 76193d7c 2003-09-30 devnull }