rom/hidds/vesa/vesagfx_bitmapclass.c

   1 /*
   2     Copyright © 1995-2017, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Bitmap class for VESA Gfx hidd.
   6     Lang: English.
   7 */
   8
   9 #define __OOP_NOATTRBASES__
  10
  11 #include <proto/oop.h>
  12 #include <proto/utility.h>
  13 #include <assert.h>
  14 #include <exec/memory.h>
  15 #include <exec/lists.h>
  16 #include <graphics/rastport.h>
  17 #include <graphics/gfx.h>
  18 #include <hidd/gfx.h>
  19 #include <oop/oop.h>
  20 #include <aros/symbolsets.h>
  21 #define DEBUG 0
  22 #include <aros/debug.h>
  23
  24 #include <string.h>
  25
  26 #include "vesagfx_hidd.h"
  27
  28 #include LC_LIBDEFS_FILE
  29
  30 #define MNAME_ROOT(x) VESAGfxBM__Root__ ## x
  31 #define MNAME_BM(x) VESAGfxBM__Hidd_BitMap__ ## x
  32
  33 /*********** BitMap::New() *************************************/
  34 OOP_Object *MNAME_ROOT(New)(OOP_Class *cl, OOP_Object *o, struct pRoot_New *msg)
  35 {
  36     EnterFunc(bug("VESAGfx.BitMap::New()\n"));
  37
  38     o = (OOP_Object *)OOP_DoSuperMethod(cl, o, (OOP_Msg) msg);
  39     if (o)
  40     {
  41         OOP_MethodID       disp_mid;
  42         struct VESAGfxBitMapData *data;
  43         HIDDT_ModeID       modeid;
  44         OOP_Object        *sync, *pf;
  45
  46         data = OOP_INST_DATA(cl, o);
  47
  48         /* Get attr values */
  49         OOP_GetAttr(o, aHidd_BitMap_GfxHidd , (APTR)&data->gfxhidd);
  50         OOP_GetAttr(o, aHidd_BitMap_PixFmt  , (APTR)&data->pixfmtobj);
  51         OOP_GetAttr(o, aHidd_BitMap_ModeID  , &modeid);
  52         OOP_GetAttr(o, aHidd_ChunkyBM_Buffer, (IPTR *)&data->VideoData);
  53
  54         HIDD_Gfx_GetMode(data->gfxhidd, modeid, &sync, &pf);
  55
  56         data->width        = OOP_GET(o, aHidd_BitMap_Width);
  57         data->height       = OOP_GET(o, aHidd_BitMap_Height);
  58         data->bytesperline = OOP_GET(o, aHidd_BitMap_BytesPerRow);
  59         data->bytesperpix  = OOP_GET(data->pixfmtobj, aHidd_PixFmt_BytesPerPixel);
  60         data->disp_width   = OOP_GET(sync, aHidd_Sync_HDisp);
  61         data->disp_height  = OOP_GET(sync, aHidd_Sync_VDisp);
  62
  63         D(bug("[VESAGfx:BitMap] Bitmap %ld x % ld, %u bytes per pixel, %u bytes per line\n",
  64               data->width, data->height, data->bytesperpix, data->bytesperline));
  65         D(bug("[VESAGfx:BitMap] Video data at 0x%p (%u bytes)\n", data->VideoData, data->bytesperline * data->height));
  66
  67         if (OOP_GET(data->pixfmtobj, aHidd_PixFmt_ColorModel) != vHidd_ColorModel_Palette)
  68             ReturnPtr("VESAGfx.BitMap::New()", OOP_Object *, o);
  69
  70         data->DAC = AllocMem(768, MEMF_ANY);
  71         D(bug("[VESAGfx:BitMap] Palette data at 0x%p\n", data->DAC));
  72         if (data->DAC)
  73             ReturnPtr("VESAGfx.BitMap::New()", OOP_Object *, o);
  74
  75         disp_mid = OOP_GetMethodID(IID_Root, moRoot_Dispose);
  76
  77         OOP_CoerceMethod(cl, o, (OOP_Msg) &disp_mid);
  78         o = NULL;
  79     } /* if created object */
  80
  81     ReturnPtr("VESAGfx.BitMap::New()", OOP_Object *, o);
  82 }
  83
  84 /**********  Bitmap::Dispose()  ***********************************/
  85 VOID MNAME_ROOT(Dispose)(OOP_Class *cl, OOP_Object *o, OOP_Msg msg)
  86 {
  87     struct VESAGfxBitMapData *data = OOP_INST_DATA(cl, o);
  88
  89     D(bug("[VESAGfx:BitMap] Dispose(0x%p)\n", o));
  90
  91     if (data->DAC)
  92         FreeMem(data->DAC, 768);
  93
  94     OOP_DoSuperMethod(cl, o, msg);
  95
  96     ReturnVoid("VESAGfx.BitMap::Dispose");
  97 }
  98
  99 /*** BitMap::Get() *******************************************/
 100
 101 VOID MNAME_ROOT(Get)(OOP_Class *cl, OOP_Object *o, struct pRoot_Get *msg)
 102 {
 103     struct VESAGfxBitMapData *data = OOP_INST_DATA(cl, o);
 104     ULONG              idx;
 105
 106     if (IS_BM_ATTR(msg->attrID, idx))
 107     {
 108         switch (idx)
 109         {
 110         case aoHidd_BitMap_Visible:
 111             *msg->storage = data->disp;
 112             return;
 113         }
 114     }
 115     OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
 116 }
 117
 118 /*** BitMap::Set() *******************************************/
 119
 120 VOID MNAME_ROOT(Set)(OOP_Class *cl, OOP_Object *o, struct pRoot_Set *msg)
 121 {
 122     struct VESAGfxBitMapData *data = OOP_INST_DATA(cl, o);
 123     struct TagItem  *tag, *tstate;
 124     ULONG           idx;
 125     IPTR xoffset = data->xoffset;
 126     IPTR yoffset = data->yoffset;
 127
 128     tstate = msg->attrList;
 129     while((tag = NextTagItem(&tstate)))
 130     {
 131         if(IS_BM_ATTR(tag->ti_Tag, idx))
 132         {
 133             switch(idx)
 134             {
 135             case aoHidd_BitMap_Visible:
 136                 D(bug("[VESAGfx:BitMap] Setting Visible to %d\n", tag->ti_Data));
 137                 data->disp = tag->ti_Data;
 138                 if (data->disp) {
 139                     if (data->DAC)
 140                         DACLoad(XSD(cl), data->DAC, 0, 256);
 141                 }
 142                 break;
 143             }
 144         }
 145     }
 146
 147     OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
 148
 149     /* Bring local X/Y offsets back into sync with validated values */
 150     OOP_GetAttr(o, aHidd_BitMap_LeftEdge, &xoffset);
 151     OOP_GetAttr(o, aHidd_BitMap_TopEdge, &yoffset);
 152
 153     if ((xoffset != data->xoffset) || (yoffset != data->yoffset))
 154     {
 155         D(bug("[VESAGfx:BitMap] Scroll to (%d, %d)\n", xoffset, yoffset));
 156         data->xoffset = xoffset;
 157         data->yoffset = yoffset;
 158
 159         if (data->disp)
 160         {
 161             LOCK_FRAMEBUFFER(XSD(cl));
 162             vesaDoRefreshArea(&XSD(cl)->data, data, 0, 0, data->width, data->height);
 163             UNLOCK_FRAMEBUFFER(XSD(cl));
 164         }
 165     }
 166 }
 167
 168 /*** BitMap::SetColors() *************************************/
 169
 170 BOOL MNAME_BM(SetColors)(OOP_Class *cl, OOP_Object *o, struct pHidd_BitMap_SetColors *msg)
 171 {
 172     struct VESAGfxBitMapData *data = OOP_INST_DATA(cl, o);
 173     struct HWData *hwdata = &XSD(cl)->data;
 174     ULONG xc_i, col_i;
 175     UBYTE p_shift;
 176     UWORD red, green, blue;
 177
 178     D(bug("[VESAGfx:BitMap] SetColors(%u, %u)\n", msg->firstColor, msg->numColors));
 179
 180     if (!OOP_DoSuperMethod(cl, o, (OOP_Msg)msg)) {
 181         D(bug("[VESAGfx:BitMap] DoSuperMethod() failed\n"));
 182         return FALSE;
 183     }
 184
 185     if ((msg->firstColor + msg->numColors) > (1 << data->bpp))
 186         return FALSE;
 187
 188     if (data->DAC) {
 189         for ( xc_i = msg->firstColor, col_i = 0;
 190               col_i < msg->numColors;
 191               xc_i ++, col_i ++) {
 192             red   = msg->colors[col_i].red   >> 8;
 193             green = msg->colors[col_i].green >> 8;
 194             blue  = msg->colors[col_i].blue  >> 8;
 195
 196             /* Update DAC registers */
 197             p_shift = 8 - hwdata->palettewidth;
 198             data->DAC[xc_i*3] = red >> p_shift;
 199             data->DAC[xc_i*3+1] = green >> p_shift;
 200             data->DAC[xc_i*3+2] = blue >> p_shift;
 201         }
 202
 203         /* Upload palette to the DAC if the current bitmap is on display */
 204         if (data->disp)
 205             DACLoad(XSD(cl), data->DAC, msg->firstColor, msg->numColors);
 206     }
 207     return TRUE;
 208 }
 209
 210 VOID MNAME_BM(UpdateRect)(OOP_Class *cl, OOP_Object *o, struct pHidd_BitMap_UpdateRect *msg)
 211 {
 212     struct VESAGfxBitMapData *data = OOP_INST_DATA(cl, o);
 213
 214     D(bug("[VESAGfx:BitMap] UpdateRect(%d, %d, %d, %d), bitmap 0x%p\n", msg->x, msg->y, msg->width, msg->height, o));
 215     if (data->disp) {
 216         LOCK_FRAMEBUFFER(XSD(cl));
 217         vesaDoRefreshArea(&XSD(cl)->data, data, msg->x, msg->y, msg->x + msg->width, msg->y + msg->height);
 218         UNLOCK_FRAMEBUFFER(XSD(cl));
 219     }
 220 }