---

E12count.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>
#include <curses.h>

#define COUNTERRESPONSE BITMASK(COUNTER)
#define RPCOUNT 10 //ncurses rows per counter


#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 device command mask (trigger) (thresh) (flags)       *
*                                                              *
*triggers                                                      *
*r - rising                                                    *
*f - falling                                                   *
*b - both                                                      *
*commands                                                      *
*d - display                                                   *
*r - run                                                       *
*h - halt                                                      *
*c - config accepts the trigger,thresh&flags arguements        *
*s - zero signal notification on                               *
*o - zero signal notification off                              *
*flags                                                         *
*s - autostop                                                  *
*l - autoload                                                  *
*n - notify at zero                                            *
*                                                              *
*examples:                                                     *
*E12Count /dev/37e12 c 0xff r 0x100 l n                        *
*E12Count /dev/37e12 r 0xff                                    *
*E12Count /dev/37e12 d 0xff                                    *
****************************************************************\n";



printf("%s",help_table);


return 0;
}

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


static int onescount(__u8 mask)
{
int ones=0;
int count;

for(count=0;count<=7;count++)
  {
  ones += mask&0x01;
  mask >>= 1;
  }

return ones;
}



static int InitWindow(WINDOW *wmain,int mask)
{
char counterstring[50];
int countnum = onescount(mask);
int counter;

wmain = initscr();
start_color();
cbreak();

wmain = newwin((RPCOUNT*countnum),50, 0 , 0);

init_pair(1, COLOR_BLACK, COLOR_GREEN);
wattrset(wmain,COLOR_PAIR(1));
wbkgd(wmain,COLOR_PAIR(1));
werase(wmain);
box(wmain, ACS_VLINE, ACS_HLINE);


for(counter=0;counter<=7;counter++)
{
if(mask&BITMASK(counter))
  {
sprintf(counterstring,"counter %u",counter);
mvwaddstr(wmain, RPCOUNT*counter, 3, counterstring);
}
}

wrefresh(wmain);
nodelay(wmain,TRUE);

return 0;
}

static int DestroyWindow(WINDOW *win)
{
    delwin(win);
    endwin();
    return  0;
}



static void DisplayCounters(int fd,__u8 mask)
{
Cop_Data *Cop = CopDeviceCreate(0);
int rxnum;
__u32 typemask; 
WINDOW *winmain = NULL;
int counter;
__u8 buffer[100];

InitWindow(winmain,mask); 

while((getch())!=0x1b)/*escape char not pressed*/
  {
    for(counter=0;counter<=7;counter++)
      {/*send out requests for data*/
    if(mask&BITMASK(counter))
      E12_CounterReadRQ(fd, counter);
      }


    /*get any pending data from the 37e12*/
    rxnum = read(fd,buffer,sizeof(buffer));
    typemask =  E12_Packet_Route(Cop, buffer, rxnum);
    
    /*update display with new data*/
    for(counter=0;counter<=7;counter++)
      {/*send out requests for data*/
    if(Cop->parsemask.counter&BITMASK(counter))
      mvwprintw(winmain, RPCOUNT*counter, 20, "[%x]",Cop->counter[counter]);
      }
  }
DestroyWindow(winmain);
}



int main(int argc,char **argv)
{
int counter=0;
int trigger,flags,flagnum;
int thresh=0;
__u8 mask;
char command;
char *device;
__u16 threshold;
int fd;

printf("argc=%u\n",argc);

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

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

switch(command)
  {
  case 'd'://display command
    DisplayCounters(fd,mask);
    close(fd);
    return 0;


  case 'c'://configuration command
    ARGCHECK(6);
printf("configuration command\n");

trigger = NOE;//by default, no trigger

  switch(*argv[4])
    {//get trigger arg
    case 'r':
      trigger = RISEE;
      break;
    case 'f':
      trigger = FALLE;
      break;
    case 'b':
      trigger = ANYE;
      break;
    }

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

printf("threshold = %x\n",threshold);

flags = 0;//zero out flags bitmask

printf("flags=%u, parsing for flag args\n",flags);
for(flagnum=0;(flagnum<(argc-6));flagnum++)
  {
    printf("parsing flag %u\n",flagnum);
    switch(*argv[flagnum+6])
      {
      case 's':
    flags|=AUTOSTOP;
    break;

      case 'l':
    flags|=AUTOLOAD;
    break;
      
      case 'n':
    flags|=ANOTE;
    break;

      }
  }

printf("flags = %x\n",flags);

 for(counter=0;counter<=7;counter++)
      {/*send out requests for data*/
    if(mask&BITMASK(counter))
      {
        printf("configuring counter %u\n",counter);
        E12_CountConfig(fd, counter, trigger, thresh,flags);
      }   
   }

printf("counters configured");
   close(fd);
   return 0;
 
 
  case 'r':/*run*/ 
    E12_CountCommand(fd,ICSTART);
    close(fd);
    return 0;


  case 'h':/*halt*/
    E12_CountCommand(fd,ICSTOP);
    close(fd);
    return 0;

  case 's':
    E12_CountCommand(fd,ICNOTIFYON);    
    close(fd);
    return 0;


  case 'o':
    E12_CountCommand(fd,ICNOTIFYOFF);  
    close(fd);
    return 0;
  }

  
printf("invalid command\n");
help();
close(fd);
return 0;
}

---