1 /* $Id: tif_compress.c,v 1.25 2016-10-25 20:04:22 erouault Exp $ */
2 
3 /*
4  * Copyright (c) 1988-1997 Sam Leffler
5  * Copyright (c) 1991-1997 Silicon Graphics, Inc.
6  *
7  * Permission to use, copy, modify, distribute, and sell this software and
8  * its documentation for any purpose is hereby granted without fee, provided
9  * that (i) the above copyright notices and this permission notice appear in
10  * all copies of the software and related documentation, and (ii) the names of
11  * Sam Leffler and Silicon Graphics may not be used in any advertising or
12  * publicity relating to the software without the specific, prior written
13  * permission of Sam Leffler and Silicon Graphics.
14  *
15  * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
16  * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
17  * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
18  *
19  * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
20  * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
21  * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
22  * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
23  * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
24  * OF THIS SOFTWARE.
25  */
26 
27 /*
28  * TIFF Library
29  *
30  * Compression Scheme Configuration Support.
31  */
32 #include "tiffiop.h"
33 
34 static int
TIFFNoEncode(TIFF * tif,const char * method)35 TIFFNoEncode(TIFF* tif, const char* method)
36 {
37 	const TIFFCodec* c = TIFFFindCODEC(tif->tif_dir.td_compression);
38 
39 	if (c) {
40 		TIFFErrorExt(tif->tif_clientdata, tif->tif_name,
41 			     "%s %s encoding is not implemented",
42 			     c->name, method);
43 	} else {
44 		TIFFErrorExt(tif->tif_clientdata, tif->tif_name,
45 			"Compression scheme %u %s encoding is not implemented",
46 			     tif->tif_dir.td_compression, method);
47 	}
48 	return (-1);
49 }
50 
51 int
_TIFFNoRowEncode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)52 _TIFFNoRowEncode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
53 {
54 	(void) pp; (void) cc; (void) s;
55 	return (TIFFNoEncode(tif, "scanline"));
56 }
57 
58 int
_TIFFNoStripEncode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)59 _TIFFNoStripEncode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
60 {
61 	(void) pp; (void) cc; (void) s;
62 	return (TIFFNoEncode(tif, "strip"));
63 }
64 
65 int
_TIFFNoTileEncode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)66 _TIFFNoTileEncode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
67 {
68 	(void) pp; (void) cc; (void) s;
69 	return (TIFFNoEncode(tif, "tile"));
70 }
71 
72 static int
TIFFNoDecode(TIFF * tif,const char * method)73 TIFFNoDecode(TIFF* tif, const char* method)
74 {
75 	const TIFFCodec* c = TIFFFindCODEC(tif->tif_dir.td_compression);
76 
77 	if (c)
78 		TIFFErrorExt(tif->tif_clientdata, tif->tif_name,
79 			     "%s %s decoding is not implemented",
80 			     c->name, method);
81 	else
82 		TIFFErrorExt(tif->tif_clientdata, tif->tif_name,
83 			     "Compression scheme %u %s decoding is not implemented",
84 			     tif->tif_dir.td_compression, method);
85 	return (0);
86 }
87 
88 static int
_TIFFNoFixupTags(TIFF * tif)89 _TIFFNoFixupTags(TIFF* tif)
90 {
91 	(void) tif;
92 	return (1);
93 }
94 
95 int
_TIFFNoRowDecode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)96 _TIFFNoRowDecode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
97 {
98 	(void) pp; (void) cc; (void) s;
99 	return (TIFFNoDecode(tif, "scanline"));
100 }
101 
102 int
_TIFFNoStripDecode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)103 _TIFFNoStripDecode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
104 {
105 	(void) pp; (void) cc; (void) s;
106 	return (TIFFNoDecode(tif, "strip"));
107 }
108 
109 int
_TIFFNoTileDecode(TIFF * tif,uint8 * pp,tmsize_t cc,uint16 s)110 _TIFFNoTileDecode(TIFF* tif, uint8* pp, tmsize_t cc, uint16 s)
111 {
112 	(void) pp; (void) cc; (void) s;
113 	return (TIFFNoDecode(tif, "tile"));
114 }
115 
116 int
_TIFFNoSeek(TIFF * tif,uint32 off)117 _TIFFNoSeek(TIFF* tif, uint32 off)
118 {
119 	(void) off;
120 	TIFFErrorExt(tif->tif_clientdata, tif->tif_name,
121 		     "Compression algorithm does not support random access");
122 	return (0);
123 }
124 
125 int
_TIFFNoPreCode(TIFF * tif,uint16 s)126 _TIFFNoPreCode(TIFF* tif, uint16 s)
127 {
128 	(void) tif; (void) s;
129 	return (1);
130 }
131 
_TIFFtrue(TIFF * tif)132 static int _TIFFtrue(TIFF* tif) { (void) tif; return (1); }
_TIFFvoid(TIFF * tif)133 static void _TIFFvoid(TIFF* tif) { (void) tif; }
134 
135 void
_TIFFSetDefaultCompressionState(TIFF * tif)136 _TIFFSetDefaultCompressionState(TIFF* tif)
137 {
138 	tif->tif_fixuptags = _TIFFNoFixupTags;
139 	tif->tif_decodestatus = TRUE;
140 	tif->tif_setupdecode = _TIFFtrue;
141 	tif->tif_predecode = _TIFFNoPreCode;
142 	tif->tif_decoderow = _TIFFNoRowDecode;
143 	tif->tif_decodestrip = _TIFFNoStripDecode;
144 	tif->tif_decodetile = _TIFFNoTileDecode;
145 	tif->tif_encodestatus = TRUE;
146 	tif->tif_setupencode = _TIFFtrue;
147 	tif->tif_preencode = _TIFFNoPreCode;
148 	tif->tif_postencode = _TIFFtrue;
149 	tif->tif_encoderow = _TIFFNoRowEncode;
150 	tif->tif_encodestrip = _TIFFNoStripEncode;
151 	tif->tif_encodetile = _TIFFNoTileEncode;
152 	tif->tif_close = _TIFFvoid;
153 	tif->tif_seek = _TIFFNoSeek;
154 	tif->tif_cleanup = _TIFFvoid;
155 	tif->tif_defstripsize = _TIFFDefaultStripSize;
156 	tif->tif_deftilesize = _TIFFDefaultTileSize;
157 	tif->tif_flags &= ~(TIFF_NOBITREV|TIFF_NOREADRAW);
158 }
159 
160 int
TIFFSetCompressionScheme(TIFF * tif,int scheme)161 TIFFSetCompressionScheme(TIFF* tif, int scheme)
162 {
163 	const TIFFCodec *c = TIFFFindCODEC((uint16) scheme);
164 
165 	_TIFFSetDefaultCompressionState(tif);
166 	/*
167 	 * Don't treat an unknown compression scheme as an error.
168 	 * This permits applications to open files with data that
169 	 * the library does not have builtin support for, but which
170 	 * may still be meaningful.
171 	 */
172 	return (c ? (*c->init)(tif, scheme) : 1);
173 }
174 
175 /*
176  * Other compression schemes may be registered.  Registered
177  * schemes can also override the builtin versions provided
178  * by this library.
179  */
180 typedef struct _codec {
181 	struct _codec* next;
182 	TIFFCodec* info;
183 } codec_t;
184 static codec_t* registeredCODECS = NULL;
185 
186 const TIFFCodec*
TIFFFindCODEC(uint16 scheme)187 TIFFFindCODEC(uint16 scheme)
188 {
189 	const TIFFCodec* c;
190 	codec_t* cd;
191 
192 	for (cd = registeredCODECS; cd; cd = cd->next)
193 		if (cd->info->scheme == scheme)
194 			return ((const TIFFCodec*) cd->info);
195 	for (c = _TIFFBuiltinCODECS; c->name; c++)
196 		if (c->scheme == scheme)
197 			return (c);
198 	return ((const TIFFCodec*) 0);
199 }
200 
201 TIFFCodec*
TIFFRegisterCODEC(uint16 scheme,const char * name,TIFFInitMethod init)202 TIFFRegisterCODEC(uint16 scheme, const char* name, TIFFInitMethod init)
203 {
204 	codec_t* cd = (codec_t*)
205 	    _TIFFmalloc((tmsize_t)(sizeof (codec_t) + sizeof (TIFFCodec) + strlen(name)+1));
206 
207 	if (cd != NULL) {
208 		cd->info = (TIFFCodec*) ((uint8*) cd + sizeof (codec_t));
209 		cd->info->name = (char*)
210 		    ((uint8*) cd->info + sizeof (TIFFCodec));
211 		strcpy(cd->info->name, name);
212 		cd->info->scheme = scheme;
213 		cd->info->init = init;
214 		cd->next = registeredCODECS;
215 		registeredCODECS = cd;
216 	} else {
217 		TIFFErrorExt(0, "TIFFRegisterCODEC",
218 		    "No space to register compression scheme %s", name);
219 		return NULL;
220 	}
221 	return (cd->info);
222 }
223 
224 void
TIFFUnRegisterCODEC(TIFFCodec * c)225 TIFFUnRegisterCODEC(TIFFCodec* c)
226 {
227 	codec_t* cd;
228 	codec_t** pcd;
229 
230 	for (pcd = &registeredCODECS; (cd = *pcd) != NULL; pcd = &cd->next)
231 		if (cd->info == c) {
232 			*pcd = cd->next;
233 			_TIFFfree(cd);
234 			return;
235 		}
236 	TIFFErrorExt(0, "TIFFUnRegisterCODEC",
237 	    "Cannot remove compression scheme %s; not registered", c->name);
238 }
239 
240 /************************************************************************/
241 /*                       TIFFGetConfisuredCODECs()                      */
242 /************************************************************************/
243 
244 /**
245  * Get list of configured codecs, both built-in and registered by user.
246  * Caller is responsible to free this structure.
247  *
248  * @return returns array of TIFFCodec records (the last record should be NULL)
249  * or NULL if function failed.
250  */
251 
252 TIFFCodec*
TIFFGetConfiguredCODECs()253 TIFFGetConfiguredCODECs()
254 {
255 	int i = 1;
256 	codec_t *cd;
257 	const TIFFCodec* c;
258 	TIFFCodec* codecs = NULL;
259 	TIFFCodec* new_codecs;
260 
261 	for (cd = registeredCODECS; cd; cd = cd->next) {
262 		new_codecs = (TIFFCodec *)
263 			_TIFFrealloc(codecs, i * sizeof(TIFFCodec));
264 		if (!new_codecs) {
265 			_TIFFfree (codecs);
266 			return NULL;
267 		}
268 		codecs = new_codecs;
269 		_TIFFmemcpy(codecs + i - 1, cd, sizeof(TIFFCodec));
270 		i++;
271 	}
272 	for (c = _TIFFBuiltinCODECS; c->name; c++) {
273 		if (TIFFIsCODECConfigured(c->scheme)) {
274 			new_codecs = (TIFFCodec *)
275 				_TIFFrealloc(codecs, i * sizeof(TIFFCodec));
276 			if (!new_codecs) {
277 				_TIFFfree (codecs);
278 				return NULL;
279 			}
280 			codecs = new_codecs;
281 			_TIFFmemcpy(codecs + i - 1, (const void*)c, sizeof(TIFFCodec));
282 			i++;
283 		}
284 	}
285 
286 	new_codecs = (TIFFCodec *) _TIFFrealloc(codecs, i * sizeof(TIFFCodec));
287 	if (!new_codecs) {
288 		_TIFFfree (codecs);
289 		return NULL;
290 	}
291 	codecs = new_codecs;
292 	_TIFFmemset(codecs + i - 1, 0, sizeof(TIFFCodec));
293 
294 	return codecs;
295 }
296 
297 /* vim: set ts=8 sts=8 sw=8 noet: */
298 /*
299  * Local Variables:
300  * mode: c
301  * c-basic-offset: 8
302  * fill-column: 78
303  * End:
304  */
305