#include <u.h>#include <libc.h>#include <draw.h>#include <thread.h>#include <mouse.h>#include <keyboard.h>#include <control.h> typedef struct Label Label; struct Label{	Control;	int		border;	CFont	*font;	CImage	*image;	CImage	*textcolor;	CImage	*bordercolor;	char		*text;	int		align;}; enum{	EAlign,	EBorder,	EBordercolor,	EFocus,	EFont,	EImage,	ERect,	EShow,	ETextcolor,	EValue,}; static char *cmds[] = {	[EAlign] =			"align",	[EBorder] =		"border",	[EBordercolor] =	"bordercolor",	[EFocus] = 		"focus",	[EFont] =			"font",	[EImage] =		"image",	[ERect] =			"rect",	[EShow] =			"show",	[ETextcolor] =		"textcolor",	[EValue] =			"value",	nil}; static void	labelctl(Control*, char*);static void	labelshow(Label*);static void	labelfree(Label*); static voidlabelthread(void *v){	char buf[32];	Label *l; 	l = v; 	snprint(buf, sizeof buf, "label-%s-0x%p", l->name, l);	threadsetname(buf); 	l->text = ctlstrdup("");	l->image = _getctlimage("white");	l->textcolor = _getctlimage("black");	l->bordercolor = _getctlimage("black");	l->font = _getctlfont("font");	l->border = 0; 	for(;;){		switch(alt(l->alts)){		default:			ctlerror("%q: unknown message", l->name);		case AKey:			break;		case AMouse:			/* ignore mouse */			break;		case ACtl:			_ctlcontrol(l, l->str, labelctl);			free(l->str);			break;		case AWire:			_ctlrewire(l);			break;		case AExit:			labelfree(l);			sendul(l->exit, 0);			return;		}	}} Control*createlabel(Controlset *cs, char *name){	return _createctl(cs, "label", sizeof(Label), name, labelthread, 0);} static voidlabelfree(Label *l){	_putctlfont(l->font);	_putctlimage(l->image);	_putctlimage(l->textcolor);	_putctlimage(l->bordercolor);}  static voidlabelshow(Label *l){	Rectangle r;	Point p; 	r = l->rect;	draw(l->screen, r, l->image->image, nil, l->image->image->r.min);	if(l->border > 0){		border(l->screen, r, l->border, l->bordercolor->image, l->bordercolor->image->r.min);		r = insetrect(r, l->border);	}	p = _ctlalignpoint(r,		stringwidth(l->font->font, l->text),		l->font->font->height, l->align);	_string(l->screen, p, l->textcolor->image,		ZP, l->font->font, l->text, nil, strlen(l->text),		r, nil, ZP);	flushimage(display, 1);} static voidlabelctl(Control *c, char *str){	int cmd;	CParse cp;	Rectangle r;	Label *l; 	l = (Label*)c;	cmd = _ctlparse(&cp, str, cmds);	switch(cmd){	default:		ctlerror("%q: unrecognized message '%s'", l->name, cp.str);		break;	case EAlign:		_ctlargcount(l, &cp, 2);		l->align = _ctlalignment(cp.args[1]);		break;	case EBorder:		_ctlargcount(l, &cp, 2);		if(cp.iargs[1] < 0)			ctlerror("%q: bad border: %c", l->name, cp.str);		l->border = cp.iargs[1];		break;	case EBordercolor:		_ctlargcount(l, &cp, 2);		_setctlimage(l, &l->bordercolor, cp.args[1]);		break;	case EFocus:		/* ignore focus change */		break;	case EFont:		_ctlargcount(l, &cp, 2);		_setctlfont(l, &l->font, cp.args[1]);		break;	case EImage:		_ctlargcount(l, &cp, 2);		_setctlimage(l, &l->image, cp.args[1]);		break;	case ERect:		_ctlargcount(l, &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", l->name, cp.str);		l->rect = r;		break;	case EShow:		_ctlargcount(l, &cp, 1);		labelshow(l);		break;		_ctlargcount(l, &cp, 2);		_setctlimage(l, &l->textcolor, cp.args[1]);		break;	case ETextcolor:		_ctlargcount(l, &cp, 2);		_setctlimage(l, &l->textcolor, cp.args[1]);		break;	case EValue:		_ctlargcount(l, &cp, 2);		if(strcmp(cp.args[1], l->text) != 0){			free(l->text);			l->text = ctlstrdup(cp.args[1]);			labelshow(l);		}		break;	}}