rom/graphics/setrpattrsa.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$    $Log
   4
   5     Desc: Graphics function SetRPAttrsA()
   6     Lang: english
   7 */
   8 #include "graphics_intern.h"
   9 #include <proto/utility.h>
  10 #include <proto/oop.h>
  11 #include "gfxfuncsupport.h"
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16 #include <graphics/rastport.h>
  17 #include <graphics/rpattr.h>
  18 #include <utility/tagitem.h>
  19 #include <proto/graphics.h>
  20
  21         AROS_LH2(void, SetRPAttrsA,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(struct RastPort *, rp, A0),
  25         AROS_LHA(struct TagItem  *, tags, A1),
  26
  27 /*  LOCATION */
  28         struct GfxBase *, GfxBase, 173, Graphics)
  29
  30 /*  FUNCTION
  31         Modify rastport with values from a taglist.
  32
  33     INPUTS
  34         rp   - RastPort
  35         tags - see below
  36
  37     TAGS
  38         RPTAG_Font (struct TextFont *)        - Font for Text()
  39         RPTAG_APen (UBYTE)                    - Primary rendering pen
  40         RPTAG_BPen (UBYTE)                    - Secondary rendering pen
  41         RPTAG_DrMd (UBYTE)                    - Drawing mode (graphics/rastport.h)
  42         RPTAG_OutlinePen (UBYTE)              - Area Outline pen
  43         RPTAG_WriteMask (ULONG)               - Bit mask for writing
  44
  45         AROS extensions
  46         RPTAG_FgColor (ULONG)                 - Primary rendering color in A8R8G8B8 format.
  47                                                 Only working on hicolor/truecolor bitmaps/screens.
  48         RPTAG_BgColor (ULONG)                 - Secondary rendering color in A8R8G8B8 format.
  49                                                 Only working on hicolor/truecolor bitmaps/screens.
  50         RPTAG_PatternOriginX (WORD)           - X origin of pattern
  51         RPTAG_PatternOriginY (WORD)           - Y origin of pattern
  52         RPTAG_ClipRectangle (struct Rectangle *) - Clipping rectangle
  53         RPTAG_ClipRectangleFlags (LONG)       - RPCRF_RELRIGHT | RPCRF_RELBOTTOM (see graphics/rpattrs.h)
  54         RPTAG_RemapColorFonts (BOOL)          - Automatically remap colorfonts to their color
  55                                                 on hicolor/truecolor screens.
  56
  57     RESULT
  58
  59     NOTES
  60
  61     EXAMPLE
  62
  63     BUGS
  64
  65     SEE ALSO
  66         GetRPAttrsA(), graphics/rpattr.h
  67
  68     INTERNALS
  69
  70     HISTORY
  71         29-10-95    digulla automatically created from
  72                             graphics_lib.fd and clib/graphics_protos.h
  73
  74 *****************************************************************************/
  75 {
  76     AROS_LIBFUNC_INIT
  77
  78     struct TagItem *tag, *tstate = tags;
  79     BOOL            havedriverdata = FALSE;
  80
  81     while ((tag = NextTagItem ((const struct TagItem **)&tstate)))
  82     {
  83         switch (tag->ti_Tag)
  84         {
  85             case RPTAG_Font:
  86                 SetFont (rp, (struct TextFont *)(tag->ti_Data));
  87                 break;
  88
  89             case RPTAG_APen:
  90                 SetAPen (rp, tag->ti_Data);
  91                 break;
  92
  93             case RPTAG_BPen:
  94                 SetBPen (rp, tag->ti_Data);
  95                 break;
  96
  97             case RPTAG_DrMd:
  98                 SetDrMd (rp, tag->ti_Data);
  99                 break;
 100
 101             case RPTAG_OutlinePen:
 102                 SetOutlinePen (rp, tag->ti_Data);
 103                 break;
 104
 105             case RPTAG_WriteMask:
 106                 SetWriteMask (rp, tag->ti_Data);
 107                 break;
 108
 109             case RPTAG_MaxPen:
 110                 break;
 111
 112             case RPTAG_DrawBounds:
 113                 break;
 114
 115             case RPTAG_FgColor:
 116             case RPTAG_BgColor:
 117             {
 118                 IPTR attr;
 119
 120                 if (tag->ti_Tag == RPTAG_FgColor)
 121                 {
 122                     attr = aHidd_GC_Foreground;
 123                     RP_FGCOLOR(rp) = (ULONG)tag->ti_Data;
 124                 }
 125                 else
 126                 {
 127                     attr = aHidd_GC_Background;
 128                     RP_BGCOLOR(rp) = (ULONG)tag->ti_Data;
 129                 }
 130
 131                 if (!rp->BitMap) break;
 132                 if (!IS_HIDD_BM(rp->BitMap)) break;
 133
 134                 if (!havedriverdata)
 135                 {
 136                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 137                 }
 138
 139                 if (havedriverdata)
 140                 {
 141                     struct TagItem col_tags[] =
 142                     {
 143                         { attr, 0   },
 144                         { TAG_DONE  }
 145                     };
 146                     HIDDT_Color col;
 147                     ULONG rgb = (ULONG)tag->ti_Data;
 148
 149                     /* HIDDT_ColComp are 16 Bit */
 150                     col.alpha   = (HIDDT_ColComp)((rgb >> 16) & 0x0000FF00);
 151                     col.red     = (HIDDT_ColComp)((rgb >> 8) & 0x0000FF00);
 152                     col.green   = (HIDDT_ColComp)(rgb & 0x0000FF00);
 153                     col.blue    = (HIDDT_ColComp)((rgb << 8) & 0x0000FF00);
 154
 155                     col_tags[0].ti_Data = HIDD_BM_MapColor(HIDD_BM_OBJ(rp->BitMap), &col);
 156                     OOP_SetAttrs(RP_DRIVERDATA(rp)->dd_GC, col_tags);
 157                 }
 158                 break;
 159
 160             } /**/
 161
 162             case RPTAG_PatternOriginX:
 163                 RP_PATORIGINX(rp) = (WORD)tag->ti_Data;
 164                 break;
 165
 166             case RPTAG_PatternOriginY:
 167                 RP_PATORIGINY(rp) = (WORD)tag->ti_Data;
 168                 break;
 169
 170             case RPTAG_ClipRectangle:
 171                 if (!havedriverdata)
 172                 {
 173                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 174                 }
 175
 176                 if (havedriverdata)
 177                 {
 178                     if (tag->ti_Data)
 179                     {
 180                         RP_DRIVERDATA(rp)->dd_ClipRectangle = *(struct Rectangle *)tag->ti_Data;
 181                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= RPCRF_VALID;
 182                     }
 183                     else
 184                     {
 185                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~RPCRF_VALID;
 186                     }
 187                 }
 188                 break;
 189
 190             case RPTAG_ClipRectangleFlags:
 191                 if (!havedriverdata)
 192                 {
 193                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 194                 }
 195
 196                 if (havedriverdata)
 197                 {
 198                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~(RPCRF_RELRIGHT | RPCRF_RELBOTTOM);
 199                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= (tag->ti_Data & (RPCRF_RELRIGHT | RPCRF_RELBOTTOM));
 200                 }
 201                 break;
 202
 203             case RPTAG_RemapColorFonts:
 204                 if (tag->ti_Data)
 205                 {
 206                     rp->Flags |= RPF_REMAP_COLORFONTS;
 207                 }
 208                 else
 209                 {
 210                     rp->Flags &= ~RPF_REMAP_COLORFONTS;
 211                 }
 212                 break;
 213
 214         } /* switch (tag) */
 215
 216     } /* while (tag) */
 217
 218     if (havedriverdata)
 219     {
 220         RELEASE_DRIVERDATA(rp, GfxBase);
 221     }
 222
 223     AROS_LIBFUNC_EXIT
 224 } /* SetRPAttrsA */