rom/intuition/barlabelclass.c

   1 /*
   2     Copyright © 1995-2005, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5
   6     AROS menubarlabelclass implementation (does not exist in AmigaOS)
   7 */
   8
   9 #include <exec/types.h>
  10
  11 #include <dos/dos.h>
  12 #include <dos/dosextens.h>
  13
  14 #include <intuition/intuition.h>
  15 #include <intuition/intuitionbase.h>
  16 #include <intuition/classes.h>
  17 #include <intuition/classusr.h>
  18 #include <intuition/imageclass.h>
  19
  20 #include <graphics/gfxbase.h>
  21 #include <graphics/gfxmacros.h>
  22 #include <graphics/rpattr.h>
  23
  24 #include <cybergraphx/cybergraphics.h>
  25
  26 #include <utility/tagitem.h>
  27 #include <utility/hooks.h>
  28
  29 #include <clib/macros.h>
  30
  31 #include <proto/exec.h>
  32 #include <proto/intuition.h>
  33 #include <proto/graphics.h>
  34 #include <proto/utility.h>
  35 #include <proto/cybergraphics.h>
  36
  37 #ifndef __MORPHOS__
  38 #include <aros/asmcall.h>
  39 #include <proto/alib.h>
  40 #include "intuition_intern.h"
  41 #endif /* !__MORPHOS__ */
  42
  43 #ifdef SKINS
  44 #   include "intuition_customize.h"
  45 #   include "intuition_extend.h"
  46 #endif
  47
  48 #ifdef IntuitionBase
  49 #    undef IntuitionBase
  50 #endif
  51
  52 #define IntuitionBase   ((struct IntuitionBase *)(cl->cl_UserData))
  53
  54 /*************************** BarLabelClass *****************************/
  55
  56 IPTR MenuBarLabelClass__OM_NEW(Class *cl, Object *obj, Msg msg)
  57 {
  58     struct Image *im = (struct Image *)DoSuperMethodA(cl, obj, msg);
  59
  60     if (im)
  61     {
  62         struct MenuBarLabelData *data = INST_DATA(cl, im);
  63         data->dri = NULL;
  64     }
  65
  66     return (IPTR)im;
  67 }
  68
  69 /****************************************************************************/
  70
  71 IPTR MenuBarLabelClass__OM_SET(Class *cl, struct Image *im, struct opSet *msg)
  72 {
  73     struct TagItem *ti;
  74
  75     if ((ti = FindTagItem(SYSIA_DrawInfo, msg->ops_AttrList)))
  76     {
  77         struct MenuBarLabelData *data = INST_DATA(cl, im);
  78
  79         data->dri = (struct DrawInfo *)ti->ti_Data;
  80     }
  81
  82     return DoSuperMethodA(cl, (Object *)im, (Msg)msg);
  83 }
  84
  85 /****************************************************************************/
  86
  87 IPTR MenuBarLabelClass__OM_GET(Class *cl, struct Image *im, struct opGet *msg)
  88 {
  89     switch(msg->opg_AttrID)
  90     {
  91     case IA_SupportsDisable:
  92         if (MENUS_AMIGALOOK)
  93         {
  94             *(msg->opg_Storage) = 0;
  95         }
  96         else
  97         {
  98             *(msg->opg_Storage) = 1;
  99         }
 100         return (IPTR)1;
 101
 102     default:
 103         return DoSuperMethodA(cl, (Object *)im, (Msg)msg);
 104     }
 105 }
 106
 107 /****************************************************************************/
 108
 109 IPTR MenuBarLabelClass__IM_DRAW(Class *cl, struct Image *im, struct impDraw *msg)
 110 {
 111     struct MenuBarLabelData *data = INST_DATA(cl, im);
 112
 113     if (data->dri)
 114     {
 115         struct RastPort *rp = msg->imp_RPort;
 116         WORD x1, y1, x2, y2;
 117
 118         if (!rp) return (IPTR)0;
 119
 120         SetDrMd(rp, JAM1);
 121
 122         x1 = im->LeftEdge + msg->imp_Offset.X;
 123         y1 = im->TopEdge  + msg->imp_Offset.Y;
 124         x2 = x1 + im->Width  - 1;
 125         y2 = y1 + im->Height - 1;
 126
 127
 128         if (MENUS_AMIGALOOK)
 129         {
 130             SetAPen(rp, data->dri->dri_Pens[BARDETAILPEN]);
 131             RectFill(rp, x1, y1, x2, y2);
 132         }
 133         else
 134         {
 135             /* Will only work if imageheight = 2 */
 136             SetAPen(rp, data->dri->dri_Pens[SHADOWPEN]);
 137             RectFill(rp, x1, y1, x2 - 1, y1);
 138             WritePixel(rp, x1, y2);
 139
 140             SetAPen(rp, data->dri->dri_Pens[SHINEPEN]);
 141             RectFill(rp, x1 + 1, y2, x2, y2);
 142             WritePixel(rp, x2, y1);
 143         }
 144
 145     } /* if (data->dri) */
 146
 147     return (IPTR)0;
 148 }
 149
 150 /****************************************************************************/