[wxWidgets.git] / src / tiff / tools / sgisv.c


/*
 * 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.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <gl.h>
#include <ctype.h>

#include "tiffio.h"

typedef unsigned char unsigned char;
typedef unsigned long uint32;

#define	streq(a,b)	(strcmp(a,b) == 0)
#define	strneq(a,b,n)	(strncmp(a,b,n) == 0)

uint32	rowsperstrip = (uint32) -1;
uint16	compression = COMPRESSION_PACKBITS;
uint16	config = PLANARCONFIG_CONTIG;
uint16	predictor = 0;
int	xmaxscreen;
int	ymaxscreen;
uint16	photometric = PHOTOMETRIC_RGB;
int	jpegcolormode = JPEGCOLORMODE_RGB;
int	quality = 75;		/* JPEG quality */

static	void usage(void);
static	void tiffsv(char*, int, int, int, int);

int
main(int argc, char* argv[])
{
	int c;
	extern int optind;
	extern char* optarg;

	while ((c = getopt(argc, argv, "c:p:r:")) != -1)
		switch (c) {
		case 'b':		/* save as b&w */
			photometric = PHOTOMETRIC_MINISBLACK;
			break;
		case 'c':		/* compression scheme */
			if (streq(optarg, "none"))
				compression = COMPRESSION_NONE;
			else if (streq(optarg, "packbits"))
				compression = COMPRESSION_PACKBITS;
			else if (strneq(optarg, "jpeg", 4)) {
				char* cp = strchr(optarg, ':');
				if (cp && isdigit(cp[1]))
					quality = atoi(cp+1);
				if (cp && strchr(cp, 'r'))
					jpegcolormode = JPEGCOLORMODE_RAW;
				compression = COMPRESSION_JPEG;
			} else if (strneq(optarg, "lzw", 3)) {
				char* cp = strchr(optarg, ':');
				if (cp)
					predictor = atoi(cp+1);
				compression = COMPRESSION_LZW;
			} else
				usage();
			break;
		case 'p':		/* planar configuration */
			if (streq(optarg, "separate"))
				config = PLANARCONFIG_SEPARATE;
			else if (streq(optarg, "contig"))
				config = PLANARCONFIG_CONTIG;
			else
				usage();
			break;
		case 'r':		/* rows/strip */
			rowsperstrip = atoi(optarg);
			break;
		case '?':
			usage();
			/*NOTREACHED*/
		}
	if (argc - optind != 1 && argc - optind != 5)
		usage();
	xmaxscreen = getgdesc(GD_XPMAX)-1;
	ymaxscreen = getgdesc(GD_YPMAX)-1;
	foreground();
	noport();
	winopen("tiffsv");
	if (argc - optind == 5)
		tiffsv(argv[optind],
		    atoi(argv[optind+1]), atoi(argv[optind+2]),
		    atoi(argv[optind+3]), atoi(argv[optind+4]));
	else
		tiffsv(argv[optind], 0, xmaxscreen, 0, ymaxscreen);
	return (0);
}

char* stuff[] = {
"usage: tiffsv [options] outimage.tif [x1 x2 y1 y2] [-b]",
"where options are:",
" -p contig	pack samples contiguously (e.g. RGBRGB...)",
" -p separate	store samples separately (e.g. RRR...GGG...BBB...)",
"",
" -r #		make each strip have no more than # rows",
"",
" -c lzw[:opts]	compress output with Lempel-Ziv & Welch encoding",
" -c jpeg[:opts]compress output with JPEG encoding",
" -c packbits	compress output with packbits encoding",
" -c none	use no compression algorithm on output",
"",
"JPEG options:",
" #		set compression quality level (0-100, default 75)",
" r		output color image as RGB rather than YCbCr",
"",
"LZW options:",
" #		set predictor value for Lempel-Ziv & Welch encoding",
"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);
	for (i = 0; stuff[i] != NULL; i++)
		fprintf(stderr, "%s\n", stuff[i]);
	exit(-1);
}

