[wxWidgets.git] / src / tiff / tools / tiffsplit.c

/* $Id$ */

/*
 * Copyright (c) 1992-1997 Sam Leffler
 * Copyright (c) 1992-1997 Silicon Graphics, Inc.
 *
 * Permission to use, copy, modify, distribute, and sell this software and 
 * its documentation for any purpose is hereby granted without fee, provided
 * that (i) the above copyright notices and this permission notice appear in
 * all copies of the software and related documentation, and (ii) the names of
 * Sam Leffler and Silicon Graphics may not be used in any advertising or
 * publicity relating to the software without the specific, prior written
 * permission of Sam Leffler and Silicon Graphics.
 * 
 * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
 * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
 * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
 * 
 * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
 * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
 * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
 * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
 * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
 * OF THIS SOFTWARE.
 */

#include "tif_config.h"

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "tiffio.h"

#ifndef HAVE_GETOPT
extern int getopt(int, char**, char*);
#endif

#define	CopyField(tag, v) \
    if (TIFFGetField(in, tag, &v)) TIFFSetField(out, tag, v)
#define	CopyField2(tag, v1, v2) \
    if (TIFFGetField(in, tag, &v1, &v2)) TIFFSetField(out, tag, v1, v2)
#define	CopyField3(tag, v1, v2, v3) \
    if (TIFFGetField(in, tag, &v1, &v2, &v3)) TIFFSetField(out, tag, v1, v2, v3)

static	char fname[1024+1];

static	int tiffcp(TIFF*, TIFF*);
static	void newfilename(void);
static	int cpStrips(TIFF*, TIFF*);
static	int cpTiles(TIFF*, TIFF*);

int
main(int argc, char* argv[])
{
	TIFF *in, *out;

	if (argc < 2) {
                fprintf(stderr, "%s\n\n", TIFFGetVersion());
		fprintf(stderr, "usage: tiffsplit input.tif [prefix]\n");
		return (-3);
	}
	if (argc > 2)
		strcpy(fname, argv[2]);
	in = TIFFOpen(argv[1], "r");
	if (in != NULL) {
		do {
			char path[1024+1];
			newfilename();
			strcpy(path, fname);
			strcat(path, ".tif");
			out = TIFFOpen(path, TIFFIsBigEndian(in)?"wb":"wl");
			if (out == NULL)
				return (-2);
			if (!tiffcp(in, out))
				return (-1);
			TIFFClose(out);
		} while (TIFFReadDirectory(in));
		(void) TIFFClose(in);
	}
	return (0);
}

static void
newfilename(void)
{
	static int first = 1;
	static long lastTurn;
	static long fnum;
	static short defname;
	static char *fpnt;

	if (first) {
		if (fname[0]) {
			fpnt = fname + strlen(fname);
			defname = 0;
		} else {
			fname[0] = 'x';
			fpnt = fname + 1;
			defname = 1;
		}
		first = 0;
	}
#define	MAXFILES	17576
	if (fnum == MAXFILES) {
		if (!defname || fname[0] == 'z') {
			fprintf(stderr, "tiffsplit: too many files.\n");
			exit(1);
		}
		fname[0]++;
		fnum = 0;
	}
	if (fnum % 676 == 0) {
		if (fnum != 0) {
			/*
                         * advance to next letter every 676 pages
			 * condition for 'z'++ will be covered above
                         */
			fpnt[0]++;
		} else {
			/*
                         * set to 'a' if we are on the very first file
                         */
			fpnt[0] = 'a';
		}
		/*
                 * set the value of the last turning point
                 */
		lastTurn = fnum;
	}
	/* 
         * start from 0 every 676 times (provided by lastTurn)
         * this keeps us within a-z boundaries
         */
	fpnt[1] = (char)((fnum - lastTurn) / 26) + 'a';
	/* 
         * cycle last letter every file, from a-z, then repeat
         */
	fpnt[2] = (char)(fnum % 26) + 'a';
	fnum++;
}

