mirror of
https://github.com/gryf/wmaker.git
synced 2025-12-19 12:28:22 +01:00
148 lines
3.2 KiB
C
148 lines
3.2 KiB
C
/* tiff.c - load TIFF image from file
|
|
*
|
|
* Raster graphics library
|
|
*
|
|
* Copyright (c) 1997 Alfredo K. Kojima
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Library General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Library General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Library General Public
|
|
* License along with this library; if not, write to the Free
|
|
* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
#include <config.h>
|
|
|
|
|
|
#ifdef USE_TIFF
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include <tiff.h>
|
|
#include <tiffio.h>
|
|
|
|
|
|
#include "wraster.h"
|
|
|
|
|
|
RImage*
|
|
RLoadTIFF(RContext *context, char *file, int index)
|
|
{
|
|
RImage *image = NULL;
|
|
TIFF *tif;
|
|
int i;
|
|
unsigned char *r, *g, *b, *a;
|
|
uint16 alpha, amode;
|
|
uint32 width, height;
|
|
uint32 *data, *ptr;
|
|
uint16 extrasamples;
|
|
uint16 *sampleinfo;
|
|
int ch;
|
|
|
|
|
|
tif = TIFFOpen(file, "r");
|
|
if (!tif)
|
|
return NULL;
|
|
|
|
/* seek index */
|
|
i = index;
|
|
while (i>0) {
|
|
if (!TIFFReadDirectory(tif)) {
|
|
RErrorCode = RERR_BADINDEX;
|
|
TIFFClose(tif);
|
|
return NULL;
|
|
}
|
|
i--;
|
|
}
|
|
|
|
/* get info */
|
|
TIFFGetField(tif, TIFFTAG_IMAGEWIDTH, &width);
|
|
TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &height);
|
|
|
|
TIFFGetFieldDefaulted(tif, TIFFTAG_EXTRASAMPLES,
|
|
&extrasamples, &sampleinfo);
|
|
|
|
alpha = (extrasamples == 1 &&
|
|
((sampleinfo[0] == EXTRASAMPLE_ASSOCALPHA) || (sampleinfo[0] == EXTRASAMPLE_UNASSALPHA)));
|
|
amode = (extrasamples == 1 && sampleinfo[0] == EXTRASAMPLE_ASSOCALPHA);
|
|
|
|
if (width<1 || height<1) {
|
|
RErrorCode = RERR_BADIMAGEFILE;
|
|
TIFFClose(tif);
|
|
return NULL;
|
|
}
|
|
|
|
/* read data */
|
|
ptr = data = (uint32*)_TIFFmalloc(width * height * sizeof(uint32));
|
|
|
|
if (!data) {
|
|
RErrorCode = RERR_NOMEMORY;
|
|
} else {
|
|
if (!TIFFReadRGBAImage(tif, width, height, data, 0)) {
|
|
RErrorCode = RERR_BADIMAGEFILE;
|
|
} else {
|
|
|
|
/* convert data */
|
|
image = RCreateImage(width, height, alpha);
|
|
|
|
if (alpha)
|
|
ch = 4;
|
|
else
|
|
ch = 3;
|
|
|
|
if (image) {
|
|
int x, y;
|
|
|
|
r = image->data;
|
|
g = image->data+1;
|
|
b = image->data+2;
|
|
a = image->data+3;
|
|
|
|
/* data seems to be stored upside down */
|
|
data += width * (height-1);
|
|
for (y=0; y<height; y++) {
|
|
for (x=0; x<width; x++) {
|
|
|
|
*(r) = (*data) & 0xff;
|
|
*(g) = (*data >> 8) & 0xff;
|
|
*(b) = (*data >> 16) & 0xff;
|
|
|
|
if (alpha) {
|
|
*(a) = (*data >> 24) & 0xff;
|
|
|
|
if (amode && (*a > 0)) {
|
|
*r = (*r * 255) / *(a);
|
|
*g = (*g * 255) / *(a);
|
|
*b = (*b * 255) / *(a);
|
|
}
|
|
|
|
a+=4;
|
|
}
|
|
|
|
r+=ch; g+=ch; b+=ch;
|
|
data++;
|
|
}
|
|
data -= 2*width;
|
|
}
|
|
}
|
|
}
|
|
_TIFFfree(ptr);
|
|
}
|
|
|
|
TIFFClose(tif);
|
|
|
|
return image;
|
|
}
|
|
|
|
#endif /* USE_TIFF */
|