Fixed wrong (re)stored dimensions for unmaximized window.
[wmaker-crm.git] / wrlib / load_tiff.c
blob9bf033ba54eea8564055d6ecdcc9bf49ed939ea5
1 /* tiff.c - load TIFF image from file
3 * Raster graphics library
5 * Copyright (c) 1997-2003 Alfredo K. Kojima
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Library General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Library General Public License for more details.
17 * You should have received a copy of the GNU Library General Public
18 * License along with this library; if not, write to the Free
19 * Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
20 * MA 02110-1301, USA.
23 #include <config.h>
25 #include <stdlib.h>
26 #include <stdio.h>
27 #include <string.h>
29 #include <tiff.h>
30 #include <tiffio.h>
32 #include "wraster.h"
33 #include "imgformat.h"
35 RImage *RLoadTIFF(const char *file, int index)
37 RImage *image = NULL;
38 TIFF *tif;
39 int i;
40 unsigned char *r, *g, *b, *a;
41 uint16 alpha, amode;
42 uint32 width, height;
43 uint32 *data, *ptr;
44 uint16 extrasamples;
45 uint16 *sampleinfo;
46 int ch;
48 tif = TIFFOpen(file, "r");
49 if (!tif)
50 return NULL;
52 /* seek index */
53 i = index;
54 while (i > 0) {
55 if (!TIFFReadDirectory(tif)) {
56 RErrorCode = RERR_BADINDEX;
57 TIFFClose(tif);
58 return NULL;
60 i--;
63 /* get info */
64 TIFFGetField(tif, TIFFTAG_IMAGEWIDTH, &width);
65 TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &height);
67 TIFFGetFieldDefaulted(tif, TIFFTAG_EXTRASAMPLES, &extrasamples, &sampleinfo);
69 alpha = (extrasamples == 1 &&
70 ((sampleinfo[0] == EXTRASAMPLE_ASSOCALPHA) || (sampleinfo[0] == EXTRASAMPLE_UNASSALPHA)));
71 amode = (extrasamples == 1 && sampleinfo[0] == EXTRASAMPLE_ASSOCALPHA);
73 if (width < 1 || height < 1) {
74 RErrorCode = RERR_BADIMAGEFILE;
75 TIFFClose(tif);
76 return NULL;
79 /* read data */
80 ptr = data = (uint32 *) _TIFFmalloc(width * height * sizeof(uint32));
82 if (!data) {
83 RErrorCode = RERR_NOMEMORY;
84 } else {
85 if (!TIFFReadRGBAImage(tif, width, height, data, 0)) {
86 RErrorCode = RERR_BADIMAGEFILE;
87 } else {
89 /* convert data */
90 image = RCreateImage(width, height, alpha);
92 if (alpha)
93 ch = 4;
94 else
95 ch = 3;
97 if (image) {
98 int x, y;
100 r = image->data;
101 g = image->data + 1;
102 b = image->data + 2;
103 a = image->data + 3;
105 /* data seems to be stored upside down */
106 data += width * (height - 1);
107 for (y = 0; y < height; y++) {
108 for (x = 0; x < width; x++) {
110 *(r) = (*data) & 0xff;
111 *(g) = (*data >> 8) & 0xff;
112 *(b) = (*data >> 16) & 0xff;
114 if (alpha) {
115 *(a) = (*data >> 24) & 0xff;
117 if (amode && (*a > 0)) {
118 *r = (*r * 255) / *(a);
119 *g = (*g * 255) / *(a);
120 *b = (*b * 255) / *(a);
123 a += 4;
126 r += ch;
127 g += ch;
128 b += ch;
129 data++;
131 data -= 2 * width;
135 _TIFFfree(ptr);
138 TIFFClose(tif);
140 return image;