#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;  
 
 
 
}