Import sources from 2011-03-30 iso image

1 files changed, 192 insertions, 0 deletions

diff --git a/sys/src/libcontrol/radiobutton.c b/sys/src/libcontrol/radiobutton.c
new file mode 100755
index 000000000..133730a50
--- /dev/null
+++ b/sys/src/libcontrol/radiobutton.c
@@ -0,0 +1,192 @@
+#include <u.h>
+#include <libc.h>
+#include <draw.h>
+#include <thread.h>
+#include <mouse.h>
+#include <keyboard.h>
+#include <control.h>
+
+typedef struct Radio Radio;
+
+struct Radio
+{
+	Control;
+	int		value;
+	int		lastbut;
+	Control	**buttons;
+	int		nbuttons;
+	char		*eventstr;
+};
+
+enum{
+	EAdd,
+	EButton,
+	EFocus,
+	EFormat,
+	EHide,
+	ERect,
+	EReveal,
+	EShow,
+	ESize,
+	EValue,
+};
+
+static char *cmds[] = {
+	[EAdd] =		"add",
+	[EButton] =	"button",
+	[EFocus] = 	"focus",
+	[EFormat] = 	"format",
+	[EHide] =		"hide",
+	[ERect] =		"rect",
+	[EReveal] =	"reveal",
+	[EShow] =		"show",
+	[ESize] =		"size",
+	[EValue] =		"value",
+	nil
+};
+
+static void	radioshow(Radio*);
+static void	radiofree(Radio*);
+
+static void
+radiomouse(Control *c, Mouse *m)
+{
+	Radio *r;
+	int i;
+
+	r = (Radio*)c;
+	for(i=0; i<r->nbuttons; i++)
+		if(ptinrect(m->xy, r->buttons[i]->rect) && r->buttons[i]->mouse){
+			(r->buttons[i]->mouse)(r->buttons[i], m);
+			break;
+		}
+}
+
+static void
+radiofree(Radio*)
+{
+}
+
+static void
+radioshow(Radio *r)
+{
+	int i;
+
+	if (r->hidden)
+		return;
+	for(i=0; i<r->nbuttons; i++){
+		_ctlprint(r->buttons[i], "value %d", (r->value==i));
+		_ctlprint(r->buttons[i], "show");
+	}
+}
+
+static void
+radioctl(Control *c, CParse *cp)
+{
+	int cmd, i;
+	Rectangle rect;
+	Radio *r;
+	char fmt[256];
+
+	r = (Radio*)c;
+
+	cmd = _ctllookup(cp->args[0], cmds, nelem(cmds));
+	switch(cmd){
+	default:
+		ctlerror("%q: unrecognized message '%s'", r->name, cp->str);
+		break;
+	case EAdd:
+		_ctlargcount(r, cp, 2);
+		c = controlcalled(cp->args[1]);
+		if(c == nil)
+			ctlerror("%q: can't add %s: %r", r->name, cp->args[1]);
+		snprint(fmt, sizeof fmt, "%%q: %q button %%d", r->name);
+		_ctlprint(c, "format %q", fmt);
+		controlwire(c, "event", c->controlset->ctl);
+		r->buttons = ctlrealloc(r->buttons, (r->nbuttons+1)*sizeof(Control*));
+		r->buttons[r->nbuttons] = c;
+		r->nbuttons++;
+		r->value = -1;
+		radioshow(r);
+		break;
+	case EButton:
+		if (cp->sender == nil)
+			ctlerror("%q: senderless buttonevent: %q", r->name, cp->str);
+		c = controlcalled(cp->sender);
+		for(i=0; i<r->nbuttons; i++)
+			if (c == r->buttons[i])
+				break;
+		if (i == r->nbuttons)
+			ctlerror("%q: not my event: %q", r->name, cp->str);
+		if(cp->iargs[1] == 0){
+			/* button was turned off; turn it back on */
+			_ctlprint(c, "value 1");
+		}else{
+			r->value = i;
+			chanprint(r->event, r->format, r->name, i);
+			radioshow(r);
+		}
+		break;
+	case EFormat:
+		_ctlargcount(r, cp, 2);
+		r->format = ctlstrdup(cp->args[1]);
+		break;
+	case EHide:
+		_ctlargcount(r, cp, 1);
+		r->hidden = 1;
+		break;
+	case EFocus:
+		/* ignore focus change */
+		break;
+	case ERect:
+		_ctlargcount(r, cp, 5);
+		rect.min.x = cp->iargs[1];
+		rect.min.y = cp->iargs[2];
+		rect.max.x = cp->iargs[3];
+		rect.max.y = cp->iargs[4];
+		r->rect = rect;
+		break;
+	case EReveal:
+		_ctlargcount(r, cp, 1);
+		r->hidden = 0;
+		radioshow(r);
+		break;
+	case EShow:
+		_ctlargcount(r, cp, 1);
+		radioshow(r);
+		break;
+	case ESize:
+		if (cp->nargs == 3)
+			rect.max = Pt(0x7fffffff, 0x7fffffff);
+		else{
+			_ctlargcount(r, cp, 5);
+			rect.max.x = cp->iargs[3];
+			rect.max.y = cp->iargs[4];
+		}
+		rect.min.x = cp->iargs[1];
+		rect.min.y = cp->iargs[2];
+		if(rect.min.x<=0 || rect.min.y<=0 || rect.max.x<=0 || rect.max.y<=0 || rect.max.x < rect.min.x || rect.max.y < rect.min.y)
+			ctlerror("%q: bad sizes: %s", r->name, cp->str);
+		r->size.min = rect.min;
+		r->size.max = rect.max;
+		break;
+	case EValue:
+		_ctlargcount(r, cp, 2);
+		r->value = cp->iargs[1];
+		radioshow(r);
+		break;
+	}
+}
+
+Control*
+createradiobutton(Controlset *cs, char *name)
+{
+	Radio *r;
+
+	r = (Radio*)_createctl(cs, "label", sizeof(Radio), name);
+	r->format = ctlstrdup("%q: value %d");
+	r->value = -1;	/* nobody set at first */
+	r->mouse = radiomouse;
+	r->ctl = radioctl;
+	return (Control*)r;
+}