ref: 73862cb9cf6058273c3ce9c025bde55433306265
dir: /sys/src/cmd/abaco/scrl.c/
#include <u.h> #include <libc.h> #include <draw.h> #include <memdraw.h> #include <thread.h> #include <cursor.h> #include <mouse.h> #include <keyboard.h> #include <frame.h> #include <plumb.h> #include <html.h> #include "dat.h" #include "fns.h" static Image *vscrtmp; static Image *hscrtmp; void scrlresize(void) { freeimage(vscrtmp); freeimage(hscrtmp); vscrtmp = eallocimage(display, Rect(0, 0, 32, screen->r.max.y), screen->chan, 0, DNofill); hscrtmp = eallocimage(display, Rect(0, 0, screen->r.max.x, 32), screen->chan, 0, DNofill); } static Rectangle scrpos(Rectangle r, uint p0, uint p1, uint tot) { Rectangle q; int h; q = r; h = q.max.y-q.min.y; if(tot == 0) return q; if(tot > 1024*1024){ tot>>=10; p0>>=10; p1>>=10; } if(p0 > 0) q.min.y += h*p0/tot; if(p1 < tot) q.max.y -= h*(tot-p1)/tot; if(q.max.y < q.min.y+2){ if(q.min.y+2 <= r.max.y) q.max.y = q.min.y+2; else q.min.y = q.max.y-2; } return q; } void textscrdraw(Text *t) { Rectangle r, r1, r2; Image *b; if(vscrtmp == nil) scrlresize(); r = t->scrollr; b = vscrtmp; r1 = r; r1.min.x = 0; r1.max.x = Dx(r); r2 = scrpos(r1, t->org, t->org+t->nchars, t->rs.nr); if(!eqrect(r2, t->lastsr)){ t->lastsr = r2; draw(b, r1, t->cols[BORD], nil, ZP); draw(b, r2, t->cols[BACK], nil, ZP); r2.min.x = r2.max.x-1; draw(b, r2, t->cols[BORD], nil, ZP); draw(t->b, r, b, nil, Pt(0, r1.min.y)); /*flushimage(display, 1);/*BUG?*/ } } void scrsleep(uint dt) { Timer *timer; static Alt alts[3]; timer = timerstart(dt); alts[0].c = timer->c; alts[0].v = nil; alts[0].op = CHANRCV; alts[1].c = mousectl->c; alts[1].v = &mousectl->Mouse; alts[1].op = CHANRCV; alts[2].op = CHANEND; for(;;) switch(alt(alts)){ case 0: timerstop(timer); return; case 1: timercancel(timer); return; } } void textscroll(Text *t, int but) { uint p0, oldp0; Rectangle s; int y, my, h, first; s = insetrect(t->scrollr, 1); h = s.max.y-s.min.y; oldp0 = ~0; first = TRUE; do{ flushimage(display, 1); my = mouse->xy.y; if(my < s.min.y) my = s.min.y; if(my >= s.max.y) my = s.max.y; if(but == 2){ y = my; p0 = (vlong)t->rs.nr*(y-s.min.y)/h; if(p0 >= t->q1) p0 = textbacknl(t, p0, 2); if(oldp0 != p0) textsetorigin(t, p0, FALSE); oldp0 = p0; readmouse(mousectl); continue; } if(but == 1) p0 = textbacknl(t, t->org, (my-s.min.y)/t->font->height); else p0 = t->org+frcharofpt(t, Pt(s.max.x, my)); if(oldp0 != p0) textsetorigin(t, p0, TRUE); oldp0 = p0; /* debounce */ if(first){ flushimage(display, 1); sleep(200); nbrecv(mousectl->c, &mousectl->Mouse); first = FALSE; } scrsleep(80); }while(mouse->buttons & (1<<(but-1))); while(mouse->buttons) readmouse(mousectl); } enum { Scrbord = 1, }; void pagescrldraw(Page *p) { Rectangle r1; int t, d, l, h; if(vscrtmp == nil) scrlresize(); r1 = Rect(0,0,Dx(p->hscrollr), Dy(p->hscrollr)); d = Dx(r1); t = Dx(p->lay->r); l = muldiv(p->pos.x, d, t); h = muldiv(p->pos.x+d, d, t); draw(hscrtmp, r1, tagcols[HIGH], nil, ZP); r1.max.x = r1.min.x+h; r1.min.x += l; r1.min.y += Scrbord; r1.max.y -= Scrbord; draw(hscrtmp, r1, tagcols[BACK], nil, ZP); r1 = Rect(0,0,Dx(p->vscrollr), Dy(p->vscrollr)); d = Dy(r1); t = Dy(p->lay->r); l = muldiv(p->pos.y, d, t); h = muldiv(p->pos.y+d, d, t); draw(vscrtmp, r1, tagcols[HIGH], nil, ZP); r1.max.y = r1.min.y+h; r1.min.y += l; r1.max.x -= Scrbord; r1.min.x += Scrbord; draw(vscrtmp, r1, tagcols[BACK], nil, ZP); draw(screen, p->vscrollr, vscrtmp, nil, vscrtmp->r.min); draw(screen, p->hscrollr, hscrtmp, nil, hscrtmp->r.min); } void pagescroll(Page *p, int but, int horizontal) { uint oldp0, p0; Rectangle s; int m, om, first, d, size; int smin, smax, ss, *pos; if(horizontal){ s = insetrect(p->hscrollr, 1); ss = s.max.x - s.min.x; d = Dx(p->r); size = Dx(p->lay->r); p0 = p->pos.x; pos = &p->pos.x; smin = s.min.x; smax = s.max.x; om = mouse->xy.x; }else{ s = insetrect(p->vscrollr, 1); ss = s.max.y-s.min.y; d = Dy(p->r); size = Dy(p->lay->r); p0 = p->pos.y; pos = &p->pos.y; smin = s.min.y; smax = s.max.y; om = mouse->xy.y; } oldp0 = ~0; first = TRUE; do{ flushimage(display, 1); if(horizontal) m = mouse->xy.x; else m = mouse->xy.y; if(but != 2){ if(m > om) m += (m-om)*Panspeed; else if(m < om) m -= (om-m)*Panspeed; } if(m < smin) m = smin; if(m > smax) m = smax; om = m; if(but == 2){ p0 = muldiv(m-smin, size, ss); p0 = max(p0, 0); p0 = min(p0,size-d); if(oldp0 != p0){ *pos = p0; pageredraw(p); } oldp0 = p0; readmouse(mousectl); continue; } if(but == 1) p0 -= (d/2); else p0 += d/2; p0 = min(p0, size-d); p0 = max(p0, 0); if(oldp0 != p0){ *pos = p0; pageredraw(p); } oldp0 = p0; /* debounce */ if(first){ flushimage(display, 1); sleep(200); nbrecv(mousectl->c, &mousectl->Mouse); first = FALSE; } scrsleep(80); }while(mouse->buttons & (1<<(but-1))); while(mouse->buttons) readmouse(mousectl); } int pagescrollxy(Page *p, int x, int y) { int scrled; scrled = FALSE; if(x != 0){ p->pos.x += x; p->pos.x = max(p->pos.x, 0); p->pos.x = min(p->pos.x, Dx(p->lay->r)-Dx(p->r)); scrled =TRUE; } if(y != 0){ p->pos.y += y; p->pos.y = max(p->pos.y, 0); p->pos.y = min(p->pos.y, Dy(p->lay->r)-Dy(p->r)); scrled =TRUE; } return scrled; }