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