ref: 2d221e61e3820a007ff2204adb73ad3ab27010c6
dir: /sys/src/cmd/vnc/screen.c/
#include <u.h> #include <libc.h> #include "compat.h" #include "kbd.h" #include "error.h" #define Image IMAGE #include <draw.h> #include <memdraw.h> #include <cursor.h> #include "screen.h" enum { CURSORDIM = 16 }; Memimage *gscreen; Point ZP; int cursorver; Point cursorpos; static Memimage *back; static Memimage *conscol; static Memimage *curscol; static Point curpos; static Memsubfont *memdefont; static Rectangle flushr; static Rectangle window; static int h; static int w; static Rectangle cursorr; static Point offscreen; static uchar cursset[CURSORDIM*CURSORDIM/8]; static uchar cursclr[CURSORDIM*CURSORDIM/8]; static int cursdrawvers = -1; static Memimage *cursorset; static Memimage *cursorclear; static Cursor screencursor; void screeninit(int x, int y, char *chanstr) { char buf[128]; Rectangle r; int chan; cursorver = 0; memimageinit(); chan = strtochan(chanstr); if(chan == 0) error("bad screen channel string"); r = Rect(0, 0, x, y); gscreen = allocmemimage(r, chan); if(gscreen == nil){ snprint(buf, sizeof buf, "can't allocate screen image: %r"); error(buf); } offscreen = Pt(x + 100, y + 100); cursorr = Rect(0, 0, CURSORDIM, CURSORDIM); cursorset = allocmemimage(cursorr, GREY8); cursorclear = allocmemimage(cursorr, GREY1); if(cursorset == nil || cursorclear == nil){ freememimage(gscreen); freememimage(cursorset); freememimage(cursorclear); gscreen = nil; cursorset = nil; cursorclear = nil; snprint(buf, sizeof buf, "can't allocate cursor images: %r"); error(buf); } /* a lot of work to get a grey color */ curscol = allocmemimage(Rect(0,0,1,1), RGBA32); curscol->flags |= Frepl; curscol->clipr = gscreen->r; memfillcolor(curscol, 0xff0000ff); screenwin(); setcursor(&arrow); } void screenwin(void) { Point p; char *greet; Memimage *grey; qlock(&drawlock); back = memwhite; conscol = memblack; memfillcolor(gscreen, 0x888844FF); memdefont = getmemdefont(); h = memdefont->height; window = insetrect(gscreen->clipr, 20); memimagedraw(gscreen, window, memblack, ZP, memopaque, ZP, S); window = insetrect(window, 4); memimagedraw(gscreen, window, memwhite, ZP, memopaque, ZP, S); /* a lot of work to get a grey color */ grey = allocmemimage(Rect(0,0,1,1), CMAP8); grey->flags |= Frepl; grey->clipr = gscreen->r; memfillcolor(grey, 0xAAAAAAFF); memimagedraw(gscreen, Rect(window.min.x, window.min.y, window.max.x, window.min.y+h+5+6), grey, ZP, nil, ZP, S); freememimage(grey); window = insetrect(window, 5); greet = " Plan 9 Console "; p = addpt(window.min, Pt(10, 0)); memimagestring(gscreen, p, conscol, ZP, memdefont, greet); window.min.y += h+6; curpos = window.min; window.max.y = window.min.y+((window.max.y-window.min.y)/h)*h; flushmemscreen(gscreen->r); qunlock(&drawlock); } uchar* attachscreen(Rectangle* r, ulong* chan, int* d, int* width, int *softscreen) { *r = gscreen->clipr; *d = gscreen->depth; *chan = gscreen->chan; *width = gscreen->width; *softscreen = 1; return gscreen->data->bdata; } void getcolor(ulong , ulong* pr, ulong* pg, ulong* pb) { *pr = 0; *pg = 0; *pb = 0; } int setcolor(ulong , ulong , ulong , ulong ) { return 0; } /* * called with cursor unlocked, drawlock locked */ void cursordraw(Memimage *dst, Rectangle r) { static uchar set[CURSORDIM*CURSORDIM], clr[CURSORDIM*CURSORDIM/8]; static int ver = -1; int i, j, n; lock(&cursor); if(ver != cursorver){ n = 0; for(i = 0; i < CURSORDIM*CURSORDIM/8; i += CURSORDIM/8){ for(j = 0; j < CURSORDIM; j++){ if(cursset[i + (j >> 3)] & (1 << (7 - (j & 7)))) set[n] = 0xaa; else set[n] = 0; n++; } } memmove(clr, cursclr, CURSORDIM*CURSORDIM/8); ver = cursorver; unlock(&cursor); loadmemimage(cursorset, cursorr, set, CURSORDIM*CURSORDIM); loadmemimage(cursorclear, cursorr, clr, CURSORDIM*CURSORDIM/8); }else unlock(&cursor); memimagedraw(dst, r, memwhite, ZP, cursorclear, ZP, SoverD); memimagedraw(dst, r, curscol, ZP, cursorset, ZP, SoverD); } /* * called with cursor locked, drawlock possibly unlocked */ Rectangle cursorrect(void) { Rectangle r; r.min.x = cursorpos.x + cursor.offset.x; r.min.y = cursorpos.y + cursor.offset.y; r.max.x = r.min.x + CURSORDIM; r.max.y = r.min.y + CURSORDIM; return r; } /* * called with cursor locked, drawlock possibly unlocked */ void setcursor(Cursor* curs) { cursorver++; memmove(cursset, curs->set, CURSORDIM*CURSORDIM/8); memmove(cursclr, curs->clr, CURSORDIM*CURSORDIM/8); } void cursoron(void) { cursorpos = mousexy(); } void cursoroff(void) { cursorpos = offscreen; } void blankscreen(int blank) { USED(blank); } static void screenflush(void) { flushmemscreen(flushr); flushr = Rect(10000, 10000, -10000, -10000); } static void addflush(Rectangle r) { if(flushr.min.x >= flushr.max.x) flushr = r; else combinerect(&flushr, r); } static void scroll(void) { int o; Point p; Rectangle r; o = 8*h; r = Rpt(window.min, Pt(window.max.x, window.max.y-o)); p = Pt(window.min.x, window.min.y+o); memimagedraw(gscreen, r, gscreen, p, nil, p, S); r = Rpt(Pt(window.min.x, window.max.y-o), window.max); memimagedraw(gscreen, r, back, ZP, nil, ZP, S); flushmemscreen(gscreen->clipr); curpos.y -= o; } static void screenputc(char *buf) { Point p; int w, pos; Rectangle r; static int *xp; static int xbuf[256]; if(xp < xbuf || xp >= &xbuf[sizeof(xbuf)]) xp = xbuf; switch(buf[0]){ case '\n': if(curpos.y+h >= window.max.y) scroll(); curpos.y += h; screenputc("\r"); break; case '\r': xp = xbuf; curpos.x = window.min.x; break; case '\t': p = memsubfontwidth(memdefont, " "); w = p.x; *xp++ = curpos.x; pos = (curpos.x-window.min.x)/w; pos = 8-(pos%8); r = Rect(curpos.x, curpos.y, curpos.x+pos*w, curpos.y + h); memimagedraw(gscreen, r, back, back->r.min, memopaque, ZP, S); addflush(r); curpos.x += pos*w; break; case '\b': if(xp <= xbuf) break; xp--; r = Rect(*xp, curpos.y, curpos.x, curpos.y + h); memimagedraw(gscreen, r, back, back->r.min, memopaque, ZP, S); addflush(r); curpos.x = *xp; break; case '\0': break; default: p = memsubfontwidth(memdefont, buf); w = p.x; if(curpos.x >= window.max.x-w) screenputc("\n"); *xp++ = curpos.x; r = Rect(curpos.x, curpos.y, curpos.x+w, curpos.y + h); memimagedraw(gscreen, r, back, back->r.min, memopaque, ZP, S); memimagestring(gscreen, curpos, conscol, ZP, memdefont, buf); addflush(r); curpos.x += w; } } void screenputs(char *s, int n) { static char rb[UTFmax+1]; static int nrb; char *e; qlock(&drawlock); e = s + n; while(s < e){ rb[nrb++] = *s++; if(nrb >= UTFmax || fullrune(rb, nrb)){ rb[nrb] = 0; screenputc(rb); nrb = 0; } } screenflush(); qunlock(&drawlock); }