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