workbench/classes/zune/iconimage/iconimage.c

   1 /*
   2     Copyright © 2003-2011, The AROS Development Team. All rights reserved.
   3     This file is part of the IconImage class, which is distributed under
   4     the terms of version 2.1 of the GNU Lesser General Public License.
   5
   6     $Id$
   7 */
   8
   9 #define MUIMASTER_YES_INLINE_STDARG
  10
  11 #include <workbench/workbench.h>
  12 #include <workbench/icon.h>
  13 #include <utility/tagitem.h>
  14 #include <libraries/mui.h>
  15 #include <dos/dos.h>
  16
  17 #include <proto/alib.h>
  18 #include <proto/muimaster.h>
  19 #include <proto/intuition.h>
  20 #include <proto/utility.h>
  21 #include <proto/locale.h>
  22 #include <proto/dos.h>
  23 #include <proto/icon.h>
  24
  25 #include <string.h>
  26
  27 #include "iconimage.h"
  28 #include "iconimage_private.h"
  29
  30
  31 /*** Methods ****************************************************************/
  32 Object *IconImage__OM_NEW
  33 (
  34     Class *CLASS, Object *self, struct opSet *message
  35 )
  36 {
  37     struct IconImage_DATA *data       = NULL;
  38     struct TagItem        *tstate = message->ops_AttrList;
  39     struct TagItem        *tag        = NULL;
  40     struct DiskObject     *diskObject = NULL;
  41     CONST_STRPTR           file       = NULL;
  42
  43     while ((tag = NextTagItem(&tstate)) != NULL)
  44     {
  45         switch (tag->ti_Tag)
  46         {
  47             case MUIA_IconImage_DiskObject:
  48                 diskObject = (struct DiskObject *) tag->ti_Data;
  49                 break;
  50
  51             case MUIA_IconImage_File:
  52                 file = (CONST_STRPTR) tag->ti_Data;
  53                 break;
  54         }
  55     }
  56
  57     if (diskObject == NULL && file == NULL) goto error; /* Must specify one */
  58     if (diskObject != NULL && file != NULL) goto error; /* Cannot specify both */
  59
  60     if (diskObject == NULL && file != NULL)
  61     {
  62         diskObject = GetDiskObjectNew(file);
  63         if (diskObject == NULL) goto error;
  64     }
  65
  66     self = (Object *) DoSuperNewTags
  67     (
  68         CLASS, self, NULL,
  69
  70         MUIA_FillArea,        FALSE,
  71         TAG_MORE,      (IPTR) message->ops_AttrList
  72     );
  73
  74     if (self == NULL) goto error;
  75
  76     data = INST_DATA(CLASS, self);
  77     data->iid_DiskObject = diskObject;
  78
  79     return self;
  80
  81 error:
  82     return NULL;
  83 }
  84
  85 IPTR IconImage__MUIM_Draw
  86 (
  87     Class *CLASS, Object *self, struct MUIP_Draw *message
  88 )
  89 {
  90     struct IconImage_DATA *data = INST_DATA(CLASS, self);
  91     IPTR                   rc   = DoSuperMethodA(CLASS, self, (Msg) message);
  92     IPTR                   selected = 0;
  93
  94     DoMethod
  95     (
  96         self, MUIM_DrawParentBackground,
  97         _mleft(self), _mtop(self), _mwidth(self), _mheight(self), 0, 0, 0
  98     );
  99
 100     get(self, MUIA_Selected, &selected);
 101
 102     LayoutIcon(data->iid_DiskObject, _screen(self), TAG_END);
 103
 104     DrawIconState
 105     (
 106         _rp(self), data->iid_DiskObject, NULL,
 107         _mleft(self), _mtop(self), selected ? IDS_SELECTED : IDS_NORMAL,
 108
 109         ICONDRAWA_Frameless,       TRUE,
 110         ICONDRAWA_Borderless,      TRUE,
 111         ICONDRAWA_EraseBackground, FALSE,
 112         TAG_DONE
 113     );
 114
 115     return rc;
 116 }
 117
 118 IPTR IconImage__MUIM_AskMinMax
 119 (
 120     Class *CLASS, Object *self, struct MUIP_AskMinMax *message
 121 )
 122 {
 123     struct IconImage_DATA *data = INST_DATA(CLASS, self);
 124     IPTR                   rc   = DoSuperMethodA(CLASS, self, (Msg) message);
 125     struct Rectangle       size;
 126
 127     memset(&size, 0, sizeof(struct Rectangle));
 128
 129     LayoutIcon(data->iid_DiskObject, _screen(self), TAG_END);
 130     if
 131     (
 132         GetIconRectangle
 133         (
 134             _rp(self), data->iid_DiskObject, NULL, &size,
 135
 136             ICONDRAWA_Borderless, TRUE,
 137             TAG_DONE
 138         )
 139     )
 140     {
 141         WORD w = size.MaxX - size.MinX + 1;
 142         WORD h = size.MaxY - size.MinY + 1;
 143
 144         message->MinMaxInfo->MinWidth  += w;
 145         message->MinMaxInfo->MaxWidth  += w;
 146         message->MinMaxInfo->DefWidth  += w;
 147         message->MinMaxInfo->MinHeight += h;
 148         message->MinMaxInfo->MaxHeight += h;
 149         message->MinMaxInfo->DefHeight += h;
 150     }
 151
 152     return rc;
 153 }