xfnw
856abd2f7d
git-subtree-dir: sys/src/cmd/gopher git-subtree-split: 3680728b631ed65201b397f4ae3e5d1b03be42f9
97 lines
2.4 KiB
C
97 lines
2.4 KiB
C
#include <u.h>
|
|
#include <libc.h>
|
|
#include <draw.h>
|
|
#include <event.h>
|
|
#include <panel.h>
|
|
#include "pldefs.h"
|
|
typedef struct Slider Slider;
|
|
struct Slider{
|
|
int dir; /* HORIZ or VERT */
|
|
int val; /* setting, in screen coordinates */
|
|
Point minsize;
|
|
void (*hit)(Panel *, int, int, int); /* call back to user when slider changes */
|
|
int buttons;
|
|
};
|
|
void pl_drawslider(Panel *p){
|
|
Rectangle r;
|
|
Slider *sp;
|
|
sp=p->data;
|
|
r=pl_box(p->b, p->r, UP);
|
|
switch(sp->dir){
|
|
case HORIZ: pl_sliderupd(p->b, r, sp->dir, 0, sp->val); break;
|
|
case VERT: pl_sliderupd(p->b, r, sp->dir, r.max.y-sp->val, r.max.y); break;
|
|
}
|
|
}
|
|
int pl_hitslider(Panel *p, Mouse *m){
|
|
int oldstate, oldval, len;
|
|
Point ul, size;
|
|
Slider *sp;
|
|
sp=p->data;
|
|
ul=p->r.min;
|
|
size=subpt(p->r.max, p->r.min);
|
|
pl_interior(p->state, &ul, &size);
|
|
oldstate=p->state;
|
|
oldval=sp->val;
|
|
SET(len);
|
|
if(m->buttons&OUT)
|
|
p->state=UP;
|
|
else if(m->buttons&7){
|
|
p->state=DOWN;
|
|
sp->buttons=m->buttons;
|
|
if(sp->dir==HORIZ){
|
|
sp->val=m->xy.x-ul.x;
|
|
len=size.x;
|
|
}
|
|
else{
|
|
sp->val=ul.y+size.y-m->xy.y;
|
|
len=size.y;
|
|
}
|
|
if(sp->val<0) sp->val=0;
|
|
else if(sp->val>len) sp->val=len;
|
|
}
|
|
else /* mouse inside, but no buttons down */
|
|
p->state=UP;
|
|
if(oldval!=sp->val || oldstate!=p->state) pldraw(p, p->b);
|
|
if(oldval!=sp->val && sp->hit) sp->hit(p, sp->buttons, sp->val, len);
|
|
return 0;
|
|
}
|
|
void pl_typeslider(Panel *p, Rune c){
|
|
USED(p, c);
|
|
}
|
|
Point pl_getsizeslider(Panel *p, Point children){
|
|
USED(children);
|
|
return pl_boxsize(((Slider *)p->data)->minsize, p->state);
|
|
}
|
|
void pl_childspaceslider(Panel *g, Point *ul, Point *size){
|
|
USED(g, ul, size);
|
|
}
|
|
void plinitslider(Panel *v, int flags, Point size, void (*hit)(Panel *, int, int, int)){
|
|
Slider *sp;
|
|
sp=v->data;
|
|
v->r=Rect(0,0,size.x,size.y);
|
|
v->flags=flags|LEAF;
|
|
v->state=UP;
|
|
v->draw=pl_drawslider;
|
|
v->hit=pl_hitslider;
|
|
v->type=pl_typeslider;
|
|
v->getsize=pl_getsizeslider;
|
|
v->childspace=pl_childspaceslider;
|
|
sp->minsize=size;
|
|
sp->dir=size.x>size.y?HORIZ:VERT;
|
|
sp->hit=hit;
|
|
v->kind="slider";
|
|
}
|
|
Panel *plslider(Panel *parent, int flags, Point size, void (*hit)(Panel *, int, int, int)){
|
|
Panel *p;
|
|
p=pl_newpanel(parent, sizeof(Slider));
|
|
plinitslider(p, flags, size, hit);
|
|
return p;
|
|
}
|
|
void plsetslider(Panel *p, int value, int range){
|
|
Slider *sp;
|
|
sp=p->data;
|
|
if(value<0) value=0;
|
|
else if(value>range) value=range;
|
|
if(sp->dir==HORIZ) sp->val=value*(p->r.max.x-p->r.min.x)/range;
|
|
else sp->val=value*(p->r.max.y-p->r.min.y)/range;
|
|
}
|