1) translate all of openbox's output
[mikachu/openbox.git] / render / color.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    color.c for the Openbox window manager
4    Copyright (c) 2006        Mikael Magnusson
5    Copyright (c) 2003-2007   Dana Jansens
6    Copyright (c) 2003        Derek Foreman
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    See the COPYING file for a copy of the GNU General Public License.
19 */
20
21 #include "render.h"
22 #include "color.h"
23 #include "instance.h"
24
25 #include <X11/Xlib.h>
26 #include <X11/Xutil.h>
27 #include <string.h>
28
29 void RrColorAllocateGC(RrColor *in)
30 {
31     XGCValues gcv;
32
33     gcv.foreground = in->pixel;
34     gcv.cap_style = CapProjecting;
35     in->gc = XCreateGC(RrDisplay(in->inst),
36                        RrRootWindow(in->inst),
37                        GCForeground | GCCapStyle, &gcv);
38 }
39
40 RrColor *RrColorParse(const RrInstance *inst, gchar *colorname)
41 {
42     XColor xcol;
43
44     g_assert(colorname != NULL);
45     /* get rgb values from colorname */
46
47     xcol.red = 0;
48     xcol.green = 0;
49     xcol.blue = 0;
50     xcol.pixel = 0;
51     if (!XParseColor(RrDisplay(inst), RrColormap(inst), colorname, &xcol)) {
52         g_message("Unable to parse color '%s'", colorname);
53         return NULL;
54     }
55     return RrColorNew(inst, xcol.red >> 8, xcol.green >> 8, xcol.blue >> 8);
56 }
57
58 /*#define NO_COLOR_CACHE*/
59 #ifdef DEBUG
60 gint id;
61 #endif
62
63 RrColor *RrColorNew(const RrInstance *inst, gint r, gint g, gint b)
64 {
65     /* this should be replaced with something far cooler */
66     RrColor *out = NULL;
67     XColor xcol;
68     gint key;
69
70     g_assert(r >= 0 && r < 256);
71     g_assert(g >= 0 && g < 256);
72     g_assert(b >= 0 && b < 256);
73
74     key = (r << 24) + (g << 16) + (b << 8);
75 #ifndef NO_COLOR_CACHE
76     if ((out = g_hash_table_lookup(RrColorHash(inst), &key))) {
77         out->refcount++;
78     } else {
79 #endif
80         xcol.red = (r << 8) | r;
81         xcol.green = (g << 8) | g;
82         xcol.blue = (b << 8) | b;
83         if (XAllocColor(RrDisplay(inst), RrColormap(inst), &xcol)) {
84             out = g_new(RrColor, 1);
85             out->inst = inst;
86             out->r = xcol.red >> 8;
87             out->g = xcol.green >> 8;
88             out->b = xcol.blue >> 8;
89             out->gc = None;
90             out->pixel = xcol.pixel;
91             out->key = key;
92             out->refcount = 1;
93 #ifdef DEBUG
94             out->id = id++;
95 #endif
96 #ifndef NO_COLOR_CACHE
97             g_hash_table_insert(RrColorHash(inst), &out->key, out);
98         }
99 #endif
100     }
101     return out;
102 }
103
104 void RrColorFree(RrColor *c)
105 {
106     if (c) {
107         if (--c->refcount < 1) {
108 #ifndef NO_COLOR_CACHE
109             g_assert(g_hash_table_lookup(RrColorHash(c->inst), &c->key));
110             g_hash_table_remove(RrColorHash(c->inst), &c->key);
111 #endif
112             if (c->pixel) XFreeColors(RrDisplay(c->inst), RrColormap(c->inst),
113                                       &c->pixel, 1, 0);
114             if (c->gc) XFreeGC(RrDisplay(c->inst), c->gc);
115             g_free(c);
116         }
117     }
118 }
119
120 void RrReduceDepth(const RrInstance *inst, RrPixel32 *data, XImage *im)
121 {
122     gint r, g, b;
123     gint x,y;
124     RrPixel32 *p32 = (RrPixel32 *) im->data;
125     RrPixel16 *p16 = (RrPixel16 *) im->data;
126     RrPixel8  *p8  = (RrPixel8 *)  im->data;
127     switch (im->bits_per_pixel) {
128     case 32:
129         if ((RrRedOffset(inst) != RrDefaultRedOffset) ||
130             (RrBlueOffset(inst) != RrDefaultBlueOffset) ||
131             (RrGreenOffset(inst) != RrDefaultGreenOffset)) {
132             for (y = 0; y < im->height; y++) {
133                 for (x = 0; x < im->width; x++) {
134                     r = (data[x] >> RrDefaultRedOffset) & 0xFF;
135                     g = (data[x] >> RrDefaultGreenOffset) & 0xFF;
136                     b = (data[x] >> RrDefaultBlueOffset) & 0xFF;
137                     p32[x] = (r << RrRedOffset(inst))
138                            + (g << RrGreenOffset(inst))
139                            + (b << RrBlueOffset(inst));
140                 }
141                 data += im->width;
142                 p32 += im->width;
143             } 
144         } else im->data = (gchar*) data;
145         break;
146     case 16:
147         for (y = 0; y < im->height; y++) {
148             for (x = 0; x < im->width; x++) {
149                 r = (data[x] >> RrDefaultRedOffset) & 0xFF;
150                 r = r >> RrRedShift(inst);
151                 g = (data[x] >> RrDefaultGreenOffset) & 0xFF;
152                 g = g >> RrGreenShift(inst);
153                 b = (data[x] >> RrDefaultBlueOffset) & 0xFF;
154                 b = b >> RrBlueShift(inst);
155                 p16[x] = (r << RrRedOffset(inst))
156                        + (g << RrGreenOffset(inst))
157                        + (b << RrBlueOffset(inst));
158             }
159             data += im->width;
160             p16 += im->bytes_per_line/2;
161         }
162         break;
163     case 8:
164         if (RrVisual(inst)->class == TrueColor) {
165             for (y = 0; y < im->height; y++) {
166                 for (x = 0; x < im->width; x++) {
167                     r = (data[x] >> RrDefaultRedOffset) & 0xFF;
168                     r = r >> RrRedShift(inst);
169                     g = (data[x] >> RrDefaultGreenOffset) & 0xFF;
170                     g = g >> RrGreenShift(inst);
171                     b = (data[x] >> RrDefaultBlueOffset) & 0xFF;
172                     b = b >> RrBlueShift(inst);
173                     p8[x] = (r << RrRedOffset(inst))
174                         + (g << RrGreenOffset(inst))
175                         + (b << RrBlueOffset(inst));
176                 }
177                 data += im->width;
178                 p8 += im->bytes_per_line;
179             }
180         } else {
181             for (y = 0; y < im->height; y++) {
182                 for (x = 0; x < im->width; x++) {
183                     p8[x] = RrPickColor(inst,
184                                         data[x] >> RrDefaultRedOffset,
185                                         data[x] >> RrDefaultGreenOffset,
186                                         data[x] >> RrDefaultBlueOffset)->pixel;
187                 }
188                 data += im->width;
189                 p8 += im->bytes_per_line;
190             }
191         }
192         break;
193     default:
194         g_error("Your bit depth is currently unhandled\n");
195         
196     }
197 }
198
199 XColor *RrPickColor(const RrInstance *inst, gint r, gint g, gint b) 
200 {
201   r = (r & 0xff) >> (8-RrPseudoBPC(inst));
202   g = (g & 0xff) >> (8-RrPseudoBPC(inst));
203   b = (b & 0xff) >> (8-RrPseudoBPC(inst));
204   return &RrPseudoColors(inst)[(r << (2*RrPseudoBPC(inst))) +
205                                (g << (1*RrPseudoBPC(inst))) +
206                                b];
207 }
208
209 static void swap_byte_order(XImage *im)
210 {
211     gint x, y, di;
212
213     di = 0;
214     for (y = 0; y < im->height; ++y) {
215         for (x = 0; x < im->height; ++x) {
216             gchar *c = &im->data[di + x * im->bits_per_pixel / 8];
217             gchar t;
218
219             switch (im->bits_per_pixel) {
220             case 32:
221                 t = c[2];
222                 c[2] = c[3];
223                 c[3] = t;
224             case 16:
225                 t = c[0];
226                 c[0] = c[1];
227                 c[1] = t;
228             case 8:
229             case 1:
230                 break;
231             default:
232                 g_error("Your bit depth (%i) is currently unhandled",
233                         im->bits_per_pixel);
234             }
235         }
236         di += im->bytes_per_line;
237     }
238
239     if (im->byte_order == LSBFirst)
240         im->byte_order = MSBFirst;
241     else
242         im->byte_order = LSBFirst;
243 }
244
245 void RrIncreaseDepth(const RrInstance *inst, RrPixel32 *data, XImage *im)
246 {
247     gint r, g, b;
248     gint x,y;
249     RrPixel32 *p32 = (RrPixel32 *) im->data;
250     RrPixel16 *p16 = (RrPixel16 *) im->data;
251     guchar *p8 = (guchar *)im->data;
252
253     if (im->byte_order != LSBFirst)
254         swap_byte_order(im);
255
256     switch (im->bits_per_pixel) {
257     case 32:
258         for (y = 0; y < im->height; y++) {
259             for (x = 0; x < im->width; x++) {
260                 r = (p32[x] >> RrRedOffset(inst)) & 0xff;
261                 g = (p32[x] >> RrGreenOffset(inst)) & 0xff;
262                 b = (p32[x] >> RrBlueOffset(inst)) & 0xff;
263                 data[x] = (r << RrDefaultRedOffset)
264                     + (g << RrDefaultGreenOffset)
265                     + (b << RrDefaultBlueOffset)
266                     + (0xff << RrDefaultAlphaOffset);
267             }
268             data += im->width;
269             p32 += im->bytes_per_line/4;
270         }
271         break;
272     case 16:
273         for (y = 0; y < im->height; y++) {
274             for (x = 0; x < im->width; x++) {
275                 r = (p16[x] & RrRedMask(inst)) >>
276                     RrRedOffset(inst) <<
277                     RrRedShift(inst);
278                 g = (p16[x] & RrGreenMask(inst)) >>
279                     RrGreenOffset(inst) <<
280                     RrGreenShift(inst);
281                 b = (p16[x] & RrBlueMask(inst)) >>
282                     RrBlueOffset(inst) <<
283                     RrBlueShift(inst);
284                 data[x] = (r << RrDefaultRedOffset)
285                     + (g << RrDefaultGreenOffset)
286                     + (b << RrDefaultBlueOffset)
287                     + (0xff << RrDefaultAlphaOffset);
288             }
289             data += im->width;
290             p16 += im->bytes_per_line/2;
291         }
292         break;
293     case 8:
294         g_error("This image bit depth (%i) is currently unhandled", 8);
295         break;
296     case 1:
297         for (y = 0; y < im->height; y++) {
298             for (x = 0; x < im->width; x++) {
299                 if (!(((p8[x / 8]) >> (x % 8)) & 0x1))
300                     data[x] = 0xff << RrDefaultAlphaOffset; /* black */
301                 else
302                     data[x] = 0xffffffff; /* white */
303             }
304             data += im->width;
305             p8 += im->bytes_per_line;
306         }
307         break;
308     default:
309         g_error("This image bit depth (%i) is currently unhandled",
310                 im->bits_per_pixel);
311     }
312 }
313
314 gint RrColorRed(const RrColor *c)
315 {
316     return c->r;
317 }
318
319 gint RrColorGreen(const RrColor *c)
320 {
321     return c->g;
322 }
323
324 gint RrColorBlue(const RrColor *c)
325 {
326     return c->b;
327 }
328
329 gulong RrColorPixel(const RrColor *c)
330 {
331     return c->pixel;
332 }
333
334 GC RrColorGC(RrColor *c)
335 {
336     if (!c->gc)
337         RrColorAllocateGC(c);
338     return c->gc;
339 }