scalos/main/DtImageClass.c

   1 // DtImageClass.c
   2 // $Date$
   3 // $Revision$
   4
   5
   6 #include <exec/types.h>
   7 #include <graphics/gels.h>
   8 #include <graphics/gfxmacros.h>
   9 #include <graphics/rastport.h>
  10 #include <intuition/classes.h>
  11 #include <intuition/classusr.h>
  12 #include <intuition/imageclass.h>
  13 #include <intuition/newmouse.h>
  14 #include <utility/hooks.h>
  15 #include <libraries/gadtools.h>
  16 #include <datatypes/pictureclass.h>
  17 #include <workbench/workbench.h>
  18 #include <workbench/startup.h>
  19 #include <cybergraphx/cybergraphics.h>
  20 #include <dos/dostags.h>
  21 #include <dos/datetime.h>
  22
  23 #define __USE_SYSBASE
  24
  25 #include <proto/dos.h>
  26 #include <proto/exec.h>
  27 #include <proto/layers.h>
  28 #include <proto/intuition.h>
  29 #include <proto/graphics.h>
  30 #include <proto/utility.h>
  31 #include <proto/locale.h>
  32 #include <proto/cybergraphics.h>
  33 #include <proto/gadtools.h>
  34 #include <proto/datatypes.h>
  35 #include "debug.h"
  36 #include <proto/scalos.h>
  37
  38 #include <clib/alib_protos.h>
  39
  40 #include <defs.h>
  41 #include <scalos/scalos.h>
  42 #include <scalos/GadgetBar.h>
  43
  44 #include <stdlib.h>
  45 #include <stdio.h>
  46 #include <string.h>
  47
  48 #include "scalos_structures.h"
  49 #include "DtImageClass.h"
  50 #include "functions.h"
  51 #include "Variables.h"
  52
  53 //----------------------------------------------------------------------------
  54
  55 // local data definitions
  56
  57 struct DtImageClassInst
  58         {
  59         struct DatatypesImage *bmicl_DtImage;
  60         struct DatatypesImage *bmicl_SelDtImage;
  61         struct DatatypesImage *bmicl_DisabledDtImage;
  62         };
  63
  64 //----------------------------------------------------------------------------
  65
  66 // local functions
  67
  68 static SAVEDS(IPTR) INTERRUPT DtImageClassDispatcher(Class *cl, Object *o, Msg msg);
  69 static IPTR DtImage_New(Class *cl, Object *o, Msg msg);
  70 static ULONG DtImage_Dispose(Class *cl, Object *o, Msg msg);
  71 static ULONG DtImage_Draw(Class *cl, Object *o, Msg msg);
  72 static ULONG DtImage_Get(Class *cl, Object *o, Msg msg);
  73
  74 //----------------------------------------------------------------------------
  75
  76 // public data items :
  77
  78 //----------------------------------------------------------------------------
  79
  80 Class *initDtImageClass(void)
  81 {
  82         Class *DtImageClass;
  83
  84         DtImageClass = MakeClass( NULL,
  85                         (STRPTR) IMAGECLASS,
  86                         NULL,
  87                         sizeof(struct DtImageClassInst),
  88                         0 );
  89
  90         if (DtImageClass)
  91                 {
  92                 // initialize the cl_Dispatcher Hook
  93                 SETHOOKFUNC(DtImageClass->cl_Dispatcher, DtImageClassDispatcher);
  94                 }
  95
  96         return DtImageClass;
  97 }
  98
  99 //----------------------------------------------------------------------------
 100
 101 static SAVEDS(IPTR) INTERRUPT DtImageClassDispatcher(Class *cl, Object *o, Msg msg)
 102 {
 103         ULONG Result;
 104
 105         switch (msg->MethodID)
 106                 {
 107         case OM_NEW:
 108                 Result = DtImage_New(cl, o, msg);
 109                 break;
 110         case OM_DISPOSE:
 111                 Result = DtImage_Dispose(cl, o, msg);
 112                 break;
 113         case IM_DRAW:
 114                 Result = DtImage_Draw(cl, o, msg);
 115                 break;
 116         case OM_GET:
 117                 Result = DtImage_Get(cl, o, msg);
 118                 break;
 119         default:
 120                 Result = DoSuperMethodA(cl, o, msg);
 121                 break;
 122                 }
 123
 124         return Result;
 125 }
 126
 127 //----------------------------------------------------------------------------
 128
 129 static IPTR DtImage_New(Class *cl, Object *o, Msg msg)
 130 {
 131         struct opSet *ops = (struct opSet *) msg;
 132         struct DtImageClassInst *inst;
 133         CONST_STRPTR ImageName;
 134         ULONG Width, Height;
 135
 136         o = (Object *) DoSuperMethodA(cl, o, msg);
 137         d1(KPrintF("%s/%s/%ld: o=%08lx\n", __FILE__, __FUNC__, __LINE__, o));
 138         if (NULL == o)
 139                 return 0;
 140
 141         inst = INST_DATA(cl, o);
 142
 143         memset(inst, 0, sizeof(struct DtImageClassInst));
 144
 145         ImageName = (CONST_STRPTR) GetTagData(DTIMG_ImageName, (IPTR) "", ops->ops_AttrList);
 146         d1(KPrintF("%s/%s/%ld: o=%08lx  ImageName=<%s>\n", __FILE__, __FUNC__, __LINE__, o, ImageName));
 147
 148         inst->bmicl_DtImage = CreateDatatypesImage(ImageName, 0);
 149         d1(KPrintF("%s/%s/%ld: bmicl_DtImage=%08lx\n", __FILE__, __FUNC__, __LINE__, inst->bmicl_DtImage));
 150         if (NULL == inst->bmicl_DtImage)
 151                 {
 152                 DoMethod(o, OM_DISPOSE);
 153                 return 0;
 154                 }
 155
 156         // Selected image is optional
 157         ImageName = (CONST_STRPTR) GetTagData(DTIMG_SelImageName, (IPTR) "", ops->ops_AttrList);
 158         d1(KPrintF("%s/%s/%ld: o=%08lx  SelImageName=<%s>\n", __FILE__, __FUNC__, __LINE__, o, ImageName));
 159
 160         if (ImageName && strlen(ImageName) > 0)
 161                 inst->bmicl_SelDtImage = CreateDatatypesImage(ImageName, 0);
 162         d1(KPrintF("%s/%s/%ld: bmicl_SelDtImage=%08lx\n", __FILE__, __FUNC__, __LINE__, inst->bmicl_SelDtImage));
 163
 164         // Disabled image is optional
 165         ImageName = (CONST_STRPTR) GetTagData(DTIMG_DisabledImageName, (IPTR) "", ops->ops_AttrList);
 166         d1(KPrintF("%s/%s/%ld: o=%08lx  DisabledImageName=<%s>\n", __FILE__, __FUNC__, __LINE__, o, ImageName));
 167
 168         if (ImageName && strlen(ImageName) > 0)
 169                 inst->bmicl_DisabledDtImage = CreateDatatypesImage(ImageName, 0);
 170         d1(KPrintF("%s/%s/%ld: bmicl_DisabledDtImage=%08lx\n", __FILE__, __FUNC__, __LINE__, inst->bmicl_DisabledDtImage));
 171
 172
 173
 174         // set dimensions in superclass
 175         Width = inst->bmicl_DtImage->dti_BitMapHeader->bmh_Width;
 176         Height = inst->bmicl_DtImage->dti_BitMapHeader->bmh_Height;
 177
 178         if (inst->bmicl_SelDtImage)
 179                 {
 180                 // use largest dimensions of normal and selected images
 181                 if (inst->bmicl_SelDtImage->dti_BitMapHeader->bmh_Width > Width)
 182                         Width = inst->bmicl_SelDtImage->dti_BitMapHeader->bmh_Width;
 183                 if (inst->bmicl_SelDtImage->dti_BitMapHeader->bmh_Height > Height)
 184                         Height = inst->bmicl_SelDtImage->dti_BitMapHeader->bmh_Height;
 185                 }
 186
 187         SetAttrs(o,
 188                 IA_Width, Width,
 189                 IA_Height, Height,
 190                 TAG_END);
 191
 192         return (IPTR) o;
 193 }
 194
 195 //----------------------------------------------------------------------------
 196
 197 static ULONG DtImage_Dispose(Class *cl, Object *o, Msg msg)
 198 {
 199         struct DtImageClassInst *inst = INST_DATA(cl, o);
 200
 201         d1(KPrintF("%s/%s/%ld: o=%08lx  bmicl_DtImage=%08lx\n", __FILE__, __FUNC__, __LINE__, o, inst->bmicl_DtImage));
 202
 203         DisposeDatatypesImage(&inst->bmicl_DtImage);
 204         DisposeDatatypesImage(&inst->bmicl_SelDtImage);
 205         DisposeDatatypesImage(&inst->bmicl_DisabledDtImage);
 206
 207         return DoSuperMethodA(cl, o, msg);
 208 }
 209
 210 //----------------------------------------------------------------------------
 211
 212 static ULONG DtImage_Draw(Class *cl, Object *o, Msg msg)
 213 {
 214         struct impDraw *imp = (struct impDraw *) msg;
 215         struct DtImageClassInst *inst = INST_DATA(cl, o);
 216         struct Image *img = (struct Image *) o;
 217         struct DatatypesImage *dtImg;
 218
 219         d1(KPrintF("%s/%s/%ld: o=%08lx  Left=%ld  Top=%ld\n", __FILE__, __FUNC__, __LINE__, o, img->LeftEdge, img->TopEdge));
 220         d1(KPrintF("%s/%s/%ld: Width=%ld  Height=%ld  imp_State=%ld\n", __FILE__, __FUNC__, __LINE__, img->Width, img->Height, imp->imp_State));
 221         d1(KPrintF("%s/%s/%ld: bmicl_SelDtImage=%08lx\n", __FILE__, __FUNC__, __LINE__, inst->bmicl_SelDtImage));
 222
 223         if ((IDS_SELECTED == imp->imp_State) && inst->bmicl_SelDtImage)
 224                 {
 225                 dtImg = inst->bmicl_SelDtImage;
 226                 }
 227         else if ((IDS_DISABLED == imp->imp_State) && inst->bmicl_DisabledDtImage)
 228                 {
 229                 dtImg = inst->bmicl_DisabledDtImage;
 230                 }
 231         else
 232                 {
 233                 dtImg = inst->bmicl_DtImage;
 234                 }
 235
 236         if (dtImg)
 237                 {
 238                 LONG x, y;
 239
 240                 x = img->LeftEdge + imp->imp_Offset.X;
 241                 y = img->TopEdge  + imp->imp_Offset.Y;
 242
 243                 // if normal and selected images have different dimensions, center image in bounding rectangle
 244                 x += (img->Width - dtImg->dti_BitMapHeader->bmh_Width) / 2;
 245                 y += (img->Height - dtImg->dti_BitMapHeader->bmh_Height) / 2;
 246
 247                 d1(kprintf("%s/%s/%ld: x=%ld  y=%ld\n", __FILE__, __FUNC__, __LINE__, x, y));
 248
 249                 DtImageDraw(dtImg,
 250                         imp->imp_RPort,
 251                         x,
 252                         y,
 253                         dtImg->dti_BitMapHeader->bmh_Width,
 254                         dtImg->dti_BitMapHeader->bmh_Height
 255                         );
 256                 }
 257
 258         if ((IDS_DISABLED == imp->imp_State) && NULL == inst->bmicl_DisabledDtImage)
 259                 {
 260                 static UWORD myPattern[] =
 261                         { 0x8888, 0x2222 };
 262                 LONG x, y;
 263
 264                 x = img->LeftEdge + imp->imp_Offset.X;
 265                 y = img->TopEdge  + imp->imp_Offset.Y;
 266
 267                 // if normal and selected images have different dimensions, center image in bounding rectangle
 268                 x += (img->Width - dtImg->dti_BitMapHeader->bmh_Width) / 2;
 269                 y += (img->Height - dtImg->dti_BitMapHeader->bmh_Height) / 2;
 270
 271                 SetABPenDrMd(imp->imp_RPort, 1, 0, JAM1);
 272                 SetAfPt(imp->imp_RPort, myPattern, 1);
 273
 274                 RectFill(imp->imp_RPort, x, y,
 275                         x + img->Width - 1,
 276                         y + img->Height - 1);
 277                 }
 278
 279         d1(kprintf("%s/%s/%ld: END\n", __FILE__, __FUNC__, __LINE__));
 280
 281         return 1;
 282 }
 283
 284 //----------------------------------------------------------------------------
 285
 286 static ULONG DtImage_Get(Class *cl, Object *o, Msg msg)
 287 {
 288         struct opGet *opg = (struct opGet *) msg;
 289         struct DtImageClassInst *inst = INST_DATA(cl, o);
 290         ULONG Result = 1;
 291
 292         if (NULL == opg->opg_Storage)
 293                 return 0;
 294
 295         switch (opg->opg_AttrID)
 296                 {
 297         case IA_SupportsDisable:
 298                 *(opg->opg_Storage) = (ULONG) (NULL != inst->bmicl_DisabledDtImage);
 299                 break;
 300         default:
 301                 Result = DoSuperMethodA(cl, o, msg);
 302                 break;
 303                 }
 304
 305         return Result;
 306 }
 307
 308 //----------------------------------------------------------------------------