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 - tagarray
  36                - RPTAG_Font:       text font
  37                - RPTAG_APen:       primary pen
  38                - RPTAG_BPen:       secondary pen
  39                - RPTAG_DrMd:       draw mode
  40                - RPTAG_OutlinePen: outline pen
  41                - RPTAG_WriteMask:  bit mask
  42                - RPTAG_MaxPen:     see SetMaxPen()
  43
  44                AROS extensions
  45                - RPTAG_DrawBounds:
  46                - RPTAG_FgColor:
  47                - RPTAG_BgColor:
  48                - RPTAG_PatternOriginX:
  49                - RPTAG_PatternOriginY:
  50                - RPTAG_ClipRectangle:       (struct Rectangle *)
  51                - RPTAG_ClipRectangleFlags:  RPCRF_RELRIGHT | RPCRF_RELBOTTOM
  52                - RPTAG_RemapColorFonts:     (BOOL)
  53
  54     RESULT
  55
  56     NOTES
  57
  58     EXAMPLE
  59
  60     BUGS
  61
  62     SEE ALSO
  63
  64     INTERNALS
  65
  66     HISTORY
  67         29-10-95    digulla automatically created from
  68                             graphics_lib.fd and clib/graphics_protos.h
  69
  70 *****************************************************************************/
  71 {
  72     AROS_LIBFUNC_INIT
  73
  74     struct TagItem *tag, *tstate = tags;
  75     BOOL            havedriverdata = FALSE;
  76
  77     while ((tag = NextTagItem ((const struct TagItem **)&tstate)))
  78     {
  79         switch (tag->ti_Tag)
  80         {
  81             case RPTAG_Font:
  82                 SetFont (rp, (struct TextFont *)(tag->ti_Data));
  83                 break;
  84
  85             case RPTAG_APen:
  86                 SetAPen (rp, tag->ti_Data);
  87                 break;
  88
  89             case RPTAG_BPen:
  90                 SetBPen (rp, tag->ti_Data);
  91                 break;
  92
  93             case RPTAG_DrMd:
  94                 SetDrMd (rp, tag->ti_Data);
  95                 break;
  96
  97             case RPTAG_OutlinePen:
  98                 SetOutlinePen (rp, tag->ti_Data);
  99                 break;
 100
 101             case RPTAG_WriteMask:
 102                 SetWriteMask (rp, tag->ti_Data);
 103                 break;
 104
 105             case RPTAG_MaxPen:
 106                 break;
 107
 108             case RPTAG_DrawBounds:
 109                 break;
 110
 111             case RPTAG_FgColor:
 112             case RPTAG_BgColor:
 113             {
 114                 IPTR attr;
 115
 116                 if (tag->ti_Tag == RPTAG_FgColor)
 117                 {
 118                     attr = aHidd_GC_Foreground;
 119                     RP_FGCOLOR(rp) = (ULONG)tag->ti_Data;
 120                 }
 121                 else
 122                 {
 123                     attr = aHidd_GC_Background;
 124                     RP_BGCOLOR(rp) = (ULONG)tag->ti_Data;
 125                 }
 126
 127                 if (!rp->BitMap) break;
 128                 if (!IS_HIDD_BM(rp->BitMap)) break;
 129
 130                 if (!havedriverdata)
 131                 {
 132                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 133                 }
 134
 135                 if (havedriverdata)
 136                 {
 137                     struct TagItem col_tags[] =
 138                     {
 139                         { attr, 0   },
 140                         { TAG_DONE  }
 141                     };
 142                     HIDDT_Color col;
 143                     ULONG rgb = (ULONG)tag->ti_Data;
 144
 145                     /* HIDDT_ColComp are 16 Bit */
 146                     col.alpha   = (HIDDT_ColComp)((rgb >> 16) & 0x0000FF00);
 147                     col.red     = (HIDDT_ColComp)((rgb >> 8) & 0x0000FF00);
 148                     col.green   = (HIDDT_ColComp)(rgb & 0x0000FF00);
 149                     col.blue    = (HIDDT_ColComp)((rgb << 8) & 0x0000FF00);
 150
 151                     col_tags[0].ti_Data = HIDD_BM_MapColor(HIDD_BM_OBJ(rp->BitMap), &col);
 152                     OOP_SetAttrs(RP_DRIVERDATA(rp)->dd_GC, col_tags);
 153                 }
 154                 break;
 155
 156             } /**/
 157
 158             case RPTAG_PatternOriginX:
 159                 RP_PATORIGINX(rp) = (WORD)tag->ti_Data;
 160                 break;
 161
 162             case RPTAG_PatternOriginY:
 163                 RP_PATORIGINY(rp) = (WORD)tag->ti_Data;
 164                 break;
 165
 166             case RPTAG_ClipRectangle:
 167                 if (!havedriverdata)
 168                 {
 169                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 170                 }
 171
 172                 if (havedriverdata)
 173                 {
 174                     if (tag->ti_Data)
 175                     {
 176                         RP_DRIVERDATA(rp)->dd_ClipRectangle = *(struct Rectangle *)tag->ti_Data;
 177                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= RPCRF_VALID;
 178                     }
 179                     else
 180                     {
 181                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~RPCRF_VALID;
 182                     }
 183                 }
 184                 break;
 185
 186             case RPTAG_ClipRectangleFlags:
 187                 if (!havedriverdata)
 188                 {
 189                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 190                 }
 191
 192                 if (havedriverdata)
 193                 {
 194                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~(RPCRF_RELRIGHT | RPCRF_RELBOTTOM);
 195                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= (tag->ti_Data & (RPCRF_RELRIGHT | RPCRF_RELBOTTOM));
 196                 }
 197                 break;
 198
 199             case RPTAG_RemapColorFonts:
 200                 if (tag->ti_Data)
 201                 {
 202                     rp->Flags |= RPF_REMAP_COLORFONTS;
 203                 }
 204                 else
 205                 {
 206                     rp->Flags &= ~RPF_REMAP_COLORFONTS;
 207                 }
 208                 break;
 209
 210         } /* switch (tag) */
 211
 212     } /* while (tag) */
 213
 214     if (havedriverdata)
 215     {
 216         RELEASE_DRIVERDATA(rp, GfxBase);
 217     }
 218
 219     AROS_LIBFUNC_EXIT
 220 } /* SetRPAttrsA */