rom/graphics/loadrgb32.c

   1 /*
   2     Copyright © 1995-2010, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #define DEBUG 0
   9
  10 #include <aros/debug.h>
  11 #include "graphics_intern.h"
  12 #include <proto/graphics.h>
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17
  18         AROS_LH2(void, LoadRGB32,
  19
  20 /*  SYNOPSIS */
  21         AROS_LHA(struct ViewPort *, vp, A0),
  22         AROS_LHA(const ULONG     *, table, A1),
  23
  24 /*  LOCATION */
  25         struct GfxBase *, GfxBase, 147, Graphics)
  26
  27 /*  FUNCTION
  28         Load RGB color values from table.
  29
  30     INPUTS
  31         vp    - ViewPort
  32         table - pointer to table of records
  33                 1 Word with the number of colors to load
  34                 1 Word with the first color to be loaded.
  35                 3 Longwords representing a left justified 32 bit RGB triplet.
  36                 The list is terminated by a count value of 0.
  37     RESULT
  38
  39     NOTES
  40
  41     EXAMPLE
  42         ULONG table[] = { 1l << 16 + 0 , 0xffffffff , 0 , 0 , 0}
  43         ULONG table[] = { 256l << 16 + 0 , r1 , g1 , b1 , r2 , g2 , b2 , ..... 0}
  44
  45     BUGS
  46
  47     SEE ALSO
  48
  49     INTERNALS
  50
  51     HISTORY
  52         27-11-96    digulla automatically created from
  53                             graphics_lib.fd and clib/graphics_protos.h
  54
  55 *****************************************************************************/
  56 {
  57     AROS_LIBFUNC_INIT
  58
  59     ASSERT_VALID_PTR(vp);
  60     ASSERT_VALID_PTR_OR_NULL(table);
  61
  62     /* it is legal to pass a NULL table */
  63
  64     D(bug("LoadRGB32(0x%p)\n", vp));
  65     if (table)
  66     {
  67         ULONG count;
  68
  69         /* table is terminated by a count value of 0 */
  70
  71         while ((count = (*table) >> 16))
  72         {
  73             ULONG first, t;
  74
  75             first = (*table) & 0xFFFF;
  76
  77             table ++;
  78
  79             D(bug("[LoadRGB32] Setting %u colors starting from %u\n", count, first));
  80             for (t = 0; t < count; t++)
  81             {
  82                 D(bug("[LoadRGB32] Color %u R 0x%08lX G 0x%08lX B %08lX\n", t + first, table[0], table[1], table[2]));
  83                 SetRGB32 (vp,
  84                           t + first,
  85                           table[0],
  86                           table[1],
  87                           table[2]);
  88
  89                 table += 3;
  90             }
  91
  92         } /* while (*table) */
  93     }
  94
  95     AROS_LIBFUNC_EXIT
  96
  97 } /* LoadRGB32 */