summaryrefslogtreecommitdiff
path: root/indra/llimage/llimagedimensionsinfo.cpp
blob: d4efbcfad2502681b89ae7a495214933eeb83d74 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
/**
 * @file llimagedimensionsinfo.cpp
 *
 * $LicenseInfo:firstyear=2002&license=viewerlgpl$
 * Second Life Viewer Source Code
 * Copyright (C) 2010, Linden Research, Inc.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation;
 * version 2.1 of the License only.
 *
 * 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 * Linden Research, Inc., 945 Battery Street, San Francisco, CA  94111  USA
 * $/LicenseInfo$
 */

#include "linden_common.h"
#include "stdtypes.h"

#include "llimagejpeg.h"

#include "llimagedimensionsinfo.h"

// Value is true if one of Libjpeg's functions has encountered an error while working.
static bool sJpegErrorEncountered = false;

bool LLImageDimensionsInfo::load(const std::string& src_filename,U32 codec)
{
    clean();

    mSrcFilename = src_filename;

    S32 file_size = 0;
    apr_status_t s = mInfile.open(src_filename, LL_APR_RB, NULL, &file_size);

    if (s != APR_SUCCESS)
    {
        setLastError("Unable to open file for reading", src_filename);
        return false;
    }

    if (file_size == 0)
    {
        mWarning = "texture_load_empty_file";
        setLastError("File is empty",src_filename);
        return false;
    }

    switch (codec)
    {
    case IMG_CODEC_BMP:
        return getImageDimensionsBmp();
    case IMG_CODEC_TGA:
        return getImageDimensionsTga();
    case IMG_CODEC_JPEG:
        return getImageDimensionsJpeg();
    case IMG_CODEC_PNG:
        return getImageDimensionsPng();
    default:
        return false;

    }
}


bool LLImageDimensionsInfo::getImageDimensionsBmp()
{
    // Make sure the file is long enough.
    const S32 DATA_LEN = 26; // BMP header (14) + DIB header size (4) + width (4) + height (4)
    if (!checkFileLength(DATA_LEN))
    {
        LL_WARNS() << "Premature end of file" << LL_ENDL;
        return false;
    }

    // Read BMP signature.
    U8 signature[2];
    mInfile.read((void*)signature, sizeof(signature)/sizeof(signature[0]));

    // Make sure this is actually a BMP file.
    // We only support Windows bitmaps (BM), according to LLImageBMP::updateData().
    if (signature[0] != 'B' || signature[1] != 'M')
    {
        LL_WARNS() << "Not a BMP" << LL_ENDL;
        mWarning = "texture_load_format_error";
        return false;
    }

    // Read image dimensions.
    mInfile.seek(APR_CUR, 16);
    mWidth = read_reverse_s32();
    mHeight = read_reverse_s32();

    return true;
}

bool LLImageDimensionsInfo::getImageDimensionsTga()
{
    const S32 TGA_FILE_HEADER_SIZE = 12;

    // Make sure the file is long enough.
    if (!checkFileLength(TGA_FILE_HEADER_SIZE + 1 /* width */ + 1 /* height */))
    {
        LL_WARNS() << "Premature end of file" << LL_ENDL;
        return false;
    }

    // *TODO: Detect non-TGA files somehow.
    mInfile.seek(APR_CUR,TGA_FILE_HEADER_SIZE);
    mWidth = read_byte() | read_byte() << 8;
    mHeight = read_byte() | read_byte() << 8;

    return true;
}

bool LLImageDimensionsInfo::getImageDimensionsPng()
{
    const S32 PNG_MAGIC_SIZE = 8;

    // Make sure the file is long enough.
    if (!checkFileLength(PNG_MAGIC_SIZE + 8 + sizeof(S32) * 2 /* width, height */))
    {
        LL_WARNS() << "Premature end of file" << LL_ENDL;
        return false;
    }

    // Read PNG signature.
    const U8 png_magic[PNG_MAGIC_SIZE] = {0x89, 0x50, 0x4E, 0x47, 0x0D, 0x0A, 0x1A, 0x0A};
    U8 signature[PNG_MAGIC_SIZE];
    mInfile.read((void*)signature, PNG_MAGIC_SIZE);

    // Make sure it's a PNG file.
    if (memcmp(signature, png_magic, PNG_MAGIC_SIZE) != 0)
    {
        LL_WARNS() << "Not a PNG" << LL_ENDL;
        mWarning = "texture_load_format_error";
        return false;
    }

    // Read image dimensions.
    mInfile.seek(APR_CUR, 8 /* chunk length + chunk type */);
    mWidth = read_s32();
    mHeight = read_s32();

    return true;
}

// Called instead of exit() if Libjpeg encounters an error.
void on_jpeg_error(j_common_ptr cinfo)
{
    (void) cinfo;
    sJpegErrorEncountered = true;
    LL_WARNS() << "Libjpeg has encountered an error!" << LL_ENDL;
}

bool LLImageDimensionsInfo::getImageDimensionsJpeg()
{
    sJpegErrorEncountered = false;
    clean();
    FILE *fp = LLFile::fopen(mSrcFilename, "rb");
    if (fp == NULL)
    {
        setLastError("Unable to open file for reading", mSrcFilename);
        return false;
    }

    /* Make sure this is a JPEG file. */
    const size_t JPEG_MAGIC_SIZE = 2;
    const U8 jpeg_magic[JPEG_MAGIC_SIZE] = {0xFF, 0xD8};
    U8 signature[JPEG_MAGIC_SIZE];

    if (fread(signature, sizeof(signature), 1, fp) != 1)
    {
        LL_WARNS() << "Premature end of file" << LL_ENDL;
        return false;
    }
    if (memcmp(signature, jpeg_magic, JPEG_MAGIC_SIZE) != 0)
    {
        LL_WARNS() << "Not a JPEG" << LL_ENDL;
        mWarning = "texture_load_format_error";
        return false;
    }
    fseek(fp, 0, SEEK_SET); // go back to start of the file

    /* Init jpeg */
    jpeg_error_mgr jerr;
    jpeg_decompress_struct cinfo;
    cinfo.err = jpeg_std_error(&jerr);
    // Call our function instead of exit() if Libjpeg encounters an error.
    // This is done to avoid crash in this case (STORM-472).
    cinfo.err->error_exit = on_jpeg_error;

    jpeg_create_decompress  (&cinfo);
    jpeg_stdio_src      (&cinfo, fp);
    jpeg_read_header    (&cinfo, true);
    cinfo.out_color_space = JCS_RGB;
    jpeg_start_decompress   (&cinfo);

    mWidth = cinfo.output_width;
    mHeight = cinfo.output_height;

    jpeg_destroy_decompress(&cinfo);
    fclose(fp);

    return !sJpegErrorEncountered;
}

bool LLImageDimensionsInfo::checkFileLength(S32 min_len)
{
    // Make sure the file is not shorter than min_len bytes.
    // so that we don't have to check value returned by each read() or seek().
    char* buf = new char[min_len];
    int nread = mInfile.read(buf, min_len);
    delete[] buf;
    mInfile.seek(APR_SET, 0);
    return nread == min_len;
}