rom/graphics/setrpattrsa.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$    $Log
   4
   5     Desc: Graphics function SetRPAttrsA()
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <proto/utility.h>
  11 #include <proto/oop.h>
  12
  13 #include "graphics_intern.h"
  14 #include "gfxfuncsupport.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <graphics/rastport.h>
  20 #include <graphics/rpattr.h>
  21 #include <utility/tagitem.h>
  22 #include <proto/graphics.h>
  23
  24         AROS_LH2(void, SetRPAttrsA,
  25
  26 /*  SYNOPSIS */
  27         AROS_LHA(struct RastPort *, rp, A0),
  28         AROS_LHA(struct TagItem  *, tags, A1),
  29
  30 /*  LOCATION */
  31         struct GfxBase *, GfxBase, 173, Graphics)
  32
  33 /*  FUNCTION
  34         Modify rastport with values from a taglist.
  35
  36     INPUTS
  37         rp   - RastPort
  38         tags - see below
  39
  40     TAGS
  41         RPTAG_Font (struct TextFont *)        - Font for Text()
  42         RPTAG_APen (UBYTE)                    - Primary rendering pen
  43         RPTAG_BPen (UBYTE)                    - Secondary rendering pen
  44         RPTAG_DrMd (UBYTE)                    - Drawing mode (graphics/rastport.h)
  45         RPTAG_OutlinePen (UBYTE)              - Area Outline pen
  46         RPTAG_WriteMask (ULONG)               - Bit mask for writing
  47
  48         The following tags are compatible with MorphOS and AmigaOSv4 (V51) :
  49
  50         RPTAG_FgColor (ULONG)                 - Primary rendering color in A8R8G8B8 format.
  51                                                 Only working on hicolor/truecolor bitmaps/screens.
  52         RPTAG_BgColor (ULONG)                 - Secondary rendering color in A8R8G8B8 format.
  53                                                 Only working on hicolor/truecolor bitmaps/screens.
  54         RPTAG_RemapColorFonts (BOOL)          - Automatically remap colorfonts to their color
  55                                                 on hicolor/truecolor screens.
  56
  57         AROS-specific extensions
  58
  59         RPTAG_ClipRectangle (struct Rectangle *) - Clipping rectangle
  60         RPTAG_ClipRectangleFlags (LONG)       - RPCRF_RELRIGHT | RPCRF_RELBOTTOM (see graphics/rpattrs.h)
  61
  62     RESULT
  63
  64     NOTES
  65         Setting one of RPTAG_ClipRectangle or RPTAG_ClipRectangleFlags allocates internal extra data
  66         for the RastPort. After finishing using this RastPort, you need to manually deallocate
  67         the extra data using FreeVec(rp->RP_Extra).
  68
  69     EXAMPLE
  70
  71     BUGS
  72
  73     SEE ALSO
  74         GetRPAttrsA(), graphics/rpattr.h
  75
  76     INTERNALS
  77
  78     HISTORY
  79         29-10-95    digulla automatically created from
  80                             graphics_lib.fd and clib/graphics_protos.h
  81
  82 *****************************************************************************/
  83 {
  84     AROS_LIBFUNC_INIT
  85
  86     struct TagItem *tag, *tstate = tags;
  87     struct gfx_driverdata *driverdata;
  88
  89     while ((tag = NextTagItem (&tstate)))
  90     {
  91         switch (tag->ti_Tag)
  92         {
  93             case RPTAG_Font:
  94                 SetFont (rp, (struct TextFont *)(tag->ti_Data));
  95                 break;
  96
  97             case RPTAG_APen:
  98                 SetAPen (rp, tag->ti_Data);
  99                 break;
 100
 101             case RPTAG_BPen:
 102                 SetBPen (rp, tag->ti_Data);
 103                 break;
 104
 105             case RPTAG_DrMd:
 106                 SetDrMd (rp, tag->ti_Data);
 107                 break;
 108
 109             case RPTAG_OutlinePen:
 110                 SetOutlinePen (rp, tag->ti_Data);
 111                 break;
 112
 113             case RPTAG_WriteMask:
 114                 SetWriteMask (rp, tag->ti_Data);
 115                 break;
 116
 117             case RPTAG_MaxPen:
 118                 break;
 119
 120             case RPTAG_DrawBounds:
 121                 break;
 122
 123             case RPTAG_PenMode:
 124                 D(bug("[SetRPAttrs] RastPort 0x%p, PenMode set to %ld\n", rp, tag->ti_Data));
 125                 if (tag->ti_Data)
 126                     rp->Flags &= ~RPF_NO_PENS;
 127                 else
 128                     rp->Flags |= RPF_NO_PENS;
 129                 break;
 130
 131             case RPTAG_FgColor:
 132             case RPTAG_BgColor:
 133                 D(bug("[SetRPAttrs] RastPort 0x%p, setting %sColor to 0x%08lX\n", rp, (tag->ti_Tag == RPTAG_FgColor) ? "Fg" : "Bg", tag->ti_Data));
 134
 135                 if (rp->BitMap && IS_HIDD_BM(rp->BitMap))
 136                 {
 137                     /* Map ARGB8888 color value to bitmap's format */
 138                     HIDDT_Color col;
 139                     HIDDT_Pixel pixval;
 140                     ULONG rgb = (ULONG)tag->ti_Data;
 141
 142                     /* HIDDT_ColComp are 16 Bit */
 143                     col.alpha   = (HIDDT_ColComp)((rgb >> 16) & 0x0000FF00);
 144                     col.red     = (HIDDT_ColComp)((rgb >> 8) & 0x0000FF00);
 145                     col.green   = (HIDDT_ColComp)(rgb & 0x0000FF00);
 146                     col.blue    = (HIDDT_ColComp)((rgb << 8) & 0x0000FF00);
 147
 148                     pixval = HIDD_BM_MapColor(HIDD_BM_OBJ(rp->BitMap), &col);
 149
 150                     if (tag->ti_Tag == RPTAG_FgColor)
 151                         RP_FGCOLOR(rp) = pixval;
 152                     else
 153                         RP_BGCOLOR(rp) = pixval;
 154                 }
 155                 break;
 156
 157             case RPTAG_ClipRectangle:
 158                 driverdata = AllocDriverData(rp, tag->ti_Data, GfxBase);
 159                 if (driverdata)
 160                 {
 161                     if (tag->ti_Data)
 162                     {
 163                         driverdata->dd_ClipRectangle = *(struct Rectangle *)tag->ti_Data;
 164                         driverdata->dd_ClipRectangleFlags |= RPCRF_VALID;
 165                     }
 166                     else
 167                     {
 168                         driverdata->dd_ClipRectangleFlags &= ~RPCRF_VALID;
 169                     }
 170                 }
 171                 break;
 172
 173             case RPTAG_ClipRectangleFlags:
 174                 driverdata = AllocDriverData(rp, TRUE, GfxBase);
 175                 if (driverdata)
 176                 {
 177                     driverdata->dd_ClipRectangleFlags &= ~(RPCRF_RELRIGHT | RPCRF_RELBOTTOM);
 178                     driverdata->dd_ClipRectangleFlags |= (tag->ti_Data & (RPCRF_RELRIGHT | RPCRF_RELBOTTOM));
 179                 }
 180                 break;
 181
 182             case RPTAG_RemapColorFonts:
 183                 if (tag->ti_Data)
 184                 {
 185                     rp->Flags |= RPF_REMAP_COLORFONTS;
 186                 }
 187                 else
 188                 {
 189                     rp->Flags &= ~RPF_REMAP_COLORFONTS;
 190                 }
 191                 break;
 192
 193         } /* switch (tag) */
 194
 195     } /* while (tag) */
 196
 197     AROS_LIBFUNC_EXIT
 198 } /* SetRPAttrsA */