workbench/libs/icon/layouticon.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/debug.h>
   7
   8 #include <exec/types.h>
   9 #include <workbench/icon.h>
  10 #include <utility/tagitem.h>
  11 #include <proto/icon.h>
  12
  13 #include "icon_intern.h"
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18
  19     AROS_LH3(BOOL, LayoutIconA,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct DiskObject *, icon,   A0),
  23         AROS_LHA(struct Screen *,     screen, A1),
  24         AROS_LHA(struct TagItem *,    tags,   A2),
  25
  26 /*  LOCATION */
  27         struct IconBase *, IconBase, 32, Icon)
  28
  29 /*  FUNCTION
  30         Adapt a palette-mapped icon for display.
  31
  32     INPUTS
  33
  34     RESULT
  35
  36     NOTES
  37         Not implemented.
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct NativeIcon *nativeicon;
  52     struct RastPort rp;
  53     struct DrawInfo *dri;
  54     BOOL ret;
  55     ULONG sizex = 0, sizey = 0;
  56     const ULONG bflags = BMF_CLEAR | BMF_DISPLAYABLE | BMF_MINPLANES | BMF_INTERLEAVED;
  57
  58     nativeicon = GetNativeIcon(icon, LB(IconBase));
  59     if (!nativeicon)
  60         return TRUE;
  61
  62     /* Already mapped to this screen?
  63      */
  64     if (screen == nativeicon->iconscr)
  65         return TRUE;
  66
  67     if (nativeicon->iconbm1) {
  68         FreeBitMap(nativeicon->iconbm1);
  69         nativeicon->iconbm1 = NULL;
  70     }
  71     if (nativeicon->iconbm2) {
  72         FreeBitMap(nativeicon->iconbm2);
  73         nativeicon->iconbm2 = NULL;
  74     }
  75     nativeicon->iconscr = NULL;
  76
  77     if (screen == NULL)
  78         screen = GetDefaultPubScreen(NULL);
  79
  80     dri = GetScreenDrawInfo(screen);
  81     if (dri == NULL)
  82         return FALSE;
  83
  84     ret = FALSE;
  85
  86     /* Get the sizex and sizey */
  87     IconControl(icon, ICONCTRLA_GetWidth,  (IPTR)&sizex,
  88                       ICONCTRLA_GetHeight, (IPTR)&sizey,
  89                       TAG_DONE);
  90
  91     D(bug("%s: Screen %p, Depth %d\n", __func__, screen, dri->dri_Depth));
  92     nativeicon->iconbm1 = AllocBitMap(sizex, sizey, dri->dri_Depth, bflags, screen->RastPort.BitMap);
  93     if (nativeicon->iconbm1) {
  94         nativeicon->iconbm2 = AllocBitMap(sizex, sizey, dri->dri_Depth, bflags, screen->RastPort.BitMap);
  95         if (nativeicon->iconbm2) {
  96
  97             /* Draw the normal state */
  98             InitRastPort(&rp);
  99             rp.BitMap = nativeicon->iconbm1;
 100             DrawIconStateA(&rp, icon, NULL, 0, 0, IDS_NORMAL, tags);
 101
 102             /* Draw the selected state */
 103             InitRastPort(&rp);
 104             rp.BitMap = nativeicon->iconbm2;
 105             DrawIconStateA(&rp, icon, NULL, 0, 0, IDS_SELECTED, tags);
 106
 107             nativeicon->iconscr = screen;
 108
 109             ret = TRUE;
 110         } else {
 111             FreeBitMap(nativeicon->iconbm1);
 112             nativeicon->iconbm1 = NULL;
 113         }
 114     }
 115
 116     FreeScreenDrawInfo(screen, dri);
 117
 118     return ret;
 119
 120     AROS_LIBFUNC_EXIT
 121 } /* LayoutIconA() */