---

CNTcontrol.c

/*E12count.c

Nathan Z. Gustavson
ngustavson@emacinc.com
Emac.inc
www.emacinc.com

Description:
A C program for controlling 
the counters of the 37e12

ex:
setup command
pcdcount c num trigger threshold

read command
pcdcount r num

*/

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <sys/ioctl.h>
#include <unistd.h>
#include <sys/types.h>
#include <asm/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <signal.h>
#include <sched.h>
#include <sys/resource.h>
#include <sys/io.h>
#include <E12user.h>
#include <packet.h>
#include <coprocessor.h>
#include <counter.h>

#define COUNTERRESPONSE BITMASK(COUNTER)

Cop_Data *Cop;
int fd;

#define OPENDEV(filed,dev){if((filed = open(dev, O_RDWR))<=0){printf("couldn't open %s\n",dev);return -1;}}

static int help(void)
{
const char *help_table = "*********************************************************
*E12count                                                *
*Nathan Z. Gustavson                                     *
*Emac.inc                                                * 
*"__DATE__"                                             *   
*usage:                                                  *
*E12count /dev/37e12 mask flags rise/fall/both threshold *
**********************************************************\n";



printf("%s",help_table);


return 0;
}

#define ARGCHECK(num){if(argc<num){printf("invalid number of arguements\n");help();return -1;}}


/*CounterParser
The 37e12's data ready signal handler.
This only pays attention to data received from the counter devices
*/
static void CounterParser(int signal){

int rxnum =read(fd,buffer,sizeof(buffer));
typemask = E12_Packet_Route(Cop, buffer, rxnum);

}


static __u16 get_trigger(char *string)
{
if(!strcmp(string,"rise"))
   return RISEE;
if(!strcmp(string,"fall"))
   return FALLE;
if(!strcmp(string,"both"))
   return ANYE;

   return NOE;

}


static __u16 get_command(char *string)
{
if(!strcmp(string,"start"))
   return ICSTART;
if(!strcmp(string,"stop"))
   return ICSTOP;
if(!strcmp(string,"signal"))
   return ICNOTIFYON;
if(!strcmp(string,"nosig"))
   return ICNOTIFYOFF;


   return NULLCOMMAND;

}





int main(int argc,char **argv)
{
int counter,trigger,thresh,flags;
char command;
char *device;
__u16 threshold;
long oflags;
__u8 buffer[100];
struct sigaction zero_signal;



ARGCHECK(3);
device = argv[1];
OPENDEV(fd,device);

command = *argv[2];
counter=strtoul(argv[3],NULL,0);

Cop = CopDeviceCreate(0);

if((counter>7)||(counter<0))
  {
printf("invalid counter\n");
return -1;
  }

switch(command)
  {
  case 'r'://read command
    E12_CounterValueRQ(fd, counter)
    break;


  case 's'://setup command
  
  ARGCHECK(6);

   if(!(trigger=get_trigger(argv[4])))
    {
      printf("invalid trigger %s\n",argv[4]);
      return -1;
    }

 if((threshold=strtoul(argv[5],NULL,0)))
   flags = AUTOLOAD;
 else
   flags = 0;

E12_CountConfig(fd, counter, trigger, thresh,flags);

   close(fd);
   break;
 
  case 'c'://control 
  ARGCHECK(5);


    ioctl(fd,get_command(argv[3]),NULL);

    close(fd);

    break;


  case 'l':
    ARGCHECK(4);
sprintf(device,"/dev/count%x",counter);    

if((fd = open(device, O_RDWR))<=0)
     {
       printf("couldn't open %s\n",device);
       return -1;
     }  

threshold = (__u16)strtoul(argv[3],NULL,0);

write(fd,&threshold,sizeof(threshold));

close(fd);

break;

  case 'z':

//configure counter with asychronous notification flag
 ARGCHECK(5);

  config.counter = counter;

  if(!(config.trigger=get_trigger(argv[3])))
    {
      printf("invalid trigger %s\n",argv[4]);
      return -1;
    }

 if((config.threshold=strtoul(argv[4],NULL,0)))
   config.flags = AUTOLOAD|ANOTE;
 else
   config.flags = ANOTE;
 


   if((fd = open("/dev/dig1", O_RDWR))<=0)
     {
       printf("couldn't open /dev/dig1\n");
       return -1;
     }
  
   ioctl(fd,PCD_COUNT,&config);//pass counter configuration structure to digital port

close(fd);

sprintf(device,"/dev/count%x",counter);    

if((fd = open(device, O_RDWR))<=0)
     {
       printf("couldn't open %s\n",device);
       return -1;
     }  

printf("Initializing \n");

sleep(2);//flush any pending signals

zero_signal.sa_handler = zero_counter;

sigaction(SIGIO, &zero_signal,NULL); //install signal handler
fcntl(fd, F_SETOWN,getpid()); //set signal ownership
oflags = fcntl(fd, F_GETFL); //get current flags
fcntl(fd,F_SETFL, oflags|FASYNC);//add FASYNC flag to them


printf("hit Cntrl-C to exit\n");

ioctl(fd,ICSTART,NULL);//start counter


while(1); //let signal handlers work;


    break;

  case 'd':
 ARGCHECK(5);

  config.counter = counter;

  if(!(config.trigger=get_trigger(argv[3])))
    {
      printf("invalid trigger %s\n",argv[4]);
      return -1;
    }

 if((config.threshold=strtoul(argv[4],NULL,0)))
   config.flags = AUTOLOAD|ANOTE|AUTOSTOP;
 else
   config.flags = ANOTE|AUTOSTOP;
 


   if((fd = open("/dev/dig1", O_RDWR))<=0)
     {
       printf("couldn't open /dev/dig1\n");
       return -1;
     }
  
   ioctl(fd,PCD_COUNT,&config);//pass counter configuration structure to digital port

close(fd);

sprintf(device,"/dev/count%x",counter);    

if((fd = open(device, O_RDWR))<=0)
     {
       printf("couldn't open %s\n",device);
       return -1;
     }  

printf("Initializing \n");

sleep(2);//flush any pending signals

zero_signal.sa_handler = terminate;

sigaction(SIGIO, &zero_signal,NULL); //install signal handler
fcntl(fd, F_SETOWN,getpid()); //set signal ownership
oflags = fcntl(fd, F_GETFL); //get current flags
fcntl(fd,F_SETFL, oflags|FASYNC);//add FASYNC flag to them



//printf("hit Cntrl-C to exit\n");

printf("starting counter\n");
ioctl(fd,ICSTART,NULL);//start counter


while(waiting); //let signal handlers work;

    break;

  }

  

close(fd);

return 0;
}

---