Dogcows Code - chaz/openbox/blob - 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        Ben 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_warning("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     key = (r << 24) + (g << 16) + (b << 8);
  71 #ifndef NO_COLOR_CACHE
  72     if ((out = g_hash_table_lookup(RrColorHash(inst), &key))) {
  73         out->refcount++;
  74     } else {
  75 #endif
  76         xcol.red = (r << 8) | r;
  77         xcol.green = (g << 8) | g;
  78         xcol.blue = (b << 8) | b;
  79         if (XAllocColor(RrDisplay(inst), RrColormap(inst), &xcol)) {
  80             out = g_new(RrColor, 1);
  81             out->inst = inst;
  82             out->r = xcol.red >> 8;
  83             out->g = xcol.green >> 8;
  84             out->b = xcol.blue >> 8;
  85             out->gc = None;
  86             out->pixel = xcol.pixel;
  87             out->key = key;
  88             out->refcount = 1;
  89 #ifdef DEBUG
  90             out->id = id++;
  91 #endif
  92 #ifndef NO_COLOR_CACHE
  93             g_hash_table_insert(RrColorHash(inst), &out->key, out);
  94         }
  95 #endif
  96     }
  97     return out;
  98 }
  99
 100 void RrColorFree(RrColor *c)
 101 {
 102     if (c) {
 103         if (--c->refcount < 1) {
 104 #ifndef NO_COLOR_CACHE
 105             g_assert(g_hash_table_lookup(RrColorHash(c->inst), &c->key));
 106             g_hash_table_remove(RrColorHash(c->inst), &c->key);
 107 #endif
 108             if (c->pixel) XFreeColors(RrDisplay(c->inst), RrColormap(c->inst),
 109                                       &c->pixel, 1, 0);
 110             if (c->gc) XFreeGC(RrDisplay(c->inst), c->gc);
 111             g_free(c);
 112         }
 113     }
 114 }
 115
 116 void RrReduceDepth(const RrInstance *inst, RrPixel32 *data, XImage *im)
 117 {
 118     gint r, g, b;
 119     gint x,y;
 120     RrPixel32 *p32 = (RrPixel32 *) im->data;
 121     RrPixel16 *p16 = (RrPixel16 *) im->data;
 122     guchar *p8 = (guchar *)im->data;
 123     switch (im->bits_per_pixel) {
 124     case 32:
 125         if ((RrRedOffset(inst) != RrDefaultRedOffset) ||
 126             (RrBlueOffset(inst) != RrDefaultBlueOffset) ||
 127             (RrGreenOffset(inst) != RrDefaultGreenOffset)) {
 128             for (y = 0; y < im->height; y++) {
 129                 for (x = 0; x < im->width; x++) {
 130                     r = (data[x] >> RrDefaultRedOffset) & 0xFF;
 131                     g = (data[x] >> RrDefaultGreenOffset) & 0xFF;
 132                     b = (data[x] >> RrDefaultBlueOffset) & 0xFF;
 133                     p32[x] = (r << RrRedOffset(inst))
 134                            + (g << RrGreenOffset(inst))
 135                            + (b << RrBlueOffset(inst));
 136                 }
 137                 data += im->width;
 138                 p32 += im->width;
 139             }
 140         } else im->data = (gchar*) data;
 141         break;
 142     case 16:
 143         for (y = 0; y < im->height; y++) {
 144             for (x = 0; x < im->width; x++) {
 145                 r = (data[x] >> RrDefaultRedOffset) & 0xFF;
 146                 r = r >> RrRedShift(inst);
 147                 g = (data[x] >> RrDefaultGreenOffset) & 0xFF;
 148                 g = g >> RrGreenShift(inst);
 149                 b = (data[x] >> RrDefaultBlueOffset) & 0xFF;
 150                 b = b >> RrBlueShift(inst);
 151                 p16[x] = (r << RrRedOffset(inst))
 152                        + (g << RrGreenOffset(inst))
 153                        + (b << RrBlueOffset(inst));
 154             }
 155             data += im->width;
 156             p16 += im->bytes_per_line/2;
 157         }
 158         break;
 159     case 8:
 160         g_assert(RrVisual(inst)->class != TrueColor);
 161         for (y = 0; y < im->height; y++) {
 162             for (x = 0; x < im->width; x++) {
 163                 p8[x] = RrPickColor(inst,
 164                                     data[x] >> RrDefaultRedOffset,
 165                                     data[x] >> RrDefaultGreenOffset,
 166                                     data[x] >> RrDefaultBlueOffset)->pixel;
 167             }
 168             data += im->width;
 169             p8 += im->bytes_per_line;
 170         }
 171         break;
 172     default:
 173         g_warning("your bit depth is currently unhandled\n");
 174     }
 175 }
 176
 177 XColor *RrPickColor(const RrInstance *inst, gint r, gint g, gint b)
 178 {
 179   r = (r & 0xff) >> (8-RrPseudoBPC(inst));
 180   g = (g & 0xff) >> (8-RrPseudoBPC(inst));
 181   b = (b & 0xff) >> (8-RrPseudoBPC(inst));
 182   return &RrPseudoColors(inst)[(r << (2*RrPseudoBPC(inst))) +
 183                                (g << (1*RrPseudoBPC(inst))) +
 184                                b];
 185 }
 186
 187 static void swap_byte_order(XImage *im)
 188 {
 189     gint x, y, di;
 190
 191     di = 0;
 192     for (y = 0; y < im->height; ++y) {
 193         for (x = 0; x < im->height; ++x) {
 194             gchar *c = &im->data[di + x * im->bits_per_pixel / 8];
 195             gchar t;
 196
 197             switch (im->bits_per_pixel) {
 198             case 32:
 199                 t = c[2];
 200                 c[2] = c[3];
 201                 c[3] = t;
 202             case 16:
 203                 t = c[0];
 204                 c[0] = c[1];
 205                 c[1] = t;
 206             case 8:
 207             case 1:
 208                 break;
 209             default:
 210                 g_warning("Your bit depth is currently unhandled");
 211             }
 212         }
 213         di += im->bytes_per_line;
 214     }
 215
 216     if (im->byte_order == LSBFirst)
 217         im->byte_order = MSBFirst;
 218     else
 219         im->byte_order = LSBFirst;
 220 }
 221
 222 void RrIncreaseDepth(const RrInstance *inst, RrPixel32 *data, XImage *im)
 223 {
 224     gint r, g, b;
 225     gint x,y;
 226     RrPixel32 *p32 = (RrPixel32 *) im->data;
 227     RrPixel16 *p16 = (RrPixel16 *) im->data;
 228     guchar *p8 = (guchar *)im->data;
 229
 230     if (im->byte_order != LSBFirst)
 231         swap_byte_order(im);
 232
 233     switch (im->bits_per_pixel) {
 234     case 32:
 235         for (y = 0; y < im->height; y++) {
 236             for (x = 0; x < im->width; x++) {
 237                 r = (p32[x] >> RrRedOffset(inst)) & 0xff;
 238                 g = (p32[x] >> RrGreenOffset(inst)) & 0xff;
 239                 b = (p32[x] >> RrBlueOffset(inst)) & 0xff;
 240                 data[x] = (r << RrDefaultRedOffset)
 241                     + (g << RrDefaultGreenOffset)
 242                     + (b << RrDefaultBlueOffset)
 243                     + (0xff << RrDefaultAlphaOffset);
 244             }
 245             data += im->width;
 246             p32 += im->bytes_per_line/4;
 247         }
 248         break;
 249     case 16:
 250         for (y = 0; y < im->height; y++) {
 251             for (x = 0; x < im->width; x++) {
 252                 r = (p16[x] & RrRedMask(inst)) >>
 253                     RrRedOffset(inst) <<
 254                     RrRedShift(inst);
 255                 g = (p16[x] & RrGreenMask(inst)) >>
 256                     RrGreenOffset(inst) <<
 257                     RrGreenShift(inst);
 258                 b = (p16[x] & RrBlueMask(inst)) >>
 259                     RrBlueOffset(inst) <<
 260                     RrBlueShift(inst);
 261                 data[x] = (r << RrDefaultRedOffset)
 262                     + (g << RrDefaultGreenOffset)
 263                     + (b << RrDefaultBlueOffset)
 264                     + (0xff << RrDefaultAlphaOffset);
 265             }
 266             data += im->width;
 267             p16 += im->bytes_per_line/2;
 268         }
 269         break;
 270     case 8:
 271         g_warning("this image bit depth is currently unhandled");
 272         break;
 273     case 1:
 274         for (y = 0; y < im->height; y++) {
 275             for (x = 0; x < im->width; x++) {
 276                 if (!(((p8[x / 8]) >> (x % 8)) & 0x1))
 277                     data[x] = 0xff << RrDefaultAlphaOffset; /* black */
 278                 else
 279                     data[x] = 0xffffffff; /* white */
 280             }
 281             data += im->width;
 282             p8 += im->bytes_per_line;
 283         }
 284         break;
 285     default:
 286         g_warning("this image bit depth is currently unhandled");
 287     }
 288 }
 289
 290 gint RrColorRed(const RrColor *c)
 291 {
 292     return c->r;
 293 }
 294
 295 gint RrColorGreen(const RrColor *c)
 296 {
 297     return c->g;
 298 }
 299
 300 gint RrColorBlue(const RrColor *c)
 301 {
 302     return c->b;
 303 }
 304
 305 gulong RrColorPixel(const RrColor *c)
 306 {
 307     return c->pixel;
 308 }
 309
 310 GC RrColorGC(RrColor *c)
 311 {
 312     if (!c->gc)
 313         RrColorAllocateGC(c);
 314     return c->gc;
 315 }