otk/truerendercontrol.cc

   1 // -*- mode: C++; indent-tabs-mode: nil; c-basic-offset: 2; -*-
   2
   3 #ifdef    HAVE_CONFIG_H
   4 #  include "../config.h"
   5 #endif // HAVE_CONFIG_H
   6
   7 #include "truerendercontrol.hh"
   8 #include "display.hh"
   9 #include "screeninfo.hh"
  10
  11 extern "C" {
  12 #ifdef    HAVE_STDLIB_H
  13 #  include <stdlib.h>
  14 #endif // HAVE_STDLIB_H
  15
  16 #include "gettext.h"
  17 #define _(str) gettext(str)
  18 }
  19
  20 namespace otk {
  21
  22 TrueRenderControl::TrueRenderControl(const ScreenInfo *screen)
  23   : RenderControl(screen)
  24 {
  25   printf("Initializing TrueColor RenderControl\n");
  26
  27   unsigned long red_mask, green_mask, blue_mask;
  28
  29   // find the offsets for each color in the visual's masks
  30   red_mask = screen->visual()->red_mask;
  31   green_mask = screen->visual()->green_mask;
  32   blue_mask = screen->visual()->blue_mask;
  33
  34   while (! (red_mask & 1)) { _red_offset++; red_mask >>= 1; }
  35   while (! (green_mask & 1)) { _green_offset++; green_mask >>= 1; }
  36   while (! (blue_mask & 1)) { _blue_offset++; blue_mask >>= 1; }
  37
  38   // use the mask to determine the number of bits for each shade of color
  39   // so, best case, red_mask == 0xff (255), with each bit as a different
  40   // shade!
  41   _red_bits = 255 / red_mask;
  42   _green_bits = 255 / green_mask;
  43   _blue_bits = 255 / blue_mask;
  44
  45   // compute color tables, based on the number of bits for each shade
  46   for (int i = 0; i < 256; i++) {
  47     _red_color_table[i] = i / _red_bits;
  48     _green_color_table[i] = i / _green_bits;
  49     _blue_color_table[i] = i / _blue_bits;
  50   }
  51 }
  52
  53 TrueRenderControl::~TrueRenderControl()
  54 {
  55   printf("Destroying TrueColor RenderControl\n");
  56
  57
  58 }
  59
  60 static inline
  61 void assignPixel(unsigned int bit_depth, unsigned char **data,  unsigned long pixel) {
  62   unsigned char *pixel_data = *data;
  63   switch (bit_depth) {
  64   case  8: //  8bpp
  65     *pixel_data++ = pixel;
  66     break;
  67
  68   case 16: // 16bpp LSB
  69     *pixel_data++ = pixel;
  70     *pixel_data++ = pixel >> 8;
  71     break;
  72
  73   case 17: // 16bpp MSB
  74     *pixel_data++ = pixel >> 8;
  75     *pixel_data++ = pixel;
  76     break;
  77
  78   case 24: // 24bpp LSB
  79     *pixel_data++ = pixel;
  80     *pixel_data++ = pixel >> 8;
  81     *pixel_data++ = pixel >> 16;
  82     break;
  83
  84   case 25: // 24bpp MSB
  85     *pixel_data++ = pixel >> 16;
  86     *pixel_data++ = pixel >> 8;
  87     *pixel_data++ = pixel;
  88     break;
  89
  90   case 32: // 32bpp LSB
  91     *pixel_data++ = pixel;
  92     *pixel_data++ = pixel >> 8;
  93     *pixel_data++ = pixel >> 16;
  94     *pixel_data++ = pixel >> 24;
  95     break;
  96
  97   case 33: // 32bpp MSB
  98     *pixel_data++ = pixel >> 24;
  99     *pixel_data++ = pixel >> 16;
 100     *pixel_data++ = pixel >> 8;
 101     *pixel_data++ = pixel;
 102     break;
 103   }
 104   *data = pixel_data; // assign back so we don't lose our place
 105 }
 106
 107 void renderPixel(XImage *im, unsigned char *dp, unsigned long pixel)
 108 {
 109   unsigned int bpp = im->bits_per_pixel + (im->byte_order == MSBFirst) ? 1 : 0;
 110
 111   switch (bpp) {
 112   case  8: //  8bpp
 113     *dp++ = pixel;
 114     break;
 115   case 16: // 16bpp LSB
 116     *dp++ = pixel;
 117     *dp++ = pixel >> 8;
 118     break;
 119   case 17: // 16bpp MSB
 120     *dp++ = pixel >> 8;
 121     *dp++ = pixel;
 122     break;
 123   case 24: // 24bpp LSB
 124     *dp++ = pixel;
 125     *dp++ = pixel >> 8;
 126     *dp++ = pixel >> 16;
 127     break;
 128   case 25: // 24bpp MSB
 129     *dp++ = pixel >> 16;
 130     *dp++ = pixel >> 8;
 131     *dp++ = pixel;
 132     break;
 133   case 32: // 32bpp LSB
 134     *dp++ = pixel;
 135     *dp++ = pixel >> 8;
 136     *dp++ = pixel >> 16;
 137     *dp++ = pixel >> 24;
 138     break;
 139   case 33: // 32bpp MSB
 140     *dp++ = pixel >> 24;
 141     *dp++ = pixel >> 16;
 142     *dp++ = pixel >> 8;
 143     *dp++ = pixel;
 144     break;
 145   }
 146 }
 147
 148 void TrueRenderControl::render(::Window win)
 149 {
 150   XGCValues gcv;
 151   gcv.cap_style = CapProjecting;
 152
 153   int w = 255, h = 32;
 154   Pixmap p = XCreatePixmap(**display, win, w, h, _screen->depth());
 155   XImage *im = XCreateImage(**display, _screen->visual(), _screen->depth(),
 156                             ZPixmap, 0, NULL, w, h, 32, 0);
 157   //GC gc = XCreateGC(**display, _screen->rootWindow(), GCCapStyle, &gcv);
 158
 159   // XXX  + 1?
 160   unsigned char *data = new unsigned char[im->bytes_per_line * (h + 1)];
 161   unsigned char *dp = data;
 162
 163   for (int x = 0; x < w; ++x, dp += im->bits_per_pixel/8)
 164     renderPixel(im, dp, 0);
 165   for (int y = 0; y < 10; ++y)
 166     for (int x = 0; x < w; ++x, dp += im->bits_per_pixel/8)
 167       renderPixel(im, dp, _red_color_table[x] << _red_offset);
 168   for (int y = 0; y < 10; ++y)
 169     for (int x = 0; x < w; ++x, dp += im->bits_per_pixel/8)
 170       renderPixel(im, dp, _green_color_table[x] << _green_offset);
 171   for (int y = 0; y < 10; ++y)
 172     for (int x = 0; x < w; ++x, dp += im->bits_per_pixel/8)
 173       renderPixel(im, dp, _blue_color_table[x] << _blue_offset);
 174   for (int x = 0; x < w; ++x, dp += im->bits_per_pixel/8)
 175     renderPixel(im, dp, 0);
 176
 177   printf("\nDone\n");
 178
 179   im->data = (char*) data;
 180
 181   XPutImage(**display, p, DefaultGC(**display, _screen->screen()),
 182             im, 0, 0, 0, 0, w, h);
 183
 184   //delete [] image->data;
 185   //image->data = NULL;
 186   XDestroyImage(im);
 187
 188   XSetWindowBackgroundPixmap(**display, win, p);
 189   XClearWindow(**display, win);
 190
 191   XFreePixmap(**display, p);
 192 }
 193
 194 }