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

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

/*
  step.c    generate a step up or down.
  ------

*/

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

char applic[]  = "generate a step waveform. " ;
char usage[]   = "step [options]" ;

static char *helpstr, *debugstr, *sampstr, *astr,  *dstr, *typestr ;
static char *shiftstr, *polstr ;

static Options option[] = {
    {   "help"      ,   "off"       ,  &helpstr     ,   "help"                              , DEBUG   },
    {   "debug"     ,   "off"       ,  &debugstr    ,   "debugging switch"                  , DEBUG   },
    {   "samplerate",   "20kHz"     ,  &sampstr     ,   "samplerate "                       , VAL     },
    {   "amplitude" ,   "1"         ,  &astr        ,   "step height"                       , VAL     },
    {   "shift"     ,   "10ms"      ,  &shiftstr    ,   "position of step relative to start", VAL     },
    {   "polarity"  ,   "up"        ,  &polstr      ,   "step up or down"                   , VAL     },
    {   "duration"  ,   "500ms"     ,  &dstr        ,   "duration of waveform"              , VAL     },
    {   "type"      ,   "short"     ,  &typestr     ,   "output datatype"                   , VAL     },
   ( char * ) 0 } ;


int     samplerate ;
float   amplitude  ;
int     duration   ;
int     shift      ;
int     type       ;

main(argc, argv)
int   argc ;
char *argv[] ;
{
    int   i ;
    float y0, y1 ;

    getopts( option,argc,argv ) ;
    if ( !isoff( helpstr ) )
	helpopts3( helpstr, argv[0], applic, usage, option ) ;

    samplerate = to_Hz( sampstr, 0 ) ;
    amplitude  = atof( astr ) ;
    shift      = to_p( shiftstr, samplerate ) ;
    duration   = to_p( dstr, samplerate ) ;

    if ( ( type = typeindex( typestr ) ) < 0 ) {
	fprintf(stderr,"step: unknown datatype [%s]\n", typestr) ;
	exit( 1 ) ;
    }

    if ( isstr( polstr, "up" ) ) {
	y0 = 0 ;         y1 = amplitude ;
    }
    else if ( isstr( polstr, "down" ) ) {
	y0 = amplitude ; y1 = 0 ;
    }
    else {
	fprintf(stderr,"step: unknown polarity [%s]\n", polstr) ;
	exit( 1 ) ;
    }

    for ( i = 0 ; i < shift ; i++ )
	writeitem( &y0, type, 1, stdout ) ;
    for (  ; i < duration ; i++ )
	writeitem( &y1, type, 1, stdout ) ;

}