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>
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;
10 76193d7c 2003-09-30 devnull static char deffontname[] = "*default*";
11 76193d7c 2003-09-30 devnull Screen *_screen;
13 b20f06ab 2004-12-26 devnull int debuglockdisplay = 1;
15 76193d7c 2003-09-30 devnull static void
16 76193d7c 2003-09-30 devnull drawshutdown(void)
18 76193d7c 2003-09-30 devnull Display *d;
20 76193d7c 2003-09-30 devnull d = display;
22 76193d7c 2003-09-30 devnull display = nil;
23 76193d7c 2003-09-30 devnull closedisplay(d);
28 76193d7c 2003-09-30 devnull initdraw(void (*error)(Display*, char*), char *fontname, char *label)
30 76193d7c 2003-09-30 devnull Subfont *df;
31 76193d7c 2003-09-30 devnull char buf[128];
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;
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;
42 76193d7c 2003-09-30 devnull * Set up default font
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");
49 76193d7c 2003-09-30 devnull closedisplay(display);
50 76193d7c 2003-09-30 devnull display = nil;
51 76193d7c 2003-09-30 devnull return -1;
53 76193d7c 2003-09-30 devnull if(fontname == nil)
54 76193d7c 2003-09-30 devnull fontname = getenv("font"); /* leak */
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.
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;
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;
76 76193d7c 2003-09-30 devnull display->defaultfont = font;
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;
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;
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.
95 76193d7c 2003-09-30 devnull closedisplay(Display *disp)
98 76193d7c 2003-09-30 devnull char buf[128];
100 76193d7c 2003-09-30 devnull if(disp == nil)
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);
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);
121 76193d7c 2003-09-30 devnull lockdisplay(Display *disp)
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);
130 76193d7c 2003-09-30 devnull qlock(&disp->qlock);
134 76193d7c 2003-09-30 devnull unlockdisplay(Display *disp)
136 76193d7c 2003-09-30 devnull qunlock(&disp->qlock);
140 76193d7c 2003-09-30 devnull drawerror(Display *d, char *s)
142 76193d7c 2003-09-30 devnull char err[ERRMAX];
144 76193d7c 2003-09-30 devnull if(d->error)
145 76193d7c 2003-09-30 devnull d->error(d, s);
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);
155 76193d7c 2003-09-30 devnull doflush(Display *d)
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;
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;
169 76193d7c 2003-09-30 devnull d->bufp = d->buf;
170 76193d7c 2003-09-30 devnull return 1;
174 76193d7c 2003-09-30 devnull flushimage(Display *d, int visible)
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;
183 76193d7c 2003-09-30 devnull return doflush(d);
187 76193d7c 2003-09-30 devnull bufimage(Display *d, int n)
189 76193d7c 2003-09-30 devnull uchar *p;
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;
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;