1 76193d7c 2003-09-30 devnull #include "x11-inc.h"
3 76193d7c 2003-09-30 devnull #include <u.h>
4 76193d7c 2003-09-30 devnull #include <libc.h>
5 76193d7c 2003-09-30 devnull #include <draw.h>
6 76193d7c 2003-09-30 devnull #include <memdraw.h>
7 76193d7c 2003-09-30 devnull #include "x11-memdraw.h"
10 76193d7c 2003-09-30 devnull * Allocate a Memimage with an optional pixmap backing on the X server.
12 76193d7c 2003-09-30 devnull Memimage*
13 32f69c36 2003-12-11 devnull _xallocmemimage(Rectangle r, u32int chan, int pixmap)
15 76193d7c 2003-09-30 devnull int d, offset;
16 76193d7c 2003-09-30 devnull Memimage *m;
17 76193d7c 2003-09-30 devnull Xmem *xm;
18 76193d7c 2003-09-30 devnull XImage *xi;
20 76193d7c 2003-09-30 devnull m = _allocmemimage(r, chan);
21 76193d7c 2003-09-30 devnull if(chan != GREY1 && chan != _x.chan)
22 76193d7c 2003-09-30 devnull return m;
25 76193d7c 2003-09-30 devnull * For bootstrapping, don't bother storing 1x1 images
26 76193d7c 2003-09-30 devnull * on the X server. Memimageinit needs to allocate these
27 76193d7c 2003-09-30 devnull * and we memimageinit before we do the rest of the X stuff.
28 76193d7c 2003-09-30 devnull * Of course, 1x1 images on the server are useless anyway.
30 76193d7c 2003-09-30 devnull if(Dx(r)==1 && Dy(r)==1)
31 76193d7c 2003-09-30 devnull return m;
33 76193d7c 2003-09-30 devnull xm = mallocz(sizeof(Xmem), 1);
34 76193d7c 2003-09-30 devnull if(xm == nil){
35 76193d7c 2003-09-30 devnull freememimage(m);
36 76193d7c 2003-09-30 devnull return nil;
40 161060a4 2003-10-11 devnull * Allocate backing store.
42 161060a4 2003-10-11 devnull if(chan == GREY1)
45 161060a4 2003-10-11 devnull d = _x.depth;
46 76193d7c 2003-09-30 devnull if(pixmap != PMundef)
47 76193d7c 2003-09-30 devnull xm->pixmap = pixmap;
49 161060a4 2003-10-11 devnull xm->pixmap = XCreatePixmap(_x.display, _x.drawable, Dx(r), Dy(r), d);
52 76193d7c 2003-09-30 devnull * We want to align pixels on word boundaries.
54 161060a4 2003-10-11 devnull if(m->depth == 24)
55 76193d7c 2003-09-30 devnull offset = r.min.x&3;
57 76193d7c 2003-09-30 devnull offset = r.min.x&(31/m->depth);
58 76193d7c 2003-09-30 devnull r.min.x -= offset;
59 76193d7c 2003-09-30 devnull assert(wordsperline(r, m->depth) <= m->width);
62 76193d7c 2003-09-30 devnull * Wrap our data in an XImage structure.
64 161060a4 2003-10-11 devnull xi = XCreateImage(_x.display, _x.vis, d,
65 76193d7c 2003-09-30 devnull ZPixmap, 0, (char*)m->data->bdata, Dx(r), Dy(r),
66 76193d7c 2003-09-30 devnull 32, m->width*sizeof(u32int));
67 76193d7c 2003-09-30 devnull if(xi == nil){
68 76193d7c 2003-09-30 devnull freememimage(m);
69 76193d7c 2003-09-30 devnull if(xm->pixmap != pixmap)
70 76193d7c 2003-09-30 devnull XFreePixmap(_x.display, xm->pixmap);
71 76193d7c 2003-09-30 devnull return nil;
74 76193d7c 2003-09-30 devnull xm->xi = xi;
75 76193d7c 2003-09-30 devnull xm->r = r;
78 76193d7c 2003-09-30 devnull * Set the XImage parameters so that it looks exactly like
79 76193d7c 2003-09-30 devnull * a Memimage -- we're using the same data.
81 76193d7c 2003-09-30 devnull if(m->depth < 8 || m->depth == 24)
82 76193d7c 2003-09-30 devnull xi->bitmap_unit = 8;
84 76193d7c 2003-09-30 devnull xi->bitmap_unit = m->depth;
85 76193d7c 2003-09-30 devnull xi->byte_order = LSBFirst;
86 76193d7c 2003-09-30 devnull xi->bitmap_bit_order = MSBFirst;
87 76193d7c 2003-09-30 devnull xi->bitmap_pad = 32;
88 76193d7c 2003-09-30 devnull XInitImage(xi);
89 76193d7c 2003-09-30 devnull XFlush(_x.display);
91 76193d7c 2003-09-30 devnull m->X = xm;
92 76193d7c 2003-09-30 devnull return m;
95 76193d7c 2003-09-30 devnull Memimage*
96 76193d7c 2003-09-30 devnull allocmemimage(Rectangle r, u32int chan)
98 32f69c36 2003-12-11 devnull return _xallocmemimage(r, chan, PMundef);
102 76193d7c 2003-09-30 devnull freememimage(Memimage *m)
104 76193d7c 2003-09-30 devnull Xmem *xm;
106 76193d7c 2003-09-30 devnull if(m == nil)
109 76193d7c 2003-09-30 devnull xm = m->X;
110 76193d7c 2003-09-30 devnull if(xm && m->data->ref == 1){
111 76193d7c 2003-09-30 devnull if(xm->xi){
112 76193d7c 2003-09-30 devnull xm->xi->data = nil;
113 76193d7c 2003-09-30 devnull XFree(xm->xi);
115 76193d7c 2003-09-30 devnull XFreePixmap(_x.display, xm->pixmap);
116 76193d7c 2003-09-30 devnull free(xm);
117 76193d7c 2003-09-30 devnull m->X = nil;
119 76193d7c 2003-09-30 devnull _freememimage(m);