Imported Upstream version 1.8.3upstream/1.8.3

1 files changed, 0 insertions, 344 deletions

diff --git a/tiff/contrib/ras/tif2ras.c b/tiff/contrib/ras/tif2ras.c
deleted file mode 100755
index e1c321d..0000000
--- a/tiff/contrib/ras/tif2ras.c
+++ /dev/null
@@ -1,344 +0,0 @@
-#ifndef lint
-static char id[] = "$Id: tif2ras.c,v 1.3 2010-06-08 18:55:15 bfriesen Exp $"; 
-#endif
-/*-
- * tif2ras.c - Converts from a Tagged Image File Format image to a Sun Raster.
- *
- * Copyright (c) 1990 by Sun Microsystems, Inc.
- *
- * Author: Patrick J. Naughton
- * naughton@wind.sun.com
- *
- * Permission to use, copy, modify, and distribute this software and its
- * documentation for any purpose and without fee is hereby granted,
- * provided that the above copyright notice appear in all copies and that
- * both that copyright notice and this permission notice appear in
- * supporting documentation.
- *
- * This file is provided AS IS with no warranties of any kind.  The author
- * shall have no liability with respect to the infringement of copyrights,
- * trade secrets or any patents by this file or any part thereof.  In no
- * event will the author be liable for any lost revenue or profits or
- * other special, indirect and consequential damages.
- *
- * Comments and additions should be sent to the author:
- *
- *                     Patrick J. Naughton
- *                     Sun Microsystems
- *                     2550 Garcia Ave, MS 14-40
- *                     Mountain View, CA 94043
- *                     (415) 336-1080
- *
- * Revision History:
- * 10-Jan-89: Created.
- * 06-Mar-90: Change to byte encoded rasterfiles.
- *	      fix bug in call to ReadScanline().
- *	      fix bug in CVT() macro.
- *	      fix assignment of td, (missing &).
- *
- * Description:
- *   This program takes a MicroSoft/Aldus "Tagged Image File Format" image or
- * "TIFF" file as input and writes a Sun Rasterfile [see rasterfile(5)].  The
- * output file may be standard output, but the input TIFF file must be a real
- * file since seek(2) is used.
- */
-
-#include <stdio.h>
-#include <pixrect/pixrect_hs.h>
-#include "tiffio.h"
-
-typedef int boolean;
-#define True (1)
-#define False (0)
-#define	CVT(x)		(((x) * 255) / ((1L<<16)-1))
-
-boolean     Verbose = False;
-char       *pname;		/* program name (used for error messages) */
-
-void
-error(s1, s2)
-    char       *s1,
-               *s2;
-{
-    fprintf(stderr, s1, pname, s2);
-    exit(1);
-}
-
-void
-usage()
-{
-    error("usage: %s -[vq] TIFFfile [rasterfile]\n", NULL);
-}
-
-
-main(argc, argv)
-    int         argc;
-    char       *argv[];
-{
-    char       *inf = NULL;
-    char       *outf = NULL;
-    FILE       *fp;
-    long        width,
-                height;
-    int         depth,
-                numcolors;
-    register TIFF *tif;
-    TIFFDirectory *td;
-    register u_char *inp,
-               *outp;
-    register int col,
-                i;
-    register long row;
-    u_char     *Map = NULL;
-    u_char     *buf;
-    short	bitspersample;
-    short	samplesperpixel;
-    short	photometric;
-    u_short    *redcolormap,
-	       *bluecolormap,
-	       *greencolormap;
-
-    Pixrect    *pix;		/* The Sun Pixrect */
-    colormap_t  Colormap;	/* The Pixrect Colormap */
-    u_char      red[256],
-                green[256],
-                blue[256];
-
-    setbuf(stderr, NULL);
-    pname = argv[0];
-
-    while (--argc) {
-	if ((++argv)[0][0] == '-')
-	    switch (argv[0][1]) {
-	    case 'v':
-		Verbose = True;
-		break;
-	    case 'q':
-		usage();
-		break;
-	    default:
-		fprintf(stderr, "%s: illegal option -%c.\n", pname,
-			argv[0][1]);
-		exit(1);
-	    }
-	else if (inf == NULL)
-	    inf = argv[0];
-	else if (outf == NULL)
-	    outf = argv[0];
-	else
-	    usage();
-
-    }
-
-    if (inf == NULL)
-	error("%s: can't read input file from a stream.\n", NULL);
-
-    if (Verbose)
-	fprintf(stderr, "Reading %s...", inf);
-
-    tif = TIFFOpen(inf, "r");
-
-    if (tif == NULL)
-	error("%s: error opening TIFF file %s", inf);
-
-    if (Verbose)
-	TIFFPrintDirectory(tif, stderr, True, False, False);
-    TIFFGetField(tif, TIFFTAG_BITSPERSAMPLE, &bitspersample);
-    if (bitspersample > 8)
-	error("%s: can't handle more than 8-bits per sample\n", NULL);
-
-    TIFFGetField(tif, TIFFTAG_SAMPLESPERPIXEL, &samplesperpixel);
-    switch (samplesperpixel) {
-    case 1:
-	if (bitspersample == 1)
-	    depth = 1;
-	else
-	    depth = 8;
-	break;
-    case 3:
-    case 4:
-	depth = 24;
-	break;
-    default:
-	error("%s: only handle 1-channel gray scale or 3-channel color\n");
-    }
-
-    TIFFGetField(tif, TIFFTAG_IMAGEWIDTH, &width);
-    TIFFGetField(tif, TIFFTAG_IMAGELENGTH, &height);
-
-    if (Verbose)
-	fprintf(stderr, "%dx%dx%d image, ", width, height, depth);
-    if (Verbose)
-	fprintf(stderr, "%d bits/sample, %d samples/pixel, ",
-		bitspersample, samplesperpixel);
-
-    pix = mem_create(width, height, depth);
-    if (pix == (Pixrect *) NULL)
-	error("%s: can't allocate memory for output pixrect...\n", NULL);
-
-    numcolors = (1 << bitspersample);
-
-    TIFFGetField(tif, TIFFTAG_PHOTOMETRIC, &photometric);
-    if (numcolors == 2) {
-	if (Verbose)
-	    fprintf(stderr, "monochrome ");
-	Colormap.type = RMT_NONE;
-	Colormap.length = 0;
-	Colormap.map[0] = Colormap.map[1] = Colormap.map[2] = NULL;
-    } else {
-	switch (photometric) {
-	case PHOTOMETRIC_MINISBLACK:
-	    if (Verbose)
-		fprintf(stderr, "%d graylevels (min=black), ", numcolors);
-	    Map = (u_char *) malloc(numcolors * sizeof(u_char));
-	    for (i = 0; i < numcolors; i++)
-		Map[i] = (255 * i) / numcolors;
-	    Colormap.type = RMT_EQUAL_RGB;
-	    Colormap.length = numcolors;
-	    Colormap.map[0] = Colormap.map[1] = Colormap.map[2] = Map;
-	    break;
-	case PHOTOMETRIC_MINISWHITE:
-	    if (Verbose)
-		fprintf(stderr, "%d graylevels (min=white), ", numcolors);
-	    Map = (u_char *) malloc(numcolors * sizeof(u_char));
-	    for (i = 0; i < numcolors; i++)
-		Map[i] = 255 - ((255 * i) / numcolors);
-	    Colormap.type = RMT_EQUAL_RGB;
-	    Colormap.length = numcolors;
-	    Colormap.map[0] = Colormap.map[1] = Colormap.map[2] = Map;
-	    break;
-	case PHOTOMETRIC_RGB:
-	    if (Verbose)
-		fprintf(stderr, "truecolor ");
-	    Colormap.type = RMT_NONE;
-	    Colormap.length = 0;
-	    Colormap.map[0] = Colormap.map[1] = Colormap.map[2] = NULL;
-	    break;
-	case PHOTOMETRIC_PALETTE:
-	    if (Verbose)
-		fprintf(stderr, "colormapped ");
-	    Colormap.type = RMT_EQUAL_RGB;
-	    Colormap.length = numcolors;
-	    memset(red, 0, sizeof(red));
-	    memset(green, 0, sizeof(green));
-	    memset(blue, 0, sizeof(blue));
-	    TIFFGetField(tif, TIFFTAG_COLORMAP,
-		&redcolormap, &greencolormap, &bluecolormap);
-	    for (i = 0; i < numcolors; i++) {
-		red[i] = (u_char) CVT(redcolormap[i]);
-		green[i] = (u_char) CVT(greencolormap[i]);
-		blue[i] = (u_char) CVT(bluecolormap[i]);
-	    }
-	    Colormap.map[0] = red;
-	    Colormap.map[1] = green;
-	    Colormap.map[2] = blue;
-	    break;
-	case PHOTOMETRIC_MASK:
-	    error("%s: Don't know how to handle PHOTOMETRIC_MASK\n");
-	    break;
-	case PHOTOMETRIC_DEPTH:
-	    error("%s: Don't know how to handle PHOTOMETRIC_DEPTH\n");
-	    break;
-	default:
-	    error("%s: unknown photometric (cmap): %d\n", photometric);
-	}
-    }
-
-    buf = (u_char *) malloc(TIFFScanlineSize(tif));
-    if (buf == NULL)
-	error("%s: can't allocate memory for scanline buffer...\n", NULL);
-
-    for (row = 0; row < height; row++) {
-	if (TIFFReadScanline(tif, buf, row, 0) < 0)
-	    error("%s: bad data read on line: %d\n", row);
-	inp = buf;
-	outp = (u_char *) mprd_addr(mpr_d(pix), 0, row);
-	switch (photometric) {
-	case PHOTOMETRIC_RGB:
-	    if (samplesperpixel == 4)
-		for (col = 0; col < width; col++) {
-		    *outp++ = *inp++;	/* Blue */
-		    *outp++ = *inp++;	/* Green */
-		    *outp++ = *inp++;	/* Red */
-		    inp++;	/* skip alpha channel */
-		}
-	    else
-		for (col = 0; col < width; col++) {
-		    *outp++ = *inp++;	/* Blue */
-		    *outp++ = *inp++;	/* Green */
-		    *outp++ = *inp++;	/* Red */
-		}
-	    break;
-	case PHOTOMETRIC_MINISWHITE:
-	case PHOTOMETRIC_MINISBLACK:
-	    switch (bitspersample) {
-	    case 1:
-		for (col = 0; col < ((width + 7) / 8); col++)
-		    *outp++ = *inp++;
-		break;
-	    case 2:
-		for (col = 0; col < ((width + 3) / 4); col++) {
-		    *outp++ = (*inp >> 6) & 3;
-		    *outp++ = (*inp >> 4) & 3;
-		    *outp++ = (*inp >> 2) & 3;
-		    *outp++ = *inp++ & 3;
-		}
-		break;
-	    case 4:
-		for (col = 0; col < width / 2; col++) {
-		    *outp++ = *inp >> 4;
-		    *outp++ = *inp++ & 0xf;
-		}
-		break;
-	    case 8:
-		for (col = 0; col < width; col++)
-		    *outp++ = *inp++;
-		break;
-	    default:
-		error("%s: bad bits/sample: %d\n", bitspersample);
-	    }
-	    break;
-	case PHOTOMETRIC_PALETTE:
-	    memcpy(outp, inp, width);
-	    break;
-	default:
-	    error("%s: unknown photometric (write): %d\n", photometric);
-	}
-    }
-
-    free((char *) buf);
-
-    if (Verbose)
-	fprintf(stderr, "done.\n");
-
-    if (outf == NULL || strcmp(outf, "Standard Output") == 0) {
-	outf = "Standard Output";
-	fp = stdout;
-    } else {
-	if (!(fp = fopen(outf, "w")))
-	    error("%s: %s couldn't be opened for writing.\n", outf);
-    }
-
-    if (Verbose)
-	fprintf(stderr, "Writing rasterfile in %s...", outf);
-
-    if (pr_dump(pix, fp, &Colormap, RT_BYTE_ENCODED, 0) == PIX_ERR)
-	error("%s: error writing Sun Rasterfile: %s\n", outf);
-
-    if (Verbose)
-	fprintf(stderr, "done.\n");
-
-    pr_destroy(pix);
-
-    if (fp != stdout)
-	fclose(fp);
-
-    exit(0);
-}
-/*
- * Local Variables:
- * mode: c
- * c-basic-offset: 8
- * fill-column: 78
- * End:
- */