Subversion Repositories f9daq

#include <ansi_c.h>
#include "CAENV830.h"
#include "CAENV830_DEF.h"

#ifdef SISVME
#include "sisvme_dll.h"
#endif
#ifdef WIENVME
#include "wienvme_dll.h"
#endif

static unsigned long ModuleAddress[10];


int _VI_FUNC V830_map (int ModuleNumber, unsigned long ModuleOffset, int print)
{
  unsigned short geo, fw;
  unsigned short boardid1, boardid2, boardid3;
  unsigned short serial1, serial2 ;
 
  ModuleAddress[ModuleNumber] = ModuleOffset;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + CAENV830_FW, &fw);
  geo=0;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + CAENV830_GEO, &geo);
  VME_A24D16_R(ModuleAddress[ModuleNumber] + 0x4000 + 0x8036 ,&boardid1 ) ;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + 0x4000 + 0x803A,&boardid2 ) ;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + 0x4000 + 0x803E,&boardid3 ) ;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + 0x4000 + 0x8F02, &serial1 ) ;
  VME_A24D16_R(ModuleAddress[ModuleNumber] + 0x4000 + 0x8F06, &serial2 ) ;
  if (print) {
    printf("firmware = %d.%d\n", (fw>>4)&0xF, fw&0xF);
    printf("geo      = %d,%d,%d,%d,%d\n",
            geo>>4&0x1,geo>>3&0x1,geo>>2&0x1,geo>>1&0x1,geo&0x1 );
           
    printf ( "board ID: 0x%02X%02X%02X\n",
              boardid1&0xFF,boardid2&0xFF,boardid3&0xFF) ;
    printf ( "serial #: 0x%02X%02X\n",
              serial1&0xFF,serial2&0xFF) ;
  }
  return 0;
}


int _VI_FUNC V830_init (int ModuleNumber)
{
  unsigned short dum16;
  unsigned int dum32;
  dum16=0xFFFF;
  VME_A24D16_W(ModuleAddress[ModuleNumber] + 0x1120, &dum16); // module reset
  VME_A24D16_W(ModuleAddress[ModuleNumber] + 0x1122,  &dum16); // software clear

  dum16=0;     
  VME_A24D16_W(ModuleAddress[ModuleNumber] + 0x1108, &dum16) ;  // auto reset,beer|periodic trigger
                                                          // 1001|0010
                                                         
  dum32= 2500000;                                                      
  VME_A24D32_W(ModuleAddress[ModuleNumber] + 0x1104, &dum32) ; // period=2.5M*400ns
 
  dum32=0xFFFFFFFF;
  VME_A24D32_W(ModuleAddress[ModuleNumber] + 0x1100, &dum32) ; //enable all channels
 
  printf ( "Module %d initialized!\n", ModuleNumber ) ;
  return 0;
}

int _VI_FUNC V830_clear (int ModuleNumber)
{
  unsigned short dum16=0xFFFF;
  VME_A24D16_W(ModuleAddress[ModuleNumber] + 0x1122,&dum16); // software clear
 
  return 0;
 
}


int _VI_FUNC V830_status (int ModuleNumber)
{

 int status=0; 
 VME_A24D16_W(ModuleAddress[ModuleNumber] + 0x110E, &status); //status reg.
 return status;
}



int _VI_FUNC V830_read (int ModuleNumber, unsigned long whereto[])
{
  int status, ndata;
  int i ;
 
  ndata = 0;
 
//  status = V830_status ( ModuleNumber ) ;
//  if (!(status & 0x1)) return 0; //ce ni dredy

  for ( i=32; --i>0; ) {
   VME_A24D32_R(ModuleAddress[ModuleNumber] + 0x1000 + i*0x4, &whereto[i] ) ;
    //printf ( "%2d - %d\n", i, whereto[i] ) ;
  }
//  V830_init ( ModuleNumber ) ;
 
  return 32;  

}