static void
svRGBSeparate(TIFF* tif, uint32* ss, int xsize, int ysize)
{
	tsize_t stripsize = TIFFStripSize(tif);
	unsigned char *rbuf = (unsigned char *)_TIFFmalloc(3*stripsize);
	unsigned char *gbuf = rbuf + stripsize;
	unsigned char *bbuf = gbuf + stripsize;
	register int y;

	for (y = 0; y <= ysize; y += rowsperstrip) {
		unsigned char *rp, *gp, *bp;
		register int x;
		register uint32 n;

		n = rowsperstrip;
		if (n > ysize-y+1)
			n = ysize-y+1;
		rp = rbuf; gp = gbuf; bp = bbuf;
		do {
			for (x = 0; x <= xsize; x++) {
				uint32 v = ss[x];
				rp[x] = v;
				gp[x] = v >> 8;
				bp[x] = v >> 16;
			}
			rp += xsize+1, gp += xsize+1, bp += xsize+1;
			ss += xsize+1;
		} while (--n);
		if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,0),
		    rbuf, stripsize) < 0)
			break;
		if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,1),
		    gbuf, stripsize) < 0)
			break;
		if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,2),
		    bbuf, stripsize) < 0)
			break;
	}
	_TIFFfree(rbuf);
}

static void
svRGBContig(TIFF* tif, uint32* ss, int xsize, int ysize)
{
	register int x, y;
	tsize_t stripsize = TIFFStripSize(tif);
	unsigned char *strip = (unsigned char *)_TIFFmalloc(stripsize);

	for (y = 0; y <= ysize; y += rowsperstrip) {
		register unsigned char *pp = strip;
		register uint32 n;

		n = rowsperstrip;
		if (n > ysize-y+1)
			n = ysize-y+1;
		do {
			for (x = 0; x <= xsize; x++) {
				uint32 v = ss[x];
				pp[0] = v;
				pp[1] = v >> 8;
				pp[2] = v >> 16;
				pp += 3;
			}
			ss += xsize+1;
		} while (--n);
		if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,0),
		    strip, stripsize) < 0)
			break;
	}
	_TIFFfree(strip);
}

#undef RED
#undef GREEN
#undef BLUE
#define	CVT(x)	(((x)*255)/100)
#define	RED	CVT(28)		/* 28% */
#define	GREEN	CVT(59)		/* 59% */
#define	BLUE	CVT(11)		/* 11% */

static void
svGrey(TIFF* tif, uint32* ss, int xsize, int ysize)
{
	register int x, y;
	unsigned char *buf = (unsigned char *)_TIFFmalloc(TIFFScanlineSize(tif));

	for (y = 0; y <= ysize; y++) {
		for (x = 0; x <= xsize; x++) {
			unsigned char *cp = (unsigned char *)&ss[x];
			buf[x] = (RED*cp[3] + GREEN*cp[2] + BLUE*cp[1]) >> 8;
		}
		if (TIFFWriteScanline(tif, buf, (uint32) y, 0) < 0)
			break;
		ss += xsize+1;
	}
	_TIFFfree(buf);
}

#define	MIN(a,b)	((a)<(b)?(a):(b))
#define	ABS(x)		((x)<0?-(x):(x))

static void
tiffsv(char* name, int x1, int x2, int y1, int y2)
{
	TIFF *tif;
	int xsize, ysize;
	int xorg, yorg;
	uint32 *scrbuf;

	xorg = MIN(x1,x2);
	yorg = MIN(y1,y2);
	if (xorg<0)
		xorg = 0;
	if (yorg<0)
		yorg = 0;
	xsize = ABS(x2-x1);
	ysize = ABS(y2-y1);
	if (xorg+xsize > xmaxscreen)
		xsize = xmaxscreen-xorg;
	if (yorg+ysize > ymaxscreen)
		ysize = ymaxscreen-yorg;
	tif = TIFFOpen(name, "w");
	TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, (uint32) (xsize+1));
	TIFFSetField(tif, TIFFTAG_IMAGELENGTH, (uint32) (ysize+1));
	TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8);
	TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL,
	    photometric == PHOTOMETRIC_RGB ? 3 : 1);
	TIFFSetField(tif, TIFFTAG_PLANARCONFIG, config);
	TIFFSetField(tif, TIFFTAG_COMPRESSION, compression);
	switch (compression) {
	case COMPRESSION_JPEG:
		if (photometric == PHOTOMETRIC_RGB && jpegcolormode == JPEGCOLORMODE_RGB)
			photometric = PHOTOMETRIC_YCBCR;
		TIFFSetField(tif, TIFFTAG_JPEGQUALITY, quality);
		TIFFSetField(tif, TIFFTAG_JPEGCOLORMODE, jpegcolormode);
		break;
	case COMPRESSION_LZW:
		if (predictor != 0)
			TIFFSetField(tif, TIFFTAG_PREDICTOR, predictor);
		break;
	}
	TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, photometric);
	TIFFSetField(tif, TIFFTAG_ORIENTATION, ORIENTATION_BOTLEFT);
	rowsperstrip = TIFFDefaultStripSize(tif, rowsperstrip);
	TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, rowsperstrip);
	scrbuf = (uint32 *)_TIFFmalloc((xsize+1)*(ysize+1)*sizeof (uint32));
	readdisplay(xorg, yorg, xorg+xsize, yorg+ysize, scrbuf, RD_FREEZE);
	if (photometric == PHOTOMETRIC_RGB) {
		if (config == PLANARCONFIG_SEPARATE)
			svRGBSeparate(tif, scrbuf, xsize, ysize);
		else
			svRGBContig(tif, scrbuf, xsize, ysize);
	} else
		svGrey(tif, scrbuf, xsize, ysize);
	(void) TIFFClose(tif);
	_TIFFfree((char *)scrbuf);
}
/*
 * Local Variables:
 * mode: c
 * c-basic-offset: 8
 * fill-column: 78
 * End:
 */
