prepare for alpha1 release.
[mikachu/openbox.git] / render / instance.c
1 #include "render.h"
2 #include "instance.h"
3
4 static RrInstance *definst = NULL;
5
6 static void RrTrueColorSetup (RrInstance *inst);
7 static void RrPseudoColorSetup (RrInstance *inst);
8
9 RrInstance* RrInstanceNew (Display *display, gint screen)
10 {
11     definst = g_new (RrInstance, 1);
12     definst->display = display;
13     definst->screen = screen;
14
15     definst->depth = DefaultDepth(display, screen);
16     definst->visual = DefaultVisual(display, screen);
17     definst->colormap = DefaultColormap(display, screen);
18
19     definst->pseudo_colors = NULL;
20
21     switch (definst->visual->class) {
22     case TrueColor:
23         RrTrueColorSetup(definst);
24         break;
25     case PseudoColor:
26     case StaticColor:
27     case GrayScale:
28     case StaticGray:
29         RrPseudoColorSetup(definst);
30         break;
31     default:
32         g_critical("Unsupported visual class");
33         g_free (definst);
34         return definst = NULL;
35     }
36     return definst;
37 }
38
39 void RrTrueColorSetup (RrInstance *inst)
40 {
41   unsigned long red_mask, green_mask, blue_mask;
42   XImage *timage = NULL;
43
44   timage = XCreateImage(inst->display, inst->visual, inst->depth,
45                         ZPixmap, 0, NULL, 1, 1, 32, 0);
46   g_assert(timage != NULL);
47   /* find the offsets for each color in the visual's masks */
48   inst->red_mask = red_mask = timage->red_mask;
49   inst->green_mask = green_mask = timage->green_mask;
50   inst->blue_mask = blue_mask = timage->blue_mask;
51
52   inst->red_offset = 0;
53   inst->green_offset = 0;
54   inst->blue_offset = 0;
55
56   while (! (red_mask & 1))   { inst->red_offset++;   red_mask   >>= 1; }
57   while (! (green_mask & 1)) { inst->green_offset++; green_mask >>= 1; }
58   while (! (blue_mask & 1))  { inst->blue_offset++;  blue_mask  >>= 1; }
59
60   inst->red_shift = inst->green_shift = inst->blue_shift = 8;
61   while (red_mask)   { red_mask   >>= 1; inst->red_shift--;   }
62   while (green_mask) { green_mask >>= 1; inst->green_shift--; }
63   while (blue_mask)  { blue_mask  >>= 1; inst->blue_shift--;  }
64   XFree(timage);
65 }
66
67 #define RrPseudoNcolors(isnt) (1 << (inst->pseudo_bpc * 3))
68
69 void RrPseudoColorSetup (RrInstance *inst)
70 {
71     XColor icolors[256];
72     int tr, tg, tb, n, r, g, b, i, incolors, ii;
73     unsigned long dev;
74     int cpc, _ncolors;
75     g_message("Initializing PseudoColor RenderControl\n");
76
77     /* determine the number of colors and the bits-per-color */
78     inst->pseudo_bpc = 2; /* XXX THIS SHOULD BE A USER OPTION */
79     g_assert(inst->pseudo_bpc >= 1);
80     _ncolors = RrPseudoNcolors(inst);
81
82     if (_ncolors > 1 << inst->depth) {
83         g_warning("PseudoRenderControl: Invalid colormap size. Resizing.\n");
84         inst->pseudo_bpc = 1 << (inst->depth/3) >> 3;
85         _ncolors = 1 << (inst->pseudo_bpc * 3);
86     }
87
88     /* build a color cube */
89     inst->pseudo_colors = g_new(XColor, _ncolors);
90     cpc = 1 << inst->pseudo_bpc; /* colors per channel */
91
92     for (n = 0, r = 0; r < cpc; r++)
93         for (g = 0; g < cpc; g++)
94             for (b = 0; b < cpc; b++, n++) {
95                 tr = (int)(((float)(r)/(float)(cpc-1)) * 0xFF);
96                 tg = (int)(((float)(g)/(float)(cpc-1)) * 0xFF);
97                 tb = (int)(((float)(b)/(float)(cpc-1)) * 0xFF);
98                 inst->pseudo_colors[n].red = tr | tr << 8;
99                 inst->pseudo_colors[n].green = tg | tg << 8;
100                 inst->pseudo_colors[n].blue = tb | tb << 8;
101                 /* used to track allocation */
102                 inst->pseudo_colors[n].flags = DoRed|DoGreen|DoBlue;
103             }
104
105     /* allocate the colors */
106     for (i = 0; i < _ncolors; i++)
107         if (!XAllocColor(inst->display, inst->colormap,
108                          &inst->pseudo_colors[i]))
109             inst->pseudo_colors[i].flags = 0; /* mark it as unallocated */
110
111     /* try allocate any colors that failed allocation above */
112
113     /* get the allocated values from the X server
114        (only the first 256 XXX why!?)
115      */
116     incolors = (((1 << inst->depth) > 256) ? 256 : (1 << inst->depth));
117     for (i = 0; i < incolors; i++)
118         icolors[i].pixel = i;
119     XQueryColors(inst->display, inst->colormap, icolors, incolors);
120
121     /* try match unallocated ones */
122     for (i = 0; i < _ncolors; i++) {
123         if (!inst->pseudo_colors[i].flags) { /* if it wasn't allocated... */
124             unsigned long closest = 0xffffffff, close = 0;
125             for (ii = 0; ii < incolors; ii++) {
126                 /* find deviations */
127                 r = (inst->pseudo_colors[i].red - icolors[ii].red) & 0xff;
128                 g = (inst->pseudo_colors[i].green - icolors[ii].green) & 0xff;
129                 b = (inst->pseudo_colors[i].blue - icolors[ii].blue) & 0xff;
130                 /* find a weighted absolute deviation */
131                 dev = (r * r) + (g * g) + (b * b);
132
133                 if (dev < closest) {
134                     closest = dev;
135                     close = ii;
136                 }
137             }
138
139             inst->pseudo_colors[i].red = icolors[close].red;
140             inst->pseudo_colors[i].green = icolors[close].green;
141             inst->pseudo_colors[i].blue = icolors[close].blue;
142             inst->pseudo_colors[i].pixel = icolors[close].pixel;
143
144             /* try alloc this closest color, it had better succeed! */
145             if (XAllocColor(inst->display, inst->colormap,
146                             &inst->pseudo_colors[i]))
147                 /* mark as alloced */
148                 inst->pseudo_colors[i].flags = DoRed|DoGreen|DoBlue;
149             else
150                 /* wtf has gone wrong, its already alloced for chissake! */
151                 g_assert_not_reached();
152         }
153     }
154 }
155
156 void RrInstanceFree (RrInstance *inst)
157 {
158     if (inst) {
159         if (inst == definst) definst = NULL;
160         g_free(inst->pseudo_colors);
161     }
162 }
163
164 Display* RrDisplay (const RrInstance *inst)
165 {
166     return (inst ? inst : definst)->display;
167 }
168
169 gint RrScreen (const RrInstance *inst)
170 {
171     return (inst ? inst : definst)->screen;
172 }
173
174 Window RrRootWindow (const RrInstance *inst)
175 {
176     return RootWindow (RrDisplay (inst), RrScreen (inst));
177 }
178
179 Visual *RrVisual (const RrInstance *inst)
180 {
181     return (inst ? inst : definst)->visual;
182 }
183
184 gint RrDepth (const RrInstance *inst)
185 {
186     return (inst ? inst : definst)->depth;
187 }
188
189 Colormap RrColormap (const RrInstance *inst)
190 {
191     return (inst ? inst : definst)->colormap;
192 }
193
194 gint RrRedOffset (const RrInstance *inst)
195 {
196     return (inst ? inst : definst)->red_offset;
197 }
198
199 gint RrGreenOffset (const RrInstance *inst)
200 {
201     return (inst ? inst : definst)->green_offset;
202 }
203
204 gint RrBlueOffset (const RrInstance *inst)
205 {
206     return (inst ? inst : definst)->blue_offset;
207 }
208
209 gint RrRedShift (const RrInstance *inst)
210 {
211     return (inst ? inst : definst)->red_shift;
212 }
213
214 gint RrGreenShift (const RrInstance *inst)
215 {
216     return (inst ? inst : definst)->green_shift;
217 }
218
219 gint RrBlueShift (const RrInstance *inst)
220 {
221     return (inst ? inst : definst)->blue_shift;
222 }
223
224 gint RrRedMask (const RrInstance *inst)
225 {
226     return (inst ? inst : definst)->red_mask;
227 }
228
229 gint RrGreenMask (const RrInstance *inst)
230 {
231     return (inst ? inst : definst)->green_mask;
232 }
233
234 gint RrBlueMask (const RrInstance *inst)
235 {
236     return (inst ? inst : definst)->blue_mask;
237 }
238
239 guint RrPseudoBPC (const RrInstance *inst)
240 {
241     return (inst ? inst : definst)->pseudo_bpc;
242 }
243
244 XColor *RrPseudoColors (const RrInstance *inst)
245 {
246     return (inst ? inst : definst)->pseudo_colors;
247 }