annotate tools/ftoa.c @ 0:5242703e91d3 tip

Initial checkin for AIM92 aimR8.2 (last updated May 1997).

/*
    ftoa.c      frames (SAI or NAP) to ASCII
    ------

    Each data point is output as a triple: (x,y,z)
    where (x,y) specify the coordinate in terms of a pointwise coordinate
    system with the origin (0,0) in the bottom-left of the display.

    The output is in space-separated ASCII numbers with one triple per line.
*/

#include <stdio.h>
#include <math.h>
#include "header.h"
#include "options.h"
#include "strmatch.h"


char applic[]     = "Frames to ASCII triples (x,y,z). " ;

static char *helpstr, *debugstr, *formatstr ;

static Options option[] = {
    {   "help"      ,   "off"       ,  &helpstr     ,   "help"                          , DEBUG },
    {   "debug"     ,   "off"       ,  &debugstr    ,   "debugging switch"              , DEBUG },
    {   "format"    ,   "nap"       ,  &formatstr   ,   "frame format (nap or sai)"     , VAL   },
   ( char * ) 0 } ;


int     frameheight, framewidth ;       /* Parameters read from header */
int     frames, framebytes ;

main(argc, argv)
int   argc ;
char *argv[] ;
{
    FILE   *fp ;
    char   *header, *SaiHeader();
    short  *frame ;
    int     x, y  ;

    fp = openopts( option,argc,argv ) ;
    if ( !isoff( helpstr ) )
	helpopts( helpstr, argv[0], applic, option ) ;

    if ( (header = ReadHeader(fp)) == (char *) 0 ) {
	fprintf(stderr,"integrate: header not found\n");
	exit(1);
    }

    frameheight = HeaderInt( header, "frameheight" );
    framewidth =  HeaderInt( header, "framewidth"  );
    frames =      HeaderInt( header, "frames"      );
    framebytes =  HeaderInt( header, "framebytes"  );


    if ( isstr( formatstr, "nap" ) ) {
	framebytes =  frames*frameheight*sizeof(short) ;
	framewidth =  frames ;
	if ( (frame = (short *)malloc( framebytes )) == (short *)0 ) {
	    fprintf(stderr,"ftoa: malloc out of space\n");
	    exit(1);
	}
	while ( fread( frame,framebytes,1,fp ) ) {
	    for ( x=0 ; x<framewidth ; x++ )
		for ( y=0 ; y<frameheight ; y++ )
		    printf("%-5d %-5d %-5d\n", x, y, *frame++ ) ;
	}
    }

    else if ( isstr( formatstr, "sai" ) ) {
	if ( (frame = (short *)malloc( framebytes )) == (short *)0 ) {
	    fprintf(stderr,"ftoa: malloc out of space\n");
	    exit(1);
	}
	while ( fread( frame,framebytes,1,fp ) ) {
	    for ( y=0 ; y<frameheight ; y++ )
		for ( x=0 ; x<framewidth ; x++ )
		    printf("%-5d %-5d %-5d\n", x, y, *frame++ ) ;
	}
    }

    else {
	fprintf( stderr,"ftoa: unknown format [%s]\n", formatstr ) ;
	exit( 1 ) ;
    }

    fclose( fp ) ;
}