Commit	Line	Data
8414a40c VZ	1
	2	/*
	3	* Copyright (c) 1990-1997 Sam Leffler
	4	* Copyright (c) 1991-1997 Silicon Graphics, Inc.
	5	*
	6	* Permission to use, copy, modify, distribute, and sell this software and
	7	* its documentation for any purpose is hereby granted without fee, provided
	8	* that (i) the above copyright notices and this permission notice appear in
	9	* all copies of the software and related documentation, and (ii) the names of
	10	* Sam Leffler and Silicon Graphics may not be used in any advertising or
	11	* publicity relating to the software without the specific, prior written
	12	* permission of Sam Leffler and Silicon Graphics.
	13	*
	14	* THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
	15	* EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
	16	* WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
	17	*
	18	* IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
	19	* ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
	20	* OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
	21	* WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
	22	* LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
	23	* OF THIS SOFTWARE.
	24	*/
	25
	26	#include <stdio.h>
	27	#include <stdlib.h>
	28	#include <string.h>
	29
	30	#include <gl.h>
	31	#include <ctype.h>
	32
	33	#include "tiffio.h"
	34
80ed523f VZ	35	typedef unsigned char unsigned char;
80ed523f VZ	36	typedef unsigned long uint32;
8414a40c VZ	37
	38	#define streq(a,b) (strcmp(a,b) == 0)
	39	#define strneq(a,b,n) (strncmp(a,b,n) == 0)
	40
	41	uint32 rowsperstrip = (uint32) -1;
	42	uint16 compression = COMPRESSION_PACKBITS;
	43	uint16 config = PLANARCONFIG_CONTIG;
	44	uint16 predictor = 0;
	45	int xmaxscreen;
	46	int ymaxscreen;
	47	uint16 photometric = PHOTOMETRIC_RGB;
	48	int jpegcolormode = JPEGCOLORMODE_RGB;
	49	int quality = 75; /* JPEG quality */
	50
	51	static void usage(void);
	52	static void tiffsv(char*, int, int, int, int);
	53
	54	int
	55	main(int argc, char* argv[])
	56	{
	57	int c;
	58	extern int optind;
	59	extern char* optarg;
	60
	61	while ((c = getopt(argc, argv, "c:p:r:")) != -1)
	62	switch (c) {
	63	case 'b': /* save as b&w */
	64	photometric = PHOTOMETRIC_MINISBLACK;
	65	break;
	66	case 'c': /* compression scheme */
	67	if (streq(optarg, "none"))
	68	compression = COMPRESSION_NONE;
	69	else if (streq(optarg, "packbits"))
	70	compression = COMPRESSION_PACKBITS;
	71	else if (strneq(optarg, "jpeg", 4)) {
	72	char* cp = strchr(optarg, ':');
	73	if (cp && isdigit(cp[1]))
	74	quality = atoi(cp+1);
	75	if (cp && strchr(cp, 'r'))
	76	jpegcolormode = JPEGCOLORMODE_RAW;
	77	compression = COMPRESSION_JPEG;
	78	} else if (strneq(optarg, "lzw", 3)) {
	79	char* cp = strchr(optarg, ':');
	80	if (cp)
	81	predictor = atoi(cp+1);
	82	compression = COMPRESSION_LZW;
	83	} else
	84	usage();
	85	break;
	86	case 'p': /* planar configuration */
	87	if (streq(optarg, "separate"))
	88	config = PLANARCONFIG_SEPARATE;
	89	else if (streq(optarg, "contig"))
	90	config = PLANARCONFIG_CONTIG;
	91	else
	92	usage();
	93	break;
	94	case 'r': /* rows/strip */
	95	rowsperstrip = atoi(optarg);
	96	break;
	97	case '?':
	98	usage();
	99	/NOTREACHED/
	100	}
101	if (argc - optind != 1 && argc - optind != 5)
102	usage();
103	xmaxscreen = getgdesc(GD_XPMAX)-1;
104	ymaxscreen = getgdesc(GD_YPMAX)-1;
105	foreground();
106	noport();
107	winopen("tiffsv");
108	if (argc - optind == 5)
109	tiffsv(argv[optind],
110	atoi(argv[optind+1]), atoi(argv[optind+2]),
111	atoi(argv[optind+3]), atoi(argv[optind+4]));
112	else
113	tiffsv(argv[optind], 0, xmaxscreen, 0, ymaxscreen);
114	return (0);
115	}
116
117	char* stuff[] = {
118	"usage: tiffsv [options] outimage.tif [x1 x2 y1 y2] [-b]",
119	"where options are:",
120	" -p contig pack samples contiguously (e.g. RGBRGB...)",
121	" -p separate store samples separately (e.g. RRR...GGG...BBB...)",
122	"",
123	" -r # make each strip have no more than # rows",
124	"",
125	" -c lzw[:opts] compress output with Lempel-Ziv & Welch encoding",
126	" -c jpeg[:opts]compress output with JPEG encoding",
127	" -c packbits compress output with packbits encoding",
128	" -c none use no compression algorithm on output",
129	"",
130	"JPEG options:",
131	" # set compression quality level (0-100, default 75)",
132	" r output color image as RGB rather than YCbCr",
133	"",
134	"LZW options:",
135	" # set predictor value for Lempel-Ziv & Welch encoding",
136	"For example, -c lzw:2 to get LZW-encoded data with horizontal differencing",
137	NULL
138	};
139
140	static void
141	usage(void)
142	{
143	char buf[BUFSIZ];
144	int i;
145
146	setbuf(stderr, buf);
147	for (i = 0; stuff[i] != NULL; i++)
148	fprintf(stderr, "%s\n", stuff[i]);
149	exit(-1);
150	}
151
152	static void
80ed523f	153	svRGBSeparate(TIFF* tif, uint32* ss, int xsize, int ysize)
8414a40c VZ	154	{
8414a40c VZ	155	tsize_t stripsize = TIFFStripSize(tif);
80ed523f VZ	156	unsigned char rbuf = (unsigned char )_TIFFmalloc(3*stripsize);
	157	unsigned char *gbuf = rbuf + stripsize;
	158	unsigned char *bbuf = gbuf + stripsize;
8414a40c VZ	159	register int y;
	160
	161	for (y = 0; y <= ysize; y += rowsperstrip) {
80ed523f	162	unsigned char rp, gp, *bp;
8414a40c VZ	163	register int x;
	164	register uint32 n;
	165
	166	n = rowsperstrip;
	167	if (n > ysize-y+1)
	168	n = ysize-y+1;
	169	rp = rbuf; gp = gbuf; bp = bbuf;
	170	do {
	171	for (x = 0; x <= xsize; x++) {
80ed523f	172	uint32 v = ss[x];
8414a40c VZ	173	rp[x] = v;
	174	gp[x] = v >> 8;
	175	bp[x] = v >> 16;
	176	}
	177	rp += xsize+1, gp += xsize+1, bp += xsize+1;
	178	ss += xsize+1;
	179	} while (--n);
	180	if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,0),
	181	rbuf, stripsize) < 0)
	182	break;
	183	if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,1),
	184	gbuf, stripsize) < 0)
	185	break;
	186	if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,2),
	187	bbuf, stripsize) < 0)
	188	break;
	189	}
	190	_TIFFfree(rbuf);
	191	}
	192
	193	static void
