/**************************************************************************
 * 
 * Copyright 2007 Tungsten Graphics, Inc., Cedar Park, Texas.
 * All Rights Reserved.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the
 * "Software"), to deal in the Software without restriction, including
 * without limitation the rights to use, copy, modify, merge, publish,
 * distribute, sub license, and/or sell copies of the Software, and to
 * permit persons to whom the Software is furnished to do so, subject to
 * the following conditions:
 * 
 * The above copyright notice and this permission notice (including the
 * next paragraph) shall be included in all copies or substantial portions
 * of the Software.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 * 
 **************************************************************************/



#ifndef SPU_COLORPACK_H
#define SPU_COLORPACK_H


#include <spu_intrinsics.h>


static INLINE unsigned int
spu_pack_R8G8B8A8(vector float rgba)
{
  vector unsigned int out = spu_convtu(rgba, 32);

  out = spu_shuffle(out, out, ((vector unsigned char) {
                                  0, 4, 8, 12, 0, 0, 0, 0, 
                                  0, 0, 0, 0, 0, 0, 0, 0 }) );

  return spu_extract(out, 0);
}


static INLINE unsigned int
spu_pack_A8R8G8B8(vector float rgba)
{
  vector unsigned int out = spu_convtu(rgba, 32);
  out = spu_shuffle(out, out, ((vector unsigned char) {
                                  12, 0, 4, 8, 0, 0, 0, 0, 
                                  0, 0, 0, 0, 0, 0, 0, 0}) );
  return spu_extract(out, 0);
}


static INLINE unsigned int
spu_pack_B8G8R8A8(vector float rgba)
{
  vector unsigned int out = spu_convtu(rgba, 32);
  out = spu_shuffle(out, out, ((vector unsigned char) {
                                  8, 4, 0, 12, 0, 0, 0, 0, 
                                  0, 0, 0, 0, 0, 0, 0, 0}) );
  return spu_extract(out, 0);
}


static INLINE unsigned int
spu_pack_color_shuffle(vector float rgba, vector unsigned char shuffle)
{
  vector unsigned int out = spu_convtu(rgba, 32);
  out = spu_shuffle(out, out, shuffle);
  return spu_extract(out, 0);
}


static INLINE vector float
spu_unpack_color(uint color)
{
   vector unsigned int color_u4 = spu_splats(color);
   color_u4 = spu_shuffle(color_u4, color_u4,
                          ((vector unsigned char) {
                             0, 0, 0, 0,
                             5, 5, 5, 5,
                             10, 10, 10, 10,
                             15, 15, 15, 15}) );
   return spu_convtf(color_u4, 32);
}


static INLINE vector float
spu_unpack_A8R8G8B8(uint color)
{
   vector unsigned int color_u4 = spu_splats(color);
   color_u4 = spu_shuffle(color_u4, color_u4,
                          ((vector unsigned char) {
                             5, 5, 5, 5,
                             10, 10, 10, 10,
                             15, 15, 15, 15,
                             0, 0, 0, 0}) );

   return spu_convtf(color_u4, 32);
}


#endif /* SPU_COLORPACK_H */