diff options
Diffstat (limited to 'tiff/contrib/ras/tif2ras.c')
| -rwxr-xr-x | tiff/contrib/ras/tif2ras.c | 344 |
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: - */ |