wasatchrle.c File Reference

#include <stdio.h>
#include <ctype.h>
#include <errno.h>
#include "rle.h"

Include dependency graph for wasatchrle.c:

Go to the source code of this file.

Data Structures
struct	was_head
struct	was_op

Functions
void	main (int argc, char **argv)
FILE *	open_with_ext (char *basename, char *ext)

Variables
struct was_head	was_head
short	rlemap [3][256]
rle_pixel	rgb [3]
struct was_op	was_op

Function Documentation

void main	(	int	argc,
		char **	argv
	)

Definition at line 54 of file wasatchrle.c.

{
    FILE       *open_with_ext();
    int     oflag = 0;
    char       *out_name = NULL;
    rle_hdr hdr;
    char       *was_basename;
    FILE       *lut_file, *rlc_file;    /* Wasatch input files */
    rle_pixel **row;
    rle_pixel  *pxlptr;
    int     i, xpos;

    if (scanargs( argc, argv, "% o%-outfile!s basename!s",
          &oflag, &out_name, &was_basename ) == 0)
    exit(-1);

    /* Initialize header. */
    hdr = *rle_hdr_init( (rle_hdr *)NULL );
    rle_names( &hdr, cmd_name( argv ), out_name, 0 );

    lut_file = open_with_ext( was_basename, ".lut" );
    rlc_file = open_with_ext( was_basename, ".rlc" );

    hdr.rle_file = rle_open_f( hdr.cmd, out_name, "w" );

    fread( &was_head, sizeof( was_head ), 1, rlc_file );

    /*
     * The spec provided by Wasatch is not clear on the meaning or any
     * intended order of the "viewport corners".  Also, look out for
     * BYTE SWAPPING.
     */
    hdr.xmin = was_head.x1;
    hdr.ymin = was_head.y1;
    hdr.xmax = was_head.x2;
    hdr.ymax = was_head.y2;

    hdr.ncolors = 1;
    hdr.alpha = 0;  /* What a shame... */
    for (i = 1; i < hdr.ncolors; i++)
    RLE_CLR_BIT( hdr, i );
    hdr.ncmap = 3;
    hdr.cmaplen = 8; /* == 256 entries */
    hdr.cmap = (rle_map *) rlemap;

    /* Grab the map. */

    for (i = 0; i < 256; i++)
    {
    fread( rgb, sizeof( rgb ), 1, lut_file );
    rlemap[RLE_RED][i] = ( (int)rgb[RLE_RED] ) << 8;
    rlemap[RLE_GREEN][i] = ( (int)rgb[RLE_GREEN] ) << 8;
    rlemap[RLE_BLUE][i] = ( (int)rgb[RLE_BLUE] ) << 8;
    }

    rle_addhist( argv, (rle_hdr *)NULL, &hdr );
    rle_put_setup( &hdr );
    hdr.xmax -= hdr.xmin;
    hdr.xmin = 0;

    if (rle_row_alloc( &hdr, &row ))
    {
    fprintf( stderr, "wasacthrle: malloc failed\n" );
    exit(-2);
    }

    xpos = 0;
    pxlptr = row[0];
    was_op.count = 0;       /* Haven't read anything yet. */

    do {
    while (was_op.count--)
    {
        if (xpos > hdr.xmax) /* Flush scanline */
        {
        rle_putrow( row, (hdr.xmax + 1), &hdr );
        xpos = 0;
        pxlptr = row[0];
        }
        *pxlptr++ = was_op.data;
        xpos++;
    }
    fread( &was_op, sizeof( was_op ), 1, rlc_file );
    } while( was_op.count );

    if (xpos)
    rle_putrow( row, (hdr.xmax + 1), &hdr );
    rle_puteof( &hdr );
    exit(0);
}

FILE* open_with_ext	(	char *	basename,
		char *	ext
	)

Definition at line 156 of file wasatchrle.c.

{
    char file_name[255];
    char ext_name[10];
    char * cptr;
    FILE * f;

    strcpy( ext_name, ext );
    strcpy( file_name, basename );
    strcat( file_name, ext_name );

    if (! (f = fopen( file_name, "r" )))
    {
    if (errno == ENOENT)    /* Not found, try upper case */
    {
        strcpy( file_name, basename );
        cptr = ext_name;
        for (; *cptr; cptr++ )
        *cptr = toupper( *cptr );
        strcat( file_name, ext_name );
        f = fopen( file_name, "r" );
    }
    }

    if (! f)            /* fopen failed */
    {
    perror( file_name );
    exit( -1 );
    }
    return( f );
}

Variable Documentation

rle_pixel rgb[3]

Definition at line 47 of file wasatchrle.c.

short rlemap[3][256]

Definition at line 46 of file wasatchrle.c.

struct was_head was_head

struct was_op was_op