?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
arch/boot: disable build of aros-side grub executables for now to bring back nightly...
[AROS.git] / workbench / classes / gadgets / tapedeck / tapedeckclass.c
blobe635caede37ce6881435d6ebceced9bd2aec4256
1 /*
2 Copyright © 2016, The AROS Development Team. All rights reserved.
3 $Id$
4 */
5
6 #ifndef DEBUG
7 # define DEBUG 0
8 #endif
9 #include <aros/debug.h>
10
11 #define USE_BOOPSI_STUBS
12 #include <exec/libraries.h>
13 #include <proto/dos.h>
14 #include <proto/intuition.h>
15 #include <intuition/intuition.h>
16 #include <intuition/screens.h>
17 #include <intuition/classes.h>
18 #include <intuition/classusr.h>
19 #include <intuition/gadgetclass.h>
20 #include <intuition/imageclass.h>
21 #include <proto/graphics.h>
22 #include <graphics/rastport.h>
23 #include <graphics/text.h>
24 #include <proto/utility.h>
25 #include <utility/tagitem.h>
26 #include <devices/inputevent.h>
27 #include <gadgets/aroscycle.h>
28 #include <proto/alib.h>
29
30 #include <gadgets/tapedeck.h>
31
32 #include "tapedeck_intern.h"
33
34 /***********************************************************************************/
35
36 #define IM(o) ((struct Image *)(o))
37 #define EG(o) ((struct Gadget *)(o))
38
39 #define POSPROP_HEIGHT 5
40 #define TDGADGET_HEIGHT 20
41
42 #include <clib/boopsistubs.h>
43
44 #define TAPEDECK_FLAG_INIT (TDECK_Dummy + 100-1)
45
46 static UBYTE templateRewind[] =
47 {
48 0x03, 0x03, // 0000001100000011
49 0x0F, 0x0f, // 0000111100001111
50 0x3F, 0x3F, // 0011111100011111
51 0xFF, 0xFF, // 1111111111111111
52 0x3F, 0x3F, // 0011111100111111
53 0x0F, 0x0F, // 0000111100001111
54 0x03, 0x03, // 0000001100000011
55 };
56 static UBYTE templatePlay[] =
57 {
58 0xC0, // 11000000
59 0xF0, // 11110000
60 0xFC, // 11111100
61 0xFF, // 11111111
62 0xFC, // 11111100
63 0xF0, // 11110000
64 0xC0 // 11000000
65 };
66 static UBYTE templatePause[] =
67 {
68 0xE7, // 11100111
69 0xE7, // 11100111
70 0xE7, // 11100111
71 0xE7, // 11100111
72 0xE7, // 11100111
73 0xE7, // 11100111
74 0xE7 // 11100111
75 };
76 static UBYTE templateFForward[] =
77 {
78 0xC0, 0xC0, // 1100000011000000
79 0xF0, 0xF0, // 1111000011110000
80 0xFC, 0xFC, // 1111110011111100
81 0xFF, 0xFF, // 1111111111111111
82 0xFC, 0xFC, // 1111110011111100
83 0xF0, 0xF0, // 1111000011110000
84 0xC0, 0xC0, // 1100000011000000
85 };
86
87 /***********************************************************************************/
88
89 IPTR TapeDeck__OM_GET(Class *cl, Object *o, struct opGet *msg)
90 {
91 struct TapeDeckData *data = INST_DATA(cl, o);
92 IPTR retval = 1;
93
94 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
95
96 switch(msg->opg_AttrID)
97 {
98 case TDECK_Mode:
99 *msg->opg_Storage = (IPTR)data->tdd_Mode;
100 break;
101
102 case TDECK_Frames:
103 *msg->opg_Storage = (IPTR)data->tdd_FrameCount;
104 break;
105
106 case TDECK_CurrentFrame:
107 *msg->opg_Storage = (IPTR)data->tdd_FrameCurrent;
108 break;
109
110 case GA_Height:
111 *msg->opg_Storage = TDGADGET_HEIGHT;
112 break;
113
114 default:
115 retval = DoSuperMethodA(cl, o, (Msg)msg);
116 break;
117 }
118
119 return retval;
120 }
121
122 /***********************************************************************************/
123
124 IPTR TapeDeck__OM_SET(Class *cl, Object *o, struct opSet *msg)
125 {
126 struct TapeDeckData *data = INST_DATA(cl, o);
127 struct TagItem *tag, *taglist = msg->ops_AttrList;
128 BOOL rerender = FALSE, tdinit = FALSE;
129 IPTR result;
130
131 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
132
133 result = DoSuperMethodA(cl, o, (Msg)msg);
134
135 while((tag = NextTagItem(&taglist)))
136 {
137 switch(tag->ti_Tag)
138 {
139 case TAPEDECK_FLAG_INIT:
140 D(bug("[tapedeck.gadget] %s: performing initial setup\n", __PRETTY_FUNCTION__));
141 tdinit = TRUE;
142 break;
143
144 case TDECK_Mode:
145 D(bug("[tapedeck.gadget] %s: TDECK_Mode %08x\n", __PRETTY_FUNCTION__, tag->ti_Data));
146 data->tdd_Mode = (ULONG)tag->ti_Data;
147 break;
148
149 case TDECK_Frames:
150 D(bug("[tapedeck.gadget] %s: TDECK_Frames - %d\n", __PRETTY_FUNCTION__, tag->ti_Data));
151 data->tdd_FrameCount = (ULONG)tag->ti_Data;
152 break;
153
154 case TDECK_CurrentFrame:
155 D(bug("[tapedeck.gadget] %s: TDECK_CurrentFrame - %d\n", __PRETTY_FUNCTION__, tag->ti_Data));
156 data->tdd_FrameCurrent = (ULONG)tag->ti_Data;
157 break;
158
159 case GA_Disabled:
160 rerender = TRUE;
161 break;
162
163 case GA_Height:
164 D(bug("[tapedeck.gadget] %s: GA_Height - %d (ignored)\n", __PRETTY_FUNCTION__, tag->ti_Data));
165 tag->ti_Data = TDGADGET_HEIGHT;
166 break;
167
168 D(
169 case GA_Left:
170 bug("[tapedeck.gadget] %s: GA_Left - %d\n", __PRETTY_FUNCTION__, tag->ti_Data);
171 break;
172
173 case GA_Top:
174 bug("[tapedeck.gadget] %s: GA_Top - %d\n", __PRETTY_FUNCTION__, tag->ti_Data);
175 break;
176
177 case GA_Width:
178 bug("[tapedeck.gadget] %s: GA_Width - %d\n", __PRETTY_FUNCTION__, tag->ti_Data);
179 break;
180
181
182 )
183 }
184 }
185
186 if (!(tdinit) && (rerender))
187 {
188 struct RastPort *rport;
189
190 rport = ObtainGIRPort(msg->ops_GInfo);
191 if(rport)
192 {
193 DoMethod(o, GM_RENDER, (IPTR)msg->ops_GInfo, (IPTR)rport, GREDRAW_REDRAW);
194 ReleaseGIRPort(rport);
195 result = FALSE;
196 }
197 }
198
199 return result;
200 }
201
202 /***********************************************************************************/
203
204 Object *TapeDeck__OM_NEW(Class *cl, Class *rootcl, struct opSet *msg)
205 {
206 struct TapeDeckData *data;
207 struct TagItem pproptags[] =
208 {
209 { GA_ID, 1 },
210 { PGA_Visible, 1 },
211 { PGA_Freedom, FREEHORIZ },
212 { PGA_Borderless, TRUE },
213 { PGA_Total, 1 },
214 { PGA_Top, 0 },
215 { TAG_DONE, 0 }
216 };
217 struct TagItem frametags[] =
218 {
219 { IA_EdgesOnly, FALSE },
220 { IA_FrameType, FRAME_BUTTON },
221 { TAG_DONE, 0 }
222 };
223 struct TagItem tdinittags[] =
224 {
225 { TAPEDECK_FLAG_INIT, 0 },
226 { TAG_MORE, (IPTR)msg->ops_AttrList },
227 { TAG_DONE, 0 }
228 };
229 Object *o;
230
231 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
232
233 o = (Object *)DoSuperMethodA(cl, (Object *)rootcl, (Msg)msg);
234 if (o)
235 {
236 data = INST_DATA(cl, o);
237
238 EG(o)->GadgetRender = NewObjectA(NULL, FRAMEICLASS, frametags);
239 D(bug("[tapedeck.gadget] %s: frame @ 0x%p\n", __PRETTY_FUNCTION__, EG(o)->GadgetRender));
240
241 data->tdd_ButtonPen[0] = SHADOWPEN;
242 data->tdd_ButtonPen[1] = SHADOWPEN;
243 data->tdd_ButtonPen[2] = SHADOWPEN;
244
245 pproptags[3].ti_Data = data->tdd_FrameCount;
246 pproptags[4].ti_Data = data->tdd_FrameCurrent;
247 data->tdd_PosProp = NewObjectA(NULL, "propgclass", pproptags);
248
249 D(bug("[tapedeck.gadget] %s: playback position prop @ 0x%p\n", __PRETTY_FUNCTION__, data->tdd_PosProp));
250
251 if (msg->ops_AttrList)
252 {
253 msg->ops_AttrList = tdinittags;
254 TapeDeck__OM_SET(cl, o, msg);
255 }
256 }
257
258 return o;
259 }
260
261 /***********************************************************************************/
262
263 VOID TapeDeck__OM_DISPOSE(Class *cl, Object *o, Msg msg)
264 {
265 struct TapeDeckData *data = INST_DATA(cl, o);
266
267 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
268
269 if (data->tdd_PosProp)
270 DisposeObject((Object *)data->tdd_PosProp);
271
272 if (EG(o)->GadgetRender)
273 DisposeObject((Object *)EG(o)->GadgetRender);
274
275 DoSuperMethodA(cl,o,msg);
276 }
277
278 /***********************************************************************************/
279
280 IPTR TapeDeck__GM_LAYOUT(Class *cl, struct Gadget *g, struct gpLayout *msg)
281 {
282 struct TapeDeckData *data = INST_DATA(cl, g);
283 struct TagItem frametags[] = {
284 { GA_Left, g->LeftEdge },
285 { GA_Top, g->TopEdge },
286 { IA_Width, g->Width },
287 { IA_Height, g->Height },
288 { TAG_DONE, 0UL }
289 };
290 IPTR RetVal;
291
292 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
293
294 RetVal = DoSuperMethodA(cl, (Object *)g, (Msg)msg);
295
296 SetAttrsA((Object *)g->GadgetRender, frametags);
297 DoMethodA((Object *)g->GadgetRender, msg);
298
299 frametags[0].ti_Data = g->LeftEdge + 1;
300 frametags[2].ti_Tag = GA_Width;
301 frametags[2].ti_Data = g->Width - 2;
302 frametags[3].ti_Tag = GA_Height;
303 frametags[3].ti_Data = POSPROP_HEIGHT;
304
305 SetAttrsA((Object *)data->tdd_PosProp, frametags);
306 DoMethodA((Object *)data->tdd_PosProp, msg);
307
308 return RetVal;
309 }
310
311 IPTR TapeDeck__GM_RENDER(Class *cl, Object *o, struct gpRender *msg)
312 {
313 struct TapeDeckData *data = INST_DATA(cl, o);
314 struct TagItem proptags[] = {
315 { PGA_Total, data->tdd_FrameCount },
316 { PGA_Top, data->tdd_FrameCurrent },
317 { TAG_DONE, 0UL }
318 };
319 LONG rend_x, rend_y;
320 IPTR propTop;
321
322 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
323
324 if ((msg->gpr_Redraw != GREDRAW_UPDATE) && (EG(o)->GadgetRender))
325 {
326 /* Full redraw: clear and draw border */
327 DrawImageState(msg->gpr_RPort, IM(EG(o)->GadgetRender),
328 EG(o)->LeftEdge, EG(o)->TopEdge,
329 IDS_NORMAL,
330 msg->gpr_GInfo->gi_DrInfo);
331 }
332
333 GetAttr (PGA_Top, (Object *)data->tdd_PosProp, &propTop);
334 if (propTop != data->tdd_FrameCurrent)
335 {
336 SetAttrsA((Object *)data->tdd_PosProp, proptags);
337 SetAPen(msg->gpr_RPort, msg->gpr_GInfo->gi_DrInfo->dri_Pens[BACKGROUNDPEN]);
338 RectFill(msg->gpr_RPort,
339 EG(o)->LeftEdge + 2, EG(o)->TopEdge + 1,
340 EG(o)->LeftEdge + EG(o)->Width - 2, EG(o)->TopEdge + POSPROP_HEIGHT);
341 }
342 DoMethodA((Object *)data->tdd_PosProp, (Msg)msg);
343
344 rend_x = EG(o)->LeftEdge + ((EG(o)->Width - 50) >> 1);
345 rend_y = EG(o)->TopEdge + 4 + ((EG(o)->Height - 11) >> 1);
346
347 if ((msg->gpr_Redraw != GREDRAW_UPDATE) || (data->tdd_ButtonPen[0] != data->tdd_LastPen[0]))
348 {
349 SetAPen(msg->gpr_RPort, msg->gpr_GInfo->gi_DrInfo->dri_Pens[data->tdd_ButtonPen[0]]);
350
351 BltTemplate ((void *) templateRewind,
352 0, 2,
353 msg->gpr_RPort, rend_x, rend_y,
354 16, 7);
355
356 data->tdd_LastPen[0] = data->tdd_ButtonPen[0];
357 }
358
359 if ((msg->gpr_Redraw != GREDRAW_UPDATE) || (data->tdd_ButtonPen[1] != data->tdd_LastPen[1]))
360 {
361 if (data->tdd_Mode != data->tdd_ModeLast)
362 {
363 SetAPen(msg->gpr_RPort, msg->gpr_GInfo->gi_DrInfo->dri_Pens[BACKGROUNDPEN]);
364 RectFill(msg->gpr_RPort,
365 rend_x + 21, rend_y,
366 rend_x + 28, rend_y + 6);
367 }
368
369 SetAPen(msg->gpr_RPort, msg->gpr_GInfo->gi_DrInfo->dri_Pens[data->tdd_ButtonPen[1]]);
370
371 if (data->tdd_Mode == BUT_PLAY)
372 {
373 BltTemplate ((void *) templatePause,
374 0, 1,
375 msg->gpr_RPort, rend_x + 21, rend_y,
376 8, 7);
377 }
378 else
379 {
380 BltTemplate ((void *) templatePlay,
381 0, 1,
382 msg->gpr_RPort, rend_x + 21, rend_y,
383 8, 7);
384 }
385
386 data->tdd_LastPen[1] = data->tdd_ButtonPen[1];
387 }
388
389 if ((msg->gpr_Redraw != GREDRAW_UPDATE) || (data->tdd_ButtonPen[2] != data->tdd_LastPen[2]))
390 {
391 SetAPen(msg->gpr_RPort, msg->gpr_GInfo->gi_DrInfo->dri_Pens[data->tdd_ButtonPen[2]]);
392
393 BltTemplate ((void *) templateFForward,
394 0, 2,
395 msg->gpr_RPort, rend_x + 34, rend_y,
396 16, 7);
397
398 data->tdd_LastPen[2] = data->tdd_ButtonPen[2];
399 }
400
401 return (IPTR)TRUE;
402 }
403
404 /***********************************************************************************/
405
406 IPTR TapeDeck__GM_HANDLEINPUT(Class *cl, Object *o, struct gpInput *msg)
407 {
408 struct RastPort *rport;
409 struct TapeDeckData *data = INST_DATA(cl, o);
410 struct InputEvent *ie = msg->gpi_IEvent;
411 IPTR retval = GMR_MEACTIVE;
412 BOOL redraw = FALSE;
413
414 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
415
416 if (ie->ie_Code == SELECTDOWN)
417 {
418 D(bug("[tapedeck.gadget]: %s: SELECTDOWN\n", __PRETTY_FUNCTION__));
419 EG(o)->Flags |= GFLG_SELECTED;
420 }
421
422 if ((data->tdd_PosProp) &&
423 ((((struct Gadget *)data->tdd_PosProp)->Flags & GFLG_SELECTED) || (msg->gpi_Mouse.Y < POSPROP_HEIGHT)))
424 {
425 IPTR topCurrent;
426
427 D(bug("[tapedeck.gadget]: %s: input event is for the prop gadget ...\n", __PRETTY_FUNCTION__));
428
429 if (ie->ie_Code == SELECTDOWN)
430 {
431 GetAttr (PGA_Top, (Object *)data->tdd_PosProp, &data->tdd_TopLast);
432 data->tdd_ModeLast = data->tdd_Mode;
433 data->tdd_Mode = BUT_FRAME;
434 }
435
436 /* pass it to the prop gadget .. */
437 DoMethodA((Object *)data->tdd_PosProp, (Msg)msg);
438
439 if (data->tdd_Mode == BUT_FRAME)
440 {
441 GetAttr (PGA_Top, (Object *)data->tdd_PosProp, &topCurrent);
442 if (data->tdd_TopLast != topCurrent)
443 {
444 D(bug("[tapedeck.gadget]: %s: position moved ...(%d)\n", __PRETTY_FUNCTION__, topCurrent));
445 data->tdd_FrameCurrent = topCurrent;
446 }
447 if (ie->ie_Code == SELECTUP)
448 data->tdd_Mode = data->tdd_ModeLast;
449 }
450 }
451
452 if ((msg->gpi_Mouse.Y > ((EG(o)->Height - 11) >> 1)) &&
453 (msg->gpi_Mouse.Y < (EG(o)->Height - ((EG(o)->Height - 11) >> 1))) &&
454 (msg->gpi_Mouse.X > ((EG(o)->Width - 50) >> 1)))
455 {
456 ULONG offset_x = msg->gpi_Mouse.X - ((EG(o)->Width - 50) >> 1);
457
458 if (offset_x < 16)
459 {
460 D(bug("[tapedeck.gadget]: %s: <<\n", __PRETTY_FUNCTION__));
461 if (ie->ie_Code == SELECTDOWN)
462 {
463 data->tdd_ButtonActive = 1;
464 data->tdd_ButtonPen[0] = SHINEPEN;
465 data->tdd_ModeLast = data->tdd_Mode;
466 data->tdd_Mode = BUT_REWIND;
467 redraw = TRUE;
468 }
469 else if (ie->ie_Code == SELECTUP)
470 {
471 data->tdd_ButtonPen[0] = SHADOWPEN;
472 data->tdd_Mode = data->tdd_ModeLast;
473 }
474 }
475 else if ((offset_x > 20) && (offset_x < 29))
476 {
477 D(bug("[tapedeck.gadget]: %s: PLAY/PAUSE\n", __PRETTY_FUNCTION__));
478 if (ie->ie_Code == SELECTDOWN)
479 {
480 data->tdd_ButtonActive = 2;
481 data->tdd_ButtonPen[1] = SHINEPEN;
482 redraw = TRUE;
483 }
484 else if (ie->ie_Code == SELECTUP)
485 {
486 data->tdd_ButtonPen[1] = SHADOWPEN;
487 data->tdd_ModeLast = data->tdd_Mode;
488 if (data->tdd_Mode != BUT_PLAY)
489 data->tdd_Mode = BUT_PLAY;
490 else
491 data->tdd_Mode = BUT_PAUSE;
492 }
493 }
494 else if ((offset_x > 33) && (offset_x < 50))
495 {
496 D(bug("[tapedeck.gadget]: %s: >>\n", __PRETTY_FUNCTION__));
497 if (ie->ie_Code == SELECTDOWN)
498 {
499 data->tdd_ButtonActive = 3;
500 data->tdd_ButtonPen[2] = SHINEPEN;
501 data->tdd_ModeLast = data->tdd_Mode;
502 data->tdd_Mode = BUT_FORWARD;
503 redraw = TRUE;
504 }
505 else if (ie->ie_Code == SELECTUP)
506 {
507 data->tdd_ButtonPen[2] = SHADOWPEN;
508 data->tdd_Mode = data->tdd_ModeLast;
509 }
510 }
511 }
512
513 if (ie->ie_Code == SELECTUP)
514 {
515 D(bug("[tapedeck.gadget]: %s: SELECTUP\n", __PRETTY_FUNCTION__));
516 if (data->tdd_ButtonActive > 0)
517 {
518 data->tdd_ButtonPen[data->tdd_ButtonActive - 1] = SHADOWPEN;
519 redraw = TRUE;
520 }
521 EG(o)->Flags &= ~GFLG_SELECTED;
522 data->tdd_ButtonActive = 0;
523 retval = GMR_NOREUSE;
524 }
525
526 if ((redraw) &&
527 (rport = ObtainGIRPort (msg->gpi_GInfo)))
528 {
529 struct gpRender gpr;
530
531 gpr.MethodID = GM_RENDER;
532 gpr.gpr_GInfo = msg->gpi_GInfo;
533 gpr.gpr_RPort = rport;
534 gpr.gpr_Redraw = GREDRAW_UPDATE;
535 DoMethodA (o, &gpr);
536
537 ReleaseGIRPort (rport);
538 }
539
540 return retval;
541 }
542
543 /***********************************************************************************/
544
545 IPTR TapeDeck__GM_GOINACTIVE(Class *cl, Object *o, struct gpGoInactive *msg)
546 {
547 struct RastPort *rport;
548
549 D(bug("[tapedeck.gadget]: %s()\n", __PRETTY_FUNCTION__));
550
551 EG(o)->Flags &= ~GFLG_SELECTED;
552
553 rport = ObtainGIRPort(msg->gpgi_GInfo);
554 if (rport)
555 {
556 struct gpRender rmsg = { GM_RENDER, msg->gpgi_GInfo, rport, GREDRAW_UPDATE }, *p_rmsg = &rmsg;
557
558 DoMethodA(o, (Msg)p_rmsg);
559 ReleaseGIRPort(rport);
560 }
561
562 return 0;
563 }
Mirror of AROS' svn.