rom/graphics/setrpattrsa.c

   1 /*
   2     Copyright © 1995-2001, 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     AROS_LIBBASE_EXT_DECL(struct GfxBase *,GfxBase)
  74
  75     struct TagItem *tag, *tstate = tags;
  76     BOOL            havedriverdata = FALSE;
  77
  78     while ((tag = NextTagItem ((const struct TagItem **)&tstate)))
  79     {
  80         switch (tag->ti_Tag)
  81         {
  82             case RPTAG_Font:
  83                 SetFont (rp, (struct TextFont *)(tag->ti_Data));
  84                 break;
  85
  86             case RPTAG_APen:
  87                 SetAPen (rp, tag->ti_Data);
  88                 break;
  89
  90             case RPTAG_BPen:
  91                 SetBPen (rp, tag->ti_Data);
  92                 break;
  93
  94             case RPTAG_DrMd:
  95                 SetDrMd (rp, tag->ti_Data);
  96                 break;
  97
  98             case RPTAG_OutlinePen:
  99                 SetOutlinePen (rp, tag->ti_Data);
 100                 break;
 101
 102             case RPTAG_WriteMask:
 103                 SetWriteMask (rp, tag->ti_Data);
 104                 break;
 105
 106             case RPTAG_MaxPen:
 107                 break;
 108
 109             case RPTAG_DrawBounds:
 110                 break;
 111
 112             case RPTAG_FgColor:
 113             case RPTAG_BgColor:
 114             {
 115                 IPTR attr;
 116
 117                 if (tag->ti_Tag == RPTAG_FgColor)
 118                 {
 119                     attr = aHidd_GC_Foreground;
 120                     RP_FGCOLOR(rp) = (ULONG)tag->ti_Data;
 121                 }
 122                 else
 123                 {
 124                     attr = aHidd_GC_Background;
 125                     RP_BGCOLOR(rp) = (ULONG)tag->ti_Data;
 126                 }
 127
 128                 if (!rp->BitMap) break;
 129                 if (!IS_HIDD_BM(rp->BitMap)) break;
 130
 131                 if (!havedriverdata)
 132                 {
 133                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 134                 }
 135
 136                 if (havedriverdata)
 137                 {
 138                     struct TagItem col_tags[] =
 139                     {
 140                         { attr, 0   },
 141                         { TAG_DONE  }
 142                     };
 143                     HIDDT_Color col;
 144                     ULONG rgb = (ULONG)tag->ti_Data;
 145
 146                     /* HIDDT_ColComp are 16 Bit */
 147                     col.alpha   = (HIDDT_ColComp)((rgb >> 16) & 0x0000FF00);
 148                     col.red     = (HIDDT_ColComp)((rgb >> 8) & 0x0000FF00);
 149                     col.green   = (HIDDT_ColComp)(rgb & 0x0000FF00);
 150                     col.blue    = (HIDDT_ColComp)((rgb << 8) & 0x0000FF00);
 151
 152                     col_tags[0].ti_Data = HIDD_BM_MapColor(HIDD_BM_OBJ(rp->BitMap), &col);
 153                     OOP_SetAttrs(RP_DRIVERDATA(rp)->dd_GC, col_tags);
 154                 }
 155                 break;
 156
 157             } /**/
 158
 159             case RPTAG_PatternOriginX:
 160                 RP_PATORIGINX(rp) = (WORD)tag->ti_Data;
 161                 break;
 162
 163             case RPTAG_PatternOriginY:
 164                 RP_PATORIGINY(rp) = (WORD)tag->ti_Data;
 165                 break;
 166
 167             case RPTAG_ClipRectangle:
 168                 if (!havedriverdata)
 169                 {
 170                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 171                 }
 172
 173                 if (havedriverdata)
 174                 {
 175                     if (tag->ti_Data)
 176                     {
 177                         RP_DRIVERDATA(rp)->dd_ClipRectangle = *(struct Rectangle *)tag->ti_Data;
 178                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= RPCRF_VALID;
 179                     }
 180                     else
 181                     {
 182                         RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~RPCRF_VALID;
 183                     }
 184                 }
 185                 break;
 186
 187             case RPTAG_ClipRectangleFlags:
 188                 if (!havedriverdata)
 189                 {
 190                     havedriverdata = OBTAIN_DRIVERDATA(rp, GfxBase);
 191                 }
 192
 193                 if (havedriverdata)
 194                 {
 195                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags &= ~(RPCRF_RELRIGHT | RPCRF_RELBOTTOM);
 196                     RP_DRIVERDATA(rp)->dd_ClipRectangleFlags |= (tag->ti_Data & (RPCRF_RELRIGHT | RPCRF_RELBOTTOM));
 197                 }
 198                 break;
 199
 200             case RPTAG_RemapColorFonts:
 201                 if (tag->ti_Data)
 202                 {
 203                     rp->Flags |= RPF_REMAP_COLORFONTS;
 204                 }
 205                 else
 206                 {
 207                     rp->Flags &= ~RPF_REMAP_COLORFONTS;
 208                 }
 209                 break;
 210
 211         } /* switch (tag) */
 212
 213     } /* while (tag) */
 214
 215     if (havedriverdata)
 216     {
 217         RELEASE_DRIVERDATA(rp, GfxBase);
 218     }
 219
 220     AROS_LIBFUNC_EXIT
 221 } /* SetRPAttrsA */