80ed523f	194	svRGBContig(TIFF* tif, uint32* ss, int xsize, int ysize)
8414a40c VZ	195	{
	196	register int x, y;
	197	tsize_t stripsize = TIFFStripSize(tif);
80ed523f	198	unsigned char strip = (unsigned char )_TIFFmalloc(stripsize);
8414a40c VZ	199
8414a40c VZ	200	for (y = 0; y <= ysize; y += rowsperstrip) {
80ed523f	201	register unsigned char *pp = strip;
8414a40c VZ	202	register uint32 n;
	203
	204	n = rowsperstrip;
	205	if (n > ysize-y+1)
	206	n = ysize-y+1;
	207	do {
	208	for (x = 0; x <= xsize; x++) {
80ed523f	209	uint32 v = ss[x];
8414a40c VZ	210	pp[0] = v;
	211	pp[1] = v >> 8;
	212	pp[2] = v >> 16;
	213	pp += 3;
	214	}
	215	ss += xsize+1;
	216	} while (--n);
	217	if (TIFFWriteEncodedStrip(tif, TIFFComputeStrip(tif,y,0),
	218	strip, stripsize) < 0)
	219	break;
	220	}
	221	_TIFFfree(strip);
	222	}
	223
	224	#undef RED
	225	#undef GREEN
	226	#undef BLUE
	227	#define CVT(x) (((x)*255)/100)
	228	#define RED CVT(28) /* 28% */
	229	#define GREEN CVT(59) /* 59% */
	230	#define BLUE CVT(11) /* 11% */
	231
	232	static void
