Release 20030408.
[wine/gsoc-2012-control.git] / dlls / wineps / color.c
blobe93bac2e408775288c7442da2969532d810a02b3
1 /*
2 * PostScript colour functions
4 * Copyright 1998 Huw D M Davies
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include "psdrv.h"
22 #include "wine/debug.h"
24 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
26 /**********************************************************************
27 * PSDRV_CmpColor
29 * Return TRUE if col1 == col2
31 BOOL PSDRV_CmpColor(PSCOLOR *col1, PSCOLOR *col2)
33 if(col1->type != col2->type)
34 return FALSE;
36 switch(col1->type) {
37 case PSCOLOR_GRAY:
38 if(col1->value.gray.i == col2->value.gray.i)
39 return TRUE;
40 break;
41 case PSCOLOR_RGB:
42 if( col1->value.rgb.r == col2->value.rgb.r &&
43 col1->value.rgb.g == col2->value.rgb.g &&
44 col1->value.rgb.b == col2->value.rgb.b )
45 return TRUE;
46 break;
47 default:
48 ERR("Unknown colour type %d\n", col1->type);
50 return FALSE;
54 /**********************************************************************
55 * PSDRV_CopyColor
57 * Copies col2 into col1. Return FALSE on error.
59 BOOL PSDRV_CopyColor(PSCOLOR *col1, PSCOLOR *col2)
62 switch(col2->type) {
63 case PSCOLOR_GRAY:
64 col1->value.gray.i = col2->value.gray.i;
65 break;
67 case PSCOLOR_RGB:
68 col1->value.rgb.r = col2->value.rgb.r;
69 col1->value.rgb.g = col2->value.rgb.g;
70 col1->value.rgb.b = col2->value.rgb.b;
71 break;
73 default:
74 ERR("Unknown colour type %d\n", col1->type);
75 return FALSE;
78 col1->type = col2->type;
79 return TRUE;
83 /**********************************************************************
84 * PSDRV_CreateColor
86 * Creates a PostScript colour from a COLORREF.
87 * Result is grey scale if ColorDevice field of ppd is FALSE else an
88 * rgb colour is produced.
90 void PSDRV_CreateColor( PSDRV_PDEVICE *physDev, PSCOLOR *pscolor,
91 COLORREF wincolor )
93 int ctype = wincolor >> 24;
94 float r, g, b;
96 if(ctype != 0 && ctype != 2)
97 FIXME("Colour is %08lx\n", wincolor);
99 r = (wincolor & 0xff) / 256.0;
100 g = ((wincolor >> 8) & 0xff) / 256.0;
101 b = ((wincolor >> 16) & 0xff) / 256.0;
103 if(physDev->pi->ppd->ColorDevice) {
104 pscolor->type = PSCOLOR_RGB;
105 pscolor->value.rgb.r = r;
106 pscolor->value.rgb.g = g;
107 pscolor->value.rgb.b = b;
108 } else {
109 pscolor->type = PSCOLOR_GRAY;
110 /* FIXME configurable */
111 pscolor->value.gray.i = r * 0.3 + g * 0.59 + b * 0.11;
113 return;
117 /***********************************************************************
118 * PSDRV_SetBkColor
120 COLORREF PSDRV_SetBkColor( PSDRV_PDEVICE *physDev, COLORREF color )
122 PSDRV_CreateColor(physDev, &physDev->bkColor, color);
123 return color;
127 /***********************************************************************
128 * PSDRV_SetTextColor
130 COLORREF PSDRV_SetTextColor( PSDRV_PDEVICE *physDev, COLORREF color )
132 PSDRV_CreateColor(physDev, &physDev->font.color, color);
133 physDev->font.set = FALSE;
134 return color;