let there be parentrelative
[mikachu/openbox.git] / render / render.c
1 #include <X11/Xlib.h>
2 #include <X11/Xutil.h>
3 #include <glib.h>
4 #include "render.h"
5 #include "gradient.h"
6 #include "font.h"
7 #include "mask.h"
8 #include "color.h"
9 #include "image.h"
10 #include "../kernel/openbox.h"
11
12 int render_depth;
13 Visual *render_visual;
14 Colormap render_colormap;
15 int render_red_offset = 0, render_green_offset = 0, render_blue_offset = 0;
16 int render_red_shift, render_green_shift, render_blue_shift;
17
18 void render_startup(void)
19 {
20     paint = x_paint;
21
22     render_depth = DefaultDepth(ob_display, ob_screen);
23     render_visual = DefaultVisual(ob_display, ob_screen);
24     render_colormap = DefaultColormap(ob_display, ob_screen);
25
26     if (render_depth < 8) {
27       XVisualInfo vinfo_template, *vinfo_return;
28       /* search for a TrueColor Visual... if we can't find one...
29          we will use the default visual for the screen */
30       int vinfo_nitems;
31       int best = -1;
32
33       vinfo_template.screen = ob_screen;
34       vinfo_template.class = TrueColor;
35       vinfo_return = XGetVisualInfo(ob_display,
36                                     VisualScreenMask | VisualClassMask,
37                                     &vinfo_template, &vinfo_nitems);
38       if (vinfo_return) {
39         int i;
40         int max_depth = 1;
41         for (i = 0; i < vinfo_nitems; ++i) {
42           if (vinfo_return[i].depth > max_depth) {
43             if (max_depth == 24 && vinfo_return[i].depth > 24)
44                 break;          /* prefer 24 bit over 32 */
45             max_depth = vinfo_return[i].depth;
46             best = i;
47           }
48         }
49         if (max_depth < render_depth) best = -1;
50       }
51       if (best != -1) {
52         render_depth = vinfo_return[best].depth;
53         render_visual = vinfo_return[best].visual;
54         render_colormap = XCreateColormap(ob_display, ob_root, render_visual,
55                                           AllocNone);
56       }
57       XFree(vinfo_return);
58     }  
59   truecolor_startup();
60 }
61
62 void truecolor_startup(void)
63 {
64   unsigned long red_mask, green_mask, blue_mask;
65   XImage *timage = NULL;
66
67   timage = XCreateImage(ob_display, render_visual, render_depth,
68                         ZPixmap, 0, NULL, 1, 1, 32, 0);
69   g_assert(timage != NULL);
70   /* find the offsets for each color in the visual's masks */
71   red_mask = timage->red_mask;
72   green_mask = timage->green_mask;
73   blue_mask = timage->blue_mask;
74
75   render_red_offset = 0;
76   render_green_offset = 0;
77   render_blue_offset = 0;
78
79   while (! (red_mask & 1))   { render_red_offset++;   red_mask   >>= 1; }
80   while (! (green_mask & 1)) { render_green_offset++; green_mask >>= 1; }
81   while (! (blue_mask & 1))  { render_blue_offset++;  blue_mask  >>= 1; }
82
83   render_red_shift = render_green_shift = render_blue_shift = 8;
84   while (red_mask)   { red_mask   >>= 1; render_red_shift--;   }
85   while (green_mask) { green_mask >>= 1; render_green_shift--; }
86   while (blue_mask)  { blue_mask  >>= 1; render_blue_shift--;  }
87   XFree(timage);
88 }
89
90 void x_paint(Window win, Appearance *l)
91 {
92     int i, transferred = 0, sw;
93     pixel32 *source, *dest;
94     Pixmap oldp;
95     int x = l->area.x;
96     int y = l->area.y;
97     int w = l->area.width;
98     int h = l->area.height;
99     int parenty = l->surface.data.planar.parenty;
100
101     if (w <= 0 || h <= 0 || x+w <= 0 || y+h <= 0) return;
102
103     g_assert(l->surface.type == Surface_Planar);
104
105     oldp = l->pixmap; /* save to free after changing the visible pixmap */
106     l->pixmap = XCreatePixmap(ob_display, ob_root, x+w, y+h, render_depth);
107     g_assert(l->pixmap != None);
108
109     if (l->xftdraw != NULL)
110         XftDrawDestroy(l->xftdraw);
111     l->xftdraw = XftDrawCreate(ob_display, l->pixmap, render_visual, 
112                                render_colormap);
113     g_assert(l->xftdraw != NULL);
114
115     g_free(l->surface.data.planar.pixel_data);
116     l->surface.data.planar.pixel_data = g_new(pixel32, w * h);
117
118
119     if (l->surface.data.planar.grad == Background_ParentRelative) {
120         sw = l->surface.data.planar.parent->area.width;
121         source = l->surface.data.planar.parent->surface.data.planar.pixel_data;
122         dest = l->surface.data.planar.pixel_data;
123         for (i = parenty; i < parenty + h; i++, source += sw, dest += w) {
124             memcpy(dest, source, w * sizeof(pixel32));
125         }
126     }
127     else if (l->surface.data.planar.grad == Background_Solid)
128         gradient_solid(l, x, y, w, h);
129     else gradient_render(&l->surface, w, h);
130
131     for (i = 0; i < l->textures; i++) {
132         switch (l->texture[i].type) {
133         case Text:
134             if (!transferred) {
135                 transferred = 1;
136                 if (l->surface.data.planar.grad != Background_Solid)
137                     pixel32_to_pixmap(l->surface.data.planar.pixel_data, 
138                                       l->pixmap,x,y,w,h);
139             }
140             if (l->xftdraw == NULL) {
141                 l->xftdraw = XftDrawCreate(ob_display, l->pixmap, 
142                                         render_visual, render_colormap);
143             }
144             font_draw(l->xftdraw, &l->texture[i].data.text, 
145                       &l->texture[i].position);
146         break;
147         case Bitmask:
148             if (!transferred) {
149                 transferred = 1;
150                 if (l->surface.data.planar.grad != Background_Solid)
151                     pixel32_to_pixmap(l->surface.data.planar.pixel_data, 
152                                       l->pixmap,x,y,w,h);
153             }
154             if (l->texture[i].data.mask.color->gc == None)
155                 color_allocate_gc(l->texture[i].data.mask.color);
156             mask_draw(l->pixmap, &l->texture[i].data.mask,
157                       &l->texture[i].position);
158         break;
159         case RGBA:
160             image_draw(l->surface.data.planar.pixel_data, 
161                        &l->texture[i].data.rgba,
162                        &l->texture[i].position);
163         break;
164         }
165     }
166
167     if (!transferred) {
168         transferred = 1;
169         if (l->surface.data.planar.grad != Background_Solid)
170             pixel32_to_pixmap(l->surface.data.planar.pixel_data, l->pixmap
171                               ,x,y,w,h);
172     }
173
174
175     XSetWindowBackgroundPixmap(ob_display, win, l->pixmap);
176     XClearWindow(ob_display, win);
177     if (oldp != None) XFreePixmap(ob_display, oldp);
178 }
179
180 /*
181 void gl_paint(Window win, Appearance *l)
182 {
183     glXMakeCurrent(ob_display, win, gl_context);
184 }
185 */
186
187 void render_shutdown(void)
188 {
189 }
190
191 Appearance *appearance_new(SurfaceType type, int numtex)
192 {
193   PlanarSurface *p;
194   Appearance *out;
195
196   out = g_new(Appearance, 1);
197   out->surface.type = type;
198   out->textures = numtex;
199   out->xftdraw = NULL;
200   if (numtex) out->texture = g_new0(Texture, numtex);
201   else out->texture = NULL;
202   out->pixmap = None;
203
204   switch (type) {
205   case Surface_Planar:
206     p = &out->surface.data.planar;
207     p->primary = NULL;
208     p->secondary = NULL;
209     p->border_color = NULL;
210     p->pixel_data = NULL;
211     break;
212   }
213   return out;
214 }
215
216 Appearance *appearance_copy(Appearance *orig)
217 {
218     PlanarSurface *spo, *spc;
219     Appearance *copy = g_new(Appearance, 1);
220     copy->surface.type = orig->surface.type;
221     switch (orig->surface.type) {
222     case Surface_Planar:
223         spo = &(orig->surface.data.planar);
224         spc = &(copy->surface.data.planar);
225         spc->grad = spo->grad;
226         spc->relief = spo->relief;
227         spc->bevel = spo->bevel;
228         if (spo->primary != NULL)
229             spc->primary = color_new(spo->primary->r,
230                                      spo->primary->g, 
231                                      spo->primary->b);
232         else spc->primary = NULL;
233
234         if (spo->secondary != NULL)
235             spc->secondary = color_new(spo->secondary->r,
236                                        spo->secondary->g,
237                                        spo->secondary->b);
238         else spc->secondary = NULL;
239
240         if (spo->border_color != NULL)
241             spc->border_color = color_new(spo->border_color->r,
242                                           spo->border_color->g,
243                                           spo->border_color->b);
244         else spc->border_color = NULL;
245
246         spc->interlaced = spo->interlaced;
247         spc->border = spo->border;
248         spc->pixel_data = NULL;
249     break;
250     }
251     copy->textures = orig->textures;
252     copy->texture = g_memdup(orig->texture, orig->textures * sizeof(Texture));
253     copy->pixmap = None;
254     copy->xftdraw = NULL;
255     return copy;
256 }
257
258 void appearance_free(Appearance *a)
259 {
260     PlanarSurface *p;
261     if (a->pixmap != None) XFreePixmap(ob_display, a->pixmap);
262     if (a->xftdraw != NULL) XftDrawDestroy(a->xftdraw);
263     if (a->textures)
264         g_free(a->texture);
265     if (a->surface.type == Surface_Planar) {
266         p = &a->surface.data.planar;
267         if (p->primary != NULL) color_free(p->primary);
268         if (p->secondary != NULL) color_free(p->secondary);
269         if (p->border_color != NULL) color_free(p->border_color);
270         if (p->pixel_data != NULL) g_free(p->pixel_data);
271     }
272     g_free(a);
273 }
274
275
276 void pixel32_to_pixmap(pixel32 *in, Pixmap out, int x, int y, int w, int h)
277 {
278     XImage *im = NULL;
279     im = XCreateImage(ob_display, render_visual, render_depth,
280                       ZPixmap, 0, NULL, w, h, 32, 0);
281     g_assert(im != NULL);
282     im->byte_order = endian;
283     im->data = (char *)in;
284     reduce_depth((pixel32*)im->data, im);
285     XPutImage(ob_display, out, DefaultGC(ob_display, ob_screen),
286               im, 0, 0, x, y, w, h);
287     im->data = NULL;
288     XDestroyImage(im);
289 }