?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Updated PCI IDs to latest snapshot.
[tangerine.git] / workbench / libs / muimaster / classes / numericbutton.c
blob314cd3284ab4c42ff1bb4168a18857d761a11151
1 /*
2 Copyright 2002-2003, The AROS Development Team. All rights reserved.
3 $Id$
4 */
5
6 #define MUIMASTER_YES_INLINE_STDARG
7
8 #include <exec/memory.h>
9 #include <clib/alib_protos.h>
10 #include <proto/exec.h>
11 #include <proto/dos.h>
12 #include <proto/intuition.h>
13 #include <proto/graphics.h>
14 #include <proto/utility.h>
15 #include <proto/muimaster.h>
16
17 #include <string.h>
18 #include <stdio.h>
19
20 #include "mui.h"
21 #include "muimaster_intern.h"
22 #include "support.h"
23 #include "frame.h"
24 #include "support_classes.h"
25 #include "prefs.h"
26 #include "imspec.h"
27 #include "debug.h"
28 #include "numericbutton_private.h"
29
30 extern struct Library *MUIMasterBase;
31
32 #define longget(obj,attr,var) \
33 do \
34 { \
35 IPTR _iptr_var = *(var); \
36 get(obj,attr,&_iptr_var); \
37 *var = (LONG)_iptr_var; \
38 } while(0)
39
40 IPTR Numericbutton__OM_NEW(struct IClass *cl, Object *obj, struct opSet *msg)
41 {
42 obj = (Object *)DoSuperNewTags
43 (
44 cl, obj, NULL,
45 MUIA_Background, MUII_ButtonBack,
46 MUIA_Frame, MUIV_Frame_Button,
47 TAG_MORE, (IPTR) msg->ops_AttrList
48 );
49
50 if (obj)
51 {
52 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
53
54 data->ehn.ehn_Events = IDCMP_MOUSEBUTTONS;
55 data->ehn.ehn_Priority = 0;
56 data->ehn.ehn_Flags = 0;
57 data->ehn.ehn_Object = obj;
58 data->ehn.ehn_Class = cl;
59 }
60
61 return (IPTR)obj;
62 }
63
64 /**************************************************************************
65 OM_SET
66 **************************************************************************/
67 static ULONG Numericbutton__OM_SET(struct IClass *cl, Object * obj, struct opSet *msg)
68 {
69 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
70 const struct TagItem *tags;
71 struct TagItem *tag;
72
73 for (tags = msg->ops_AttrList; (tag = NextTagItem(&tags));)
74 {
75 switch (tag->ti_Tag)
76 {
77 case MUIA_Numeric_Max:
78 if (tag->ti_Data != XGET(obj, MUIA_Numeric_Max))
79 data->needs_to_recalculate_sizes = TRUE;
80 break;
81 case MUIA_Numeric_Min:
82 if (tag->ti_Data != XGET(obj, MUIA_Numeric_Min))
83 data->needs_to_recalculate_sizes = TRUE;
84 break;
85 case MUIA_Numeric_Format:
86 if (tag->ti_Data != XGET(obj, MUIA_Numeric_Format))
87 data->needs_to_recalculate_sizes = TRUE;
88 break;
89 }
90 }
91
92 return DoSuperMethodA(cl, obj, (Msg)msg);
93 }
94
95 IPTR Numericbutton__MUIM_Setup(struct IClass *cl, Object *obj, struct MUIP_Setup *msg)
96 {
97 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
98 // const struct ZuneFrameGfx *knob_frame;
99 IPTR retval;
100
101 retval = DoSuperMethodA(cl, obj, (Msg)msg);
102 if (retval)
103 {
104 //knob_frame = zune_zframe_get(obj, &muiGlobalInfo(obj)->mgi_Prefs->frames[MUIV_Frame_Knob]);
105
106 data->knob_bg = zune_imspec_setup(MUII_ButtonBack, muiRenderInfo(obj));
107
108 DoMethod(_win(obj), MUIM_Window_AddEventHandler, (IPTR)&data->ehn);
109
110 data->needs_to_recalculate_sizes = TRUE;
111 }
112
113 return retval;
114 }
115
116 IPTR Numericbutton__MUIM_Cleanup(struct IClass *cl, Object *obj, struct MUIP_Cleanup *msg)
117 {
118 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
119
120 if (data->knob_bg)
121 {
122 zune_imspec_cleanup(data->knob_bg);
123 data->knob_bg = NULL;
124 }
125
126 DoMethod(_win(obj), MUIM_Window_RemEventHandler, (IPTR)&data->ehn);
127
128 return DoSuperMethodA(cl, obj, (Msg)msg);
129 }
130
131 /**************************************************************************
132 MUIM_AskMinMax
133 **************************************************************************/
134 IPTR Numericbutton__MUIM_AskMinMax(struct IClass *cl, Object *obj, struct MUIP_AskMinMax *msg)
135 {
136 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
137
138 DoSuperMethodA(cl, obj, (Msg)msg);
139
140 if (data->needs_to_recalculate_sizes)
141 {
142 struct RastPort rp;
143 LONG min, max, val, width;
144
145 InitRastPort(&rp);
146 SetFont(&rp,_font(obj));
147
148 width = 0;
149
150 longget(obj, MUIA_Numeric_Min, &min);
151 longget(obj, MUIA_Numeric_Max, &max);
152
153 /* Determine the width of the knob */
154 for (val=min;val<=max;val++)
155 {
156 LONG nw;
157 char *buf;
158
159 buf = (char*)DoMethod(obj, MUIM_Numeric_Stringify, val);
160 nw = TextLength(&rp, buf, strlen(buf));
161
162 if (nw > width)
163 width = nw;
164 }
165
166 data->max_text_width = width;
167 data->text_height = _font(obj)->tf_YSize;
168
169 data->needs_to_recalculate_sizes = FALSE;
170 }
171
172 msg->MinMaxInfo->MinWidth += data->max_text_width;
173 msg->MinMaxInfo->MinHeight += data->text_height;
174 msg->MinMaxInfo->DefWidth += data->max_text_width;
175 msg->MinMaxInfo->DefHeight += data->text_height;
176 msg->MinMaxInfo->MaxWidth += data->max_text_width;
177 msg->MinMaxInfo->MaxHeight += data->text_height;
178
179 return TRUE;
180 }
181
182 static void DrawKnob(Object *obj, struct Numericbutton_DATA *data, BOOL force)
183 {
184 struct RastPort *rp, *saverp;
185 LONG x, val, pixeloffset, textlen, pixellen;
186 STRPTR text;
187
188 pixeloffset = data->popwin->MouseX - data->pop_innerx - 2 - data->knob_clickoffset_x;
189
190 val = DoMethod(obj, MUIM_Numeric_ScaleToValue, 0,
191 data->pop_innerw - data->knob_width, pixeloffset);
192
193 data->knob_left = data->pop_innerx + pixeloffset;
194 data->knob_top = data->pop_innery;
195 data->knob_val = val;
196
197 if (!force && (data->knob_left == data->knob_prev_left))
198 {
199 return;
200 }
201 data->knob_prev_left = data->knob_left;
202
203 if (data->knob_left < data->pop_innerx)
204 {
205 data->knob_left = data->pop_innerx;
206 }
207 else if (data->knob_left > data->pop_innerx + data->pop_innerw - data->knob_width)
208 {
209 data->knob_left = data->pop_innerx + data->pop_innerw - data->knob_width;
210 }
211
212 saverp = _rp(obj);
213 _rp(obj) = rp = data->popwin->RPort;
214
215 SetABPenDrMd(rp, _pens(obj)[MPEN_SHINE], 0, JAM1);
216 RectFill(rp, data->knob_left, data->knob_top,
217 data->knob_left, data->knob_top + data->knob_height - 1);
218 RectFill(rp, data->knob_left + 1, data->knob_top,
219 data->knob_left + data->knob_width - 1, data->knob_top);
220 SetAPen(rp, _pens(obj)[MPEN_SHADOW]);
221 RectFill(rp, data->knob_left + data->knob_width - 1, data->knob_top + 1,
222 data->knob_left + data->knob_width - 1, data->knob_top + data->knob_height - 1);
223 RectFill(rp, data->knob_left + 1, data->knob_top + data->knob_height - 1,
224 data->knob_left + data->knob_width - 2, data->knob_top + data->knob_height - 1);
225
226 if (data->knob_bg)
227 {
228 #warning "Ugly hack?"
229
230 struct IBox old_mad_Box = muiAreaData(obj)->mad_Box;
231
232 muiAreaData(obj)->mad_Box.Left = data->knob_left + 1;
233 muiAreaData(obj)->mad_Box.Top = data->knob_top + 1;
234 muiAreaData(obj)->mad_Box.Width = data->knob_width - 2;
235 muiAreaData(obj)->mad_Box.Height = data->knob_height - 2;
236
237 zune_imspec_draw(data->knob_bg, muiRenderInfo(obj),
238 data->knob_left + 1,
239 data->knob_top + 1,
240 data->knob_width - 2,
241 data->knob_height - 2,
242 0,
243 0,
244 0);
245
246 muiAreaData(obj)->mad_Box = old_mad_Box;
247 }
248 else
249 {
250 SetAPen(rp, _pens(obj)[MPEN_BACKGROUND]);
251 RectFill(rp, data->knob_left + 1, data->knob_top + 1,
252 data->knob_left + data->knob_width - 2,
253 data->knob_top + data->knob_height - 2);
254 }
255
256 SetFont(rp, _font(obj));
257
258 text = (STRPTR)DoMethod(obj, MUIM_Numeric_Stringify, val);
259 textlen = strlen(text);
260 pixellen = TextLength(_rp(obj), text, textlen);
261
262 SetAPen(rp, _pens(obj)[MPEN_TEXT]);
263 Move(rp, data->knob_left + 2 + (data->knob_width - 4 - pixellen) / 2,
264 data->knob_top + 1 + rp->TxBaseline);
265 Text(rp, text, textlen);
266
267 SetAPen(rp, _pens(obj)[MPEN_BACKGROUND]);
268
269 if (data->knob_left - 1 >= data->pop_innerx)
270 {
271 RectFill(rp, data->pop_innerx, data->pop_innery,
272 data->knob_left - 1, data->pop_innery + data->pop_innerh - 1);
273 }
274
275 x = data->knob_left + data->knob_width;
276 if (x <= data->pop_innerx + data->pop_innerw - 1)
277 {
278 RectFill(rp, x, data->pop_innery,
279 data->pop_innerx + data->pop_innerw - 1,
280 data->pop_innery + data->pop_innerh - 1);
281 }
282
283 _rp(obj) = saverp;
284 }
285
286 static void KillPopupWin(Object *obj, struct Numericbutton_DATA *data)
287 {
288 if (data->popwin)
289 {
290 CloseWindow(data->popwin);
291 data->popwin = NULL;
292 }
293
294 if (data->ehn.ehn_Events & IDCMP_MOUSEMOVE)
295 {
296 DoMethod(_win(obj), MUIM_Window_RemEventHandler, (IPTR)&data->ehn);
297 data->ehn.ehn_Events &= ~IDCMP_MOUSEMOVE;
298 DoMethod(_win(obj), MUIM_Window_AddEventHandler, (IPTR)&data->ehn);
299 }
300
301 }
302
303 static BOOL MakePopupWin(Object *obj, struct Numericbutton_DATA *data)
304 {
305 const struct ZuneFrameGfx *zframe;
306 struct RastPort *rp, *saverp;
307 LONG winx, winy, winw, winh;
308 LONG framew, frameh;
309 LONG min, max;
310
311 zframe = zune_zframe_get_with_state(obj, &muiGlobalInfo(obj)->mgi_Prefs->frames[MUIV_Frame_Slider],
312 muiGlobalInfo(obj)->mgi_Prefs->frames[MUIV_Frame_Slider].state);
313
314 data->pop_innerx = zframe->ileft;
315 data->pop_innery = zframe->itop;
316
317 data->knob_width = data->max_text_width + 4;
318 data->knob_height = data->text_height + 2;
319
320 framew = data->pop_innerx + zframe->iright;
321 frameh = data->pop_innery + zframe->ibottom;
322
323 longget(obj, MUIA_Numeric_Min, &min);
324 longget(obj, MUIA_Numeric_Max, &max);
325
326 winw = max - min + data->knob_width + framew;
327 winh = data->knob_height + frameh;
328
329 if (winw > _screen(obj)->Width)
330 {
331 winw = _screen(obj)->Width;
332 }
333
334 if ((winw < data->knob_width + framew) || (winh > _screen(obj)->Height))
335 {
336 return FALSE;
337 }
338
339 data->pop_innerw = winw - framew;
340 data->pop_innerh = winh - frameh;
341
342 data->knob_left = DoMethod(obj, MUIM_Numeric_ValueToScale, 0, data->pop_innerw - data->knob_width);
343
344 winx = _window(obj)->LeftEdge + _mleft(obj) -
345 data->pop_innerx - 2 -
346 data->knob_left;
347 winy = _window(obj)->TopEdge + _mtop(obj) - 1-
348 data->pop_innery;
349
350 data->popwin = OpenWindowTags(NULL, WA_CustomScreen, (IPTR)_screen(obj),
351 WA_Left, winx,
352 WA_Top, winy,
353 WA_Width, winw,
354 WA_Height, winh,
355 WA_AutoAdjust, TRUE,
356 WA_Borderless, TRUE,
357 WA_Activate, FALSE,
358 WA_BackFill, (IPTR)LAYERS_NOBACKFILL,
359 TAG_DONE);
360
361 if (!data->popwin)
362 {
363 return FALSE;
364 }
365
366 rp = data->popwin->RPort;
367
368 saverp = _rp(obj);
369 _rp(obj) = rp;
370 zframe->draw(zframe->customframe, muiRenderInfo(obj), 0, 0, winw, winh, 0, 0, winw, winh);
371
372 DrawKnob(obj, data, TRUE);
373
374
375 _rp(obj) = saverp;
376
377 return TRUE;
378
379 }
380
381 /**************************************************************************
382 MUIM_Show
383 **************************************************************************/
384 IPTR Numericbutton__MUIM_Show(struct IClass *cl, Object *obj, struct MUIP_Show *msg)
385 {
386 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
387 IPTR retval;
388
389 retval = DoSuperMethodA(cl, obj, (Msg)msg);
390
391 if (data->knob_bg)
392 zune_imspec_show(data->knob_bg, obj);
393
394 return retval;
395 }
396
397 /**************************************************************************
398 MUIM_Hide
399 **************************************************************************/
400 IPTR Numericbutton__MUIM_Hide(struct IClass *cl, Object *obj, struct MUIP_Hide *msg)
401 {
402 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
403
404 if (data->popwin)
405 {
406 KillPopupWin(obj, data);
407 }
408
409 if (data->knob_bg)
410 zune_imspec_hide(data->knob_bg);
411
412 return DoSuperMethodA(cl, obj, (Msg)msg);
413 }
414
415
416 /**************************************************************************
417 MUIM_Draw
418 **************************************************************************/
419 IPTR Numericbutton__MUIM_Draw(struct IClass *cl, Object *obj, struct MUIP_Draw *msg)
420 {
421 IPTR val;
422 char *buf;
423 int width;
424
425 DoSuperMethodA(cl,obj,(Msg)msg);
426
427 if (!(msg->flags & (MADF_DRAWOBJECT | MADF_DRAWUPDATE)))
428 return FALSE;
429
430 DoMethod(obj,MUIM_DrawBackground,_mleft(obj),_mtop(obj),_mwidth(obj),_mheight(obj),
431 _mleft(obj),_mtop(obj),0);
432
433 SetFont(_rp(obj),_font(obj));
434 SetABPenDrMd(_rp(obj),_pens(obj)[MPEN_TEXT],_pens(obj)[MPEN_BACKGROUND],JAM1);
435
436 get(obj, MUIA_Numeric_Value, &val);
437 buf = (char*)DoMethod(obj,MUIM_Numeric_Stringify,val);
438 width = TextLength(_rp(obj),buf,strlen(buf));
439
440 Move(_rp(obj), _mleft(obj) + (_mwidth(obj) - width) / 2,
441 _mtop(obj) + _font(obj)->tf_Baseline);
442
443 Text(_rp(obj), buf, strlen(buf));
444
445 return TRUE;
446 }
447
448 /**************************************************************************
449 MUIM_HandleEvent
450 **************************************************************************/
451 IPTR Numericbutton__MUIM_HandleEvent(struct IClass *cl, Object *obj, struct MUIP_HandleEvent *msg)
452 {
453 struct Numericbutton_DATA *data = INST_DATA(cl, obj);
454
455 if (!msg->imsg)
456 {
457 return 0;
458 }
459
460 switch(msg->imsg->Class)
461 {
462 case IDCMP_MOUSEBUTTONS:
463 switch(msg->imsg->Code)
464 {
465 case SELECTDOWN:
466 if (_between(_left(obj), msg->imsg->MouseX, _right(obj)) &&
467 _between(_top(obj), msg->imsg->MouseY, _bottom(obj)) &&
468 (muiAreaData(obj)->mad_Flags & MADF_CANDRAW) &&
469 !data->popwin)
470 {
471 data->knob_clickoffset_x = msg->imsg->MouseX - _mleft(obj);
472
473 if (MakePopupWin(obj, data))
474 {
475 DoMethod(_win(obj), MUIM_Window_RemEventHandler, (IPTR)&data->ehn);
476 data->ehn.ehn_Events |= IDCMP_MOUSEMOVE;
477 DoMethod(_win(obj), MUIM_Window_AddEventHandler, (IPTR)&data->ehn);
478
479 return 0;
480 }
481 }
482 break;
483
484 case SELECTUP:
485 case MENUUP:
486 case MIDDLEUP:
487 default:
488 if (data->popwin)
489 {
490 KillPopupWin(obj, data);
491 if ((msg->imsg->Code == SELECTUP))
492 {
493 set(obj, MUIA_Numeric_Value, data->knob_val);
494 }
495 return 0;
496 }
497 break;
498
499
500 } /* switch(msg->imsg->Code) */
501 break;
502
503 case IDCMP_MOUSEMOVE:
504 if (data->popwin)
505 {
506 DrawKnob(obj, data, FALSE);
507
508 return 0;
509 }
510 break;
511
512 } /* switch(msg->imsg->Class) */
513
514 return 0;
515 }
516
517
518 #if ZUNE_BUILTIN_NUMERICBUTTON
519 BOOPSI_DISPATCHER(IPTR, Numericbutton_Dispatcher, cl, obj, msg)
520 {
521 switch (msg->MethodID)
522 {
523 case OM_NEW: return Numericbutton__OM_NEW(cl, obj, (struct opSet *)msg);
524 case OM_SET: return Numericbutton__OM_SET(cl, obj, (struct opSet *)msg);
525
526 case MUIM_Setup: return Numericbutton__MUIM_Setup(cl, obj, (struct MUIP_Setup *)msg);
527 case MUIM_Cleanup: return Numericbutton__MUIM_Cleanup(cl, obj, (struct MUIP_Cleanup *)msg);
528 case MUIM_Show: return Numericbutton__MUIM_Show(cl, obj, (struct MUIP_Show *)msg);
529 case MUIM_Hide: return Numericbutton__MUIM_Hide(cl, obj, (struct MUIP_Hide *)msg);
530 case MUIM_AskMinMax: return Numericbutton__MUIM_AskMinMax(cl, obj, (struct MUIP_AskMinMax *)msg);
531 case MUIM_Draw: return Numericbutton__MUIM_Draw(cl, obj, (struct MUIP_Draw *)msg);
532 case MUIM_HandleEvent: return Numericbutton__MUIM_HandleEvent(cl, obj, (struct MUIP_HandleEvent *)msg);
533 default: return DoSuperMethodA(cl, obj, msg);
534 }
535 }
536 BOOPSI_DISPATCHER_END
537
538 const struct __MUIBuiltinClass _MUI_Numericbutton_desc =
539 {
540 MUIC_Numericbutton,
541 MUIC_Numeric,
542 sizeof(struct Numericbutton_DATA),
543 (void*)Numericbutton_Dispatcher
544 };
545 #endif /* ZUNE_BUILTIN_NUMERICBUTTON */
A totally sweet operating system