static uint32_t read_pixel(FILE *fp, int rdalpha)
{
int r, g, b, a;
b = getc(fp);
g = getc(fp);
r = getc(fp);
a = rdalpha ? getc(fp) : 0xff;
return PACK_COLOR32(r, g, b, a);
}
void *load_tga(FILE *fp, unsigned long *xsz, unsigned long *ysz) {
struct tga_header hdr;
unsigned long x, y, sz;
int i;
uint32_t *pix;
/* read header */
fseek(fp, 0, SEEK_SET);
hdr.idlen = fgetc(fp);
hdr.cmap_type = fgetc(fp);
hdr.img_type = fgetc(fp);
hdr.cmap_first = read_int16_le(fp);
hdr.cmap_len = read_int16_le(fp);
hdr.cmap_entry_sz = fgetc(fp);
hdr.img_x = read_int16_le(fp);
hdr.img_y = read_int16_le(fp);
hdr.img_width = read_int16_le(fp);
hdr.img_height = read_int16_le(fp);
hdr.img_bpp = fgetc(fp);
hdr.img_desc = fgetc(fp);
if(feof(fp)) {
fclose(fp);
return 0;
}
/* only read true color images */
if(hdr.img_type != 2) {
fclose(fp);
fprintf(stderr, "only true color tga images supported\n");
return 0;
}
fseek(fp, hdr.idlen, SEEK_CUR); /* skip the image ID */
/* skip the color map if it exists */
if(hdr.cmap_type == 1) {
fseek(fp, hdr.cmap_len * hdr.cmap_entry_sz / 8, SEEK_CUR);
}
x = hdr.img_width;
y = hdr.img_height;
sz = x * y;
if(!(pix = malloc(sz * 4))) {
fclose(fp);
return 0;
}
for(i=0; i<y; i++) {
uint32_t *ptr;
int j;
ptr = pix + ((hdr.img_desc & 0x20) ? i : y-(i+1)) * x;
for(j=0; j<x; j++) {
unsigned char r, g, b, a;
r = fgetc(fp);
g = fgetc(fp);
b = fgetc(fp);
a = (hdr.img_desc & 0xf) ? fgetc(fp) : 255;
*ptr++ = PACK_COLOR32(a, r, g, b);
if(feof(fp)) break;
}
}
fclose(fp);
*xsz = x;
*ysz = y;
return pix;
}
