Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – planix.SVN – Blame – /os/branches/planix-v0/sys/src/libcontrol/box.c – Rev 2

Subversion Repositories planix.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#include <u.h>
2 
#include <libc.h>
3 
#include <draw.h>
4 
#include <thread.h>
5 
#include <mouse.h>
6 
#include <keyboard.h>
7 
#include <control.h>
8 
 
9 
typedef struct Box Box;
10 
 
11 
struct Box
12 
{
13 
	Control;
14 
	int		border;
15 
	CImage	*bordercolor;
16 
	CImage	*image;
17 
	int		align;
18 
};
19 
 
20 
enum{
21 
	EAlign,
22 
	EBorder,
23 
	EBordercolor,
24 
	EFocus,
25 
	EHide,
26 
	EImage,
27 
	ERect,
28 
	EReveal,
29 
	EShow,
30 
	ESize,
31 
};
32 
 
33 
static char *cmds[] = {
34 
	[EAlign] =		"align",
35 
	[EBorder] =	"border",
36 
	[EBordercolor] ="bordercolor",
37 
	[EFocus] = 	"focus",
38 
	[EHide] =		"hide",
39 
	[EImage] =	"image",
40 
	[ERect] =		"rect",
41 
	[EReveal] =	"reveal",
42 
	[EShow] =		"show",
43 
	[ESize] =		"size",
44 
	nil
45 
};
46 
 
47 
static void
48 
boxkey(Control *c, Rune *rp)
49 
{
50 
	Box *b;
51 
 
52 
	b = (Box*)c;
53 
	chanprint(b->event, "%q: key 0x%x", b->name, rp[0]);
54 
}
55 
 
56 
static void
57 
boxmouse(Control *c, Mouse *m)
58 
{
59 
	Box *b;
60 
 
61 
	b = (Box*)c;
62 
	if (ptinrect(m->xy,b->rect))
63 
		chanprint(b->event, "%q: mouse %P %d %ld", b->name,
64 
			m->xy, m->buttons, m->msec);
65 
}
66 
 
67 
static void
68 
boxfree(Control *c)
69 
{
70 
	_putctlimage(((Box*)c)->image);
71 
}
72 
 
73 
static void
74 
boxshow(Box *b)
75 
{
76 
	Image *i;
77 
	Rectangle r;
78 
 
79 
	if(b->hidden)
80 
		return;
81 
	if(b->border > 0){
82 
		border(b->screen, b->rect, b->border, b->bordercolor->image, ZP);
83 
		r = insetrect(b->rect, b->border);
84 
	}else
85 
		r = b->rect;
86 
	i = b->image->image;
87 
	/* BUG: ALIGNMENT AND CLIPPING */
88 
	draw(b->screen, r, i, nil, ZP);
89 
}
90 
 
91 
static void
92 
boxctl(Control *c, CParse *cp)
93 
{
94 
	int cmd;
95 
	Rectangle r;
96 
	Box *b;
97 
 
98 
	b = (Box*)c;
99 
	cmd = _ctllookup(cp->args[0], cmds, nelem(cmds));
100 
	switch(cmd){
101 
	default:
102 
		ctlerror("%q: unrecognized message '%s'", b->name, cp->str);
103 
		break;
104 
	case EAlign:
105 
		_ctlargcount(b, cp, 2);
106 
		b->align = _ctlalignment(cp->args[1]);
107 
		break;
108 
	case EBorder:
109 
		_ctlargcount(b, cp, 2);
110 
		if(cp->iargs[1] < 0)
111 
			ctlerror("%q: bad border: %c", b->name, cp->str);
112 
		b->border = cp->iargs[1];
113 
		break;
114 
	case EBordercolor:
115 
		_ctlargcount(b, cp, 2);
116 
		_setctlimage(b, &b->bordercolor, cp->args[1]);
117 
		break;
118 
	case EFocus:
119 
		_ctlargcount(b, cp, 2);
120 
		chanprint(b->event, "%q: focus %s", b->name, cp->args[1]);
121 
		break;
122 
	case EHide:
123 
		_ctlargcount(b, cp, 1);
124 
		b->hidden = 1;
125 
		break;
126 
	case EImage:
127 
		_ctlargcount(b, cp, 2);
128 
		_setctlimage(b, &b->image, cp->args[1]);
129 
		break;
130 
	case ERect:
131 
		_ctlargcount(b, cp, 5);
132 
		r.min.x = cp->iargs[1];
133 
		r.min.y = cp->iargs[2];
134 
		r.max.x = cp->iargs[3];
135 
		r.max.y = cp->iargs[4];
136 
		if(Dx(r)<0 || Dy(r)<0)
137 
			ctlerror("%q: bad rectangle: %s", b->name, cp->str);
138 
		b->rect = r;
139 
		break;
140 
	case EReveal:
141 
		_ctlargcount(b, cp, 1);
142 
		b->hidden = 0;
143 
		boxshow(b);
144 
		break;
145 
	case EShow:
146 
		_ctlargcount(b, cp, 1);
147 
		boxshow(b);
148 
		break;
149 
	case ESize:
150 
		if (cp->nargs == 3)
151 
			r.max = Pt(0x7fffffff, 0x7fffffff);
152 
		else{
153 
			_ctlargcount(b, cp, 5);
154 
			r.max.x = cp->iargs[3];
155 
			r.max.y = cp->iargs[4];
156 
		}
157 
		r.min.x = cp->iargs[1];
158 
		r.min.y = cp->iargs[2];
159 
		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)
160 
			ctlerror("%q: bad sizes: %s", b->name, cp->str);
161 
		b->size.min = r.min;
162 
		b->size.max = r.max;
163 
		break;
164 
	}
165 
}
166 
 
167 
Control*
168 
createbox(Controlset *cs, char *name)
169 
{
170 
	Box *b;
171 
 
172 
	b = (Box *)_createctl(cs, "box", sizeof(Box), name);
173 
	b->image = _getctlimage("white");
174 
	b->bordercolor = _getctlimage("black");
175 
	b->align = Aupperleft;
176 
	b->key = boxkey;
177 
	b->mouse = boxmouse;
178 
	b->ctl = boxctl;
179 
	b->exit = boxfree;
180 
	return (Control *)b;
181 
}