projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
use a common header for most files in win32k to make use of precompiled headers
[reactos.git] / reactos / subsys / win32k / eng / gradient.c
1 /*
2 * ReactOS W32 Subsystem
3 * Copyright (C) 1998 - 2004 ReactOS Team
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19 /* $Id: gradient.c,v 1.9 2004/05/10 17:07:17 weiden Exp $
20 *
21 * COPYRIGHT: See COPYING in the top level directory
22 * PROJECT: ReactOS kernel
23 * PURPOSE: GDI Driver Gradient Functions
24 * FILE: subsys/win32k/eng/gradient.c
25 * PROGRAMER: Thomas Weidenmueller
26 * REVISION HISTORY:
27 * 3/7/1999: Created
28 */
29 #include <w32k.h>
30
31 /* MACROS *********************************************************************/
32
33 const LONG LINC[2] = {-1, 1};
34
35 #define VERTEX(n) (pVertex + gt->n)
36 #define COMPAREVERTEX(a, b) ((a)->x == (b)->x && (a)->y == (b)->y)
37
38 #define VCMPCLR(a,b,c,color) (a->color != b->color || a->color != c->color)
39 #define VCMPCLRS(a,b,c) \
40 !(!VCMPCLR(a,b,c,Red) || !VCMPCLR(a,b,c,Green) || !VCMPCLR(a,b,c,Blue))
41
42 #define MOVERECT(r,x,y) \
43 r.left += x; r.right += x; \
44 r.top += y; r.bottom += y
45
46
47 /* Horizontal/Vertical gradients */
48 #define HVINITCOL(Col, id) \
49 c[id] = v1->Col >> 8; \
50 dc[id] = abs((v2->Col >> 8) - c[id]); \
51 ec[id] = -(dy >> 1); \
52 ic[id] = LINC[(v2->Col >> 8) > c[id]]
53 #define HVSTEPCOL(id) \
54 ec[id] += dc[id]; \
55 while(ec[id] > 0) \
56 { \
57 c[id] += ic[id]; \
58 ec[id] -= dy; \
59 }
60
61 /* FUNCTIONS ******************************************************************/
62
63 BOOL FASTCALL
64 IntEngGradientFillRect(
65 IN SURFOBJ *psoDest,
66 IN CLIPOBJ *pco,
67 IN XLATEOBJ *pxlo,
68 IN TRIVERTEX *pVertex,
69 IN ULONG nVertex,
70 IN PGRADIENT_RECT gRect,
71 IN RECTL *prclExtents,
72 IN POINTL *pptlDitherOrg,
73 IN BOOL Horizontal)
74 {
75 SURFOBJ *OutputObj;
76 SURFGDI *OutputGDI;
77 TRIVERTEX *v1, *v2;
78 RECTL rcGradient, rcSG;
79 RECT_ENUM RectEnum;
80 BOOL EnumMore;
81 ULONG i;
82 POINTL Translate;
83 INTENG_ENTER_LEAVE EnterLeave;
84 LONG y, dy, c[3], dc[3], ec[3], ic[3];
85
86 v1 = (pVertex + gRect->UpperLeft);
87 v2 = (pVertex + gRect->LowerRight);
88
89 rcGradient.left = min(v1->x, v2->x);
90 rcGradient.right = max(v1->x, v2->x);
91 rcGradient.top = min(v1->y, v2->y);
92 rcGradient.bottom = max(v1->y, v2->y);
93 rcSG = rcGradient;
94 MOVERECT(rcSG, pptlDitherOrg->x, pptlDitherOrg->y);
95
96 if(Horizontal)
97 {
98 dy = abs(rcGradient.right - rcGradient.left);
99 }
100 else
101 {
102 dy = abs(rcGradient.bottom - rcGradient.top);
103 }
104
105 if(!IntEngEnter(&EnterLeave, psoDest, &rcSG, FALSE, &Translate, &OutputObj))
106 {
107 return FALSE;
108 }
109 OutputGDI = AccessInternalObjectFromUserObject(OutputObj);
110
111 if((v1->Red != v2->Red || v1->Green != v2->Green || v1->Blue != v2->Blue) && dy > 1)
112 {
113 CLIPOBJ_cEnumStart(pco, FALSE, CT_RECTANGLES, CD_RIGHTDOWN, 0);
114 do
115 {
116 RECT FillRect;
117 ULONG Color;
118
119 if(Horizontal)
120 {
121 EnumMore = CLIPOBJ_bEnum(pco, (ULONG) sizeof(RectEnum), (PVOID) &RectEnum);
122 for (i = 0; i < RectEnum.c && RectEnum.arcl[i].top <= rcSG.bottom; i++)
123 {
124 if(NtGdiIntersectRect(&FillRect, (PRECT)&RectEnum.arcl[i], (PRECT)&rcSG))
125 {
126 HVINITCOL(Red, 0);
127 HVINITCOL(Green, 1);
128 HVINITCOL(Blue, 2);
129
130 for(y = rcSG.left; y < FillRect.right; y++)
131 {
132 if(y >= FillRect.left)
133 {
134 Color = XLATEOBJ_iXlate(pxlo, RGB(c[0], c[1], c[2]));
135 OutputGDI->DIB_VLine(OutputObj, y, FillRect.top, FillRect.bottom, Color);
136 }
137 HVSTEPCOL(0);
138 HVSTEPCOL(1);
139 HVSTEPCOL(2);
140 }
141 }
142 }
143
144 continue;
145 }
146
147 /* vertical */
148 EnumMore = CLIPOBJ_bEnum(pco, (ULONG) sizeof(RectEnum), (PVOID) &RectEnum);
149 for (i = 0; i < RectEnum.c && RectEnum.arcl[i].top <= rcSG.bottom; i++)
150 {
151 if(NtGdiIntersectRect(&FillRect, (PRECT)&RectEnum.arcl[i], (PRECT)&rcSG))
152 {
153 HVINITCOL(Red, 0);
154 HVINITCOL(Green, 1);
155 HVINITCOL(Blue, 2);
156
157 for(y = rcSG.top; y < FillRect.bottom; y++)
158 {
159 if(y >= FillRect.top)
160 {
161 Color = XLATEOBJ_iXlate(pxlo, RGB(c[0], c[1], c[2]));
162 OutputGDI->DIB_HLine(OutputObj, FillRect.left, FillRect.right, y, Color);
163 }
164 HVSTEPCOL(0);
165 HVSTEPCOL(1);
166 HVSTEPCOL(2);
167 }
168 }
169 }
170
171 } while(EnumMore);
172
173 return IntEngLeave(&EnterLeave);
174 }
175
176 /* rectangle has only one color, no calculation required */
177 CLIPOBJ_cEnumStart(pco, FALSE, CT_RECTANGLES, CD_RIGHTDOWN, 0);
178 do
179 {
180 RECT FillRect;
181 ULONG Color = XLATEOBJ_iXlate(pxlo, RGB(v1->Red, v1->Green, v1->Blue));
182
183 EnumMore = CLIPOBJ_bEnum(pco, (ULONG) sizeof(RectEnum), (PVOID) &RectEnum);
184 for (i = 0; i < RectEnum.c && RectEnum.arcl[i].top <= rcSG.bottom; i++)
185 {
186 if(NtGdiIntersectRect(&FillRect, (PRECT)&RectEnum.arcl[i], (PRECT)&rcSG))
187 {
188 for(; FillRect.top < FillRect.bottom; FillRect.top++)
189 {
190 OutputGDI->DIB_HLine(OutputObj, FillRect.left, FillRect.right, FillRect.top, Color);
191 }
192 }
193 }
194 } while(EnumMore);
195
196 return IntEngLeave(&EnterLeave);
197 }
198
199 /* Fill triangle with solid color */
200 #define S_FILLLINE(linefrom,lineto) \
201 if(sx[lineto] < sx[linefrom]) \
202 OutputGDI->DIB_HLine(OutputObj, max(sx[lineto], FillRect.left), min(sx[linefrom], FillRect.right), sy, Color); \
203 else \
204 OutputGDI->DIB_HLine(OutputObj, max(sx[linefrom], FillRect.left), min(sx[lineto], FillRect.right), sy, Color);
205 #define S_DOLINE(a,b,line) \
206 ex[line] += dx[line]; \
207 while(ex[line] > 0 && x[line] != destx[line]) \
208 { \
209 x[line] += incx[line]; \
210 sx[line] += incx[line]; \
211 ex[line] -= dy[line]; \
212 }
213 #define S_GOLINE(a,b,line) \
214 if(y >= a->y && y <= b->y) \
215 {
216 #define S_ENDLINE(a,b,line) \
217 }
218 #define S_INITLINE(a,b,line) \
219 x[line] = a->x; \
220 sx[line] = a->x + pptlDitherOrg->x; \
221 dx[line] = abs(b->x - a->x); \
222 dy[line] = abs(b->y - a->y); \
223 incx[line] = LINC[b->x > a->x]; \
224 ex[line] = -(dy[line]>>1); \
225 destx[line] = b->x
226
227 /* Fill triangle with gradient */
228 #define INITCOL(a,b,line,col,id) \
229 c[line][id] = a->col >> 8; \
230 dc[line][id] = abs((b->col >> 8) - c[line][id]); \
231 ec[line][id] = -(dy[line]>>1); \
232 ic[line][id] = LINC[(b->col >> 8) > c[line][id]]
233 #define STEPCOL(a,b,line,col,id) \
234 ec[line][id] += dc[line][id]; \
235 while(ec[line][id] > 0) \
236 { \
237 c[line][id] += ic[line][id]; \
238 ec[line][id] -= dy[line]; \
239 }
240 #define FINITCOL(linefrom,lineto,colid) \
241 gc[colid] = c[linefrom][colid]; \
242 gd[colid] = abs(c[lineto][colid] - gc[colid]); \
243 ge[colid] = -(gx >> 1); \
244 gi[colid] = LINC[c[lineto][colid] > gc[colid]]
245 #define FDOCOL(linefrom,lineto,colid) \
246 ge[colid] += gd[colid]; \
247 while(ge[colid] > 0) \
248 { \
249 gc[colid] += gi[colid]; \
250 ge[colid] -= gx; \
251 }
252 #define FILLLINE(linefrom,lineto) \
253 gx = abs(sx[lineto] - sx[linefrom]); \
254 gxi = LINC[sx[linefrom] < sx[lineto]]; \
255 FINITCOL(linefrom, lineto, 0); \
256 FINITCOL(linefrom, lineto, 1); \
257 FINITCOL(linefrom, lineto, 2); \
258 for(g = sx[linefrom]; g != sx[lineto]; g += gxi) \
259 { \
260 if(InY && g >= FillRect.left && g < FillRect.right) \
261 { \
262 Color = XLATEOBJ_iXlate(pxlo, RGB(gc[0], gc[1], gc[2])); \
263 OutputGDI->DIB_PutPixel(OutputObj, g, sy, Color); \
264 } \
265 FDOCOL(linefrom, lineto, 0); \
266 FDOCOL(linefrom, lineto, 1); \
267 FDOCOL(linefrom, lineto, 2); \
268 }
269 #define DOLINE(a,b,line) \
270 STEPCOL(a, b, line, Red, 0); \
271 STEPCOL(a, b, line, Green, 1); \
272 STEPCOL(a, b, line, Blue, 2); \
273 ex[line] += dx[line]; \
274 while(ex[line] > 0 && x[line] != destx[line]) \
275 { \
276 x[line] += incx[line]; \
277 sx[line] += incx[line]; \
278 ex[line] -= dy[line]; \
279 }
280 #define GOLINE(a,b,line) \
281 if(y >= a->y && y <= b->y) \
282 {
283 #define ENDLINE(a,b,line) \
284 }
285 #define INITLINE(a,b,line) \
286 x[line] = a->x; \
287 sx[line] = a->x + pptlDitherOrg->x; \
288 dx[line] = abs(b->x - a->x); \
289 dy[line] = abs(b->y - a->y); \
290 incx[line] = LINC[b->x > a->x]; \
291 ex[line] = -(dy[line]>>1); \
292 destx[line] = b->x
293 #define DOINIT(a, b, line) \
294 INITLINE(a, b, line); \
295 INITCOL(a, b, line, Red, 0); \
296 INITCOL(a, b, line, Green, 1); \
297 INITCOL(a, b, line, Blue, 2);
298 #define SMALLER(a,b) (a->y < b->y) || (a->y == b->y && a->x < b->x)
299 #define SWAP(a,b,c) c = a;\
300 a = b;\
301 a = c
302 #define NLINES 3
303 BOOL FASTCALL
304 IntEngGradientFillTriangle(
305 IN SURFOBJ *psoDest,
306 IN CLIPOBJ *pco,
307 IN XLATEOBJ *pxlo,
308 IN TRIVERTEX *pVertex,
309 IN ULONG nVertex,
310 IN PGRADIENT_TRIANGLE gTriangle,
311 IN RECTL *prclExtents,
312 IN POINTL *pptlDitherOrg)
313 {
314 SURFOBJ *OutputObj;
315 SURFGDI *OutputGDI;
316 PTRIVERTEX v1, v2, v3;
317 RECT_ENUM RectEnum;
318 BOOL EnumMore;
319 ULONG i;
320 POINTL Translate;
321 INTENG_ENTER_LEAVE EnterLeave;
322 RECTL FillRect;
323 ULONG Color;
324
325 BOOL sx[NLINES];
326 LONG x[NLINES], dx[NLINES], dy[NLINES], incx[NLINES], ex[NLINES], destx[NLINES];
327 LONG c[NLINES][3], dc[NLINES][3], ec[NLINES][3], ic[NLINES][3]; /* colors on lines */
328 LONG g, gx, gxi, gc[3], gd[3], ge[3], gi[3]; /* colors in triangle */
329 LONG sy, y, bt;
330
331 v1 = (pVertex + gTriangle->Vertex1);
332 v2 = (pVertex + gTriangle->Vertex2);
333 v3 = (pVertex + gTriangle->Vertex3);
334
335 /* bubble sort */
336 if(SMALLER(v2,v1))
337 {
338 TRIVERTEX *t;
339 SWAP(v1,v2,t);
340 }
341 if(SMALLER(v3,v2))
342 {
343 TRIVERTEX *t;
344 SWAP(v2,v3,t);
345 if(SMALLER(v2,v1))
346 {
347 SWAP(v1,v2,t);
348 }
349 }
350
351 DbgPrint("Triangle: (%i,%i) (%i,%i) (%i,%i)\n", v1->x, v1->y, v2->x, v2->y, v3->x, v3->y);
352
353 if(!IntEngEnter(&EnterLeave, psoDest, &FillRect, FALSE, &Translate, &OutputObj))
354 {
355 return FALSE;
356 }
357 OutputGDI = AccessInternalObjectFromUserObject(OutputObj);
358
359 if(VCMPCLRS(v1, v2, v3))
360 {
361 CLIPOBJ_cEnumStart(pco, FALSE, CT_RECTANGLES, CD_RIGHTDOWN, 0);
362 do
363 {
364 EnumMore = CLIPOBJ_bEnum(pco, (ULONG) sizeof(RectEnum), (PVOID) &RectEnum);
365 for (i = 0; i < RectEnum.c && RectEnum.arcl[i].top <= prclExtents->bottom; i++)
366 {
367 if(NtGdiIntersectRect((PRECT)&FillRect, (PRECT)&RectEnum.arcl[i], (PRECT)prclExtents))
368 {
369 BOOL InY;
370
371 DOINIT(v1, v3, 0);
372 DOINIT(v1, v2, 1);
373 DOINIT(v2, v3, 2);
374
375 y = v1->y;
376 sy = v1->y + pptlDitherOrg->y;
377 bt = min(v3->y + pptlDitherOrg->y, FillRect.bottom);
378
379 while(sy < bt)
380 {
381 InY = !(sy < FillRect.top || sy >= FillRect.bottom);
382 GOLINE(v1, v3, 0);
383 DOLINE(v1, v3, 0);
384 ENDLINE(v1, v3, 0);
385
386 GOLINE(v1, v2, 1);
387 DOLINE(v1, v2, 1);
388 FILLLINE(0, 1);
389 ENDLINE(v1, v2, 1);
390
391 GOLINE(v2, v3, 2);
392 DOLINE(v2, v3, 2);
393 FILLLINE(0, 2);
394 ENDLINE(23, v3, 2);
395
396 y++;
397 sy++;
398 }
399 }
400 }
401 } while(EnumMore);
402
403 return IntEngLeave(&EnterLeave);
404 }
405
406 /* fill triangle with one solid color */
407
408 Color = XLATEOBJ_iXlate(pxlo, RGB(v1->Red >> 8, v1->Green >> 8, v1->Blue >> 8));
409 CLIPOBJ_cEnumStart(pco, FALSE, CT_RECTANGLES, CD_RIGHTDOWN, 0);
410 do
411 {
412 EnumMore = CLIPOBJ_bEnum(pco, (ULONG) sizeof(RectEnum), (PVOID) &RectEnum);
413 for (i = 0; i < RectEnum.c && RectEnum.arcl[i].top <= prclExtents->bottom; i++)
414 {
415 if(NtGdiIntersectRect((PRECT)&FillRect, (PRECT)&RectEnum.arcl[i], (PRECT)prclExtents))
416 {
417 S_INITLINE(v1, v3, 0);
418 S_INITLINE(v1, v2, 1);
419 S_INITLINE(v2, v3, 2);
420
421 y = v1->y;
422 sy = v1->y + pptlDitherOrg->y;
423 bt = min(v3->y + pptlDitherOrg->y, FillRect.bottom);
424
425 while(sy < bt)
426 {
427 S_GOLINE(v1, v3, 0);
428 S_DOLINE(v1, v3, 0);
429 S_ENDLINE(v1, v3, 0);
430
431 S_GOLINE(v1, v2, 1);
432 S_DOLINE(v1, v2, 1);
433 S_FILLLINE(0, 1);
434 S_ENDLINE(v1, v2, 1);
435
436 S_GOLINE(v2, v3, 2);
437 S_DOLINE(v2, v3, 2);
438 S_FILLLINE(0, 2);
439 S_ENDLINE(23, v3, 2);
440
441 y++;
442 sy++;
443 }
444 }
445 }
446 } while(EnumMore);
447
448 return IntEngLeave(&EnterLeave);
449 }
450
451
452 BOOL FASTCALL STATIC
453 IntEngIsNULLTriangle(TRIVERTEX *pVertex, GRADIENT_TRIANGLE *gt)
454 {
455 if(COMPAREVERTEX(VERTEX(Vertex1), VERTEX(Vertex2)))
456 return TRUE;
457 if(COMPAREVERTEX(VERTEX(Vertex1), VERTEX(Vertex3)))
458 return TRUE;
459 if(COMPAREVERTEX(VERTEX(Vertex2), VERTEX(Vertex3)))
460 return TRUE;
461 return FALSE;
462 }
463
464
465 BOOL STDCALL
466 EngGradientFill(
467 IN SURFOBJ *psoDest,
468 IN CLIPOBJ *pco,
469 IN XLATEOBJ *pxlo,
470 IN TRIVERTEX *pVertex,
471 IN ULONG nVertex,
472 IN PVOID pMesh,
473 IN ULONG nMesh,
474 IN RECTL *prclExtents,
475 IN POINTL *pptlDitherOrg,
476 IN ULONG ulMode)
477 {
478 ULONG i;
479
480 switch(ulMode)
481 {
482 case GRADIENT_FILL_RECT_H:
483 case GRADIENT_FILL_RECT_V:
484 {
485 PGRADIENT_RECT gr = (PGRADIENT_RECT)pMesh;
486 for(i = 0; i < nMesh; i++, gr++)
487 {
488 if(!IntEngGradientFillRect(psoDest, pco, pxlo, pVertex, nVertex, gr, prclExtents,
489 pptlDitherOrg, (ulMode == GRADIENT_FILL_RECT_H)))
490 {
491 return FALSE;
492 }
493 }
494 return TRUE;
495 }
496 case GRADIENT_FILL_TRIANGLE:
497 {
498 PGRADIENT_TRIANGLE gt = (PGRADIENT_TRIANGLE)pMesh;
499 for(i = 0; i < nMesh; i++, gt++)
500 {
501 if(IntEngIsNULLTriangle(pVertex, gt))
502 {
503 /* skip empty triangles */
504 continue;
505 }
506 if(!IntEngGradientFillTriangle(psoDest, pco, pxlo, pVertex, nVertex, gt, prclExtents,
507 pptlDitherOrg))
508 {
509 return FALSE;
510 }
511 }
512 return TRUE;
513 }
514 }
515 return FALSE;
516 }
517
518 BOOL STDCALL
519 IntEngGradientFill(
520 IN SURFOBJ *psoDest,
521 IN CLIPOBJ *pco,
522 IN XLATEOBJ *pxlo,
523 IN TRIVERTEX *pVertex,
524 IN ULONG nVertex,
525 IN PVOID pMesh,
526 IN ULONG nMesh,
527 IN RECTL *prclExtents,
528 IN POINTL *pptlDitherOrg,
529 IN ULONG ulMode)
530 {
531 BOOL Ret;
532 SURFGDI *SurfGDI;
533
534 SurfGDI = (SURFGDI*)AccessInternalObjectFromUserObject(psoDest);
535 MouseSafetyOnDrawStart(psoDest, SurfGDI, pco->rclBounds.left, pco->rclBounds.top,
536 pco->rclBounds.right, pco->rclBounds.bottom);
537 if((psoDest->iType != STYPE_BITMAP) && SurfGDI->GradientFill)
538 {
539 IntLockGDIDriver(SurfGDI);
540 Ret = SurfGDI->GradientFill(psoDest, pco, pxlo, pVertex, nVertex, pMesh, nMesh,
541 prclExtents, pptlDitherOrg, ulMode);
542 IntUnLockGDIDriver(SurfGDI);
543 MouseSafetyOnDrawEnd(psoDest, SurfGDI);
544 return Ret;
545 }
546 Ret = EngGradientFill(psoDest, pco, pxlo, pVertex, nVertex, pMesh, nMesh, prclExtents,
547 pptlDitherOrg, ulMode);
548 if(Ret)
549 {
550 /* Dummy BitBlt to let driver know that something has changed.
551 0x00AA0029 is the Rop for D (no-op) */
552 if(SurfGDI->BitBlt)
553 {
554 IntLockGDIDriver(SurfGDI);
555 SurfGDI->BitBlt(psoDest, NULL, NULL, pco, pxlo,
556 prclExtents, pptlDitherOrg, NULL, NULL, NULL, ROP_NOOP);
557 IntUnLockGDIDriver(SurfGDI);
558 MouseSafetyOnDrawEnd(psoDest, SurfGDI);
559 return TRUE;
560 }
561 EngBitBlt(psoDest, NULL, NULL, pco, pxlo,
562 prclExtents, pptlDitherOrg, NULL, NULL, NULL, ROP_NOOP);
563 }
564 MouseSafetyOnDrawEnd(psoDest, SurfGDI);
565 return Ret;
566 }
A free Windows-compatible Operating System