1 76193d7c 2003-09-30 devnull /*
  2 76193d7c 2003-09-30 devnull  * Some of the stuff in this file is not X-dependent and should be elsewhere.
  3 76193d7c 2003-09-30 devnull  */
  4 76193d7c 2003-09-30 devnull #include <u.h>
  5 be22ae2d 2004-03-26 devnull #include "x11-inc.h"
  6 76193d7c 2003-09-30 devnull #include <libc.h>
  7 76193d7c 2003-09-30 devnull #include <draw.h>
  8 76193d7c 2003-09-30 devnull #include <memdraw.h>
  9 76193d7c 2003-09-30 devnull #include <keyboard.h>
 10 76193d7c 2003-09-30 devnull #include <mouse.h>
 11 76193d7c 2003-09-30 devnull #include <cursor.h>
 12 76193d7c 2003-09-30 devnull #include "x11-memdraw.h"
 13 76193d7c 2003-09-30 devnull 
 14 76193d7c 2003-09-30 devnull static Memimage	*xattach(char*);
 15 76193d7c 2003-09-30 devnull static void	plan9cmap(void);
 16 76193d7c 2003-09-30 devnull static int	setupcmap(XWindow);
 17 d4853cf4 2003-10-01 devnull static int	xreplacescreenimage(void);
 18 76193d7c 2003-09-30 devnull static XGC	xgc(XDrawable, int, int);
 19 6325e032 2004-03-26 devnull static Image	*getimage0(Display*, Image*);
 20 76193d7c 2003-09-30 devnull 
 21 76193d7c 2003-09-30 devnull Xprivate _x;
 22 76193d7c 2003-09-30 devnull 
 23 76193d7c 2003-09-30 devnull Display*
 24 76193d7c 2003-09-30 devnull _initdisplay(void (*error)(Display*, char*), char *label)
 25 76193d7c 2003-09-30 devnull {
 26 76193d7c 2003-09-30 devnull 	Display *d;
 27 76193d7c 2003-09-30 devnull 	Memimage *m;
 28 76193d7c 2003-09-30 devnull 
 29 f7012583 2003-11-25 devnull 	/*
 30 f7012583 2003-11-25 devnull 	 * This rfork(RFNOTEG) isn't exactly right,
 31 f7012583 2003-11-25 devnull 	 * but we need some way to signal window 
 32 f7012583 2003-11-25 devnull 	 * closes.  Right now we post a hangup
 33 f7012583 2003-11-25 devnull 	 * note to the note group, which kills a whole
 34 f7012583 2003-11-25 devnull 	 * lot more than just the current program
 35 f7012583 2003-11-25 devnull 	 * if we don't do this.
 36 f7012583 2003-11-25 devnull 	 */
 37 f7012583 2003-11-25 devnull 	rfork(RFNOTEG);
 38 76193d7c 2003-09-30 devnull 	memimageinit();
 39 76193d7c 2003-09-30 devnull 
 40 76193d7c 2003-09-30 devnull 	d = mallocz(sizeof(Display), 1);
 41 76193d7c 2003-09-30 devnull 	if(d == nil)
 42 76193d7c 2003-09-30 devnull 		return nil;
 43 76193d7c 2003-09-30 devnull 
 44 76193d7c 2003-09-30 devnull 	d->buf = malloc(16000+5);
 45 76193d7c 2003-09-30 devnull 	d->obuf = malloc(16000);
 46 76193d7c 2003-09-30 devnull 	if(d->buf == nil || d->obuf == nil){
 47 76193d7c 2003-09-30 devnull 		free(d->buf);
 48 76193d7c 2003-09-30 devnull 		free(d->obuf);
 49 76193d7c 2003-09-30 devnull 		free(d);
 50 76193d7c 2003-09-30 devnull 		return nil;
 51 76193d7c 2003-09-30 devnull 	}
 52 76193d7c 2003-09-30 devnull 	d->bufsize = 16000;
 53 76193d7c 2003-09-30 devnull 	d->obufsize = 16000;
 54 76193d7c 2003-09-30 devnull 	d->bufp = d->buf;
 55 76193d7c 2003-09-30 devnull 	d->obufp = d->obuf;
 56 76193d7c 2003-09-30 devnull 
 57 76193d7c 2003-09-30 devnull 	m = xattach(label);
 58 76193d7c 2003-09-30 devnull 	if(m == nil){
 59 76193d7c 2003-09-30 devnull 		free(d);
 60 76193d7c 2003-09-30 devnull 		return nil;
 61 76193d7c 2003-09-30 devnull 	}
 62 76193d7c 2003-09-30 devnull 
 63 76193d7c 2003-09-30 devnull 	d->error = error;
 64 76193d7c 2003-09-30 devnull 	_initdisplaymemimage(d, m);
 65 6325e032 2004-03-26 devnull 	d->screenimage = getimage0(d, 0);
 66 76193d7c 2003-09-30 devnull 	return d;
 67 76193d7c 2003-09-30 devnull }
 68 76193d7c 2003-09-30 devnull 
 69 76193d7c 2003-09-30 devnull static Image*
 70 6325e032 2004-03-26 devnull getimage0(Display *d, Image *image)
 71 76193d7c 2003-09-30 devnull {
 72 be22ae2d 2004-03-26 devnull 	char info[12*12+1];
 73 be22ae2d 2004-03-26 devnull 	uchar *a;
 74 76193d7c 2003-09-30 devnull 	int n;
 75 6325e032 2004-03-26 devnull 	extern int _freeimage1(Image*);
 76 76193d7c 2003-09-30 devnull 
 77 6325e032 2004-03-26 devnull 	/*
 78 6325e032 2004-03-26 devnull 	 * If there's an old screen, it has id 0.  The 'J' request below
 79 6325e032 2004-03-26 devnull 	 * will try to install the new screen as id 0, so the old one 
 80 6325e032 2004-03-26 devnull 	 * must be freed first.
 81 6325e032 2004-03-26 devnull 	 */
 82 6325e032 2004-03-26 devnull 	if(image){
 83 6325e032 2004-03-26 devnull 		_freeimage1(image);
 84 6325e032 2004-03-26 devnull 		memset(image, 0, sizeof(Image));
 85 6325e032 2004-03-26 devnull 	}
 86 6325e032 2004-03-26 devnull 
 87 76193d7c 2003-09-30 devnull 	a = bufimage(d, 2);
 88 76193d7c 2003-09-30 devnull 	a[0] = 'J';
 89 76193d7c 2003-09-30 devnull 	a[1] = 'I';
 90 76193d7c 2003-09-30 devnull 	if(flushimage(d, 0) < 0){
 91 76193d7c 2003-09-30 devnull 		fprint(2, "cannot read screen info: %r\n");
 92 76193d7c 2003-09-30 devnull 		abort();
 93 76193d7c 2003-09-30 devnull 	}
 94 161060a4 2003-10-11 devnull 
 95 76193d7c 2003-09-30 devnull 	n = _drawmsgread(d, info, sizeof info);
 96 76193d7c 2003-09-30 devnull 	if(n != 12*12){
 97 76193d7c 2003-09-30 devnull 		fprint(2, "short screen info\n");
 98 76193d7c 2003-09-30 devnull 		abort();
 99 76193d7c 2003-09-30 devnull 	}
100 76193d7c 2003-09-30 devnull 
101 6325e032 2004-03-26 devnull 	if(image == nil){
102 6325e032 2004-03-26 devnull 		image = mallocz(sizeof(Image), 1);
103 6325e032 2004-03-26 devnull 		if(image == nil){
104 6325e032 2004-03-26 devnull 			fprint(2, "cannot allocate image: %r\n");
105 6325e032 2004-03-26 devnull 			abort();
106 6325e032 2004-03-26 devnull 		}
107 6325e032 2004-03-26 devnull 	}
108 6325e032 2004-03-26 devnull 
109 76193d7c 2003-09-30 devnull 	image->display = d;
110 76193d7c 2003-09-30 devnull 	image->id = 0;
111 76193d7c 2003-09-30 devnull 	image->chan = strtochan(info+2*12);
112 76193d7c 2003-09-30 devnull 	image->depth = chantodepth(image->chan);
113 76193d7c 2003-09-30 devnull 	image->repl = atoi(info+3*12);
114 76193d7c 2003-09-30 devnull 	image->r.min.x = atoi(info+4*12);
115 76193d7c 2003-09-30 devnull 	image->r.min.y = atoi(info+5*12);
116 76193d7c 2003-09-30 devnull 	image->r.max.x = atoi(info+6*12);
117 76193d7c 2003-09-30 devnull 	image->r.max.y = atoi(info+7*12);
118 76193d7c 2003-09-30 devnull 	image->clipr.min.x = atoi(info+8*12);
119 76193d7c 2003-09-30 devnull 	image->clipr.min.y = atoi(info+9*12);
120 76193d7c 2003-09-30 devnull 	image->clipr.max.x = atoi(info+10*12);
121 76193d7c 2003-09-30 devnull 	image->clipr.max.y = atoi(info+11*12);
122 76193d7c 2003-09-30 devnull 	return image;
123 76193d7c 2003-09-30 devnull }
124 76193d7c 2003-09-30 devnull 
125 76193d7c 2003-09-30 devnull int
126 76193d7c 2003-09-30 devnull getwindow(Display *d, int ref)
127 76193d7c 2003-09-30 devnull {
128 76193d7c 2003-09-30 devnull 	Image *i;
129 6325e032 2004-03-26 devnull 	Image *oi;
130 76193d7c 2003-09-30 devnull 
131 16a70966 2003-11-23 devnull 	if(_x.destroyed)
132 16a70966 2003-11-23 devnull 		postnote(PNGROUP, getpgrp(), "hangup");
133 d4853cf4 2003-10-01 devnull 	if(xreplacescreenimage() == 0)
134 d4853cf4 2003-10-01 devnull 		return 0;
135 6325e032 2004-03-26 devnull 
136 6325e032 2004-03-26 devnull 	/*
137 6325e032 2004-03-26 devnull 	 * Libdraw promises not to change the value of "screen",
138 6325e032 2004-03-26 devnull 	 * so we have to reuse the image structure
139 6325e032 2004-03-26 devnull 	 * memory we already have.
140 6325e032 2004-03-26 devnull 	 */
141 6325e032 2004-03-26 devnull 	oi = d->screenimage;
142 6325e032 2004-03-26 devnull 	i = getimage0(d, oi);
143 76193d7c 2003-09-30 devnull 	screen = d->screenimage = d->image = i;
144 6325e032 2004-03-26 devnull 	// fprint(2, "getwindow %p -> %p\n", oi, i);
145 76193d7c 2003-09-30 devnull 	return 0;
146 76193d7c 2003-09-30 devnull }
147 76193d7c 2003-09-30 devnull 
148 76193d7c 2003-09-30 devnull static int
149 76193d7c 2003-09-30 devnull xerror(XDisplay *d, XErrorEvent *e)
150 76193d7c 2003-09-30 devnull {
151 76193d7c 2003-09-30 devnull 	char buf[200];
152 76193d7c 2003-09-30 devnull 
153 af78a4cd 2004-03-02 devnull 	if(e->request_code == 42) /* XSetInputFocus */
154 af78a4cd 2004-03-02 devnull 		return 0;
155 6b2d0fd9 2004-03-26 devnull 	if(e->request_code == 18) /* XChangeProperty */
156 6b2d0fd9 2004-03-26 devnull 		return 0;
157 6b2d0fd9 2004-03-26 devnull 
158 161060a4 2003-10-11 devnull 	print("X error: error_code=%d, request_code=%d, minor=%d disp=%p\n",
159 161060a4 2003-10-11 devnull 		e->error_code, e->request_code, e->minor_code, d);
160 76193d7c 2003-09-30 devnull 	XGetErrorText(d, e->error_code, buf, sizeof buf);
161 76193d7c 2003-09-30 devnull 	print("%s\n", buf);
162 76193d7c 2003-09-30 devnull 	return 0;
163 76193d7c 2003-09-30 devnull }
164 76193d7c 2003-09-30 devnull 
165 76193d7c 2003-09-30 devnull static int
166 76193d7c 2003-09-30 devnull xioerror(XDisplay *d)
167 76193d7c 2003-09-30 devnull {
168 76193d7c 2003-09-30 devnull 	print("X I/O error\n");
169 16a70966 2003-11-23 devnull 	abort();
170 76193d7c 2003-09-30 devnull 	return -1;
171 76193d7c 2003-09-30 devnull }
172 76193d7c 2003-09-30 devnull 
173 76193d7c 2003-09-30 devnull 
174 76193d7c 2003-09-30 devnull static Memimage*
175 76193d7c 2003-09-30 devnull xattach(char *label)
176 76193d7c 2003-09-30 devnull {
177 76193d7c 2003-09-30 devnull 	char *argv[2], *disp;
178 76193d7c 2003-09-30 devnull 	int i, n, xrootid;
179 76193d7c 2003-09-30 devnull 	Rectangle r;
180 76193d7c 2003-09-30 devnull 	XClassHint classhint;
181 76193d7c 2003-09-30 devnull 	XDrawable pmid;
182 76193d7c 2003-09-30 devnull 	XPixmapFormatValues *pfmt;
183 76193d7c 2003-09-30 devnull 	XScreen *xscreen;
184 76193d7c 2003-09-30 devnull 	XSetWindowAttributes attr;
185 76193d7c 2003-09-30 devnull 	XSizeHints normalhint;
186 76193d7c 2003-09-30 devnull 	XTextProperty name;
187 76193d7c 2003-09-30 devnull 	XVisualInfo xvi;
188 76193d7c 2003-09-30 devnull 	XWindow xrootwin;
189 ab5efca8 2003-12-02 devnull 	XWindowAttributes wattr;
190 76193d7c 2003-09-30 devnull 	XWMHints hint;
191 76193d7c 2003-09-30 devnull 
192 76193d7c 2003-09-30 devnull 	/*
193 d4853cf4 2003-10-01 devnull 	if(XInitThreads() == 0){
194 d4853cf4 2003-10-01 devnull 		fprint(2, "XInitThreads failed\n");
195 d4853cf4 2003-10-01 devnull 		abort();
196 d4853cf4 2003-10-01 devnull 	}
197 d4853cf4 2003-10-01 devnull 	*/
198 d4853cf4 2003-10-01 devnull 
199 d4853cf4 2003-10-01 devnull 	/*
200 76193d7c 2003-09-30 devnull 	 * Connect to X server.
201 76193d7c 2003-09-30 devnull 	 */
202 76193d7c 2003-09-30 devnull 	_x.display = XOpenDisplay(NULL);
203 76193d7c 2003-09-30 devnull 	if(_x.display == nil){
204 76193d7c 2003-09-30 devnull 		disp = getenv("DISPLAY");
205 76193d7c 2003-09-30 devnull 		werrstr("XOpenDisplay %s: %r", disp ? disp : ":0");
206 76193d7c 2003-09-30 devnull 		free(disp);
207 76193d7c 2003-09-30 devnull 		return nil;
208 76193d7c 2003-09-30 devnull 	}
209 76193d7c 2003-09-30 devnull 	XSetErrorHandler(xerror);
210 76193d7c 2003-09-30 devnull 	XSetIOErrorHandler(xioerror);
211 76193d7c 2003-09-30 devnull 	xrootid = DefaultScreen(_x.display);
212 76193d7c 2003-09-30 devnull 	xrootwin = DefaultRootWindow(_x.display);
213 76193d7c 2003-09-30 devnull 
214 76193d7c 2003-09-30 devnull 	/* 
215 76193d7c 2003-09-30 devnull 	 * Figure out underlying screen format.
216 76193d7c 2003-09-30 devnull 	 */
217 76193d7c 2003-09-30 devnull 	if(XMatchVisualInfo(_x.display, xrootid, 16, TrueColor, &xvi)
218 76193d7c 2003-09-30 devnull 	|| XMatchVisualInfo(_x.display, xrootid, 16, DirectColor, &xvi)){
219 76193d7c 2003-09-30 devnull 		_x.vis = xvi.visual;
220 76193d7c 2003-09-30 devnull 		_x.depth = 16;
221 76193d7c 2003-09-30 devnull 	}
222 76193d7c 2003-09-30 devnull 	else
223 161060a4 2003-10-11 devnull 	if(XMatchVisualInfo(_x.display, xrootid, 15, TrueColor, &xvi)
224 161060a4 2003-10-11 devnull 	|| XMatchVisualInfo(_x.display, xrootid, 15, DirectColor, &xvi)){
225 161060a4 2003-10-11 devnull 		_x.vis = xvi.visual;
226 161060a4 2003-10-11 devnull 		_x.depth = 15;
227 161060a4 2003-10-11 devnull 	}
228 161060a4 2003-10-11 devnull 	else
229 76193d7c 2003-09-30 devnull 	if(XMatchVisualInfo(_x.display, xrootid, 24, TrueColor, &xvi)
230 76193d7c 2003-09-30 devnull 	|| XMatchVisualInfo(_x.display, xrootid, 24, DirectColor, &xvi)){
231 76193d7c 2003-09-30 devnull 		_x.vis = xvi.visual;
232 76193d7c 2003-09-30 devnull 		_x.depth = 24;
233 76193d7c 2003-09-30 devnull 	}
234 76193d7c 2003-09-30 devnull 	else
235 76193d7c 2003-09-30 devnull 	if(XMatchVisualInfo(_x.display, xrootid, 8, PseudoColor, &xvi)
236 76193d7c 2003-09-30 devnull 	|| XMatchVisualInfo(_x.display, xrootid, 8, StaticColor, &xvi)){
237 76193d7c 2003-09-30 devnull 		if(_x.depth > 8){
238 76193d7c 2003-09-30 devnull 			werrstr("can't deal with colormapped depth %d screens",
239 76193d7c 2003-09-30 devnull 				_x.depth);
240 76193d7c 2003-09-30 devnull 			goto err0;
241 76193d7c 2003-09-30 devnull 		}
242 76193d7c 2003-09-30 devnull 		_x.vis = xvi.visual;
243 76193d7c 2003-09-30 devnull 		_x.depth = 8;
244 76193d7c 2003-09-30 devnull 	}
245 76193d7c 2003-09-30 devnull 	else{
246 8ad51794 2004-03-25 devnull 		_x.depth = DefaultDepth(_x.display, xrootid);
247 76193d7c 2003-09-30 devnull 		if(_x.depth != 8){
248 76193d7c 2003-09-30 devnull 			werrstr("can't understand depth %d screen", _x.depth);
249 76193d7c 2003-09-30 devnull 			goto err0;
250 76193d7c 2003-09-30 devnull 		}
251 76193d7c 2003-09-30 devnull 		_x.vis = DefaultVisual(_x.display, xrootid);
252 76193d7c 2003-09-30 devnull 	}
253 76193d7c 2003-09-30 devnull 
254 8ad51794 2004-03-25 devnull 	if(DefaultDepth(_x.display, xrootid) == _x.depth)
255 8ad51794 2004-03-25 devnull 		_x.usetable = 1;
256 8ad51794 2004-03-25 devnull 
257 76193d7c 2003-09-30 devnull 	/*
258 76193d7c 2003-09-30 devnull 	 * _x.depth is only the number of significant pixel bits,
259 76193d7c 2003-09-30 devnull 	 * not the total number of pixel bits.  We need to walk the
260 76193d7c 2003-09-30 devnull 	 * display list to find how many actual bits are used
261 76193d7c 2003-09-30 devnull 	 * per pixel.
262 76193d7c 2003-09-30 devnull 	 */
263 76193d7c 2003-09-30 devnull 	_x.chan = 0;
264 76193d7c 2003-09-30 devnull 	pfmt = XListPixmapFormats(_x.display, &n);
265 76193d7c 2003-09-30 devnull 	for(i=0; i<n; i++){
266 76193d7c 2003-09-30 devnull 		if(pfmt[i].depth == _x.depth){
267 76193d7c 2003-09-30 devnull 			switch(pfmt[i].bits_per_pixel){
268 76193d7c 2003-09-30 devnull 			case 1:	/* untested */
269 76193d7c 2003-09-30 devnull 				_x.chan = GREY1;
270 76193d7c 2003-09-30 devnull 				break;
271 76193d7c 2003-09-30 devnull 			case 2:	/* untested */
272 76193d7c 2003-09-30 devnull 				_x.chan = GREY2;
273 76193d7c 2003-09-30 devnull 				break;
274 76193d7c 2003-09-30 devnull 			case 4:	/* untested */
275 76193d7c 2003-09-30 devnull 				_x.chan = GREY4;
276 76193d7c 2003-09-30 devnull 				break;
277 76193d7c 2003-09-30 devnull 			case 8:
278 76193d7c 2003-09-30 devnull 				_x.chan = CMAP8;
279 161060a4 2003-10-11 devnull 				break;
280 161060a4 2003-10-11 devnull 			case 15:
281 161060a4 2003-10-11 devnull 				_x.chan = RGB15;
282 76193d7c 2003-09-30 devnull 				break;
283 76193d7c 2003-09-30 devnull 			case 16: /* how to tell RGB15? */
284 76193d7c 2003-09-30 devnull 				_x.chan = RGB16;
285 76193d7c 2003-09-30 devnull 				break;
286 76193d7c 2003-09-30 devnull 			case 24: /* untested (impossible?) */
287 76193d7c 2003-09-30 devnull 				_x.chan = RGB24;
288 76193d7c 2003-09-30 devnull 				break;
289 76193d7c 2003-09-30 devnull 			case 32:
290 76193d7c 2003-09-30 devnull 				_x.chan = XRGB32;
291 76193d7c 2003-09-30 devnull 				break;
292 76193d7c 2003-09-30 devnull 			}
293 76193d7c 2003-09-30 devnull 		}
294 76193d7c 2003-09-30 devnull 	}
295 76193d7c 2003-09-30 devnull 	if(_x.chan == 0){
296 76193d7c 2003-09-30 devnull 		werrstr("could not determine screen pixel format");
297 76193d7c 2003-09-30 devnull 		goto err0;
298 76193d7c 2003-09-30 devnull 	}
299 76193d7c 2003-09-30 devnull 
300 76193d7c 2003-09-30 devnull 	/*
301 76193d7c 2003-09-30 devnull 	 * Set up color map if necessary.
302 76193d7c 2003-09-30 devnull 	 */
303 76193d7c 2003-09-30 devnull 	xscreen = DefaultScreenOfDisplay(_x.display);
304 76193d7c 2003-09-30 devnull 	_x.cmap = DefaultColormapOfScreen(xscreen);
305 76193d7c 2003-09-30 devnull 	if(_x.vis->class != StaticColor){
306 76193d7c 2003-09-30 devnull 		plan9cmap();
307 76193d7c 2003-09-30 devnull 		setupcmap(xrootwin);
308 76193d7c 2003-09-30 devnull 	}
309 76193d7c 2003-09-30 devnull 
310 76193d7c 2003-09-30 devnull 	/*
311 76193d7c 2003-09-30 devnull 	 * We get to choose the initial rectangle size.
312 76193d7c 2003-09-30 devnull 	 * This is arbitrary.  In theory we should read the
313 76193d7c 2003-09-30 devnull 	 * command line and allow the traditional X options.
314 76193d7c 2003-09-30 devnull 	 */
315 76193d7c 2003-09-30 devnull 	r = Rect(0, 0, WidthOfScreen(xscreen)*3/4,
316 76193d7c 2003-09-30 devnull 			HeightOfScreen(xscreen)*3/4);
317 76193d7c 2003-09-30 devnull 
318 76193d7c 2003-09-30 devnull 	memset(&attr, 0, sizeof attr);
319 76193d7c 2003-09-30 devnull 	attr.colormap = _x.cmap;
320 161060a4 2003-10-11 devnull 	attr.background_pixel = ~0;
321 76193d7c 2003-09-30 devnull 	attr.border_pixel = 0;
322 76193d7c 2003-09-30 devnull 	_x.drawable = XCreateWindow(
323 76193d7c 2003-09-30 devnull 		_x.display,	/* display */
324 76193d7c 2003-09-30 devnull 		xrootwin,	/* parent */
325 76193d7c 2003-09-30 devnull 		0,		/* x */
326 76193d7c 2003-09-30 devnull 		0,		/* y */
327 76193d7c 2003-09-30 devnull 		Dx(r),		/* width */
328 76193d7c 2003-09-30 devnull 	 	Dy(r),		/* height */
329 76193d7c 2003-09-30 devnull 		0,		/* border width */
330 8ad51794 2004-03-25 devnull 		_x.depth,	/* depth */
331 76193d7c 2003-09-30 devnull 		InputOutput,	/* class */
332 76193d7c 2003-09-30 devnull 		_x.vis,		/* visual */
333 76193d7c 2003-09-30 devnull 				/* valuemask */
334 76193d7c 2003-09-30 devnull 		CWBackPixel|CWBorderPixel|CWColormap,
335 76193d7c 2003-09-30 devnull 		&attr		/* attributes (the above aren't?!) */
336 76193d7c 2003-09-30 devnull 	);
337 76193d7c 2003-09-30 devnull 
338 ab5efca8 2003-12-02 devnull 	if(!XGetWindowAttributes(_x.display, _x.drawable, &wattr))
339 ab5efca8 2003-12-02 devnull 		fprint(2, "XGetWindowAttributes failed\n");
340 ab5efca8 2003-12-02 devnull 	else if(wattr.width && wattr.height){
341 ab5efca8 2003-12-02 devnull 		r.max.x = wattr.width;
342 ab5efca8 2003-12-02 devnull 		r.max.y = wattr.height;
343 ab5efca8 2003-12-02 devnull 		if(0) fprint(2, "new rect %dx%d\n", r.max.x, r.max.y);
344 ab5efca8 2003-12-02 devnull 	}
345 ab5efca8 2003-12-02 devnull 
346 76193d7c 2003-09-30 devnull 	/*
347 76193d7c 2003-09-30 devnull 	 * Label and other properties required by ICCCCM.
348 76193d7c 2003-09-30 devnull 	 */
349 76193d7c 2003-09-30 devnull 	memset(&name, 0, sizeof name);
350 76193d7c 2003-09-30 devnull 	if(label == nil)
351 76193d7c 2003-09-30 devnull 		label = "pjw-face-here";
352 76193d7c 2003-09-30 devnull 	name.value = (uchar*)label;
353 76193d7c 2003-09-30 devnull 	name.encoding = XA_STRING;
354 76193d7c 2003-09-30 devnull 	name.format = 8;
355 be22ae2d 2004-03-26 devnull 	name.nitems = strlen((char*)name.value);
356 76193d7c 2003-09-30 devnull 
357 76193d7c 2003-09-30 devnull 	memset(&normalhint, 0, sizeof normalhint);
358 76193d7c 2003-09-30 devnull 	normalhint.flags = USSize|PMaxSize;
359 76193d7c 2003-09-30 devnull 	normalhint.max_width = WidthOfScreen(xscreen);
360 76193d7c 2003-09-30 devnull 	normalhint.max_height = HeightOfScreen(xscreen);
361 76193d7c 2003-09-30 devnull 
362 76193d7c 2003-09-30 devnull 	memset(&hint, 0, sizeof hint);
363 76193d7c 2003-09-30 devnull 	hint.flags = InputHint|StateHint;
364 76193d7c 2003-09-30 devnull 	hint.input = 1;
365 76193d7c 2003-09-30 devnull 	hint.initial_state = NormalState;
366 76193d7c 2003-09-30 devnull 
367 76193d7c 2003-09-30 devnull 	memset(&classhint, 0, sizeof classhint);
368 76193d7c 2003-09-30 devnull 	classhint.res_name = label;
369 76193d7c 2003-09-30 devnull 	classhint.res_class = label;
370 76193d7c 2003-09-30 devnull 
371 76193d7c 2003-09-30 devnull 	argv[0] = label;
372 76193d7c 2003-09-30 devnull 	argv[1] = nil;
373 76193d7c 2003-09-30 devnull 
374 76193d7c 2003-09-30 devnull 	XSetWMProperties(
375 76193d7c 2003-09-30 devnull 		_x.display,	/* display */
376 76193d7c 2003-09-30 devnull 		_x.drawable,	/* window */
377 76193d7c 2003-09-30 devnull 		&name,		/* XA_WM_NAME property */
378 76193d7c 2003-09-30 devnull 		&name,		/* XA_WM_ICON_NAME property */
379 76193d7c 2003-09-30 devnull 		argv,		/* XA_WM_COMMAND */
380 76193d7c 2003-09-30 devnull 		1,		/* argc */
381 76193d7c 2003-09-30 devnull 		&normalhint,	/* XA_WM_NORMAL_HINTS */
382 76193d7c 2003-09-30 devnull 		&hint,		/* XA_WM_HINTS */
383 76193d7c 2003-09-30 devnull 		&classhint	/* XA_WM_CLASSHINTS */
384 76193d7c 2003-09-30 devnull 	);
385 76193d7c 2003-09-30 devnull 	XFlush(_x.display);
386 76193d7c 2003-09-30 devnull 
387 76193d7c 2003-09-30 devnull 	/*
388 76193d7c 2003-09-30 devnull 	 * Allocate our local backing store.
389 76193d7c 2003-09-30 devnull 	 */
390 76193d7c 2003-09-30 devnull 	_x.screenr = r;
391 76193d7c 2003-09-30 devnull 	_x.screenpm = XCreatePixmap(_x.display, _x.drawable, Dx(r), Dy(r), _x.depth);
392 161060a4 2003-10-11 devnull 	_x.nextscreenpm = _x.screenpm;
393 32f69c36 2003-12-11 devnull 	_x.screenimage = _xallocmemimage(r, _x.chan, _x.screenpm);
394 76193d7c 2003-09-30 devnull 
395 76193d7c 2003-09-30 devnull 	/*
396 76193d7c 2003-09-30 devnull 	 * Allocate some useful graphics contexts for the future.
397 76193d7c 2003-09-30 devnull 	 */
398 76193d7c 2003-09-30 devnull 	_x.gcfill	= xgc(_x.screenpm, FillSolid, -1);
399 76193d7c 2003-09-30 devnull 	_x.gccopy	= xgc(_x.screenpm, -1, -1);
400 76193d7c 2003-09-30 devnull 	_x.gcsimplesrc 	= xgc(_x.screenpm, FillStippled, -1);
401 76193d7c 2003-09-30 devnull 	_x.gczero	= xgc(_x.screenpm, -1, -1);
402 76193d7c 2003-09-30 devnull 	_x.gcreplsrc	= xgc(_x.screenpm, FillTiled, -1);
403 76193d7c 2003-09-30 devnull 
404 76193d7c 2003-09-30 devnull 	pmid = XCreatePixmap(_x.display, _x.drawable, 1, 1, 1);
405 76193d7c 2003-09-30 devnull 	_x.gcfill0	= xgc(pmid, FillSolid, 0);
406 76193d7c 2003-09-30 devnull 	_x.gccopy0	= xgc(pmid, -1, -1);
407 76193d7c 2003-09-30 devnull 	_x.gcsimplesrc0	= xgc(pmid, FillStippled, -1);
408 76193d7c 2003-09-30 devnull 	_x.gczero0	= xgc(pmid, -1, -1);
409 76193d7c 2003-09-30 devnull 	_x.gcreplsrc0	= xgc(pmid, FillTiled, -1);
410 76193d7c 2003-09-30 devnull 	XFreePixmap(_x.display, pmid);
411 76193d7c 2003-09-30 devnull 
412 76193d7c 2003-09-30 devnull 	/*
413 76193d7c 2003-09-30 devnull 	 * Put the window on the screen.
414 76193d7c 2003-09-30 devnull 	 */
415 76193d7c 2003-09-30 devnull 	XMapWindow(_x.display, _x.drawable);
416 76193d7c 2003-09-30 devnull 	XFlush(_x.display);
417 76193d7c 2003-09-30 devnull 
418 76193d7c 2003-09-30 devnull 	/*
419 16a70966 2003-11-23 devnull 	 * Look up clipboard atom.
420 16a70966 2003-11-23 devnull 	 */
421 268fa933 2003-11-25 devnull 	_x.clipboard = XInternAtom(_x.display, "CLIPBOARD", False);
422 e39b8b19 2003-12-02 devnull 	_x.utf8string = XInternAtom(_x.display, "UTF8_STRING", False);
423 e39b8b19 2003-12-02 devnull 	_x.targets = XInternAtom(_x.display, "TARGETS", False);
424 e39b8b19 2003-12-02 devnull 	_x.text = XInternAtom(_x.display, "TEXT", False);
425 e39b8b19 2003-12-02 devnull 	_x.compoundtext = XInternAtom(_x.display, "COMPOUND_TEXT", False);
426 16a70966 2003-11-23 devnull 
427 16a70966 2003-11-23 devnull 	/*
428 161060a4 2003-10-11 devnull 	 * Lots of display connections for various procs.
429 76193d7c 2003-09-30 devnull 	 */
430 76193d7c 2003-09-30 devnull 	_x.kbdcon	= XOpenDisplay(NULL);
431 76193d7c 2003-09-30 devnull 	_x.mousecon	= XOpenDisplay(NULL);
432 76193d7c 2003-09-30 devnull 	_x.snarfcon	= XOpenDisplay(NULL);
433 76193d7c 2003-09-30 devnull 
434 161060a4 2003-10-11 devnull 	if(0) fprint(2, "x: display=%p kbd=%p mouse=%p snarf=%p\n",
435 161060a4 2003-10-11 devnull 		_x.display, _x.kbdcon, _x.mousecon, _x.snarfcon);
436 161060a4 2003-10-11 devnull 
437 76193d7c 2003-09-30 devnull 	_x.black	= xscreen->black_pixel;
438 76193d7c 2003-09-30 devnull 	_x.white	= xscreen->white_pixel;
439 76193d7c 2003-09-30 devnull 
440 76193d7c 2003-09-30 devnull 	return _x.screenimage;
441 76193d7c 2003-09-30 devnull 
442 76193d7c 2003-09-30 devnull err0:
443 161060a4 2003-10-11 devnull fprint(2, "%r\n");
444 76193d7c 2003-09-30 devnull 	/*
445 76193d7c 2003-09-30 devnull 	 * Should do a better job of cleaning up here.
446 76193d7c 2003-09-30 devnull 	 */
447 76193d7c 2003-09-30 devnull 	XCloseDisplay(_x.display);
448 76193d7c 2003-09-30 devnull 	return nil;
449 16a70966 2003-11-23 devnull }
450 16a70966 2003-11-23 devnull 
451 16a70966 2003-11-23 devnull int
452 16a70966 2003-11-23 devnull drawsetlabel(Display *d, char *label)
453 16a70966 2003-11-23 devnull {
454 16a70966 2003-11-23 devnull 	char *argv[2];
455 16a70966 2003-11-23 devnull 	XClassHint classhint;
456 16a70966 2003-11-23 devnull 	XTextProperty name;
457 16a70966 2003-11-23 devnull 
458 16a70966 2003-11-23 devnull 	/*
459 16a70966 2003-11-23 devnull 	 * Label and other properties required by ICCCCM.
460 16a70966 2003-11-23 devnull 	 */
461 16a70966 2003-11-23 devnull 	memset(&name, 0, sizeof name);
462 16a70966 2003-11-23 devnull 	if(label == nil)
463 16a70966 2003-11-23 devnull 		label = "pjw-face-here";
464 16a70966 2003-11-23 devnull 	name.value = (uchar*)label;
465 16a70966 2003-11-23 devnull 	name.encoding = XA_STRING;
466 16a70966 2003-11-23 devnull 	name.format = 8;
467 be22ae2d 2004-03-26 devnull 	name.nitems = strlen((char*)name.value);
468 16a70966 2003-11-23 devnull 
469 16a70966 2003-11-23 devnull 	memset(&classhint, 0, sizeof classhint);
470 16a70966 2003-11-23 devnull 	classhint.res_name = label;
471 16a70966 2003-11-23 devnull 	classhint.res_class = label;
472 16a70966 2003-11-23 devnull 
473 16a70966 2003-11-23 devnull 	argv[0] = label;
474 16a70966 2003-11-23 devnull 	argv[1] = nil;
475 16a70966 2003-11-23 devnull 
476 16a70966 2003-11-23 devnull 	XSetWMProperties(
477 16a70966 2003-11-23 devnull 		_x.display,	/* display */
478 16a70966 2003-11-23 devnull 		_x.drawable,	/* window */
479 16a70966 2003-11-23 devnull 		&name,		/* XA_WM_NAME property */
480 16a70966 2003-11-23 devnull 		&name,		/* XA_WM_ICON_NAME property */
481 16a70966 2003-11-23 devnull 		argv,		/* XA_WM_COMMAND */
482 16a70966 2003-11-23 devnull 		1,		/* argc */
483 16a70966 2003-11-23 devnull 		nil,		/* XA_WM_NORMAL_HINTS */
484 16a70966 2003-11-23 devnull 		nil,		/* XA_WM_HINTS */
485 16a70966 2003-11-23 devnull 		&classhint	/* XA_WM_CLASSHINTS */
486 16a70966 2003-11-23 devnull 	);
487 16a70966 2003-11-23 devnull 	XFlush(_x.display);
488 16a70966 2003-11-23 devnull 	return 0;
489 76193d7c 2003-09-30 devnull }
490 76193d7c 2003-09-30 devnull 
491 76193d7c 2003-09-30 devnull /*
492 76193d7c 2003-09-30 devnull  * Create a GC with a particular fill style and XXX.
493 76193d7c 2003-09-30 devnull  * Disable generation of GraphicsExpose/NoExpose events in the GC.
494 76193d7c 2003-09-30 devnull  */
495 76193d7c 2003-09-30 devnull static XGC
496 76193d7c 2003-09-30 devnull xgc(XDrawable d, int fillstyle, int foreground)
497 76193d7c 2003-09-30 devnull {
498 76193d7c 2003-09-30 devnull 	XGC gc;
499 76193d7c 2003-09-30 devnull 	XGCValues v;
500 76193d7c 2003-09-30 devnull 
501 76193d7c 2003-09-30 devnull 	memset(&v, 0, sizeof v);
502 76193d7c 2003-09-30 devnull 	v.function = GXcopy;
503 76193d7c 2003-09-30 devnull 	v.graphics_exposures = False;
504 76193d7c 2003-09-30 devnull 	gc = XCreateGC(_x.display, d, GCFunction|GCGraphicsExposures, &v);
505 76193d7c 2003-09-30 devnull 	if(fillstyle != -1)
506 76193d7c 2003-09-30 devnull 		XSetFillStyle(_x.display, gc, fillstyle);
507 76193d7c 2003-09-30 devnull 	if(foreground != -1)
508 76193d7c 2003-09-30 devnull 		XSetForeground(_x.display, gc, 0);
509 76193d7c 2003-09-30 devnull 	return gc;
510 76193d7c 2003-09-30 devnull }
511 76193d7c 2003-09-30 devnull 
512 76193d7c 2003-09-30 devnull 
513 76193d7c 2003-09-30 devnull /*
514 76193d7c 2003-09-30 devnull  * Initialize map with the Plan 9 rgbv color map.
515 76193d7c 2003-09-30 devnull  */
516 76193d7c 2003-09-30 devnull static void
517 76193d7c 2003-09-30 devnull plan9cmap(void)
518 76193d7c 2003-09-30 devnull {
519 76193d7c 2003-09-30 devnull 	int r, g, b, cr, cg, cb, v, num, den, idx, v7, idx7;
520 76193d7c 2003-09-30 devnull 	static int once;
521 76193d7c 2003-09-30 devnull 
522 76193d7c 2003-09-30 devnull 	if(once)
523 76193d7c 2003-09-30 devnull 		return;
524 76193d7c 2003-09-30 devnull 	once = 1;
525 76193d7c 2003-09-30 devnull 
526 76193d7c 2003-09-30 devnull 	for(r=0; r!=4; r++)
527 76193d7c 2003-09-30 devnull 	for(g = 0; g != 4; g++)
528 76193d7c 2003-09-30 devnull 	for(b = 0; b!=4; b++)
529 76193d7c 2003-09-30 devnull 	for(v = 0; v!=4; v++){
530 76193d7c 2003-09-30 devnull 		den=r;
531 76193d7c 2003-09-30 devnull 		if(g > den)
532 76193d7c 2003-09-30 devnull 			den=g;
533 76193d7c 2003-09-30 devnull 		if(b > den)
534 76193d7c 2003-09-30 devnull 			den=b;
535 76193d7c 2003-09-30 devnull 		/* divide check -- pick grey shades */
536 76193d7c 2003-09-30 devnull 		if(den==0)
537 76193d7c 2003-09-30 devnull 			cr=cg=cb=v*17;
538 76193d7c 2003-09-30 devnull 		else {
539 76193d7c 2003-09-30 devnull 			num=17*(4*den+v);
540 76193d7c 2003-09-30 devnull 			cr=r*num/den;
541 76193d7c 2003-09-30 devnull 			cg=g*num/den;
542 76193d7c 2003-09-30 devnull 			cb=b*num/den;
543 76193d7c 2003-09-30 devnull 		}
544 76193d7c 2003-09-30 devnull 		idx = r*64 + v*16 + ((g*4 + b + v - r) & 15);
545 76193d7c 2003-09-30 devnull 		_x.map[idx].red = cr*0x0101;
546 76193d7c 2003-09-30 devnull 		_x.map[idx].green = cg*0x0101;
547 76193d7c 2003-09-30 devnull 		_x.map[idx].blue = cb*0x0101;
548 76193d7c 2003-09-30 devnull 		_x.map[idx].pixel = idx;
549 76193d7c 2003-09-30 devnull 		_x.map[idx].flags = DoRed|DoGreen|DoBlue;
550 76193d7c 2003-09-30 devnull 
551 76193d7c 2003-09-30 devnull 		v7 = v >> 1;
552 76193d7c 2003-09-30 devnull 		idx7 = r*32 + v7*16 + g*4 + b;
553 76193d7c 2003-09-30 devnull 		if((v & 1) == v7){
554 76193d7c 2003-09-30 devnull 			_x.map7to8[idx7][0] = idx;
555 76193d7c 2003-09-30 devnull 			if(den == 0) { 		/* divide check -- pick grey shades */
556 76193d7c 2003-09-30 devnull 				cr = ((255.0/7.0)*v7)+0.5;
557 76193d7c 2003-09-30 devnull 				cg = cr;
558 76193d7c 2003-09-30 devnull 				cb = cr;
559 76193d7c 2003-09-30 devnull 			}
560 76193d7c 2003-09-30 devnull 			else {
561 76193d7c 2003-09-30 devnull 				num=17*15*(4*den+v7*2)/14;
562 76193d7c 2003-09-30 devnull 				cr=r*num/den;
563 76193d7c 2003-09-30 devnull 				cg=g*num/den;
564 76193d7c 2003-09-30 devnull 				cb=b*num/den;
565 76193d7c 2003-09-30 devnull 			}
566 76193d7c 2003-09-30 devnull 			_x.map7[idx7].red = cr*0x0101;
567 76193d7c 2003-09-30 devnull 			_x.map7[idx7].green = cg*0x0101;
568 76193d7c 2003-09-30 devnull 			_x.map7[idx7].blue = cb*0x0101;
569 76193d7c 2003-09-30 devnull 			_x.map7[idx7].pixel = idx7;
570 76193d7c 2003-09-30 devnull 			_x.map7[idx7].flags = DoRed|DoGreen|DoBlue;
571 76193d7c 2003-09-30 devnull 		}
572 76193d7c 2003-09-30 devnull 		else
573 76193d7c 2003-09-30 devnull 			_x.map7to8[idx7][1] = idx;
574 76193d7c 2003-09-30 devnull 	}
575 76193d7c 2003-09-30 devnull }
576 76193d7c 2003-09-30 devnull 
577 76193d7c 2003-09-30 devnull /*
578 76193d7c 2003-09-30 devnull  * Initialize and install the rgbv color map as a private color map
579 76193d7c 2003-09-30 devnull  * for this application.  It gets the best colors when it has the
580 76193d7c 2003-09-30 devnull  * cursor focus.
581 76193d7c 2003-09-30 devnull  */
582 76193d7c 2003-09-30 devnull static int 
583 76193d7c 2003-09-30 devnull setupcmap(XWindow w)
584 76193d7c 2003-09-30 devnull {
585 76193d7c 2003-09-30 devnull 	char buf[30];
586 76193d7c 2003-09-30 devnull 	int i;
587 76193d7c 2003-09-30 devnull 	u32int p, pp;
588 76193d7c 2003-09-30 devnull 	XColor c;
589 76193d7c 2003-09-30 devnull 
590 76193d7c 2003-09-30 devnull 	if(_x.depth <= 1)
591 76193d7c 2003-09-30 devnull 		return 0;
592 76193d7c 2003-09-30 devnull 
593 76193d7c 2003-09-30 devnull 	if(_x.depth >= 24) {
594 76193d7c 2003-09-30 devnull 		/*
595 8ad51794 2004-03-25 devnull 		 * This is needed for SunOS.  Ask Axel Belinfante.
596 8ad51794 2004-03-25 devnull 		 */
597 8ad51794 2004-03-25 devnull 		if(_x.usetable == 0){
598 8ad51794 2004-03-25 devnull 			_x.cmap = XCreateColormap(_x.display, w, _x.vis, AllocAll); 
599 8ad51794 2004-03-25 devnull 			XStoreColors(_x.display, _x.cmap, _x.map, 256);
600 8ad51794 2004-03-25 devnull 			for(i = 0; i < 256; i++){
601 8ad51794 2004-03-25 devnull 				_x.tox11[i] = i;
602 8ad51794 2004-03-25 devnull 				_x.toplan9[i] = i;
603 8ad51794 2004-03-25 devnull 			}
604 8ad51794 2004-03-25 devnull 		}
605 8ad51794 2004-03-25 devnull 
606 8ad51794 2004-03-25 devnull 		/*
607 76193d7c 2003-09-30 devnull 		 * The pixel value returned from XGetPixel needs to
608 76193d7c 2003-09-30 devnull 		 * be converted to RGB so we can call rgb2cmap()
609 76193d7c 2003-09-30 devnull 		 * to translate between 24 bit X and our color. Unfortunately,
610 76193d7c 2003-09-30 devnull 		 * the return value appears to be display server endian 
611 76193d7c 2003-09-30 devnull 		 * dependant. Therefore, we run some heuristics to later
612 76193d7c 2003-09-30 devnull 		 * determine how to mask the int value correctly.
613 76193d7c 2003-09-30 devnull 		 * Yeah, I know we can look at _x.vis->byte_order but 
614 76193d7c 2003-09-30 devnull 		 * some displays say MSB even though they run on LSB.
615 76193d7c 2003-09-30 devnull 		 * Besides, this is more anal.
616 76193d7c 2003-09-30 devnull 		 */
617 76193d7c 2003-09-30 devnull 		c = _x.map[19];	/* known to have different R, G, B values */
618 76193d7c 2003-09-30 devnull 		if(!XAllocColor(_x.display, _x.cmap, &c)){
619 76193d7c 2003-09-30 devnull 			werrstr("XAllocColor: %r");
620 76193d7c 2003-09-30 devnull 			return -1;
621 76193d7c 2003-09-30 devnull 		}
622 76193d7c 2003-09-30 devnull 		p  = c.pixel;
623 76193d7c 2003-09-30 devnull 		pp = rgb2cmap((p>>16)&0xff,(p>>8)&0xff,p&0xff);
624 76193d7c 2003-09-30 devnull 		if(pp != _x.map[19].pixel) {
625 76193d7c 2003-09-30 devnull 			/* check if endian is other way */
626 76193d7c 2003-09-30 devnull 			pp = rgb2cmap(p&0xff,(p>>8)&0xff,(p>>16)&0xff);
627 76193d7c 2003-09-30 devnull 			if(pp != _x.map[19].pixel){
628 76193d7c 2003-09-30 devnull 				werrstr("cannot detect X server byte order");
629 76193d7c 2003-09-30 devnull 				return -1;
630 76193d7c 2003-09-30 devnull 			}
631 76193d7c 2003-09-30 devnull 
632 76193d7c 2003-09-30 devnull 			switch(_x.chan){
633 76193d7c 2003-09-30 devnull 			case RGB24:
634 76193d7c 2003-09-30 devnull 				_x.chan = BGR24;
635 76193d7c 2003-09-30 devnull 				break;
636 76193d7c 2003-09-30 devnull 			case XRGB32:
637 76193d7c 2003-09-30 devnull 				_x.chan = XBGR32;
638 76193d7c 2003-09-30 devnull 				break;
639 76193d7c 2003-09-30 devnull 			default:
640 76193d7c 2003-09-30 devnull 				werrstr("cannot byteswap channel %s",
641 76193d7c 2003-09-30 devnull 					chantostr(buf, _x.chan));
642 76193d7c 2003-09-30 devnull 				break;
643 76193d7c 2003-09-30 devnull 			}
644 76193d7c 2003-09-30 devnull 		}
645 76193d7c 2003-09-30 devnull 	}else if(_x.vis->class == TrueColor || _x.vis->class == DirectColor){
646 76193d7c 2003-09-30 devnull 		/*
647 76193d7c 2003-09-30 devnull 		 * Do nothing.  We have no way to express a
648 76193d7c 2003-09-30 devnull 		 * mixed-endian 16-bit screen, so pretend they don't exist.
649 76193d7c 2003-09-30 devnull 		 */
650 76193d7c 2003-09-30 devnull 	}else if(_x.vis->class == PseudoColor){
651 76193d7c 2003-09-30 devnull 		if(_x.usetable == 0){
652 76193d7c 2003-09-30 devnull 			_x.cmap = XCreateColormap(_x.display, w, _x.vis, AllocAll); 
653 76193d7c 2003-09-30 devnull 			XStoreColors(_x.display, _x.cmap, _x.map, 256);
654 76193d7c 2003-09-30 devnull 			for(i = 0; i < 256; i++){
655 76193d7c 2003-09-30 devnull 				_x.tox11[i] = i;
656 76193d7c 2003-09-30 devnull 				_x.toplan9[i] = i;
657 76193d7c 2003-09-30 devnull 			}
658 76193d7c 2003-09-30 devnull 		}else{
659 76193d7c 2003-09-30 devnull 			for(i = 0; i < 128; i++){
660 76193d7c 2003-09-30 devnull 				c = _x.map7[i];
661 76193d7c 2003-09-30 devnull 				if(!XAllocColor(_x.display, _x.cmap, &c)){
662 76193d7c 2003-09-30 devnull 					werrstr("can't allocate colors in 7-bit map");
663 76193d7c 2003-09-30 devnull 					return -1;
664 76193d7c 2003-09-30 devnull 				}
665 76193d7c 2003-09-30 devnull 				_x.tox11[_x.map7to8[i][0]] = c.pixel;
666 76193d7c 2003-09-30 devnull 				_x.tox11[_x.map7to8[i][1]] = c.pixel;
667 76193d7c 2003-09-30 devnull 				_x.toplan9[c.pixel] = _x.map7to8[i][0];
668 76193d7c 2003-09-30 devnull 			}
669 76193d7c 2003-09-30 devnull 		}
670 76193d7c 2003-09-30 devnull 	}else{
671 76193d7c 2003-09-30 devnull 		werrstr("unsupported visual class %d", _x.vis->class);
672 76193d7c 2003-09-30 devnull 		return -1;
673 76193d7c 2003-09-30 devnull 	}
674 76193d7c 2003-09-30 devnull 	return 0;
675 76193d7c 2003-09-30 devnull }
676 76193d7c 2003-09-30 devnull 
677 76193d7c 2003-09-30 devnull void
678 76193d7c 2003-09-30 devnull flushmemscreen(Rectangle r)
679 76193d7c 2003-09-30 devnull {
680 161060a4 2003-10-11 devnull 	if(_x.nextscreenpm != _x.screenpm){
681 161060a4 2003-10-11 devnull 		qlock(&_x.screenlock);
682 161060a4 2003-10-11 devnull 		XSync(_x.display, False);
683 161060a4 2003-10-11 devnull 		XFreePixmap(_x.display, _x.screenpm);
684 161060a4 2003-10-11 devnull 		_x.screenpm = _x.nextscreenpm;
685 161060a4 2003-10-11 devnull 		qunlock(&_x.screenlock);
686 161060a4 2003-10-11 devnull 	}
687 161060a4 2003-10-11 devnull 
688 76193d7c 2003-09-30 devnull 	if(r.min.x >= r.max.x || r.min.y >= r.max.y)
689 76193d7c 2003-09-30 devnull 		return;
690 76193d7c 2003-09-30 devnull 	XCopyArea(_x.display, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
691 76193d7c 2003-09-30 devnull 		Dx(r), Dy(r), r.min.x, r.min.y);
692 76193d7c 2003-09-30 devnull 	XFlush(_x.display);
693 76193d7c 2003-09-30 devnull }
694 76193d7c 2003-09-30 devnull 
695 76193d7c 2003-09-30 devnull void
696 32f69c36 2003-12-11 devnull _xexpose(XEvent *e, XDisplay *xd)
697 76193d7c 2003-09-30 devnull {
698 76193d7c 2003-09-30 devnull 	XExposeEvent *xe;
699 76193d7c 2003-09-30 devnull 	Rectangle r;
700 76193d7c 2003-09-30 devnull 
701 161060a4 2003-10-11 devnull 	qlock(&_x.screenlock);
702 161060a4 2003-10-11 devnull 	if(_x.screenpm != _x.nextscreenpm){
703 161060a4 2003-10-11 devnull 		qunlock(&_x.screenlock);
704 161060a4 2003-10-11 devnull 		return;
705 161060a4 2003-10-11 devnull 	}
706 76193d7c 2003-09-30 devnull 	xe = (XExposeEvent*)e;
707 76193d7c 2003-09-30 devnull 	r.min.x = xe->x;
708 76193d7c 2003-09-30 devnull 	r.min.y = xe->y;
709 76193d7c 2003-09-30 devnull 	r.max.x = xe->x+xe->width;
710 76193d7c 2003-09-30 devnull 	r.max.y = xe->y+xe->height;
711 76193d7c 2003-09-30 devnull 	XCopyArea(xd, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
712 76193d7c 2003-09-30 devnull 		Dx(r), Dy(r), r.min.x, r.min.y);
713 161060a4 2003-10-11 devnull 	XSync(xd, False);
714 161060a4 2003-10-11 devnull 	qunlock(&_x.screenlock);
715 16a70966 2003-11-23 devnull }
716 16a70966 2003-11-23 devnull 
717 16a70966 2003-11-23 devnull int
718 32f69c36 2003-12-11 devnull _xdestroy(XEvent *e, XDisplay *xd)
719 16a70966 2003-11-23 devnull {
720 16a70966 2003-11-23 devnull 	XDestroyWindowEvent *xe;
721 16a70966 2003-11-23 devnull 
722 16a70966 2003-11-23 devnull 	xe = (XDestroyWindowEvent*)e;
723 16a70966 2003-11-23 devnull 	if(xe->window == _x.drawable){
724 16a70966 2003-11-23 devnull 		_x.destroyed = 1;
725 16a70966 2003-11-23 devnull 		return 1;
726 16a70966 2003-11-23 devnull 	}
727 16a70966 2003-11-23 devnull 	return 0;
728 76193d7c 2003-09-30 devnull }
729 76193d7c 2003-09-30 devnull 
730 76193d7c 2003-09-30 devnull int
731 32f69c36 2003-12-11 devnull _xconfigure(XEvent *e, XDisplay *xd)
732 76193d7c 2003-09-30 devnull {
733 161060a4 2003-10-11 devnull 	Rectangle r;
734 76193d7c 2003-09-30 devnull 	XConfigureEvent *xe = (XConfigureEvent*)e;
735 76193d7c 2003-09-30 devnull 
736 76193d7c 2003-09-30 devnull 	if(xe->width == Dx(_x.screenr) && xe->height == Dy(_x.screenr))
737 76193d7c 2003-09-30 devnull 		return 0;
738 161060a4 2003-10-11 devnull 	if(xe->width==0 || xe->height==0)
739 161060a4 2003-10-11 devnull 		fprint(2, "ignoring resize to %dx%d\n", xe->width, xe->height);
740 161060a4 2003-10-11 devnull 	r = Rect(0, 0, xe->width, xe->height);
741 161060a4 2003-10-11 devnull 	qlock(&_x.screenlock);
742 161060a4 2003-10-11 devnull 	if(_x.screenpm != _x.nextscreenpm){
743 161060a4 2003-10-11 devnull 		XCopyArea(xd, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
744 161060a4 2003-10-11 devnull 			Dx(r), Dy(r), r.min.x, r.min.y);
745 161060a4 2003-10-11 devnull 		XSync(xd, False);
746 161060a4 2003-10-11 devnull 	}
747 161060a4 2003-10-11 devnull 	qunlock(&_x.screenlock);
748 161060a4 2003-10-11 devnull 	_x.newscreenr = r;
749 d4853cf4 2003-10-01 devnull 	return 1;
750 d4853cf4 2003-10-01 devnull }
751 d4853cf4 2003-10-01 devnull 
752 d4853cf4 2003-10-01 devnull static int
753 d4853cf4 2003-10-01 devnull xreplacescreenimage(void)
754 d4853cf4 2003-10-01 devnull {
755 d4853cf4 2003-10-01 devnull 	Memimage *m;
756 d4853cf4 2003-10-01 devnull 	XDrawable pixmap;
757 d4853cf4 2003-10-01 devnull 	Rectangle r;
758 d4853cf4 2003-10-01 devnull 
759 d4853cf4 2003-10-01 devnull 	r = _x.newscreenr;
760 d4853cf4 2003-10-01 devnull 	if(eqrect(_x.screenr, r))
761 d4853cf4 2003-10-01 devnull 		return 0;
762 d4853cf4 2003-10-01 devnull 
763 d4853cf4 2003-10-01 devnull 	pixmap = XCreatePixmap(_x.display, _x.drawable, Dx(r), Dy(r), _x.depth);
764 32f69c36 2003-12-11 devnull 	m = _xallocmemimage(r, _x.chan, pixmap);
765 161060a4 2003-10-11 devnull 	if(_x.nextscreenpm != _x.screenpm)
766 161060a4 2003-10-11 devnull 		XFreePixmap(_x.display, _x.nextscreenpm);
767 161060a4 2003-10-11 devnull 	_x.nextscreenpm = pixmap;
768 d4853cf4 2003-10-01 devnull 	_x.screenr = r;
769 76193d7c 2003-09-30 devnull 	_drawreplacescreenimage(m);
770 76193d7c 2003-09-30 devnull 	return 1;
771 76193d7c 2003-09-30 devnull }
772 76193d7c 2003-09-30 devnull