1 : /* $Id: tif_ojpeg.c,v 1.54 2011-05-31 17:05:07 bfriesen Exp $ */
2 :
3 : /* WARNING: The type of JPEG encapsulation defined by the TIFF Version 6.0
4 : specification is now totally obsolete and deprecated for new applications and
5 : images. This file was was created solely in order to read unconverted images
6 : still present on some users' computer systems. It will never be extended
7 : to write such files. Writing new-style JPEG compressed TIFFs is implemented
8 : in tif_jpeg.c.
9 :
10 : The code is carefully crafted to robustly read all gathered JPEG-in-TIFF
11 : testfiles, and anticipate as much as possible all other... But still, it may
12 : fail on some. If you encounter problems, please report them on the TIFF
13 : mailing list and/or to Joris Van Damme <info@awaresystems.be>.
14 :
15 : Please read the file called "TIFF Technical Note #2" if you need to be
16 : convinced this compression scheme is bad and breaks TIFF. That document
17 : is linked to from the LibTiff site <http://www.remotesensing.org/libtiff/>
18 : and from AWare Systems' TIFF section
19 : <http://www.awaresystems.be/imaging/tiff.html>. It is also absorbed
20 : in Adobe's specification supplements, marked "draft" up to this day, but
21 : supported by the TIFF community.
22 :
23 : This file interfaces with Release 6B of the JPEG Library written by the
24 : Independent JPEG Group. Previous versions of this file required a hack inside
25 : the LibJpeg library. This version no longer requires that. Remember to
26 : remove the hack if you update from the old version.
27 :
28 : Copyright (c) Joris Van Damme <info@awaresystems.be>
29 : Copyright (c) AWare Systems <http://www.awaresystems.be/>
30 :
31 : The licence agreement for this file is the same as the rest of the LibTiff
32 : library.
33 :
34 : IN NO EVENT SHALL JORIS VAN DAMME OR AWARE SYSTEMS BE LIABLE FOR
35 : ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
36 : OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
37 : WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
38 : LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
39 : OF THIS SOFTWARE.
40 :
41 : Joris Van Damme and/or AWare Systems may be available for custom
42 : developement. If you like what you see, and need anything similar or related,
43 : contact <info@awaresystems.be>.
44 : */
45 :
46 : /* What is what, and what is not?
47 :
48 : This decoder starts with an input stream, that is essentially the JpegInterchangeFormat
49 : stream, if any, followed by the strile data, if any. This stream is read in
50 : OJPEGReadByte and related functions.
51 :
52 : It analyzes the start of this stream, until it encounters non-marker data, i.e.
53 : compressed image data. Some of the header markers it sees have no actual content,
54 : like the SOI marker, and APP/COM markers that really shouldn't even be there. Some
55 : other markers do have content, and the valuable bits and pieces of information
56 : in these markers are saved, checking all to verify that the stream is more or
57 : less within expected bounds. This happens inside the OJPEGReadHeaderInfoSecStreamXxx
58 : functions.
59 :
60 : Some OJPEG imagery contains no valid JPEG header markers. This situation is picked
61 : up on if we've seen no SOF marker when we're at the start of the compressed image
62 : data. In this case, the tables are read from JpegXxxTables tags, and the other
63 : bits and pieces of information is initialized to its most basic value. This is
64 : implemented in the OJPEGReadHeaderInfoSecTablesXxx functions.
65 :
66 : When this is complete, a good and valid JPEG header can be assembled, and this is
67 : passed through to LibJpeg. When that's done, the remainder of the input stream, i.e.
68 : the compressed image data, can be passed through unchanged. This is done in
69 : OJPEGWriteStream functions.
70 :
71 : LibTiff rightly expects to know the subsampling values before decompression. Just like
72 : in new-style JPEG-in-TIFF, though, or even more so, actually, the YCbCrsubsampling
73 : tag is notoriously unreliable. To correct these tag values with the ones inside
74 : the JPEG stream, the first part of the input stream is pre-scanned in
75 : OJPEGSubsamplingCorrect, making no note of any other data, reporting no warnings
76 : or errors, up to the point where either these values are read, or it's clear they
77 : aren't there. This means that some of the data is read twice, but we feel speed
78 : in correcting these values is important enough to warrant this sacrifice. Allthough
79 : there is currently no define or other configuration mechanism to disable this behaviour,
80 : the actual header scanning is build to robustly respond with error report if it
81 : should encounter an uncorrected mismatch of subsampling values. See
82 : OJPEGReadHeaderInfoSecStreamSof.
83 :
84 : The restart interval and restart markers are the most tricky part... The restart
85 : interval can be specified in a tag. It can also be set inside the input JPEG stream.
86 : It can be used inside the input JPEG stream. If reading from strile data, we've
87 : consistenly discovered the need to insert restart markers in between the different
88 : striles, as is also probably the most likely interpretation of the original TIFF 6.0
89 : specification. With all this setting of interval, and actual use of markers that is not
90 : predictable at the time of valid JPEG header assembly, the restart thing may turn
91 : out the Achilles heel of this implementation. Fortunately, most OJPEG writer vendors
92 : succeed in reading back what they write, which may be the reason why we've been able
93 : to discover ways that seem to work.
94 :
95 : Some special provision is made for planarconfig separate OJPEG files. These seem
96 : to consistently contain header info, a SOS marker, a plane, SOS marker, plane, SOS,
97 : and plane. This may or may not be a valid JPEG configuration, we don't know and don't
98 : care. We want LibTiff to be able to access the planes individually, without huge
99 : buffering inside LibJpeg, anyway. So we compose headers to feed to LibJpeg, in this
100 : case, that allow us to pass a single plane such that LibJpeg sees a valid
101 : single-channel JPEG stream. Locating subsequent SOS markers, and thus subsequent
102 : planes, is done inside OJPEGReadSecondarySos.
103 :
104 : The benefit of the scheme is... that it works, basically. We know of no other that
105 : does. It works without checking software tag, or otherwise going about things in an
106 : OJPEG flavor specific manner. Instead, it is a single scheme, that covers the cases
107 : with and without JpegInterchangeFormat, with and without striles, with part of
108 : the header in JpegInterchangeFormat and remainder in first strile, etc. It is forgiving
109 : and robust, may likely work with OJPEG flavors we've not seen yet, and makes most out
110 : of the data.
111 :
112 : Another nice side-effect is that a complete JPEG single valid stream is build if
113 : planarconfig is not separate (vast majority). We may one day use that to build
114 : converters to JPEG, and/or to new-style JPEG compression inside TIFF.
115 :
116 : A dissadvantage is the lack of random access to the individual striles. This is the
117 : reason for much of the complicated restart-and-position stuff inside OJPEGPreDecode.
118 : Applications would do well accessing all striles in order, as this will result in
119 : a single sequential scan of the input stream, and no restarting of LibJpeg decoding
120 : session.
121 : */
122 :
123 : #define WIN32_LEAN_AND_MEAN
124 : #define VC_EXTRALEAN
125 :
126 : #include "tiffiop.h"
127 : #ifdef OJPEG_SUPPORT
128 :
129 : /* Configuration defines here are:
130 : * JPEG_ENCAP_EXTERNAL: The normal way to call libjpeg, uses longjump. In some environments,
131 : * like eg LibTiffDelphi, this is not possible. For this reason, the actual calls to
132 : * libjpeg, with longjump stuff, are encapsulated in dedicated functions. When
133 : * JPEG_ENCAP_EXTERNAL is defined, these encapsulating functions are declared external
134 : * to this unit, and can be defined elsewhere to use stuff other then longjump.
135 : * The default mode, without JPEG_ENCAP_EXTERNAL, implements the call encapsulators
136 : * here, internally, with normal longjump.
137 : * SETJMP, LONGJMP, JMP_BUF: On some machines/environments a longjump equivalent is
138 : * conviniently available, but still it may be worthwhile to use _setjmp or sigsetjmp
139 : * in place of plain setjmp. These macros will make it easier. It is useless
140 : * to fiddle with these if you define JPEG_ENCAP_EXTERNAL.
141 : * OJPEG_BUFFER: Define the size of the desired buffer here. Should be small enough so as to guarantee
142 : * instant processing, optimal streaming and optimal use of processor cache, but also big
143 : * enough so as to not result in significant call overhead. It should be at least a few
144 : * bytes to accomodate some structures (this is verified in asserts), but it would not be
145 : * sensible to make it this small anyway, and it should be at most 64K since it is indexed
146 : * with uint16. We recommend 2K.
147 : * EGYPTIANWALK: You could also define EGYPTIANWALK here, but it is not used anywhere and has
148 : * absolutely no effect. That is why most people insist the EGYPTIANWALK is a bit silly.
149 : */
150 :
151 : /* define LIBJPEG_ENCAP_EXTERNAL */
152 : #define SETJMP(jbuf) setjmp(jbuf)
153 : #define LONGJMP(jbuf,code) longjmp(jbuf,code)
154 : #define JMP_BUF jmp_buf
155 : #define OJPEG_BUFFER 2048
156 : /* define EGYPTIANWALK */
157 :
158 : #define JPEG_MARKER_SOF0 0xC0
159 : #define JPEG_MARKER_SOF1 0xC1
160 : #define JPEG_MARKER_SOF3 0xC3
161 : #define JPEG_MARKER_DHT 0xC4
162 : #define JPEG_MARKER_RST0 0XD0
163 : #define JPEG_MARKER_SOI 0xD8
164 : #define JPEG_MARKER_EOI 0xD9
165 : #define JPEG_MARKER_SOS 0xDA
166 : #define JPEG_MARKER_DQT 0xDB
167 : #define JPEG_MARKER_DRI 0xDD
168 : #define JPEG_MARKER_APP0 0xE0
169 : #define JPEG_MARKER_COM 0xFE
170 :
171 : #define FIELD_OJPEG_JPEGINTERCHANGEFORMAT (FIELD_CODEC+0)
172 : #define FIELD_OJPEG_JPEGINTERCHANGEFORMATLENGTH (FIELD_CODEC+1)
173 : #define FIELD_OJPEG_JPEGQTABLES (FIELD_CODEC+2)
174 : #define FIELD_OJPEG_JPEGDCTABLES (FIELD_CODEC+3)
175 : #define FIELD_OJPEG_JPEGACTABLES (FIELD_CODEC+4)
176 : #define FIELD_OJPEG_JPEGPROC (FIELD_CODEC+5)
177 : #define FIELD_OJPEG_JPEGRESTARTINTERVAL (FIELD_CODEC+6)
178 :
179 : static const TIFFField ojpegFields[] = {
180 : {TIFFTAG_JPEGIFOFFSET,1,1,TIFF_LONG8,0,TIFF_SETGET_UINT64,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGINTERCHANGEFORMAT,TRUE,FALSE,"JpegInterchangeFormat",NULL},
181 : {TIFFTAG_JPEGIFBYTECOUNT,1,1,TIFF_LONG8,0,TIFF_SETGET_UINT64,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGINTERCHANGEFORMATLENGTH,TRUE,FALSE,"JpegInterchangeFormatLength",NULL},
182 : {TIFFTAG_JPEGQTABLES,TIFF_VARIABLE2,TIFF_VARIABLE2,TIFF_LONG8,0,TIFF_SETGET_C32_UINT64,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGQTABLES,FALSE,TRUE,"JpegQTables",NULL},
183 : {TIFFTAG_JPEGDCTABLES,TIFF_VARIABLE2,TIFF_VARIABLE2,TIFF_LONG8,0,TIFF_SETGET_C32_UINT64,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGDCTABLES,FALSE,TRUE,"JpegDcTables",NULL},
184 : {TIFFTAG_JPEGACTABLES,TIFF_VARIABLE2,TIFF_VARIABLE2,TIFF_LONG8,0,TIFF_SETGET_C32_UINT64,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGACTABLES,FALSE,TRUE,"JpegAcTables",NULL},
185 : {TIFFTAG_JPEGPROC,1,1,TIFF_SHORT,0,TIFF_SETGET_UINT16,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGPROC,FALSE,FALSE,"JpegProc",NULL},
186 : {TIFFTAG_JPEGRESTARTINTERVAL,1,1,TIFF_SHORT,0,TIFF_SETGET_UINT16,TIFF_SETGET_UNDEFINED,FIELD_OJPEG_JPEGRESTARTINTERVAL,FALSE,FALSE,"JpegRestartInterval",NULL},
187 : };
188 :
189 : #ifndef LIBJPEG_ENCAP_EXTERNAL
190 : #include <setjmp.h>
191 : #endif
192 :
193 : /* We undefine FAR to avoid conflict with JPEG definition */
194 :
195 : #ifdef FAR
196 : #undef FAR
197 : #endif
198 :
199 : /*
200 : Libjpeg's jmorecfg.h defines INT16 and INT32, but only if XMD_H is
201 : not defined. Unfortunately, the MinGW and Borland compilers include
202 : a typedef for INT32, which causes a conflict. MSVC does not include
203 : a conficting typedef given the headers which are included.
204 : */
205 : #if defined(__BORLANDC__) || defined(__MINGW32__)
206 : # define XMD_H 1
207 : #endif
208 :
209 : /* Define "boolean" as unsigned char, not int, per Windows custom. */
210 : #if defined(__WIN32__) && !defined(__MINGW32__)
211 : # ifndef __RPCNDR_H__ /* don't conflict if rpcndr.h already read */
212 : typedef unsigned char boolean;
213 : # endif
214 : # define HAVE_BOOLEAN /* prevent jmorecfg.h from redefining it */
215 : #endif
216 :
217 : #include "jpeglib.h"
218 : #include "jerror.h"
219 :
220 : typedef struct jpeg_error_mgr jpeg_error_mgr;
221 : typedef struct jpeg_common_struct jpeg_common_struct;
222 : typedef struct jpeg_decompress_struct jpeg_decompress_struct;
223 : typedef struct jpeg_source_mgr jpeg_source_mgr;
224 :
225 : typedef enum {
226 : osibsNotSetYet,
227 : osibsJpegInterchangeFormat,
228 : osibsStrile,
229 : osibsEof
230 : } OJPEGStateInBufferSource;
231 :
232 : typedef enum {
233 : ososSoi,
234 : ososQTable0,ososQTable1,ososQTable2,ososQTable3,
235 : ososDcTable0,ososDcTable1,ososDcTable2,ososDcTable3,
236 : ososAcTable0,ososAcTable1,ososAcTable2,ososAcTable3,
237 : ososDri,
238 : ososSof,
239 : ososSos,
240 : ososCompressed,
241 : ososRst,
242 : ososEoi
243 : } OJPEGStateOutState;
244 :
245 : typedef struct {
246 : TIFF* tif;
247 : #ifndef LIBJPEG_ENCAP_EXTERNAL
248 : JMP_BUF exit_jmpbuf;
249 : #endif
250 : TIFFVGetMethod vgetparent;
251 : TIFFVSetMethod vsetparent;
252 : TIFFPrintMethod printdir;
253 : uint64 file_size;
254 : uint32 image_width;
255 : uint32 image_length;
256 : uint32 strile_width;
257 : uint32 strile_length;
258 : uint32 strile_length_total;
259 : uint8 samples_per_pixel;
260 : uint8 plane_sample_offset;
261 : uint8 samples_per_pixel_per_plane;
262 : uint64 jpeg_interchange_format;
263 : uint64 jpeg_interchange_format_length;
264 : uint8 jpeg_proc;
265 : uint8 subsamplingcorrect;
266 : uint8 subsamplingcorrect_done;
267 : uint8 subsampling_tag;
268 : uint8 subsampling_hor;
269 : uint8 subsampling_ver;
270 : uint8 subsampling_force_desubsampling_inside_decompression;
271 : uint8 qtable_offset_count;
272 : uint8 dctable_offset_count;
273 : uint8 actable_offset_count;
274 : uint64 qtable_offset[3];
275 : uint64 dctable_offset[3];
276 : uint64 actable_offset[3];
277 : uint8* qtable[4];
278 : uint8* dctable[4];
279 : uint8* actable[4];
280 : uint16 restart_interval;
281 : uint8 restart_index;
282 : uint8 sof_log;
283 : uint8 sof_marker_id;
284 : uint32 sof_x;
285 : uint32 sof_y;
286 : uint8 sof_c[3];
287 : uint8 sof_hv[3];
288 : uint8 sof_tq[3];
289 : uint8 sos_cs[3];
290 : uint8 sos_tda[3];
291 : struct {
292 : uint8 log;
293 : OJPEGStateInBufferSource in_buffer_source;
294 : uint32 in_buffer_next_strile;
295 : uint64 in_buffer_file_pos;
296 : uint64 in_buffer_file_togo;
297 : } sos_end[3];
298 : uint8 readheader_done;
299 : uint8 writeheader_done;
300 : uint16 write_cursample;
301 : uint32 write_curstrile;
302 : uint8 libjpeg_session_active;
303 : uint8 libjpeg_jpeg_query_style;
304 : jpeg_error_mgr libjpeg_jpeg_error_mgr;
305 : jpeg_decompress_struct libjpeg_jpeg_decompress_struct;
306 : jpeg_source_mgr libjpeg_jpeg_source_mgr;
307 : uint8 subsampling_convert_log;
308 : uint32 subsampling_convert_ylinelen;
309 : uint32 subsampling_convert_ylines;
310 : uint32 subsampling_convert_clinelen;
311 : uint32 subsampling_convert_clines;
312 : uint32 subsampling_convert_ybuflen;
313 : uint32 subsampling_convert_cbuflen;
314 : uint32 subsampling_convert_ycbcrbuflen;
315 : uint8* subsampling_convert_ycbcrbuf;
316 : uint8* subsampling_convert_ybuf;
317 : uint8* subsampling_convert_cbbuf;
318 : uint8* subsampling_convert_crbuf;
319 : uint32 subsampling_convert_ycbcrimagelen;
320 : uint8** subsampling_convert_ycbcrimage;
321 : uint32 subsampling_convert_clinelenout;
322 : uint32 subsampling_convert_state;
323 : uint32 bytes_per_line; /* if the codec outputs subsampled data, a 'line' in bytes_per_line */
324 : uint32 lines_per_strile; /* and lines_per_strile means subsampling_ver desubsampled rows */
325 : OJPEGStateInBufferSource in_buffer_source;
326 : uint32 in_buffer_next_strile;
327 : uint32 in_buffer_strile_count;
328 : uint64 in_buffer_file_pos;
329 : uint8 in_buffer_file_pos_log;
330 : uint64 in_buffer_file_togo;
331 : uint16 in_buffer_togo;
332 : uint8* in_buffer_cur;
333 : uint8 in_buffer[OJPEG_BUFFER];
334 : OJPEGStateOutState out_state;
335 : uint8 out_buffer[OJPEG_BUFFER];
336 : uint8* skip_buffer;
337 : } OJPEGState;
338 :
339 : static int OJPEGVGetField(TIFF* tif, uint32 tag, va_list ap);
340 : static int OJPEGVSetField(TIFF* tif, uint32 tag, va_list ap);
341 : static void OJPEGPrintDir(TIFF* tif, FILE* fd, long flags);
342 :
343 : static int OJPEGFixupTags(TIFF* tif);
344 : static int OJPEGSetupDecode(TIFF* tif);
345 : static int OJPEGPreDecode(TIFF* tif, uint16 s);
346 : static int OJPEGPreDecodeSkipRaw(TIFF* tif);
347 : static int OJPEGPreDecodeSkipScanlines(TIFF* tif);
348 : static int OJPEGDecode(TIFF* tif, uint8* buf, tmsize_t cc, uint16 s);
349 : static int OJPEGDecodeRaw(TIFF* tif, uint8* buf, tmsize_t cc);
350 : static int OJPEGDecodeScanlines(TIFF* tif, uint8* buf, tmsize_t cc);
351 : static void OJPEGPostDecode(TIFF* tif, uint8* buf, tmsize_t cc);
352 : static int OJPEGSetupEncode(TIFF* tif);
353 : static int OJPEGPreEncode(TIFF* tif, uint16 s);
354 : static int OJPEGEncode(TIFF* tif, uint8* buf, tmsize_t cc, uint16 s);
355 : static int OJPEGPostEncode(TIFF* tif);
356 : static void OJPEGCleanup(TIFF* tif);
357 :
358 : static void OJPEGSubsamplingCorrect(TIFF* tif);
359 : static int OJPEGReadHeaderInfo(TIFF* tif);
360 : static int OJPEGReadSecondarySos(TIFF* tif, uint16 s);
361 : static int OJPEGWriteHeaderInfo(TIFF* tif);
362 : static void OJPEGLibjpegSessionAbort(TIFF* tif);
363 :
364 : static int OJPEGReadHeaderInfoSec(TIFF* tif);
365 : static int OJPEGReadHeaderInfoSecStreamDri(TIFF* tif);
366 : static int OJPEGReadHeaderInfoSecStreamDqt(TIFF* tif);
367 : static int OJPEGReadHeaderInfoSecStreamDht(TIFF* tif);
368 : static int OJPEGReadHeaderInfoSecStreamSof(TIFF* tif, uint8 marker_id);
369 : static int OJPEGReadHeaderInfoSecStreamSos(TIFF* tif);
370 : static int OJPEGReadHeaderInfoSecTablesQTable(TIFF* tif);
371 : static int OJPEGReadHeaderInfoSecTablesDcTable(TIFF* tif);
372 : static int OJPEGReadHeaderInfoSecTablesAcTable(TIFF* tif);
373 :
374 : static int OJPEGReadBufferFill(OJPEGState* sp);
375 : static int OJPEGReadByte(OJPEGState* sp, uint8* byte);
376 : static int OJPEGReadBytePeek(OJPEGState* sp, uint8* byte);
377 : static void OJPEGReadByteAdvance(OJPEGState* sp);
378 : static int OJPEGReadWord(OJPEGState* sp, uint16* word);
379 : static int OJPEGReadBlock(OJPEGState* sp, uint16 len, void* mem);
380 : static void OJPEGReadSkip(OJPEGState* sp, uint16 len);
381 :
382 : static int OJPEGWriteStream(TIFF* tif, void** mem, uint32* len);
383 : static void OJPEGWriteStreamSoi(TIFF* tif, void** mem, uint32* len);
384 : static void OJPEGWriteStreamQTable(TIFF* tif, uint8 table_index, void** mem, uint32* len);
385 : static void OJPEGWriteStreamDcTable(TIFF* tif, uint8 table_index, void** mem, uint32* len);
386 : static void OJPEGWriteStreamAcTable(TIFF* tif, uint8 table_index, void** mem, uint32* len);
387 : static void OJPEGWriteStreamDri(TIFF* tif, void** mem, uint32* len);
388 : static void OJPEGWriteStreamSof(TIFF* tif, void** mem, uint32* len);
389 : static void OJPEGWriteStreamSos(TIFF* tif, void** mem, uint32* len);
390 : static int OJPEGWriteStreamCompressed(TIFF* tif, void** mem, uint32* len);
391 : static void OJPEGWriteStreamRst(TIFF* tif, void** mem, uint32* len);
392 : static void OJPEGWriteStreamEoi(TIFF* tif, void** mem, uint32* len);
393 :
394 : #ifdef LIBJPEG_ENCAP_EXTERNAL
395 : extern int jpeg_create_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo);
396 : extern int jpeg_read_header_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, uint8 require_image);
397 : extern int jpeg_start_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo);
398 : extern int jpeg_read_scanlines_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* scanlines, uint32 max_lines);
399 : extern int jpeg_read_raw_data_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* data, uint32 max_lines);
400 : extern void jpeg_encap_unwind(TIFF* tif);
401 : #else
402 : static int jpeg_create_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* j);
403 : static int jpeg_read_header_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, uint8 require_image);
404 : static int jpeg_start_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo);
405 : static int jpeg_read_scanlines_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* scanlines, uint32 max_lines);
406 : static int jpeg_read_raw_data_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* data, uint32 max_lines);
407 : static void jpeg_encap_unwind(TIFF* tif);
408 : #endif
409 :
410 : static void OJPEGLibjpegJpegErrorMgrOutputMessage(jpeg_common_struct* cinfo);
411 : static void OJPEGLibjpegJpegErrorMgrErrorExit(jpeg_common_struct* cinfo);
412 : static void OJPEGLibjpegJpegSourceMgrInitSource(jpeg_decompress_struct* cinfo);
413 : static boolean OJPEGLibjpegJpegSourceMgrFillInputBuffer(jpeg_decompress_struct* cinfo);
414 : static void OJPEGLibjpegJpegSourceMgrSkipInputData(jpeg_decompress_struct* cinfo, long num_bytes);
415 : static boolean OJPEGLibjpegJpegSourceMgrResyncToRestart(jpeg_decompress_struct* cinfo, int desired);
416 : static void OJPEGLibjpegJpegSourceMgrTermSource(jpeg_decompress_struct* cinfo);
417 :
418 : int
419 1 : TIFFInitOJPEG(TIFF* tif, int scheme)
420 : {
421 : static const char module[]="TIFFInitOJPEG";
422 : OJPEGState* sp;
423 :
424 1 : assert(scheme==COMPRESSION_OJPEG);
425 :
426 : /*
427 : * Merge codec-specific tag information.
428 : */
429 1 : if (!_TIFFMergeFields(tif, ojpegFields, TIFFArrayCount(ojpegFields))) {
430 0 : TIFFErrorExt(tif->tif_clientdata, module,
431 : "Merging Old JPEG codec-specific tags failed");
432 0 : return 0;
433 : }
434 :
435 : /* state block */
436 1 : sp=_TIFFmalloc(sizeof(OJPEGState));
437 1 : if (sp==NULL)
438 : {
439 0 : TIFFErrorExt(tif->tif_clientdata,module,"No space for OJPEG state block");
440 0 : return(0);
441 : }
442 1 : _TIFFmemset(sp,0,sizeof(OJPEGState));
443 1 : sp->tif=tif;
444 1 : sp->jpeg_proc=1;
445 1 : sp->subsampling_hor=2;
446 1 : sp->subsampling_ver=2;
447 1 : TIFFSetField(tif,TIFFTAG_YCBCRSUBSAMPLING,2,2);
448 : /* tif codec methods */
449 1 : tif->tif_fixuptags=OJPEGFixupTags;
450 1 : tif->tif_setupdecode=OJPEGSetupDecode;
451 1 : tif->tif_predecode=OJPEGPreDecode;
452 1 : tif->tif_postdecode=OJPEGPostDecode;
453 1 : tif->tif_decoderow=OJPEGDecode;
454 1 : tif->tif_decodestrip=OJPEGDecode;
455 1 : tif->tif_decodetile=OJPEGDecode;
456 1 : tif->tif_setupencode=OJPEGSetupEncode;
457 1 : tif->tif_preencode=OJPEGPreEncode;
458 1 : tif->tif_postencode=OJPEGPostEncode;
459 1 : tif->tif_encoderow=OJPEGEncode;
460 1 : tif->tif_encodestrip=OJPEGEncode;
461 1 : tif->tif_encodetile=OJPEGEncode;
462 1 : tif->tif_cleanup=OJPEGCleanup;
463 1 : tif->tif_data=(uint8*)sp;
464 : /* tif tag methods */
465 1 : sp->vgetparent=tif->tif_tagmethods.vgetfield;
466 1 : tif->tif_tagmethods.vgetfield=OJPEGVGetField;
467 1 : sp->vsetparent=tif->tif_tagmethods.vsetfield;
468 1 : tif->tif_tagmethods.vsetfield=OJPEGVSetField;
469 1 : sp->printdir=tif->tif_tagmethods.printdir;
470 1 : tif->tif_tagmethods.printdir=OJPEGPrintDir;
471 : /* Some OJPEG files don't have strip or tile offsets or bytecounts tags.
472 : Some others do, but have totally meaningless or corrupt values
473 : in these tags. In these cases, the JpegInterchangeFormat stream is
474 : reliable. In any case, this decoder reads the compressed data itself,
475 : from the most reliable locations, and we need to notify encapsulating
476 : LibTiff not to read raw strips or tiles for us. */
477 1 : tif->tif_flags|=TIFF_NOREADRAW;
478 1 : return(1);
479 : }
480 :
481 : static int
482 49 : OJPEGVGetField(TIFF* tif, uint32 tag, va_list ap)
483 : {
484 49 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
485 49 : switch(tag)
486 : {
487 : case TIFFTAG_JPEGIFOFFSET:
488 0 : *va_arg(ap,uint64*)=(uint64)sp->jpeg_interchange_format;
489 0 : break;
490 : case TIFFTAG_JPEGIFBYTECOUNT:
491 0 : *va_arg(ap,uint64*)=(uint64)sp->jpeg_interchange_format_length;
492 0 : break;
493 : case TIFFTAG_YCBCRSUBSAMPLING:
494 5 : if (sp->subsamplingcorrect_done==0)
495 1 : OJPEGSubsamplingCorrect(tif);
496 5 : *va_arg(ap,uint16*)=(uint16)sp->subsampling_hor;
497 5 : *va_arg(ap,uint16*)=(uint16)sp->subsampling_ver;
498 5 : break;
499 : case TIFFTAG_JPEGQTABLES:
500 0 : *va_arg(ap,uint32*)=(uint32)sp->qtable_offset_count;
501 0 : *va_arg(ap,void**)=(void*)sp->qtable_offset;
502 0 : break;
503 : case TIFFTAG_JPEGDCTABLES:
504 0 : *va_arg(ap,uint32*)=(uint32)sp->dctable_offset_count;
505 0 : *va_arg(ap,void**)=(void*)sp->dctable_offset;
506 0 : break;
507 : case TIFFTAG_JPEGACTABLES:
508 0 : *va_arg(ap,uint32*)=(uint32)sp->actable_offset_count;
509 0 : *va_arg(ap,void**)=(void*)sp->actable_offset;
510 0 : break;
511 : case TIFFTAG_JPEGPROC:
512 0 : *va_arg(ap,uint16*)=(uint16)sp->jpeg_proc;
513 0 : break;
514 : case TIFFTAG_JPEGRESTARTINTERVAL:
515 0 : *va_arg(ap,uint16*)=sp->restart_interval;
516 0 : break;
517 : default:
518 44 : return (*sp->vgetparent)(tif,tag,ap);
519 : }
520 5 : return (1);
521 : }
522 :
523 : static int
524 17 : OJPEGVSetField(TIFF* tif, uint32 tag, va_list ap)
525 : {
526 : static const char module[]="OJPEGVSetField";
527 17 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
528 : uint32 ma;
529 : uint64* mb;
530 : uint32 n;
531 17 : switch(tag)
532 : {
533 : case TIFFTAG_JPEGIFOFFSET:
534 0 : sp->jpeg_interchange_format=(uint64)va_arg(ap,uint64);
535 0 : break;
536 : case TIFFTAG_JPEGIFBYTECOUNT:
537 0 : sp->jpeg_interchange_format_length=(uint64)va_arg(ap,uint64);
538 0 : break;
539 : case TIFFTAG_YCBCRSUBSAMPLING:
540 1 : sp->subsampling_tag=1;
541 1 : sp->subsampling_hor=(uint8)va_arg(ap,uint16_vap);
542 1 : sp->subsampling_ver=(uint8)va_arg(ap,uint16_vap);
543 1 : tif->tif_dir.td_ycbcrsubsampling[0]=sp->subsampling_hor;
544 1 : tif->tif_dir.td_ycbcrsubsampling[1]=sp->subsampling_ver;
545 1 : break;
546 : case TIFFTAG_JPEGQTABLES:
547 1 : ma=(uint32)va_arg(ap,uint32);
548 1 : if (ma!=0)
549 : {
550 1 : if (ma>3)
551 : {
552 0 : TIFFErrorExt(tif->tif_clientdata,module,"JpegQTables tag has incorrect count");
553 0 : return(0);
554 : }
555 1 : sp->qtable_offset_count=(uint8)ma;
556 1 : mb=(uint64*)va_arg(ap,uint64*);
557 4 : for (n=0; n<ma; n++)
558 3 : sp->qtable_offset[n]=mb[n];
559 : }
560 1 : break;
561 : case TIFFTAG_JPEGDCTABLES:
562 1 : ma=(uint32)va_arg(ap,uint32);
563 1 : if (ma!=0)
564 : {
565 1 : if (ma>3)
566 : {
567 0 : TIFFErrorExt(tif->tif_clientdata,module,"JpegDcTables tag has incorrect count");
568 0 : return(0);
569 : }
570 1 : sp->dctable_offset_count=(uint8)ma;
571 1 : mb=(uint64*)va_arg(ap,uint64*);
572 4 : for (n=0; n<ma; n++)
573 3 : sp->dctable_offset[n]=mb[n];
574 : }
575 1 : break;
576 : case TIFFTAG_JPEGACTABLES:
577 1 : ma=(uint32)va_arg(ap,uint32);
578 1 : if (ma!=0)
579 : {
580 1 : if (ma>3)
581 : {
582 0 : TIFFErrorExt(tif->tif_clientdata,module,"JpegAcTables tag has incorrect count");
583 0 : return(0);
584 : }
585 1 : sp->actable_offset_count=(uint8)ma;
586 1 : mb=(uint64*)va_arg(ap,uint64*);
587 4 : for (n=0; n<ma; n++)
588 3 : sp->actable_offset[n]=mb[n];
589 : }
590 1 : break;
591 : case TIFFTAG_JPEGPROC:
592 1 : sp->jpeg_proc=(uint8)va_arg(ap,uint16_vap);
593 1 : break;
594 : case TIFFTAG_JPEGRESTARTINTERVAL:
595 0 : sp->restart_interval=(uint16)va_arg(ap,uint16_vap);
596 0 : break;
597 : default:
598 12 : return (*sp->vsetparent)(tif,tag,ap);
599 : }
600 5 : TIFFSetFieldBit(tif,TIFFFieldWithTag(tif,tag)->field_bit);
601 5 : tif->tif_flags|=TIFF_DIRTYDIRECT;
602 5 : return(1);
603 : }
604 :
605 : static void
606 0 : OJPEGPrintDir(TIFF* tif, FILE* fd, long flags)
607 : {
608 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
609 : uint8 m;
610 : (void)flags;
611 0 : assert(sp!=NULL);
612 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGINTERCHANGEFORMAT))
613 0 : fprintf(fd," JpegInterchangeFormat: " TIFF_UINT64_FORMAT "\n",(TIFF_UINT64_T)sp->jpeg_interchange_format);
614 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGINTERCHANGEFORMATLENGTH))
615 0 : fprintf(fd," JpegInterchangeFormatLength: " TIFF_UINT64_FORMAT "\n",(TIFF_UINT64_T)sp->jpeg_interchange_format_length);
616 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGQTABLES))
617 : {
618 0 : fprintf(fd," JpegQTables:");
619 0 : for (m=0; m<sp->qtable_offset_count; m++)
620 0 : fprintf(fd," " TIFF_UINT64_FORMAT,(TIFF_UINT64_T)sp->qtable_offset[m]);
621 0 : fprintf(fd,"\n");
622 : }
623 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGDCTABLES))
624 : {
625 0 : fprintf(fd," JpegDcTables:");
626 0 : for (m=0; m<sp->dctable_offset_count; m++)
627 0 : fprintf(fd," " TIFF_UINT64_FORMAT,(TIFF_UINT64_T)sp->dctable_offset[m]);
628 0 : fprintf(fd,"\n");
629 : }
630 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGACTABLES))
631 : {
632 0 : fprintf(fd," JpegAcTables:");
633 0 : for (m=0; m<sp->actable_offset_count; m++)
634 0 : fprintf(fd," " TIFF_UINT64_FORMAT,(TIFF_UINT64_T)sp->actable_offset[m]);
635 0 : fprintf(fd,"\n");
636 : }
637 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGPROC))
638 0 : fprintf(fd," JpegProc: %u\n",(unsigned int)sp->jpeg_proc);
639 0 : if (TIFFFieldSet(tif,FIELD_OJPEG_JPEGRESTARTINTERVAL))
640 0 : fprintf(fd," JpegRestartInterval: %u\n",(unsigned int)sp->restart_interval);
641 0 : if (sp->printdir)
642 0 : (*sp->printdir)(tif, fd, flags);
643 0 : }
644 :
645 : static int
646 1 : OJPEGFixupTags(TIFF* tif)
647 : {
648 : (void) tif;
649 1 : return(1);
650 : }
651 :
652 : static int
653 1 : OJPEGSetupDecode(TIFF* tif)
654 : {
655 : static const char module[]="OJPEGSetupDecode";
656 1 : TIFFWarningExt(tif->tif_clientdata,module,"Depreciated and troublesome old-style JPEG compression mode, please convert to new-style JPEG compression and notify vendor of writing software");
657 1 : return(1);
658 : }
659 :
660 : static int
661 1 : OJPEGPreDecode(TIFF* tif, uint16 s)
662 : {
663 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
664 : uint32 m;
665 1 : if (sp->subsamplingcorrect_done==0)
666 0 : OJPEGSubsamplingCorrect(tif);
667 1 : if (sp->readheader_done==0)
668 : {
669 1 : if (OJPEGReadHeaderInfo(tif)==0)
670 0 : return(0);
671 : }
672 1 : if (sp->sos_end[s].log==0)
673 : {
674 0 : if (OJPEGReadSecondarySos(tif,s)==0)
675 0 : return(0);
676 : }
677 1 : if isTiled(tif)
678 1 : m=tif->tif_curtile;
679 : else
680 0 : m=tif->tif_curstrip;
681 1 : if ((sp->writeheader_done!=0) && ((sp->write_cursample!=s) || (sp->write_curstrile>m)))
682 : {
683 0 : if (sp->libjpeg_session_active!=0)
684 0 : OJPEGLibjpegSessionAbort(tif);
685 0 : sp->writeheader_done=0;
686 : }
687 1 : if (sp->writeheader_done==0)
688 : {
689 1 : sp->plane_sample_offset=(uint8)s;
690 1 : sp->write_cursample=s;
691 1 : sp->write_curstrile=s*tif->tif_dir.td_stripsperimage;
692 1 : if ((sp->in_buffer_file_pos_log==0) ||
693 0 : (sp->in_buffer_file_pos-sp->in_buffer_togo!=sp->sos_end[s].in_buffer_file_pos))
694 : {
695 1 : sp->in_buffer_source=sp->sos_end[s].in_buffer_source;
696 1 : sp->in_buffer_next_strile=sp->sos_end[s].in_buffer_next_strile;
697 1 : sp->in_buffer_file_pos=sp->sos_end[s].in_buffer_file_pos;
698 1 : sp->in_buffer_file_pos_log=0;
699 1 : sp->in_buffer_file_togo=sp->sos_end[s].in_buffer_file_togo;
700 1 : sp->in_buffer_togo=0;
701 1 : sp->in_buffer_cur=0;
702 : }
703 1 : if (OJPEGWriteHeaderInfo(tif)==0)
704 0 : return(0);
705 : }
706 2 : while (sp->write_curstrile<m)
707 : {
708 0 : if (sp->libjpeg_jpeg_query_style==0)
709 : {
710 0 : if (OJPEGPreDecodeSkipRaw(tif)==0)
711 0 : return(0);
712 : }
713 : else
714 : {
715 0 : if (OJPEGPreDecodeSkipScanlines(tif)==0)
716 0 : return(0);
717 : }
718 0 : sp->write_curstrile++;
719 : }
720 1 : return(1);
721 : }
722 :
723 : static int
724 0 : OJPEGPreDecodeSkipRaw(TIFF* tif)
725 : {
726 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
727 : uint32 m;
728 0 : m=sp->lines_per_strile;
729 0 : if (sp->subsampling_convert_state!=0)
730 : {
731 0 : if (sp->subsampling_convert_clines-sp->subsampling_convert_state>=m)
732 : {
733 0 : sp->subsampling_convert_state+=m;
734 0 : if (sp->subsampling_convert_state==sp->subsampling_convert_clines)
735 0 : sp->subsampling_convert_state=0;
736 0 : return(1);
737 : }
738 0 : m-=sp->subsampling_convert_clines-sp->subsampling_convert_state;
739 0 : sp->subsampling_convert_state=0;
740 : }
741 0 : while (m>=sp->subsampling_convert_clines)
742 : {
743 0 : if (jpeg_read_raw_data_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),sp->subsampling_convert_ycbcrimage,sp->subsampling_ver*8)==0)
744 0 : return(0);
745 0 : m-=sp->subsampling_convert_clines;
746 : }
747 0 : if (m>0)
748 : {
749 0 : if (jpeg_read_raw_data_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),sp->subsampling_convert_ycbcrimage,sp->subsampling_ver*8)==0)
750 0 : return(0);
751 0 : sp->subsampling_convert_state=m;
752 : }
753 0 : return(1);
754 : }
755 :
756 : static int
757 0 : OJPEGPreDecodeSkipScanlines(TIFF* tif)
758 : {
759 : static const char module[]="OJPEGPreDecodeSkipScanlines";
760 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
761 : uint32 m;
762 0 : if (sp->skip_buffer==NULL)
763 : {
764 0 : sp->skip_buffer=_TIFFmalloc(sp->bytes_per_line);
765 0 : if (sp->skip_buffer==NULL)
766 : {
767 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
768 0 : return(0);
769 : }
770 : }
771 0 : for (m=0; m<sp->lines_per_strile; m++)
772 : {
773 0 : if (jpeg_read_scanlines_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),&sp->skip_buffer,1)==0)
774 0 : return(0);
775 : }
776 0 : return(1);
777 : }
778 :
779 : static int
780 1 : OJPEGDecode(TIFF* tif, uint8* buf, tmsize_t cc, uint16 s)
781 : {
782 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
783 : (void)s;
784 1 : if (sp->libjpeg_jpeg_query_style==0)
785 : {
786 1 : if (OJPEGDecodeRaw(tif,buf,cc)==0)
787 0 : return(0);
788 : }
789 : else
790 : {
791 0 : if (OJPEGDecodeScanlines(tif,buf,cc)==0)
792 0 : return(0);
793 : }
794 1 : return(1);
795 : }
796 :
797 : static int
798 1 : OJPEGDecodeRaw(TIFF* tif, uint8* buf, tmsize_t cc)
799 : {
800 : static const char module[]="OJPEGDecodeRaw";
801 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
802 : uint8* m;
803 : tmsize_t n;
804 : uint8* oy;
805 : uint8* ocb;
806 : uint8* ocr;
807 : uint8* p;
808 : uint32 q;
809 : uint8* r;
810 : uint8 sx,sy;
811 1 : if (cc%sp->bytes_per_line!=0)
812 : {
813 0 : TIFFErrorExt(tif->tif_clientdata,module,"Fractional scanline not read");
814 0 : return(0);
815 : }
816 1 : assert(cc>0);
817 1 : m=buf;
818 1 : n=cc;
819 : do
820 : {
821 112 : if (sp->subsampling_convert_state==0)
822 : {
823 14 : if (jpeg_read_raw_data_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),sp->subsampling_convert_ycbcrimage,sp->subsampling_ver*8)==0)
824 0 : return(0);
825 : }
826 112 : oy=sp->subsampling_convert_ybuf+sp->subsampling_convert_state*sp->subsampling_ver*sp->subsampling_convert_ylinelen;
827 112 : ocb=sp->subsampling_convert_cbbuf+sp->subsampling_convert_state*sp->subsampling_convert_clinelen;
828 112 : ocr=sp->subsampling_convert_crbuf+sp->subsampling_convert_state*sp->subsampling_convert_clinelen;
829 112 : p=m;
830 13552 : for (q=0; q<sp->subsampling_convert_clinelenout; q++)
831 : {
832 13440 : r=oy;
833 40320 : for (sy=0; sy<sp->subsampling_ver; sy++)
834 : {
835 80640 : for (sx=0; sx<sp->subsampling_hor; sx++)
836 53760 : *p++=*r++;
837 26880 : r+=sp->subsampling_convert_ylinelen-sp->subsampling_hor;
838 : }
839 13440 : oy+=sp->subsampling_hor;
840 13440 : *p++=*ocb++;
841 13440 : *p++=*ocr++;
842 : }
843 112 : sp->subsampling_convert_state++;
844 112 : if (sp->subsampling_convert_state==sp->subsampling_convert_clines)
845 14 : sp->subsampling_convert_state=0;
846 112 : m+=sp->bytes_per_line;
847 112 : n-=sp->bytes_per_line;
848 112 : } while(n>0);
849 1 : return(1);
850 : }
851 :
852 : static int
853 0 : OJPEGDecodeScanlines(TIFF* tif, uint8* buf, tmsize_t cc)
854 : {
855 : static const char module[]="OJPEGDecodeScanlines";
856 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
857 : uint8* m;
858 : tmsize_t n;
859 0 : if (cc%sp->bytes_per_line!=0)
860 : {
861 0 : TIFFErrorExt(tif->tif_clientdata,module,"Fractional scanline not read");
862 0 : return(0);
863 : }
864 0 : assert(cc>0);
865 0 : m=buf;
866 0 : n=cc;
867 : do
868 : {
869 0 : if (jpeg_read_scanlines_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),&m,1)==0)
870 0 : return(0);
871 0 : m+=sp->bytes_per_line;
872 0 : n-=sp->bytes_per_line;
873 0 : } while(n>0);
874 0 : return(1);
875 : }
876 :
877 : static void
878 0 : OJPEGPostDecode(TIFF* tif, uint8* buf, tmsize_t cc)
879 : {
880 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
881 : (void)buf;
882 : (void)cc;
883 0 : sp->write_curstrile++;
884 0 : if (sp->write_curstrile%tif->tif_dir.td_stripsperimage==0)
885 : {
886 0 : assert(sp->libjpeg_session_active!=0);
887 0 : OJPEGLibjpegSessionAbort(tif);
888 0 : sp->writeheader_done=0;
889 : }
890 0 : }
891 :
892 : static int
893 0 : OJPEGSetupEncode(TIFF* tif)
894 : {
895 : static const char module[]="OJPEGSetupEncode";
896 0 : TIFFErrorExt(tif->tif_clientdata,module,"OJPEG encoding not supported; use new-style JPEG compression instead");
897 0 : return(0);
898 : }
899 :
900 : static int
901 0 : OJPEGPreEncode(TIFF* tif, uint16 s)
902 : {
903 : static const char module[]="OJPEGPreEncode";
904 : (void)s;
905 0 : TIFFErrorExt(tif->tif_clientdata,module,"OJPEG encoding not supported; use new-style JPEG compression instead");
906 0 : return(0);
907 : }
908 :
909 : static int
910 0 : OJPEGEncode(TIFF* tif, uint8* buf, tmsize_t cc, uint16 s)
911 : {
912 : static const char module[]="OJPEGEncode";
913 : (void)buf;
914 : (void)cc;
915 : (void)s;
916 0 : TIFFErrorExt(tif->tif_clientdata,module,"OJPEG encoding not supported; use new-style JPEG compression instead");
917 0 : return(0);
918 : }
919 :
920 : static int
921 0 : OJPEGPostEncode(TIFF* tif)
922 : {
923 : static const char module[]="OJPEGPostEncode";
924 0 : TIFFErrorExt(tif->tif_clientdata,module,"OJPEG encoding not supported; use new-style JPEG compression instead");
925 0 : return(0);
926 : }
927 :
928 : static void
929 1 : OJPEGCleanup(TIFF* tif)
930 : {
931 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
932 1 : if (sp!=0)
933 : {
934 1 : tif->tif_tagmethods.vgetfield=sp->vgetparent;
935 1 : tif->tif_tagmethods.vsetfield=sp->vsetparent;
936 1 : tif->tif_tagmethods.printdir=sp->printdir;
937 1 : if (sp->qtable[0]!=0)
938 1 : _TIFFfree(sp->qtable[0]);
939 1 : if (sp->qtable[1]!=0)
940 1 : _TIFFfree(sp->qtable[1]);
941 1 : if (sp->qtable[2]!=0)
942 1 : _TIFFfree(sp->qtable[2]);
943 1 : if (sp->qtable[3]!=0)
944 0 : _TIFFfree(sp->qtable[3]);
945 1 : if (sp->dctable[0]!=0)
946 1 : _TIFFfree(sp->dctable[0]);
947 1 : if (sp->dctable[1]!=0)
948 1 : _TIFFfree(sp->dctable[1]);
949 1 : if (sp->dctable[2]!=0)
950 1 : _TIFFfree(sp->dctable[2]);
951 1 : if (sp->dctable[3]!=0)
952 0 : _TIFFfree(sp->dctable[3]);
953 1 : if (sp->actable[0]!=0)
954 1 : _TIFFfree(sp->actable[0]);
955 1 : if (sp->actable[1]!=0)
956 1 : _TIFFfree(sp->actable[1]);
957 1 : if (sp->actable[2]!=0)
958 1 : _TIFFfree(sp->actable[2]);
959 1 : if (sp->actable[3]!=0)
960 0 : _TIFFfree(sp->actable[3]);
961 1 : if (sp->libjpeg_session_active!=0)
962 1 : OJPEGLibjpegSessionAbort(tif);
963 1 : if (sp->subsampling_convert_ycbcrbuf!=0)
964 1 : _TIFFfree(sp->subsampling_convert_ycbcrbuf);
965 1 : if (sp->subsampling_convert_ycbcrimage!=0)
966 1 : _TIFFfree(sp->subsampling_convert_ycbcrimage);
967 1 : if (sp->skip_buffer!=0)
968 0 : _TIFFfree(sp->skip_buffer);
969 1 : _TIFFfree(sp);
970 1 : tif->tif_data=NULL;
971 1 : _TIFFSetDefaultCompressionState(tif);
972 : }
973 1 : }
974 :
975 : static void
976 1 : OJPEGSubsamplingCorrect(TIFF* tif)
977 : {
978 : static const char module[]="OJPEGSubsamplingCorrect";
979 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
980 : uint8 mh;
981 : uint8 mv;
982 1 : _TIFFFillStriles( tif );
983 :
984 1 : assert(sp->subsamplingcorrect_done==0);
985 1 : if ((tif->tif_dir.td_samplesperpixel!=3) || ((tif->tif_dir.td_photometric!=PHOTOMETRIC_YCBCR) &&
986 0 : (tif->tif_dir.td_photometric!=PHOTOMETRIC_ITULAB)))
987 : {
988 0 : if (sp->subsampling_tag!=0)
989 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling tag not appropriate for this Photometric and/or SamplesPerPixel");
990 0 : sp->subsampling_hor=1;
991 0 : sp->subsampling_ver=1;
992 0 : sp->subsampling_force_desubsampling_inside_decompression=0;
993 : }
994 : else
995 : {
996 1 : sp->subsamplingcorrect_done=1;
997 1 : mh=sp->subsampling_hor;
998 1 : mv=sp->subsampling_ver;
999 1 : sp->subsamplingcorrect=1;
1000 1 : OJPEGReadHeaderInfoSec(tif);
1001 1 : if (sp->subsampling_force_desubsampling_inside_decompression!=0)
1002 : {
1003 0 : sp->subsampling_hor=1;
1004 0 : sp->subsampling_ver=1;
1005 : }
1006 1 : sp->subsamplingcorrect=0;
1007 1 : if (((sp->subsampling_hor!=mh) || (sp->subsampling_ver!=mv)) && (sp->subsampling_force_desubsampling_inside_decompression==0))
1008 : {
1009 0 : if (sp->subsampling_tag==0)
1010 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling tag is not set, yet subsampling inside JPEG data [%d,%d] does not match default values [2,2]; assuming subsampling inside JPEG data is correct",sp->subsampling_hor,sp->subsampling_ver);
1011 : else
1012 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling inside JPEG data [%d,%d] does not match subsampling tag values [%d,%d]; assuming subsampling inside JPEG data is correct",sp->subsampling_hor,sp->subsampling_ver,mh,mv);
1013 : }
1014 1 : if (sp->subsampling_force_desubsampling_inside_decompression!=0)
1015 : {
1016 0 : if (sp->subsampling_tag==0)
1017 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling tag is not set, yet subsampling inside JPEG data does not match default values [2,2] (nor any other values allowed in TIFF); assuming subsampling inside JPEG data is correct and desubsampling inside JPEG decompression");
1018 : else
1019 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling inside JPEG data does not match subsampling tag values [%d,%d] (nor any other values allowed in TIFF); assuming subsampling inside JPEG data is correct and desubsampling inside JPEG decompression",mh,mv);
1020 : }
1021 1 : if (sp->subsampling_force_desubsampling_inside_decompression==0)
1022 : {
1023 1 : if (sp->subsampling_hor<sp->subsampling_ver)
1024 0 : TIFFWarningExt(tif->tif_clientdata,module,"Subsampling values [%d,%d] are not allowed in TIFF",sp->subsampling_hor,sp->subsampling_ver);
1025 : }
1026 : }
1027 1 : sp->subsamplingcorrect_done=1;
1028 1 : }
1029 :
1030 : static int
1031 1 : OJPEGReadHeaderInfo(TIFF* tif)
1032 : {
1033 : static const char module[]="OJPEGReadHeaderInfo";
1034 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1035 1 : assert(sp->readheader_done==0);
1036 1 : sp->image_width=tif->tif_dir.td_imagewidth;
1037 1 : sp->image_length=tif->tif_dir.td_imagelength;
1038 1 : if isTiled(tif)
1039 : {
1040 1 : sp->strile_width=tif->tif_dir.td_tilewidth;
1041 1 : sp->strile_length=tif->tif_dir.td_tilelength;
1042 1 : sp->strile_length_total=((sp->image_length+sp->strile_length-1)/sp->strile_length)*sp->strile_length;
1043 : }
1044 : else
1045 : {
1046 0 : sp->strile_width=sp->image_width;
1047 0 : sp->strile_length=tif->tif_dir.td_rowsperstrip;
1048 0 : sp->strile_length_total=sp->image_length;
1049 : }
1050 1 : if (tif->tif_dir.td_samplesperpixel==1)
1051 : {
1052 0 : sp->samples_per_pixel=1;
1053 0 : sp->plane_sample_offset=0;
1054 0 : sp->samples_per_pixel_per_plane=sp->samples_per_pixel;
1055 0 : sp->subsampling_hor=1;
1056 0 : sp->subsampling_ver=1;
1057 : }
1058 : else
1059 : {
1060 1 : if (tif->tif_dir.td_samplesperpixel!=3)
1061 : {
1062 0 : TIFFErrorExt(tif->tif_clientdata,module,"SamplesPerPixel %d not supported for this compression scheme",sp->samples_per_pixel);
1063 0 : return(0);
1064 : }
1065 1 : sp->samples_per_pixel=3;
1066 1 : sp->plane_sample_offset=0;
1067 1 : if (tif->tif_dir.td_planarconfig==PLANARCONFIG_CONTIG)
1068 1 : sp->samples_per_pixel_per_plane=3;
1069 : else
1070 0 : sp->samples_per_pixel_per_plane=1;
1071 : }
1072 1 : if (sp->strile_length<sp->image_length)
1073 : {
1074 0 : if (sp->strile_length%(sp->subsampling_ver*8)!=0)
1075 : {
1076 0 : TIFFErrorExt(tif->tif_clientdata,module,"Incompatible vertical subsampling and image strip/tile length");
1077 0 : return(0);
1078 : }
1079 0 : sp->restart_interval=((sp->strile_width+sp->subsampling_hor*8-1)/(sp->subsampling_hor*8))*(sp->strile_length/(sp->subsampling_ver*8));
1080 : }
1081 1 : if (OJPEGReadHeaderInfoSec(tif)==0)
1082 0 : return(0);
1083 1 : sp->sos_end[0].log=1;
1084 1 : sp->sos_end[0].in_buffer_source=sp->in_buffer_source;
1085 1 : sp->sos_end[0].in_buffer_next_strile=sp->in_buffer_next_strile;
1086 1 : sp->sos_end[0].in_buffer_file_pos=sp->in_buffer_file_pos-sp->in_buffer_togo;
1087 1 : sp->sos_end[0].in_buffer_file_togo=sp->in_buffer_file_togo+sp->in_buffer_togo;
1088 1 : sp->readheader_done=1;
1089 1 : return(1);
1090 : }
1091 :
1092 : static int
1093 0 : OJPEGReadSecondarySos(TIFF* tif, uint16 s)
1094 : {
1095 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1096 : uint8 m;
1097 0 : assert(s>0);
1098 0 : assert(s<3);
1099 0 : assert(sp->sos_end[0].log!=0);
1100 0 : assert(sp->sos_end[s].log==0);
1101 0 : sp->plane_sample_offset=s-1;
1102 0 : while(sp->sos_end[sp->plane_sample_offset].log==0)
1103 0 : sp->plane_sample_offset--;
1104 0 : sp->in_buffer_source=sp->sos_end[sp->plane_sample_offset].in_buffer_source;
1105 0 : sp->in_buffer_next_strile=sp->sos_end[sp->plane_sample_offset].in_buffer_next_strile;
1106 0 : sp->in_buffer_file_pos=sp->sos_end[sp->plane_sample_offset].in_buffer_file_pos;
1107 0 : sp->in_buffer_file_pos_log=0;
1108 0 : sp->in_buffer_file_togo=sp->sos_end[sp->plane_sample_offset].in_buffer_file_togo;
1109 0 : sp->in_buffer_togo=0;
1110 0 : sp->in_buffer_cur=0;
1111 0 : while(sp->plane_sample_offset<s)
1112 : {
1113 : do
1114 : {
1115 0 : if (OJPEGReadByte(sp,&m)==0)
1116 0 : return(0);
1117 0 : if (m==255)
1118 : {
1119 : do
1120 : {
1121 0 : if (OJPEGReadByte(sp,&m)==0)
1122 0 : return(0);
1123 0 : if (m!=255)
1124 : break;
1125 0 : } while(1);
1126 0 : if (m==JPEG_MARKER_SOS)
1127 : break;
1128 : }
1129 0 : } while(1);
1130 0 : sp->plane_sample_offset++;
1131 0 : if (OJPEGReadHeaderInfoSecStreamSos(tif)==0)
1132 0 : return(0);
1133 0 : sp->sos_end[sp->plane_sample_offset].log=1;
1134 0 : sp->sos_end[sp->plane_sample_offset].in_buffer_source=sp->in_buffer_source;
1135 0 : sp->sos_end[sp->plane_sample_offset].in_buffer_next_strile=sp->in_buffer_next_strile;
1136 0 : sp->sos_end[sp->plane_sample_offset].in_buffer_file_pos=sp->in_buffer_file_pos-sp->in_buffer_togo;
1137 0 : sp->sos_end[sp->plane_sample_offset].in_buffer_file_togo=sp->in_buffer_file_togo+sp->in_buffer_togo;
1138 : }
1139 0 : return(1);
1140 : }
1141 :
1142 : static int
1143 1 : OJPEGWriteHeaderInfo(TIFF* tif)
1144 : {
1145 : static const char module[]="OJPEGWriteHeaderInfo";
1146 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1147 : uint8** m;
1148 : uint32 n;
1149 1 : assert(sp->libjpeg_session_active==0);
1150 1 : sp->out_state=ososSoi;
1151 1 : sp->restart_index=0;
1152 1 : jpeg_std_error(&(sp->libjpeg_jpeg_error_mgr));
1153 1 : sp->libjpeg_jpeg_error_mgr.output_message=OJPEGLibjpegJpegErrorMgrOutputMessage;
1154 1 : sp->libjpeg_jpeg_error_mgr.error_exit=OJPEGLibjpegJpegErrorMgrErrorExit;
1155 1 : sp->libjpeg_jpeg_decompress_struct.err=&(sp->libjpeg_jpeg_error_mgr);
1156 1 : sp->libjpeg_jpeg_decompress_struct.client_data=(void*)tif;
1157 1 : if (jpeg_create_decompress_encap(sp,&(sp->libjpeg_jpeg_decompress_struct))==0)
1158 0 : return(0);
1159 1 : sp->libjpeg_session_active=1;
1160 1 : sp->libjpeg_jpeg_source_mgr.bytes_in_buffer=0;
1161 1 : sp->libjpeg_jpeg_source_mgr.init_source=OJPEGLibjpegJpegSourceMgrInitSource;
1162 1 : sp->libjpeg_jpeg_source_mgr.fill_input_buffer=OJPEGLibjpegJpegSourceMgrFillInputBuffer;
1163 1 : sp->libjpeg_jpeg_source_mgr.skip_input_data=OJPEGLibjpegJpegSourceMgrSkipInputData;
1164 1 : sp->libjpeg_jpeg_source_mgr.resync_to_restart=OJPEGLibjpegJpegSourceMgrResyncToRestart;
1165 1 : sp->libjpeg_jpeg_source_mgr.term_source=OJPEGLibjpegJpegSourceMgrTermSource;
1166 1 : sp->libjpeg_jpeg_decompress_struct.src=&(sp->libjpeg_jpeg_source_mgr);
1167 1 : if (jpeg_read_header_encap(sp,&(sp->libjpeg_jpeg_decompress_struct),1)==0)
1168 0 : return(0);
1169 2 : if ((sp->subsampling_force_desubsampling_inside_decompression==0) && (sp->samples_per_pixel_per_plane>1))
1170 : {
1171 1 : sp->libjpeg_jpeg_decompress_struct.raw_data_out=1;
1172 : #if JPEG_LIB_VERSION >= 70
1173 : sp->libjpeg_jpeg_decompress_struct.do_fancy_upsampling=FALSE;
1174 : #endif
1175 1 : sp->libjpeg_jpeg_query_style=0;
1176 1 : if (sp->subsampling_convert_log==0)
1177 : {
1178 1 : assert(sp->subsampling_convert_ycbcrbuf==0);
1179 1 : assert(sp->subsampling_convert_ycbcrimage==0);
1180 1 : sp->subsampling_convert_ylinelen=((sp->strile_width+sp->subsampling_hor*8-1)/(sp->subsampling_hor*8)*sp->subsampling_hor*8);
1181 1 : sp->subsampling_convert_ylines=sp->subsampling_ver*8;
1182 1 : sp->subsampling_convert_clinelen=sp->subsampling_convert_ylinelen/sp->subsampling_hor;
1183 1 : sp->subsampling_convert_clines=8;
1184 1 : sp->subsampling_convert_ybuflen=sp->subsampling_convert_ylinelen*sp->subsampling_convert_ylines;
1185 1 : sp->subsampling_convert_cbuflen=sp->subsampling_convert_clinelen*sp->subsampling_convert_clines;
1186 1 : sp->subsampling_convert_ycbcrbuflen=sp->subsampling_convert_ybuflen+2*sp->subsampling_convert_cbuflen;
1187 1 : sp->subsampling_convert_ycbcrbuf=_TIFFmalloc(sp->subsampling_convert_ycbcrbuflen);
1188 1 : if (sp->subsampling_convert_ycbcrbuf==0)
1189 : {
1190 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1191 0 : return(0);
1192 : }
1193 1 : sp->subsampling_convert_ybuf=sp->subsampling_convert_ycbcrbuf;
1194 1 : sp->subsampling_convert_cbbuf=sp->subsampling_convert_ybuf+sp->subsampling_convert_ybuflen;
1195 1 : sp->subsampling_convert_crbuf=sp->subsampling_convert_cbbuf+sp->subsampling_convert_cbuflen;
1196 1 : sp->subsampling_convert_ycbcrimagelen=3+sp->subsampling_convert_ylines+2*sp->subsampling_convert_clines;
1197 1 : sp->subsampling_convert_ycbcrimage=_TIFFmalloc(sp->subsampling_convert_ycbcrimagelen*sizeof(uint8*));
1198 1 : if (sp->subsampling_convert_ycbcrimage==0)
1199 : {
1200 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1201 0 : return(0);
1202 : }
1203 1 : m=sp->subsampling_convert_ycbcrimage;
1204 1 : *m++=(uint8*)(sp->subsampling_convert_ycbcrimage+3);
1205 1 : *m++=(uint8*)(sp->subsampling_convert_ycbcrimage+3+sp->subsampling_convert_ylines);
1206 1 : *m++=(uint8*)(sp->subsampling_convert_ycbcrimage+3+sp->subsampling_convert_ylines+sp->subsampling_convert_clines);
1207 17 : for (n=0; n<sp->subsampling_convert_ylines; n++)
1208 16 : *m++=sp->subsampling_convert_ybuf+n*sp->subsampling_convert_ylinelen;
1209 9 : for (n=0; n<sp->subsampling_convert_clines; n++)
1210 8 : *m++=sp->subsampling_convert_cbbuf+n*sp->subsampling_convert_clinelen;
1211 9 : for (n=0; n<sp->subsampling_convert_clines; n++)
1212 8 : *m++=sp->subsampling_convert_crbuf+n*sp->subsampling_convert_clinelen;
1213 1 : sp->subsampling_convert_clinelenout=((sp->strile_width+sp->subsampling_hor-1)/sp->subsampling_hor);
1214 1 : sp->subsampling_convert_state=0;
1215 1 : sp->bytes_per_line=sp->subsampling_convert_clinelenout*(sp->subsampling_ver*sp->subsampling_hor+2);
1216 1 : sp->lines_per_strile=((sp->strile_length+sp->subsampling_ver-1)/sp->subsampling_ver);
1217 1 : sp->subsampling_convert_log=1;
1218 : }
1219 : }
1220 : else
1221 : {
1222 0 : sp->libjpeg_jpeg_decompress_struct.jpeg_color_space=JCS_UNKNOWN;
1223 0 : sp->libjpeg_jpeg_decompress_struct.out_color_space=JCS_UNKNOWN;
1224 0 : sp->libjpeg_jpeg_query_style=1;
1225 0 : sp->bytes_per_line=sp->samples_per_pixel_per_plane*sp->strile_width;
1226 0 : sp->lines_per_strile=sp->strile_length;
1227 : }
1228 1 : if (jpeg_start_decompress_encap(sp,&(sp->libjpeg_jpeg_decompress_struct))==0)
1229 0 : return(0);
1230 1 : sp->writeheader_done=1;
1231 1 : return(1);
1232 : }
1233 :
1234 : static void
1235 1 : OJPEGLibjpegSessionAbort(TIFF* tif)
1236 : {
1237 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1238 1 : assert(sp->libjpeg_session_active!=0);
1239 1 : jpeg_destroy((jpeg_common_struct*)(&(sp->libjpeg_jpeg_decompress_struct)));
1240 1 : sp->libjpeg_session_active=0;
1241 1 : }
1242 :
1243 : static int
1244 2 : OJPEGReadHeaderInfoSec(TIFF* tif)
1245 : {
1246 : static const char module[]="OJPEGReadHeaderInfoSec";
1247 2 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1248 : uint8 m;
1249 : uint16 n;
1250 : uint8 o;
1251 2 : if (sp->file_size==0)
1252 1 : sp->file_size=TIFFGetFileSize(tif);
1253 2 : if (sp->jpeg_interchange_format!=0)
1254 : {
1255 0 : if (sp->jpeg_interchange_format>=sp->file_size)
1256 : {
1257 0 : sp->jpeg_interchange_format=0;
1258 0 : sp->jpeg_interchange_format_length=0;
1259 : }
1260 : else
1261 : {
1262 0 : if ((sp->jpeg_interchange_format_length==0) || (sp->jpeg_interchange_format+sp->jpeg_interchange_format_length>sp->file_size))
1263 0 : sp->jpeg_interchange_format_length=sp->file_size-sp->jpeg_interchange_format;
1264 : }
1265 : }
1266 2 : sp->in_buffer_source=osibsNotSetYet;
1267 2 : sp->in_buffer_next_strile=0;
1268 2 : sp->in_buffer_strile_count=tif->tif_dir.td_nstrips;
1269 2 : sp->in_buffer_file_togo=0;
1270 2 : sp->in_buffer_togo=0;
1271 : do
1272 : {
1273 2 : if (OJPEGReadBytePeek(sp,&m)==0)
1274 0 : return(0);
1275 2 : if (m!=255)
1276 2 : break;
1277 0 : OJPEGReadByteAdvance(sp);
1278 : do
1279 : {
1280 0 : if (OJPEGReadByte(sp,&m)==0)
1281 0 : return(0);
1282 0 : } while(m==255);
1283 0 : switch(m)
1284 : {
1285 : case JPEG_MARKER_SOI:
1286 : /* this type of marker has no data, and should be skipped */
1287 0 : break;
1288 : case JPEG_MARKER_COM:
1289 : case JPEG_MARKER_APP0:
1290 : case JPEG_MARKER_APP0+1:
1291 : case JPEG_MARKER_APP0+2:
1292 : case JPEG_MARKER_APP0+3:
1293 : case JPEG_MARKER_APP0+4:
1294 : case JPEG_MARKER_APP0+5:
1295 : case JPEG_MARKER_APP0+6:
1296 : case JPEG_MARKER_APP0+7:
1297 : case JPEG_MARKER_APP0+8:
1298 : case JPEG_MARKER_APP0+9:
1299 : case JPEG_MARKER_APP0+10:
1300 : case JPEG_MARKER_APP0+11:
1301 : case JPEG_MARKER_APP0+12:
1302 : case JPEG_MARKER_APP0+13:
1303 : case JPEG_MARKER_APP0+14:
1304 : case JPEG_MARKER_APP0+15:
1305 : /* this type of marker has data, but it has no use to us (and no place here) and should be skipped */
1306 0 : if (OJPEGReadWord(sp,&n)==0)
1307 0 : return(0);
1308 0 : if (n<2)
1309 : {
1310 0 : if (sp->subsamplingcorrect==0)
1311 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt JPEG data");
1312 0 : return(0);
1313 : }
1314 0 : if (n>2)
1315 0 : OJPEGReadSkip(sp,n-2);
1316 0 : break;
1317 : case JPEG_MARKER_DRI:
1318 0 : if (OJPEGReadHeaderInfoSecStreamDri(tif)==0)
1319 0 : return(0);
1320 0 : break;
1321 : case JPEG_MARKER_DQT:
1322 0 : if (OJPEGReadHeaderInfoSecStreamDqt(tif)==0)
1323 0 : return(0);
1324 0 : break;
1325 : case JPEG_MARKER_DHT:
1326 0 : if (OJPEGReadHeaderInfoSecStreamDht(tif)==0)
1327 0 : return(0);
1328 0 : break;
1329 : case JPEG_MARKER_SOF0:
1330 : case JPEG_MARKER_SOF1:
1331 : case JPEG_MARKER_SOF3:
1332 0 : if (OJPEGReadHeaderInfoSecStreamSof(tif,m)==0)
1333 0 : return(0);
1334 0 : if (sp->subsamplingcorrect!=0)
1335 0 : return(1);
1336 0 : break;
1337 : case JPEG_MARKER_SOS:
1338 0 : if (sp->subsamplingcorrect!=0)
1339 0 : return(1);
1340 0 : assert(sp->plane_sample_offset==0);
1341 0 : if (OJPEGReadHeaderInfoSecStreamSos(tif)==0)
1342 0 : return(0);
1343 0 : break;
1344 : default:
1345 0 : TIFFErrorExt(tif->tif_clientdata,module,"Unknown marker type %d in JPEG data",m);
1346 0 : return(0);
1347 : }
1348 0 : } while(m!=JPEG_MARKER_SOS);
1349 2 : if (sp->subsamplingcorrect)
1350 1 : return(1);
1351 1 : if (sp->sof_log==0)
1352 : {
1353 1 : if (OJPEGReadHeaderInfoSecTablesQTable(tif)==0)
1354 0 : return(0);
1355 1 : sp->sof_marker_id=JPEG_MARKER_SOF0;
1356 4 : for (o=0; o<sp->samples_per_pixel; o++)
1357 3 : sp->sof_c[o]=o;
1358 1 : sp->sof_hv[0]=((sp->subsampling_hor<<4)|sp->subsampling_ver);
1359 3 : for (o=1; o<sp->samples_per_pixel; o++)
1360 2 : sp->sof_hv[o]=17;
1361 1 : sp->sof_x=sp->strile_width;
1362 1 : sp->sof_y=sp->strile_length_total;
1363 1 : sp->sof_log=1;
1364 1 : if (OJPEGReadHeaderInfoSecTablesDcTable(tif)==0)
1365 0 : return(0);
1366 1 : if (OJPEGReadHeaderInfoSecTablesAcTable(tif)==0)
1367 0 : return(0);
1368 3 : for (o=1; o<sp->samples_per_pixel; o++)
1369 2 : sp->sos_cs[o]=o;
1370 : }
1371 1 : return(1);
1372 : }
1373 :
1374 : static int
1375 0 : OJPEGReadHeaderInfoSecStreamDri(TIFF* tif)
1376 : {
1377 : /* this could easilly cause trouble in some cases... but no such cases have occured sofar */
1378 : static const char module[]="OJPEGReadHeaderInfoSecStreamDri";
1379 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1380 : uint16 m;
1381 0 : if (OJPEGReadWord(sp,&m)==0)
1382 0 : return(0);
1383 0 : if (m!=4)
1384 : {
1385 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DRI marker in JPEG data");
1386 0 : return(0);
1387 : }
1388 0 : if (OJPEGReadWord(sp,&m)==0)
1389 0 : return(0);
1390 0 : sp->restart_interval=m;
1391 0 : return(1);
1392 : }
1393 :
1394 : static int
1395 0 : OJPEGReadHeaderInfoSecStreamDqt(TIFF* tif)
1396 : {
1397 : /* this is a table marker, and it is to be saved as a whole for exact pushing on the jpeg stream later on */
1398 : static const char module[]="OJPEGReadHeaderInfoSecStreamDqt";
1399 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1400 : uint16 m;
1401 : uint32 na;
1402 : uint8* nb;
1403 : uint8 o;
1404 0 : if (OJPEGReadWord(sp,&m)==0)
1405 0 : return(0);
1406 0 : if (m<=2)
1407 : {
1408 0 : if (sp->subsamplingcorrect==0)
1409 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DQT marker in JPEG data");
1410 0 : return(0);
1411 : }
1412 0 : if (sp->subsamplingcorrect!=0)
1413 0 : OJPEGReadSkip(sp,m-2);
1414 : else
1415 : {
1416 0 : m-=2;
1417 : do
1418 : {
1419 0 : if (m<65)
1420 : {
1421 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DQT marker in JPEG data");
1422 0 : return(0);
1423 : }
1424 0 : na=sizeof(uint32)+69;
1425 0 : nb=_TIFFmalloc(na);
1426 0 : if (nb==0)
1427 : {
1428 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1429 0 : return(0);
1430 : }
1431 0 : *(uint32*)nb=na;
1432 0 : nb[sizeof(uint32)]=255;
1433 0 : nb[sizeof(uint32)+1]=JPEG_MARKER_DQT;
1434 0 : nb[sizeof(uint32)+2]=0;
1435 0 : nb[sizeof(uint32)+3]=67;
1436 0 : if (OJPEGReadBlock(sp,65,&nb[sizeof(uint32)+4])==0) {
1437 0 : _TIFFfree(nb);
1438 0 : return(0);
1439 : }
1440 0 : o=nb[sizeof(uint32)+4]&15;
1441 0 : if (3<o)
1442 : {
1443 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DQT marker in JPEG data");
1444 0 : _TIFFfree(nb);
1445 0 : return(0);
1446 : }
1447 0 : if (sp->qtable[o]!=0)
1448 0 : _TIFFfree(sp->qtable[o]);
1449 0 : sp->qtable[o]=nb;
1450 0 : m-=65;
1451 0 : } while(m>0);
1452 : }
1453 0 : return(1);
1454 : }
1455 :
1456 : static int
1457 0 : OJPEGReadHeaderInfoSecStreamDht(TIFF* tif)
1458 : {
1459 : /* this is a table marker, and it is to be saved as a whole for exact pushing on the jpeg stream later on */
1460 : /* TODO: the following assumes there is only one table in this marker... but i'm not quite sure that assumption is guaranteed correct */
1461 : static const char module[]="OJPEGReadHeaderInfoSecStreamDht";
1462 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1463 : uint16 m;
1464 : uint32 na;
1465 : uint8* nb;
1466 : uint8 o;
1467 0 : if (OJPEGReadWord(sp,&m)==0)
1468 0 : return(0);
1469 0 : if (m<=2)
1470 : {
1471 0 : if (sp->subsamplingcorrect==0)
1472 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DHT marker in JPEG data");
1473 0 : return(0);
1474 : }
1475 0 : if (sp->subsamplingcorrect!=0)
1476 : {
1477 0 : OJPEGReadSkip(sp,m-2);
1478 : }
1479 : else
1480 : {
1481 0 : na=sizeof(uint32)+2+m;
1482 0 : nb=_TIFFmalloc(na);
1483 0 : if (nb==0)
1484 : {
1485 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1486 0 : return(0);
1487 : }
1488 0 : *(uint32*)nb=na;
1489 0 : nb[sizeof(uint32)]=255;
1490 0 : nb[sizeof(uint32)+1]=JPEG_MARKER_DHT;
1491 0 : nb[sizeof(uint32)+2]=(m>>8);
1492 0 : nb[sizeof(uint32)+3]=(m&255);
1493 0 : if (OJPEGReadBlock(sp,m-2,&nb[sizeof(uint32)+4])==0)
1494 0 : return(0);
1495 0 : o=nb[sizeof(uint32)+4];
1496 0 : if ((o&240)==0)
1497 : {
1498 0 : if (3<o)
1499 : {
1500 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DHT marker in JPEG data");
1501 0 : return(0);
1502 : }
1503 0 : if (sp->dctable[o]!=0)
1504 0 : _TIFFfree(sp->dctable[o]);
1505 0 : sp->dctable[o]=nb;
1506 : }
1507 : else
1508 : {
1509 0 : if ((o&240)!=16)
1510 : {
1511 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DHT marker in JPEG data");
1512 0 : return(0);
1513 : }
1514 0 : o&=15;
1515 0 : if (3<o)
1516 : {
1517 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt DHT marker in JPEG data");
1518 0 : return(0);
1519 : }
1520 0 : if (sp->actable[o]!=0)
1521 0 : _TIFFfree(sp->actable[o]);
1522 0 : sp->actable[o]=nb;
1523 : }
1524 : }
1525 0 : return(1);
1526 : }
1527 :
1528 : static int
1529 0 : OJPEGReadHeaderInfoSecStreamSof(TIFF* tif, uint8 marker_id)
1530 : {
1531 : /* this marker needs to be checked, and part of its data needs to be saved for regeneration later on */
1532 : static const char module[]="OJPEGReadHeaderInfoSecStreamSof";
1533 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1534 : uint16 m;
1535 : uint16 n;
1536 : uint8 o;
1537 : uint16 p;
1538 : uint16 q;
1539 0 : if (sp->sof_log!=0)
1540 : {
1541 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt JPEG data");
1542 0 : return(0);
1543 : }
1544 0 : if (sp->subsamplingcorrect==0)
1545 0 : sp->sof_marker_id=marker_id;
1546 : /* Lf: data length */
1547 0 : if (OJPEGReadWord(sp,&m)==0)
1548 0 : return(0);
1549 0 : if (m<11)
1550 : {
1551 0 : if (sp->subsamplingcorrect==0)
1552 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOF marker in JPEG data");
1553 0 : return(0);
1554 : }
1555 0 : m-=8;
1556 0 : if (m%3!=0)
1557 : {
1558 0 : if (sp->subsamplingcorrect==0)
1559 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOF marker in JPEG data");
1560 0 : return(0);
1561 : }
1562 0 : n=m/3;
1563 0 : if (sp->subsamplingcorrect==0)
1564 : {
1565 0 : if (n!=sp->samples_per_pixel)
1566 : {
1567 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected number of samples");
1568 0 : return(0);
1569 : }
1570 : }
1571 : /* P: Sample precision */
1572 0 : if (OJPEGReadByte(sp,&o)==0)
1573 0 : return(0);
1574 0 : if (o!=8)
1575 : {
1576 0 : if (sp->subsamplingcorrect==0)
1577 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected number of bits per sample");
1578 0 : return(0);
1579 : }
1580 : /* Y: Number of lines, X: Number of samples per line */
1581 0 : if (sp->subsamplingcorrect)
1582 0 : OJPEGReadSkip(sp,4);
1583 : else
1584 : {
1585 : /* Y: Number of lines */
1586 0 : if (OJPEGReadWord(sp,&p)==0)
1587 0 : return(0);
1588 0 : if (((uint32)p<sp->image_length) && ((uint32)p<sp->strile_length_total))
1589 : {
1590 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected height");
1591 0 : return(0);
1592 : }
1593 0 : sp->sof_y=p;
1594 : /* X: Number of samples per line */
1595 0 : if (OJPEGReadWord(sp,&p)==0)
1596 0 : return(0);
1597 0 : if (((uint32)p<sp->image_width) && ((uint32)p<sp->strile_width))
1598 : {
1599 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected width");
1600 0 : return(0);
1601 : }
1602 0 : if ((uint32)p>sp->strile_width)
1603 : {
1604 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data image width exceeds expected image width");
1605 0 : return(0);
1606 : }
1607 0 : sp->sof_x=p;
1608 : }
1609 : /* Nf: Number of image components in frame */
1610 0 : if (OJPEGReadByte(sp,&o)==0)
1611 0 : return(0);
1612 0 : if (o!=n)
1613 : {
1614 0 : if (sp->subsamplingcorrect==0)
1615 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOF marker in JPEG data");
1616 0 : return(0);
1617 : }
1618 : /* per component stuff */
1619 : /* TODO: double-check that flow implies that n cannot be as big as to make us overflow sof_c, sof_hv and sof_tq arrays */
1620 0 : for (q=0; q<n; q++)
1621 : {
1622 : /* C: Component identifier */
1623 0 : if (OJPEGReadByte(sp,&o)==0)
1624 0 : return(0);
1625 0 : if (sp->subsamplingcorrect==0)
1626 0 : sp->sof_c[q]=o;
1627 : /* H: Horizontal sampling factor, and V: Vertical sampling factor */
1628 0 : if (OJPEGReadByte(sp,&o)==0)
1629 0 : return(0);
1630 0 : if (sp->subsamplingcorrect!=0)
1631 : {
1632 0 : if (q==0)
1633 : {
1634 0 : sp->subsampling_hor=(o>>4);
1635 0 : sp->subsampling_ver=(o&15);
1636 0 : if (((sp->subsampling_hor!=1) && (sp->subsampling_hor!=2) && (sp->subsampling_hor!=4)) ||
1637 0 : ((sp->subsampling_ver!=1) && (sp->subsampling_ver!=2) && (sp->subsampling_ver!=4)))
1638 0 : sp->subsampling_force_desubsampling_inside_decompression=1;
1639 : }
1640 : else
1641 : {
1642 0 : if (o!=17)
1643 0 : sp->subsampling_force_desubsampling_inside_decompression=1;
1644 : }
1645 : }
1646 : else
1647 : {
1648 0 : sp->sof_hv[q]=o;
1649 0 : if (sp->subsampling_force_desubsampling_inside_decompression==0)
1650 : {
1651 0 : if (q==0)
1652 : {
1653 0 : if (o!=((sp->subsampling_hor<<4)|sp->subsampling_ver))
1654 : {
1655 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected subsampling values");
1656 0 : return(0);
1657 : }
1658 : }
1659 : else
1660 : {
1661 0 : if (o!=17)
1662 : {
1663 0 : TIFFErrorExt(tif->tif_clientdata,module,"JPEG compressed data indicates unexpected subsampling values");
1664 0 : return(0);
1665 : }
1666 : }
1667 : }
1668 : }
1669 : /* Tq: Quantization table destination selector */
1670 0 : if (OJPEGReadByte(sp,&o)==0)
1671 0 : return(0);
1672 0 : if (sp->subsamplingcorrect==0)
1673 0 : sp->sof_tq[q]=o;
1674 : }
1675 0 : if (sp->subsamplingcorrect==0)
1676 0 : sp->sof_log=1;
1677 0 : return(1);
1678 : }
1679 :
1680 : static int
1681 0 : OJPEGReadHeaderInfoSecStreamSos(TIFF* tif)
1682 : {
1683 : /* this marker needs to be checked, and part of its data needs to be saved for regeneration later on */
1684 : static const char module[]="OJPEGReadHeaderInfoSecStreamSos";
1685 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1686 : uint16 m;
1687 : uint8 n;
1688 : uint8 o;
1689 0 : assert(sp->subsamplingcorrect==0);
1690 0 : if (sp->sof_log==0)
1691 : {
1692 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOS marker in JPEG data");
1693 0 : return(0);
1694 : }
1695 : /* Ls */
1696 0 : if (OJPEGReadWord(sp,&m)==0)
1697 0 : return(0);
1698 0 : if (m!=6+sp->samples_per_pixel_per_plane*2)
1699 : {
1700 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOS marker in JPEG data");
1701 0 : return(0);
1702 : }
1703 : /* Ns */
1704 0 : if (OJPEGReadByte(sp,&n)==0)
1705 0 : return(0);
1706 0 : if (n!=sp->samples_per_pixel_per_plane)
1707 : {
1708 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt SOS marker in JPEG data");
1709 0 : return(0);
1710 : }
1711 : /* Cs, Td, and Ta */
1712 0 : for (o=0; o<sp->samples_per_pixel_per_plane; o++)
1713 : {
1714 : /* Cs */
1715 0 : if (OJPEGReadByte(sp,&n)==0)
1716 0 : return(0);
1717 0 : sp->sos_cs[sp->plane_sample_offset+o]=n;
1718 : /* Td and Ta */
1719 0 : if (OJPEGReadByte(sp,&n)==0)
1720 0 : return(0);
1721 0 : sp->sos_tda[sp->plane_sample_offset+o]=n;
1722 : }
1723 : /* skip Ss, Se, Ah, en Al -> no check, as per Tom Lane recommendation, as per LibJpeg source */
1724 0 : OJPEGReadSkip(sp,3);
1725 0 : return(1);
1726 : }
1727 :
1728 : static int
1729 1 : OJPEGReadHeaderInfoSecTablesQTable(TIFF* tif)
1730 : {
1731 : static const char module[]="OJPEGReadHeaderInfoSecTablesQTable";
1732 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1733 : uint8 m;
1734 : uint8 n;
1735 : uint32 oa;
1736 : uint8* ob;
1737 : uint32 p;
1738 1 : if (sp->qtable_offset[0]==0)
1739 : {
1740 0 : TIFFErrorExt(tif->tif_clientdata,module,"Missing JPEG tables");
1741 0 : return(0);
1742 : }
1743 1 : sp->in_buffer_file_pos_log=0;
1744 4 : for (m=0; m<sp->samples_per_pixel; m++)
1745 : {
1746 6 : if ((sp->qtable_offset[m]!=0) && ((m==0) || (sp->qtable_offset[m]!=sp->qtable_offset[m-1])))
1747 : {
1748 4 : for (n=0; n<m-1; n++)
1749 : {
1750 1 : if (sp->qtable_offset[m]==sp->qtable_offset[n])
1751 : {
1752 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt JpegQTables tag value");
1753 0 : return(0);
1754 : }
1755 : }
1756 3 : oa=sizeof(uint32)+69;
1757 3 : ob=_TIFFmalloc(oa);
1758 3 : if (ob==0)
1759 : {
1760 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1761 0 : return(0);
1762 : }
1763 3 : *(uint32*)ob=oa;
1764 3 : ob[sizeof(uint32)]=255;
1765 3 : ob[sizeof(uint32)+1]=JPEG_MARKER_DQT;
1766 3 : ob[sizeof(uint32)+2]=0;
1767 3 : ob[sizeof(uint32)+3]=67;
1768 3 : ob[sizeof(uint32)+4]=m;
1769 3 : TIFFSeekFile(tif,sp->qtable_offset[m],SEEK_SET);
1770 3 : p=TIFFReadFile(tif,&ob[sizeof(uint32)+5],64);
1771 3 : if (p!=64)
1772 0 : return(0);
1773 3 : sp->qtable[m]=ob;
1774 3 : sp->sof_tq[m]=m;
1775 : }
1776 : else
1777 0 : sp->sof_tq[m]=sp->sof_tq[m-1];
1778 : }
1779 1 : return(1);
1780 : }
1781 :
1782 : static int
1783 1 : OJPEGReadHeaderInfoSecTablesDcTable(TIFF* tif)
1784 : {
1785 : static const char module[]="OJPEGReadHeaderInfoSecTablesDcTable";
1786 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1787 : uint8 m;
1788 : uint8 n;
1789 : uint8 o[16];
1790 : uint32 p;
1791 : uint32 q;
1792 : uint32 ra;
1793 : uint8* rb;
1794 1 : if (sp->dctable_offset[0]==0)
1795 : {
1796 0 : TIFFErrorExt(tif->tif_clientdata,module,"Missing JPEG tables");
1797 0 : return(0);
1798 : }
1799 1 : sp->in_buffer_file_pos_log=0;
1800 4 : for (m=0; m<sp->samples_per_pixel; m++)
1801 : {
1802 6 : if ((sp->dctable_offset[m]!=0) && ((m==0) || (sp->dctable_offset[m]!=sp->dctable_offset[m-1])))
1803 : {
1804 4 : for (n=0; n<m-1; n++)
1805 : {
1806 1 : if (sp->dctable_offset[m]==sp->dctable_offset[n])
1807 : {
1808 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt JpegDcTables tag value");
1809 0 : return(0);
1810 : }
1811 : }
1812 3 : TIFFSeekFile(tif,sp->dctable_offset[m],SEEK_SET);
1813 3 : p=TIFFReadFile(tif,o,16);
1814 3 : if (p!=16)
1815 0 : return(0);
1816 3 : q=0;
1817 51 : for (n=0; n<16; n++)
1818 48 : q+=o[n];
1819 3 : ra=sizeof(uint32)+21+q;
1820 3 : rb=_TIFFmalloc(ra);
1821 3 : if (rb==0)
1822 : {
1823 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1824 0 : return(0);
1825 : }
1826 3 : *(uint32*)rb=ra;
1827 3 : rb[sizeof(uint32)]=255;
1828 3 : rb[sizeof(uint32)+1]=JPEG_MARKER_DHT;
1829 3 : rb[sizeof(uint32)+2]=((19+q)>>8);
1830 3 : rb[sizeof(uint32)+3]=((19+q)&255);
1831 3 : rb[sizeof(uint32)+4]=m;
1832 51 : for (n=0; n<16; n++)
1833 48 : rb[sizeof(uint32)+5+n]=o[n];
1834 3 : p=TIFFReadFile(tif,&(rb[sizeof(uint32)+21]),q);
1835 3 : if (p!=q)
1836 0 : return(0);
1837 3 : sp->dctable[m]=rb;
1838 3 : sp->sos_tda[m]=(m<<4);
1839 : }
1840 : else
1841 0 : sp->sos_tda[m]=sp->sos_tda[m-1];
1842 : }
1843 1 : return(1);
1844 : }
1845 :
1846 : static int
1847 1 : OJPEGReadHeaderInfoSecTablesAcTable(TIFF* tif)
1848 : {
1849 : static const char module[]="OJPEGReadHeaderInfoSecTablesAcTable";
1850 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
1851 : uint8 m;
1852 : uint8 n;
1853 : uint8 o[16];
1854 : uint32 p;
1855 : uint32 q;
1856 : uint32 ra;
1857 : uint8* rb;
1858 1 : if (sp->actable_offset[0]==0)
1859 : {
1860 0 : TIFFErrorExt(tif->tif_clientdata,module,"Missing JPEG tables");
1861 0 : return(0);
1862 : }
1863 1 : sp->in_buffer_file_pos_log=0;
1864 4 : for (m=0; m<sp->samples_per_pixel; m++)
1865 : {
1866 6 : if ((sp->actable_offset[m]!=0) && ((m==0) || (sp->actable_offset[m]!=sp->actable_offset[m-1])))
1867 : {
1868 4 : for (n=0; n<m-1; n++)
1869 : {
1870 1 : if (sp->actable_offset[m]==sp->actable_offset[n])
1871 : {
1872 0 : TIFFErrorExt(tif->tif_clientdata,module,"Corrupt JpegAcTables tag value");
1873 0 : return(0);
1874 : }
1875 : }
1876 3 : TIFFSeekFile(tif,sp->actable_offset[m],SEEK_SET);
1877 3 : p=TIFFReadFile(tif,o,16);
1878 3 : if (p!=16)
1879 0 : return(0);
1880 3 : q=0;
1881 51 : for (n=0; n<16; n++)
1882 48 : q+=o[n];
1883 3 : ra=sizeof(uint32)+21+q;
1884 3 : rb=_TIFFmalloc(ra);
1885 3 : if (rb==0)
1886 : {
1887 0 : TIFFErrorExt(tif->tif_clientdata,module,"Out of memory");
1888 0 : return(0);
1889 : }
1890 3 : *(uint32*)rb=ra;
1891 3 : rb[sizeof(uint32)]=255;
1892 3 : rb[sizeof(uint32)+1]=JPEG_MARKER_DHT;
1893 3 : rb[sizeof(uint32)+2]=((19+q)>>8);
1894 3 : rb[sizeof(uint32)+3]=((19+q)&255);
1895 3 : rb[sizeof(uint32)+4]=(16|m);
1896 51 : for (n=0; n<16; n++)
1897 48 : rb[sizeof(uint32)+5+n]=o[n];
1898 3 : p=TIFFReadFile(tif,&(rb[sizeof(uint32)+21]),q);
1899 3 : if (p!=q)
1900 0 : return(0);
1901 3 : sp->actable[m]=rb;
1902 3 : sp->sos_tda[m]=(sp->sos_tda[m]|m);
1903 : }
1904 : else
1905 0 : sp->sos_tda[m]=(sp->sos_tda[m]|(sp->sos_tda[m-1]&15));
1906 : }
1907 1 : return(1);
1908 : }
1909 :
1910 : static int
1911 10 : OJPEGReadBufferFill(OJPEGState* sp)
1912 : {
1913 : uint16 m;
1914 : tmsize_t n;
1915 : /* TODO: double-check: when subsamplingcorrect is set, no call to TIFFErrorExt or TIFFWarningExt should be made
1916 : * in any other case, seek or read errors should be passed through */
1917 : do
1918 : {
1919 10 : if (sp->in_buffer_file_togo!=0)
1920 : {
1921 6 : if (sp->in_buffer_file_pos_log==0)
1922 : {
1923 3 : TIFFSeekFile(sp->tif,sp->in_buffer_file_pos,SEEK_SET);
1924 3 : sp->in_buffer_file_pos_log=1;
1925 : }
1926 6 : m=OJPEG_BUFFER;
1927 6 : if ((uint64)m>sp->in_buffer_file_togo)
1928 1 : m=(uint16)sp->in_buffer_file_togo;
1929 6 : n=TIFFReadFile(sp->tif,sp->in_buffer,(tmsize_t)m);
1930 6 : if (n==0)
1931 0 : return(0);
1932 6 : assert(n>0);
1933 6 : assert(n<=OJPEG_BUFFER);
1934 6 : assert(n<65536);
1935 6 : assert((uint64)n<=sp->in_buffer_file_togo);
1936 6 : m=(uint16)n;
1937 6 : sp->in_buffer_togo=m;
1938 6 : sp->in_buffer_cur=sp->in_buffer;
1939 6 : sp->in_buffer_file_togo-=m;
1940 6 : sp->in_buffer_file_pos+=m;
1941 : break;
1942 : }
1943 4 : sp->in_buffer_file_pos_log=0;
1944 4 : switch(sp->in_buffer_source)
1945 : {
1946 : case osibsNotSetYet:
1947 2 : if (sp->jpeg_interchange_format!=0)
1948 : {
1949 0 : sp->in_buffer_file_pos=sp->jpeg_interchange_format;
1950 0 : sp->in_buffer_file_togo=sp->jpeg_interchange_format_length;
1951 : }
1952 2 : sp->in_buffer_source=osibsJpegInterchangeFormat;
1953 2 : break;
1954 : case osibsJpegInterchangeFormat:
1955 2 : sp->in_buffer_source=osibsStrile;
1956 : case osibsStrile:
1957 2 : if (sp->in_buffer_next_strile==sp->in_buffer_strile_count)
1958 0 : sp->in_buffer_source=osibsEof;
1959 : else
1960 : {
1961 2 : sp->in_buffer_file_pos=sp->tif->tif_dir.td_stripoffset[sp->in_buffer_next_strile];
1962 2 : if (sp->in_buffer_file_pos!=0)
1963 : {
1964 2 : if (sp->in_buffer_file_pos>=sp->file_size)
1965 0 : sp->in_buffer_file_pos=0;
1966 2 : else if (sp->tif->tif_dir.td_stripbytecount==NULL)
1967 0 : sp->in_buffer_file_togo=sp->file_size-sp->in_buffer_file_pos;
1968 : else
1969 : {
1970 2 : if (sp->tif->tif_dir.td_stripbytecount == 0) {
1971 0 : TIFFErrorExt(sp->tif->tif_clientdata,sp->tif->tif_name,"Strip byte counts are missing");
1972 0 : return(0);
1973 : }
1974 2 : sp->in_buffer_file_togo=sp->tif->tif_dir.td_stripbytecount[sp->in_buffer_next_strile];
1975 2 : if (sp->in_buffer_file_togo==0)
1976 0 : sp->in_buffer_file_pos=0;
1977 2 : else if (sp->in_buffer_file_pos+sp->in_buffer_file_togo>sp->file_size)
1978 0 : sp->in_buffer_file_togo=sp->file_size-sp->in_buffer_file_pos;
1979 : }
1980 : }
1981 2 : sp->in_buffer_next_strile++;
1982 : }
1983 2 : break;
1984 : default:
1985 0 : return(0);
1986 : }
1987 4 : } while (1);
1988 6 : return(1);
1989 : }
1990 :
1991 : static int
1992 0 : OJPEGReadByte(OJPEGState* sp, uint8* byte)
1993 : {
1994 0 : if (sp->in_buffer_togo==0)
1995 : {
1996 0 : if (OJPEGReadBufferFill(sp)==0)
1997 0 : return(0);
1998 0 : assert(sp->in_buffer_togo>0);
1999 : }
2000 0 : *byte=*(sp->in_buffer_cur);
2001 0 : sp->in_buffer_cur++;
2002 0 : sp->in_buffer_togo--;
2003 0 : return(1);
2004 : }
2005 :
2006 : static int
2007 2 : OJPEGReadBytePeek(OJPEGState* sp, uint8* byte)
2008 : {
2009 2 : if (sp->in_buffer_togo==0)
2010 : {
2011 2 : if (OJPEGReadBufferFill(sp)==0)
2012 0 : return(0);
2013 2 : assert(sp->in_buffer_togo>0);
2014 : }
2015 2 : *byte=*(sp->in_buffer_cur);
2016 2 : return(1);
2017 : }
2018 :
2019 : static void
2020 0 : OJPEGReadByteAdvance(OJPEGState* sp)
2021 : {
2022 0 : assert(sp->in_buffer_togo>0);
2023 0 : sp->in_buffer_cur++;
2024 0 : sp->in_buffer_togo--;
2025 0 : }
2026 :
2027 : static int
2028 0 : OJPEGReadWord(OJPEGState* sp, uint16* word)
2029 : {
2030 : uint8 m;
2031 0 : if (OJPEGReadByte(sp,&m)==0)
2032 0 : return(0);
2033 0 : *word=(m<<8);
2034 0 : if (OJPEGReadByte(sp,&m)==0)
2035 0 : return(0);
2036 0 : *word|=m;
2037 0 : return(1);
2038 : }
2039 :
2040 : static int
2041 0 : OJPEGReadBlock(OJPEGState* sp, uint16 len, void* mem)
2042 : {
2043 : uint16 mlen;
2044 : uint8* mmem;
2045 : uint16 n;
2046 0 : assert(len>0);
2047 0 : mlen=len;
2048 0 : mmem=mem;
2049 : do
2050 : {
2051 0 : if (sp->in_buffer_togo==0)
2052 : {
2053 0 : if (OJPEGReadBufferFill(sp)==0)
2054 0 : return(0);
2055 0 : assert(sp->in_buffer_togo>0);
2056 : }
2057 0 : n=mlen;
2058 0 : if (n>sp->in_buffer_togo)
2059 0 : n=sp->in_buffer_togo;
2060 0 : _TIFFmemcpy(mmem,sp->in_buffer_cur,n);
2061 0 : sp->in_buffer_cur+=n;
2062 0 : sp->in_buffer_togo-=n;
2063 0 : mlen-=n;
2064 0 : mmem+=n;
2065 0 : } while(mlen>0);
2066 0 : return(1);
2067 : }
2068 :
2069 : static void
2070 0 : OJPEGReadSkip(OJPEGState* sp, uint16 len)
2071 : {
2072 : uint16 m;
2073 : uint16 n;
2074 0 : m=len;
2075 0 : n=m;
2076 0 : if (n>sp->in_buffer_togo)
2077 0 : n=sp->in_buffer_togo;
2078 0 : sp->in_buffer_cur+=n;
2079 0 : sp->in_buffer_togo-=n;
2080 0 : m-=n;
2081 0 : if (m>0)
2082 : {
2083 0 : assert(sp->in_buffer_togo==0);
2084 0 : n=m;
2085 0 : if ((uint64)n>sp->in_buffer_file_togo)
2086 0 : n=(uint16)sp->in_buffer_file_togo;
2087 0 : sp->in_buffer_file_pos+=n;
2088 0 : sp->in_buffer_file_togo-=n;
2089 0 : sp->in_buffer_file_pos_log=0;
2090 : /* we don't skip past jpeginterchangeformat/strile block...
2091 : * if that is asked from us, we're dealing with totally bazurk
2092 : * data anyway, and we've not seen this happening on any
2093 : * testfile, so we might as well likely cause some other
2094 : * meaningless error to be passed at some later time
2095 : */
2096 : }
2097 0 : }
2098 :
2099 : static int
2100 17 : OJPEGWriteStream(TIFF* tif, void** mem, uint32* len)
2101 : {
2102 17 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2103 17 : *len=0;
2104 : do
2105 : {
2106 21 : assert(sp->out_state<=ososEoi);
2107 21 : switch(sp->out_state)
2108 : {
2109 : case ososSoi:
2110 1 : OJPEGWriteStreamSoi(tif,mem,len);
2111 1 : break;
2112 : case ososQTable0:
2113 1 : OJPEGWriteStreamQTable(tif,0,mem,len);
2114 1 : break;
2115 : case ososQTable1:
2116 1 : OJPEGWriteStreamQTable(tif,1,mem,len);
2117 1 : break;
2118 : case ososQTable2:
2119 1 : OJPEGWriteStreamQTable(tif,2,mem,len);
2120 1 : break;
2121 : case ososQTable3:
2122 1 : OJPEGWriteStreamQTable(tif,3,mem,len);
2123 1 : break;
2124 : case ososDcTable0:
2125 1 : OJPEGWriteStreamDcTable(tif,0,mem,len);
2126 1 : break;
2127 : case ososDcTable1:
2128 1 : OJPEGWriteStreamDcTable(tif,1,mem,len);
2129 1 : break;
2130 : case ososDcTable2:
2131 1 : OJPEGWriteStreamDcTable(tif,2,mem,len);
2132 1 : break;
2133 : case ososDcTable3:
2134 1 : OJPEGWriteStreamDcTable(tif,3,mem,len);
2135 1 : break;
2136 : case ososAcTable0:
2137 1 : OJPEGWriteStreamAcTable(tif,0,mem,len);
2138 1 : break;
2139 : case ososAcTable1:
2140 1 : OJPEGWriteStreamAcTable(tif,1,mem,len);
2141 1 : break;
2142 : case ososAcTable2:
2143 1 : OJPEGWriteStreamAcTable(tif,2,mem,len);
2144 1 : break;
2145 : case ososAcTable3:
2146 1 : OJPEGWriteStreamAcTable(tif,3,mem,len);
2147 1 : break;
2148 : case ososDri:
2149 1 : OJPEGWriteStreamDri(tif,mem,len);
2150 1 : break;
2151 : case ososSof:
2152 1 : OJPEGWriteStreamSof(tif,mem,len);
2153 1 : break;
2154 : case ososSos:
2155 1 : OJPEGWriteStreamSos(tif,mem,len);
2156 1 : break;
2157 : case ososCompressed:
2158 4 : if (OJPEGWriteStreamCompressed(tif,mem,len)==0)
2159 0 : return(0);
2160 4 : break;
2161 : case ososRst:
2162 0 : OJPEGWriteStreamRst(tif,mem,len);
2163 0 : break;
2164 : case ososEoi:
2165 1 : OJPEGWriteStreamEoi(tif,mem,len);
2166 : break;
2167 : }
2168 21 : } while (*len==0);
2169 17 : return(1);
2170 : }
2171 :
2172 : static void
2173 1 : OJPEGWriteStreamSoi(TIFF* tif, void** mem, uint32* len)
2174 : {
2175 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2176 : assert(OJPEG_BUFFER>=2);
2177 1 : sp->out_buffer[0]=255;
2178 1 : sp->out_buffer[1]=JPEG_MARKER_SOI;
2179 1 : *len=2;
2180 1 : *mem=(void*)sp->out_buffer;
2181 1 : sp->out_state++;
2182 1 : }
2183 :
2184 : static void
2185 4 : OJPEGWriteStreamQTable(TIFF* tif, uint8 table_index, void** mem, uint32* len)
2186 : {
2187 4 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2188 4 : if (sp->qtable[table_index]!=0)
2189 : {
2190 3 : *mem=(void*)(sp->qtable[table_index]+sizeof(uint32));
2191 3 : *len=*((uint32*)sp->qtable[table_index])-sizeof(uint32);
2192 : }
2193 4 : sp->out_state++;
2194 4 : }
2195 :
2196 : static void
2197 4 : OJPEGWriteStreamDcTable(TIFF* tif, uint8 table_index, void** mem, uint32* len)
2198 : {
2199 4 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2200 4 : if (sp->dctable[table_index]!=0)
2201 : {
2202 3 : *mem=(void*)(sp->dctable[table_index]+sizeof(uint32));
2203 3 : *len=*((uint32*)sp->dctable[table_index])-sizeof(uint32);
2204 : }
2205 4 : sp->out_state++;
2206 4 : }
2207 :
2208 : static void
2209 4 : OJPEGWriteStreamAcTable(TIFF* tif, uint8 table_index, void** mem, uint32* len)
2210 : {
2211 4 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2212 4 : if (sp->actable[table_index]!=0)
2213 : {
2214 3 : *mem=(void*)(sp->actable[table_index]+sizeof(uint32));
2215 3 : *len=*((uint32*)sp->actable[table_index])-sizeof(uint32);
2216 : }
2217 4 : sp->out_state++;
2218 4 : }
2219 :
2220 : static void
2221 1 : OJPEGWriteStreamDri(TIFF* tif, void** mem, uint32* len)
2222 : {
2223 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2224 : assert(OJPEG_BUFFER>=6);
2225 1 : if (sp->restart_interval!=0)
2226 : {
2227 0 : sp->out_buffer[0]=255;
2228 0 : sp->out_buffer[1]=JPEG_MARKER_DRI;
2229 0 : sp->out_buffer[2]=0;
2230 0 : sp->out_buffer[3]=4;
2231 0 : sp->out_buffer[4]=(sp->restart_interval>>8);
2232 0 : sp->out_buffer[5]=(sp->restart_interval&255);
2233 0 : *len=6;
2234 0 : *mem=(void*)sp->out_buffer;
2235 : }
2236 1 : sp->out_state++;
2237 1 : }
2238 :
2239 : static void
2240 1 : OJPEGWriteStreamSof(TIFF* tif, void** mem, uint32* len)
2241 : {
2242 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2243 : uint8 m;
2244 1 : assert(OJPEG_BUFFER>=2+8+sp->samples_per_pixel_per_plane*3);
2245 1 : assert(255>=8+sp->samples_per_pixel_per_plane*3);
2246 1 : sp->out_buffer[0]=255;
2247 1 : sp->out_buffer[1]=sp->sof_marker_id;
2248 : /* Lf */
2249 1 : sp->out_buffer[2]=0;
2250 1 : sp->out_buffer[3]=8+sp->samples_per_pixel_per_plane*3;
2251 : /* P */
2252 1 : sp->out_buffer[4]=8;
2253 : /* Y */
2254 1 : sp->out_buffer[5]=(sp->sof_y>>8);
2255 1 : sp->out_buffer[6]=(sp->sof_y&255);
2256 : /* X */
2257 1 : sp->out_buffer[7]=(sp->sof_x>>8);
2258 1 : sp->out_buffer[8]=(sp->sof_x&255);
2259 : /* Nf */
2260 1 : sp->out_buffer[9]=sp->samples_per_pixel_per_plane;
2261 4 : for (m=0; m<sp->samples_per_pixel_per_plane; m++)
2262 : {
2263 : /* C */
2264 3 : sp->out_buffer[10+m*3]=sp->sof_c[sp->plane_sample_offset+m];
2265 : /* H and V */
2266 3 : sp->out_buffer[10+m*3+1]=sp->sof_hv[sp->plane_sample_offset+m];
2267 : /* Tq */
2268 3 : sp->out_buffer[10+m*3+2]=sp->sof_tq[sp->plane_sample_offset+m];
2269 : }
2270 1 : *len=10+sp->samples_per_pixel_per_plane*3;
2271 1 : *mem=(void*)sp->out_buffer;
2272 1 : sp->out_state++;
2273 1 : }
2274 :
2275 : static void
2276 1 : OJPEGWriteStreamSos(TIFF* tif, void** mem, uint32* len)
2277 : {
2278 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2279 : uint8 m;
2280 1 : assert(OJPEG_BUFFER>=2+6+sp->samples_per_pixel_per_plane*2);
2281 1 : assert(255>=6+sp->samples_per_pixel_per_plane*2);
2282 1 : sp->out_buffer[0]=255;
2283 1 : sp->out_buffer[1]=JPEG_MARKER_SOS;
2284 : /* Ls */
2285 1 : sp->out_buffer[2]=0;
2286 1 : sp->out_buffer[3]=6+sp->samples_per_pixel_per_plane*2;
2287 : /* Ns */
2288 1 : sp->out_buffer[4]=sp->samples_per_pixel_per_plane;
2289 4 : for (m=0; m<sp->samples_per_pixel_per_plane; m++)
2290 : {
2291 : /* Cs */
2292 3 : sp->out_buffer[5+m*2]=sp->sos_cs[sp->plane_sample_offset+m];
2293 : /* Td and Ta */
2294 3 : sp->out_buffer[5+m*2+1]=sp->sos_tda[sp->plane_sample_offset+m];
2295 : }
2296 : /* Ss */
2297 1 : sp->out_buffer[5+sp->samples_per_pixel_per_plane*2]=0;
2298 : /* Se */
2299 1 : sp->out_buffer[5+sp->samples_per_pixel_per_plane*2+1]=63;
2300 : /* Ah and Al */
2301 1 : sp->out_buffer[5+sp->samples_per_pixel_per_plane*2+2]=0;
2302 1 : *len=8+sp->samples_per_pixel_per_plane*2;
2303 1 : *mem=(void*)sp->out_buffer;
2304 1 : sp->out_state++;
2305 1 : }
2306 :
2307 : static int
2308 4 : OJPEGWriteStreamCompressed(TIFF* tif, void** mem, uint32* len)
2309 : {
2310 4 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2311 4 : if (sp->in_buffer_togo==0)
2312 : {
2313 4 : if (OJPEGReadBufferFill(sp)==0)
2314 0 : return(0);
2315 4 : assert(sp->in_buffer_togo>0);
2316 : }
2317 4 : *len=sp->in_buffer_togo;
2318 4 : *mem=(void*)sp->in_buffer_cur;
2319 4 : sp->in_buffer_togo=0;
2320 4 : if (sp->in_buffer_file_togo==0)
2321 : {
2322 1 : switch(sp->in_buffer_source)
2323 : {
2324 : case osibsStrile:
2325 1 : if (sp->in_buffer_next_strile<sp->in_buffer_strile_count)
2326 0 : sp->out_state=ososRst;
2327 : else
2328 1 : sp->out_state=ososEoi;
2329 1 : break;
2330 : case osibsEof:
2331 0 : sp->out_state=ososEoi;
2332 : break;
2333 : default:
2334 : break;
2335 : }
2336 : }
2337 4 : return(1);
2338 : }
2339 :
2340 : static void
2341 0 : OJPEGWriteStreamRst(TIFF* tif, void** mem, uint32* len)
2342 : {
2343 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2344 : assert(OJPEG_BUFFER>=2);
2345 0 : sp->out_buffer[0]=255;
2346 0 : sp->out_buffer[1]=JPEG_MARKER_RST0+sp->restart_index;
2347 0 : sp->restart_index++;
2348 0 : if (sp->restart_index==8)
2349 0 : sp->restart_index=0;
2350 0 : *len=2;
2351 0 : *mem=(void*)sp->out_buffer;
2352 0 : sp->out_state=ososCompressed;
2353 0 : }
2354 :
2355 : static void
2356 1 : OJPEGWriteStreamEoi(TIFF* tif, void** mem, uint32* len)
2357 : {
2358 1 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2359 : assert(OJPEG_BUFFER>=2);
2360 1 : sp->out_buffer[0]=255;
2361 1 : sp->out_buffer[1]=JPEG_MARKER_EOI;
2362 1 : *len=2;
2363 1 : *mem=(void*)sp->out_buffer;
2364 1 : }
2365 :
2366 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2367 : static int
2368 1 : jpeg_create_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo)
2369 : {
2370 1 : return(SETJMP(sp->exit_jmpbuf)?0:(jpeg_create_decompress(cinfo),1));
2371 : }
2372 : #endif
2373 :
2374 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2375 : static int
2376 1 : jpeg_read_header_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, uint8 require_image)
2377 : {
2378 1 : return(SETJMP(sp->exit_jmpbuf)?0:(jpeg_read_header(cinfo,require_image),1));
2379 : }
2380 : #endif
2381 :
2382 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2383 : static int
2384 1 : jpeg_start_decompress_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo)
2385 : {
2386 1 : return(SETJMP(sp->exit_jmpbuf)?0:(jpeg_start_decompress(cinfo),1));
2387 : }
2388 : #endif
2389 :
2390 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2391 : static int
2392 0 : jpeg_read_scanlines_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* scanlines, uint32 max_lines)
2393 : {
2394 0 : return(SETJMP(sp->exit_jmpbuf)?0:(jpeg_read_scanlines(cinfo,scanlines,max_lines),1));
2395 : }
2396 : #endif
2397 :
2398 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2399 : static int
2400 14 : jpeg_read_raw_data_encap(OJPEGState* sp, jpeg_decompress_struct* cinfo, void* data, uint32 max_lines)
2401 : {
2402 14 : return(SETJMP(sp->exit_jmpbuf)?0:(jpeg_read_raw_data(cinfo,data,max_lines),1));
2403 : }
2404 : #endif
2405 :
2406 : #ifndef LIBJPEG_ENCAP_EXTERNAL
2407 : static void
2408 0 : jpeg_encap_unwind(TIFF* tif)
2409 : {
2410 0 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2411 0 : LONGJMP(sp->exit_jmpbuf,1);
2412 : }
2413 : #endif
2414 :
2415 : static void
2416 0 : OJPEGLibjpegJpegErrorMgrOutputMessage(jpeg_common_struct* cinfo)
2417 : {
2418 : char buffer[JMSG_LENGTH_MAX];
2419 0 : (*cinfo->err->format_message)(cinfo,buffer);
2420 0 : TIFFWarningExt(((TIFF*)(cinfo->client_data))->tif_clientdata,"LibJpeg","%s",buffer);
2421 0 : }
2422 :
2423 : static void
2424 0 : OJPEGLibjpegJpegErrorMgrErrorExit(jpeg_common_struct* cinfo)
2425 : {
2426 : char buffer[JMSG_LENGTH_MAX];
2427 0 : (*cinfo->err->format_message)(cinfo,buffer);
2428 0 : TIFFErrorExt(((TIFF*)(cinfo->client_data))->tif_clientdata,"LibJpeg","%s",buffer);
2429 0 : jpeg_encap_unwind((TIFF*)(cinfo->client_data));
2430 0 : }
2431 :
2432 : static void
2433 1 : OJPEGLibjpegJpegSourceMgrInitSource(jpeg_decompress_struct* cinfo)
2434 : {
2435 : (void)cinfo;
2436 1 : }
2437 :
2438 : static boolean
2439 17 : OJPEGLibjpegJpegSourceMgrFillInputBuffer(jpeg_decompress_struct* cinfo)
2440 : {
2441 17 : TIFF* tif=(TIFF*)cinfo->client_data;
2442 17 : OJPEGState* sp=(OJPEGState*)tif->tif_data;
2443 17 : void* mem=0;
2444 17 : uint32 len=0U;
2445 17 : if (OJPEGWriteStream(tif,&mem,&len)==0)
2446 : {
2447 0 : TIFFErrorExt(tif->tif_clientdata,"LibJpeg","Premature end of JPEG data");
2448 0 : jpeg_encap_unwind(tif);
2449 : }
2450 17 : sp->libjpeg_jpeg_source_mgr.bytes_in_buffer=len;
2451 17 : sp->libjpeg_jpeg_source_mgr.next_input_byte=mem;
2452 17 : return(1);
2453 : }
2454 :
2455 : static void
2456 0 : OJPEGLibjpegJpegSourceMgrSkipInputData(jpeg_decompress_struct* cinfo, long num_bytes)
2457 : {
2458 0 : TIFF* tif=(TIFF*)cinfo->client_data;
2459 : (void)num_bytes;
2460 0 : TIFFErrorExt(tif->tif_clientdata,"LibJpeg","Unexpected error");
2461 0 : jpeg_encap_unwind(tif);
2462 0 : }
2463 :
2464 : static boolean
2465 0 : OJPEGLibjpegJpegSourceMgrResyncToRestart(jpeg_decompress_struct* cinfo, int desired)
2466 : {
2467 0 : TIFF* tif=(TIFF*)cinfo->client_data;
2468 : (void)desired;
2469 0 : TIFFErrorExt(tif->tif_clientdata,"LibJpeg","Unexpected error");
2470 0 : jpeg_encap_unwind(tif);
2471 0 : return(0);
2472 : }
2473 :
2474 : static void
2475 0 : OJPEGLibjpegJpegSourceMgrTermSource(jpeg_decompress_struct* cinfo)
2476 : {
2477 : (void)cinfo;
2478 0 : }
2479 :
2480 : #endif
2481 :
2482 :
2483 : /*
2484 : * Local Variables:
2485 : * mode: c
2486 : * c-basic-offset: 8
2487 : * fill-column: 78
2488 : * End:
2489 : */
|
