/* use button 3 for a proper function to the application, that is not for plumber
*  as default control(2) supposes.
*  codes are mostly from /sys/src/libcontrol/textbutton.c
*/
#include <u.h>
#include <libc.h>
#include <draw.h>
#include <thread.h>
#include <mouse.h>
#include <keyboard.h>
#include <control.h>

typedef struct Textbutton3 Textbutton3;

struct Textbutton3
{
       Control;
       CFont   *font;
       CImage  *image;
       CImage  *mask;
       CImage  *light;
       CImage  *bordercolor;
       CImage  *textcolor;
       CImage  *pressedtextcolor;
       int             pressed;
       int             lastbut;
       int             lastshow;
       char            **line;
       int             nline;
       int             align;
       int             border;
       int             left;
       int             middle;
       int             right;
       int             toggle;
       int             gettextflg;
};

enum{
       EAlign,
       EBorder,
       EBordercolor,
       EFocus,
       EFont,
       EFormat,
       EHide,
       EImage,
       ELight,
       EMask,
       EPressedtextcolor,
       ERect,
       EReveal,
       EShow,
       ESize,
       EText,
       ETextcolor,
       EEnable,
       EDisable,
       EToggle,
       EGettext,
       EValue,
};

static char *cmds[] = {
       [EAlign] =                      "align",
       [EBorder] =             "border",
       [EBordercolor] =        "bordercolor",
       [EFocus] =              "focus",
       [EFont] =                       "font",
       [EFormat] =             "format",
       [EHide] =                       "hide",
       [EImage] =              "image",
       [ELight] =                      "light",
       [EMask] =                       "mask",
       [EPressedtextcolor] ="pressedtextcolor",
       [ERect] =                       "rect",
       [EReveal] =             "reveal",
       [EShow] =                       "show",
       [ESize] =                       "size",
       [EText] =                       "text",
       [ETextcolor] =          "textcolor",
       [EEnable] =             "enable",
       [EDisable] =            "disable",
       [EToggle] =             "toggle",
       [EGettext] =            "gettext",
       [EValue] =                      "value",
       nil
};

static void     textbutton3show(Textbutton3 *);

static void
textbutton3mouse(Control *c, Mouse *m)
{
       Textbutton3 *t;

       t = (Textbutton3 *)c;
       if(t->left == 1) {
               if((m->buttons&1) == 1 && (t->lastbut&1) == 0){
                       t->pressed ^= 1;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 1;
               }else if((m->buttons&1) == 0 && (t->lastbut&1) == 1){
                       if(t->gettextflg == 0)
                               chanprint(t->event, t->format, t->name, t->pressed, m->xy.x, m->xy.y);
                       else
                               chanprint(t->event, "%q: value %q", t->name, t->line[0]);
                       t->pressed ^= 1;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 1;
               }
       }
       if(t->middle == 1) {
               if((m->buttons&2) == 2 && (t->lastbut&2) == 0){
                       t->pressed ^= 2;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 2;
               }else if((m->buttons&2) == 0 && (t->lastbut&2) == 2){
                       if(t->gettextflg == 0)
                               chanprint(t->event, t->format, t->name, t->pressed, m->xy.x, m->xy.y);
                       else
                               chanprint(t->event, "%q: value %q", t->name, t->line[0]);
                       t->pressed ^= 2;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 2;
               }
       }
       if(t->right == 1) {
               if((m->buttons&4) == 4 && (t->lastbut&4) == 0){
                       t->pressed ^= 4;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 4;
               }else if((m->buttons&4) == 0 && (t->lastbut&4) == 4){
                       if(t->gettextflg == 0)
                               chanprint(t->event, t->format, t->name, t->pressed, m->xy.x, m->xy.y);
                       else
                               chanprint(t->event, "%q: value %q", t->name, t->line[0]);
                       t->pressed ^= 4;
                       textbutton3show(t);
                       t->lastbut = m->buttons & 4;
               }
       }
}

