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