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 76193d7c 2003-09-30 devnull int debuglockdisplay = 0;
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 76193d7c 2003-09-30 devnull display->image = display->screenimage;
38 76193d7c 2003-09-30 devnull screen = display->screenimage;
41 76193d7c 2003-09-30 devnull * Set up default font
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");
48 76193d7c 2003-09-30 devnull closedisplay(display);
49 76193d7c 2003-09-30 devnull display = nil;
50 76193d7c 2003-09-30 devnull return -1;
52 76193d7c 2003-09-30 devnull if(fontname == nil)
53 76193d7c 2003-09-30 devnull fontname = getenv("font"); /* leak */
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.
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;
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;
75 76193d7c 2003-09-30 devnull display->defaultfont = font;
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;
83 76193d7c 2003-09-30 devnull display->opaque = display->white;
84 76193d7c 2003-09-30 devnull display->transparent = display->black;
85 76193d7c 2003-09-30 devnull atexit(drawshutdown);
86 76193d7c 2003-09-30 devnull return 1;
90 76193d7c 2003-09-30 devnull * Call with d unlocked.
91 76193d7c 2003-09-30 devnull * Note that disp->defaultfont and defaultsubfont are not freed here.
94 76193d7c 2003-09-30 devnull closedisplay(Display *disp)
97 76193d7c 2003-09-30 devnull char buf[128];
99 76193d7c 2003-09-30 devnull if(disp == nil)
101 76193d7c 2003-09-30 devnull if(disp == display)
102 76193d7c 2003-09-30 devnull display = nil;
103 76193d7c 2003-09-30 devnull if(disp->oldlabel[0]){
104 76193d7c 2003-09-30 devnull snprint(buf, sizeof buf, "%s/label", disp->windir);
105 76193d7c 2003-09-30 devnull fd = open(buf, OWRITE);
106 76193d7c 2003-09-30 devnull if(fd >= 0){
107 76193d7c 2003-09-30 devnull write(fd, disp->oldlabel, strlen(disp->oldlabel));
108 76193d7c 2003-09-30 devnull close(fd);
112 76193d7c 2003-09-30 devnull free(disp->devdir);
113 76193d7c 2003-09-30 devnull free(disp->windir);
114 76193d7c 2003-09-30 devnull freeimage(disp->white);
115 76193d7c 2003-09-30 devnull freeimage(disp->black);
116 76193d7c 2003-09-30 devnull qunlock(&disp->qlock);
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;