From da4a717ddcd6ba5b5b0819aabbe49fcd5f77ae4d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Sat, 2 May 2015 10:09:28 +0200 Subject: remove unused sources --- tiff/contrib/ras/ras2tif.c | 254 --------------------------------------------- 1 file changed, 254 deletions(-) delete mode 100644 tiff/contrib/ras/ras2tif.c (limited to 'tiff/contrib/ras/ras2tif.c') diff --git a/tiff/contrib/ras/ras2tif.c b/tiff/contrib/ras/ras2tif.c deleted file mode 100644 index c44b313..0000000 --- a/tiff/contrib/ras/ras2tif.c +++ /dev/null @@ -1,254 +0,0 @@ -#ifndef lint -static char sccsid[] = "@(#)ras2tif.c 1.2 90/03/06"; -#endif -/*- - * ras2tif.c - Converts from a Sun Rasterfile to a Tagged Image File. - * - * 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: - * 11-Jan-89: Created. - * 06-Mar-90: fix bug in SCALE() macro. - * got rid of xres and yres, (they weren't working anyways). - * fixed bpsl calculation. - * 25-Nov-99: y2k fix (year as 1900 + tm_year) - * - * Description: - * This program takes a Sun Rasterfile [see rasterfile(5)] as input and - * writes a MicroSoft/Aldus "Tagged Image File Format" image or "TIFF" file. - * The input file may be standard input, but the output TIFF file must be a - * real file since seek(2) is used. - */ - -#include -#include -#include -#include "tiffio.h" - -typedef int boolean; -#define True (1) -#define False (0) -#define SCALE(x) (((x)*((1L<<16)-1))/255) - -boolean Verbose = False; -boolean dummyinput = 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] [-|rasterfile] TIFFfile\n", NULL); -} - - -main(argc, argv) - int argc; - char *argv[]; -{ - char *inf = NULL; - char *outf = NULL; - FILE *fp; - int depth, - i; - long row; - TIFF *tif; - Pixrect *pix; /* The Sun Pixrect */ - colormap_t Colormap; /* The Pixrect Colormap */ - u_short red[256], - green[256], - blue[256]; - struct tm *ct; - struct timeval tv; - long width, - height; - long rowsperstrip; - int year; - short photometric; - short samplesperpixel; - short bitspersample; - int bpsl; - static char *version = "ras2tif 1.0"; - static char *datetime = "1990:01:01 12:00:00"; - - gettimeofday(&tv, (struct timezone *) NULL); - ct = localtime(&tv.tv_sec); - year=1900 + ct->tm_year; - sprintf(datetime, "%04d:%02d:%02d %02d:%02d:%02d", - year, ct->tm_mon + 1, ct->tm_mday, - ct->tm_hour, ct->tm_min, ct->tm_sec); - - 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; - case '\0': - if (inf == NULL) - dummyinput = True; - else - usage(); - break; - default: - fprintf(stderr, "%s: illegal option -%c.\n", pname, - argv[0][1]); - exit(1); - } - } else if (inf == NULL && !dummyinput) { - inf = argv[0]; - } else if (outf == NULL) - outf = argv[0]; - else - usage(); - } - - if (outf == NULL) - error("%s: can't write output file to a stream.\n", NULL); - - if (dummyinput || inf == NULL) { - inf = "Standard Input"; - fp = stdin; - } else if ((fp = fopen(inf, "r")) == NULL) - error("%s: %s couldn't be opened.\n", inf); - - if (Verbose) - fprintf(stderr, "Reading rasterfile from %s...", inf); - - pix = pr_load(fp, &Colormap); - if (pix == NULL) - error("%s: %s is not a raster file.\n", inf); - - if (Verbose) - fprintf(stderr, "done.\n"); - - if (Verbose) - fprintf(stderr, "Writing %s...", outf); - - tif = TIFFOpen(outf, "w"); - - if (tif == NULL) - error("%s: error opening TIFF file %s", outf); - - width = pix->pr_width; - height = pix->pr_height; - depth = pix->pr_depth; - - switch (depth) { - case 1: - samplesperpixel = 1; - bitspersample = 1; - photometric = PHOTOMETRIC_MINISBLACK; - break; - case 8: - samplesperpixel = 1; - bitspersample = 8; - photometric = PHOTOMETRIC_PALETTE; - break; - case 24: - samplesperpixel = 3; - bitspersample = 8; - photometric = PHOTOMETRIC_RGB; - break; - case 32: - samplesperpixel = 4; - bitspersample = 8; - photometric = PHOTOMETRIC_RGB; - break; - default: - error("%s: bogus depth: %d\n", depth); - } - - bpsl = ((depth * width + 15) >> 3) & ~1; - rowsperstrip = (8 * 1024) / bpsl; - - TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, width); - TIFFSetField(tif, TIFFTAG_IMAGELENGTH, height); - TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, bitspersample); - TIFFSetField(tif, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT); - TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_LZW); - TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, photometric); - TIFFSetField(tif, TIFFTAG_DOCUMENTNAME, inf); - TIFFSetField(tif, TIFFTAG_IMAGEDESCRIPTION, "converted Sun rasterfile"); - TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, samplesperpixel); - TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, rowsperstrip); - TIFFSetField(tif, TIFFTAG_STRIPBYTECOUNTS, height / rowsperstrip); - TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG); - TIFFSetField(tif, TIFFTAG_SOFTWARE, version); - TIFFSetField(tif, TIFFTAG_DATETIME, datetime); - - memset(red, 0, sizeof(red)); - memset(green, 0, sizeof(green)); - memset(blue, 0, sizeof(blue)); - if (depth == 8) { - TIFFSetField(tif, TIFFTAG_COLORMAP, red, green, blue); - for (i = 0; i < Colormap.length; i++) { - red[i] = SCALE(Colormap.map[0][i]); - green[i] = SCALE(Colormap.map[1][i]); - blue[i] = SCALE(Colormap.map[2][i]); - } - } - if (Verbose) - fprintf(stderr, "%dx%dx%d image, ", width, height, depth); - - for (row = 0; row < height; row++) - if (TIFFWriteScanline(tif, - (u_char *) mprd_addr(mpr_d(pix), 0, row), - row, 0) < 0) { - fprintf("failed a scanline write (%d)\n", row); - break; - } - TIFFFlushData(tif); - TIFFClose(tif); - - if (Verbose) - fprintf(stderr, "done.\n"); - - pr_destroy(pix); - - exit(0); -} -/* - * Local Variables: - * mode: c - * c-basic-offset: 8 - * fill-column: 78 - * End: - */ -- cgit v1.2.3