static int
tiffcp(TIFF* in, TIFF* out)
{
	uint16 bitspersample, samplesperpixel, compression, shortv, *shortav;
	uint32 w, l;
	float floatv;
	char *stringv;
	uint32 longv;

	CopyField(TIFFTAG_SUBFILETYPE, longv);
	CopyField(TIFFTAG_TILEWIDTH, w);
	CopyField(TIFFTAG_TILELENGTH, l);
	CopyField(TIFFTAG_IMAGEWIDTH, w);
	CopyField(TIFFTAG_IMAGELENGTH, l);
	CopyField(TIFFTAG_BITSPERSAMPLE, bitspersample);
	CopyField(TIFFTAG_SAMPLESPERPIXEL, samplesperpixel);
	CopyField(TIFFTAG_COMPRESSION, compression);
	if (compression == COMPRESSION_JPEG) {
		uint16 count = 0;
		void *table = NULL;
		if (TIFFGetField(in, TIFFTAG_JPEGTABLES, &count, &table)
		    && count > 0 && table) {
		    TIFFSetField(out, TIFFTAG_JPEGTABLES, count, table);
		}
	}
        CopyField(TIFFTAG_PHOTOMETRIC, shortv);
	CopyField(TIFFTAG_PREDICTOR, shortv);
	CopyField(TIFFTAG_THRESHHOLDING, shortv);
	CopyField(TIFFTAG_FILLORDER, shortv);
	CopyField(TIFFTAG_ORIENTATION, shortv);
	CopyField(TIFFTAG_MINSAMPLEVALUE, shortv);
	CopyField(TIFFTAG_MAXSAMPLEVALUE, shortv);
	CopyField(TIFFTAG_XRESOLUTION, floatv);
	CopyField(TIFFTAG_YRESOLUTION, floatv);
	CopyField(TIFFTAG_GROUP3OPTIONS, longv);
	CopyField(TIFFTAG_GROUP4OPTIONS, longv);
	CopyField(TIFFTAG_RESOLUTIONUNIT, shortv);
	CopyField(TIFFTAG_PLANARCONFIG, shortv);
	CopyField(TIFFTAG_ROWSPERSTRIP, longv);
	CopyField(TIFFTAG_XPOSITION, floatv);
	CopyField(TIFFTAG_YPOSITION, floatv);
	CopyField(TIFFTAG_IMAGEDEPTH, longv);
	CopyField(TIFFTAG_TILEDEPTH, longv);
	CopyField(TIFFTAG_SAMPLEFORMAT, longv);
	CopyField2(TIFFTAG_EXTRASAMPLES, shortv, shortav);
	{ uint16 *red, *green, *blue;
	  CopyField3(TIFFTAG_COLORMAP, red, green, blue);
	}
	{ uint16 shortv2;
	  CopyField2(TIFFTAG_PAGENUMBER, shortv, shortv2);
	}
	CopyField(TIFFTAG_ARTIST, stringv);
	CopyField(TIFFTAG_IMAGEDESCRIPTION, stringv);
	CopyField(TIFFTAG_MAKE, stringv);
	CopyField(TIFFTAG_MODEL, stringv);
	CopyField(TIFFTAG_SOFTWARE, stringv);
	CopyField(TIFFTAG_DATETIME, stringv);
	CopyField(TIFFTAG_HOSTCOMPUTER, stringv);
	CopyField(TIFFTAG_PAGENAME, stringv);
	CopyField(TIFFTAG_DOCUMENTNAME, stringv);
	CopyField(TIFFTAG_BADFAXLINES, longv);
	CopyField(TIFFTAG_CLEANFAXDATA, longv);
	CopyField(TIFFTAG_CONSECUTIVEBADFAXLINES, longv);
	CopyField(TIFFTAG_FAXRECVPARAMS, longv);
	CopyField(TIFFTAG_FAXRECVTIME, longv);
	CopyField(TIFFTAG_FAXSUBADDRESS, stringv);
	CopyField(TIFFTAG_FAXDCS, stringv);
	if (TIFFIsTiled(in))
		return (cpTiles(in, out));
	else
		return (cpStrips(in, out));
}

