palette.c

   1
   2 #include "quakedef.h"
   3 #include "image.h"
   4
   5 cvar_t r_colormap_palette = {CF_CLIENT, "r_colormap_palette", "gfx/colormap_palette.lmp", "name of a palette lmp file to override the shirt/pants colors of player models. It consists of 16 shirt colors, 16 scoreboard shirt colors, 16 pants colors and 16 scoreboard pants colors"};
   6
   7 unsigned char palette_rgb[256][3];
   8 unsigned char palette_rgb_pantscolormap[16][3];
   9 unsigned char palette_rgb_shirtcolormap[16][3];
  10 unsigned char palette_rgb_pantsscoreboard[16][3];
  11 unsigned char palette_rgb_shirtscoreboard[16][3];
  12
  13 unsigned int palette_bgra_complete[256];
  14 unsigned int palette_bgra_font[256];
  15 unsigned int palette_bgra_alpha[256];
  16 unsigned int palette_bgra_nocolormap[256];
  17 unsigned int palette_bgra_nocolormapnofullbrights[256];
  18 unsigned int palette_bgra_nofullbrights[256];
  19 unsigned int palette_bgra_nofullbrights_transparent[256];
  20 unsigned int palette_bgra_onlyfullbrights[256];
  21 unsigned int palette_bgra_onlyfullbrights_transparent[256];
  22 unsigned int palette_bgra_pantsaswhite[256];
  23 unsigned int palette_bgra_shirtaswhite[256];
  24 unsigned int palette_bgra_transparent[256];
  25 unsigned int palette_bgra_embeddedpic[256];
  26 unsigned char palette_featureflags[256];
  27
  28 unsigned int q2palette_bgra_complete[256];
  29
  30 // John Carmack said the quake palette.lmp can be considered public domain because it is not an important asset to id, so I include it here as a fallback if no external palette file is found.
  31 unsigned char host_quakepal[768] =
  32 {
  33 // marked: colormap colors: cb = (colormap & 0xF0);cb += (cb >= 128 && cb < 224) ? 4 : 12;
  34 // 0x0*
  35         0,0,0,        15,15,15,     31,31,31,     47,47,47,     63,63,63,     75,75,75,     91,91,91,     107,107,107,
  36         123,123,123,  139,139,139,  155,155,155,  171,171,171,  187,187,187,  203,203,203,  219,219,219,  235,235,235,
  37 // 0x1*                                                   0 ^
  38         15,11,7,      23,15,11,     31,23,11,     39,27,15,     47,35,19,     55,43,23,     63,47,23,     75,55,27,
  39         83,59,27,     91,67,31,     99,75,31,     107,83,31,    115,87,31,    123,95,35,    131,103,35,   143,111,35,
  40 // 0x2*                                                   1 ^
  41         11,11,15,     19,19,27,     27,27,39,     39,39,51,     47,47,63,     55,55,75,     63,63,87,     71,71,103,
  42         79,79,115,    91,91,127,    99,99,139,    107,107,151,  115,115,163,  123,123,175,  131,131,187,  139,139,203,
  43 // 0x3*                                                   2 ^
  44         0,0,0,        7,7,0,        11,11,0,      19,19,0,      27,27,0,      35,35,0,      43,43,7,      47,47,7,
  45         55,55,7,      63,63,7,      71,71,7,      75,75,11,     83,83,11,     91,91,11,     99,99,11,     107,107,15,
  46 // 0x4*                                                   3 ^
  47         7,0,0,        15,0,0,       23,0,0,       31,0,0,       39,0,0,       47,0,0,       55,0,0,       63,0,0,
  48         71,0,0,       79,0,0,       87,0,0,       95,0,0,       103,0,0,      111,0,0,      119,0,0,      127,0,0,
  49 // 0x5*                                                   4 ^
  50         19,19,0,      27,27,0,      35,35,0,      47,43,0,      55,47,0,      67,55,0,      75,59,7,      87,67,7,
  51         95,71,7,      107,75,11,    119,83,15,    131,87,19,    139,91,19,    151,95,27,    163,99,31,    175,103,35,
  52 // 0x6*                                                   5 ^
  53         35,19,7,      47,23,11,     59,31,15,     75,35,19,     87,43,23,     99,47,31,     115,55,35,    127,59,43,
  54         143,67,51,    159,79,51,    175,99,47,    191,119,47,   207,143,43,   223,171,39,   239,203,31,   255,243,27,
  55 // 0x7*                                                   6 ^
  56         11,7,0,       27,19,0,      43,35,15,     55,43,19,     71,51,27,     83,55,35,     99,63,43,     111,71,51,
  57         127,83,63,    139,95,71,    155,107,83,   167,123,95,   183,135,107,  195,147,123,  211,163,139,  227,179,151,
  58 // 0x8*                                                   7 ^        v 8
  59         171,139,163,  159,127,151,  147,115,135,  139,103,123,  127,91,111,   119,83,99,    107,75,87,    95,63,75,
  60         87,55,67,     75,47,55,     67,39,47,     55,31,35,     43,23,27,     35,19,19,     23,11,11,     15,7,7,
  61 // 0x9*                                                   9 v
  62         187,115,159,  175,107,143,  163,95,131,   151,87,119,   139,79,107,   127,75,95,    115,67,83,    107,59,75,
  63         95,51,63,     83,43,55,     71,35,43,     59,31,35,     47,23,27,     35,19,19,     23,11,11,     15,7,7,
  64 // 0xA*                                                  10 v
  65         219,195,187,  203,179,167,  191,163,155,  175,151,139,  163,135,123,  151,123,111,  135,111,95,   123,99,83,
  66         107,87,71,    95,75,59,     83,63,51,     67,51,39,     55,43,31,     39,31,23,     27,19,15,     15,11,7,
  67 // 0xB*                                                  11 v
  68         111,131,123,  103,123,111,  95,115,103,   87,107,95,    79,99,87,     71,91,79,     63,83,71,     55,75,63,
  69         47,67,55,     43,59,47,     35,51,39,     31,43,31,     23,35,23,     15,27,19,     11,19,11,     7,11,7,
  70 // 0xC*                                                  12 v
  71         255,243,27,   239,223,23,   219,203,19,   203,183,15,   187,167,15,   171,151,11,   155,131,7,    139,115,7,
  72         123,99,7,     107,83,0,     91,71,0,      75,55,0,      59,43,0,      43,31,0,      27,15,0,      11,7,0,
  73 // 0xD*                                                  13 v
  74         0,0,255,      11,11,239,    19,19,223,    27,27,207,    35,35,191,    43,43,175,    47,47,159,    47,47,143,
  75         47,47,127,    47,47,111,    47,47,95,     43,43,79,     35,35,63,     27,27,47,     19,19,31,     11,11,15,
  76 // 0xE*
  77         43,0,0,       59,0,0,       75,7,0,       95,7,0,       111,15,0,     127,23,7,     147,31,7,     163,39,11,
  78         183,51,15,    195,75,27,    207,99,43,    219,127,59,   227,151,79,   231,171,95,   239,191,119,  247,211,139,
  79 // 0xF*                                                  14 ^
  80         167,123,59,   183,155,55,   199,195,55,   231,227,87,   127,191,255,  171,231,255,  215,255,255,  103,0,0,
  81         139,0,0,      179,0,0,      215,0,0,      255,0,0,      255,243,147,  255,247,199,  255,255,255,  159,91,83
  82 }; //                                                    15 ^
  83
  84 static void Palette_SetupSpecialPalettes(void)
  85 {
  86         int i;
  87         int fullbright_start, fullbright_end;
  88         int pants_start, pants_end;
  89         int shirt_start, shirt_end;
  90         int reversed_start, reversed_end;
  91         int transparentcolor;
  92         unsigned char *colormap;
  93         fs_offset_t filesize;
  94         union
  95         {
  96                 int i;
  97                 unsigned char b[4];
  98         }
  99         u;
 100
 101         colormap = FS_LoadFile("gfx/colormap.lmp", tempmempool, true, &filesize);
 102         if (colormap && filesize >= 16385)
 103                 fullbright_start = 256 - colormap[16384];
 104         else
 105                 fullbright_start = 256;
 106         if (colormap)
 107                 Mem_Free(colormap);
 108         fullbright_end = 256;
 109         pants_start = 96;
 110         pants_end = 112;
 111         shirt_start = 16;
 112         shirt_end = 32;
 113         reversed_start = 128;
 114         reversed_end = 224;
 115         transparentcolor = 255;
 116
 117         for (i = 0;i < 256;i++)
 118                 palette_featureflags[i] = PALETTEFEATURE_STANDARD;
 119         for (i = reversed_start;i < reversed_end;i++)
 120                 palette_featureflags[i] = PALETTEFEATURE_REVERSED;
 121         for (i = pants_start;i < pants_end;i++)
 122                 palette_featureflags[i] = PALETTEFEATURE_PANTS;
 123         for (i = shirt_start;i < shirt_end;i++)
 124                 palette_featureflags[i] = PALETTEFEATURE_SHIRT;
 125         for (i = fullbright_start;i < fullbright_end;i++)
 126                 palette_featureflags[i] = PALETTEFEATURE_GLOW;
 127         palette_featureflags[0] = PALETTEFEATURE_ZERO;
 128         palette_featureflags[transparentcolor] = PALETTEFEATURE_TRANSPARENT;
 129
 130         for (i = 0;i < 256;i++)
 131                 palette_bgra_transparent[i] = palette_bgra_complete[i];
 132         palette_bgra_transparent[transparentcolor] = 0;
 133
 134         for (i = 0;i < fullbright_start;i++)
 135                 palette_bgra_nofullbrights[i] = palette_bgra_complete[i];
 136         for (i = fullbright_start;i < fullbright_end;i++)
 137                 palette_bgra_nofullbrights[i] = palette_bgra_complete[0];
 138         for (i = 0;i < 256;i++)
 139                 palette_bgra_nofullbrights_transparent[i] = palette_bgra_nofullbrights[i];
 140         palette_bgra_nofullbrights_transparent[transparentcolor] = 0;
 141
 142         for (i = 0;i < 256;i++)
 143                 palette_bgra_onlyfullbrights[i] = 0;
 144         for (i = fullbright_start;i < fullbright_end;i++)
 145                 palette_bgra_onlyfullbrights[i] = palette_bgra_complete[i];
 146         for (i = 0;i < 256;i++)
 147                 palette_bgra_onlyfullbrights_transparent[i] = palette_bgra_onlyfullbrights[i];
 148         palette_bgra_onlyfullbrights_transparent[transparentcolor] = 0;
 149
 150         for (i = 0;i < 256;i++)
 151                 palette_bgra_nocolormapnofullbrights[i] = palette_bgra_complete[i];
 152         for (i = pants_start;i < pants_end;i++)
 153                 palette_bgra_nocolormapnofullbrights[i] = 0;
 154         for (i = shirt_start;i < shirt_end;i++)
 155                 palette_bgra_nocolormapnofullbrights[i] = 0;
 156         for (i = fullbright_start;i < fullbright_end;i++)
 157                 palette_bgra_nocolormapnofullbrights[i] = 0;
 158
 159         for (i = 0;i < 256;i++)
 160                 palette_bgra_nocolormap[i] = palette_bgra_complete[i];
 161         for (i = pants_start;i < pants_end;i++)
 162                 palette_bgra_nocolormap[i] = 0;
 163         for (i = shirt_start;i < shirt_end;i++)
 164                 palette_bgra_nocolormap[i] = 0;
 165
 166         for (i = 0;i < 256;i++)
 167                 palette_bgra_pantsaswhite[i] = 0;
 168         for (i = pants_start;i < pants_end;i++)
 169         {
 170                 if (i >= reversed_start && i < reversed_end)
 171                         palette_bgra_pantsaswhite[i] = palette_bgra_complete[15 - (i - pants_start)];
 172                 else
 173                         palette_bgra_pantsaswhite[i] = palette_bgra_complete[i - pants_start];
 174         }
 175
 176         for (i = 0;i < 256;i++)
 177                 palette_bgra_shirtaswhite[i] = 0;
 178         for (i = shirt_start;i < shirt_end;i++)
 179         {
 180                 if (i >= reversed_start && i < reversed_end)
 181                         palette_bgra_shirtaswhite[i] = palette_bgra_complete[15 - (i - shirt_start)];
 182                 else
 183                         palette_bgra_shirtaswhite[i] = palette_bgra_complete[i - shirt_start];
 184         }
 185
 186         for (i = 0;i < 256;i++)
 187                 palette_bgra_alpha[i] = 0xFFFFFFFF;
 188         u.i = 0xFFFFFFFF;
 189         u.b[3] = 0;
 190         palette_bgra_alpha[transparentcolor] = u.i;
 191
 192         for (i = 0;i < 256;i++)
 193                 palette_bgra_font[i] = palette_bgra_complete[i];
 194         palette_bgra_font[0] = 0;
 195 }
 196
 197 static void Palette_LoadQ2Colormap(void)
 198 {
 199         fs_offset_t filesize;
 200         unsigned char * q2colormapfile = FS_LoadFile("pics/colormap.pcx", tempmempool, true, &filesize);
 201         if (q2colormapfile && filesize >= 768)
 202         {
 203                 unsigned char q2palette_rgb[256][3];
 204                 unsigned char *out = (unsigned char *) q2palette_bgra_complete; // palette is accessed as 32bit for speed reasons, but is created as 8bit bytes
 205                 int i;
 206                 LoadPCX_PaletteOnly(q2colormapfile, filesize, q2palette_rgb[0]);
 207                 // this stops at color 255 because it is a pink transparent color that we don't actually want to preserve color on.
 208                 for (i = 0;i < 255;i++)
 209                 {
 210                         out[i*4+2] = q2palette_rgb[i][0];
 211                         out[i*4+1] = q2palette_rgb[i][1];
 212                         out[i*4+0] = q2palette_rgb[i][2];
 213                         out[i*4+3] = 255;
 214                 }
 215                 Mem_Free(q2colormapfile);
 216         }
 217 }
 218
 219 void BuildGammaTable8(float prescale, float gamma, float scale, float base, float contrastboost, unsigned char *out, int rampsize)
 220 {
 221         int i, adjusted;
 222         double invgamma;
 223         double t, d;
 224
 225         invgamma = 1.0 / gamma;
 226         prescale /= (double) (rampsize - 1);
 227         for (i = 0;i < rampsize;i++)
 228         {
 229                 t = i * prescale;
 230                 d = ((contrastboost - 1) * t + 1);
 231                 if(d == 0)
 232                         t = 0; // we could just as well assume 1 here, depending on which side of the division by zero we want to be
 233                 else
 234                         t = contrastboost * t / d;
 235                 adjusted = (int) (255.0 * (pow(t, invgamma) * scale + base) + 0.5);
 236                 out[i] = bound(0, adjusted, 255);
 237         }
 238 }
 239
 240 void BuildGammaTable16(float prescale, float gamma, float scale, float base, float contrastboost, unsigned short *out, int rampsize)
 241 {
 242         int i, adjusted;
 243         double invgamma;
 244         double t;
 245
 246         invgamma = 1.0 / gamma;
 247         prescale /= (double) (rampsize - 1);
 248         for (i = 0;i < rampsize;i++)
 249         {
 250                 t = i * prescale;
 251                 t = contrastboost * t / ((contrastboost - 1) * t + 1);
 252                 adjusted = (int) (65535.0 * (pow(t, invgamma) * scale + base) + 0.5);
 253                 out[i] = bound(0, adjusted, 65535);
 254         }
 255 }
 256
 257 static void Palette_Shutdown(void)
 258 {
 259 }
 260
 261 static void Palette_NewMap(void)
 262 {
 263 }
 264
 265 static void Palette_Load(void)
 266 {
 267         int i;
 268         unsigned char *out;
 269         float gamma, scale, base;
 270         fs_offset_t filesize;
 271         unsigned char *palfile;
 272         unsigned char texturegammaramp[256];
 273         union
 274         {
 275                 unsigned char b[4];
 276                 unsigned int i;
 277         }
 278         bgra;
 279
 280         gamma = 1;
 281         scale = 1;
 282         base = 0;
 283 // COMMANDLINEOPTION: Client: -texgamma <number> sets the quake palette gamma, allowing you to make quake textures brighter/darker, not recommended
 284         i = Sys_CheckParm("-texgamma");
 285         if (i)
 286                 gamma = atof(sys.argv[i + 1]);
 287 // COMMANDLINEOPTION: Client: -texcontrast <number> sets the quake palette contrast, allowing you to make quake textures brighter/darker, not recommended
 288         i = Sys_CheckParm("-texcontrast");
 289         if (i)
 290                 scale = atof(sys.argv[i + 1]);
 291 // COMMANDLINEOPTION: Client: -texbrightness <number> sets the quake palette brightness (brightness of black), allowing you to make quake textures brighter/darker, not recommended
 292         i = Sys_CheckParm("-texbrightness");
 293         if (i)
 294                 base = atof(sys.argv[i + 1]);
 295         gamma = bound(0.01, gamma, 10.0);
 296         scale = bound(0.01, scale, 10.0);
 297         base = bound(0, base, 0.95);
 298
 299         BuildGammaTable8(1.0f, gamma, scale, base, 1, texturegammaramp, 256);
 300
 301         palfile = (unsigned char *)FS_LoadFile ("gfx/palette.lmp", tempmempool, false, &filesize);
 302         if (palfile && filesize >= 768)
 303                 memcpy(palette_rgb, palfile, 768);
 304         else
 305         {
 306                 Con_DPrint("Couldn't load gfx/palette.lmp, falling back on internal palette\n");
 307                 memcpy(palette_rgb, host_quakepal, 768);
 308         }
 309         if (palfile)
 310                 Mem_Free(palfile);
 311
 312         out = (unsigned char *) palette_bgra_complete; // palette is accessed as 32bit for speed reasons, but is created as 8bit bytes
 313         for (i = 0;i < 256;i++)
 314         {
 315                 out[i*4+2] = texturegammaramp[palette_rgb[i][0]];
 316                 out[i*4+1] = texturegammaramp[palette_rgb[i][1]];
 317                 out[i*4+0] = texturegammaramp[palette_rgb[i][2]];
 318                 out[i*4+3] = 255;
 319         }
 320
 321         if(*r_colormap_palette.string)
 322                 palfile = (unsigned char *)FS_LoadFile (r_colormap_palette.string, tempmempool, false, &filesize);
 323         else
 324                 palfile = NULL;
 325
 326         if (palfile && filesize >= 48*2)
 327         {
 328                 memcpy(palette_rgb_shirtcolormap[0], palfile, 48);
 329                 memcpy(palette_rgb_shirtscoreboard[0], palfile + 48, 48);
 330         }
 331         else
 332         {
 333                 for(i = 0;i < 16;i++)
 334                 {
 335                         VectorCopy(palette_rgb[(i << 4) | ((i >= 8 && i <= 13) ? 0x04 : 0x0C)], palette_rgb_shirtcolormap[i]);
 336                         VectorCopy(palette_rgb[(i << 4) | 0x08], palette_rgb_shirtscoreboard[i]);
 337                 }
 338         }
 339
 340         if (palfile && filesize >= 48*4)
 341         {
 342                 memcpy(palette_rgb_pantscolormap[0], palfile + 48*2, 48);
 343                 memcpy(palette_rgb_pantsscoreboard[0], palfile + 48*3, 48);
 344         }
 345         else
 346         {
 347                 memcpy(palette_rgb_pantscolormap, palette_rgb_shirtcolormap, sizeof(palette_rgb_pantscolormap));
 348                 memcpy(palette_rgb_pantsscoreboard, palette_rgb_shirtscoreboard, sizeof(palette_rgb_pantsscoreboard));
 349         }
 350
 351         if(palfile)
 352                 Mem_Free(palfile);
 353
 354         memset(palette_bgra_embeddedpic, 0, sizeof(palette_bgra_embeddedpic));
 355         for (i = '1';i <= '7';i++)
 356         {
 357                 Vector4Set(bgra.b, 255, 255, 255, (i - '0') * 255 / 7);
 358                 palette_bgra_embeddedpic[i] = bgra.i;
 359         }
 360
 361         Palette_SetupSpecialPalettes();
 362
 363         Palette_LoadQ2Colormap();
 364 }
 365
 366 void Palette_Init(void)
 367 {
 368         R_RegisterModule("Palette", Palette_Load, Palette_Shutdown, Palette_NewMap, NULL, NULL);
 369         Cvar_RegisterVariable(&r_colormap_palette);
 370         Palette_Load();
 371 }