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