#include <u.h>#include <libc.h>#include <draw.h>#include <thread.h>#include <mouse.h>#include <keyboard.h>#include <control.h> typedef struct Box Box; struct Box{	Control;	int		border;	CImage	*bordercolor;	CImage	*image;	int		align;}; enum{	EAlign,	EBorder,	EBordercolor,	EFocus,	EImage,	ERect,	EShow,}; static char *cmds[] = {	[EAlign] =		"align",	[EBorder] =	"border",	[EBordercolor] ="bordercolor",	[EFocus] = 	"focus",	[EImage] =	"image",	[ERect] =		"rect",	[EShow] =		"show",	nil}; static void	boxctl(Control*, char*);static void	boxshow(Box*);static void	boxfree(Box*); static voidboxthread(void *v){	char buf[32];	Box *b; 	b = v; 	snprint(buf, sizeof buf, "box-%s-0x%p", b->name, b);	threadsetname(buf); 	b->image = _getctlimage("white");	b->bordercolor = _getctlimage("black");	b->align = Aupperleft; 	for(;;){		switch(alt(b->alts)){		default:			ctlerror("%q: unknown message", b->name);		case AKey:			printctl(b->event, "%q: key 0x%x", b->name, b->kbdr[0]);			break;		case AMouse:			printctl(b->event, "%q: mouse %P %d %ld", b->name,				b->m.xy, b->m.buttons, b->m.msec);			break;		case ACtl:			_ctlcontrol(b, b->str, boxctl);			free(b->str);			break;		case AWire:			_ctlrewire(b);			break;		case AExit:			boxfree(b);			sendul(b->exit, 0);			return;		}	}} Control*createbox(Controlset *cs, char *name){	return _createctl(cs, "box", sizeof(Box), name, boxthread, 0);} static voidboxfree(Box *b){	_putctlimage(b->image);} static voidboxshow(Box *b){	Image *i;	Rectangle r; 	if(b->border > 0){		border(b->screen, b->rect, b->border, b->bordercolor->image, ZP);		r = insetrect(b->rect, b->border);	}else		r = b->rect;	i = b->image->image;	/* BUG: ALIGNMENT AND CLIPPING */	draw(b->screen, r, i, nil, ZP);} static voidboxctl(Control *c, char *str){	int cmd;	CParse cp;	Rectangle r;	Box *b; 	b = (Box*)c;	cmd = _ctlparse(&cp, str, cmds);	switch(cmd){	default:		ctlerror("%q: unrecognized message '%s'", b->name, cp.str);		break;	case EAlign:		_ctlargcount(b, &cp, 2);		b->align = _ctlalignment(cp.args[1]);		break;	case EBorder:		_ctlargcount(b, &cp, 2);		if(cp.iargs[1] < 0)			ctlerror("%q: bad border: %c", b->name, cp.str);		b->border = cp.iargs[1];		break;	case EBordercolor:		_ctlargcount(b, &cp, 2);		_setctlimage(b, &b->bordercolor, cp.args[1]);		break;	case EFocus:		_ctlargcount(b, &cp, 2);		printctl(b->event, "%q: focus %s", b->name, cp.args[1]);		break;	case EImage:		_ctlargcount(b, &cp, 2);		_setctlimage(b, &b->image, cp.args[1]);		break;	case ERect:		_ctlargcount(b, &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", b->name, cp.str);		b->rect = r;		break;	case EShow:		_ctlargcount(b, &cp, 1);		boxshow(b);		break;	}}