Capsim Block Documentation
Writes an input image to a TIFF file as 8 bit samples. Also store the current colormap.
Port | Type | Name | |
---|---|---|---|
0 | image_t | x |
Num | Description | Type | Name | Default Value | |
---|---|---|---|---|---|
0 | Name of output file | file | fileName | output.tif |
Num | Type | Name | Initial Value | Description |
---|---|---|---|---|
0 | int | fp | ||
1 | int | ibufs | ||
2 | int | obufs | ||
3 | char* | buff | ||
4 | image_t | img | ||
5 | int | pwidth | ||
6 | int | pheight | ||
7 | float** | mat_PP |
int i,j,k,ii; unsigned short pixel; float fpixel; |
---|
if((ibufs = NO_INPUT_BUFFERS()) != 1) { fprintf(stdout,"imgwrtiff: no input buffer\n"); return(1); } if((obufs = NO_OUTPUT_BUFFERS()) > ibufs) { fprintf(stdout,"imgwrtiff: more output than input buffers\n"); return(2); } for(j=0; j |
---|
/* This mode synchronizes all input buffers */ for(ii = MIN_AVAIL(); ii>0; ii--) { IT_IN(0); img=x(0); pheight=img.height; pwidth=img.width; mat_PP=img.image_PP; fprintf(stderr,"imgwrtiff to produce %d x %d image file\n",pwidth,pheight); if(IIP_WriteMatrixTIFF(mat_PP,pwidth,pheight,fileName)) { fprintf(stderr,"imgwrtiff: can't write TIFF image\n"); return(4); } if(obufs==1) { if(IT_OUT(0)) { KrnOverflow("imgwrtiff",0); return(99); } OUTIMAGE(0,0) = img; } } return(0); |
---|
/* Capsim (r) Text Mode Kernel (TMK) Star Library (Blocks) Copyright (C) 1989-2002 XCAD Corporation This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA http://www.xcad.com XCAD Corporation Raleigh, North Carolina */ */ |
---|
/********************************************************************** imgwrtiff() *********************************************************************** Writes an input image to a TIFF file as 8 bit samples. Also store the current colormap. If multiple images are received, they overwrite the previous on. This star can later be modified so that multiple images are stored in a singe TIFF file (with multiple directories). Or stored in multiple TIFF files with the file name changing in some manner. Auto fan out is supported. Programmer: Sasan Ardalan Date: October 14, 1993 */ |
---|