diff options
Diffstat (limited to 'modules/libgrbase/g_pal.c')
| -rw-r--r-- | modules/libgrbase/g_pal.c | 832 |
1 files changed, 832 insertions, 0 deletions
diff --git a/modules/libgrbase/g_pal.c b/modules/libgrbase/g_pal.c new file mode 100644 index 0000000..26e56a5 --- /dev/null +++ b/modules/libgrbase/g_pal.c @@ -0,0 +1,832 @@ +/* + * Copyright © 2006-2016 SplinterGU (Fenix/Bennugd) + * Copyright © 2002-2006 Fenix Team (Fenix) + * Copyright © 1999-2002 José Luis Cebrián Pagüe (Fenix) + * + * This file is part of Bennu - Game Development + * + * 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 <stdio.h> +#include <string.h> +#include <stdlib.h> + +#include "libgrbase.h" + +/* --------------------------------------------------------------------------- */ + +PALETTE * first_palette = NULL ; + +int palette_changed = 0 ; + +/* Tabla de transparencias */ + +uint8_t trans_table[ 256 ][ 256 ] ; +int trans_table_updated = 0 ; + +uint16_t colorghost[65536] ; /* Deja un color a 50% de intensidad */ + +/* Paleta de colores por defecto */ + +uint8_t default_palette[] = +{ + 0, 0, 0, /* Color 0 */ + 16, 16, 16, /* Color 1 */ + 32, 32, 32, /* Color 2 */ + 48, 48, 48, /* Color 3 */ + 64, 64, 64, /* Color 4 */ + 84, 84, 84, /* Color 5 */ + 100, 100, 100, /* Color 6 */ + 116, 116, 116, /* Color 7 */ + 132, 132, 132, /* Color 8 */ + 148, 148, 148, /* Color 9 */ + 168, 168, 168, /* Color 10 */ + 184, 184, 184, /* Color 11 */ + 200, 200, 200, /* Color 12 */ + 216, 216, 216, /* Color 13 */ + 232, 232, 232, /* Color 14 */ + 252, 252, 252, /* Color 15 */ + 40, 0, 0, /* Color 16 */ + 72, 0, 0, /* Color 17 */ + 108, 0, 0, /* Color 18 */ + 144, 0, 0, /* Color 19 */ + 180, 0, 0, /* Color 20 */ + 216, 0, 0, /* Color 21 */ + 252, 0, 0, /* Color 22 */ + 252, 32, 0, /* Color 23 */ + 252, 64, 0, /* Color 24 */ + 252, 96, 0, /* Color 25 */ + 252, 128, 0, /* Color 26 */ + 252, 160, 0, /* Color 27 */ + 252, 180, 56, /* Color 28 */ + 252, 200, 112, /* Color 29 */ + 252, 220, 168, /* Color 30 */ + 252, 240, 224, /* Color 31 */ + 0, 40, 0, /* Color 32 */ + 0, 60, 0, /* Color 33 */ + 0, 84, 0, /* Color 34 */ + 0, 108, 0, /* Color 35 */ + 0, 132, 0, /* Color 36 */ + 0, 156, 0, /* Color 37 */ + 0, 180, 0, /* Color 38 */ + 0, 204, 0, /* Color 39 */ + 0, 228, 0, /* Color 40 */ + 0, 252, 0, /* Color 41 */ + 48, 252, 32, /* Color 42 */ + 96, 252, 64, /* Color 43 */ + 144, 252, 96, /* Color 44 */ + 192, 252, 132, /* Color 45 */ + 216, 252, 176, /* Color 46 */ + 240, 252, 220, /* Color 47 */ + 0, 0, 40, /* Color 48 */ + 0, 0, 72, /* Color 49 */ + 0, 0, 104, /* Color 50 */ + 0, 0, 140, /* Color 51 */ + 0, 0, 172, /* Color 52 */ + 0, 0, 208, /* Color 53 */ + 0, 0, 252, /* Color 54 */ + 0, 48, 252, /* Color 55 */ + 0, 100, 252, /* Color 56 */ + 0, 148, 252, /* Color 57 */ + 0, 200, 252, /* Color 58 */ + 0, 252, 252, /* Color 59 */ + 56, 252, 252, /* Color 60 */ + 112, 252, 252, /* Color 61 */ + 168, 252, 252, /* Color 62 */ + 224, 252, 252, /* Color 63 */ + 28, 28, 0, /* Color 64 */ + 52, 52, 0, /* Color 65 */ + 76, 76, 0, /* Color 66 */ + 100, 100, 0, /* Color 67 */ + 124, 124, 0, /* Color 68 */ + 152, 152, 0, /* Color 69 */ + 176, 176, 0, /* Color 70 */ + 200, 200, 0, /* Color 71 */ + 224, 224, 0, /* Color 72 */ + 252, 252, 0, /* Color 73 */ + 252, 252, 36, /* Color 74 */ + 252, 252, 72, /* Color 75 */ + 252, 252, 108, /* Color 76 */ + 252, 252, 144, /* Color 77 */ + 252, 252, 180, /* Color 78 */ + 252, 252, 220, /* Color 79 */ + 28, 0, 28, /* Color 80 */ + 52, 0, 52, /* Color 81 */ + 76, 0, 76, /* Color 82 */ + 100, 0, 100, /* Color 83 */ + 124, 0, 124, /* Color 84 */ + 152, 0, 152, /* Color 85 */ + 176, 0, 176, /* Color 86 */ + 200, 0, 200, /* Color 87 */ + 224, 0, 224, /* Color 88 */ + 252, 0, 252, /* Color 89 */ + 252, 36, 252, /* Color 90 */ + 252, 72, 252, /* Color 91 */ + 252, 112, 252, /* Color 92 */ + 252, 148, 252, /* Color 93 */ + 252, 184, 252, /* Color 94 */ + 252, 224, 252, /* Color 95 */ + 0, 20, 20, /* Color 96 */ + 0, 40, 40, /* Color 97 */ + 0, 60, 60, /* Color 98 */ + 0, 80, 80, /* Color 99 */ + 0, 104, 100, /* Color 100 */ + 0, 124, 120, /* Color 101 */ + 0, 144, 144, /* Color 102 */ + 0, 164, 164, /* Color 103 */ + 0, 188, 184, /* Color 104 */ + 0, 208, 204, /* Color 105 */ + 0, 228, 224, /* Color 106 */ + 0, 252, 248, /* Color 107 */ + 44, 252, 248, /* Color 108 */ + 92, 252, 248, /* Color 109 */ + 140, 252, 248, /* Color 110 */ + 188, 252, 248, /* Color 111 */ + 24, 12, 0, /* Color 112 */ + 44, 24, 0, /* Color 113 */ + 64, 36, 0, /* Color 114 */ + 84, 48, 0, /* Color 115 */ + 108, 60, 0, /* Color 116 */ + 128, 72, 0, /* Color 117 */ + 148, 84, 0, /* Color 118 */ + 168, 96, 0, /* Color 119 */ + 192, 112, 0, /* Color 120 */ + 196, 128, 28, /* Color 121 */ + 204, 144, 60, /* Color 122 */ + 212, 160, 92, /* Color 123 */ + 216, 180, 120, /* Color 124 */ + 224, 196, 152, /* Color 125 */ + 232, 212, 184, /* Color 126 */ + 240, 232, 216, /* Color 127 */ + 24, 12, 12, /* Color 128 */ + 40, 20, 20, /* Color 129 */ + 60, 32, 32, /* Color 130 */ + 80, 44, 44, /* Color 131 */ + 96, 52, 52, /* Color 132 */ + 116, 64, 64, /* Color 133 */ + 136, 76, 76, /* Color 134 */ + 156, 88, 88, /* Color 135 */ + 176, 104, 104, /* Color 136 */ + 196, 120, 120, /* Color 137 */ + 216, 136, 136, /* Color 138 */ + 240, 152, 152, /* Color 139 */ + 240, 168, 168, /* Color 140 */ + 244, 188, 188, /* Color 141 */ + 244, 204, 204, /* Color 142 */ + 248, 224, 224, /* Color 143 */ + 24, 20, 12, /* Color 144 */ + 44, 36, 24, /* Color 145 */ + 68, 52, 36, /* Color 146 */ + 88, 72, 48, /* Color 147 */ + 112, 88, 60, /* Color 148 */ + 132, 104, 72, /* Color 149 */ + 156, 124, 88, /* Color 150 */ + 172, 140, 100, /* Color 151 */ + 188, 156, 112, /* Color 152 */ + 204, 176, 124, /* Color 153 */ + 220, 192, 136, /* Color 154 */ + 240, 212, 152, /* Color 155 */ + 240, 216, 168, /* Color 156 */ + 244, 224, 188, /* Color 157 */ + 244, 232, 204, /* Color 158 */ + 248, 240, 224, /* Color 159 */ + 32, 8, 0, /* Color 160 */ + 60, 16, 0, /* Color 161 */ + 88, 28, 0, /* Color 162 */ + 120, 36, 0, /* Color 163 */ + 148, 48, 0, /* Color 164 */ + 176, 56, 0, /* Color 165 */ + 208, 68, 0, /* Color 166 */ + 216, 88, 0, /* Color 167 */ + 224, 112, 0, /* Color 168 */ + 232, 136, 0, /* Color 169 */ + 240, 160, 0, /* Color 170 */ + 252, 184, 0, /* Color 171 */ + 252, 200, 56, /* Color 172 */ + 252, 216, 112, /* Color 173 */ + 252, 232, 168, /* Color 174 */ + 252, 252, 224, /* Color 175 */ + 20, 12, 12, /* Color 176 */ + 36, 24, 24, /* Color 177 */ + 56, 36, 36, /* Color 178 */ + 72, 48, 48, /* Color 179 */ + 92, 64, 64, /* Color 180 */ + 108, 76, 76, /* Color 181 */ + 128, 88, 88, /* Color 182 */ + 144, 100, 100, /* Color 183 */ + 164, 116, 116, /* Color 184 */ + 172, 132, 132, /* Color 185 */ + 184, 148, 148, /* Color 186 */ + 192, 164, 164, /* Color 187 */ + 204, 180, 180, /* Color 188 */ + 212, 196, 196, /* Color 189 */ + 224, 212, 212, /* Color 190 */ + 236, 232, 232, /* Color 191 */ + 12, 20, 12, /* Color 192 */ + 24, 36, 24, /* Color 193 */ + 36, 56, 36, /* Color 194 */ + 48, 72, 48, /* Color 195 */ + 64, 92, 64, /* Color 196 */ + 76, 108, 76, /* Color 197 */ + 88, 128, 88, /* Color 198 */ + 100, 144, 100, /* Color 199 */ + 116, 164, 116, /* Color 200 */ + 132, 172, 132, /* Color 201 */ + 148, 184, 148, /* Color 202 */ + 164, 192, 164, /* Color 203 */ + 180, 204, 180, /* Color 204 */ + 196, 212, 196, /* Color 205 */ + 212, 224, 212, /* Color 206 */ + 232, 236, 232, /* Color 207 */ + 12, 12, 16, /* Color 208 */ + 24, 24, 32, /* Color 209 */ + 36, 36, 48, /* Color 210 */ + 48, 48, 64, /* Color 211 */ + 64, 64, 80, /* Color 212 */ + 76, 76, 96, /* Color 213 */ + 88, 88, 112, /* Color 214 */ + 100, 100, 128, /* Color 215 */ + 116, 116, 148, /* Color 216 */ + 132, 132, 160, /* Color 217 */ + 148, 148, 172, /* Color 218 */ + 164, 164, 184, /* Color 219 */ + 180, 180, 196, /* Color 220 */ + 196, 196, 208, /* Color 221 */ + 212, 212, 220, /* Color 222 */ + 232, 232, 236, /* Color 223 */ + 40, 0, 0, /* Color 224 */ + 80, 0, 0, /* Color 225 */ + 124, 0, 0, /* Color 226 */ + 164, 0, 0, /* Color 227 */ + 208, 0, 0, /* Color 228 */ + 252, 0, 0, /* Color 229 */ + 252, 40, 0, /* Color 230 */ + 252, 84, 0, /* Color 231 */ + 252, 124, 0, /* Color 232 */ + 252, 168, 0, /* Color 233 */ + 252, 208, 0, /* Color 234 */ + 252, 252, 0, /* Color 235 */ + 252, 252, 44, /* Color 236 */ + 252, 252, 92, /* Color 237 */ + 252, 252, 140, /* Color 238 */ + 252, 252, 188, /* Color 239 */ + 0, 0, 0, /* Color 240 */ + 0, 0, 88, /* Color 241 */ + 0, 0, 128, /* Color 242 */ + 0, 0, 168, /* Color 243 */ + 0, 0, 208, /* Color 244 */ + 0, 0, 248, /* Color 245 */ + 40, 0, 248, /* Color 246 */ + 84, 0, 248, /* Color 247 */ + 124, 0, 248, /* Color 248 */ + 168, 0, 248, /* Color 249 */ + 208, 0, 248, /* Color 250 */ + 252, 0, 252, /* Color 251 */ + 252, 52, 252, /* Color 252 */ + 252, 108, 252, /* Color 253 */ + 252, 164, 252, /* Color 254 */ + 252, 220, 252 /* Color 255 */ +} ; + +uint32_t default_colorequiv[256]; + +/* --------------------------------------------------------------------------- */ +/* + * Match an RGB value to a particular palette index + */ +int find_nearest_color( PALETTE * pal, int first, int last, int r, int g, int b ) +{ + /* Do colorspace distance matching */ + unsigned int smallest = ~0; + unsigned int distance; + int rd, gd, bd; + int i; + int pixel = 0; + rgb_component * palrgb ; + + if ( !pal ) + if ( !sys_pixel_format->palette ) + palrgb = ( rgb_component * ) default_palette; + else + palrgb = sys_pixel_format->palette->rgb ; + else + palrgb = pal->rgb ; + + for ( i = first; i <= last; ++i ) + { + rd = ( palrgb[i].r - ( r /*& ~0x02 */) ) ; + gd = ( palrgb[i].g - ( g /*& ~0x02 */) ) ; + bd = ( palrgb[i].b - ( b /*& ~0x02 */) ) ; + + distance = ( rd * rd ) + ( gd * gd ) + ( bd * bd ) ; + if ( distance < smallest ) + { + pixel = i; + if ( !distance ) break; /* Perfect match! */ + smallest = distance; + } + } + + return( pixel ); +} + +/* --------------------------------------------------------------------------- */ +/* Find the opaque pixel value corresponding to an RGB triple */ + +int _rgba( PIXEL_FORMAT * format, int r, int g, int b, int a ) +{ + int color; + + if ( format->depth < 16 ) return find_nearest_color( format->palette, 0, 255, r, g, b ); + + color = (( r >> format->Rloss ) << format->Rshift ) | + (( g >> format->Gloss ) << format->Gshift ) | + (( b >> format->Bloss ) << format->Bshift ) ; + + if ( format->depth == 32 ) color |= (( a >> format->Aloss ) << format->Ashift ); + + return color; +} + +/* --------------------------------------------------------------------------- */ +/* Find the pixel value corresponding to an RGBA quadruple */ + +int _rgb( PIXEL_FORMAT * format, int r, int g, int b ) +{ + return _rgba( format, r, g, b, 255 ); +} + +/* --------------------------------------------------------------------------- */ + +void _get_rgba( PIXEL_FORMAT * format, int color, int *r, int *g, int *b, int *a ) +{ + /* 8 bits mode, work with system palette */ + + if ( format->depth < 16 ) + { + rgb_component * rgb ; + + if ( !format->palette ) rgb = ( rgb_component * ) default_palette; + else rgb = format->palette->rgb ; + + color &= 0xFF ; + ( *r ) = rgb[ color ].r ; + ( *g ) = rgb[ color ].g ; + ( *b ) = rgb[ color ].b ; + + return ; + } + + ( *r ) = (( color & format->Rmask ) >> format->Rshift ) << format->Rloss ; + ( *g ) = (( color & format->Gmask ) >> format->Gshift ) << format->Gloss ; + ( *b ) = (( color & format->Bmask ) >> format->Bshift ) << format->Bloss ; + + if ( a && format->depth == 32 ) ( *a ) = (( color & format->Amask ) >> format->Ashift ) << format->Aloss ; +} + +/* --------------------------------------------------------------------------- */ + +void _get_rgb( PIXEL_FORMAT * format, int color, int *r, int *g, int *b ) +{ + return _get_rgba( format, color, r, g, b, NULL ); +} + +/* --------------------------------------------------------------------------- */ + +void pal_refresh( PALETTE * pal ) +{ + if ( sys_pixel_format->depth > 8 ) + { + int n; + + if ( !pal ) + { + uint8_t * p = default_palette; + for ( n = 0; n < 256; n++ ) + { + default_colorequiv[ n ] = _rgb( sys_pixel_format, *( p ), *( p + 1 ), *( p + 2 ) ); + p += 3; + } + + pal = first_palette; + while ( pal ) + { + for ( n = 256; n--; ) pal->colorequiv[ n ] = _rgb( sys_pixel_format, pal->rgb[ n ].r, pal->rgb[ n ].g, pal->rgb[ n ].b ); + pal = pal->next; + } + } + else + { + for ( n = 256; n--; ) pal->colorequiv[ n ] = _rgb( sys_pixel_format, pal->rgb[ n ].r, pal->rgb[ n ].g, pal->rgb[ n ].b ); + } + } + else + if ( !pal || pal == sys_pixel_format->palette ) palette_changed = 1 ; + +} + +/* --------------------------------------------------------------------------- */ + +void pal_use( PALETTE * pal ) +{ + if ( pal ) pal->use++; +} + +/* --------------------------------------------------------------------------- */ + +int pal_discard( PALETTE * pal ) +{ + if ( !pal ) return 0; + if ( pal->use > 0 ) pal->use--; + return pal->use; +} + +/* --------------------------------------------------------------------------- */ + +PALETTE * pal_new( PALETTE * basepal ) +{ + PALETTE * pal = calloc( 1, sizeof( PALETTE ) ); + if ( !pal ) return NULL ; + + if ( basepal ) + { + memmove( pal->rgb, basepal->rgb, sizeof( pal->rgb ) ) ; + memmove( pal->colorequiv, basepal->colorequiv, sizeof( pal->colorequiv ) ) ; + pal_refresh( pal ); + } + else + { + /* Default */ + if ( sys_pixel_format->palette ) + memmove( pal->rgb, sys_pixel_format->palette->rgb, sizeof( pal->rgb ) ) ; + else + memmove( pal->rgb, default_palette, sizeof( pal->rgb ) ) ; + + pal_refresh( pal ); + } + + pal->use = 1 ; + pal->next = first_palette ; + pal->prev = NULL ; + if ( first_palette ) first_palette->prev = pal; + first_palette = pal ; + + return pal; +} + +/* --------------------------------------------------------------------------- */ + +PALETTE * pal_new_rgb( unsigned char * datapal ) +{ + if ( !datapal ) return NULL ; + + PALETTE * pal = malloc( sizeof( PALETTE ) ); + if ( !pal ) return NULL ; + + memmove( pal->rgb, datapal, sizeof( pal->rgb ) ); + pal_refresh( pal ); + + pal->use = 1 ; + pal->next = first_palette ; + pal->prev = NULL ; + if ( first_palette ) first_palette->prev = pal; + first_palette = pal ; + + return pal; +} + +/* --------------------------------------------------------------------------- */ + +void pal_destroy( PALETTE * pal ) +{ + if ( !pal ) return ; + + if ( pal_discard( pal ) > 0 ) return ; + + if ( pal->next ) pal->next->prev = pal->prev ; + if ( pal->prev ) pal->prev->next = pal->next ; + + if ( pal == first_palette ) first_palette = pal->next ; + + free( pal ); +} + +/* --------------------------------------------------------------------------- */ + +int pal_get( PALETTE * spal, int color, int num, uint8_t * pal ) +{ + if ( num < 1 || color < 0 || color > 255 ) return 0; + if ( color + num > 256 ) num = 256 - color ; + + if ( !spal ) + { + if ( !sys_pixel_format->palette ) sys_pixel_format->palette = pal_new( NULL ); + spal = sys_pixel_format->palette ; + } + + while ( num-- ) + { + *pal++ = spal->rgb[ color ].r ; + *pal++ = spal->rgb[ color ].g ; + *pal++ = spal->rgb[ color++ ].b ; + } + return 1; +} + +/* --------------------------------------------------------------------------- */ + +int pal_set( PALETTE * spal, int color, int num, uint8_t * pal ) +{ + if ( num < 1 || color < 0 || color > 255 ) return 0; + if ( color + num > 256 ) num = 256 - color ; + + if ( !spal ) + { + if ( !sys_pixel_format->palette ) sys_pixel_format->palette = pal_new( NULL ); + spal = sys_pixel_format->palette ; + } + + while ( num-- ) + { + spal->rgb[ color ].r = *pal++ ; + spal->rgb[ color ].g = *pal++ ; + spal->rgb[ color++ ].b = *pal++ ; + } + return 1; +} + +/* --------------------------------------------------------------------------- */ + +int pal_map_assign( int libid, int mapcode, PALETTE * palid ) +{ + GRAPH * bmp = bitmap_get( libid, mapcode ) ; + PALETTE * oldpal ; + + if ( !bmp /*|| !palid*/ || bmp->format->depth != 8 ) return 0 ; + + oldpal = bmp->format->palette ; + bmp->format->palette = palid ; + + pal_use( bmp->format->palette ) ; + + if ( oldpal ) pal_destroy( oldpal ) ; + + bmp->modified = 1; + + return 1 ; +} + +/* --------------------------------------------------------------------------- */ + +int pal_map_remove( int libid, int mapcode ) +{ + GRAPH * bmp = bitmap_get( libid, mapcode ) ; + + if ( !bmp || bmp->format->depth != 8 ) return 0 ; + + if ( bmp->format->palette ) pal_destroy( bmp->format->palette ) ; + + bmp->format->palette = NULL ; + bmp->modified = 1; + + return 1 ; +} + +/* --------------------------------------------------------------------------- */ + +void gr_roll_palette( int color0, int num, int inc ) +{ + rgb_component backup[ 256 ] ; + + if ( color0 < 0 || color0 > 255 ) return ; + if ( num + color0 > 255 ) num = 256 - color0 ; + + while ( inc >= num ) inc -= num ; + while ( inc <= -num ) inc += num ; + + if ( !inc ) return ; + + memcpy( &backup[ color0 ], &sys_pixel_format->palette->rgb[ color0 ], sizeof( rgb_component ) * num ) ; + + if ( inc < 0 ) /* Derecha */ + { + inc = -inc ; + memmove( &sys_pixel_format->palette->rgb[ color0 + inc ], &sys_pixel_format->palette->rgb[ color0 ], sizeof( rgb_component ) * ( num - inc ) ) ; + memcpy( &sys_pixel_format->palette->rgb[ color0 ], &backup[ color0 + num - inc ], sizeof( rgb_component ) * inc ) ; + } + else /* Izquierda */ + { + memmove( &sys_pixel_format->palette->rgb[ color0 ], &sys_pixel_format->palette->rgb[ color0 + inc ], sizeof( rgb_component ) * ( num - inc ) ) ; + memcpy( &sys_pixel_format->palette->rgb[ color0 + num - inc ], &backup[ color0 ], sizeof( rgb_component ) * inc ) ; + } + + palette_changed = 1 ; +} + +/* --------------------------------------------------------------------------- */ + +int gr_rgb( int r, int g, int b ) +{ + int color ; + color = _rgb( sys_pixel_format, r, g, b ); + if ( sys_pixel_format->depth == 16 && !color ) return 1; + return color ; +} + +/* --------------------------------------------------------------------------- */ + +int gr_rgba( int r, int g, int b, int a ) +{ + int color ; + color = _rgba( sys_pixel_format, r, g, b, a ); + if ( sys_pixel_format->depth == 16 && !color ) return 1; + return color ; +} + +/* --------------------------------------------------------------------------- */ + +void gr_get_rgb( int color, int *r, int *g, int *b ) +{ + return _get_rgb( sys_pixel_format, color, r, g, b ); +} + +/* --------------------------------------------------------------------------- */ + +void gr_get_rgba( int color, int *r, int *g, int *b, int *a ) +{ + return _get_rgba( sys_pixel_format, color, r, g, b, a ); +} + +/* --------------------------------------------------------------------------- */ +/* This functions is used only for 16 and 32 bits */ + +int gr_rgb_depth( int depth, int r, int g, int b ) +{ + int color ; + PIXEL_FORMAT * pf = bitmap_create_format( depth ); + color = _rgb( pf, r, g, b ); + free( pf ); + if ( !color && depth == 16 ) return 1 ; + return color ; +} + +/* --------------------------------------------------------------------------- */ +/* This functions is used only for 16 and 32 bits */ + +int gr_rgba_depth( int depth, int r, int g, int b, int a ) +{ + int color ; + PIXEL_FORMAT * pf = bitmap_create_format( depth ); + color = _rgba( pf, r, g, b, a ); + free( pf ); + if ( !color && depth == 16 ) return 1 ; + return color ; +} + +/* --------------------------------------------------------------------------- */ + +void gr_get_rgb_depth( int depth, int color, int *r, int *g, int *b ) +{ + PIXEL_FORMAT * pf = bitmap_create_format( depth ); + _get_rgb( pf, color, r, g, b ); + free( pf ); +} + +/* --------------------------------------------------------------------------- */ + +void gr_get_rgba_depth( int depth, int color, int *r, int *g, int *b, int *a ) +{ + PIXEL_FORMAT * pf = bitmap_create_format( depth ); + _get_rgba( pf, color, r, g, b, a ); + free( pf ); +} + +/* --------------------------------------------------------------------------- */ + +int gr_find_nearest_color( int r, int g, int b ) +{ + return find_nearest_color( sys_pixel_format->palette, 0, 255, r, g, b ) ; +} + +/* --------------------------------------------------------------------------- */ + +void gr_make_trans_table() +{ + int a = 0, b = 0; + int r1, g1, b1; + rgb_component * rgb; + + if ( trans_table_updated ) return ; + + if ( sys_pixel_format->palette ) + rgb = sys_pixel_format->palette->rgb; + else + rgb = ( rgb_component * ) default_palette; + + for ( a = 0; a < 256; a++ ) + { + r1 = rgb[ a ].r / 2 ; + g1 = rgb[ a ].g / 2 ; + b1 = rgb[ a ].b / 2 ; + + for ( b = 0; b < a; b++ ) + trans_table[ a ][ b ] = + trans_table[ b ][ a ] = + find_nearest_color( NULL, b, a, r1 + rgb[ b ].r / 2, g1 + rgb[ b ].g / 2, b1 + rgb[ b ].b / 2 ) ; + + trans_table[ a ][ a ] = a ; + trans_table[ 0 ][ a ] = a ; + } + + trans_table_updated = 1 ; +} + +/* --------------------------------------------------------------------------- */ + +void gr_set_rgb( int color, int r, int g, int b ) +{ + if ( color < 0 || color > 255 ) return ; + + if ( !sys_pixel_format->palette ) + { + sys_pixel_format->palette = pal_new( NULL ); + memset ( sys_pixel_format->palette->rgb, '\0', sizeof( sys_pixel_format->palette->rgb ) ); + } + + sys_pixel_format->palette->rgb[ color ].r = r << 2; + sys_pixel_format->palette->rgb[ color ].g = g << 2; + sys_pixel_format->palette->rgb[ color ].b = b << 2; + + palette_changed = 1 ; +} + +/* --------------------------------------------------------------------------- */ + +/* Rutinas para guardar y recibir trozos de paleta desde/hacia un buffer */ + +void gr_get_colors( int color, int num, uint8_t * pal ) +{ + rgb_component * rgb; + + if ( num < 1 || color < 0 || color > 255 ) return ; + if ( color + num > 256 ) num = 256 - color ; + + if ( !sys_pixel_format->palette ) + rgb = ( rgb_component * ) default_palette; + else + rgb = ( rgb_component * ) sys_pixel_format->palette->rgb; + + while ( num-- ) + { + *pal++ = rgb[ color ].r ; + *pal++ = rgb[ color ].g ; + *pal++ = rgb[ color++ ].b ; + } +} + +/* --------------------------------------------------------------------------- */ + +void gr_set_colors( int color, int num, uint8_t * pal ) +{ + if ( num < 1 || color < 0 || color > 255 ) return ; + if ( color + num > 256 ) num = 256 - color ; + + if ( !sys_pixel_format->palette ) + { + sys_pixel_format->palette = pal_new( NULL ); + memset ( sys_pixel_format->palette->rgb, '\0', sizeof( sys_pixel_format->palette->rgb ) ); + } + + while ( num-- ) + { + sys_pixel_format->palette->rgb[ color ].r = *pal++ ; + sys_pixel_format->palette->rgb[ color ].g = *pal++ ; + sys_pixel_format->palette->rgb[ color++ ].b = *pal++ ; + } + + palette_changed = 1 ; +} + +/* --------------------------------------------------------------------------- */ + |