rletovcr.c File Reference

#include <stdio.h>
#include <math.h>
#include "rle.h"

Include dependency graph for rletovcr.c:

Go to the source code of this file.

Macros
#define	incr(bp, fudge)

Functions
	WriteVICARHeader (FILE *fd, int width, int height, int BandsPerPixel)
static void	WriteVICARScanLine (FILE *fd, unsigned char *VICARScanLine, int VICARScanLineLength)
static unsigned char *	read_image (rle_hdr *the_hdr)
static void	write_image (rle_hdr *the_hdr, FILE *outFD, unsigned char *VICARImage)
int	main (int argc, argv)

Variables
int	VERBOSE = 0
static int	LBLSIZE

Macro Definition Documentation

#define incr	(		bp,
			fudge
	)

Value:

bp += strlen( bp ); \
    if ( bp - buffer + fudge > LBLSIZE ) \
    { \
    bp = buffer = realloc( buffer, LBLSIZE += width ); \
    bp += strlen( bp ); \
    }

Function Documentation

int main	(	int	argc,
		argv
	)

Definition at line 253 of file rletovcr.c.

{
    char *infname = NULL, outfname = NULL;
    int oflag = 0;
    unsigned char *VICARImage;
    rle_hdr the_hdr;
    FILE *outFD;

    if ( scanargs( argc, argv, "% v%- o%-outfile!s infile%s\n(\
\tConvert URT image to VICAR format (as currently understood).)",
           &VERBOSE, &oflag, &outfname, &infname ) == 0 )
    exit( 1 );
 
    the_hdr = *rle_hdr_init( (rle_hdr *)NULL );
    rle_names( &the_hdr, cmd_name( argv ), infname );

    the_hdr.rle_file = rle_open_f( the_hdr.cmd, infname, "r" );

    VICARImage = read_image( &the_hdr );

    outFD = rle_open_f( the_hdr.cmd, outfname, "w" );

    write_image( &the_hdr, outFD, VICARImage );

    exit(0); 
}

static unsigned char* read_image ( rle_hdr *  the_hdr )

static

Definition at line 173 of file rletovcr.c.

{
    int y,width,height;
    unsigned char *VICARImage;
    rle_pixel **rows;

    /* Read the RLE file header. */
    rle_get_setup_ok( the_hdr, NULL, NULL );
    /* Don't read alpha channel. */
    RLE_CLR_BIT( *the_hdr, RLE_ALPHA );
    
    /* Sanity check. */
    if ( the_hdr->ncolors > 1 || the_hdr->cmap )
    {
    fprintf( stderr,
         "%s: Only black & white images can be converted to VICAR.\n",
         the_hdr->cmd );
    if ( the_hdr->ncolors > 1 )
        fprintf( stderr, "\t%s has %d colors.\n",
             the_hdr->file_name, the_hdr->ncolors );
    else
        fprintf( stderr, "\t%s has a color map.\n",
             the_hdr->file_name );
    exit( 1 );
    }

    /* Shift image over to save space. */
    the_hdr->xmax -= the_hdr->xmin;
    the_hdr->xmin = 0;
    width = the_hdr->xmax + 1;
    height = the_hdr->ymax - the_hdr->ymin + 1;

    VICARImage = (unsigned char *) malloc(width * height);
    RLE_CHECK_ALLOC( the_hdr->cmd, VICARImage, "image" );
    rows = (rle_pixel **)malloc( the_hdr->ncolors * sizeof(rle_pixel *));

    for ( y = the_hdr->ymin; y <= the_hdr->ymax; y++ )
    {
    rows[0] = VICARImage + width * (the_hdr->ymax - y);
    rle_getrow( the_hdr, rows );
    }
    free( rows );

    return VICARImage;
}

static void write_image ( rle_hdr *  the_hdr, FILE *  outFD, unsigned char *  VICARImage  )

static

Definition at line 221 of file rletovcr.c.

