Imported Upstream version 1.8.3upstream/1.8.3

1 files changed, 0 insertions, 548 deletions

diff --git a/tiff/tools/gif2tiff.c b/tiff/tools/gif2tiff.c
deleted file mode 100755
index 91439f7..0000000
--- a/tiff/tools/gif2tiff.c
+++ /dev/null
@@ -1,548 +0,0 @@
-/* $Id: gif2tiff.c,v 1.16 2014-11-20 16:47:21 erouault Exp $ */
-
-/*
- * Copyright (c) 1990-1997 Sam Leffler
- * Copyright (c) 1991-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.
- */
-
-/*
- *	convert a GIF file into a TIFF file.
- *	based on Paul Haeberli's fromgif program which in turn is
- *	based on a GIF file reader by Marcel J.E. Mol March 23 1989 
- *
- *	if input is 320 by 200 pixel aspect is probably 1.2
- *	if input is 640 350 pixel aspect is probably 1.37
- *
- */
-#include "tif_config.h"
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <math.h>
-
-#ifdef HAVE_UNISTD_H
-# include <unistd.h>
-#endif
-
-#ifdef NEED_LIBPORT
-# include "libport.h"
-#endif
-
-#include "tiffio.h"
-
-#define	GIFGAMMA	(1.5)		/* smaller makes output img brighter */
-#define	IMAX		0xffff		/* max intensity value */
-#define EXTRAFUDGE	128		/* some people write BAD .gif files */
-
-#define	streq(a,b)	(strcmp(a,b) == 0)
-#define	strneq(a,b,n)	(strncmp(a,b,n) == 0)
-
-unsigned short gamtab[256];
-
-void
-makegamtab(float gam)
-{
-    int i;
-
-    for(i=0; i<256; i++) 
-	gamtab[i] = (unsigned short) (IMAX*pow(i/255.0,gam)+0.5);
-}
-
-char* stuff[] = {
-"usage: gif2tiff [options] input.gif output.tif",
-"where options are:",
-" -r #		make each strip have no more than # rows",
-"",
-" -c lzw[:opts]	compress output with Lempel-Ziv & Welch encoding",
-" -c zip[:opts]	compress output with deflate encoding",
-" -c packbits	compress output with packbits encoding",
-" -c none	use no compression algorithm on output",
-"",
-"LZW and deflate options:",
-" #		set predictor value",
-"For example, -c lzw:2 to get LZW-encoded data with horizontal differencing",
-NULL
-};
-
-static void
-usage(void)
-{
-	char buf[BUFSIZ];
-	int i;
-
-	setbuf(stderr, buf);
-        fprintf(stderr, "%s\n\n", TIFFGetVersion());
-	for (i = 0; stuff[i] != NULL; i++)
-		fprintf(stderr, "%s\n", stuff[i]);
-	exit(-1);
-}
-
-#define COLSIZE 256
-
-unsigned char *stackp;
-unsigned int prefix[4096];
-unsigned char suffix[4096];
-unsigned char stack[4096];
-int datasize,codesize,codemask;     /* Decoder working variables */
-int clear,eoi;                      /* Special code values */
-int avail, oldcode;
-
-FILE *infile;
-int global;                        /* Is there a global color map? */
-int globalbits;                     /* Number of bits of global colors */
-unsigned char globalmap[COLSIZE][3];/* RGB values for global color map */
-unsigned char *raster;              /* Decoded image data */
-unsigned long width, height;
-unsigned short red[COLSIZE];
-unsigned short green[COLSIZE];
-unsigned short blue[COLSIZE];
-char *filename, *imagename;
-
-static	uint16 compression = COMPRESSION_PACKBITS;
-static	uint16 predictor = 0;
-static	uint32 rowsperstrip = (uint32) -1;
-static	int processCompressOptions(char*);
-
-int	convert(void);
-int	checksignature(void);
-void	readscreen(void);
-int	readgifimage(char*);
-void	readextension(void);
-int	readraster(void);
-int	process(int, unsigned char**);
-void	initcolors(unsigned char [COLSIZE][3], int);
-void	rasterize(int, char*);
-
-int
-main(int argc, char* argv[])
-{
-    extern int optind;
-    extern char *optarg;
-    int c, status;
-
-    while ((c = getopt(argc, argv, "c:r:")) != -1)
-	    switch (c) {
-	    case 'c':		/* compression scheme */
-		    if (!processCompressOptions(optarg))
-			    usage();
-		    break;
-	    case 'r':		/* rows/strip */
-		    rowsperstrip = atoi(optarg);
-		    break;
-	    case '?':
-		    usage();
-		    /*NOTREACHED*/
-	    }
-    if (argc - optind != 2)
-	    usage();
-
-    makegamtab(GIFGAMMA);
-    filename = argv[optind];
-    imagename = argv[optind+1];
-    if ((infile = fopen(imagename, "rb")) != NULL) {
-	int c;
-	fclose(infile);
-	printf("overwrite %s? ", imagename); fflush(stdout);
-	c = getc(stdin);
-	if (c != 'y' && c != 'Y')
-	    return (1);
-    }
-    if ((infile = fopen(filename, "rb")) == NULL) {
-	perror(filename);
-	return (1);
-    }
-    status = convert();
-    fclose(infile);
-    return (status);
-}
-
-static int
-processCompressOptions(char* opt)
-{
-	if (streq(opt, "none"))
-		compression = COMPRESSION_NONE;
-	else if (streq(opt, "packbits"))
-		compression = COMPRESSION_PACKBITS;
-	else if (strneq(opt, "lzw", 3)) {
-		char* cp = strchr(opt, ':');
-		if (cp)
-			predictor = atoi(cp+1);
-		compression = COMPRESSION_LZW;
-	} else if (strneq(opt, "zip", 3)) {
-		char* cp = strchr(opt, ':');
-		if (cp)
-			predictor = atoi(cp+1);
-		compression = COMPRESSION_DEFLATE;
-	} else
-		return (0);
-	return (1);
-}
-
-int
-convert(void)
-{
-    int ch;
-    char* mode = "w";
-
-    if (!checksignature())
-        return (-1);
-    readscreen();
-    while ((ch = getc(infile)) != ';' && ch != EOF) {
-        switch (ch) {
-            case '\0':  break;  /* this kludge for non-standard files */
-            case ',':   if (!readgifimage(mode))
-                           return (-1);
-			mode = "a";		/* subsequent images append */
-                        break;
-            case '!':   readextension();
-                        break;
-            default:    fprintf(stderr, "illegal GIF block type\n");
-                        return (-1);
-        }
-    }
-    return (0);
-}
-
-int
-checksignature(void)
-{
-    char buf[6];
-
-    fread(buf,1,6,infile);
-    if (strncmp(buf,"GIF",3)) {
-        fprintf(stderr, "file is not a GIF file\n");
-        return 0;
-    }
-    if (strncmp(&buf[3],"87a",3)) {
-        fprintf(stderr, "unknown GIF version number\n");
-        return 0;
-    }
-    return 1;
-}
-
-/*
- * 	readscreen - 
- *		Get information which is global to all the images stored 
- *	in the file
- */
-void
-readscreen(void)
-{
-    unsigned char buf[7];
-
-    fread(buf,1,7,infile);
-    global = buf[4] & 0x80;
-    if (global) {
-        globalbits = (buf[4] & 0x07) + 1;
-        fread(globalmap,3,((size_t)1)<<globalbits,infile);
-    }
-}
-
-int
-readgifimage(char* mode)
-{
-    unsigned char buf[9];
-    int local, interleaved;
-    unsigned char localmap[256][3];
-    int localbits;
-    int status;
-
-    if (fread(buf, 1, 9, infile) == 0) {
-        perror(filename);
-	return (0);
-    }
-    width = buf[4] + (buf[5] << 8);
-    height = buf[6] + (buf[7] << 8);
-    local = buf[8] & 0x80;
-    interleaved = buf[8] & 0x40;
-    if (width == 0 || height == 0 || width > 2000000000 / height) {
-        fprintf(stderr, "Invalid value of width or height\n");
-        return(0);
-    }
-    if (local == 0 && global == 0) {
-        fprintf(stderr, "no colormap present for image\n");
-        return (0);
-    }
-
-    if ((raster = (unsigned char*) _TIFFmalloc(width*height+EXTRAFUDGE)) == NULL) {
-        fprintf(stderr, "not enough memory for image\n");
-        return (0);
-    }
-    if (local) {
-        localbits = (buf[8] & 0x7) + 1;
-
-        fprintf(stderr, "   local colors: %d\n", 1<<localbits);
-
-        fread(localmap, 3, ((size_t)1)<<localbits, infile);
-        initcolors(localmap, 1<<localbits);
-    } else if (global) {
-        initcolors(globalmap, 1<<globalbits);
-    }
-    if ((status = readraster()))
-	rasterize(interleaved, mode);
-    _TIFFfree(raster);
-    return status;
-}
-
-/*
- * 	readextension -
- *		Read a GIF extension block (and do nothing with it).
- *
- */
-void
-readextension(void)
-{
-    int count;
-    char buf[255];
-
-    (void) getc(infile);
-    while ((count = getc(infile)) && count <= 255)
-        fread(buf, 1, count, infile);
-}
-
-/*
- * 	readraster -
- *		Decode a raster image
- *
- */
-int
-readraster(void)
-{
-    unsigned char *fill = raster;
-    unsigned char buf[255];
-    register int bits=0;
-    register unsigned long datum=0;
-    register unsigned char *ch;
-    register int count, code;
-    int status = 1;
-
-    datasize = getc(infile);
-    if (datasize > 12)
-	return 0;
-    clear = 1 << datasize;
-    eoi = clear + 1;
-    avail = clear + 2;
-    oldcode = -1;
-    codesize = datasize + 1;
-    codemask = (1 << codesize) - 1;
-    for (code = 0; code < clear; code++) {
-	prefix[code] = 0;
-	suffix[code] = code;
-    }
-    stackp = stack;
-    for (count = getc(infile); count > 0 && count <= 255; count = getc(infile)) {
-	fread(buf,1,count,infile);
-	for (ch=buf; count-- > 0; ch++) {
-	    datum += (unsigned long) *ch << bits;
-	    bits += 8;
-	    while (bits >= codesize) {
-		code = datum & codemask;
-		datum >>= codesize;
-		bits -= codesize;
-		if (code == eoi) {               /* This kludge put in */
-		    goto exitloop;               /* because some GIF files*/
-		}                                /* aren't standard */
-		if (!process(code, &fill)) {
-		    status = 0;
-		    goto exitloop;
-		}
-	    }
-	}
-	if (fill >= raster + width*height) {
-	    fprintf(stderr, "raster full before eoi code\n");
-	    break;
-	}
-    }
-exitloop:
-    if (fill != raster + width*height)  {
-	fprintf(stderr, "warning: wrong rastersize: %ld bytes\n",
-						      (long) (fill-raster));
-	fprintf(stderr, "         instead of %ld bytes\n",
-						      (long) width*height);
-    }
-    return status;
-}
-
-/*
- * 	process - 
- *		Process a compression code.  "clear" resets the code table.  
- *	Otherwise make a new code table entry, and output the bytes 
- *	associated with the code.
- */
-int
-process(register int code, unsigned char** fill)
-{
-    int incode;
-    static unsigned char firstchar;
-
-    if (code == clear) {
-	codesize = datasize + 1;
-	codemask = (1 << codesize) - 1;
-	avail = clear + 2;
-	oldcode = -1;
-	return 1;
-    }
-
-    if (oldcode == -1) {
-        if (code >= clear) {
-            fprintf(stderr, "bad input: code=%d is larger than clear=%d\n",code, clear);
-            return 0;
-        }
-        if (*fill >= raster + width*height) {
-            fprintf(stderr, "raster full before eoi code\n");
-            return 0;
-        }
-	*(*fill)++ = suffix[code];
-	firstchar = oldcode = code;
-	return 1;
-    }
-    if (code > avail) {
-	fprintf(stderr, "code %d too large for %d\n", code, avail);
-	return 0; 
-    }
-
-    incode = code;
-    if (code == avail) {      /* the first code is always < avail */
-	*stackp++ = firstchar;
-	code = oldcode;
-    }
-    while (code > clear) {
-	*stackp++ = suffix[code];
-	code = prefix[code];
-    }
-
-    *stackp++ = firstchar = suffix[code];
-    prefix[avail] = oldcode;
-    suffix[avail] = firstchar;
-    avail++;
-
-    if (((avail & codemask) == 0) && (avail < 4096)) {
-	codesize++;
-	codemask += avail;
-    }
-    oldcode = incode;
-    do {
-        if (*fill >= raster + width*height) {
-            fprintf(stderr, "raster full before eoi code\n");
-            return 0;
-        }
-	*(*fill)++ = *--stackp;
-    } while (stackp > stack);
-    return 1;
-}
-
-/*
- * 	initcolors -
- *		Convert a color map (local or global) to arrays with R, G and B
- * 	values. 
- *
- */
-void
-initcolors(unsigned char colormap[COLSIZE][3], int ncolors)
-{
-    register int i;
-
-    for (i = 0; i < ncolors; i++) {
-        red[i]   = gamtab[colormap[i][0]];
-        green[i] = gamtab[colormap[i][1]];
-        blue[i]  = gamtab[colormap[i][2]];
-    }
-}
-
-void
-rasterize(int interleaved, char* mode)
-{
-    register unsigned long row;
-    unsigned char *newras;
-    unsigned char *ras;
-    TIFF *tif;
-    tstrip_t strip;
-    tsize_t stripsize;
-
-    if ((newras = (unsigned char*) _TIFFmalloc(width*height+EXTRAFUDGE)) == NULL) {
-        fprintf(stderr, "not enough memory for image\n");
-        return;
-    }
-#define DRAWSEGMENT(offset, step) {			\
-        for (row = offset; row < height; row += step) {	\
-            _TIFFmemcpy(newras + row*width, ras, width);\
-            ras += width;                            	\
-        }						\
-    }
-    ras = raster;
-    if (interleaved) {
-        DRAWSEGMENT(0, 8);
-        DRAWSEGMENT(4, 8);
-        DRAWSEGMENT(2, 4);
-        DRAWSEGMENT(1, 2);
-    } else 
-        DRAWSEGMENT(0, 1);
-#undef DRAWSEGMENT
-
-    tif = TIFFOpen(imagename, mode);
-    if (!tif) {
-	TIFFError(imagename,"Can not open output image");
-	exit(-1);
-    }
-    TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, (uint32) width);
-    TIFFSetField(tif, TIFFTAG_IMAGELENGTH, (uint32) height);
-    TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_PALETTE);
-    TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
-    TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 1);
-    TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8);
-    TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 
-	rowsperstrip = TIFFDefaultStripSize(tif, rowsperstrip));
-    TIFFSetField(tif, TIFFTAG_COMPRESSION, compression);
-    switch (compression) {
-    case COMPRESSION_LZW:
-    case COMPRESSION_DEFLATE:
-	    if (predictor != 0)
-		    TIFFSetField(tif, TIFFTAG_PREDICTOR, predictor);
-	    break;
-    }
-    TIFFSetField(tif, TIFFTAG_COLORMAP, red, green, blue);
-    TIFFSetField(tif, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);
-    strip = 0;
-    stripsize = TIFFStripSize(tif);
-    for (row=0; row<height; row += rowsperstrip) {
-	if (rowsperstrip > height-row) {
-	    rowsperstrip = height-row;
-	    stripsize = TIFFVStripSize(tif, rowsperstrip);
-	}
-	if (TIFFWriteEncodedStrip(tif, strip, newras+row*width, stripsize) < 0)
-	    break;
-	strip++;
-    }
-    TIFFClose(tif);
-
-    _TIFFfree(newras);
-}
-
-/* vim: set ts=8 sts=8 sw=8 noet: */
-/*
- * Local Variables:
- * mode: c
- * c-basic-offset: 8
- * fill-column: 78
- * End:
- */