static void
textbutton3free(Control *c)
{
       int i;
       Textbutton3 *t;

       t = (Textbutton3*)c;
       _putctlfont(t->font);
       _putctlimage(t->image);
       _putctlimage(t->light);
       _putctlimage(t->mask);
       _putctlimage(t->textcolor);
       _putctlimage(t->bordercolor);
       _putctlimage(t->pressedtextcolor);
       for(i=0; i<t->nline; i++)
               free(t->line[i]);
       free(t->line);
}

static void
textbutton3show(Textbutton3 *t)
{
       Rectangle r, clipr;
       int i, dx, dy, w;
       Font *f;
       Point p, q;
       Image *im;

       if(t->hidden || t->lastshow == t->pressed)
               return;
       f = t->font->font;
       draw(t->screen, t->rect, t->image->image, nil, t->image->image->r.min);
       if(t->pressed || t->toggle)
               draw(t->screen, t->rect, t->light->image, t->mask->image, t->mask->image->r.min);
       if(t->border > 0)
               border(t->screen, t->rect, t->border, t->bordercolor->image, ZP);
       /* text goes here */
       dx = 0;
       for(i=0; i<t->nline; i++){
               w = stringwidth(f, t->line[i]);         /*****/
               if(dx < w)
                       dx = w;
       }
       dy = t->nline*f->height;
       clipr = insetrect(t->rect, t->border);
       p = _ctlalignpoint(clipr, dx, dy, t->align);
       im = t->textcolor->image;
       if(t->pressed)
               im = t->pressedtextcolor->image;
       for(i=0; i<t->nline; i++){
               r.min = p;
               r.max.x = p.x+dx;
               r.max.y = p.y+f->height;
               q = _ctlalignpoint(r, stringwidth(f, t->line[i]), f->height, t->align%3);
               _string(t->screen, q, im,
                       ZP, f, t->line[i], nil, strlen(t->line[i]),
                       clipr, nil, ZP, SoverD);
               p.y += f->height;
       }
       t->lastshow = t->pressed;
       flushimage(display, 1);
}

