1 76193d7c 2003-09-30 devnull #include <u.h>
  2 76193d7c 2003-09-30 devnull #include <libc.h>
  3 76193d7c 2003-09-30 devnull #include <draw.h>
  4 76193d7c 2003-09-30 devnull 
  5 76193d7c 2003-09-30 devnull Display	*display;
  6 76193d7c 2003-09-30 devnull Font	*font;
  7 76193d7c 2003-09-30 devnull Image	*screen;
  8 76193d7c 2003-09-30 devnull int	_drawdebug;
  9 76193d7c 2003-09-30 devnull 
 10 76193d7c 2003-09-30 devnull static char deffontname[] = "*default*";
 11 76193d7c 2003-09-30 devnull Screen	*_screen;
 12 76193d7c 2003-09-30 devnull 
 13 b20f06ab 2004-12-26 devnull int		debuglockdisplay = 1;
 14 76193d7c 2003-09-30 devnull 
 15 76193d7c 2003-09-30 devnull static void
 16 76193d7c 2003-09-30 devnull drawshutdown(void)
 17 76193d7c 2003-09-30 devnull {
 18 76193d7c 2003-09-30 devnull 	Display *d;
 19 76193d7c 2003-09-30 devnull 
 20 76193d7c 2003-09-30 devnull 	d = display;
 21 76193d7c 2003-09-30 devnull 	if(d){
 22 76193d7c 2003-09-30 devnull 		display = nil;
 23 76193d7c 2003-09-30 devnull 		closedisplay(d);
 24 76193d7c 2003-09-30 devnull 	}
 25 76193d7c 2003-09-30 devnull }
 26 76193d7c 2003-09-30 devnull 
 27 76193d7c 2003-09-30 devnull int
 28 76193d7c 2003-09-30 devnull initdraw(void (*error)(Display*, char*), char *fontname, char *label)
 29 76193d7c 2003-09-30 devnull {
 30 76193d7c 2003-09-30 devnull 	Subfont *df;
 31 76193d7c 2003-09-30 devnull 	char buf[128];
 32 76193d7c 2003-09-30 devnull 
 33 76193d7c 2003-09-30 devnull 	display = _initdisplay(error, label); /* sets screen too */
 34 76193d7c 2003-09-30 devnull 	if(display == nil)
 35 76193d7c 2003-09-30 devnull 		return -1;
 36 76193d7c 2003-09-30 devnull 
 37 b20f06ab 2004-12-26 devnull 	lockdisplay(display);
 38 76193d7c 2003-09-30 devnull 	display->image = display->screenimage;
 39 76193d7c 2003-09-30 devnull 	screen = display->screenimage;
 40 76193d7c 2003-09-30 devnull 
 41 76193d7c 2003-09-30 devnull 	/*
 42 76193d7c 2003-09-30 devnull 	 * Set up default font
 43 76193d7c 2003-09-30 devnull 	 */
 44 76193d7c 2003-09-30 devnull 	df = getdefont(display);
 45 76193d7c 2003-09-30 devnull 	display->defaultsubfont = df;
 46 76193d7c 2003-09-30 devnull 	if(df == nil){
 47 76193d7c 2003-09-30 devnull 		fprint(2, "imageinit: can't open default subfont: %r\n");
 48 76193d7c 2003-09-30 devnull     Error:
 49 76193d7c 2003-09-30 devnull 		closedisplay(display);
 50 76193d7c 2003-09-30 devnull 		display = nil;
 51 76193d7c 2003-09-30 devnull 		return -1;
 52 76193d7c 2003-09-30 devnull 	}
 53 76193d7c 2003-09-30 devnull 	if(fontname == nil)
 54 76193d7c 2003-09-30 devnull 		fontname = getenv("font");	/* leak */
 55 76193d7c 2003-09-30 devnull 
 56 76193d7c 2003-09-30 devnull 	/*
 57 76193d7c 2003-09-30 devnull 	 * Build fonts with caches==depth of screen, for speed.
 58 76193d7c 2003-09-30 devnull 	 * If conversion were faster, we'd use 0 and save memory.
 59 76193d7c 2003-09-30 devnull 	 */
 60 76193d7c 2003-09-30 devnull 	if(fontname == nil){
 61 76193d7c 2003-09-30 devnull 		snprint(buf, sizeof buf, "%d %d\n0 %d\t%s\n", df->height, df->ascent,
 62 76193d7c 2003-09-30 devnull 			df->n-1, deffontname);
 63 76193d7c 2003-09-30 devnull //BUG: Need something better for this	installsubfont("*default*", df);
 64 76193d7c 2003-09-30 devnull 		font = buildfont(display, buf, deffontname);
 65 76193d7c 2003-09-30 devnull 		if(font == nil){
 66 76193d7c 2003-09-30 devnull 			fprint(2, "initdraw: can't open default font: %r\n");
 67 76193d7c 2003-09-30 devnull 			goto Error;
 68 76193d7c 2003-09-30 devnull 		}
 69 76193d7c 2003-09-30 devnull 	}else{
 70 76193d7c 2003-09-30 devnull 		font = openfont(display, fontname);	/* BUG: grey fonts */
 71 76193d7c 2003-09-30 devnull 		if(font == nil){
 72 76193d7c 2003-09-30 devnull 			fprint(2, "initdraw: can't open font %s: %r\n", fontname);
 73 76193d7c 2003-09-30 devnull 			goto Error;
 74 76193d7c 2003-09-30 devnull 		}
 75 76193d7c 2003-09-30 devnull 	}
 76 76193d7c 2003-09-30 devnull 	display->defaultfont = font;
 77 76193d7c 2003-09-30 devnull 
 78 76193d7c 2003-09-30 devnull 	display->white = allocimage(display, Rect(0,0,1,1), GREY1, 1, DWhite);
 79 76193d7c 2003-09-30 devnull 	display->black = allocimage(display, Rect(0,0,1,1), GREY1, 1, DBlack);
 80 76193d7c 2003-09-30 devnull 	if(display->white == nil || display->black == nil){
 81 76193d7c 2003-09-30 devnull 		fprint(2, "initdraw: can't allocate white and black");
 82 76193d7c 2003-09-30 devnull 		goto Error;
 83 76193d7c 2003-09-30 devnull 	}
 84 76193d7c 2003-09-30 devnull 	display->opaque = display->white;
 85 76193d7c 2003-09-30 devnull 	display->transparent = display->black;
 86 76193d7c 2003-09-30 devnull 	atexit(drawshutdown);
 87 76193d7c 2003-09-30 devnull 	return 1;
 88 76193d7c 2003-09-30 devnull }
 89 76193d7c 2003-09-30 devnull 
 90 76193d7c 2003-09-30 devnull /*
 91 76193d7c 2003-09-30 devnull  * Call with d unlocked.
 92 76193d7c 2003-09-30 devnull  * Note that disp->defaultfont and defaultsubfont are not freed here.
 93 76193d7c 2003-09-30 devnull  */
 94 76193d7c 2003-09-30 devnull void
 95 76193d7c 2003-09-30 devnull closedisplay(Display *disp)
 96 76193d7c 2003-09-30 devnull {
 97 76193d7c 2003-09-30 devnull 	int fd;
 98 76193d7c 2003-09-30 devnull 	char buf[128];
 99 76193d7c 2003-09-30 devnull 
100 76193d7c 2003-09-30 devnull 	if(disp == nil)
101 76193d7c 2003-09-30 devnull 		return;
102 76193d7c 2003-09-30 devnull 	if(disp == display)
103 76193d7c 2003-09-30 devnull 		display = nil;
104 76193d7c 2003-09-30 devnull 	if(disp->oldlabel[0]){
105 76193d7c 2003-09-30 devnull 		snprint(buf, sizeof buf, "%s/label", disp->windir);
106 76193d7c 2003-09-30 devnull 		fd = open(buf, OWRITE);
107 76193d7c 2003-09-30 devnull 		if(fd >= 0){
108 76193d7c 2003-09-30 devnull 			write(fd, disp->oldlabel, strlen(disp->oldlabel));
109 76193d7c 2003-09-30 devnull 			close(fd);
110 76193d7c 2003-09-30 devnull 		}
111 76193d7c 2003-09-30 devnull 	}
112 76193d7c 2003-09-30 devnull 
113 76193d7c 2003-09-30 devnull 	free(disp->devdir);
114 76193d7c 2003-09-30 devnull 	free(disp->windir);
115 76193d7c 2003-09-30 devnull 	freeimage(disp->white);
116 76193d7c 2003-09-30 devnull 	freeimage(disp->black);
117 76193d7c 2003-09-30 devnull 	free(disp);
118 76193d7c 2003-09-30 devnull }
119 76193d7c 2003-09-30 devnull 
120 76193d7c 2003-09-30 devnull void
121 76193d7c 2003-09-30 devnull lockdisplay(Display *disp)
122 76193d7c 2003-09-30 devnull {
123 76193d7c 2003-09-30 devnull 	if(debuglockdisplay){
124 76193d7c 2003-09-30 devnull 		/* avoid busy looping; it's rare we collide anyway */
125 76193d7c 2003-09-30 devnull 		while(!canqlock(&disp->qlock)){
126 76193d7c 2003-09-30 devnull 			fprint(1, "proc %d waiting for display lock...\n", getpid());
127 76193d7c 2003-09-30 devnull 			sleep(1000);
128 76193d7c 2003-09-30 devnull 		}
129 76193d7c 2003-09-30 devnull 	}else
130 76193d7c 2003-09-30 devnull 		qlock(&disp->qlock);
131 76193d7c 2003-09-30 devnull }
132 76193d7c 2003-09-30 devnull 
133 76193d7c 2003-09-30 devnull void
134 76193d7c 2003-09-30 devnull unlockdisplay(Display *disp)
135 76193d7c 2003-09-30 devnull {
136 76193d7c 2003-09-30 devnull 	qunlock(&disp->qlock);
137 76193d7c 2003-09-30 devnull }
138 76193d7c 2003-09-30 devnull 
139 76193d7c 2003-09-30 devnull void
140 76193d7c 2003-09-30 devnull drawerror(Display *d, char *s)
141 76193d7c 2003-09-30 devnull {
142 76193d7c 2003-09-30 devnull 	char err[ERRMAX];
143 76193d7c 2003-09-30 devnull 
144 76193d7c 2003-09-30 devnull 	if(d->error)
145 76193d7c 2003-09-30 devnull 		d->error(d, s);
146 76193d7c 2003-09-30 devnull 	else{
147 76193d7c 2003-09-30 devnull 		errstr(err, sizeof err);
148 76193d7c 2003-09-30 devnull 		fprint(2, "draw: %s: %s\n", s, err);
149 76193d7c 2003-09-30 devnull 		exits(s);
150 76193d7c 2003-09-30 devnull 	}
151 76193d7c 2003-09-30 devnull }
152 76193d7c 2003-09-30 devnull 
153 76193d7c 2003-09-30 devnull static
154 76193d7c 2003-09-30 devnull int
155 76193d7c 2003-09-30 devnull doflush(Display *d)
156 76193d7c 2003-09-30 devnull {
157 76193d7c 2003-09-30 devnull 	int n;
158 76193d7c 2003-09-30 devnull 
159 76193d7c 2003-09-30 devnull 	n = d->bufp-d->buf;
160 76193d7c 2003-09-30 devnull 	if(n <= 0)
161 76193d7c 2003-09-30 devnull 		return 1;
162 76193d7c 2003-09-30 devnull 
163 76193d7c 2003-09-30 devnull 	if(_drawmsgwrite(d, d->buf, n) != n){
164 76193d7c 2003-09-30 devnull 		if(_drawdebug)
165 76193d7c 2003-09-30 devnull 			fprint(2, "flushimage fail: d=%p: %r\n", d); /**/
166 76193d7c 2003-09-30 devnull 		d->bufp = d->buf;	/* might as well; chance of continuing */
167 76193d7c 2003-09-30 devnull 		return -1;
168 76193d7c 2003-09-30 devnull 	}
169 76193d7c 2003-09-30 devnull 	d->bufp = d->buf;
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 int
174 76193d7c 2003-09-30 devnull flushimage(Display *d, int visible)
175 76193d7c 2003-09-30 devnull {
176 76193d7c 2003-09-30 devnull 	if(visible){
177 76193d7c 2003-09-30 devnull 		*d->bufp++ = 'v';	/* five bytes always reserved for this */
178 76193d7c 2003-09-30 devnull 		if(d->_isnewdisplay){
179 76193d7c 2003-09-30 devnull 			BPLONG(d->bufp, d->screenimage->id);
180 76193d7c 2003-09-30 devnull 			d->bufp += 4;
181 76193d7c 2003-09-30 devnull 		}
182 76193d7c 2003-09-30 devnull 	}
183 76193d7c 2003-09-30 devnull 	return doflush(d);
184 76193d7c 2003-09-30 devnull }
185 76193d7c 2003-09-30 devnull 
186 76193d7c 2003-09-30 devnull uchar*
187 76193d7c 2003-09-30 devnull bufimage(Display *d, int n)
188 76193d7c 2003-09-30 devnull {
189 76193d7c 2003-09-30 devnull 	uchar *p;
190 76193d7c 2003-09-30 devnull 
191 76193d7c 2003-09-30 devnull 	if(n<0 || n>d->bufsize){
192 76193d7c 2003-09-30 devnull abort();
193 76193d7c 2003-09-30 devnull 		werrstr("bad count in bufimage");
194 76193d7c 2003-09-30 devnull 		return 0;
195 76193d7c 2003-09-30 devnull 	}
196 76193d7c 2003-09-30 devnull 	if(d->bufp+n > d->buf+d->bufsize)
197 76193d7c 2003-09-30 devnull 		if(doflush(d) < 0)
198 76193d7c 2003-09-30 devnull 			return 0;
199 76193d7c 2003-09-30 devnull 	p = d->bufp;
200 76193d7c 2003-09-30 devnull 	d->bufp += n;
201 76193d7c 2003-09-30 devnull 	return p;
202 76193d7c 2003-09-30 devnull }
203 76193d7c 2003-09-30 devnull