mirror of https://github.com/encounter/SDL.git
1126 lines
31 KiB
C
1126 lines
31 KiB
C
/*
|
|
Simple DirectMedia Layer
|
|
Copyright (C) 1997-2019 Sam Lantinga <slouken@libsdl.org>
|
|
|
|
This software is provided 'as-is', without any express or implied
|
|
warranty. In no event will the authors be held liable for any damages
|
|
arising from the use of this software.
|
|
|
|
Permission is granted to anyone to use this software for any purpose,
|
|
including commercial applications, and to alter it and redistribute it
|
|
freely, subject to the following restrictions:
|
|
|
|
1. The origin of this software must not be misrepresented; you must not
|
|
claim that you wrote the original software. If you use this software
|
|
in a product, an acknowledgment in the product documentation would be
|
|
appreciated but is not required.
|
|
2. Altered source versions must be plainly marked as such, and must not be
|
|
misrepresented as being the original software.
|
|
3. This notice may not be removed or altered from any source distribution.
|
|
*/
|
|
#include "../SDL_internal.h"
|
|
|
|
/* General (mostly internal) pixel/color manipulation routines for SDL */
|
|
|
|
#include "SDL_endian.h"
|
|
#include "SDL_video.h"
|
|
#include "SDL_sysvideo.h"
|
|
#include "SDL_blit.h"
|
|
#include "SDL_pixels_c.h"
|
|
#include "SDL_RLEaccel_c.h"
|
|
|
|
|
|
/* Lookup tables to expand partial bytes to the full 0..255 range */
|
|
|
|
static Uint8 lookup_0[] = {
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255
|
|
};
|
|
|
|
static Uint8 lookup_1[] = {
|
|
0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 50, 52, 54, 56, 58, 60, 62, 64, 66, 68, 70, 72, 74, 76, 78, 80, 82, 84, 86, 88, 90, 92, 94, 96, 98, 100, 102, 104, 106, 108, 110, 112, 114, 116, 118, 120, 122, 124, 126, 128, 130, 132, 134, 136, 138, 140, 142, 144, 146, 148, 150, 152, 154, 156, 158, 160, 162, 164, 166, 168, 170, 172, 174, 176, 178, 180, 182, 184, 186, 188, 190, 192, 194, 196, 198, 200, 202, 204, 206, 208, 210, 212, 214, 216, 218, 220, 222, 224, 226, 228, 230, 232, 234, 236, 238, 240, 242, 244, 246, 248, 250, 252, 255
|
|
};
|
|
|
|
static Uint8 lookup_2[] = {
|
|
0, 4, 8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60, 64, 68, 72, 76, 80, 85, 89, 93, 97, 101, 105, 109, 113, 117, 121, 125, 129, 133, 137, 141, 145, 149, 153, 157, 161, 165, 170, 174, 178, 182, 186, 190, 194, 198, 202, 206, 210, 214, 218, 222, 226, 230, 234, 238, 242, 246, 250, 255
|
|
};
|
|
|
|
static Uint8 lookup_3[] = {
|
|
0, 8, 16, 24, 32, 41, 49, 57, 65, 74, 82, 90, 98, 106, 115, 123, 131, 139, 148, 156, 164, 172, 180, 189, 197, 205, 213, 222, 230, 238, 246, 255
|
|
};
|
|
|
|
static Uint8 lookup_4[] = {
|
|
0, 17, 34, 51, 68, 85, 102, 119, 136, 153, 170, 187, 204, 221, 238, 255
|
|
};
|
|
|
|
static Uint8 lookup_5[] = {
|
|
0, 36, 72, 109, 145, 182, 218, 255
|
|
};
|
|
|
|
static Uint8 lookup_6[] = {
|
|
0, 85, 170, 255
|
|
};
|
|
|
|
static Uint8 lookup_7[] = {
|
|
0, 255
|
|
};
|
|
|
|
static Uint8 lookup_8[] = {
|
|
255
|
|
};
|
|
|
|
Uint8* SDL_expand_byte[9] = {
|
|
lookup_0,
|
|
lookup_1,
|
|
lookup_2,
|
|
lookup_3,
|
|
lookup_4,
|
|
lookup_5,
|
|
lookup_6,
|
|
lookup_7,
|
|
lookup_8
|
|
};
|
|
|
|
/* Helper functions */
|
|
|
|
const char*
|
|
SDL_GetPixelFormatName(Uint32 format)
|
|
{
|
|
switch (format) {
|
|
#define CASE(X) case X: return #X;
|
|
CASE(SDL_PIXELFORMAT_INDEX1LSB)
|
|
CASE(SDL_PIXELFORMAT_INDEX1MSB)
|
|
CASE(SDL_PIXELFORMAT_INDEX4LSB)
|
|
CASE(SDL_PIXELFORMAT_INDEX4MSB)
|
|
CASE(SDL_PIXELFORMAT_INDEX8)
|
|
CASE(SDL_PIXELFORMAT_RGB332)
|
|
CASE(SDL_PIXELFORMAT_RGB444)
|
|
CASE(SDL_PIXELFORMAT_RGB555)
|
|
CASE(SDL_PIXELFORMAT_BGR555)
|
|
CASE(SDL_PIXELFORMAT_ARGB4444)
|
|
CASE(SDL_PIXELFORMAT_RGBA4444)
|
|
CASE(SDL_PIXELFORMAT_ABGR4444)
|
|
CASE(SDL_PIXELFORMAT_BGRA4444)
|
|
CASE(SDL_PIXELFORMAT_ARGB1555)
|
|
CASE(SDL_PIXELFORMAT_RGBA5551)
|
|
CASE(SDL_PIXELFORMAT_ABGR1555)
|
|
CASE(SDL_PIXELFORMAT_BGRA5551)
|
|
CASE(SDL_PIXELFORMAT_RGB565)
|
|
CASE(SDL_PIXELFORMAT_BGR565)
|
|
CASE(SDL_PIXELFORMAT_RGB24)
|
|
CASE(SDL_PIXELFORMAT_BGR24)
|
|
CASE(SDL_PIXELFORMAT_RGB888)
|
|
CASE(SDL_PIXELFORMAT_RGBX8888)
|
|
CASE(SDL_PIXELFORMAT_BGR888)
|
|
CASE(SDL_PIXELFORMAT_BGRX8888)
|
|
CASE(SDL_PIXELFORMAT_ARGB8888)
|
|
CASE(SDL_PIXELFORMAT_RGBA8888)
|
|
CASE(SDL_PIXELFORMAT_ABGR8888)
|
|
CASE(SDL_PIXELFORMAT_BGRA8888)
|
|
CASE(SDL_PIXELFORMAT_ARGB2101010)
|
|
CASE(SDL_PIXELFORMAT_YV12)
|
|
CASE(SDL_PIXELFORMAT_IYUV)
|
|
CASE(SDL_PIXELFORMAT_YUY2)
|
|
CASE(SDL_PIXELFORMAT_UYVY)
|
|
CASE(SDL_PIXELFORMAT_YVYU)
|
|
CASE(SDL_PIXELFORMAT_NV12)
|
|
CASE(SDL_PIXELFORMAT_NV21)
|
|
#undef CASE
|
|
default:
|
|
return "SDL_PIXELFORMAT_UNKNOWN";
|
|
}
|
|
}
|
|
|
|
SDL_bool
|
|
SDL_PixelFormatEnumToMasks(Uint32 format, int *bpp, Uint32 * Rmask,
|
|
Uint32 * Gmask, Uint32 * Bmask, Uint32 * Amask)
|
|
{
|
|
Uint32 masks[4];
|
|
|
|
/* This function doesn't work with FourCC pixel formats */
|
|
if (SDL_ISPIXELFORMAT_FOURCC(format)) {
|
|
SDL_SetError("FOURCC pixel formats are not supported");
|
|
return SDL_FALSE;
|
|
}
|
|
|
|
/* Initialize the values here */
|
|
if (SDL_BYTESPERPIXEL(format) <= 2) {
|
|
*bpp = SDL_BITSPERPIXEL(format);
|
|
} else {
|
|
*bpp = SDL_BYTESPERPIXEL(format) * 8;
|
|
}
|
|
*Rmask = *Gmask = *Bmask = *Amask = 0;
|
|
|
|
if (format == SDL_PIXELFORMAT_RGB24) {
|
|
#if SDL_BYTEORDER == SDL_BIG_ENDIAN
|
|
*Rmask = 0x00FF0000;
|
|
*Gmask = 0x0000FF00;
|
|
*Bmask = 0x000000FF;
|
|
#else
|
|
*Rmask = 0x000000FF;
|
|
*Gmask = 0x0000FF00;
|
|
*Bmask = 0x00FF0000;
|
|
#endif
|
|
return SDL_TRUE;
|
|
}
|
|
|
|
if (format == SDL_PIXELFORMAT_BGR24) {
|
|
#if SDL_BYTEORDER == SDL_BIG_ENDIAN
|
|
*Rmask = 0x000000FF;
|
|
*Gmask = 0x0000FF00;
|
|
*Bmask = 0x00FF0000;
|
|
#else
|
|
*Rmask = 0x00FF0000;
|
|
*Gmask = 0x0000FF00;
|
|
*Bmask = 0x000000FF;
|
|
#endif
|
|
return SDL_TRUE;
|
|
}
|
|
|
|
if (SDL_PIXELTYPE(format) != SDL_PIXELTYPE_PACKED8 &&
|
|
SDL_PIXELTYPE(format) != SDL_PIXELTYPE_PACKED16 &&
|
|
SDL_PIXELTYPE(format) != SDL_PIXELTYPE_PACKED32) {
|
|
/* Not a format that uses masks */
|
|
return SDL_TRUE;
|
|
}
|
|
|
|
switch (SDL_PIXELLAYOUT(format)) {
|
|
case SDL_PACKEDLAYOUT_332:
|
|
masks[0] = 0x00000000;
|
|
masks[1] = 0x000000E0;
|
|
masks[2] = 0x0000001C;
|
|
masks[3] = 0x00000003;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_4444:
|
|
masks[0] = 0x0000F000;
|
|
masks[1] = 0x00000F00;
|
|
masks[2] = 0x000000F0;
|
|
masks[3] = 0x0000000F;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_1555:
|
|
masks[0] = 0x00008000;
|
|
masks[1] = 0x00007C00;
|
|
masks[2] = 0x000003E0;
|
|
masks[3] = 0x0000001F;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_5551:
|
|
masks[0] = 0x0000F800;
|
|
masks[1] = 0x000007C0;
|
|
masks[2] = 0x0000003E;
|
|
masks[3] = 0x00000001;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_565:
|
|
masks[0] = 0x00000000;
|
|
masks[1] = 0x0000F800;
|
|
masks[2] = 0x000007E0;
|
|
masks[3] = 0x0000001F;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_8888:
|
|
masks[0] = 0xFF000000;
|
|
masks[1] = 0x00FF0000;
|
|
masks[2] = 0x0000FF00;
|
|
masks[3] = 0x000000FF;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_2101010:
|
|
masks[0] = 0xC0000000;
|
|
masks[1] = 0x3FF00000;
|
|
masks[2] = 0x000FFC00;
|
|
masks[3] = 0x000003FF;
|
|
break;
|
|
case SDL_PACKEDLAYOUT_1010102:
|
|
masks[0] = 0xFFC00000;
|
|
masks[1] = 0x003FF000;
|
|
masks[2] = 0x00000FFC;
|
|
masks[3] = 0x00000003;
|
|
break;
|
|
default:
|
|
SDL_SetError("Unknown pixel format");
|
|
return SDL_FALSE;
|
|
}
|
|
|
|
switch (SDL_PIXELORDER(format)) {
|
|
case SDL_PACKEDORDER_XRGB:
|
|
*Rmask = masks[1];
|
|
*Gmask = masks[2];
|
|
*Bmask = masks[3];
|
|
break;
|
|
case SDL_PACKEDORDER_RGBX:
|
|
*Rmask = masks[0];
|
|
*Gmask = masks[1];
|
|
*Bmask = masks[2];
|
|
break;
|
|
case SDL_PACKEDORDER_ARGB:
|
|
*Amask = masks[0];
|
|
*Rmask = masks[1];
|
|
*Gmask = masks[2];
|
|
*Bmask = masks[3];
|
|
break;
|
|
case SDL_PACKEDORDER_RGBA:
|
|
*Rmask = masks[0];
|
|
*Gmask = masks[1];
|
|
*Bmask = masks[2];
|
|
*Amask = masks[3];
|
|
break;
|
|
case SDL_PACKEDORDER_XBGR:
|
|
*Bmask = masks[1];
|
|
*Gmask = masks[2];
|
|
*Rmask = masks[3];
|
|
break;
|
|
case SDL_PACKEDORDER_BGRX:
|
|
*Bmask = masks[0];
|
|
*Gmask = masks[1];
|
|
*Rmask = masks[2];
|
|
break;
|
|
case SDL_PACKEDORDER_BGRA:
|
|
*Bmask = masks[0];
|
|
*Gmask = masks[1];
|
|
*Rmask = masks[2];
|
|
*Amask = masks[3];
|
|
break;
|
|
case SDL_PACKEDORDER_ABGR:
|
|
*Amask = masks[0];
|
|
*Bmask = masks[1];
|
|
*Gmask = masks[2];
|
|
*Rmask = masks[3];
|
|
break;
|
|
default:
|
|
SDL_SetError("Unknown pixel format");
|
|
return SDL_FALSE;
|
|
}
|
|
return SDL_TRUE;
|
|
}
|
|
|
|
Uint32
|
|
SDL_MasksToPixelFormatEnum(int bpp, Uint32 Rmask, Uint32 Gmask, Uint32 Bmask,
|
|
Uint32 Amask)
|
|
{
|
|
switch (bpp) {
|
|
case 1:
|
|
/* SDL defaults to MSB ordering */
|
|
return SDL_PIXELFORMAT_INDEX1MSB;
|
|
case 4:
|
|
/* SDL defaults to MSB ordering */
|
|
return SDL_PIXELFORMAT_INDEX4MSB;
|
|
case 8:
|
|
if (Rmask == 0) {
|
|
return SDL_PIXELFORMAT_INDEX8;
|
|
}
|
|
if (Rmask == 0xE0 &&
|
|
Gmask == 0x1C &&
|
|
Bmask == 0x03 &&
|
|
Amask == 0x00) {
|
|
return SDL_PIXELFORMAT_RGB332;
|
|
}
|
|
break;
|
|
case 12:
|
|
if (Rmask == 0) {
|
|
return SDL_PIXELFORMAT_RGB444;
|
|
}
|
|
if (Rmask == 0x0F00 &&
|
|
Gmask == 0x00F0 &&
|
|
Bmask == 0x000F &&
|
|
Amask == 0x0000) {
|
|
return SDL_PIXELFORMAT_RGB444;
|
|
}
|
|
break;
|
|
case 15:
|
|
if (Rmask == 0) {
|
|
return SDL_PIXELFORMAT_RGB555;
|
|
}
|
|
/* fallthrough */
|
|
case 16:
|
|
if (Rmask == 0) {
|
|
return SDL_PIXELFORMAT_RGB565;
|
|
}
|
|
if (Rmask == 0x7C00 &&
|
|
Gmask == 0x03E0 &&
|
|
Bmask == 0x001F &&
|
|
Amask == 0x0000) {
|
|
return SDL_PIXELFORMAT_RGB555;
|
|
}
|
|
if (Rmask == 0x001F &&
|
|
Gmask == 0x03E0 &&
|
|
Bmask == 0x7C00 &&
|
|
Amask == 0x0000) {
|
|
return SDL_PIXELFORMAT_BGR555;
|
|
}
|
|
if (Rmask == 0x0F00 &&
|
|
Gmask == 0x00F0 &&
|
|
Bmask == 0x000F &&
|
|
Amask == 0xF000) {
|
|
return SDL_PIXELFORMAT_ARGB4444;
|
|
}
|
|
if (Rmask == 0xF000 &&
|
|
Gmask == 0x0F00 &&
|
|
Bmask == 0x00F0 &&
|
|
Amask == 0x000F) {
|
|
return SDL_PIXELFORMAT_RGBA4444;
|
|
}
|
|
if (Rmask == 0x000F &&
|
|
Gmask == 0x00F0 &&
|
|
Bmask == 0x0F00 &&
|
|
Amask == 0xF000) {
|
|
return SDL_PIXELFORMAT_ABGR4444;
|
|
}
|
|
if (Rmask == 0x00F0 &&
|
|
Gmask == 0x0F00 &&
|
|
Bmask == 0xF000 &&
|
|
Amask == 0x000F) {
|
|
return SDL_PIXELFORMAT_BGRA4444;
|
|
}
|
|
if (Rmask == 0x7C00 &&
|
|
Gmask == 0x03E0 &&
|
|
Bmask == 0x001F &&
|
|
Amask == 0x8000) {
|
|
return SDL_PIXELFORMAT_ARGB1555;
|
|
}
|
|
if (Rmask == 0xF800 &&
|
|
Gmask == 0x07C0 &&
|
|
Bmask == 0x003E &&
|
|
Amask == 0x0001) {
|
|
return SDL_PIXELFORMAT_RGBA5551;
|
|
}
|
|
if (Rmask == 0x001F &&
|
|
Gmask == 0x03E0 &&
|
|
Bmask == 0x7C00 &&
|
|
Amask == 0x8000) {
|
|
return SDL_PIXELFORMAT_ABGR1555;
|
|
}
|
|
if (Rmask == 0x003E &&
|
|
Gmask == 0x07C0 &&
|
|
Bmask == 0xF800 &&
|
|
Amask == 0x0001) {
|
|
return SDL_PIXELFORMAT_BGRA5551;
|
|
}
|
|
if (Rmask == 0xF800 &&
|
|
Gmask == 0x07E0 &&
|
|
Bmask == 0x001F &&
|
|
Amask == 0x0000) {
|
|
return SDL_PIXELFORMAT_RGB565;
|
|
}
|
|
if (Rmask == 0x001F &&
|
|
Gmask == 0x07E0 &&
|
|
Bmask == 0xF800 &&
|
|
Amask == 0x0000) {
|
|
return SDL_PIXELFORMAT_BGR565;
|
|
}
|
|
if (Rmask == 0x003F &&
|
|
Gmask == 0x07C0 &&
|
|
Bmask == 0xF800 &&
|
|
Amask == 0x0000) {
|
|
/* Technically this would be BGR556, but Witek says this works in bug 3158 */
|
|
return SDL_PIXELFORMAT_RGB565;
|
|
}
|
|
break;
|
|
case 24:
|
|
switch (Rmask) {
|
|
case 0:
|
|
case 0x00FF0000:
|
|
#if SDL_BYTEORDER == SDL_BIG_ENDIAN
|
|
return SDL_PIXELFORMAT_RGB24;
|
|
#else
|
|
return SDL_PIXELFORMAT_BGR24;
|
|
#endif
|
|
case 0x000000FF:
|
|
#if SDL_BYTEORDER == SDL_BIG_ENDIAN
|
|
return SDL_PIXELFORMAT_BGR24;
|
|
#else
|
|
return SDL_PIXELFORMAT_RGB24;
|
|
#endif
|
|
}
|
|
case 32:
|
|
if (Rmask == 0) {
|
|
return SDL_PIXELFORMAT_RGB888;
|
|
}
|
|
if (Rmask == 0x00FF0000 &&
|
|
Gmask == 0x0000FF00 &&
|
|
Bmask == 0x000000FF &&
|
|
Amask == 0x00000000) {
|
|
return SDL_PIXELFORMAT_RGB888;
|
|
}
|
|
if (Rmask == 0xFF000000 &&
|
|
Gmask == 0x00FF0000 &&
|
|
Bmask == 0x0000FF00 &&
|
|
Amask == 0x00000000) {
|
|
return SDL_PIXELFORMAT_RGBX8888;
|
|
}
|
|
if (Rmask == 0x000000FF &&
|
|
Gmask == 0x0000FF00 &&
|
|
Bmask == 0x00FF0000 &&
|
|
Amask == 0x00000000) {
|
|
return SDL_PIXELFORMAT_BGR888;
|
|
}
|
|
if (Rmask == 0x0000FF00 &&
|
|
Gmask == 0x00FF0000 &&
|
|
Bmask == 0xFF000000 &&
|
|
Amask == 0x00000000) {
|
|
return SDL_PIXELFORMAT_BGRX8888;
|
|
}
|
|
if (Rmask == 0x00FF0000 &&
|
|
Gmask == 0x0000FF00 &&
|
|
Bmask == 0x000000FF &&
|
|
Amask == 0xFF000000) {
|
|
return SDL_PIXELFORMAT_ARGB8888;
|
|
}
|
|
if (Rmask == 0xFF000000 &&
|
|
Gmask == 0x00FF0000 &&
|
|
Bmask == 0x0000FF00 &&
|
|
Amask == 0x000000FF) {
|
|
return SDL_PIXELFORMAT_RGBA8888;
|
|
}
|
|
if (Rmask == 0x000000FF &&
|
|
Gmask == 0x0000FF00 &&
|
|
Bmask == 0x00FF0000 &&
|
|
Amask == 0xFF000000) {
|
|
return SDL_PIXELFORMAT_ABGR8888;
|
|
}
|
|
if (Rmask == 0x0000FF00 &&
|
|
Gmask == 0x00FF0000 &&
|
|
Bmask == 0xFF000000 &&
|
|
Amask == 0x000000FF) {
|
|
return SDL_PIXELFORMAT_BGRA8888;
|
|
}
|
|
if (Rmask == 0x3FF00000 &&
|
|
Gmask == 0x000FFC00 &&
|
|
Bmask == 0x000003FF &&
|
|
Amask == 0xC0000000) {
|
|
return SDL_PIXELFORMAT_ARGB2101010;
|
|
}
|
|
}
|
|
return SDL_PIXELFORMAT_UNKNOWN;
|
|
}
|
|
|
|
static SDL_PixelFormat *formats;
|
|
static SDL_SpinLock formats_lock = 0;
|
|
|
|
SDL_PixelFormat *
|
|
SDL_AllocFormat(Uint32 pixel_format)
|
|
{
|
|
SDL_PixelFormat *format;
|
|
|
|
SDL_AtomicLock(&formats_lock);
|
|
|
|
/* Look it up in our list of previously allocated formats */
|
|
for (format = formats; format; format = format->next) {
|
|
if (pixel_format == format->format) {
|
|
++format->refcount;
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
return format;
|
|
}
|
|
}
|
|
|
|
/* Allocate an empty pixel format structure, and initialize it */
|
|
format = SDL_malloc(sizeof(*format));
|
|
if (format == NULL) {
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
SDL_OutOfMemory();
|
|
return NULL;
|
|
}
|
|
if (SDL_InitFormat(format, pixel_format) < 0) {
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
SDL_free(format);
|
|
SDL_InvalidParamError("format");
|
|
return NULL;
|
|
}
|
|
|
|
if (!SDL_ISPIXELFORMAT_INDEXED(pixel_format)) {
|
|
/* Cache the RGB formats */
|
|
format->next = formats;
|
|
formats = format;
|
|
}
|
|
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
|
|
return format;
|
|
}
|
|
|
|
int
|
|
SDL_InitFormat(SDL_PixelFormat * format, Uint32 pixel_format)
|
|
{
|
|
int bpp;
|
|
Uint32 Rmask, Gmask, Bmask, Amask;
|
|
Uint32 mask;
|
|
|
|
if (!SDL_PixelFormatEnumToMasks(pixel_format, &bpp,
|
|
&Rmask, &Gmask, &Bmask, &Amask)) {
|
|
return -1;
|
|
}
|
|
|
|
/* Set up the format */
|
|
SDL_zerop(format);
|
|
format->format = pixel_format;
|
|
format->BitsPerPixel = bpp;
|
|
format->BytesPerPixel = (bpp + 7) / 8;
|
|
|
|
format->Rmask = Rmask;
|
|
format->Rshift = 0;
|
|
format->Rloss = 8;
|
|
if (Rmask) {
|
|
for (mask = Rmask; !(mask & 0x01); mask >>= 1)
|
|
++format->Rshift;
|
|
for (; (mask & 0x01); mask >>= 1)
|
|
--format->Rloss;
|
|
}
|
|
|
|
format->Gmask = Gmask;
|
|
format->Gshift = 0;
|
|
format->Gloss = 8;
|
|
if (Gmask) {
|
|
for (mask = Gmask; !(mask & 0x01); mask >>= 1)
|
|
++format->Gshift;
|
|
for (; (mask & 0x01); mask >>= 1)
|
|
--format->Gloss;
|
|
}
|
|
|
|
format->Bmask = Bmask;
|
|
format->Bshift = 0;
|
|
format->Bloss = 8;
|
|
if (Bmask) {
|
|
for (mask = Bmask; !(mask & 0x01); mask >>= 1)
|
|
++format->Bshift;
|
|
for (; (mask & 0x01); mask >>= 1)
|
|
--format->Bloss;
|
|
}
|
|
|
|
format->Amask = Amask;
|
|
format->Ashift = 0;
|
|
format->Aloss = 8;
|
|
if (Amask) {
|
|
for (mask = Amask; !(mask & 0x01); mask >>= 1)
|
|
++format->Ashift;
|
|
for (; (mask & 0x01); mask >>= 1)
|
|
--format->Aloss;
|
|
}
|
|
|
|
format->palette = NULL;
|
|
format->refcount = 1;
|
|
format->next = NULL;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
SDL_FreeFormat(SDL_PixelFormat *format)
|
|
{
|
|
SDL_PixelFormat *prev;
|
|
|
|
if (!format) {
|
|
SDL_InvalidParamError("format");
|
|
return;
|
|
}
|
|
|
|
SDL_AtomicLock(&formats_lock);
|
|
|
|
if (--format->refcount > 0) {
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
return;
|
|
}
|
|
|
|
/* Remove this format from our list */
|
|
if (format == formats) {
|
|
formats = format->next;
|
|
} else if (formats) {
|
|
for (prev = formats; prev->next; prev = prev->next) {
|
|
if (prev->next == format) {
|
|
prev->next = format->next;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
SDL_AtomicUnlock(&formats_lock);
|
|
|
|
if (format->palette) {
|
|
SDL_FreePalette(format->palette);
|
|
}
|
|
SDL_free(format);
|
|
}
|
|
|
|
SDL_Palette *
|
|
SDL_AllocPalette(int ncolors)
|
|
{
|
|
SDL_Palette *palette;
|
|
|
|
/* Input validation */
|
|
if (ncolors < 1) {
|
|
SDL_InvalidParamError("ncolors");
|
|
return NULL;
|
|
}
|
|
|
|
palette = (SDL_Palette *) SDL_malloc(sizeof(*palette));
|
|
if (!palette) {
|
|
SDL_OutOfMemory();
|
|
return NULL;
|
|
}
|
|
palette->colors =
|
|
(SDL_Color *) SDL_malloc(ncolors * sizeof(*palette->colors));
|
|
if (!palette->colors) {
|
|
SDL_free(palette);
|
|
return NULL;
|
|
}
|
|
palette->ncolors = ncolors;
|
|
palette->version = 1;
|
|
palette->refcount = 1;
|
|
|
|
SDL_memset(palette->colors, 0xFF, ncolors * sizeof(*palette->colors));
|
|
|
|
return palette;
|
|
}
|
|
|
|
int
|
|
SDL_SetPixelFormatPalette(SDL_PixelFormat * format, SDL_Palette *palette)
|
|
{
|
|
if (!format) {
|
|
return SDL_SetError("SDL_SetPixelFormatPalette() passed NULL format");
|
|
}
|
|
|
|
if (palette && palette->ncolors > (1 << format->BitsPerPixel)) {
|
|
return SDL_SetError("SDL_SetPixelFormatPalette() passed a palette that doesn't match the format");
|
|
}
|
|
|
|
if (format->palette == palette) {
|
|
return 0;
|
|
}
|
|
|
|
if (format->palette) {
|
|
SDL_FreePalette(format->palette);
|
|
}
|
|
|
|
format->palette = palette;
|
|
|
|
if (format->palette) {
|
|
++format->palette->refcount;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
SDL_SetPaletteColors(SDL_Palette * palette, const SDL_Color * colors,
|
|
int firstcolor, int ncolors)
|
|
{
|
|
int status = 0;
|
|
|
|
/* Verify the parameters */
|
|
if (!palette) {
|
|
return -1;
|
|
}
|
|
if (ncolors > (palette->ncolors - firstcolor)) {
|
|
ncolors = (palette->ncolors - firstcolor);
|
|
status = -1;
|
|
}
|
|
|
|
if (colors != (palette->colors + firstcolor)) {
|
|
SDL_memcpy(palette->colors + firstcolor, colors,
|
|
ncolors * sizeof(*colors));
|
|
}
|
|
++palette->version;
|
|
if (!palette->version) {
|
|
palette->version = 1;
|
|
}
|
|
|
|
return status;
|
|
}
|
|
|
|
void
|
|
SDL_FreePalette(SDL_Palette * palette)
|
|
{
|
|
if (!palette) {
|
|
SDL_InvalidParamError("palette");
|
|
return;
|
|
}
|
|
if (--palette->refcount > 0) {
|
|
return;
|
|
}
|
|
SDL_free(palette->colors);
|
|
SDL_free(palette);
|
|
}
|
|
|
|
/*
|
|
* Calculate an 8-bit (3 red, 3 green, 2 blue) dithered palette of colors
|
|
*/
|
|
void
|
|
SDL_DitherColors(SDL_Color * colors, int bpp)
|
|
{
|
|
int i;
|
|
if (bpp != 8)
|
|
return; /* only 8bpp supported right now */
|
|
|
|
for (i = 0; i < 256; i++) {
|
|
int r, g, b;
|
|
/* map each bit field to the full [0, 255] interval,
|
|
so 0 is mapped to (0, 0, 0) and 255 to (255, 255, 255) */
|
|
r = i & 0xe0;
|
|
r |= r >> 3 | r >> 6;
|
|
colors[i].r = r;
|
|
g = (i << 3) & 0xe0;
|
|
g |= g >> 3 | g >> 6;
|
|
colors[i].g = g;
|
|
b = i & 0x3;
|
|
b |= b << 2;
|
|
b |= b << 4;
|
|
colors[i].b = b;
|
|
colors[i].a = SDL_ALPHA_OPAQUE;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Match an RGB value to a particular palette index
|
|
*/
|
|
Uint8
|
|
SDL_FindColor(SDL_Palette * pal, Uint8 r, Uint8 g, Uint8 b, Uint8 a)
|
|
{
|
|
/* Do colorspace distance matching */
|
|
unsigned int smallest;
|
|
unsigned int distance;
|
|
int rd, gd, bd, ad;
|
|
int i;
|
|
Uint8 pixel = 0;
|
|
|
|
smallest = ~0;
|
|
for (i = 0; i < pal->ncolors; ++i) {
|
|
rd = pal->colors[i].r - r;
|
|
gd = pal->colors[i].g - g;
|
|
bd = pal->colors[i].b - b;
|
|
ad = pal->colors[i].a - a;
|
|
distance = (rd * rd) + (gd * gd) + (bd * bd) + (ad * ad);
|
|
if (distance < smallest) {
|
|
pixel = i;
|
|
if (distance == 0) { /* Perfect match! */
|
|
break;
|
|
}
|
|
smallest = distance;
|
|
}
|
|
}
|
|
return (pixel);
|
|
}
|
|
|
|
/* Find the opaque pixel value corresponding to an RGB triple */
|
|
Uint32
|
|
SDL_MapRGB(const SDL_PixelFormat * format, Uint8 r, Uint8 g, Uint8 b)
|
|
{
|
|
if (format->palette == NULL) {
|
|
return (r >> format->Rloss) << format->Rshift
|
|
| (g >> format->Gloss) << format->Gshift
|
|
| (b >> format->Bloss) << format->Bshift | format->Amask;
|
|
} else {
|
|
return SDL_FindColor(format->palette, r, g, b, SDL_ALPHA_OPAQUE);
|
|
}
|
|
}
|
|
|
|
/* Find the pixel value corresponding to an RGBA quadruple */
|
|
Uint32
|
|
SDL_MapRGBA(const SDL_PixelFormat * format, Uint8 r, Uint8 g, Uint8 b,
|
|
Uint8 a)
|
|
{
|
|
if (format->palette == NULL) {
|
|
return (r >> format->Rloss) << format->Rshift
|
|
| (g >> format->Gloss) << format->Gshift
|
|
| (b >> format->Bloss) << format->Bshift
|
|
| ((a >> format->Aloss) << format->Ashift & format->Amask);
|
|
} else {
|
|
return SDL_FindColor(format->palette, r, g, b, a);
|
|
}
|
|
}
|
|
|
|
void
|
|
SDL_GetRGB(Uint32 pixel, const SDL_PixelFormat * format, Uint8 * r, Uint8 * g,
|
|
Uint8 * b)
|
|
{
|
|
if (format->palette == NULL) {
|
|
unsigned v;
|
|
v = (pixel & format->Rmask) >> format->Rshift;
|
|
*r = SDL_expand_byte[format->Rloss][v];
|
|
v = (pixel & format->Gmask) >> format->Gshift;
|
|
*g = SDL_expand_byte[format->Gloss][v];
|
|
v = (pixel & format->Bmask) >> format->Bshift;
|
|
*b = SDL_expand_byte[format->Bloss][v];
|
|
} else {
|
|
if (pixel < (unsigned)format->palette->ncolors) {
|
|
*r = format->palette->colors[pixel].r;
|
|
*g = format->palette->colors[pixel].g;
|
|
*b = format->palette->colors[pixel].b;
|
|
} else {
|
|
*r = *g = *b = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
SDL_GetRGBA(Uint32 pixel, const SDL_PixelFormat * format,
|
|
Uint8 * r, Uint8 * g, Uint8 * b, Uint8 * a)
|
|
{
|
|
if (format->palette == NULL) {
|
|
unsigned v;
|
|
v = (pixel & format->Rmask) >> format->Rshift;
|
|
*r = SDL_expand_byte[format->Rloss][v];
|
|
v = (pixel & format->Gmask) >> format->Gshift;
|
|
*g = SDL_expand_byte[format->Gloss][v];
|
|
v = (pixel & format->Bmask) >> format->Bshift;
|
|
*b = SDL_expand_byte[format->Bloss][v];
|
|
v = (pixel & format->Amask) >> format->Ashift;
|
|
*a = SDL_expand_byte[format->Aloss][v];
|
|
} else {
|
|
if (pixel < (unsigned)format->palette->ncolors) {
|
|
*r = format->palette->colors[pixel].r;
|
|
*g = format->palette->colors[pixel].g;
|
|
*b = format->palette->colors[pixel].b;
|
|
*a = format->palette->colors[pixel].a;
|
|
} else {
|
|
*r = *g = *b = *a = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* Map from Palette to Palette */
|
|
static Uint8 *
|
|
Map1to1(SDL_Palette * src, SDL_Palette * dst, int *identical)
|
|
{
|
|
Uint8 *map;
|
|
int i;
|
|
|
|
if (identical) {
|
|
if (src->ncolors <= dst->ncolors) {
|
|
/* If an identical palette, no need to map */
|
|
if (src == dst
|
|
||
|
|
(SDL_memcmp
|
|
(src->colors, dst->colors,
|
|
src->ncolors * sizeof(SDL_Color)) == 0)) {
|
|
*identical = 1;
|
|
return (NULL);
|
|
}
|
|
}
|
|
*identical = 0;
|
|
}
|
|
map = (Uint8 *) SDL_malloc(src->ncolors);
|
|
if (map == NULL) {
|
|
SDL_OutOfMemory();
|
|
return (NULL);
|
|
}
|
|
for (i = 0; i < src->ncolors; ++i) {
|
|
map[i] = SDL_FindColor(dst,
|
|
src->colors[i].r, src->colors[i].g,
|
|
src->colors[i].b, src->colors[i].a);
|
|
}
|
|
return (map);
|
|
}
|
|
|
|
/* Map from Palette to BitField */
|
|
static Uint8 *
|
|
Map1toN(SDL_PixelFormat * src, Uint8 Rmod, Uint8 Gmod, Uint8 Bmod, Uint8 Amod,
|
|
SDL_PixelFormat * dst)
|
|
{
|
|
Uint8 *map;
|
|
int i;
|
|
int bpp;
|
|
SDL_Palette *pal = src->palette;
|
|
|
|
bpp = ((dst->BytesPerPixel == 3) ? 4 : dst->BytesPerPixel);
|
|
map = (Uint8 *) SDL_malloc(pal->ncolors * bpp);
|
|
if (map == NULL) {
|
|
SDL_OutOfMemory();
|
|
return (NULL);
|
|
}
|
|
|
|
/* We memory copy to the pixel map so the endianness is preserved */
|
|
for (i = 0; i < pal->ncolors; ++i) {
|
|
Uint8 R = (Uint8) ((pal->colors[i].r * Rmod) / 255);
|
|
Uint8 G = (Uint8) ((pal->colors[i].g * Gmod) / 255);
|
|
Uint8 B = (Uint8) ((pal->colors[i].b * Bmod) / 255);
|
|
Uint8 A = (Uint8) ((pal->colors[i].a * Amod) / 255);
|
|
ASSEMBLE_RGBA(&map[i * bpp], dst->BytesPerPixel, dst, R, G, B, A);
|
|
}
|
|
return (map);
|
|
}
|
|
|
|
/* Map from BitField to Dithered-Palette to Palette */
|
|
static Uint8 *
|
|
MapNto1(SDL_PixelFormat * src, SDL_PixelFormat * dst, int *identical)
|
|
{
|
|
/* Generate a 256 color dither palette */
|
|
SDL_Palette dithered;
|
|
SDL_Color colors[256];
|
|
SDL_Palette *pal = dst->palette;
|
|
|
|
dithered.ncolors = 256;
|
|
SDL_DitherColors(colors, 8);
|
|
dithered.colors = colors;
|
|
return (Map1to1(&dithered, pal, identical));
|
|
}
|
|
|
|
SDL_BlitMap *
|
|
SDL_AllocBlitMap(void)
|
|
{
|
|
SDL_BlitMap *map;
|
|
|
|
/* Allocate the empty map */
|
|
map = (SDL_BlitMap *) SDL_calloc(1, sizeof(*map));
|
|
if (map == NULL) {
|
|
SDL_OutOfMemory();
|
|
return (NULL);
|
|
}
|
|
map->info.r = 0xFF;
|
|
map->info.g = 0xFF;
|
|
map->info.b = 0xFF;
|
|
map->info.a = 0xFF;
|
|
|
|
/* It's ready to go */
|
|
return (map);
|
|
}
|
|
|
|
void
|
|
SDL_InvalidateMap(SDL_BlitMap * map)
|
|
{
|
|
if (!map) {
|
|
return;
|
|
}
|
|
if (map->dst) {
|
|
/* Release our reference to the surface - see the note below */
|
|
if (--map->dst->refcount <= 0) {
|
|
SDL_FreeSurface(map->dst);
|
|
}
|
|
}
|
|
map->dst = NULL;
|
|
map->src_palette_version = 0;
|
|
map->dst_palette_version = 0;
|
|
SDL_free(map->info.table);
|
|
map->info.table = NULL;
|
|
}
|
|
|
|
int
|
|
SDL_MapSurface(SDL_Surface * src, SDL_Surface * dst)
|
|
{
|
|
SDL_PixelFormat *srcfmt;
|
|
SDL_PixelFormat *dstfmt;
|
|
SDL_BlitMap *map;
|
|
|
|
/* Clear out any previous mapping */
|
|
map = src->map;
|
|
if ((src->flags & SDL_RLEACCEL) == SDL_RLEACCEL) {
|
|
SDL_UnRLESurface(src, 1);
|
|
}
|
|
SDL_InvalidateMap(map);
|
|
|
|
/* Figure out what kind of mapping we're doing */
|
|
map->identity = 0;
|
|
srcfmt = src->format;
|
|
dstfmt = dst->format;
|
|
if (SDL_ISPIXELFORMAT_INDEXED(srcfmt->format)) {
|
|
if (SDL_ISPIXELFORMAT_INDEXED(dstfmt->format)) {
|
|
/* Palette --> Palette */
|
|
map->info.table =
|
|
Map1to1(srcfmt->palette, dstfmt->palette, &map->identity);
|
|
if (!map->identity) {
|
|
if (map->info.table == NULL) {
|
|
return (-1);
|
|
}
|
|
}
|
|
if (srcfmt->BitsPerPixel != dstfmt->BitsPerPixel)
|
|
map->identity = 0;
|
|
} else {
|
|
/* Palette --> BitField */
|
|
map->info.table =
|
|
Map1toN(srcfmt, src->map->info.r, src->map->info.g,
|
|
src->map->info.b, src->map->info.a, dstfmt);
|
|
if (map->info.table == NULL) {
|
|
return (-1);
|
|
}
|
|
}
|
|
} else {
|
|
if (SDL_ISPIXELFORMAT_INDEXED(dstfmt->format)) {
|
|
/* BitField --> Palette */
|
|
map->info.table = MapNto1(srcfmt, dstfmt, &map->identity);
|
|
if (!map->identity) {
|
|
if (map->info.table == NULL) {
|
|
return (-1);
|
|
}
|
|
}
|
|
map->identity = 0; /* Don't optimize to copy */
|
|
} else {
|
|
/* BitField --> BitField */
|
|
if (srcfmt == dstfmt) {
|
|
map->identity = 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
map->dst = dst;
|
|
|
|
if (map->dst) {
|
|
/* Keep a reference to this surface so it doesn't get deleted
|
|
while we're still pointing at it.
|
|
|
|
A better method would be for the destination surface to keep
|
|
track of surfaces that are mapped to it and automatically
|
|
invalidate them when it is freed, but this will do for now.
|
|
*/
|
|
++map->dst->refcount;
|
|
}
|
|
|
|
if (dstfmt->palette) {
|
|
map->dst_palette_version = dstfmt->palette->version;
|
|
} else {
|
|
map->dst_palette_version = 0;
|
|
}
|
|
|
|
if (srcfmt->palette) {
|
|
map->src_palette_version = srcfmt->palette->version;
|
|
} else {
|
|
map->src_palette_version = 0;
|
|
}
|
|
|
|
/* Choose your blitters wisely */
|
|
return (SDL_CalculateBlit(src));
|
|
}
|
|
|
|
void
|
|
SDL_FreeBlitMap(SDL_BlitMap * map)
|
|
{
|
|
if (map) {
|
|
SDL_InvalidateMap(map);
|
|
SDL_free(map);
|
|
}
|
|
}
|
|
|
|
void
|
|
SDL_CalculateGammaRamp(float gamma, Uint16 * ramp)
|
|
{
|
|
int i;
|
|
|
|
/* Input validation */
|
|
if (gamma < 0.0f ) {
|
|
SDL_InvalidParamError("gamma");
|
|
return;
|
|
}
|
|
if (ramp == NULL) {
|
|
SDL_InvalidParamError("ramp");
|
|
return;
|
|
}
|
|
|
|
/* 0.0 gamma is all black */
|
|
if (gamma == 0.0f) {
|
|
SDL_memset(ramp, 0, 256 * sizeof(Uint16));
|
|
return;
|
|
} else if (gamma == 1.0f) {
|
|
/* 1.0 gamma is identity */
|
|
for (i = 0; i < 256; ++i) {
|
|
ramp[i] = (i << 8) | i;
|
|
}
|
|
return;
|
|
} else {
|
|
/* Calculate a real gamma ramp */
|
|
int value;
|
|
gamma = 1.0f / gamma;
|
|
for (i = 0; i < 256; ++i) {
|
|
value =
|
|
(int) (SDL_pow((double) i / 256.0, gamma) * 65535.0 + 0.5);
|
|
if (value > 65535) {
|
|
value = 65535;
|
|
}
|
|
ramp[i] = (Uint16) value;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* vi: set ts=4 sw=4 expandtab: */
|