summaryrefslogtreecommitdiff
path: root/tiff/tools/tiffsplit.c
diff options
context:
space:
mode:
authorJörg Frings-Fürst <debian@jff-webhosting.net>2014-09-01 13:56:46 +0200
committerJörg Frings-Fürst <debian@jff-webhosting.net>2014-09-01 13:56:46 +0200
commit22f703cab05b7cd368f4de9e03991b7664dc5022 (patch)
tree6f4d50beaa42328e24b1c6b56b6ec059e4ef21a5 /tiff/tools/tiffsplit.c
Initial import of argyll version 1.5.1-8debian/1.5.1-8
Diffstat (limited to 'tiff/tools/tiffsplit.c')
-rw-r--r--tiff/tools/tiffsplit.c297
1 files changed, 297 insertions, 0 deletions
diff --git a/tiff/tools/tiffsplit.c b/tiff/tools/tiffsplit.c
new file mode 100644
index 0000000..58288cd
--- /dev/null
+++ b/tiff/tools/tiffsplit.c
@@ -0,0 +1,297 @@
+/* $Id: tiffsplit.c,v 1.14.2.4 2010-06-08 18:50:44 bfriesen Exp $ */
+
+/*
+ * 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)
+
+#define PATH_LENGTH 8192
+
+static const char TIFF_SUFFIX[] = ".tif";
+
+static char fname[PATH_LENGTH];
+
+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) {
+ strncpy(fname, argv[2], sizeof(fname));
+ fname[sizeof(fname) - 1] = '\0';
+ }
+ in = TIFFOpen(argv[1], "r");
+ if (in != NULL) {
+ do {
+ size_t path_len;
+ char *path;
+
+ newfilename();
+
+ path_len = strlen(fname) + sizeof(TIFF_SUFFIX);
+ path = (char *) _TIFFmalloc(path_len);
+ strncpy(path, fname, path_len);
+ path[path_len - 1] = '\0';
+ strncat(path, TIFF_SUFFIX, path_len - strlen(path) - 1);
+ out = TIFFOpen(path, TIFFIsBigEndian(in)?"wb":"wl");
+ _TIFFfree(path);
+
+ 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, shortv);
+ 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: */
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 8
+ * fill-column: 78
+ * End:
+ */