Subversion Repositories Kolibri OS

/*

 * Mesa 3-D graphics library

 *

 * Copyright 2008 VMware, Inc.

 *

 * 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, sublicense,

 * 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 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 NONINFRINGEMENT.  IN NO EVENT SHALL

 * THE AUTHORS OR COPYRIGHT HOLDERS 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.

 */

/**

 * Code to convert compressed/paletted texture images to ordinary images.

 * See the GL_OES_compressed_paletted_texture spec at

 * http://khronos.org/registry/gles/extensions/OES/OES_compressed_paletted_texture.txt

 *

 * XXX this makes it impossible to add hardware support...

 */

#include "glheader.h"

#include "context.h"

#include "mtypes.h"

#include "imports.h"

#include "pixelstore.h"

#include "texcompress_cpal.h"

#include "teximage.h"

static const struct cpal_format_info {

   GLenum cpal_format;

   GLenum format;

   GLenum type;

   GLuint palette_size;

   GLuint size;

} formats[] = {

   { GL_PALETTE4_RGB8_OES,     GL_RGB,  GL_UNSIGNED_BYTE,           16, 3 },

   { GL_PALETTE4_RGBA8_OES,    GL_RGBA, GL_UNSIGNED_BYTE,           16, 4 },

   { GL_PALETTE4_R5_G6_B5_OES, GL_RGB,  GL_UNSIGNED_SHORT_5_6_5,    16, 2 },

   { GL_PALETTE4_RGBA4_OES,    GL_RGBA, GL_UNSIGNED_SHORT_4_4_4_4,  16, 2 },

   { GL_PALETTE4_RGB5_A1_OES,  GL_RGBA, GL_UNSIGNED_SHORT_5_5_5_1,  16, 2 },

   { GL_PALETTE8_RGB8_OES,     GL_RGB,  GL_UNSIGNED_BYTE,          256, 3 },

   { GL_PALETTE8_RGBA8_OES,    GL_RGBA, GL_UNSIGNED_BYTE,          256, 4 },

   { GL_PALETTE8_R5_G6_B5_OES, GL_RGB,  GL_UNSIGNED_SHORT_5_6_5,   256, 2 },

   { GL_PALETTE8_RGBA4_OES,    GL_RGBA, GL_UNSIGNED_SHORT_4_4_4_4, 256, 2 },

   { GL_PALETTE8_RGB5_A1_OES,  GL_RGBA, GL_UNSIGNED_SHORT_5_5_5_1, 256, 2 }

};

/**

 * Get a color/entry from the palette.

 */

static GLuint

get_palette_entry(const struct cpal_format_info *info, const GLubyte *palette,

                  GLuint index, GLubyte *pixel)

{

   memcpy(pixel, palette + info->size * index, info->size);

   return info->size;

}

/**

 * Convert paletted texture to color texture.

 */

static void

paletted_to_color(const struct cpal_format_info *info, const GLubyte *palette,

                  const void *indices, GLuint num_pixels, GLubyte *image)

{

   GLubyte *pix = image;

   GLuint remain, i;

   if (info->palette_size == 16) {

      /* 4 bits per index */

      const GLubyte *ind = (const GLubyte *) indices;

      /* two pixels per iteration */

      remain = num_pixels % 2;

      for (i = 0; i < num_pixels / 2; i++) {

         pix += get_palette_entry(info, palette, (ind[i] >> 4) & 0xf, pix);

         pix += get_palette_entry(info, palette, ind[i] & 0xf, pix);

      }

      if (remain) {

         get_palette_entry(info, palette, (ind[i] >> 4) & 0xf, pix);

      }

   }

   else {

      /* 8 bits per index */

      const GLubyte *ind = (const GLubyte *) indices;

      for (i = 0; i < num_pixels; i++)

         pix += get_palette_entry(info, palette, ind[i], pix);

   }

}

unsigned

_mesa_cpal_compressed_size(int level, GLenum internalFormat,

			   unsigned width, unsigned height)

{

   const struct cpal_format_info *info;

   const int num_levels = -level + 1;

   int lvl;

   unsigned w, h, expect_size;

   if (internalFormat < GL_PALETTE4_RGB8_OES

       || internalFormat > GL_PALETTE8_RGB5_A1_OES) {

      return 0;

   }

   info = &formats[internalFormat - GL_PALETTE4_RGB8_OES];

   assert(info->cpal_format == internalFormat);

   expect_size = info->palette_size * info->size;

   for (lvl = 0; lvl < num_levels; lvl++) {

      w = width >> lvl;

      if (!w)

         w = 1;

      h = height >> lvl;

      if (!h)

         h = 1;

      if (info->palette_size == 16)

         expect_size += (w * h  + 1) / 2;

      else

         expect_size += w * h;

   }

   return expect_size;

}

/**

 * Convert a call to glCompressedTexImage2D() where internalFormat is a

 *  compressed palette format into a regular GLubyte/RGBA glTexImage2D() call.

 */

void

_mesa_cpal_compressed_teximage2d(GLenum target, GLint level,

				 GLenum internalFormat,

				 GLsizei width, GLsizei height,

				 GLsizei imageSize, const void *palette)

{

   const struct cpal_format_info *info;

   GLint lvl, num_levels;

   const GLubyte *indices;

   GLint saved_align, align;

   GET_CURRENT_CONTEXT(ctx);

   /* By this point, the internalFormat should have been validated.

    */

   assert(internalFormat >= GL_PALETTE4_RGB8_OES

	  && internalFormat <= GL_PALETTE8_RGB5_A1_OES);

   info = &formats[internalFormat - GL_PALETTE4_RGB8_OES];

   num_levels = -level + 1;

   /* first image follows the palette */

   indices = (const GLubyte *) palette + info->palette_size * info->size;

   saved_align = ctx->Unpack.Alignment;

   align = saved_align;

   for (lvl = 0; lvl < num_levels; lvl++) {

      GLsizei w, h;

      GLuint num_texels;

      GLubyte *image = NULL;

      w = width >> lvl;

      if (!w)

         w = 1;

      h = height >> lvl;

      if (!h)

         h = 1;

      num_texels = w * h;

      if (w * info->size % align) {

         _mesa_PixelStorei(GL_UNPACK_ALIGNMENT, 1);

         align = 1;

      }

      /* allocate and fill dest image buffer */

      if (palette) {

         image = malloc(num_texels * info->size);

         paletted_to_color(info, palette, indices, num_texels, image);

      }

      _mesa_TexImage2D(target, lvl, info->format, w, h, 0,

                       info->format, info->type, image);

      free(image);

      /* advance index pointer to point to next src mipmap */

      if (info->palette_size == 16)

         indices += (num_texels + 1) / 2;

      else

         indices += num_texels;

   }

   if (saved_align != align)

      _mesa_PixelStorei(GL_UNPACK_ALIGNMENT, saved_align);

}