static int
cpStrips(TIFF* in, TIFF* out)
{
	tsize_t bufsize  = TIFFStripSize(in);
	unsigned char *buf = (unsigned char *)_TIFFmalloc(bufsize);

	if (buf) {
		tstrip_t s, ns = TIFFNumberOfStrips(in);
		uint32 *bytecounts;

		TIFFGetField(in, TIFFTAG_STRIPBYTECOUNTS, &bytecounts);
		for (s = 0; s < ns; s++) {
			if (bytecounts[s] > (uint32)bufsize) {
				buf = (unsigned char *)_TIFFrealloc(buf, bytecounts[s]);
				if (!buf)
					return (0);
				bufsize = bytecounts[s];
			}
			if (TIFFReadRawStrip(in, s, buf, bytecounts[s]) < 0 ||
			    TIFFWriteRawStrip(out, s, buf, bytecounts[s]) < 0) {
				_TIFFfree(buf);
				return (0);
			}
		}
		_TIFFfree(buf);
		return (1);
	}
	return (0);
}

static int
cpTiles(TIFF* in, TIFF* out)
{
	tsize_t bufsize = TIFFTileSize(in);
	unsigned char *buf = (unsigned char *)_TIFFmalloc(bufsize);

	if (buf) {
		ttile_t t, nt = TIFFNumberOfTiles(in);
		uint32 *bytecounts;

		TIFFGetField(in, TIFFTAG_TILEBYTECOUNTS, &bytecounts);
		for (t = 0; t < nt; t++) {
			if (bytecounts[t] > (uint32) bufsize) {
				buf = (unsigned char *)_TIFFrealloc(buf, bytecounts[t]);
				if (!buf)
					return (0);
				bufsize = bytecounts[t];
			}
			if (TIFFReadRawTile(in, t, buf, bytecounts[t]) < 0 ||
			    TIFFWriteRawTile(out, t, buf, bytecounts[t]) < 0) {
				_TIFFfree(buf);
				return (0);
			}
		}
		_TIFFfree(buf);
		return (1);
	}
	return (0);
}