static void
textbutton3ctl(Control *c, CParse *cp)
{
       int cmd, i;
       Rectangle r;
       Textbutton3 *t;

       t = (Textbutton3*)c;
       cmd = _ctllookup(cp->args[0], cmds, nelem(cmds));
       switch(cmd){
       default:
               ctlerror("%q: unrecognized message '%s'", t->name, cp->str);
               break;
       case EAlign:
               _ctlargcount(t, cp, 2);
               t->align = _ctlalignment(cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EBorder:
               _ctlargcount(t, cp, 2);
               t->border = cp->iargs[1];
               t->lastshow = -1;       /* force redraw */
               break;
       case EBordercolor:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->bordercolor, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EFocus:
               break;
       case EFont:
               _ctlargcount(t, cp, 2);
               _setctlfont(t, &t->font, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EFormat:
               _ctlargcount(t, cp, 2);
               t->format = ctlstrdup(cp->args[1]);
               break;
       case EHide:
               _ctlargcount(t, cp, 1);
               t->hidden = 1;
               break;
       case EImage:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->image, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case ELight:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->light, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EMask:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->mask, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EPressedtextcolor:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->pressedtextcolor, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case ERect:
               _ctlargcount(t, cp, 5);
               r.min.x = cp->iargs[1];
               r.min.y = cp->iargs[2];
               r.max.x = cp->iargs[3];
               r.max.y = cp->iargs[4];
               if(Dx(r)<=0 || Dy(r)<=0)
                       ctlerror("%q: bad rectangle: %s", t->name, cp->str);
               t->rect = r;
               t->lastshow = -1;       /* force redraw */
               break;
       case EReveal:
               _ctlargcount(t, cp, 1);
               t->hidden = 0;
               t->lastshow = -1;       /* force redraw */
               textbutton3show(t);
               break;
       case EShow:
               _ctlargcount(t, cp, 1);
               t->lastshow = -1;       /* force redraw */
               textbutton3show(t);
               break;
       case ESize:
               if (cp->nargs == 3)
                       r.max = Pt(0x7fffffff, 0x7fffffff);
               else{
                       _ctlargcount(t, cp, 5);
                       r.max.x = cp->iargs[3];
                       r.max.y = cp->iargs[4];
               }
               r.min.x = cp->iargs[1];
               r.min.y = cp->iargs[2];
               if(r.min.x<=0 || r.min.y<=0 || r.max.x<=0 || r.max.y<=0 || r.max.x < r.min.x || r.max.y < r.min.y)
                       ctlerror("%q: bad sizes: %s", t->name, cp->str);
               t->size.min = r.min;
               t->size.max = r.max;
               break;
       case EText:
               /* free existing text */
               for(i=0; i<t->nline; i++)
                       free(t->line[i]);
               t->nline = cp->nargs-1;
               t->line = ctlrealloc(t->line, t->nline*sizeof(char*));
               for(i=0; i<t->nline; i++)
                       t->line[i] = ctlstrdup(cp->args[i+1]);
               t->lastshow = -1;       /* force redraw */
               textbutton3show(t);
               break;
       case ETextcolor:
               _ctlargcount(t, cp, 2);
               _setctlimage(t, &t->textcolor, cp->args[1]);
               t->lastshow = -1;       /* force redraw */
               break;
       case EEnable:
               _ctlargcount(t, cp, 2);
               if(strcmp(cp->args[1], "left") == 0)
                               t->left = 1;
               else if(strcmp(cp->args[1], "middle") == 0)
                               t->middle = 1;
               else if(strcmp(cp->args[1], "right") == 0)
                               t->right = 1;
               break;
       case EDisable:
               _ctlargcount(t, cp, 2);
               if(strcmp(cp->args[1], "left") == 0)
                       t->left = 0;
               else if(strcmp(cp->args[1], "middle") == 0)
                       t->middle = 0;
               else if(strcmp(cp->args[1], "right") == 0)
                       t->right = 0;
               break;
       case EToggle:
               _ctlargcount(t, cp, 2);
               if(strcmp(cp->args[1], "on") == 0)
                       t->toggle = 1;
               else if(strcmp(cp->args[1], "off") == 0)
                       t->toggle = 0;
               t->lastshow = -1;       /* force redraw */
               break;
       case EGettext:
               _ctlargcount(t, cp, 2);
               if(strcmp(cp->args[1], "on") == 0)
                       t->gettextflg = 1;
               else if(strcmp(cp->args[1], "off") == 0)
                       t->gettextflg = 0;
               break;
       case EValue:
               _ctlargcount(t, cp, 2);
               if((cp->iargs[1]!=0) != t->pressed){
                       t->pressed ^= 1;
                       textbutton3show(t);
               }
               break;
       }
}

Control*
createtextbutton3(Controlset *cs, char *name)
{
       Textbutton3 *t;

       t = (Textbutton3 *)_createctl(cs, "textbutton3", sizeof(Textbutton3), name);
       t->line = ctlmalloc(sizeof(char*));
       t->nline = 0;
       t->image = _getctlimage("white");
       t->light = _getctlimage("yellow");
       t->mask = _getctlimage("opaque");
       t->bordercolor = _getctlimage("black");
       t->textcolor = _getctlimage("black");
       t->pressedtextcolor = _getctlimage("black");
       t->font = _getctlfont("font");
       t->format = ctlstrdup("%q: value %d %d %d");
       t->lastshow = -1;
       t->mouse = textbutton3mouse;
       t->ctl = textbutton3ctl;
       t->exit = textbutton3free;
       t->left = 1;
       t->middle = 1;
       t->right = 1;
       t->toggle = 0;
       t->gettextflg = 0;
       return (Control *)t;
}

You are viewing proxied material from sdf.org. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.