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