Import sources from 2011-03-30 iso image

1 files changed, 264 insertions, 0 deletions

diff --git a/sys/src/libcontrol/button.c b/sys/src/libcontrol/button.c
new file mode 100755
index 000000000..1d6b23d73
--- /dev/null
+++ b/sys/src/libcontrol/button.c
@@ -0,0 +1,264 @@
+#include <u.h>
+#include <libc.h>
+#include <draw.h>
+#include <thread.h>
+#include <mouse.h>
+#include <keyboard.h>
+#include <control.h>
+
+typedef struct Button Button;
+
+struct Button
+{
+	Control;
+	CImage	*image;
+	CImage	*mask;
+	CImage	*light;
+	CImage	*pale;
+	CImage	*bordercolor;
+	int		pressed;
+	int		lastbut;
+	int		lastshow;
+	int		border;
+	int		align;
+	int		off;
+	int		prepress;
+};
+
+enum{
+	EAlign,
+	EBorder,
+	EBordercolor,
+	EFocus,
+	EFormat,
+	EHide,
+	EImage,
+	ELight,
+	EMask,
+	EPale,
+	ERect,
+	EReveal,
+	EShow,
+	ESize,
+	EValue,
+};
+
+static char *cmds[] = {
+	[EAlign] = 		"align",
+	[EBorder] = 	"border",
+	[EBordercolor] = "bordercolor",
+	[EFocus] = 	"focus",
+	[EFormat] = 	"format",
+	[EHide] =		"hide",
+	[EImage] =	"image",
+	[ELight] =		"light",
+	[EMask] =		"mask",
+	[EPale] =		"pale",
+	[ERect] =		"rect",
+	[EReveal] =	"reveal",
+	[EShow] =		"show",
+	[ESize] =		"size",
+	[EValue] =		"value",
+	nil
+};
+
+static void
+buttonfree(Control *c)
+{
+	Button *b;
+
+	b = (Button *)c;
+	_putctlimage(b->image);
+	_putctlimage(b->mask);
+	_putctlimage(b->light);
+	_putctlimage(b->pale);
+	_putctlimage(b->bordercolor);
+}
+
+static void
+buttonshow(Button *b)
+{
+	Rectangle r;
+
+	if (b->hidden)
+		return;
+	r = b->rect;
+	if(b->border > 0){
+		border(b->screen, r, b->border, b->bordercolor->image, ZP);
+		r = insetrect(b->rect, b->border);
+	}
+	draw(b->screen, r, b->image->image, nil, b->image->image->r.min);
+	if(b->off)
+		draw(b->screen, r, b->pale->image, b->mask->image, b->mask->image->r.min);
+	else if(b->pressed)
+		draw(b->screen, r, b->light->image, b->mask->image, b->mask->image->r.min);
+	b->lastshow = b->pressed;
+	flushimage(display, 1);
+}
+
+static void
+buttonmouse(Control *c, Mouse *m)
+{
+	Button *b;
+
+	b = (Button*)c;
+
+	if(m->buttons&7) {
+		if (ptinrect(m->xy,b->rect)) {
+			if (b->off) {
+				b->off = 0;
+				buttonshow(b);
+			}
+		} else {
+			if (!b->off) {
+				b->off = 1;
+				buttonshow(b);
+			}
+		}
+	}
+	if((m->buttons&7) != b->lastbut){
+		if(m->buttons & 7){
+			b->prepress = b->pressed;
+			if (b->pressed)
+				b->pressed = 0;
+			else
+				b->pressed = m->buttons & 7;
+			buttonshow(b);
+		}else	/* generate event on button up */
+			if (ptinrect(m->xy,b->rect))
+				chanprint(b->event, b->format, b->name, b->pressed);
+			else {
+				b->off = 0;
+				b->pressed = b->prepress;
+				buttonshow(b);
+			}
+	}
+	b->lastbut = m->buttons & 7;
+}
+
+static void
+buttonctl(Control *c, CParse *cp)
+{
+	int cmd;
+	Rectangle r;
+	Button *b;
+
+	b = (Button*)c;
+	cmd = _ctllookup(cp->args[0], cmds, nelem(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]);
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EBorder:
+		_ctlargcount(b, cp, 2);
+		b->border = cp->iargs[1];
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EBordercolor:
+		_ctlargcount(b, cp, 2);
+		_setctlimage(b, &b->bordercolor, cp->args[1]);
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EFocus:
+		/* ignore focus change */
+		break;
+	case EFormat:
+		_ctlargcount(b, cp, 2);
+		b->format = ctlstrdup(cp->args[1]);
+		break;
+	case EHide:
+		_ctlargcount(b, cp, 1);
+		b->hidden = 1;
+		break;
+	case EImage:
+		_ctlargcount(b, cp, 2);
+		_setctlimage(b, &b->image, cp->args[1]);
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case ELight:
+		_ctlargcount(b, cp, 2);
+		_setctlimage(b, &b->light, cp->args[1]);
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EMask:
+		_ctlargcount(b, cp, 2);
+		_setctlimage(b, &b->mask, cp->args[1]);
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EPale:
+		_ctlargcount(b, cp, 2);
+		_setctlimage(b, &b->pale, cp->args[1]);
+		b->lastshow = -1;	/* force redraw */
+		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;
+		b->lastshow = -1;	/* force redraw */
+		break;
+	case EReveal:
+		_ctlargcount(b, cp, 1);
+		b->hidden = 0;
+		buttonshow(b);
+		break;
+	case EShow:
+		_ctlargcount(b, cp, 1);
+		buttonshow(b);
+		break;
+	case ESize:
+		if (cp->nargs == 3)
+			r.max = Pt(0x7fffffff, 0x7fffffff);
+		else{
+			_ctlargcount(b, 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", b->name, cp->str);
+		b->size.min = r.min;
+		b->size.max = r.max;
+		break;
+	case EValue:
+		_ctlargcount(b, cp, 2);
+		if((cp->iargs[1]!=0) != b->pressed){
+			b->pressed ^= 1;
+			buttonshow(b);
+		}
+		break;
+	}
+}
+
+Control*
+createbutton(Controlset *cs, char *name)
+{
+	Button *b;
+	b = (Button*)_createctl(cs, "button", sizeof(Button), name);
+	b->image = _getctlimage("white");
+	b->mask = _getctlimage("opaque");
+	b->light = _getctlimage("yellow");
+	b->pale = _getctlimage("paleyellow");
+	b->bordercolor = _getctlimage("black");
+	b->format = ctlstrdup("%q: value %d");
+	b->lastshow = -1;
+	b->border = 0;
+	b->align = Aupperleft;
+	b->ctl = buttonctl;
+	b->mouse = buttonmouse;
+	b->key = nil;
+	b->exit = buttonfree;
+	b->off = 0;
+	b->prepress = 0;
+	return (Control*)b;
+}