/* vim: set ts=8 sts=8 sw=8 noet: */
Commit	Line	Data
8414a40c VZ	1	/* $Id$ */
	2
	3	/*
	4	* Copyright (c) 1992-1997 Sam Leffler
	5	* Copyright (c) 1992-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	#include "tif_config.h"
	28
	29	#include <stdio.h>
	30	#include <stdlib.h>
	31	#include <string.h>
	32
	33	#include "tiffio.h"
	34
	35	#ifndef HAVE_GETOPT
	36	extern int getopt(int, char*, char);
	37	#endif
	38
	39	#define CopyField(tag, v) \
	40	if (TIFFGetField(in, tag, &v)) TIFFSetField(out, tag, v)
	41	#define CopyField2(tag, v1, v2) \
	42	if (TIFFGetField(in, tag, &v1, &v2)) TIFFSetField(out, tag, v1, v2)
	43	#define CopyField3(tag, v1, v2, v3) \
	44	if (TIFFGetField(in, tag, &v1, &v2, &v3)) TIFFSetField(out, tag, v1, v2, v3)
	45
	46	static char fname[1024+1];
	47
	48	static int tiffcp(TIFF, TIFF);
	49	static void newfilename(void);
	50	static int cpStrips(TIFF, TIFF);
	51	static int cpTiles(TIFF, TIFF);
	52
	53	int
	54	main(int argc, char* argv[])
	55	{
	56	TIFF in, out;
	57
	58	if (argc < 2) {
	59	fprintf(stderr, "%s\n\n", TIFFGetVersion());
	60	fprintf(stderr, "usage: tiffsplit input.tif [prefix]\n");
	61	return (-3);
	62	}
	63	if (argc > 2)
	64	strcpy(fname, argv[2]);
65	in = TIFFOpen(argv[1], "r");
66	if (in != NULL) {
67	do {
68	char path[1024+1];
69	newfilename();
70	strcpy(path, fname);
71	strcat(path, ".tif");
72	out = TIFFOpen(path, TIFFIsBigEndian(in)?"wb":"wl");
73	if (out == NULL)
74	return (-2);
75	if (!tiffcp(in, out))
76	return (-1);
77	TIFFClose(out);
78	} while (TIFFReadDirectory(in));
79	(void) TIFFClose(in);
80	}
81	return (0);
82	}
83
84	static void
85	newfilename(void)
86	{
87	static int first = 1;
88	static long lastTurn;
89	static long fnum;
90	static short defname;
91	static char *fpnt;
92
93	if (first) {
94	if (fname[0]) {
95	fpnt = fname + strlen(fname);
96	defname = 0;
97	} else {
98	fname[0] = 'x';
99	fpnt = fname + 1;
100	defname = 1;
101	}
102	first = 0;
103	}
104	#define MAXFILES 17576
105	if (fnum == MAXFILES) {
106	if (!defname \|\| fname[0] == 'z') {
107	fprintf(stderr, "tiffsplit: too many files.\n");
108	exit(1);
109	}
110	fname[0]++;
111	fnum = 0;
112	}
113	if (fnum % 676 == 0) {
114	if (fnum != 0) {
115	/*
116	* advance to next letter every 676 pages
117	* condition for 'z'++ will be covered above
118	*/
119	fpnt[0]++;
120	} else {
121	/*
122	* set to 'a' if we are on the very first file
123	*/
124	fpnt[0] = 'a';
125	}
126	/*
127	* set the value of the last turning point
128	*/
129	lastTurn = fnum;
130	}
131	/*
132	* start from 0 every 676 times (provided by lastTurn)
133	* this keeps us within a-z boundaries
134	*/
135	fpnt[1] = (char)((fnum - lastTurn) / 26) + 'a';
136	/*
137	* cycle last letter every file, from a-z, then repeat
138	*/
139	fpnt[2] = (char)(fnum % 26) + 'a';
140	fnum++;
141	}
142
143	static int
144	tiffcp(TIFF* in, TIFF* out)
145	{
146	uint16 bitspersample, samplesperpixel, compression, shortv, *shortav;
147	uint32 w, l;
148	float floatv;
149	char *stringv;
150	uint32 longv;
151
152	CopyField(TIFFTAG_SUBFILETYPE, longv);
153	CopyField(TIFFTAG_TILEWIDTH, w);
154	CopyField(TIFFTAG_TILELENGTH, l);
155	CopyField(TIFFTAG_IMAGEWIDTH, w);
156	CopyField(TIFFTAG_IMAGELENGTH, l);
157	CopyField(TIFFTAG_BITSPERSAMPLE, bitspersample);
158	CopyField(TIFFTAG_SAMPLESPERPIXEL, samplesperpixel);
159	CopyField(TIFFTAG_COMPRESSION, compression);
160	if (compression == COMPRESSION_JPEG) {
161	uint16 count = 0;
162	void *table = NULL;
163	if (TIFFGetField(in, TIFFTAG_JPEGTABLES, &count, &table)
164	&& count > 0 && table) {
165	TIFFSetField(out, TIFFTAG_JPEGTABLES, count, table);
166	}
167	}
168	CopyField(TIFFTAG_PHOTOMETRIC, shortv);
169	CopyField(TIFFTAG_PREDICTOR, shortv);
170	CopyField(TIFFTAG_THRESHHOLDING, shortv);
171	CopyField(TIFFTAG_FILLORDER, shortv);
172	CopyField(TIFFTAG_ORIENTATION, shortv);
173	CopyField(TIFFTAG_MINSAMPLEVALUE, shortv);
174	CopyField(TIFFTAG_MAXSAMPLEVALUE, shortv);
175	CopyField(TIFFTAG_XRESOLUTION, floatv);
176	CopyField(TIFFTAG_YRESOLUTION, floatv);
177	CopyField(TIFFTAG_GROUP3OPTIONS, longv);
178	CopyField(TIFFTAG_GROUP4OPTIONS, longv);
179	CopyField(TIFFTAG_RESOLUTIONUNIT, shortv);
180	CopyField(TIFFTAG_PLANARCONFIG, shortv);
181	CopyField(TIFFTAG_ROWSPERSTRIP, longv);
182	CopyField(TIFFTAG_XPOSITION, floatv);
183	CopyField(TIFFTAG_YPOSITION, floatv);
184	CopyField(TIFFTAG_IMAGEDEPTH, longv);
185	CopyField(TIFFTAG_TILEDEPTH, longv);
186	CopyField(TIFFTAG_SAMPLEFORMAT, longv);
187	CopyField2(TIFFTAG_EXTRASAMPLES, shortv, shortav);
188	{ uint16 red, green, *blue;
189	CopyField3(TIFFTAG_COLORMAP, red, green, blue);
190	}
191	{ uint16 shortv2;
192	CopyField2(TIFFTAG_PAGENUMBER, shortv, shortv2);
193	}
194	CopyField(TIFFTAG_ARTIST, stringv);
195	CopyField(TIFFTAG_IMAGEDESCRIPTION, stringv);
196	CopyField(TIFFTAG_MAKE, stringv);
197	CopyField(TIFFTAG_MODEL, stringv);
198	CopyField(TIFFTAG_SOFTWARE, stringv);
199	CopyField(TIFFTAG_DATETIME, stringv);
200	CopyField(TIFFTAG_HOSTCOMPUTER, stringv);
201	CopyField(TIFFTAG_PAGENAME, stringv);
202	CopyField(TIFFTAG_DOCUMENTNAME, stringv);
203	CopyField(TIFFTAG_BADFAXLINES, longv);
204	CopyField(TIFFTAG_CLEANFAXDATA, longv);
205	CopyField(TIFFTAG_CONSECUTIVEBADFAXLINES, longv);
206	CopyField(TIFFTAG_FAXRECVPARAMS, longv);
207	CopyField(TIFFTAG_FAXRECVTIME, longv);
208	CopyField(TIFFTAG_FAXSUBADDRESS, stringv);
209	CopyField(TIFFTAG_FAXDCS, stringv);
210	if (TIFFIsTiled(in))
211	return (cpTiles(in, out));
212	else
213	return (cpStrips(in, out));
214	}
215
216	static int
217	cpStrips(TIFF* in, TIFF* out)
218	{
219	tsize_t bufsize = TIFFStripSize(in);
220	unsigned char buf = (unsigned char )_TIFFmalloc(bufsize);
221
222	if (buf) {
223	tstrip_t s, ns = TIFFNumberOfStrips(in);
224	uint32 *bytecounts;
225
226	TIFFGetField(in, TIFFTAG_STRIPBYTECOUNTS, &bytecounts);
227	for (s = 0; s < ns; s++) {
228	if (bytecounts[s] > (uint32)bufsize) {
229	buf = (unsigned char *)_TIFFrealloc(buf, bytecounts[s]);
230	if (!buf)
231	return (0);
232	bufsize = bytecounts[s];
233	}
234	if (TIFFReadRawStrip(in, s, buf, bytecounts[s]) < 0 \|\|
235	TIFFWriteRawStrip(out, s, buf, bytecounts[s]) < 0) {
236	_TIFFfree(buf);
237	return (0);
238	}
239	}
240	_TIFFfree(buf);
241	return (1);
242	}
243	return (0);
244	}
245
246	static int
247	cpTiles(TIFF* in, TIFF* out)
248	{
249	tsize_t bufsize = TIFFTileSize(in);
250	unsigned char buf = (unsigned char )_TIFFmalloc(bufsize);
251
252	if (buf) {
253	ttile_t t, nt = TIFFNumberOfTiles(in);
254	uint32 *bytecounts;
255
256	TIFFGetField(in, TIFFTAG_TILEBYTECOUNTS, &bytecounts);
257	for (t = 0; t < nt; t++) {
258	if (bytecounts[t] > (uint32) bufsize) {
259	buf = (unsigned char *)_TIFFrealloc(buf, bytecounts[t]);
260	if (!buf)
261	return (0);
262	bufsize = bytecounts[t];
263	}
264	if (TIFFReadRawTile(in, t, buf, bytecounts[t]) < 0 \|\|
265	TIFFWriteRawTile(out, t, buf, bytecounts[t]) < 0) {
266	_TIFFfree(buf);
267	return (0);
268	}
269	}
270	_TIFFfree(buf);
271	return (1);
272	}
273	return (0);
274	}
275
276	/* vim: set ts=8 sts=8 sw=8 noet: */