rom/hidds/graphics/GC_Class.c

   1 /*
   2     Copyright © 1995-2010, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Graphics gc class implementation.
   6     Lang: english
   7 */
   8
   9 /****************************************************************************************/
  10
  11 #include <string.h>
  12
  13 #include <proto/exec.h>
  14 #include <proto/utility.h>
  15 #include <proto/oop.h>
  16
  17 #include <exec/memory.h>
  18 #include <graphics/text.h>
  19 #include <utility/tagitem.h>
  20 #include <oop/oop.h>
  21
  22 #include <hidd/graphics.h>
  23
  24 #include "graphics_intern.h"
  25
  26 #undef  SDEBUG
  27 #define SDEBUG 0
  28 #undef  DEBUG
  29 #define DEBUG 0
  30 #include <aros/debug.h>
  31
  32 /*****************************************************************************************
  33
  34     NAME
  35         aoHidd_GC_UserData
  36
  37     SYNOPSIS
  38         [.SG]
  39
  40     LOCATION
  41         hidd.graphics.gc
  42
  43     FUNCTION
  44         User data
  45
  46     NOTES
  47
  48     EXAMPLE
  49
  50     BUGS
  51
  52     SEE ALSO
  53
  54     INTERNALS
  55
  56 *****************************************************************************************/
  57
  58 /*****************************************************************************************
  59
  60     NAME
  61     aoHidd_GC_BitMap
  62
  63     SYNOPSIS
  64         [I.G]
  65
  66     LOCATION
  67         hidd.graphics.gc
  68
  69     FUNCTION
  70         Bitmap which this gc uses.
  71
  72     NOTES
  73
  74     EXAMPLE
  75
  76     BUGS
  77
  78     SEE ALSO
  79
  80     INTERNALS
  81
  82 *****************************************************************************************/
  83
  84 /*****************************************************************************************
  85
  86     NAME
  87         aoHidd_GC_Foreground
  88
  89     SYNOPSIS
  90         [.SG]
  91
  92     LOCATION
  93         hidd.graphics.gc
  94
  95     FUNCTION
  96         Foreground color
  97
  98     NOTES
  99
 100     EXAMPLE
 101
 102     BUGS
 103
 104     SEE ALSO
 105
 106     INTERNALS
 107
 108 *****************************************************************************************/
 109
 110 /*****************************************************************************************
 111
 112     NAME
 113         aoHidd_GC_Background
 114
 115     SYNOPSIS
 116         [.SG]
 117
 118     LOCATION
 119         hidd.graphics.gc
 120
 121     FUNCTION
 122         Background color
 123
 124     NOTES
 125
 126     EXAMPLE
 127
 128     BUGS
 129
 130     SEE ALSO
 131
 132     INTERNALS
 133
 134 *****************************************************************************************/
 135
 136 /*****************************************************************************************
 137
 138     NAME
 139         aoHidd_GC_DrawMode
 140
 141     SYNOPSIS
 142         [.SG]
 143
 144     LOCATION
 145         hidd.graphics.gc
 146
 147     FUNCTION
 148         Draw mode
 149
 150     NOTES
 151
 152     EXAMPLE
 153
 154     BUGS
 155
 156     SEE ALSO
 157
 158     INTERNALS
 159
 160 *****************************************************************************************/
 161
 162 /*****************************************************************************************
 163
 164     NAME
 165         aoHidd_GC_Font
 166
 167     SYNOPSIS
 168         [.SG]
 169
 170     LOCATION
 171         hidd.graphics.gc
 172
 173     FUNCTION
 174         Current font
 175
 176     NOTES
 177
 178     EXAMPLE
 179
 180     BUGS
 181
 182     SEE ALSO
 183
 184     INTERNALS
 185
 186 *****************************************************************************************/
 187
 188 /*****************************************************************************************
 189
 190     NAME
 191         aoHidd_GC_ColorMask
 192
 193     SYNOPSIS
 194         [.SG]
 195
 196     LOCATION
 197         hidd.graphics.gc
 198
 199     FUNCTION
 200         Prevents some color bits from changing.
 201
 202     NOTES
 203
 204     EXAMPLE
 205
 206     BUGS
 207
 208     SEE ALSO
 209
 210     INTERNALS
 211
 212 *****************************************************************************************/
 213
 214 /*****************************************************************************************
 215
 216     NAME
 217         aoHidd_GC_LinePattern
 218
 219     SYNOPSIS
 220         [.SG]
 221
 222     LOCATION
 223         hidd.graphics.gc
 224
 225     FUNCTION
 226         Pattern for line drawing
 227
 228     NOTES
 229
 230     EXAMPLE
 231
 232     BUGS
 233
 234     SEE ALSO
 235
 236     INTERNALS
 237
 238 *****************************************************************************************/
 239
 240 /*****************************************************************************************
 241
 242     NAME
 243         aoHidd_GC_LinePatternCnt
 244
 245     SYNOPSIS
 246         [.SG]
 247
 248     LOCATION
 249         hidd.graphics.gc
 250
 251     FUNCTION
 252         Pattern start bit for line drawing.
 253
 254     NOTES
 255
 256     EXAMPLE
 257
 258     BUGS
 259
 260     SEE ALSO
 261
 262     INTERNALS
 263
 264 *****************************************************************************************/
 265
 266 /*****************************************************************************************
 267
 268     NAME
 269         aoHidd_GC_PlaneMask
 270
 271     SYNOPSIS
 272         [.SG]
 273
 274     LOCATION
 275         hidd.graphics.gc
 276
 277     FUNCTION
 278         Shape bitmap
 279
 280     NOTES
 281
 282     EXAMPLE
 283
 284     BUGS
 285
 286     SEE ALSO
 287
 288     INTERNALS
 289
 290 *****************************************************************************************/
 291
 292 /*****************************************************************************************
 293
 294     NAME
 295         aoHidd_GC_ColorExpansionMode
 296
 297     SYNOPSIS
 298         [.SG]
 299
 300     LOCATION
 301         hidd.graphics.gc
 302
 303     FUNCTION
 304         Mode for color expansion
 305
 306     NOTES
 307
 308     EXAMPLE
 309
 310     BUGS
 311
 312     SEE ALSO
 313
 314     INTERNALS
 315
 316 *****************************************************************************************/
 317
 318
 319 VOID GC__Root__Set(OOP_Class *cl, OOP_Object *obj, struct pRoot_Set *msg);
 320
 321 #define IS_GC_ATTR(attr, idx) ( ( (idx) = (attr) - HiddGCAttrBase) < num_Hidd_GC_Attrs)
 322
 323 /****************************************************************************************/
 324
 325 OOP_Object *GC__Root__New(OOP_Class *cl, OOP_Object *obj, struct pRoot_New *msg)
 326 {
 327     HIDDT_GC_Intern *data;
 328
 329     EnterFunc(bug("GC::New()\n"));
 330
 331     obj  = (OOP_Object *) OOP_DoSuperMethod(cl, obj, (OOP_Msg) msg);
 332
 333     if(obj)
 334     {
 335         data = OOP_INST_DATA(cl, obj);
 336
 337         /* clear all data and set some default values */
 338
 339         memset(data, 0, sizeof (*data));
 340
 341         data->fg        = 1;        /* foreground color                        */
 342         data->bg        = 0;        /* background color                        */
 343         data->drMode    = vHidd_GC_DrawMode_Copy;    /* drawmode               */
 344         data->colExp    = vHidd_GC_ColExp_Opaque;    /* color expansion mode   */
 345         data->font      = NULL;     /* current fonts                           */
 346         data->colMask   = ~0;       /* ColorMask prevents some color bits from changing*/
 347         data->linePat   = ~0;       /* LinePattern                             */
 348         data->planeMask = NULL;     /* Pointer to a shape bitMap               */
 349
 350         /* Override defaults with user suplied attrs */
 351
 352         OOP_SetAttrs(obj, msg->attrList);
 353         /* GC__Root__Set(cl, obj, &set_msg); */
 354
 355     } /* if(obj) */
 356
 357     ReturnPtr("GC::New", OOP_Object *, obj);
 358 }
 359
 360 /****************************************************************************************/
 361
 362 VOID GC__Root__Set(OOP_Class *cl, OOP_Object *obj, struct pRoot_Set *msg)
 363 {
 364     HIDDT_GC_Intern *data = OOP_INST_DATA(cl, obj);
 365     struct TagItem  *tag, *tstate;
 366     ULONG           idx;
 367
 368     EnterFunc(bug("GC::Set()\n"));
 369
 370     tstate = msg->attrList;
 371     while((tag = NextTagItem((const struct TagItem **)&tstate)))
 372     {
 373         if(IS_GC_ATTR(tag->ti_Tag, idx))
 374         {
 375             switch(idx)
 376             {
 377                 case aoHidd_GC_Foreground:
 378                     data->fg = tag->ti_Data;
 379                     break;
 380
 381                 case aoHidd_GC_Background:
 382                     data->bg = tag->ti_Data;
 383                     break;
 384
 385                 case aoHidd_GC_DrawMode:
 386                     data->drMode = tag->ti_Data;
 387                     break;
 388
 389                 case aoHidd_GC_Font:
 390                     data->font = (APTR) tag->ti_Data;
 391                     break;
 392
 393                 case aoHidd_GC_ColorMask:
 394                     data->colMask = tag->ti_Data;
 395                     break;
 396
 397                 case aoHidd_GC_LinePattern:
 398                     data->linePat = (UWORD) tag->ti_Data;
 399                     break;
 400
 401                 case aoHidd_GC_LinePatternCnt:
 402                     data->linePatCnt = (UWORD) tag->ti_Data;
 403                     break;
 404
 405                 case aoHidd_GC_PlaneMask:
 406                     data->planeMask = (APTR) tag->ti_Data;
 407                     break;
 408
 409                 case aoHidd_GC_ColorExpansionMode:
 410                     data->colExp = tag->ti_Data;
 411                     break;
 412             }
 413         }
 414     }
 415
 416     ReturnVoid("GC::Set");
 417 }
 418
 419 /****************************************************************************************/
 420
 421 VOID GC__Root__Get(OOP_Class *cl, OOP_Object *obj, struct pRoot_Get *msg)
 422 {
 423     HIDDT_GC_Intern *data = OOP_INST_DATA(cl, obj);
 424     ULONG           idx;
 425
 426     EnterFunc(bug("GC::Get() attrID: %i  storage: %p\n", msg->attrID, msg->storage));
 427
 428     if(IS_GC_ATTR(msg->attrID, idx))
 429     {
 430         switch(idx)
 431         {
 432             case aoHidd_GC_Foreground:
 433                  *msg->storage = data->fg;
 434                  break;
 435
 436             case aoHidd_GC_Background:
 437                  *msg->storage = data->bg;
 438                  break;
 439
 440             case aoHidd_GC_DrawMode:
 441                 *msg->storage = data->drMode;
 442                 break;
 443
 444             case aoHidd_GC_Font:
 445                 *msg->storage = (IPTR)data->font;
 446                 break;
 447
 448             case aoHidd_GC_ColorMask:
 449                 *msg->storage = data->colMask;
 450                 break;
 451
 452             case aoHidd_GC_LinePattern:
 453                 *msg->storage = data->linePat;
 454                 break;
 455
 456             case aoHidd_GC_LinePatternCnt:
 457                 *msg->storage = data->linePatCnt;
 458                 break;
 459
 460             case aoHidd_GC_PlaneMask:
 461                 *msg->storage = (IPTR)data->planeMask;
 462                 break;
 463
 464             case aoHidd_GC_ColorExpansionMode:
 465                 *msg->storage = data->colExp;
 466                 break;
 467
 468             default:
 469                 OOP_DoSuperMethod(cl, obj, (OOP_Msg) msg);
 470                 break;
 471         }
 472     }
 473     else
 474     {
 475         OOP_DoSuperMethod(cl, obj, (OOP_Msg) msg);
 476     }
 477
 478 }
 479
 480 /*****************************************************************************************
 481
 482     NAME
 483         moHidd_GC_SetClipRect
 484
 485     SYNOPSIS
 486         VOID OOP_DoMethod(OOP_Object *obj, struct pHidd_GC_SetClipRect *msg);
 487
 488         VOID HIDD_GC_SetClipRect(OOP_Object *obj, LONG x1, LONG y1, LONG x2, LONG y2);
 489
 490     LOCATION
 491         hidd.graphics.gc
 492
 493     FUNCTION
 494
 495     INPUTS
 496         obj -
 497         x1  -
 498         y1  -
 499         x2  -
 500         y2  -
 501
 502     RESULT
 503
 504     NOTES
 505
 506     EXAMPLE
 507
 508     BUGS
 509
 510     SEE ALSO
 511
 512     INTERNALS
 513
 514 *****************************************************************************************/
 515
 516 VOID GC__Hidd_GC__SetClipRect(OOP_Class *cl, OOP_Object *o, struct pHidd_GC_SetClipRect *msg)
 517 {
 518      HIDDT_GC_Intern *data;
 519
 520      data = OOP_INST_DATA(cl, o);
 521
 522      data->clipX1 = msg->x1;
 523      data->clipY1 = msg->y1;
 524      data->clipX2 = msg->x2;
 525      data->clipY2 = msg->y2;
 526
 527      data->doClip = TRUE;
 528 }
 529
 530 /*****************************************************************************************
 531
 532     NAME
 533         moHidd_GC_UnsetClipRect
 534
 535     SYNOPSIS
 536         VOID OOP_DoMethod(OOP_Object *obj, struct pHidd_GC_UnsetClipRect *msg);
 537
 538         VOID HIDD_GC_UnsetClipRect(OOP_Object *obj);
 539
 540     LOCATION
 541         hidd.graphics.gc
 542
 543     FUNCTION
 544
 545     INPUTS
 546         obj -
 547
 548     RESULT
 549
 550     NOTES
 551
 552     EXAMPLE
 553
 554     BUGS
 555
 556     SEE ALSO
 557
 558     INTERNALS
 559
 560 *****************************************************************************************/
 561
 562 VOID GC__Hidd_GC__UnsetClipRect(OOP_Class *cl, OOP_Object *o, struct pHidd_GC_UnsetClipRect *msg)
 563 {
 564      HIDDT_GC_Intern *data;
 565
 566      data = OOP_INST_DATA(cl, o);
 567
 568      data->doClip = FALSE;
 569
 570 }