80ed523f	233	svGrey(TIFF* tif, uint32* ss, int xsize, int ysize)
8414a40c VZ	234	{
8414a40c VZ	235	register int x, y;
80ed523f	236	unsigned char buf = (unsigned char )_TIFFmalloc(TIFFScanlineSize(tif));
8414a40c VZ	237
	238	for (y = 0; y <= ysize; y++) {
	239	for (x = 0; x <= xsize; x++) {
80ed523f	240	unsigned char cp = (unsigned char )&ss[x];
8414a40c VZ	241	buf[x] = (REDcp[3] + GREENcp[2] + BLUE*cp[1]) >> 8;
	242	}
	243	if (TIFFWriteScanline(tif, buf, (uint32) y, 0) < 0)
	244	break;
	245	ss += xsize+1;
	246	}
	247	_TIFFfree(buf);
	248	}
	249
	250	#define MIN(a,b) ((a)<(b)?(a):(b))
	251	#define ABS(x) ((x)<0?-(x):(x))
	252
	253	static void
	254	tiffsv(char* name, int x1, int x2, int y1, int y2)
	255	{
	256	TIFF *tif;
	257	int xsize, ysize;
	258	int xorg, yorg;
80ed523f	259	uint32 *scrbuf;
8414a40c VZ	260
	261	xorg = MIN(x1,x2);
	262	yorg = MIN(y1,y2);
	263	if (xorg<0)
	264	xorg = 0;
	265	if (yorg<0)
	266	yorg = 0;
	267	xsize = ABS(x2-x1);
	268	ysize = ABS(y2-y1);
	269	if (xorg+xsize > xmaxscreen)
	270	xsize = xmaxscreen-xorg;
	271	if (yorg+ysize > ymaxscreen)
	272	ysize = ymaxscreen-yorg;
	273	tif = TIFFOpen(name, "w");
	274	TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, (uint32) (xsize+1));
	275	TIFFSetField(tif, TIFFTAG_IMAGELENGTH, (uint32) (ysize+1));
	276	TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8);
	277	TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL,
	278	photometric == PHOTOMETRIC_RGB ? 3 : 1);
	279	TIFFSetField(tif, TIFFTAG_PLANARCONFIG, config);
	280	TIFFSetField(tif, TIFFTAG_COMPRESSION, compression);
	281	switch (compression) {
	282	case COMPRESSION_JPEG:
	283	if (photometric == PHOTOMETRIC_RGB && jpegcolormode == JPEGCOLORMODE_RGB)
	284	photometric = PHOTOMETRIC_YCBCR;
	285	TIFFSetField(tif, TIFFTAG_JPEGQUALITY, quality);
	286	TIFFSetField(tif, TIFFTAG_JPEGCOLORMODE, jpegcolormode);
	287	break;
	288	case COMPRESSION_LZW:
	289	if (predictor != 0)
	290	TIFFSetField(tif, TIFFTAG_PREDICTOR, predictor);
	291	break;
	292	}
	293	TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, photometric);
	294	TIFFSetField(tif, TIFFTAG_ORIENTATION, ORIENTATION_BOTLEFT);
	295	rowsperstrip = TIFFDefaultStripSize(tif, rowsperstrip);
	296	TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, rowsperstrip);
80ed523f	297	scrbuf = (uint32 )_TIFFmalloc((xsize+1)(ysize+1)*sizeof (uint32));
8414a40c VZ	298	readdisplay(xorg, yorg, xorg+xsize, yorg+ysize, scrbuf, RD_FREEZE);
	299	if (photometric == PHOTOMETRIC_RGB) {
	300	if (config == PLANARCONFIG_SEPARATE)
	301	svRGBSeparate(tif, scrbuf, xsize, ysize);
	302	else
	303	svRGBContig(tif, scrbuf, xsize, ysize);
	304	} else
	305	svGrey(tif, scrbuf, xsize, ysize);
	306	(void) TIFFClose(tif);
	307	_TIFFfree((char *)scrbuf);
	308	}
80ed523f VZ	309	/*
	310	* Local Variables:
	311	* mode: c
	312	* c-basic-offset: 8
	313	* fill-column: 78
	314	* End:
	315	*/