10 void Image_GammaRemapRGB(const qbyte *in, qbyte *out, int pixels, const qbyte *gammar, const qbyte *gammag, const qbyte *gammab)
14 out[0] = gammar[in[0]];
15 out[1] = gammag[in[1]];
16 out[2] = gammab[in[2]];
22 // note: pal must be 32bit color
23 void Image_Copy8bitRGBA(const qbyte *in, qbyte *out, int pixels, const unsigned int *pal)
25 int *iout = (void *)out;
61 =================================================================
65 =================================================================
74 unsigned short xmin,ymin,xmax,ymax;
75 unsigned short hres,vres;
76 unsigned char palette[48];
79 unsigned short bytes_per_line;
80 unsigned short palette_type;
89 qbyte* LoadPCX (qbyte *f, int matchwidth, int matchheight)
92 qbyte *a, *b, *image_rgba, *pbuf;
93 const qbyte *palette, *fin, *enddata;
94 int x, y, x2, dataByte;
96 if (fs_filesize < (int)sizeof(pcx) + 768)
98 Con_Printf ("Bad pcx file\n");
104 memcpy(&pcx, fin, sizeof(pcx));
107 // LordHavoc: big-endian support ported from QF newtree
108 pcx.xmax = LittleShort (pcx.xmax);
109 pcx.xmin = LittleShort (pcx.xmin);
110 pcx.ymax = LittleShort (pcx.ymax);
111 pcx.ymin = LittleShort (pcx.ymin);
112 pcx.hres = LittleShort (pcx.hres);
113 pcx.vres = LittleShort (pcx.vres);
114 pcx.bytes_per_line = LittleShort (pcx.bytes_per_line);
115 pcx.palette_type = LittleShort (pcx.palette_type);
117 image_width = pcx.xmax + 1 - pcx.xmin;
118 image_height = pcx.ymax + 1 - pcx.ymin;
119 if (pcx.manufacturer != 0x0a || pcx.version != 5 || pcx.encoding != 1 || pcx.bits_per_pixel != 8 || image_width > 4096 || image_height > 4096 || image_width <= 0 || image_height <= 0)
121 Con_Printf ("Bad pcx file\n");
124 if ((matchwidth && image_width != matchwidth) || (matchheight && image_height != matchheight))
127 palette = f + fs_filesize - 768;
129 image_rgba = Mem_Alloc(tempmempool, image_width*image_height*4);
132 Con_Printf("LoadPCX: not enough memory for %i by %i image\n", image_width, image_height);
135 pbuf = image_rgba + image_width*image_height*3;
138 for (y = 0;y < image_height && fin < enddata;y++)
140 a = pbuf + y * image_width;
141 for (x = 0;x < image_width && fin < enddata;)
148 x2 = x + (dataByte & 0x3F);
150 if (x2 > image_width)
151 x2 = image_width; // technically an error
158 fin += pcx.bytes_per_line - image_width; // the number of bytes per line is always forced to an even number
159 while(x < image_width)
166 for(x = 0;x < image_width*image_height;x++)
179 =========================================================
183 =========================================================
186 typedef struct _TargaHeader
188 unsigned char id_length, colormap_type, image_type;
189 unsigned short colormap_index, colormap_length;
190 unsigned char colormap_size;
191 unsigned short x_origin, y_origin, width, height;
192 unsigned char pixel_size, attributes;
196 void PrintTargaHeader(TargaHeader *t)
198 Con_Printf("TargaHeader:\n");
199 Con_Printf("uint8 id_length = %i;\n", t->id_length);
200 Con_Printf("uint8 colormap_type = %i;\n", t->colormap_type);
201 Con_Printf("uint8 image_type = %i;\n", t->image_type);
202 Con_Printf("uint16 colormap_index = %i;\n", t->colormap_index);
203 Con_Printf("uint16 colormap_length = %i;\n", t->colormap_length);
204 Con_Printf("uint8 colormap_size = %i;\n", t->colormap_size);
205 Con_Printf("uint16 x_origin = %i;\n", t->x_origin);
206 Con_Printf("uint16 y_origin = %i;\n", t->y_origin);
207 Con_Printf("uint16 width = %i;\n", t->width);
208 Con_Printf("uint16 height = %i;\n", t->height);
209 Con_Printf("uint8 pixel_size = %i;\n", t->pixel_size);
210 Con_Printf("uint8 attributes = %i;\n", t->attributes);
218 qbyte *LoadTGA (qbyte *f, int matchwidth, int matchheight)
220 int x, y, row_inc, compressed, readpixelcount, red, green, blue, alpha, runlen;
221 qbyte *pixbuf, *image_rgba;
222 qbyte *fin, *enddata;
223 TargaHeader targa_header;
224 unsigned char palette[256*4], *p;
226 if (fs_filesize < 19)
229 enddata = f + fs_filesize;
231 targa_header.id_length = f[0];
232 targa_header.colormap_type = f[1];
233 targa_header.image_type = f[2];
235 targa_header.colormap_index = f[3] + f[4] * 256;
236 targa_header.colormap_length = f[5] + f[6] * 256;
237 targa_header.colormap_size = f[7];
238 targa_header.x_origin = f[8] + f[9] * 256;
239 targa_header.y_origin = f[10] + f[11] * 256;
240 targa_header.width = image_width = f[12] + f[13] * 256;
241 targa_header.height = image_height = f[14] + f[15] * 256;
242 if (image_width > 4096 || image_height > 4096 || image_width <= 0 || image_height <= 0)
244 Con_Printf("LoadTGA: invalid size\n");
245 PrintTargaHeader(&targa_header);
248 if ((matchwidth && image_width != matchwidth) || (matchheight && image_height != matchheight))
250 targa_header.pixel_size = f[16];
251 targa_header.attributes = f[17];
254 if (targa_header.id_length != 0)
255 fin += targa_header.id_length; // skip TARGA image comment
256 if (targa_header.image_type == 2 || targa_header.image_type == 10)
258 if (targa_header.pixel_size != 24 && targa_header.pixel_size != 32)
260 Con_Printf ("LoadTGA: only 24bit and 32bit pixel sizes supported for type 2 and type 10 images\n");
261 PrintTargaHeader(&targa_header);
265 else if (targa_header.image_type == 1 || targa_header.image_type == 9)
267 if (targa_header.pixel_size != 8)
269 Con_Printf ("LoadTGA: only 8bit pixel size for type 1, 3, 9, and 11 images supported\n");
270 PrintTargaHeader(&targa_header);
273 if (targa_header.colormap_length != 256)
275 Con_Printf ("LoadTGA: only 256 colormap_length supported\n");
276 PrintTargaHeader(&targa_header);
279 if (targa_header.colormap_index)
281 Con_Printf ("LoadTGA: colormap_index not supported\n");
282 PrintTargaHeader(&targa_header);
285 if (targa_header.colormap_size == 24)
287 for (x = 0;x < targa_header.colormap_length;x++)
289 palette[x*4+2] = *fin++;
290 palette[x*4+1] = *fin++;
291 palette[x*4+0] = *fin++;
292 palette[x*4+3] = 255;
295 else if (targa_header.colormap_size == 32)
297 for (x = 0;x < targa_header.colormap_length;x++)
299 palette[x*4+2] = *fin++;
300 palette[x*4+1] = *fin++;
301 palette[x*4+0] = *fin++;
302 palette[x*4+3] = *fin++;
307 Con_Printf ("LoadTGA: Only 32 and 24 bit colormap_size supported\n");
308 PrintTargaHeader(&targa_header);
312 else if (targa_header.image_type == 3 || targa_header.image_type == 11)
314 if (targa_header.pixel_size != 8)
316 Con_Printf ("LoadTGA: only 8bit pixel size for type 1, 3, 9, and 11 images supported\n");
317 PrintTargaHeader(&targa_header);
323 Con_Printf ("LoadTGA: Only type 1, 2, 3, 9, 10, and 11 targa RGB images supported, image_type = %i\n", targa_header.image_type);
324 PrintTargaHeader(&targa_header);
328 if (targa_header.attributes & 0x10)
330 Con_Printf ("LoadTGA: origin must be in top left or bottom left, top right and bottom right are not supported\n");
334 image_rgba = Mem_Alloc(tempmempool, image_width * image_height * 4);
337 Con_Printf ("LoadTGA: not enough memory for %i by %i image\n", image_width, image_height);
341 // If bit 5 of attributes isn't set, the image has been stored from bottom to top
342 if ((targa_header.attributes & 0x20) == 0)
344 pixbuf = image_rgba + (image_height - 1)*image_width*4;
345 row_inc = -image_width*4*2;
353 compressed = targa_header.image_type == 9 || targa_header.image_type == 10 || targa_header.image_type == 11;
356 red = green = blue = alpha = 255;
357 while (y < image_height)
359 // decoder is mostly the same whether it's compressed or not
360 readpixelcount = 1000000;
362 if (compressed && fin < enddata)
365 // high bit indicates this is an RLE compressed run
368 runlen = 1 + (runlen & 0x7f);
371 while((runlen--) && y < image_height)
373 if (readpixelcount > 0)
376 red = green = blue = alpha = 255;
379 switch(targa_header.image_type)
384 p = palette + (*fin++) * 4;
398 if (targa_header.pixel_size == 32 && fin < enddata)
404 red = green = blue = *fin++;
414 if (x == image_width)
416 // end of line, advance to next
432 qbyte *LoadLMP (qbyte *f, int matchwidth, int matchheight)
438 Con_Printf("LoadLMP: invalid LMP file\n");
442 // parse the very complicated header *chuckle*
443 image_width = f[0] + f[1] * 256 + f[2] * 65536 + f[3] * 16777216;
444 image_height = f[4] + f[5] * 256 + f[6] * 65536 + f[7] * 16777216;
445 if (image_width > 4096 || image_height > 4096 || image_width <= 0 || image_height <= 0)
447 Con_Printf("LoadLMP: invalid size %ix%i\n", image_width, image_height);
450 if ((matchwidth && image_width != matchwidth) || (matchheight && image_height != matchheight))
453 if (fs_filesize < 8 + image_width * image_height)
455 Con_Printf("LoadLMP: invalid LMP file\n");
459 image_rgba = Mem_Alloc(tempmempool, image_width * image_height * 4);
462 Con_Printf("LoadLMP: not enough memory for %i by %i image\n", image_width, image_height);
465 Image_Copy8bitRGBA(f + 8, image_rgba, image_width * image_height, palette_complete);
472 unsigned width, height;
473 unsigned offsets[MIPLEVELS]; // four mip maps stored
474 char animname[32]; // next frame in animation chain
480 qbyte *LoadWAL (qbyte *f, int matchwidth, int matchheight)
483 const q2wal_t *inwal = (const void *)f;
485 if (fs_filesize < (int) sizeof(q2wal_t))
487 Con_Printf("LoadWAL: invalid WAL file\n");
491 image_width = LittleLong(inwal->width);
492 image_height = LittleLong(inwal->height);
493 if (image_width > 4096 || image_height > 4096 || image_width <= 0 || image_height <= 0)
495 Con_Printf("LoadWAL: invalid size %ix%i\n", image_width, image_height);
498 if ((matchwidth && image_width != matchwidth) || (matchheight && image_height != matchheight))
501 if ((int) fs_filesize < (int) sizeof(q2wal_t) + (int) LittleLong(inwal->offsets[0]) + image_width * image_height)
503 Con_Printf("LoadWAL: invalid WAL file\n");
507 image_rgba = Mem_Alloc(tempmempool, image_width * image_height * 4);
510 Con_Printf("LoadLMP: not enough memory for %i by %i image\n", image_width, image_height);
513 Image_Copy8bitRGBA(f + LittleLong(inwal->offsets[0]), image_rgba, image_width * image_height, palette_complete);
524 qbyte *LoadLMPAs8Bit (qbyte *f, int matchwidth, int matchheight)
530 Con_Printf("LoadLMPAs8Bit: invalid LMP file\n");
534 // parse the very complicated header *chuckle*
535 image_width = f[0] + f[1] * 256 + f[2] * 65536 + f[3] * 16777216;
536 image_height = f[4] + f[5] * 256 + f[6] * 65536 + f[7] * 16777216;
537 if (image_width > 4096 || image_height > 4096 || image_width <= 0 || image_height <= 0)
539 Con_Printf("LoadLMPAs8Bit: invalid size %ix%i\n", image_width, image_height);
542 if ((matchwidth && image_width != matchwidth) || (matchheight && image_height != matchheight))
545 if (fs_filesize < 8 + image_width * image_height)
547 Con_Printf("LoadLMPAs8Bit: invalid LMP file\n");
551 image_8bit = Mem_Alloc(tempmempool, image_width * image_height);
554 Con_Printf("LoadLMPAs8Bit: not enough memory for %i by %i image\n", image_width, image_height);
557 memcpy(image_8bit, f + 8, image_width * image_height);
561 void Image_StripImageExtension (const char *in, char *out)
563 const char *end, *temp;
564 end = in + strlen(in);
568 if (strcmp(temp, ".tga") == 0 || strcmp(temp, ".pcx") == 0 || strcmp(temp, ".lmp") == 0)
580 const char *formatstring;
581 qbyte *(*loadfunc)(qbyte *f, int matchwidth, int matchheight);
585 {"override/%s.tga", LoadTGA},
586 {"override/%s.jpg", JPEG_LoadImage},
587 {"textures/%s.tga", LoadTGA},
588 {"textures/%s.jpg", JPEG_LoadImage},
589 {"textures/%s.pcx", LoadPCX},
590 {"textures/%s.wal", LoadWAL},
592 {"%s.jpg", JPEG_LoadImage},
598 qbyte *loadimagepixels (const char *filename, qboolean complain, int matchwidth, int matchheight)
601 qbyte *f, *data = NULL;
602 char basename[MAX_QPATH], name[MAX_QPATH], *c;
603 Image_StripImageExtension(filename, basename); // strip filename extensions to allow replacement by other types
604 // replace *'s with #, so commandline utils don't get confused when dealing with the external files
605 for (c = basename;*c;c++)
608 for (i = 0;imageformats[i].formatstring;i++)
610 sprintf (name, imageformats[i].formatstring, basename);
611 if ((f = FS_LoadFile(name, true)) && (data = imageformats[i].loadfunc(f, matchwidth, matchheight)))
614 Con_DPrintf("loaded image %s (%dx%d)\n", name, image_width, image_height);
620 Con_Printf ("Couldn't load %s using ", filename);
621 for (i = 0;imageformats[i].formatstring;i++)
623 sprintf (name, imageformats[i].formatstring, basename);
624 Con_Printf (i == 0 ? "\"%s\"" : (imageformats[i+1].formatstring ? ", \"%s\"" : " or \"%s\".\n"), imageformats[i].formatstring);
630 int image_makemask (const qbyte *in, qbyte *out, int size)
634 for (i = 0;i < size;i++)
636 out[0] = out[1] = out[2] = 255;
646 qbyte* loadimagepixelsmask (const char *filename, qboolean complain, int matchwidth, int matchheight)
649 in = data = loadimagepixels(filename, complain, matchwidth, matchheight);
652 if (image_makemask(data, data, image_width * image_height))
653 return data; // some transparency
657 return NULL; // all opaque
661 rtexture_t *loadtextureimage (rtexturepool_t *pool, const char *filename, int matchwidth, int matchheight, qboolean complain, int flags)
665 if (!(data = loadimagepixels (filename, complain, matchwidth, matchheight)))
667 rt = R_LoadTexture2D(pool, filename, image_width, image_height, data, TEXTYPE_RGBA, flags, NULL);
672 rtexture_t *loadtextureimagemask (rtexturepool_t *pool, const char *filename, int matchwidth, int matchheight, qboolean complain, int flags)
676 if (!(data = loadimagepixelsmask (filename, complain, matchwidth, matchheight)))
678 rt = R_LoadTexture2D(pool, filename, image_width, image_height, data, TEXTYPE_RGBA, flags, NULL);
683 rtexture_t *image_masktex;
684 rtexture_t *image_nmaptex;
685 rtexture_t *loadtextureimagewithmask (rtexturepool_t *pool, const char *filename, int matchwidth, int matchheight, qboolean complain, int flags)
689 image_masktex = NULL;
690 image_nmaptex = NULL;
691 if (!(data = loadimagepixels (filename, complain, matchwidth, matchheight)))
694 rt = R_LoadTexture2D(pool, filename, image_width, image_height, data, TEXTYPE_RGBA, flags, NULL);
696 if (flags & TEXF_ALPHA && image_makemask(data, data, image_width * image_height))
697 image_masktex = R_LoadTexture2D(pool, va("%s_mask", filename), image_width, image_height, data, TEXTYPE_RGBA, flags, NULL);
703 rtexture_t *loadtextureimagewithmaskandnmap (rtexturepool_t *pool, const char *filename, int matchwidth, int matchheight, qboolean complain, int flags, float bumpscale)
707 image_masktex = NULL;
708 image_nmaptex = NULL;
709 if (!(data = loadimagepixels (filename, complain, matchwidth, matchheight)))
712 data2 = Mem_Alloc(tempmempool, image_width * image_height * 4);
714 rt = R_LoadTexture2D(pool, filename, image_width, image_height, data, TEXTYPE_RGBA, flags, NULL);
716 Image_HeightmapToNormalmap(data, data2, image_width, image_height, (flags & TEXF_CLAMP) != 0, bumpscale);
717 image_nmaptex = R_LoadTexture2D(pool, va("%s_nmap", filename), image_width, image_height, data2, TEXTYPE_RGBA, flags, NULL);
719 if (flags & TEXF_ALPHA && image_makemask(data, data2, image_width * image_height))
720 image_masktex = R_LoadTexture2D(pool, va("%s_mask", filename), image_width, image_height, data2, TEXTYPE_RGBA, flags, NULL);
728 rtexture_t *loadtextureimagebumpasnmap (rtexturepool_t *pool, const char *filename, int matchwidth, int matchheight, qboolean complain, int flags, float bumpscale)
732 if (!(data = loadimagepixels (filename, complain, matchwidth, matchheight)))
734 data2 = Mem_Alloc(tempmempool, image_width * image_height * 4);
736 Image_HeightmapToNormalmap(data, data2, image_width, image_height, (flags & TEXF_CLAMP) != 0, bumpscale);
737 rt = R_LoadTexture2D(pool, filename, image_width, image_height, data2, TEXTYPE_RGBA, flags, NULL);
744 qboolean Image_WriteTGARGB_preflipped (const char *filename, int width, int height, const qbyte *data)
748 const qbyte *in, *end;
750 buffer = Mem_Alloc(tempmempool, width*height*3 + 18);
752 memset (buffer, 0, 18);
753 buffer[2] = 2; // uncompressed type
754 buffer[12] = (width >> 0) & 0xFF;
755 buffer[13] = (width >> 8) & 0xFF;
756 buffer[14] = (height >> 0) & 0xFF;
757 buffer[15] = (height >> 8) & 0xFF;
758 buffer[16] = 24; // pixel size
763 end = in + width*height*3;
764 for (;in < end;in += 3)
770 ret = FS_WriteFile (filename, buffer, width*height*3 + 18 );
776 void Image_WriteTGARGB (const char *filename, int width, int height, const qbyte *data)
780 const qbyte *in, *end;
782 buffer = Mem_Alloc(tempmempool, width*height*3 + 18);
784 memset (buffer, 0, 18);
785 buffer[2] = 2; // uncompressed type
786 buffer[12] = (width >> 0) & 0xFF;
787 buffer[13] = (width >> 8) & 0xFF;
788 buffer[14] = (height >> 0) & 0xFF;
789 buffer[15] = (height >> 8) & 0xFF;
790 buffer[16] = 24; // pixel size
792 // swap rgb to bgr and flip upside down
794 for (y = height - 1;y >= 0;y--)
796 in = data + y * width * 3;
797 end = in + width * 3;
798 for (;in < end;in += 3)
805 FS_WriteFile (filename, buffer, width*height*3 + 18 );
810 void Image_WriteTGARGBA (const char *filename, int width, int height, const qbyte *data)
814 const qbyte *in, *end;
816 buffer = Mem_Alloc(tempmempool, width*height*4 + 18);
818 memset (buffer, 0, 18);
819 buffer[2] = 2; // uncompressed type
820 buffer[12] = (width >> 0) & 0xFF;
821 buffer[13] = (width >> 8) & 0xFF;
822 buffer[14] = (height >> 0) & 0xFF;
823 buffer[15] = (height >> 8) & 0xFF;
824 buffer[16] = 32; // pixel size
826 // swap rgba to bgra and flip upside down
828 for (y = height - 1;y >= 0;y--)
830 in = data + y * width * 4;
831 end = in + width * 4;
832 for (;in < end;in += 4)
840 FS_WriteFile (filename, buffer, width*height*4 + 18 );
845 qboolean Image_CheckAlpha(const qbyte *data, int size, qboolean rgba)
851 for (end = data + size * 4, data += 3;data < end;data += 4)
857 // color 255 is transparent
858 for (end = data + size;data < end;data++)
865 static void Image_Resample32LerpLine (const qbyte *in, qbyte *out, int inwidth, int outwidth)
867 int j, xi, oldx = 0, f, fstep, endx, lerp;
868 fstep = (int) (inwidth*65536.0f/outwidth);
870 for (j = 0,f = 0;j < outwidth;j++, f += fstep)
875 in += (xi - oldx) * 4;
881 *out++ = (qbyte) ((((in[4] - in[0]) * lerp) >> 16) + in[0]);
882 *out++ = (qbyte) ((((in[5] - in[1]) * lerp) >> 16) + in[1]);
883 *out++ = (qbyte) ((((in[6] - in[2]) * lerp) >> 16) + in[2]);
884 *out++ = (qbyte) ((((in[7] - in[3]) * lerp) >> 16) + in[3]);
886 else // last pixel of the line has no pixel to lerp to
896 static void Image_Resample24LerpLine (const qbyte *in, qbyte *out, int inwidth, int outwidth)
898 int j, xi, oldx = 0, f, fstep, endx, lerp;
899 fstep = (int) (inwidth*65536.0f/outwidth);
901 for (j = 0,f = 0;j < outwidth;j++, f += fstep)
906 in += (xi - oldx) * 3;
912 *out++ = (qbyte) ((((in[3] - in[0]) * lerp) >> 16) + in[0]);
913 *out++ = (qbyte) ((((in[4] - in[1]) * lerp) >> 16) + in[1]);
914 *out++ = (qbyte) ((((in[5] - in[2]) * lerp) >> 16) + in[2]);
916 else // last pixel of the line has no pixel to lerp to
925 int resamplerowsize = 0;
926 qbyte *resamplerow1 = NULL;
927 qbyte *resamplerow2 = NULL;
928 mempool_t *resamplemempool = NULL;
930 #define LERPBYTE(i) r = resamplerow1[i];out[i] = (qbyte) ((((resamplerow2[i] - r) * lerp) >> 16) + r)
931 void Image_Resample32Lerp(const void *indata, int inwidth, int inheight, void *outdata, int outwidth, int outheight)
933 int i, j, r, yi, oldy, f, fstep, lerp, endy = (inheight-1), inwidth4 = inwidth*4, outwidth4 = outwidth*4;
937 fstep = (int) (inheight*65536.0f/outheight);
941 Image_Resample32LerpLine (inrow, resamplerow1, inwidth, outwidth);
942 Image_Resample32LerpLine (inrow + inwidth4, resamplerow2, inwidth, outwidth);
943 for (i = 0, f = 0;i < outheight;i++,f += fstep)
951 inrow = (qbyte *)indata + inwidth4*yi;
953 memcpy(resamplerow1, resamplerow2, outwidth4);
955 Image_Resample32LerpLine (inrow, resamplerow1, inwidth, outwidth);
956 Image_Resample32LerpLine (inrow + inwidth4, resamplerow2, inwidth, outwidth);
1007 resamplerow1 -= outwidth4;
1008 resamplerow2 -= outwidth4;
1014 inrow = (qbyte *)indata + inwidth4*yi;
1016 memcpy(resamplerow1, resamplerow2, outwidth4);
1018 Image_Resample32LerpLine (inrow, resamplerow1, inwidth, outwidth);
1021 memcpy(out, resamplerow1, outwidth4);
1026 void Image_Resample32Nearest(const void *indata, int inwidth, int inheight, void *outdata, int outwidth, int outheight)
1029 unsigned frac, fracstep;
1030 // relies on int being 4 bytes
1034 fracstep = inwidth*0x10000/outwidth;
1035 for (i = 0;i < outheight;i++)
1037 inrow = (int *)indata + inwidth*(i*inheight/outheight);
1038 frac = fracstep >> 1;
1042 out[0] = inrow[frac >> 16];frac += fracstep;
1043 out[1] = inrow[frac >> 16];frac += fracstep;
1044 out[2] = inrow[frac >> 16];frac += fracstep;
1045 out[3] = inrow[frac >> 16];frac += fracstep;
1051 out[0] = inrow[frac >> 16];frac += fracstep;
1052 out[1] = inrow[frac >> 16];frac += fracstep;
1057 out[0] = inrow[frac >> 16];frac += fracstep;
1063 void Image_Resample24Lerp(const void *indata, int inwidth, int inheight, void *outdata, int outwidth, int outheight)
1065 int i, j, r, yi, oldy, f, fstep, lerp, endy = (inheight-1), inwidth3 = inwidth * 3, outwidth3 = outwidth * 3;
1069 fstep = (int) (inheight*65536.0f/outheight);
1073 Image_Resample24LerpLine (inrow, resamplerow1, inwidth, outwidth);
1074 Image_Resample24LerpLine (inrow + inwidth3, resamplerow2, inwidth, outwidth);
1075 for (i = 0, f = 0;i < outheight;i++,f += fstep)
1083 inrow = (qbyte *)indata + inwidth3*yi;
1085 memcpy(resamplerow1, resamplerow2, outwidth3);
1087 Image_Resample24LerpLine (inrow, resamplerow1, inwidth, outwidth);
1088 Image_Resample24LerpLine (inrow + inwidth3, resamplerow2, inwidth, outwidth);
1132 resamplerow1 -= outwidth3;
1133 resamplerow2 -= outwidth3;
1139 inrow = (qbyte *)indata + inwidth3*yi;
1141 memcpy(resamplerow1, resamplerow2, outwidth3);
1143 Image_Resample24LerpLine (inrow, resamplerow1, inwidth, outwidth);
1146 memcpy(out, resamplerow1, outwidth3);
1151 void Image_Resample24Nolerp(const void *indata, int inwidth, int inheight, void *outdata, int outwidth, int outheight)
1153 int i, j, f, inwidth3 = inwidth * 3;
1154 unsigned frac, fracstep;
1158 fracstep = inwidth*0x10000/outwidth;
1159 for (i = 0;i < outheight;i++)
1161 inrow = (qbyte *)indata + inwidth3*(i*inheight/outheight);
1162 frac = fracstep >> 1;
1166 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1167 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1168 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1169 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1174 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1175 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1180 f = (frac >> 16)*3;*out++ = inrow[f+0];*out++ = inrow[f+1];*out++ = inrow[f+2];frac += fracstep;
1191 void Image_Resample (const void *indata, int inwidth, int inheight, int indepth, void *outdata, int outwidth, int outheight, int outdepth, int bytesperpixel, int quality)
1193 if (indepth != 1 || outdepth != 1)
1194 Sys_Error("Image_Resample: 3D resampling not supported\n");
1195 if (resamplerowsize < outwidth*4)
1198 Mem_Free(resamplerow1);
1199 resamplerowsize = outwidth*4;
1200 if (!resamplemempool)
1201 resamplemempool = Mem_AllocPool("Image Scaling Buffer");
1202 resamplerow1 = Mem_Alloc(resamplemempool, resamplerowsize*2);
1203 resamplerow2 = resamplerow1 + resamplerowsize;
1205 if (bytesperpixel == 4)
1208 Image_Resample32Lerp(indata, inwidth, inheight, outdata, outwidth, outheight);
1210 Image_Resample32Nearest(indata, inwidth, inheight, outdata, outwidth, outheight);
1212 else if (bytesperpixel == 3)
1215 Image_Resample24Lerp(indata, inwidth, inheight, outdata, outwidth, outheight);
1217 Image_Resample24Nolerp(indata, inwidth, inheight, outdata, outwidth, outheight);
1220 Sys_Error("Image_Resample: unsupported bytesperpixel %i\n", bytesperpixel);
1223 // in can be the same as out
1224 void Image_MipReduce(const qbyte *in, qbyte *out, int *width, int *height, int *depth, int destwidth, int destheight, int destdepth, int bytesperpixel)
1227 if (*depth != 1 || destdepth != 1)
1228 Sys_Error("Image_Resample: 3D resampling not supported\n");
1229 nextrow = *width * bytesperpixel;
1230 if (*width > destwidth)
1233 if (*height > destheight)
1237 if (bytesperpixel == 4)
1239 for (y = 0;y < *height;y++)
1241 for (x = 0;x < *width;x++)
1243 out[0] = (qbyte) ((in[0] + in[4] + in[nextrow ] + in[nextrow+4]) >> 2);
1244 out[1] = (qbyte) ((in[1] + in[5] + in[nextrow+1] + in[nextrow+5]) >> 2);
1245 out[2] = (qbyte) ((in[2] + in[6] + in[nextrow+2] + in[nextrow+6]) >> 2);
1246 out[3] = (qbyte) ((in[3] + in[7] + in[nextrow+3] + in[nextrow+7]) >> 2);
1250 in += nextrow; // skip a line
1253 else if (bytesperpixel == 3)
1255 for (y = 0;y < *height;y++)
1257 for (x = 0;x < *width;x++)
1259 out[0] = (qbyte) ((in[0] + in[3] + in[nextrow ] + in[nextrow+3]) >> 2);
1260 out[1] = (qbyte) ((in[1] + in[4] + in[nextrow+1] + in[nextrow+4]) >> 2);
1261 out[2] = (qbyte) ((in[2] + in[5] + in[nextrow+2] + in[nextrow+5]) >> 2);
1265 in += nextrow; // skip a line
1269 Sys_Error("Image_MipReduce: unsupported bytesperpixel %i\n", bytesperpixel);
1274 if (bytesperpixel == 4)
1276 for (y = 0;y < *height;y++)
1278 for (x = 0;x < *width;x++)
1280 out[0] = (qbyte) ((in[0] + in[4]) >> 1);
1281 out[1] = (qbyte) ((in[1] + in[5]) >> 1);
1282 out[2] = (qbyte) ((in[2] + in[6]) >> 1);
1283 out[3] = (qbyte) ((in[3] + in[7]) >> 1);
1289 else if (bytesperpixel == 3)
1291 for (y = 0;y < *height;y++)
1293 for (x = 0;x < *width;x++)
1295 out[0] = (qbyte) ((in[0] + in[3]) >> 1);
1296 out[1] = (qbyte) ((in[1] + in[4]) >> 1);
1297 out[2] = (qbyte) ((in[2] + in[5]) >> 1);
1304 Sys_Error("Image_MipReduce: unsupported bytesperpixel %i\n", bytesperpixel);
1309 if (*height > destheight)
1313 if (bytesperpixel == 4)
1315 for (y = 0;y < *height;y++)
1317 for (x = 0;x < *width;x++)
1319 out[0] = (qbyte) ((in[0] + in[nextrow ]) >> 1);
1320 out[1] = (qbyte) ((in[1] + in[nextrow+1]) >> 1);
1321 out[2] = (qbyte) ((in[2] + in[nextrow+2]) >> 1);
1322 out[3] = (qbyte) ((in[3] + in[nextrow+3]) >> 1);
1326 in += nextrow; // skip a line
1329 else if (bytesperpixel == 3)
1331 for (y = 0;y < *height;y++)
1333 for (x = 0;x < *width;x++)
1335 out[0] = (qbyte) ((in[0] + in[nextrow ]) >> 1);
1336 out[1] = (qbyte) ((in[1] + in[nextrow+1]) >> 1);
1337 out[2] = (qbyte) ((in[2] + in[nextrow+2]) >> 1);
1341 in += nextrow; // skip a line
1345 Sys_Error("Image_MipReduce: unsupported bytesperpixel %i\n", bytesperpixel);
1348 Sys_Error("Image_MipReduce: desired size already achieved\n");
1352 void Image_HeightmapToNormalmap(const unsigned char *inpixels, unsigned char *outpixels, int width, int height, int clamp, float bumpscale)
1355 const unsigned char *p0, *p1, *p2;
1357 float iwidth, iheight, ibumpscale, n[3];
1358 iwidth = 1.0f / width;
1359 iheight = 1.0f / height;
1360 ibumpscale = (255.0f * 3.0f) / bumpscale;
1362 for (y = 0;y < height;y++)
1364 for (x = 0;x < width;x++)
1366 p0 = inpixels + (y * width + x) * 4;
1370 p1 = inpixels + (y * width + x) * 4;
1372 p1 = inpixels + (y * width) * 4;
1375 p1 = inpixels + (y * width + x + 1) * 4;
1376 if (y == height - 1)
1379 p2 = inpixels + (y * width + x) * 4;
1381 p2 = inpixels + x * 4;
1384 p2 = inpixels + ((y + 1) * width + x) * 4;
1388 dv[0][2] = ((p1[0] + p1[1] + p1[2]) * ibumpscale) - ((p0[0] + p0[1] + p0[2]) * ibumpscale);
1391 dv[1][2] = ((p2[0] + p2[1] + p2[2]) * ibumpscale) - ((p0[0] + p0[1] + p0[2]) * ibumpscale);
1392 n[0] = dv[0][1]*dv[1][2]-dv[0][2]*dv[1][1];
1393 n[1] = dv[0][2]*dv[1][0]-dv[0][0]*dv[1][2];
1394 n[2] = dv[0][0]*dv[1][1]-dv[0][1]*dv[1][0];
1396 n[0] = ((p0[0] + p0[1] + p0[2]) - (p1[0] + p1[1] + p1[2]));
1397 n[1] = ((p0[0] + p0[1] + p0[2]) - (p2[0] + p2[1] + p2[2]));
1401 // this should work for the bottom right triangle if anyone wants
1402 // code for that for some reason
1403 n[0] = ((p1[0] + p1[1] + p1[2]) - (p3[0] + p3[1] + p3[2]));
1404 n[1] = ((p2[0] + p2[1] + p2[2]) - (p3[0] + p3[1] + p3[2]));
1408 out[0] = 128.0f + n[0] * 127.0f;
1409 out[1] = 128.0f + n[1] * 127.0f;
1410 out[2] = 128.0f + n[2] * 127.0f;
1417 int image_loadskin(imageskin_t *s, char *name)
1421 int bumppixels_width, bumppixels_height;
1422 memset(s, 0, sizeof(*s));
1423 s->basepixels = loadimagepixels(name, false, 0, 0);
1424 if (s->basepixels == NULL)
1426 s->basepixels_width = image_width;
1427 s->basepixels_height = image_height;
1429 bumppixels = NULL;bumppixels_width = 0;bumppixels_height = 0;
1430 if (Image_CheckAlpha(s->basepixels, s->basepixels_width * s->basepixels_height, true))
1432 s->maskpixels = Mem_Alloc(loadmodel->mempool, s->basepixels_width * s->basepixels_height * 4);
1433 s->maskpixels_width = s->basepixels_width;
1434 s->maskpixels_height = s->basepixels_height;
1435 memcpy(s->maskpixels, s->basepixels, s->maskpixels_width * s->maskpixels_height * 4);
1436 for (j = 0;j < s->basepixels_width * s->basepixels_height * 4;j += 4)
1438 s->maskpixels[j+0] = 255;
1439 s->maskpixels[j+1] = 255;
1440 s->maskpixels[j+2] = 255;
1444 // _luma is supported for tenebrae compatibility
1445 // (I think it's a very stupid name, but oh well)
1446 if ((s->glowpixels = loadimagepixels(va("%s_glow", name), false, 0, 0)) != NULL
1447 || (s->glowpixels = loadimagepixels(va("%s_luma", name), false, 0, 0)) != NULL)
1449 s->glowpixels_width = image_width;
1450 s->glowpixels_height = image_height;
1452 // _norm is the name used by tenebrae
1453 // (I don't like the name much)
1454 if ((s->nmappixels = loadimagepixels(va("%s_norm", name), false, 0, 0)) != NULL)
1456 s->nmappixels_width = image_width;
1457 s->nmappixels_height = image_height;
1459 else if ((bumppixels = loadimagepixels(va("%s_bump", name), false, 0, 0)) != NULL)
1461 bumppixels_width = image_width;
1462 bumppixels_height = image_height;
1464 if ((s->glosspixels = loadimagepixels(va("%s_gloss", name), false, 0, 0)) != NULL)
1466 s->glosspixels_width = image_width;
1467 s->glosspixels_height = image_height;
1469 if ((s->pantspixels = loadimagepixels(va("%s_pants", name), false, 0, 0)) != NULL)
1471 s->pantspixels_width = image_width;
1472 s->pantspixels_height = image_height;
1474 if ((s->shirtpixels = loadimagepixels(va("%s_shirt", name), false, 0, 0)) != NULL)
1476 s->shirtpixels_width = image_width;
1477 s->shirtpixels_height = image_height;
1480 if (s->nmappixels == NULL)
1482 if (bumppixels != NULL)
1484 if (r_shadow_bumpscale_bumpmap.value > 0)
1486 s->nmappixels = Mem_Alloc(loadmodel->mempool, bumppixels_width * bumppixels_height * 4);
1487 s->nmappixels_width = bumppixels_width;
1488 s->nmappixels_height = bumppixels_height;
1489 Image_HeightmapToNormalmap(bumppixels, s->nmappixels, s->nmappixels_width, s->nmappixels_height, false, r_shadow_bumpscale_bumpmap.value);
1494 if (r_shadow_bumpscale_basetexture.value > 0)
1496 s->nmappixels = Mem_Alloc(loadmodel->mempool, s->basepixels_width * s->basepixels_height * 4);
1497 s->nmappixels_width = s->basepixels_width;
1498 s->nmappixels_height = s->basepixels_height;
1499 Image_HeightmapToNormalmap(s->basepixels, s->nmappixels, s->nmappixels_width, s->nmappixels_height, false, r_shadow_bumpscale_basetexture.value);
1503 if (bumppixels != NULL)
1504 Mem_Free(bumppixels);
1508 void image_freeskin(imageskin_t *s)
1511 Mem_Free(s->basepixels);
1513 Mem_Free(s->maskpixels);
1515 Mem_Free(s->nmappixels);
1517 Mem_Free(s->glowpixels);
1519 Mem_Free(s->glosspixels);
1521 Mem_Free(s->pantspixels);
1523 Mem_Free(s->shirtpixels);
1524 memset(s, 0, sizeof(*s));