{
    int width, height, y;

    if (VERBOSE) fprintf(stderr,"%s: Writing VICARHeader\n", the_hdr->cmd);

    width = the_hdr->xmax - the_hdr->xmin + 1;
    height = the_hdr->ymax - the_hdr->ymin + 1;
    WriteVICARHeader(outFD, width, height, the_hdr->ncolors); 

    if (VERBOSE) fprintf(stderr,"%s: Writing VICAR image", the_hdr->cmd);

    for ( y = 0; y < height; y++ )
    {
    WriteVICARScanLine(outFD, VICARImage + y * width, width);
    if (VERBOSE) fprintf(stderr,".");
    }
  
    if (VERBOSE) fprintf(stderr,"\n");

    if (ferror(outFD))
    fprintf(stderr,"%s: Error writing image\n", the_hdr->cmd);

    if (VERBOSE)
    fprintf(stderr,"%s: finished writing the image\n", the_hdr->cmd);

    fflush(outFD); 
}

WriteVICARHeader	(	FILE *	fd,
		int	width,
		int	height,
		int	BandsPerPixel
	)

Definition at line 86 of file rletovcr.c.

{
    int pad;
    char *buffer, *bp;

    /*
      LBLSIZE must be an integer multiple of width.
      It also needs to be large enough for everything below to fit.
      We use 1024 as a reasonable minimum size, and pick the first integer
      multiple of 'width' to be the LBLSIZE.
      
      Look - I don't really understand VICAR format.  We're just hacking...
      
      */
    LBLSIZE = width;  while(LBLSIZE < 1024) LBLSIZE += width;
    /* Allocate a buffer. */
    buffer = (char *)malloc( LBLSIZE );
    bp = buffer;

#define incr(bp,fudge) \
    bp += strlen( bp ); \
    if ( bp - buffer + fudge > LBLSIZE ) \
    { \
    bp = buffer = realloc( buffer, LBLSIZE += width ); \
    bp += strlen( bp ); \
    }

    sprintf(bp,"LBLSIZE=%-d ",LBLSIZE); /* see above */
    incr( bp, 20 );
    sprintf(bp," FORMAT='BYTE'");        
    incr( bp, 20 );
    sprintf(bp," TYPE='IMAGE'");
    incr( bp, 20 );
    sprintf(bp," BUFSIZ=%-d",20*LBLSIZE);
    incr( bp, 20 );
    sprintf(bp," DIM=3");  
    incr( bp, 20 );
    sprintf(bp," EOL=0");             
    incr( bp, 20 );
    sprintf(bp," RECSIZE=%-d",LBLSIZE); 
    incr( bp, 20 );
    sprintf(bp," ORG='BSQ'");         
    incr( bp, 20 );
    sprintf(bp," NL=%-d",height);     
    incr( bp, 20 );
    sprintf(bp," NS=%-d",width);      
    incr( bp, 20 );
    sprintf(bp," NB=1");              
    incr( bp, 20 );
    sprintf(bp," N1=%-d",height);     
    incr( bp, 20 );
    sprintf(bp," N2=%-d",width);      
    incr( bp, 20 );
    sprintf(bp," N3=1");              
    incr( bp, 20 );
    sprintf(bp," N4=0");              
    incr( bp, 20 );
    sprintf(bp," NBB=0");             
    incr( bp, 20 );
    sprintf(bp," NLB=0");             
    incr( bp, 100 );
    sprintf(bp," COMMENT='created by rletovcr'");
    bp += strlen( bp );

#undef incr

    /* Rewrite LBLSIZE in case it changed (unlikely). */
    sprintf( buffer, "LBLSIZE=%-d", LBLSIZE );

    while ( bp < buffer + LBLSIZE )
    *bp++ = 0;

    fwrite( buffer, 1, LBLSIZE, fd );
    free( buffer );
}

static void WriteVICARScanLine ( FILE *  fd, unsigned char *  VICARScanLine, int  VICARScanLineLength  )

static

Definition at line 164 of file rletovcr.c.

{
    (void)fwrite(VICARScanLine, 1, VICARScanLineLength, fd);
}

Variable Documentation

int LBLSIZE

static

Definition at line 58 of file rletovcr.c.

int VERBOSE = 0

Definition at line 53 of file rletovcr.c.