ref: 951b9aa55bdcc5a930dc0648aaf233e76b093086
dir: /sys/src/9/omap/screen.c/
#include "u.h" #include "../port/lib.h" #include "mem.h" #include "dat.h" #include "fns.h" #include "io.h" #define Image IMAGE #include <draw.h> #include <memdraw.h> #include "screen.h" enum { /* display controller registers */ RDrev = 0x400, RDsysconf = 0x410, RDsysstat = 0x414, RDirqstat = 0x418, RDirqen = 0x41c, RDcontrol = 0x440, DClcdon = 1<<0, DClcdgo = 1<<5, DClcdbits = 3<<8, DClcdbits24 = 3<<8, RDconfig = 0x444, RDdefcolor = 0x44c, RDtranscolor = 0x454, RDlinestat = 0x45c, RDlineintr = 0x460, RDtimeh = 0x464, RDtimev = 0x468, RDsize = 0x47c, /* display controller graphics layer registers */ RDgfxba = 0x480, RDgfxpos = 0x488, RDgfxsize = 0x48c, RDgfxattr = 0x4a0, RDgfxrowinc = 0x4ac, RDgfxpixelinc = 0x4b0, }; enum { Tab = 4, Scroll = 8, }; typedef struct Ctlr Ctlr; struct Ctlr { Lock; u32int *io; Memdata scrdata; Memimage *scrimg; Memsubfont *scrfont; Rectangle win; Point font; Point pos; }; static Ctlr ctlr = { .io = (u32int*) PHYSDSS, }; #define csr32r(c, r) ((c)->io[(r)/4]) #define csr32w(c, r, w) ((c)->io[(r)/4] = (w)) static void myscreenputs(char *s, int n); static int screendatainit(Ctlr *ctlr, uint x, uint y) { Rectangle r; if(memimageinit() < 0) return -1; r = Rect(0, 0, x, y); ctlr->scrdata.ref = 1; ctlr->scrdata.bdata = ucalloc(r.max.x * r.max.y * 2); if(!ctlr->scrdata.bdata) return -1; ctlr->scrimg = allocmemimaged(r, RGB16, &ctlr->scrdata); if(!ctlr->scrimg) return -1; ctlr->scrfont = getmemdefont(); return 0; } static Memimage* screenmkcolor(Memimage *scr, ulong color) { Memimage *i; i = allocmemimage(Rect(0, 0, 1, 1), scr->chan); if(i) { i->flags |= Frepl; i->clipr = scr->r; memfillcolor(i, color); } return i; } static void screenwin(Ctlr *ctlr) { Rectangle r; Memimage *i; Point p; int h; ctlr->font.y = h = ctlr->scrfont->height; ctlr->font.x = ctlr->scrfont->info[' '].width; r = ctlr->scrimg->r; if(i = screenmkcolor(ctlr->scrimg, 0x0D686BFF)) { memimagedraw(ctlr->scrimg, r, i, ZP, memopaque, ZP, S); freememimage(i); } r = insetrect(r, 16); memimagedraw(ctlr->scrimg, r, memblack, ZP, memopaque, ZP, S); r = insetrect(r, 4); memimagedraw(ctlr->scrimg, r, memwhite, ZP, memopaque, ZP, S); if(i = screenmkcolor(ctlr->scrimg, 0xaaaaaaff)) { memimagedraw(ctlr->scrimg, Rpt(r.min, Pt(r.max.x, r.min.y+h+12)), i, ZP, memopaque, ZP, S); freememimage(i); r = insetrect(r, 6); p = r.min; memimagestring(ctlr->scrimg, p, memblack, ZP, ctlr->scrfont, " Plan 9 Console "); } ctlr->win = Rpt(addpt(r.min, Pt(0, h + 6)), subpt(r.max, Pt(6, 6))); ctlr->pos = ctlr->win.min; screenputs = myscreenputs; } void screeninit(void) { Ctlr *c; uint x, y; c = &ctlr; if((csr32r(c, RDconfig) & DClcdbits) != DClcdbits24) return; x = ((csr32r(c, RDgfxsize) & 0x0000ffff) >> 0) + 1;; y = ((csr32r(c, RDgfxsize) & 0xffff0000) >> 16) + 1; if(screendatainit(c, x, y) < 0) return; screenwin(c); screenputs(kmesg.buf, kmesg.n); csr32w(c, RDgfxba, (uintptr) c->scrdata.bdata); csr32w(c, RDcontrol, csr32r(c, RDcontrol) | DClcdgo | DClcdon); conf.monitor = 1; } static void screenscroll(Ctlr *ctlr) { int o, h; Point p; Rectangle r; h = ctlr->font.y; o = Scroll * h; r = Rpt(ctlr->win.min, Pt(ctlr->win.max.x, ctlr->win.max.y - o)); p = Pt(ctlr->win.min.x, ctlr->win.min.y + o); memimagedraw(ctlr->scrimg, r, ctlr->scrimg, p, nil, p, S); flushmemscreen(r); r = Rpt(Pt(ctlr->win.min.x, ctlr->win.max.y - o), ctlr->win.max); memimagedraw(ctlr->scrimg, r, memwhite, ZP, nil, ZP, S); flushmemscreen(r); ctlr->pos.y -= o; } static void screenputc(Ctlr *ctlr, char *buf) { Point p; Rectangle r; uint chr; int w, h; static int *xp; static int xbuf[256]; w = ctlr->font.x; h = ctlr->font.y; if(xp < xbuf || xp >= &xbuf[nelem(xbuf)]) xp = xbuf; switch(buf[0]) { case '\n': if(ctlr->pos.y + h >= ctlr->win.max.y) screenscroll(ctlr); ctlr->pos.y += h; screenputc(ctlr, "\r"); break; case '\r': xp = xbuf; ctlr->pos.x = ctlr->win.min.x; break; case '\t': if(ctlr->pos.x >= ctlr->win.max.x - 4 * w) screenputc(ctlr, "\n"); chr = (ctlr->pos.x - ctlr->win.min.x) / w; chr = Tab - chr % Tab; *xp++ = ctlr->pos.x; r = Rect(ctlr->pos.x, ctlr->pos.y, ctlr->pos.x + chr * w, ctlr->pos.y + h); memimagedraw(ctlr->scrimg, r, memwhite, ZP, memopaque, ZP, S); flushmemscreen(r); ctlr->pos.x += chr * w; break; case '\b': if(xp <= xbuf) break; xp--; r = Rect(*xp, ctlr->pos.y, ctlr->pos.x, ctlr->pos.y + h); memimagedraw(ctlr->scrimg, r, memwhite, ZP, memopaque, ZP, S); ctlr->pos.x = *xp; break; case '\0': break; default: p = memsubfontwidth(ctlr->scrfont, buf); w = p.x; if(ctlr->pos.x >= ctlr->win.max.x - w) screenputc(ctlr, "\n"); *xp++ = ctlr->pos.x; r = Rect(ctlr->pos.x, ctlr->pos.y, ctlr->pos.x + w, ctlr->pos.y + h); memimagedraw(ctlr->scrimg, r, memwhite, ZP, memopaque, ZP, S); memimagestring(ctlr->scrimg, ctlr->pos, memblack, ZP, ctlr->scrfont, buf); ctlr->pos.x += w; break; } } static void myscreenputs(char *s, int n) { Ctlr *c; Rune r; int i; char buf[UTFmax]; c = &ctlr; if(!c->scrimg) return; if(!islo()) { /* don't deadlock trying to print in an interrupt */ if(!canlock(c)) return; } else { lock(c); } while(n > 0) { i = chartorune(&r, s); if(i == 0) { s++; n--; continue; } memmove(buf, s, i); buf[i] = 0; s += i; n -= i; screenputc(c, buf); } unlock(c); } Memdata* attachscreen(Rectangle *r, ulong *chan, int *d, int *width, int *softscreen) { Ctlr *c; c = &ctlr; if(!c->scrimg) return nil; *r = c->scrimg->r; *d = c->scrimg->depth; *chan = c->scrimg->chan; *width = c->scrimg->width; *softscreen = 1; c->scrdata.ref++; return &c->scrdata; } void getcolor(ulong, ulong *, ulong *, ulong *) { } int setcolor(ulong, ulong, ulong, ulong) { return 0; } void flushmemscreen(Rectangle) { } void mouseresize(void) { }