/***************************************
*  sy127_set.c                         *
*                                      *
* SET Parameters of CAEN HV Supply     *
*                                      *
***************************************/

#include <stdio.h>
#include <errno.h>
#include <ctype.h>
#include "a200.h"
#include "../lib/mylib1.h"

char *caller;

sighand(signal)
register int signal;
{
   printf(" %s :  signal %d received \n",*caller, signal);
   if ( signal >= 2 && signal <= 3){  /* ^C or ^E ?    */
      A200_end();
      exit(0);
   }
}

main(argc, argv)
int argc;
char *argv[];
{
   short i, j, chan, value, code;
   char *par_code, *crate_code, *chan_code, *set_code;
   short par_val, crate_val, chan_val, set_val;
   short map[40];
   int tot_chan;
   char *group_name[8];
   group_name[0] = "ALL";
   group_name[1] = "A";
   group_name[2] = "B";
   group_name[3] = "C";
   group_name[4] = "D";
   group_name[5] = "E";
   group_name[6] = "F";
   group_name[7] = "G";

   intercept(sighand);

   caller = argv[0];
   if (argc < 2 ){
      printf(" check_group  : check group assignement of CAEN HV Supply \n");
      printf("\n usage     : check_group crate_nr \n");
      exit(0);
   }

   crate_code = argv[1];
   crate_val = (short) atoi(crate_code);

   A200_init();

   /* read HV map */
   HV_Map(crate_val);
   for ( j = 0; j < 8; j++){
      get_map( crate_val, chan_val = ALL + j, map);
      printf("\n\n channels belonging to GROUP %s: \n", group_name[j]);
      tot_chan = 0;
      for ( i = 0; i < 40; i++)
         if (map[i]){
            tot_chan++;
            printf(" nr. %d\n", i); 
         }
      printf(" \n total nr of channels GROUP %s: %d\n\n", group_name[j],
      tot_chan);
   }

   A200_end();
}