8 #define LIGHT_STIPPLE_WIDTH 4
9 #define LIGHT_STIPPLE_HEIGHT 4
10 static unsigned char LIGHT_STIPPLE_BITS
[] = {
11 0x05, 0x0a, 0x05, 0x0a};
13 #define DARK_STIPPLE_WIDTH 4
14 #define DARK_STIPPLE_HEIGHT 4
15 static unsigned char DARK_STIPPLE_BITS
[] = {
16 0x0a, 0x04, 0x0a, 0x01};
19 static WMColor
*createRGBAColor(WMScreen
*scr
, unsigned short red
,
20 unsigned short green
, unsigned short blue
,
21 unsigned short alpha
);
24 * TODO: make the color creation code return the same WMColor for the
26 * make findCloseColor() find the closest color in the RContext pallette
27 * or in the other colors allocated by WINGs.
31 findCloseColor(WMScreen
*scr
, unsigned short red
, unsigned short green
,
32 unsigned short blue
, unsigned short alpha
)
39 rcolor
.green
= green
>>8;
40 rcolor
.blue
= blue
>>8;
41 rcolor
.alpha
= alpha
>>8;
43 if (!RGetClosestXColor(scr
->rcontext
, &rcolor
, &xcolor
))
46 if (!XAllocColor(scr
->display
, scr
->colormap
, &xcolor
))
49 color
= wmalloc(sizeof(WMColor
));
53 color
->color
= xcolor
;
55 color
->flags
.exact
= 1;
64 createRGBAColor(WMScreen
*scr
, unsigned short red
, unsigned short green
,
65 unsigned short blue
, unsigned short alpha
)
73 xcolor
.flags
= DoRed
|DoGreen
|DoBlue
;
74 if (!XAllocColor(scr
->display
, scr
->colormap
, &xcolor
))
77 color
= wmalloc(sizeof(WMColor
));
81 color
->color
= xcolor
;
83 color
->flags
.exact
= 1;
91 WMCreateRGBColor(WMScreen
*scr
, unsigned short red
, unsigned short green
,
92 unsigned short blue
, Bool exact
)
94 WMColor
*color
= NULL
;
96 if (!exact
|| !(color
=createRGBAColor(scr
, red
, green
, blue
, 0xffff))) {
97 color
= findCloseColor(scr
, red
, green
, blue
, 0xffff);
100 color
= WMBlackColor(scr
);
107 WMCreateRGBAColor(WMScreen
*scr
, unsigned short red
, unsigned short green
,
108 unsigned short blue
, unsigned short alpha
, Bool exact
)
110 WMColor
*color
= NULL
;
112 if (!exact
|| !(color
=createRGBAColor(scr
, red
, green
, blue
, alpha
))) {
113 color
= findCloseColor(scr
, red
, green
, blue
, alpha
);
116 color
= WMBlackColor(scr
);
123 WMCreateNamedColor(WMScreen
*scr
, char *name
, Bool exact
)
128 if (!XParseColor(scr
->display
, scr
->colormap
, name
, &xcolor
))
131 if (scr
->visual
->class == TrueColor
)
134 if (!exact
|| !(color
=createRGBAColor(scr
, xcolor
.red
, xcolor
.green
,
135 xcolor
.blue
, 0xffff))) {
136 color
= findCloseColor(scr
, xcolor
.red
, xcolor
.green
, xcolor
.blue
, 0xffff);
144 WMRetainColor(WMColor
*color
)
155 WMReleaseColor(WMColor
*color
)
159 if (color
->refCount
< 1) {
160 XFreeColors(color
->screen
->display
, color
->screen
->colormap
,
161 &(color
->color
.pixel
), 1, 0);
163 XFreeGC(color
->screen
->display
, color
->gc
);
170 WMSetColorAlpha(WMColor
*color
, unsigned short alpha
)
172 color
->alpha
= alpha
;
177 WMPaintColorSwatch(WMColor
*color
, Drawable d
, int x
, int y
,
178 unsigned int width
, unsigned int height
)
180 XFillRectangle(color
->screen
->display
, d
, WMColorGC(color
),
181 x
, y
, width
, height
);
186 WMColorPixel(WMColor
*color
)
188 return color
->color
.pixel
;
193 WMColorGC(WMColor
*color
)
197 WMScreen
*scr
= color
->screen
;
199 gcv
.foreground
= color
->color
.pixel
;
200 gcv
.graphics_exposures
= False
;
201 color
->gc
= XCreateGC(scr
->display
, scr
->rcontext
->drawable
,
202 GCForeground
|GCGraphicsExposures
, &gcv
);
210 WMSetColorInGC(WMColor
*color
, GC gc
)
212 XSetForeground(color
->screen
->display
, gc
, color
->color
.pixel
);
217 /* "system" colors */
219 WMWhiteColor(WMScreen
*scr
)
222 scr
->white
= WMCreateRGBColor(scr
, 0xffff, 0xffff, 0xffff, True
);
223 if (!scr
->white
->flags
.exact
)
224 wwarning(_("could not allocate %s color"), _("white"));
226 return WMRetainColor(scr
->white
);
231 WMBlackColor(WMScreen
*scr
)
234 scr
->black
= WMCreateRGBColor(scr
, 0, 0, 0, True
);
235 if (!scr
->black
->flags
.exact
)
236 wwarning(_("could not allocate %s color"), _("black"));
238 return WMRetainColor(scr
->black
);
244 WMGrayColor(WMScreen
*scr
)
249 if (scr
->depth
== 1) {
251 WMColor
*white
= WMWhiteColor(scr
);
252 WMColor
*black
= WMBlackColor(scr
);
255 stipple
= XCreateBitmapFromData(scr
->display
, W_DRAWABLE(scr
),
256 LIGHT_STIPPLE_BITS
, LIGHT_STIPPLE_WIDTH
,
257 LIGHT_STIPPLE_HEIGHT
);
259 color
= createRGBAColor(scr
, 0xffff, 0xffff, 0xffff, 0xffff);
261 gcv
.foreground
= white
->color
.pixel
;
262 gcv
.background
= black
->color
.pixel
;
263 gcv
.fill_style
= FillStippled
;
264 gcv
.stipple
= stipple
;
265 color
->gc
= XCreateGC(scr
->display
, W_DRAWABLE(scr
), GCForeground
266 |GCBackground
|GCStipple
|GCFillStyle
267 |GCGraphicsExposures
, &gcv
);
269 XFreePixmap(scr
->display
, stipple
);
270 WMReleaseColor(white
);
271 WMReleaseColor(black
);
273 color
= WMCreateRGBColor(scr
, 0xaeba, 0xaaaa, 0xaeba, True
);
274 if (!color
->flags
.exact
)
275 wwarning(_("could not allocate %s color"), _("gray"));
279 return WMRetainColor(scr
->gray
);
285 WMDarkGrayColor(WMScreen
*scr
)
287 if (!scr
->darkGray
) {
290 if (scr
->depth
== 1) {
292 WMColor
*white
= WMWhiteColor(scr
);
293 WMColor
*black
= WMBlackColor(scr
);
296 stipple
= XCreateBitmapFromData(scr
->display
, W_DRAWABLE(scr
),
297 DARK_STIPPLE_BITS
, DARK_STIPPLE_WIDTH
,
298 DARK_STIPPLE_HEIGHT
);
300 color
= createRGBAColor(scr
, 0, 0, 0, 0xffff);
302 gcv
.foreground
= white
->color
.pixel
;
303 gcv
.background
= black
->color
.pixel
;
304 gcv
.fill_style
= FillStippled
;
305 gcv
.stipple
= stipple
;
306 color
->gc
= XCreateGC(scr
->display
, W_DRAWABLE(scr
), GCForeground
307 |GCBackground
|GCStipple
|GCFillStyle
308 |GCGraphicsExposures
, &gcv
);
310 XFreePixmap(scr
->display
, stipple
);
311 WMReleaseColor(white
);
312 WMReleaseColor(black
);
314 color
= WMCreateRGBColor(scr
, 0x5144, 0x5555, 0x5144, True
);
315 if (!color
->flags
.exact
)
316 wwarning(_("could not allocate %s color"), _("dark gray"));
318 scr
->darkGray
= color
;
320 return WMRetainColor(scr
->darkGray
);
325 WMRedComponentOfColor(WMColor
*color
)
327 return color
->color
.red
;
332 WMGreenComponentOfColor(WMColor
*color
)
334 return color
->color
.green
;
339 WMBlueComponentOfColor(WMColor
*color
)
341 return color
->color
.blue
;
346 WMGetColorAlpha(WMColor
*color
)
353 WMGetColorRGBDescription(WMColor
*color
)
355 char *str
= wmalloc(32);
357 sprintf(str
, "#%02x%02x%02x", color
->color
.red
>>8, color
->color
.green
>>8,
358 color
->color
.blue
>>8);