#include <u.h>#include <libc.h>#include <draw.h>#include <thread.h>#include <mouse.h>#include <keyboard.h>#include <control.h> typedef struct Textbutton Textbutton; struct Textbutton{	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;}; enum{	EAlign,	EBorder,	EBordercolor,	EFocus,	EFont,	EFormat,	EImage,	ELight,	EMask,	EPressedtextcolor,	ERect,	EShow,	EText,	ETextcolor,	EValue,}; static char *cmds[] = {	[EAlign] =			"align",	[EBorder] =		"border",	[EBordercolor] = "bordercolor",	[EFocus] = 		"focus",	[EFont] =			"font",	[EFormat] = 		"format",	[EImage] =		"image",	[ELight] =			"light",	[EMask] =			"mask",	[EPressedtextcolor] ="pressedtextcolor",	[ERect] =			"rect",	[EShow] =			"show",	[EText] =			"text",	[ETextcolor] =		"textcolor",	[EValue] =			"value",	nil}; static void	textbuttonctl(Control*, char*);static void	textbuttonshow(Textbutton*);static void	textbuttonfree(Textbutton*); static voidtextbuttonthread(void *v){	char buf[32];	Textbutton *t; 	t = v; 	snprint(buf, sizeof buf, "textbutton-%s-0x%p", t->name, t);	threadsetname(buf); 	t->line = ctlmalloc(sizeof(char*));	t->nline = 0;	t->image = _getctlimage("white");	t->mask = _getctlimage("opaque");	t->light = _getctlimage("yellow");	t->bordercolor = _getctlimage("black");	t->textcolor = _getctlimage("black");	t->pressedtextcolor = _getctlimage("black");	t->font = _getctlfont("font");	t->format = ctlstrdup("%q: value %d");	t->lastshow = -1; 	for(;;){		switch(alt(t->alts)){		default:			ctlerror("%q: unknown message", t->name);		case AKey:			/* ignore keystrokes */			break;		case AMouse:			if((t->m.buttons&1) != t->lastbut){				if(t->m.buttons & 1){					t->pressed ^= 1;					textbuttonshow(t);					printctl(t->event, t->format, t->name, t->pressed);				}			}			t->lastbut = t->m.buttons & 1;			break;		case ACtl:			_ctlcontrol(t, t->str, textbuttonctl);			free(t->str);			break;		case AWire:			_ctlrewire(t);			break;		case AExit:			textbuttonfree(t);			sendul(t->exit, 0);			return;		}	}} Control*createtextbutton(Controlset *cs, char *name){	return _createctl(cs, "textbutton", sizeof(Textbutton), name, textbuttonthread, 0);} static voidtextbuttonfree(Textbutton *t){	int i; 	_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 voidtextbuttonshow(Textbutton *t){	Rectangle r, clipr;	int i, dx, dy, w;	Font *f;	Point p, q;	Image *im; 	if(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->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);		p.y += f->height;	}	if(t->pressed)		draw(t->screen, t->rect, t->light->image, t->mask->image, t->mask->image->r.min);	t->lastshow = t->pressed;	flushimage(display, 1);} static voidtextbuttonctl(Control *c, char *str){	int cmd, i;	CParse cp;	Rectangle r;	Textbutton *t; 	t = (Textbutton*)c;	cmd = _ctlparse(&cp, str, 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 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 EShow:		_ctlargcount(t, &cp, 1);		t->lastshow = -1;	/* force redraw */		textbuttonshow(t);		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 */		textbuttonshow(t);		break;	case ETextcolor:		_ctlargcount(t, &cp, 2);		_setctlimage(t, &t->textcolor, cp.args[1]);		t->lastshow = -1;	/* force redraw */		break;	case EValue:		_ctlargcount(t, &cp, 2);		if((cp.iargs[1]!=0) != t->pressed){			t->pressed ^= 1;			textbuttonshow(t);		}		break;	}}