getiris.c

Go to the documentation of this file.

/* 
 * getiris.c - Whoop up an rle with 24 bits ( no mex ).
 * 
 * Author:  Glenn McMinn
 *      Computer Science Dept.
 *      University of Utah
 * Date:    Tue Feb  3 1987
 * Copyright (c) 1987 Glenn McMinn
 * 
 */


#define MIN(a,b) ( a<b ? a : b)

#include "gl.h"
#include "device.h"
#include "stdio.h"
#include "rle.h"

main(argc,argv)
int argc;
char **argv;
{
        rle_hdr hdr;
    char *infname;
        int x_len, y_len;
    int i;
    unsigned char **scan;
    Device val;

    hdr = *rle_hdr_init( (rle_hdr *)NULL );

    if ( scanargs( argc, argv, "% infile%s\n(\
\tDisplay on SGI not running a window manager.)",
               &infname ) == 0 )
        exit( 1 );

    rle_names( &hdr, cmd_name( argv ), infname, 0 );

    /* This program runs without mex running. */
    if ( ismex())
    {
        fprintf( stderr, "%s:  can't run under mex!\n", hdr.cmd);
        exit(0);
    }
    ginit();

    /* Turn off cursor so that picture doesn't have a glich. */
    cursoff();
    RGBmode();
    gconfig();
    RGBcolor(0, 0, 0);
    clear();

    /* Setup mouse buttons so that they are queued. */
    qdevice( LEFTMOUSE );
    qdevice( RIGHTMOUSE );
    qdevice( MIDDLEMOUSE );
    qreset();

    /* Take input from file argument or stdin. */
    hdr.rle_file = rle_open_f(hdr.cmd, infname, "r");
    rle_get_setup( &hdr );

    x_len = hdr.xmax - hdr.xmin + 1;
    y_len = hdr.ymax - hdr.ymin + 1;
    hdr.xmax -= hdr.xmin;
    hdr.xmin = 0;

    /* Grab a scanline. */
    scan = (unsigned char **) malloc( (hdr.ncolors +
                       hdr.alpha) *
                      sizeof( unsigned char * ) );
    for ( i = 0; i < hdr.ncolors + hdr.alpha; i++ )
        scan[i] = (unsigned char *)malloc( x_len );

    if ( hdr.alpha )
    {
        scan++;
    }

    /* Display each scanline. */
        for ( i = 0; i < MIN(y_len,768) ; i ++)
    {
        rle_getrow(&hdr, scan );

        cmov2i(0, i);
        writeRGB(x_len, scan[0], scan[1], scan[2]);
    }

    /* Wait for a mouse button push. */
    qread( &val);

    /* Set the iris back up so that it is not scrogged. */
    singlebuffer();
    gconfig();
    clear();
    gexit();
}