Subversion Repositories f9daq

Compare Revisions

Ignore whitespace Rev 144 → Rev 145

/lab/sipmscan/camac_gui_windowed.tar.gz
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
## -1 +0,0 ##
-application/octet-stream
\ No newline at end of property
Index: sipmscan/trunk/start.cxx
===================================================================
--- sipmscan/trunk/start.cxx (revision 144)
+++ sipmscan/trunk/start.cxx (nonexistent)
@@ -1,8 +0,0 @@
-
-int start(char *path="."){
- gROOT->SetMacroPath(path);
- gROOT->ProcessLine(".L libdaqusb.so");
- gROOT->ProcessLine(".L libvxi11.so");
- gROOT->ProcessLine(".L windowed_test.C+");
- windowed_test();
-}
/sipmscan/trunk/start.cxx
Property changes:
Deleted: svn:executable
## -1 +0,0 ##
-*
\ No newline at end of property
Index: sipmscan/trunk/MIKRO/mikro_ctrl_d
===================================================================
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/sipmscan/trunk/MIKRO/mikro_ctrl_d
Property changes:
Deleted: svn:mime-type
## -1 +0,0 ##
-application/octet-stream
\ No newline at end of property
Index: sipmscan/trunk/MIKRO/quick_scan.sh
===================================================================
--- sipmscan/trunk/MIKRO/quick_scan.sh (revision 144)
+++ sipmscan/trunk/MIKRO/quick_scan.sh (nonexistent)
@@ -1,15 +0,0 @@
-#! /bin/bash
-
-#fname=$1
-#num_events=$2
-
-#./addheader $fname 1 $num_events 0 0 0 0 0 0
-#./addheader $fname 3 0 0 0 0 0 0
-#./daq $fname $num_events
-#./addheader $fname 2
-
-position=`./mikro_ctrl -a | grep -o '[[:digit:]]*' | awk -F : '{if(NR==2 || NR==5){print $1}}'`
-#pos_x=${position}[0]
-#pos_y=${position}[1]
-#echo "position x = " $pos_x " position y = " $pos_y
-echo $position >> test.txt
Index: sipmscan/trunk/MIKRO/rs232.c
===================================================================
--- sipmscan/trunk/MIKRO/rs232.c (revision 144)
+++ sipmscan/trunk/MIKRO/rs232.c (nonexistent)
@@ -1,125 +0,0 @@
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <string.h>
-#include <termios.h>
-
-#include "rs232.h"
-//#define DEBUG
-
-const int debug=0;
-
-struct termios tattr;
-
-int Delay(double sec){
- return usleep((int) (sec*1e6) );
-}
-
-int SetComTime(int fd, double timeout_seconds){
-
- int ntenth;
-
- ntenth = (int)(timeout_seconds*10);
- tattr.c_cc[VTIME] = ntenth;
- tcsetattr(fd, TCSANOW, &tattr);
-#ifdef DEBUG
- printf("SetComTime: %d\n", ntenth);
-#endif
- return 0;
-}
-
-int FlushInQ(int fd){
- return 0;
-}
-
-int FlushOutQ(int fd){
- return 0;
-}
-
-int ComWrt (int fd, char* cmd, int Count ){
-
- int nwr;
-
- nwr=write(fd, cmd, Count);
-#ifdef DEBUG
- printf ( "ComWrt: %d, %d, %s\n", Count, nwr, cmd);
-#endif
- return nwr;
-}
-
-int ComRdTerm (int fd, char *response, int nb, int termchar)
-{
-
- int nread, nloop;
-
- nread=0;
- nloop=0;
-
-#ifdef DEBUG
- printf ( "ComRdTerm start\n") ;
-#endif
-// rewind(fpr);
- while (1) {
- if (nloop++ == nb) return -1;
-// nread += read ( fd, response+nread, nb-nread );
- nread += read ( fd, response+nread, 1 );
-#ifdef DEBUG
- response[nread]=0;
- printf ("ComRdTerm nread: %d %d %s\n", nloop, nread, response) ;
-#endif
- if (nread>1) if(response[nread-1] == termchar) break;
- }
-
- nread = nread - 2;
- response[nread]=0;
-#ifdef DEBUG
- printf("CmdRdTerm: %s\n",response);
-#endif
- return nread;
-}
-
-int OpenComConfig( char *dev, char * device_name, long Baud_Rate, int Parity, int Data_Bits,
- int Stop_Bits, int Input_Queue_Size, int Output_Queue_Size ){
-
- int fd;
-
- memset (&tattr, 0, sizeof tattr);
-
- fd=open(dev, O_RDWR | O_NOCTTY | O_SYNC);
-// see 'man tcsetattr'
- tcgetattr (fd, &tattr);
- cfmakeraw(&tattr);
- cfsetspeed(&tattr, B38400);
-// cfsetispeed(&tattr, B38400);
-// cfsetospeed(&tattr, B38400);
-// input modes
- tattr.c_iflag&=~IGNBRK;
- tattr.c_iflag&=~(IGNCR | ICRNL | INLCR);
- tattr.c_iflag&=~(IXON | IXOFF | IXANY);
-// output modess
- tattr.c_oflag=0;
-// local modes
- tattr.c_lflag=0;
- tattr.c_lflag &= ~(ICANON|ECHO) ; // canonical mode and echo input char
-// control modes
- tattr.c_cflag |= (CLOCAL | CREAD); // ignore modem controls,
- // enable reading
- tattr.c_cflag &= ~(PARENB | PARODD); // shut off parity
- tattr.c_cflag &= ~CSTOPB; // set two stop bits
- tattr.c_cflag &= ~CRTSCTS; // enable RTS/CTS flow control
-
- tattr.c_cc[VMIN] = 0;
- tattr.c_cc[VTIME] = 2;
- tcsetattr(fd, TCSAFLUSH, &tattr);
-
-#ifdef DEBUG
- printf("OpenComConfig\n");
-#endif
- return fd; ;
-}
-
-
-int CloseCom (int fd){
-
- close(fd);
- return;
-}
Index: sipmscan/trunk/MIKRO/Makefile
===================================================================
--- sipmscan/trunk/MIKRO/Makefile (revision 144)
+++ sipmscan/trunk/MIKRO/Makefile (nonexistent)
@@ -1,4 +0,0 @@
-mikro_ctrl: mikro_ctrl.c rs232.c rs232.h MIKRO.c
- gcc mikro_ctrl.c rs232.c MIKRO.c -o mikro_ctrl -lm
-mikro_ctrl_d: mikro_ctrl.c rs232.c rs232.h MIKRO.c
- gcc mikro_ctrl.c rs232.c MIKRO.c -o mikro_ctrl_d -lm -DDEBUG
Index: sipmscan/trunk/MIKRO/rs232.h
===================================================================
--- sipmscan/trunk/MIKRO/rs232.h (revision 144)
+++ sipmscan/trunk/MIKRO/rs232.h (nonexistent)
@@ -1,20 +0,0 @@
-#ifndef _RS232_H_
-#define _RS232_H_
-#include <stdlib.h>
-#include <stdio.h>
-
-#define LWRS_HWHANDSHAKE_OFF 0
-#define LWRS_HWHANDSHAKE_CTS_RTS_DTR 1
-#define LWRS_HWHANDSHAKE_CTS_RTS 2
-
-int Delay(double seconds);
-int FlushInQ(int fd);
-int FlushOutQ(int fd);
-int ComWrt (int fd, char* cmd, int Count ) ;
-int ComRdTerm (int fd, char* result, int count, int termchar );
-int OpenComConfig(char *dev, char * device_name, long Baud_Rate, int Parity, int Data_Bits,
- int Stop_Bits, int Input_Queue_Size, int Output_Queue_Size );
-int CloseCom (int fd);
-int SetComTime(int fd, double timeout_seconds);
-#endif
-
Index: sipmscan/trunk/MIKRO/MIKRO.c
===================================================================
--- sipmscan/trunk/MIKRO/MIKRO.c (revision 144)
+++ sipmscan/trunk/MIKRO/MIKRO.c (nonexistent)
@@ -1,296 +0,0 @@
-#include "rs232.h"
-#include "MIKRO.h"
-
-//#define DEBUG
-
-#define COMWAIT 0.5
-#define COMDELAY 0.1
-
-static char MIKRO_Send[100], MIKRO_Receive[100];
-static char MIKRO_Device, MIKRO_Axes, MIKRO_Response;
-static int MIKRO_Port;
-static int nin, nout, rstat;
-static int MIKRO_type[100];
-
-int MIKRO_Cmd (int node, char *cmd)
-{
- printf("Command: %1d %s\n",node,cmd);
- Delay(COMDELAY);
- FlushInQ (MIKRO_Port);
- nout = sprintf (MIKRO_Send, "%1d %s\r", node, cmd);
- ComWrt (MIKRO_Port, MIKRO_Send, nout);
- if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
- if (nin==2) return (0);
- }
- return (-1);
-}
-
-int MIKRO_Set (int node, char cmd[], int val)
-{
- printf("Command: %1d %s %d\n",node,cmd, val);
- Delay(COMDELAY);
- FlushInQ (MIKRO_Port);
- nout = sprintf (MIKRO_Send, "%1d %s %d\r", node, cmd, val);
- ComWrt (MIKRO_Port, MIKRO_Send, nout);
- if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
- if (nin==2) return (0);
- }
- return (-1);
-}
-
-int MIKRO_Get (int node, char cmd[], int *val)
-{
- short int stmp;
-
- Delay(COMDELAY);
- FlushInQ (MIKRO_Port);
- nout = sprintf (MIKRO_Send, "%1d %s\r", node, cmd);
- ComWrt (MIKRO_Port, MIKRO_Send, nout);
- if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
- if (nin>0){
-// MIKRO_Receive[--nin]=0;
- switch (nin) {
- case 9:
- sscanf (MIKRO_Receive, "%*x %hx",&stmp);
- *val=stmp;
- return (0);
- case 13:
- sscanf (MIKRO_Receive, "%*x %x",val);
- return (0);
- default:
- printf("Node %d Com error => bytes rcved=0x%02x buf=%s\n",node,nin,MIKRO_Receive);
- break;
- }
- }
- }
- return (-1);
-}
-
-int MIKRO_GetStat (int node)
-{
- int tmp;
-
- Delay(COMDELAY);
- FlushInQ (MIKRO_Port);
- nout = sprintf (MIKRO_Send, "%1d st\r", node);
- ComWrt (MIKRO_Port, MIKRO_Send, nout);
- if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
-// if (nin>0) nin--;
- MIKRO_Receive[nin]=0;
- if (nin==9) {
- tmp=0;
- sscanf (MIKRO_Receive, "%*x %hx",(short int *)&tmp);
- return (tmp);
- }
- }
- return (-1);
-}
-
-int _VI_FUNC MIKRO_Open (char * dev)
-{
-
-
- MIKRO_Port=OpenComConfig (dev, "", 38400, 0, 8, 1, 512, 512);
-// SetXMode (MIKRO_Port, 0);
-// SetCTSMode (MIKRO_Port, LWRS_HWHANDSHAKE_OFF);
-// SetComTime (MIKRO_Port, COMWAIT);
-
- return 0;
-}
-
-int _VI_FUNC MIKRO_Init (int node, int type)
-{
- MIKRO_type[node]=type;
- Delay(0.1);
- MIKRO_Cmd(node,"ok 1");
- MIKRO_Cmd(node,"ab");
- switch (type){
- case 1: // 3M Linear
- MIKRO_Cmd(node,"k 1");
- MIKRO_Cmd(node,"ad 200");
- MIKRO_Cmd(node,"aa 2");
- MIKRO_Cmd(node,"fa 1");
- MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
- MIKRO_Cmd(node,"sr 1000");
- MIKRO_Cmd(node,"sp 750");
- MIKRO_Cmd(node,"ac 100");
- MIKRO_Cmd(node,"dc 200");
- MIKRO_Cmd(node,"por 28000");
- MIKRO_Cmd(node,"i 600");
- MIKRO_Cmd(node,"ano 2350");
- MIKRO_Cmd(node,"ls 1");
- MIKRO_Cmd(node,"hp 1");
- MIKRO_Cmd(node,"hf 1");
- break;
- case 2: // 3M Rotary
- MIKRO_Cmd(node,"k 1");
- MIKRO_Cmd(node,"ad 200");
- MIKRO_Cmd(node,"aa 1");
- MIKRO_Cmd(node,"fa 1");
- MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
- MIKRO_Cmd(node,"sr 1000");
- MIKRO_Cmd(node,"sp 550");
- MIKRO_Cmd(node,"ac 100");
- MIKRO_Cmd(node,"dc 200");
- MIKRO_Cmd(node,"por 28000");
- MIKRO_Cmd(node,"i 600");
- MIKRO_Cmd(node,"ano 2350");
- MIKRO_Cmd(node,"ls 99");
- MIKRO_Cmd(node,"hp 1");
- MIKRO_Cmd(node,"hf 1");
- break;
- case 3: // 4M Linear
- MIKRO_Cmd(node,"k 1");
- MIKRO_Cmd(node,"ad 1000");
- MIKRO_Cmd(node,"aa 2");
- MIKRO_Cmd(node,"fa 1");
- MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
- MIKRO_Cmd(node,"sr 1000");
- MIKRO_Cmd(node,"sp 1000");
- MIKRO_Cmd(node,"ac 100");
- MIKRO_Cmd(node,"dc 200");
- MIKRO_Cmd(node,"por 28000");
- MIKRO_Cmd(node,"i 600");
- MIKRO_Cmd(node,"ano 2600");
- MIKRO_Cmd(node,"ls 1");
- MIKRO_Cmd(node,"hp 1");
- MIKRO_Cmd(node,"hf 1");
- break;
- case 4: // 4M Rotary
- MIKRO_Cmd(node,"k 1");
- MIKRO_Cmd(node,"ad 100");
- MIKRO_Cmd(node,"aa 1");
- MIKRO_Cmd(node,"fa 1");
- MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
- MIKRO_Cmd(node,"sp 800");
- MIKRO_Cmd(node,"sr 1000");
- MIKRO_Cmd(node,"ac 100");
- MIKRO_Cmd(node,"dc 200");
- MIKRO_Cmd(node,"por 28000");
- MIKRO_Cmd(node,"i 600");
- MIKRO_Cmd(node,"ano 2600");
- MIKRO_Cmd(node,"ls 99");
- break;
- default:
- break;
- }
- MIKRO_Cmd(node,"rd 0");
- MIKRO_Cmd(node,"n 2");
- MIKRO_Cmd(node,"en");
- if (type != 0){
- MIKRO_Cmd(node,"eeboot 1");
- MIKRO_Cmd(node,"eepsav 1");
- Delay(0.1);
- }
- return 0;
-}
-
-int _VI_FUNC MIKRO_Reset (int node)
-{
-
- MIKRO_Cmd(node,"di"); // disables the node
-
- Delay(COMDELAY);
- nout = sprintf (MIKRO_Send, "%1d rn\r", node); // resets the node
- ComWrt (MIKRO_Port, MIKRO_Send, nout);
-
- SetComTime (MIKRO_Port, 20);
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
- SetComTime (MIKRO_Port, COMWAIT);
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
-// if (nin!=0) nin--;
-// MIKRO_Receive[nin]=0;
- printf("%s\n",MIKRO_Receive);
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
- nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
-// if (nin!=0) nin--;
-// MIKRO_Receive[nin]=0;
- printf("%s\n",MIKRO_Receive);
- MIKRO_Init(node,0);
- return 0;
-}
-
-int _VI_FUNC MIKRO_ReferenceMove (int node)
-{
- int fac=10;
- int n2,as;
-
- MIKRO_Cmd(node,"ab");
- MIKRO_Cmd(node,"en");
- MIKRO_Set(node,"ll",-1000000);
- MIKRO_Set(node,"ll",1000000);
-
- if (!(MIKRO_GetStat(node)&0x8000)){
- MIKRO_Set(node,"v", -100*fac);
- do {
- MIKRO_GetPosition(node,&n2);
- MIKRO_Get(node,"as",&as);
- printf("Approaching N-limit node=%d pos=%d speed=%d\n",node,n2,as);
- } while (MIKRO_GetStat(node)&0x1 );
- if (!(MIKRO_GetStat(node)&0x8000)){
- printf("N-limit not reached! Trying with half speed.\n");
- MIKRO_Set(node,"v", -50*fac);
- do {
- MIKRO_GetPosition(node,&n2);
- MIKRO_Get(node,"as",&as);
- printf("Approaching N-limit node=%d pos=%d speed=%d\n",node,n2,as);
- } while (MIKRO_GetStat(node)&0x1 );
- if (!(MIKRO_GetStat(node)&0x8000)){
- printf("N-limit not reached! Aborting ...\n");
- MIKRO_Cmd(node,"ab");
- return -1;
- }
- }
- }
- MIKRO_MoveFor(node,1000);
- MIKRO_Set(node,"v", -10*fac);
- do {
- MIKRO_GetPosition(node,&n2);
- MIKRO_Get(node,"as",&as);
- printf("Fine tuning 0: node=%d pos=%d speed=%d\n",node,n2, as);
- } while (MIKRO_GetStat(node)&0x1);
- if (!(MIKRO_GetStat(node)&0x8000)){
- printf("N-limit not reached! Aborting ...\n");
- MIKRO_Cmd(node,"ab");
- return -1;
- }
-
- MIKRO_MoveFor(node,1000);
- MIKRO_Set(node,"ho",0);
- MIKRO_Set(node,"ll",-100);
- MIKRO_Set(node,"ll",500100);
- return 0;
-}
-
-int _VI_FUNC MIKRO_MoveFor (int node, int dist)
-{
- MIKRO_Set(node,"lr", dist);
- MIKRO_Cmd(node,"mv");
- while (MIKRO_GetStat(node)&1) Delay(0.1);
- return 0;
-}
-
-int _VI_FUNC MIKRO_MoveTo (int node, int dest)
-{
-// printf("-> MIKRO_MoveTo \n");
- MIKRO_Set(node,"la", dest);
- MIKRO_Cmd(node,"mv");
- while (MIKRO_GetStat(node)&1) Delay(0.1);
- return 0;
-}
-
-int _VI_FUNC MIKRO_GetPosition (int node, int pos[])
-{
- MIKRO_Get(node,"pos",pos);
- return 0;
-}
-
-void _VI_FUNC MIKRO_Close (void)
-{
-CloseCom (MIKRO_Port);
-}
-
Index: sipmscan/trunk/MIKRO/mikro_ctrl
===================================================================
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/sipmscan/trunk/MIKRO/mikro_ctrl
Property changes:
Deleted: svn:executable
## -1 +0,0 ##
-*
\ No newline at end of property
Deleted: svn:mime-type
## -1 +0,0 ##
-application/octet-stream
\ No newline at end of property
Index: sipmscan/trunk/MIKRO/mikro_ctrl.c
===================================================================
--- sipmscan/trunk/MIKRO/mikro_ctrl.c (revision 144)
+++ sipmscan/trunk/MIKRO/mikro_ctrl.c (nonexistent)
@@ -1,148 +0,0 @@
-#include <stdlib.h>
-#include <stdio.h>
-#include "MIKRO.h"
-
-
-#include <getopt.h>
-
-#define MIKRO_COM "/dev/ttyUSB0"
-
-int help(){
- fprintf(stderr,"Usage: mikro [-i node][-n node] [-u up] [-d down] [-r node] [-h node] [-a] [-g] [-m pos]\n");
- fprintf(stderr," Options:\n");
- fprintf(stderr,"[-n node] -i type .. initialize node + save to EEPROM\n");
- fprintf(stderr," (1=3MLin,2=3MRot,3=4MLin,4=4MRot,0=skip\n");
- fprintf(stderr," -n node -h .. homing procedure for node\n");
- fprintf(stderr," -n node -r .. reset node\n");
- fprintf(stderr," -n node -u .. move node for +1000\n");
- fprintf(stderr," -n node -d .. move node for -1000\n");
- fprintf(stderr,"[-n node] -a .. current status of the nodes\n");
- fprintf(stderr," -n node -v value -s cmd .. set value of the cmd on the node\n");
- fprintf(stderr," -n node -g cmd .. get value of the cmd on the node\n");
- fprintf(stderr," -n node -m position .. move node to position\n");
- fprintf(stderr," -l delaysec .. loop test with the delay delaysec\n");
- return 0;
-}
-
-int main (int argc, char ** argv){
- int i,j,k;
- int node=0,opt,value=0,itype=0;
- int nr_nodes=3;
- int ierr;
- int pos,xpos,ypos,zpos;
- char custcmd[20];
- char statbits[16][10]={"Moving","In-Pos","Mode","AMN Mode","%Done","DNet","DNErr","FD-Error",
- "Disable","R-Lim","Local","Estop","Event1","P-Lim","Event2","N-Lim"};
-
- MIKRO_Open (MIKRO_COM);
-
- // ":" just indicates that this option needs an argument
- while ((opt = getopt(argc, argv, "i:av:s:l:udn:c:pm:g:hre")) != -1) {
- switch (opt) {
- case 'i':
- itype = atoi(optarg);
- if(node != 0)
- MIKRO_Init (node,itype);
- else
- for(i=1; i<nr_nodes+1; i++) MIKRO_Init (i,itype);
- break;
- case 'a':
- if(node != 0) {
- pos=0;
- ierr=MIKRO_GetStat(node);
- MIKRO_GetPosition (node, &pos);
- printf("node %d position %d status =%04x\n",node,pos,ierr);
- for(i=0; i<16; i++){
- printf("%d: %s\n", (ierr&1),statbits[i]);
- ierr>>=1;
- }
- }else{
- pos=0;
- for (j=1;j<nr_nodes+1;j++){
- ierr=MIKRO_GetStat(j);
- MIKRO_GetPosition (j, &pos);
- printf("node %d position %d status =%04x\n",j,pos,ierr);
- for(i=0; i<16; i++){
- printf("%d: %s\n", (ierr&1),statbits[i]);
- ierr>>=1;
- }
- }
- }
- break;
- case 'l':
- printf("MIKRO_MoveTo Loop\n");
- for (i=0;i<5;i++){
- xpos=i*1000+10000;
- MIKRO_MoveTo (1, xpos);
- for (j=0;j<5;j++){
- ypos=j*1000+10000;
- MIKRO_MoveTo (2, ypos);
- for (k=0;k<50;k++){
- zpos=k*1000+10000;
- MIKRO_MoveTo (3, zpos);
- printf("x=%d y=%d z=%d\n",xpos,ypos,zpos);
- Delay(atof(optarg));
- }
- }
- }
- break;
- case 'n':
- node = atoi(optarg);
- break;
- case 'm':
- MIKRO_MoveTo (node, atoi(optarg));
- printf("MIKRO_MoveTo node=%d pos=%d \n",node,atoi(optarg));
- MIKRO_GetPosition (node, &i);
- printf("node %d position %d \n",node,i);
- break;
- case 'v':
- value=atoi(optarg);
- break;
- case 's':
- MIKRO_Set (node,optarg,value);
- printf("MIKRO_Set node %d cmd=%s val=%d\n",node,optarg, value);
- break;
- case 'g':
- MIKRO_Get (node,optarg,&i);
- printf("MIKRO_Get node %d cmd=%s val=%d\n",node,optarg, i);
- break;
- case 'h':
- printf("MIKRO_ReferenceMove node=%d\n",node);
- MIKRO_ReferenceMove (node);
- break;
- case 'r':
- printf("MIKRO_Reset node=%d\n",node);
- MIKRO_Reset (node);
- break;
- case 'u':
- MIKRO_Set(node,"lr", 1000);
- MIKRO_Cmd(node,"mv");
- break;
- case 'd':
- MIKRO_Set(node,"lr", -1000);
- MIKRO_Cmd(node,"mv");
- break;
- case 'e':
- MIKRO_Cmd(node,"ab");
- MIKRO_Cmd(node,"n 2");
- MIKRO_Cmd(node,"en");
- break;
- case 'c': // cust. com.
- sprintf(custcmd,"%s",optarg);
- MIKRO_Cmd(node,custcmd);
- break;
- case 'p': // get pos.
- if(node != 0){
- MIKRO_GetPosition (node, &pos);
- printf("%d\n",pos);
- }
- break;
- default: // '?'
- help();
- break;
- }
- }
- if (argc==1) help();
- MIKRO_Close ();
- return 0;
-}
Index: sipmscan/trunk/MIKRO/MIKRO.h
===================================================================
--- sipmscan/trunk/MIKRO/MIKRO.h (revision 144)
+++ sipmscan/trunk/MIKRO/MIKRO.h (nonexistent)
@@ -1,21 +0,0 @@
-
-#define _VI_FUNC
-int _VI_FUNC MIKRO_Open (char *dev);
-
-int _VI_FUNC MIKRO_Reset (int node);
-
-int _VI_FUNC MIKRO_Init (int node, int type);
-
-int _VI_FUNC MIKRO_ReferenceMove (int node);
-
-int _VI_FUNC MIKRO_MoveFor (int node, int dist);
-
-int _VI_FUNC MIKRO_MoveTo (int node, int dest);
-
-int _VI_FUNC MIKRO_GetPosition (int node, int pos[]);
-
-int _VI_FUNC MIKRO_SetZero (char axes);
-
-int _VI_FUNC MIKRO_SetPlain (char axes);
-
-void _VI_FUNC MIKRO_Close (void);
Index: sipmscan/trunk/configure
===================================================================
--- sipmscan/trunk/configure (revision 144)
+++ sipmscan/trunk/configure (nonexistent)
@@ -1,289 +0,0 @@
-#!/bin/bash
-
-function colorecho
-{
- echo -e$2 "\033[33m$1\033[39m"
-}
-
-function errorecho
-{
- echo -e "\031[33m$1\033[39m"
-}
-
-function helptext()
-{
- colorecho "#------------------------------"
- colorecho "# Configure instructions: -----"
- colorecho "#------------------------------"
- colorecho ""
- colorecho "./configure [option] [type] [install directories] [ostype]"
- colorecho ""
- colorecho "[option] = Option for configure:"
- colorecho " help Display configure instructions."
- colorecho " nomake Only prepare system dependent files (base directory and online/offline mode)."
- colorecho " all Prepare system dependent files and make used libraries."
- colorecho " clean Clean the installation directory. Does not clean the results directory."
- colorecho " compress Compress the source code in a tar-ball."
- colorecho ""
- colorecho "[type] = Configure for use in online or offline mode (only needed in nomake and all):"
- colorecho " I Online mode."
- colorecho " O Offline mode (no connection to CAMAC, motor, voltage supply and scope)."
- colorecho " S Offline mode with scope connection (no connection to CAMAC, motor and voltage supply)."
- colorecho ""
- colorecho "[install directories] = Directories where ROOT and NET-SNMP are installed (when running with superuser, this is important, otherwise optional):"
- colorecho " --root-install=/root/install/directory"
- colorecho " --snmp-install=/snmp/install/directory"
- colorecho ""
- colorecho "[ostype] = Specific setting for 64bit or 32bit version of OS (optional):"
- colorecho " --ostype=i686 32bit OS type"
- colorecho " --ostype=x86_64 64bit OS type"
- colorecho ""
- colorecho "Example:"
- colorecho " ./configure all I --root-install=/home/user/root --snmp-install=/home/user/snmp"
- colorecho ""
- colorecho "#------------------------------"
-}
-
-# Check for arguments
-if [ "$1" == "" ]; then
- errorecho "Error! No arguments supplied."
- echo ""
- helptext
- exit 1
-else
- # When using help, only display help and then exit
- if [ "$1" == "help" ]; then
- helptext
- exit 0
- fi
-
- # Print help and exit if we give a wrong first argument
- if [ "$1" != "nomake" ] && [ "$1" != "all" ] && [ "$1" != "clean" ] && [ "$1" != "compress" ]; then
- errorecho "Error! Wrong configuration option selected (first argument)."
- echo ""
- helptext
- exit 1
- fi
-
- startdir=$PWD
-
- # Check for ROOT and NET-SNMP install directories and for OS type
- snmpsearch="--snmp-install="
- rootsearch="--root-install="
- ossearch="--ostype="
- snmpdirectory=-1
- rootdirectory=-1
- osmanual=-1
- for var in $@
- do
- case $var in
- "$snmpsearch"*)
- snmpdirectory=${var#$snmpsearch}
- echo "NET-SNMP directory: $snmpdirectory";;
- "$rootsearch"*)
- rootdirectory=${var#$rootsearch}
- echo "ROOT directory: $rootdirectory";;
- "$ossearch"*)
- osmanual=${var#$ossearch};;
- *) ;;
- esac
- done
-
- # If n ot supplied, check automatically for OS type
- if [ $osmanual == -1 ]; then
- ostype=`uname -p`
- if [ "$ostype" != "x86_64" ] && [ "$ostype" != "i686" ]; then
- ostype=`uname -i`
- if [ "$ostype" != "x86_64" ] && [ "$ostype" != "i686" ]; then
- ostype=`uname -m`
- fi
- fi
- else
- ostype=$osmanual
- fi
-
- # Check for installation directory of ROOT - if variables not currently set, remind user to set them before running make
- if [ "$1" != "clean" ] && [ "$1" != "compress" ]; then
- if [ $rootdirectory != -1 ]; then
- printenv ROOTSYS > /dev/null
- if [ $? != 0 ]; then
- colorecho "ROOT environment variables not set. Please run \"source $rootdirectory/bin/thisroot.sh\", before using make."
- fi
- else
- colorecho "Before running make, please make sure ROOT environment variables are set."
- fi
- fi
-
- # Compiles the table microcontroller program
- if [ "$1" == "all" ]; then
- if [ -d $startdir/MIKRO ]; then
- cd $startdir/MIKRO
- rm -f $startdir/MIKRO/mikro_ctrl
- make
- cd $startdir
- fi
- fi
-
- # When using compress, only create a tar-ball and then exit
- if [ "$1" == "compress" ]; then
- cd $startdir
- if [ ! -d $startdir/camac_gui_windowed ]; then
- mkdir $startdir/camac_gui_windowed
- mkdir $startdir/camac_gui_windowed/results
- echo "Copying source files to temporary directory $startdir/camac_gui_windowed..."
- cp -r configure daq.h daqscope.h GuiLinkDef.h libxxusb.cpp root_include.h README start.cxx windowed_test.C windowed_test.h wusbcc.h wusbxx_dll.c wusbxx_dll.h mpod/ MIKRO/ vxi11_x86_64/ vxi11_i686/ input/ fieldpoint/ ./camac_gui_windowed/
- cd $startdir/camac_gui_windowed
- echo "Cleaning the base directory in $startdir/camac_gui_windowed..."
- rm -f *.bakc
- cd $startdir/camac_gui_windowed/input
- echo "Cleaning the input directory in $startdir/camac_gui_windowed/input..."
- rm -f *.bak
- cd $startdir/camac_gui_windowed/vxi11_x86_64
- echo "Cleaning the 64 bit VXI11 directory in $startdir/camac_gui_windowed/vxi11_x86_64..."
- rm -f *.bak
- make clean
- cd $startdir/camac_gui_windowed/vxi11_i686
- echo "Cleaning the 32 bit VXI11 directory in $startdir/camac_gui_windowed/vxi11_i686..."
- rm -f *.bak
- make clean
- cd $startdir
- echo "Creating a tar-ball camac_gui_windowed.tar.gz..."
- tar czf $startdir/camac_gui_windowed.tar.gz ./camac_gui_windowed
- echo "Removing the temporary directory $startdir/camac_gui_windowed..."
- rm -r $startdir/camac_gui_windowed
- exit 0
- else
- errorecho "Error! Directory ./camac_gui_windowed already exists."
- exit 1
- fi
- fi
-
- # Configure the workstation information and directory of program (0 if we find something and 1 otherwise)
- basedir=$(echo $startdir | sed 's/\//\\\//g')
-
- if [ "$1" == "nomake" ] || [ "$1" == "all" ]; then
- if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
- # Setting up the current working computer
- grep -q "#define WORKSTAT 'N'" $startdir/input/workstation.h.in
- if [ $? == 0 ]; then
- sed "s/define WORKSTAT 'N'/define WORKSTAT '$2'/" $startdir/input/workstation.h.in > $startdir/input/workstation.h.mid
- fi
- grep -q "#define rootdir \"path-to-installation\"" $startdir/input/workstation.h.in
- if [ $? == 0 ]; then
- sed "s/path-to-installation/$basedir/g" $startdir/input/workstation.h.mid > $startdir/input/workstation.h.mid2
- rm $startdir/input/workstation.h.mid
- fi
- # Check if we are connected to IJS network
- etnet=$(ifconfig | grep "178.172.43.")
- if [ "$etnet" == "" ]; then
- sed "s/define IJSNET 1/define IJSNET 0/" $startdir/input/workstation.h.mid2 > $startdir/workstation.h
- rm $startdir/input/workstation.h.mid2
- else
- cp $startdir/input/workstation.h.mid2 $startdir/workstation.h
- rm $startdir/input/workstation.h.mid2
- fi
- # Setting up the OS type specific files
- grep -q "#include \"vxi11_user.h\"" $startdir/input/daqscope.C.in
- if [ $? == 0 ]; then
- sed "s/vxi11_user.h/.\/vxi11_$ostype\/vxi11_user.h/g" $startdir/input/daqscope.C.in > $startdir/daqscope.C
- fi
- grep -q "SHLIB = \$(LIBFILE) libvxi11.a" $startdir/input/Makefile.in
- if [ $? == 0 ]; then
- if [ "$2" == "I" ]; then
- sed "s/SHLIB = \$(LIBFILE) libvxi11.a/SHLIB = \$(LIBFILE) libvxi11.a -lusb/g" $startdir/input/Makefile.in > $startdir/Makefile.mid
- fi
- fi
- grep -q "CAMLIB = \$(LIBFILE)" $startdir/input/Makefile.in
- if [ $? == 0 ]; then
- if [ "$2" == "I" ]; then
- sed "s/CAMLIB = \$(LIBFILE)/CAMLIB = \$(LIBFILE) -lusb/g" $startdir/Makefile.mid > $startdir/Makefile.mid2
- rm $startdir/Makefile.mid
- elif [ "$2" == "O" ] || [ "$2" == "S" ]; then
- cp $startdir/input/Makefile.in $startdir/Makefile.mid2
- fi
- fi
- sed "s/OSTYPE=none/OSTYPE=$ostype/g" $startdir/Makefile.mid2 > $startdir/Makefile
- rm $startdir/Makefile.mid2
-
- if [ "$2" == "O" ] || [ "$2" == "S" ]; then
- cp $startdir/input/daqusb.C.offline $startdir/daqusb.C
- cp $startdir/input/libxxusb.h.offline $startdir/libxxusb.h
- cp $startdir/input/usb.h.offline $startdir/usb.h
- elif [ "$2" == "I" ]; then
- cp $startdir/input/daqusb.C.online $startdir/daqusb.C
- cp $startdir/input/libxxusb.h.online $startdir/libxxusb.h
- fi
-
- echo "#!/bin/bash" > $startdir/start.sh
- echo "dir=\`dirname \$0\`" >> $startdir/start.sh
- echo "" >> $startdir/start.sh
- echo "snmpdirectory=$snmpdirectory" >> $startdir/start.sh
- echo "rootdirectory=$rootdirectory" >> $startdir/start.sh
- echo "" >> $startdir/start.sh
- cat $startdir/input/start.sh.in >> $startdir/start.sh
- chmod a+x $startdir/start.sh
- fi
- fi
-
- # In case we just want to set the workstation information, exit here
- if [ "$1" == "nomake" ]; then
- exit 0
- fi
-
- # 64 bit configuration rules
- if [ $ostype == "x86_64" ]; then
- vxidir=$startdir/vxi11_$ostype
- if [ -d $vxidir ]; then
- cd $vxidir
- if [ "$1" == "clean" ]; then
- make clean
- cd $startdir
- make clean
- rm -f Makefile
- else
- if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
- make
- else
- errorecho "Error! No configuration type selected (second argument)."
- echo ""
- helptext
- exit 1
- fi
- fi
- cd $startdir
- else
- errorecho "No 64 bit VXI11 source folder."
- exit 1
- fi
- # 32 bit configuration rules
- elif [ $ostype == "i686" ]; then
- vxidir=$startdir/vxi11_$ostype
- if [ -d $vxidir ]; then
- cd $vxidir
- if [ "$1" == "clean" ]; then
- make clean
- cd $startdir
- make clean
- rm -f Makefile
- else
- if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
- make
- else
- errorecho "Error! No installation type selected (second argument)."
- echo ""
- helptext
- exit 1
- fi
- fi
- cd $startdir
- else
- errorecho "No 32 bit VXI11 source folder."
- exit 1
- fi
- else
- errorecho "No OS type information found."
- exit 1
- fi
-fi
-
-exit 0
/sipmscan/trunk/configure
Property changes:
Deleted: svn:executable
## -1 +0,0 ##
-*
\ No newline at end of property
Index: sipmscan/trunk/mpod/test.sh
===================================================================
--- sipmscan/trunk/mpod/test.sh (revision 144)
+++ sipmscan/trunk/mpod/test.sh (nonexistent)
@@ -1,31 +0,0 @@
-#!/bin/bash
-
-snmpsearch="--snmp-install="
-
-for var in $@
-do
- case $var in
- "$snmpsearch"*)
- echo "Mached argument: $var"
- snmpdir=${var#$snmpsearch}
- echo "SNMP directory = $snmpdir";;
- *) ;;
-# echo "Unmached argument: $var";;
- esac
-done
-
-printenv PATH | grep "snmp"
-if [ $? == 0 ]; then
- echo "Something found."
-else
- echo "Nothing found."
-fi
-
-printenv ROOTSYS > /dev/null
-if [ $? == 0 ]; then
- echo "Something found."
-else
- echo "Nothing found."
-fi
-
-exit 0
Index: sipmscan/trunk/mpod/WIENER-CRATE-MIB.txt
===================================================================
--- sipmscan/trunk/mpod/WIENER-CRATE-MIB.txt (revision 144)
+++ sipmscan/trunk/mpod/WIENER-CRATE-MIB.txt (nonexistent)
@@ -1,1578 +0,0 @@
-----------------------------------------------------------------------------------------------------
--- $HeadURL: http://svn.wiener-d.com/src/enet/trunk/mibs/WIENER-CRATE-MIB.txt $
--- $LastChangedDate: 2008-11-27 12:00:00 +0100 (Fr, 21. Nov 2008) $
--- $LastChangedRevision: 617 / 510 $
--- $LastChangedBy: koester (roemer)$
--- Copyright © 2005-2007 W-IE-NE-R Plein & Baus GmbH, Burscheid, Germany
-----------------------------------------------------------------------------------------------------
-WIENER-CRATE-MIB DEFINITIONS ::= BEGIN
-
-IMPORTS
- OBJECT-TYPE, MODULE-IDENTITY, OBJECT-IDENTITY,
- Integer32, Opaque, enterprises
- FROM SNMPv2-SMI
-
- TEXTUAL-CONVENTION, DisplayString
- FROM SNMPv2-TC
-
--- Float
--- FROM NET-SNMP-TC
--- Float
--- FROM UCD-SNMP-MIB
- ;
-
-
-
-
-wiener MODULE-IDENTITY
- LAST-UPDATED "200810090000Z" -- October 9, 2008
- ORGANIZATION "WIENER Plein & Baus GmbH"
- CONTACT-INFO "
- postal: WIENER Plein & Baus GmbH
- Mullersbaum 20
- D-51399 Burscheid
- Germany
-
- email: info@wiener-d.com
-
- "
-
- DESCRIPTION
- "Introduction of the communication.can branch.
- "
-
-
- REVISION "200805060000Z" -- May 6, 2008
- DESCRIPTION
- "Introduction of the signal branch.
- "
-
- REVISION "200804150000Z" -- April 15, 2008
- DESCRIPTION
- "Enlargement of u0..u11 -> u0..u1999
- "
-
- REVISION "200804100000Z" -- April 10, 2008
- DESCRIPTION
- "This revision uses again Integer32 instead of Counter32.
- "
-
- REVISION "200804020000Z" -- April 02, 2008
- DESCRIPTION
- "This revision modifies the syntax of this file to be complient with smilint.
- "
-
- REVISION "200709100000Z"
- DESCRIPTION
- "This revision introduces new OIDs for debug functionality:
- sysDebugMemory8, sysDebugMemory16 and sysDebugMemory32.
- "
-
- REVISION "200703160000Z"
- DESCRIPTION
- "This revision introduces new OIDs for slew control:
- outputVoltageRiseRate and outputVoltageFallRate.
- "
-
- REVISION "200502010000Z"
- DESCRIPTION
- "This revision introduces new OIDs for group managment:
- groupTable
- "
-
- REVISION "200406280000Z"
- DESCRIPTION
- "WIENER Crate MIB, actual Firmware: UEL6E 4.02.
- Initial Version.
- "
-
- ::= { enterprises 19947 }
-
-
--------------------------------------------------------------------------------
--- Define the Float Textual Convention
--- This definition was written by David Perkins.
---
-Float ::= TEXTUAL-CONVENTION
- STATUS current
- DESCRIPTION
- "A single precision floating-point number. The semantics
- and encoding are identical for type 'single' defined in
- IEEE Standard for Binary Floating-Point,
- ANSI/IEEE Std 754-1985.
- The value is restricted to the BER serialization of
- the following ASN.1 type:
- FLOATTYPE ::= [120] IMPLICIT FloatType
- (note: the value 120 is the sum of '30'h and '48'h)
- The BER serialization of the length for values of
- this type must use the definite length, short
- encoding form.
-
- For example, the BER serialization of value 123
- of type FLOATTYPE is '9f780442f60000'h. (The tag
- is '9f78'h; the length is '04'h; and the value is
- '42f60000'h.) The BER serialization of value
- '9f780442f60000'h of data type Opaque is
- '44079f780442f60000'h. (The tag is '44'h; the length
- is '07'h; and the value is '9f780442f60000'h."
- SYNTAX Opaque (SIZE (7))
-
--------------------------------------------------------------------------------
--- crate
--------------------------------------------------------------------------------
-
-crate OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "SNMP control for electronic crates. A crate is a complete electronic system and
- consists of the mechanical rack, a power supply, a fan tray and a backplane.
- All this things are necessary to provide an adequate housing for electronic
- modules (e.g. VME CPU's)"
- ::= { wiener 1 }
-
---Crate ::= SEQUENCE {
--- system System,
--- input Input,
--- output Output,
--- sensor Sensor,
--- communication Communication,
--- powersupply Powersupply,
--- fantray Fantray,
--- rack Rack
---}
-
-system OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "A collection of objects which affect the complete crate"
- ::= { crate 1 }
-
-
-input OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are associated with the power input of the crate"
- ::= { crate 2 }
-
-output OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are associated with the power output of the crate"
- ::= { crate 3 }
-
-sensor OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are associated with temperature sensors in the crate"
- ::= { crate 4 }
-
-communication OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which affect the remote control of the crate"
- ::= { crate 5 }
-
-powersupply OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are specific for the power supply of the crate"
- ::= { crate 6 }
-
-fantray OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are specific for the fan tray of the crate"
- ::= { crate 7 }
-
-rack OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are specific for the crate (BIN) of the crate"
- ::= { crate 8 }
-
-signal OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "All objects which are associated with analog/digtal input/output in the crate"
- ::= { crate 9 }
-
-
--------------------------------------------------------------------------------
--- system
--------------------------------------------------------------------------------
-System ::= SEQUENCE {
- sysMainSwitch INTEGER,
- sysStatus BITS,
- sysVmeSysReset INTEGER,
- sysDebugMemory8 Integer32,
- sysDebugMemory16 Integer32,
- sysDebugMemory32 Integer32
-}
-
-sysMainSwitch OBJECT-TYPE
- SYNTAX INTEGER { off (0), on (1) }
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Read: An enumerated value which shows the current state of
- the crates main switch.
- Write: Try to switch the complete crate ON or OFF.
- Only the values ON or OFF are allowed."
- ::= { system 1 }
-
-sysStatus OBJECT-TYPE
- SYNTAX BITS {
- mainOn (0) ,
- mainInhibit (1) ,
- localControlOnly (2) ,
- inputFailure (3) ,
- outputFailure (4) ,
- fantrayFailure (5) ,
- sensorFailure (6),
- vmeSysfail (7),
- plugAndPlayIncompatible (8)
- }
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "A bit string which shows the status (health) of the complete crate.
- If a bit is set (1), the explanation is satisfied
- mainOn (0), system is switched on, individual outputs may be controlled by their specific ON/INHIBIT
- mainInhibit(1), external (hardware-)inhibit of the complete system
- localControlOnly (2), local control only (CANBUS write access denied)
- inputFailure (3), any input failure (e.g. power fail)
- outputFailure (4), any output failure, details in outputTable
- fantrayFailure (5), fantray failure
- sensorFailure (6), temperature of the external sensors too high
- VmeSysfail(7), VME SYSFAIL signal is active
- plugAndPlayIncompatible (8) wrong power supply and rack connected
- "
- ::= { system 2 }
-
-
--- ERROR_BIN_CHECKSUM(?),
-
-
-
-
-
-sysVmeSysReset OBJECT-TYPE
- SYNTAX INTEGER { trigger (1) }
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Read: Always 0.
- Write: Trigger the generation of the VME SYSRESET signal.
- This signal will be active for a time of 200 ms"
- ::= { system 3 }
-
-sysDebugMemory8 OBJECT-TYPE
- SYNTAX Integer32 (0..255)
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Debug 16-bit memory access."
- ::= { system 1024 }
-
-sysDebugMemory16 OBJECT-TYPE
- SYNTAX Integer32 (0..65535)
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Debug 16-bit memory access."
- ::= { system 1025 }
-
-sysDebugMemory32 OBJECT-TYPE
- SYNTAX Integer32 (-2147483648..2147483647)
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Debug 32-bit memory access."
- ::= { system 1026 }
-
--------------------------------------------------------------------------------
--- input
--------------------------------------------------------------------------------
--- reserved, possible entries:
--- inputSetPfcVoltage
--- inputMesPowerFail
--- inputMesVoltage
--- inputMesCurrent
--- inputMesPower
--- inputMesTemperature
--------------------------------------------------------------------------------
--- output
--------------------------------------------------------------------------------
---Output ::= SEQUENCE {
--- outputNumber Integer32,
--- outputTable OutputTable,
--- groupsNumber Integer32,
--- groupsTable GroupsTable
--- ??TotalPower
---}
-
-outputNumber OBJECT-TYPE
- SYNTAX Integer32 (0..1999)
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The number of output channels of the crate."
- ::= { output 1 }
-
-outputTable OBJECT-TYPE
- SYNTAX SEQUENCE OF OutputEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A list of output entries."
- ::= { output 2 }
-
-groupsNumber OBJECT-TYPE
- SYNTAX Integer32 (1..1999)
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The number of output groups of the crate."
- ::= { output 3 }
-
-groupsTable OBJECT-TYPE
- SYNTAX SEQUENCE OF GroupsEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A list of output groups entries."
- ::= { output 4 }
-
-outputEntry OBJECT-TYPE
- SYNTAX OutputEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A table row"
- INDEX { outputIndex }
- ::= { outputTable 1 }
-
-OutputEntry ::= SEQUENCE {
- outputIndex INTEGER,
- outputName DisplayString,
- outputGroup INTEGER,
- outputStatus BITS,
- outputMeasurementSenseVoltage Float,
- outputMeasurementTerminalVoltage Float,
- outputMeasurementCurrent Float,
- outputMeasurementTemperature INTEGER,
-
- outputSwitch INTEGER,
- outputVoltage Float,
- outputAdjustVoltage Integer32,
- outputCurrent Float,
-
- outputVoltageRiseRate Float,
- outputVoltageFallRate Float,
-
- outputSupervisionBehavior Integer32,
- outputSupervisionMinSenseVoltage Float,
- outputSupervisionMaxSenseVoltage Float,
- outputSupervisionMaxTerminalVoltage Float,
- outputSupervisionMaxCurrent Float,
--- outputSupervisionMaxTemperature Integer32,
-
- outputConfigMaxSenseVoltage Float,
- outputConfigMaxTerminalVoltage Float,
- outputConfigMaxCurrent Float,
- outputSupervisionMaxPower Float,
-
- outputCurrentRiseRate Float,
- outputCurrentFallRate Float,
- outputTripTimeMaxCurrent INTEGER
- }
-
-
-outputIndex OBJECT-TYPE
- SYNTAX INTEGER {
- u0(1),u1(2),u2(3),u3(4),u4(5),u5(6),u6(7),u7(8),u8(9),u9(10),
- u10(11),u11(12),u12(13),u13(14),u14(15),u15(16),u16(17),u17(18),u18(19),u19(20),
- u20(21),u21(22),u22(23),u23(24),u24(25),u25(26),u26(27),u27(28),u28(29),u29(30),
- u30(31),u31(32),u32(33),u33(34),u34(35),u35(36),u36(37),u37(38),u38(39),u39(40),
- u40(41),u41(42),u42(43),u43(44),u44(45),u45(46),u46(47),u47(48),u48(49),u49(50),
- u50(51),u51(52),u52(53),u53(54),u54(55),u55(56),u56(57),u57(58),u58(59),u59(60),
- u60(61),u61(62),u62(63),u63(64),u64(65),u65(66),u66(67),u67(68),u68(69),u69(70),
- u70(71),u71(72),u72(73),u73(74),u74(75),u75(76),u76(77),u77(78),u78(79),u79(80),
- u80(81),u81(82),u82(83),u83(84),u84(85),u85(86),u86(87),u87(88),u88(89),u89(90),
- u90(91),u91(92),u92(93),u93(94),u94(95),u95(96),u96(97),u97(98),u98(99),u99(100),
- u100(101),u101(102),u102(103),u103(104),u104(105),u105(106),u106(107),u107(108),u108(109),u109(110),
- u110(111),u111(112),u112(113),u113(114),u114(115),u115(116),u116(117),u117(118),u118(119),u119(120),
- u120(121),u121(122),u122(123),u123(124),u124(125),u125(126),u126(127),u127(128),u128(129),u129(130),
- u130(131),u131(132),u132(133),u133(134),u134(135),u135(136),u136(137),u137(138),u138(139),u139(140),
- u140(141),u141(142),u142(143),u143(144),u144(145),u145(146),u146(147),u147(148),u148(149),u149(150),
- u150(151),u151(152),u152(153),u153(154),u154(155),u155(156),u156(157),u157(158),u158(159),u159(160),
- u160(161),u161(162),u162(163),u163(164),u164(165),u165(166),u166(167),u167(168),u168(169),u169(170),
- u170(171),u171(172),u172(173),u173(174),u174(175),u175(176),u176(177),u177(178),u178(179),u179(180),
- u180(181),u181(182),u182(183),u183(184),u184(185),u185(186),u186(187),u187(188),u188(189),u189(190),
- u190(191),u191(192),u192(193),u193(194),u194(195),u195(196),u196(197),u197(198),u198(199),u199(200),
- u200(201),u201(202),u202(203),u203(204),u204(205),u205(206),u206(207),u207(208),u208(209),u209(210),
- u210(211),u211(212),u212(213),u213(214),u214(215),u215(216),u216(217),u217(218),u218(219),u219(220),
- u220(221),u221(222),u222(223),u223(224),u224(225),u225(226),u226(227),u227(228),u228(229),u229(230),
- u230(231),u231(232),u232(233),u233(234),u234(235),u235(236),u236(237),u237(238),u238(239),u239(240),
- u240(241),u241(242),u242(243),u243(244),u244(245),u245(246),u246(247),u247(248),u248(249),u249(250),
- u250(251),u251(252),u252(253),u253(254),u254(255),u255(256),u256(257),u257(258),u258(259),u259(260),
- u260(261),u261(262),u262(263),u263(264),u264(265),u265(266),u266(267),u267(268),u268(269),u269(270),
- u270(271),u271(272),u272(273),u273(274),u274(275),u275(276),u276(277),u277(278),u278(279),u279(280),
- u280(281),u281(282),u282(283),u283(284),u284(285),u285(286),u286(287),u287(288),u288(289),u289(290),
- u290(291),u291(292),u292(293),u293(294),u294(295),u295(296),u296(297),u297(298),u298(299),u299(300),
- u300(301),u301(302),u302(303),u303(304),u304(305),u305(306),u306(307),u307(308),u308(309),u309(310),
- u310(311),u311(312),u312(313),u313(314),u314(315),u315(316),u316(317),u317(318),u318(319),u319(320),
- u320(321),u321(322),u322(323),u323(324),u324(325),u325(326),u326(327),u327(328),u328(329),u329(330),
- u330(331),u331(332),u332(333),u333(334),u334(335),u335(336),u336(337),u337(338),u338(339),u339(340),
- u340(341),u341(342),u342(343),u343(344),u344(345),u345(346),u346(347),u347(348),u348(349),u349(350),
- u350(351),u351(352),u352(353),u353(354),u354(355),u355(356),u356(357),u357(358),u358(359),u359(360),
- u360(361),u361(362),u362(363),u363(364),u364(365),u365(366),u366(367),u367(368),u368(369),u369(370),
- u370(371),u371(372),u372(373),u373(374),u374(375),u375(376),u376(377),u377(378),u378(379),u379(380),
- u380(381),u381(382),u382(383),u383(384),u384(385),u385(386),u386(387),u387(388),u388(389),u389(390),
- u390(391),u391(392),u392(393),u393(394),u394(395),u395(396),u396(397),u397(398),u398(399),u399(400),
- u400(401),u401(402),u402(403),u403(404),u404(405),u405(406),u406(407),u407(408),u408(409),u409(410),
- u410(411),u411(412),u412(413),u413(414),u414(415),u415(416),u416(417),u417(418),u418(419),u419(420),
- u420(421),u421(422),u422(423),u423(424),u424(425),u425(426),u426(427),u427(428),u428(429),u429(430),
- u430(431),u431(432),u432(433),u433(434),u434(435),u435(436),u436(437),u437(438),u438(439),u439(440),
- u440(441),u441(442),u442(443),u443(444),u444(445),u445(446),u446(447),u447(448),u448(449),u449(450),
- u450(451),u451(452),u452(453),u453(454),u454(455),u455(456),u456(457),u457(458),u458(459),u459(460),
- u460(461),u461(462),u462(463),u463(464),u464(465),u465(466),u466(467),u467(468),u468(469),u469(470),
- u470(471),u471(472),u472(473),u473(474),u474(475),u475(476),u476(477),u477(478),u478(479),u479(480),
- u480(481),u481(482),u482(483),u483(484),u484(485),u485(486),u486(487),u487(488),u488(489),u489(490),
- u490(491),u491(492),u492(493),u493(494),u494(495),u495(496),u496(497),u497(498),u498(499),u499(500),
- u500(501),u501(502),u502(503),u503(504),u504(505),u505(506),u506(507),u507(508),u508(509),u509(510),
- u510(511),u511(512),u512(513),u513(514),u514(515),u515(516),u516(517),u517(518),u518(519),u519(520),
- u520(521),u521(522),u522(523),u523(524),u524(525),u525(526),u526(527),u527(528),u528(529),u529(530),
- u530(531),u531(532),u532(533),u533(534),u534(535),u535(536),u536(537),u537(538),u538(539),u539(540),
- u540(541),u541(542),u542(543),u543(544),u544(545),u545(546),u546(547),u547(548),u548(549),u549(550),
- u550(551),u551(552),u552(553),u553(554),u554(555),u555(556),u556(557),u557(558),u558(559),u559(560),
- u560(561),u561(562),u562(563),u563(564),u564(565),u565(566),u566(567),u567(568),u568(569),u569(570),
- u570(571),u571(572),u572(573),u573(574),u574(575),u575(576),u576(577),u577(578),u578(579),u579(580),
- u580(581),u581(582),u582(583),u583(584),u584(585),u585(586),u586(587),u587(588),u588(589),u589(590),
- u590(591),u591(592),u592(593),u593(594),u594(595),u595(596),u596(597),u597(598),u598(599),u599(600),
- u600(601),u601(602),u602(603),u603(604),u604(605),u605(606),u606(607),u607(608),u608(609),u609(610),
- u610(611),u611(612),u612(613),u613(614),u614(615),u615(616),u616(617),u617(618),u618(619),u619(620),
- u620(621),u621(622),u622(623),u623(624),u624(625),u625(626),u626(627),u627(628),u628(629),u629(630),
- u630(631),u631(632),u632(633),u633(634),u634(635),u635(636),u636(637),u637(638),u638(639),u639(640),
- u640(641),u641(642),u642(643),u643(644),u644(645),u645(646),u646(647),u647(648),u648(649),u649(650),
- u650(651),u651(652),u652(653),u653(654),u654(655),u655(656),u656(657),u657(658),u658(659),u659(660),
- u660(661),u661(662),u662(663),u663(664),u664(665),u665(666),u666(667),u667(668),u668(669),u669(670),
- u670(671),u671(672),u672(673),u673(674),u674(675),u675(676),u676(677),u677(678),u678(679),u679(680),
- u680(681),u681(682),u682(683),u683(684),u684(685),u685(686),u686(687),u687(688),u688(689),u689(690),
- u690(691),u691(692),u692(693),u693(694),u694(695),u695(696),u696(697),u697(698),u698(699),u699(700),
- u700(701),u701(702),u702(703),u703(704),u704(705),u705(706),u706(707),u707(708),u708(709),u709(710),
- u710(711),u711(712),u712(713),u713(714),u714(715),u715(716),u716(717),u717(718),u718(719),u719(720),
- u720(721),u721(722),u722(723),u723(724),u724(725),u725(726),u726(727),u727(728),u728(729),u729(730),
- u730(731),u731(732),u732(733),u733(734),u734(735),u735(736),u736(737),u737(738),u738(739),u739(740),
- u740(741),u741(742),u742(743),u743(744),u744(745),u745(746),u746(747),u747(748),u748(749),u749(750),
- u750(751),u751(752),u752(753),u753(754),u754(755),u755(756),u756(757),u757(758),u758(759),u759(760),
- u760(761),u761(762),u762(763),u763(764),u764(765),u765(766),u766(767),u767(768),u768(769),u769(770),
- u770(771),u771(772),u772(773),u773(774),u774(775),u775(776),u776(777),u777(778),u778(779),u779(780),
- u780(781),u781(782),u782(783),u783(784),u784(785),u785(786),u786(787),u787(788),u788(789),u789(790),
- u790(791),u791(792),u792(793),u793(794),u794(795),u795(796),u796(797),u797(798),u798(799),u799(800),
- u800(801),u801(802),u802(803),u803(804),u804(805),u805(806),u806(807),u807(808),u808(809),u809(810),
- u810(811),u811(812),u812(813),u813(814),u814(815),u815(816),u816(817),u817(818),u818(819),u819(820),
- u820(821),u821(822),u822(823),u823(824),u824(825),u825(826),u826(827),u827(828),u828(829),u829(830),
- u830(831),u831(832),u832(833),u833(834),u834(835),u835(836),u836(837),u837(838),u838(839),u839(840),
- u840(841),u841(842),u842(843),u843(844),u844(845),u845(846),u846(847),u847(848),u848(849),u849(850),
- u850(851),u851(852),u852(853),u853(854),u854(855),u855(856),u856(857),u857(858),u858(859),u859(860),
- u860(861),u861(862),u862(863),u863(864),u864(865),u865(866),u866(867),u867(868),u868(869),u869(870),
- u870(871),u871(872),u872(873),u873(874),u874(875),u875(876),u876(877),u877(878),u878(879),u879(880),
- u880(881),u881(882),u882(883),u883(884),u884(885),u885(886),u886(887),u887(888),u888(889),u889(890),
- u890(891),u891(892),u892(893),u893(894),u894(895),u895(896),u896(897),u897(898),u898(899),u899(900),
- u900(901),u901(902),u902(903),u903(904),u904(905),u905(906),u906(907),u907(908),u908(909),u909(910),
- u910(911),u911(912),u912(913),u913(914),u914(915),u915(916),u916(917),u917(918),u918(919),u919(920),
- u920(921),u921(922),u922(923),u923(924),u924(925),u925(926),u926(927),u927(928),u928(929),u929(930),
- u930(931),u931(932),u932(933),u933(934),u934(935),u935(936),u936(937),u937(938),u938(939),u939(940),
- u940(941),u941(942),u942(943),u943(944),u944(945),u945(946),u946(947),u947(948),u948(949),u949(950),
- u950(951),u951(952),u952(953),u953(954),u954(955),u955(956),u956(957),u957(958),u958(959),u959(960),
- u960(961),u961(962),u962(963),u963(964),u964(965),u965(966),u966(967),u967(968),u968(969),u969(970),
- u970(971),u971(972),u972(973),u973(974),u974(975),u975(976),u976(977),u977(978),u978(979),u979(980),
- u980(981),u981(982),u982(983),u983(984),u984(985),u985(986),u986(987),u987(988),u988(989),u989(990),
- u990(991),u991(992),u992(993),u993(994),u994(995),u995(996),u996(997),u997(998),u998(999),u999(1000),
- u1000(1001),u1001(1002),u1002(1003),u1003(1004),u1004(1005),u1005(1006),u1006(1007),u1007(1008),u1008(1009),u1009(1010),
- u1010(1011),u1011(1012),u1012(1013),u1013(1014),u1014(1015),u1015(1016),u1016(1017),u1017(1018),u1018(1019),u1019(1020),
- u1020(1021),u1021(1022),u1022(1023),u1023(1024),u1024(1025),u1025(1026),u1026(1027),u1027(1028),u1028(1029),u1029(1030),
- u1030(1031),u1031(1032),u1032(1033),u1033(1034),u1034(1035),u1035(1036),u1036(1037),u1037(1038),u1038(1039),u1039(1040),
- u1040(1041),u1041(1042),u1042(1043),u1043(1044),u1044(1045),u1045(1046),u1046(1047),u1047(1048),u1048(1049),u1049(1050),
- u1050(1051),u1051(1052),u1052(1053),u1053(1054),u1054(1055),u1055(1056),u1056(1057),u1057(1058),u1058(1059),u1059(1060),
- u1060(1061),u1061(1062),u1062(1063),u1063(1064),u1064(1065),u1065(1066),u1066(1067),u1067(1068),u1068(1069),u1069(1070),
- u1070(1071),u1071(1072),u1072(1073),u1073(1074),u1074(1075),u1075(1076),u1076(1077),u1077(1078),u1078(1079),u1079(1080),
- u1080(1081),u1081(1082),u1082(1083),u1083(1084),u1084(1085),u1085(1086),u1086(1087),u1087(1088),u1088(1089),u1089(1090),
- u1090(1091),u1091(1092),u1092(1093),u1093(1094),u1094(1095),u1095(1096),u1096(1097),u1097(1098),u1098(1099),u1099(1100),
- u1100(1101),u1101(1102),u1102(1103),u1103(1104),u1104(1105),u1105(1106),u1106(1107),u1107(1108),u1108(1109),u1109(1110),
- u1110(1111),u1111(1112),u1112(1113),u1113(1114),u1114(1115),u1115(1116),u1116(1117),u1117(1118),u1118(1119),u1119(1120),
- u1120(1121),u1121(1122),u1122(1123),u1123(1124),u1124(1125),u1125(1126),u1126(1127),u1127(1128),u1128(1129),u1129(1130),
- u1130(1131),u1131(1132),u1132(1133),u1133(1134),u1134(1135),u1135(1136),u1136(1137),u1137(1138),u1138(1139),u1139(1140),
- u1140(1141),u1141(1142),u1142(1143),u1143(1144),u1144(1145),u1145(1146),u1146(1147),u1147(1148),u1148(1149),u1149(1150),
- u1150(1151),u1151(1152),u1152(1153),u1153(1154),u1154(1155),u1155(1156),u1156(1157),u1157(1158),u1158(1159),u1159(1160),
- u1160(1161),u1161(1162),u1162(1163),u1163(1164),u1164(1165),u1165(1166),u1166(1167),u1167(1168),u1168(1169),u1169(1170),
- u1170(1171),u1171(1172),u1172(1173),u1173(1174),u1174(1175),u1175(1176),u1176(1177),u1177(1178),u1178(1179),u1179(1180),
- u1180(1181),u1181(1182),u1182(1183),u1183(1184),u1184(1185),u1185(1186),u1186(1187),u1187(1188),u1188(1189),u1189(1190),
- u1190(1191),u1191(1192),u1192(1193),u1193(1194),u1194(1195),u1195(1196),u1196(1197),u1197(1198),u1198(1199),u1199(1200),
- u1200(1201),u1201(1202),u1202(1203),u1203(1204),u1204(1205),u1205(1206),u1206(1207),u1207(1208),u1208(1209),u1209(1210),
- u1210(1211),u1211(1212),u1212(1213),u1213(1214),u1214(1215),u1215(1216),u1216(1217),u1217(1218),u1218(1219),u1219(1220),
- u1220(1221),u1221(1222),u1222(1223),u1223(1224),u1224(1225),u1225(1226),u1226(1227),u1227(1228),u1228(1229),u1229(1230),
- u1230(1231),u1231(1232),u1232(1233),u1233(1234),u1234(1235),u1235(1236),u1236(1237),u1237(1238),u1238(1239),u1239(1240),
- u1240(1241),u1241(1242),u1242(1243),u1243(1244),u1244(1245),u1245(1246),u1246(1247),u1247(1248),u1248(1249),u1249(1250),
- u1250(1251),u1251(1252),u1252(1253),u1253(1254),u1254(1255),u1255(1256),u1256(1257),u1257(1258),u1258(1259),u1259(1260),
- u1260(1261),u1261(1262),u1262(1263),u1263(1264),u1264(1265),u1265(1266),u1266(1267),u1267(1268),u1268(1269),u1269(1270),
- u1270(1271),u1271(1272),u1272(1273),u1273(1274),u1274(1275),u1275(1276),u1276(1277),u1277(1278),u1278(1279),u1279(1280),
- u1280(1281),u1281(1282),u1282(1283),u1283(1284),u1284(1285),u1285(1286),u1286(1287),u1287(1288),u1288(1289),u1289(1290),
- u1290(1291),u1291(1292),u1292(1293),u1293(1294),u1294(1295),u1295(1296),u1296(1297),u1297(1298),u1298(1299),u1299(1300),
- u1300(1301),u1301(1302),u1302(1303),u1303(1304),u1304(1305),u1305(1306),u1306(1307),u1307(1308),u1308(1309),u1309(1310),
- u1310(1311),u1311(1312),u1312(1313),u1313(1314),u1314(1315),u1315(1316),u1316(1317),u1317(1318),u1318(1319),u1319(1320),
- u1320(1321),u1321(1322),u1322(1323),u1323(1324),u1324(1325),u1325(1326),u1326(1327),u1327(1328),u1328(1329),u1329(1330),
- u1330(1331),u1331(1332),u1332(1333),u1333(1334),u1334(1335),u1335(1336),u1336(1337),u1337(1338),u1338(1339),u1339(1340),
- u1340(1341),u1341(1342),u1342(1343),u1343(1344),u1344(1345),u1345(1346),u1346(1347),u1347(1348),u1348(1349),u1349(1350),
- u1350(1351),u1351(1352),u1352(1353),u1353(1354),u1354(1355),u1355(1356),u1356(1357),u1357(1358),u1358(1359),u1359(1360),
- u1360(1361),u1361(1362),u1362(1363),u1363(1364),u1364(1365),u1365(1366),u1366(1367),u1367(1368),u1368(1369),u1369(1370),
- u1370(1371),u1371(1372),u1372(1373),u1373(1374),u1374(1375),u1375(1376),u1376(1377),u1377(1378),u1378(1379),u1379(1380),
- u1380(1381),u1381(1382),u1382(1383),u1383(1384),u1384(1385),u1385(1386),u1386(1387),u1387(1388),u1388(1389),u1389(1390),
- u1390(1391),u1391(1392),u1392(1393),u1393(1394),u1394(1395),u1395(1396),u1396(1397),u1397(1398),u1398(1399),u1399(1400),
- u1400(1401),u1401(1402),u1402(1403),u1403(1404),u1404(1405),u1405(1406),u1406(1407),u1407(1408),u1408(1409),u1409(1410),
- u1410(1411),u1411(1412),u1412(1413),u1413(1414),u1414(1415),u1415(1416),u1416(1417),u1417(1418),u1418(1419),u1419(1420),
- u1420(1421),u1421(1422),u1422(1423),u1423(1424),u1424(1425),u1425(1426),u1426(1427),u1427(1428),u1428(1429),u1429(1430),
- u1430(1431),u1431(1432),u1432(1433),u1433(1434),u1434(1435),u1435(1436),u1436(1437),u1437(1438),u1438(1439),u1439(1440),
- u1440(1441),u1441(1442),u1442(1443),u1443(1444),u1444(1445),u1445(1446),u1446(1447),u1447(1448),u1448(1449),u1449(1450),
- u1450(1451),u1451(1452),u1452(1453),u1453(1454),u1454(1455),u1455(1456),u1456(1457),u1457(1458),u1458(1459),u1459(1460),
- u1460(1461),u1461(1462),u1462(1463),u1463(1464),u1464(1465),u1465(1466),u1466(1467),u1467(1468),u1468(1469),u1469(1470),
- u1470(1471),u1471(1472),u1472(1473),u1473(1474),u1474(1475),u1475(1476),u1476(1477),u1477(1478),u1478(1479),u1479(1480),
- u1480(1481),u1481(1482),u1482(1483),u1483(1484),u1484(1485),u1485(1486),u1486(1487),u1487(1488),u1488(1489),u1489(1490),
- u1490(1491),u1491(1492),u1492(1493),u1493(1494),u1494(1495),u1495(1496),u1496(1497),u1497(1498),u1498(1499),u1499(1500),
- u1500(1501),u1501(1502),u1502(1503),u1503(1504),u1504(1505),u1505(1506),u1506(1507),u1507(1508),u1508(1509),u1509(1510),
- u1510(1511),u1511(1512),u1512(1513),u1513(1514),u1514(1515),u1515(1516),u1516(1517),u1517(1518),u1518(1519),u1519(1520),
- u1520(1521),u1521(1522),u1522(1523),u1523(1524),u1524(1525),u1525(1526),u1526(1527),u1527(1528),u1528(1529),u1529(1530),
- u1530(1531),u1531(1532),u1532(1533),u1533(1534),u1534(1535),u1535(1536),u1536(1537),u1537(1538),u1538(1539),u1539(1540),
- u1540(1541),u1541(1542),u1542(1543),u1543(1544),u1544(1545),u1545(1546),u1546(1547),u1547(1548),u1548(1549),u1549(1550),
- u1550(1551),u1551(1552),u1552(1553),u1553(1554),u1554(1555),u1555(1556),u1556(1557),u1557(1558),u1558(1559),u1559(1560),
- u1560(1561),u1561(1562),u1562(1563),u1563(1564),u1564(1565),u1565(1566),u1566(1567),u1567(1568),u1568(1569),u1569(1570),
- u1570(1571),u1571(1572),u1572(1573),u1573(1574),u1574(1575),u1575(1576),u1576(1577),u1577(1578),u1578(1579),u1579(1580),
- u1580(1581),u1581(1582),u1582(1583),u1583(1584),u1584(1585),u1585(1586),u1586(1587),u1587(1588),u1588(1589),u1589(1590),
- u1590(1591),u1591(1592),u1592(1593),u1593(1594),u1594(1595),u1595(1596),u1596(1597),u1597(1598),u1598(1599),u1599(1600),
- u1600(1601),u1601(1602),u1602(1603),u1603(1604),u1604(1605),u1605(1606),u1606(1607),u1607(1608),u1608(1609),u1609(1610),
- u1610(1611),u1611(1612),u1612(1613),u1613(1614),u1614(1615),u1615(1616),u1616(1617),u1617(1618),u1618(1619),u1619(1620),
- u1620(1621),u1621(1622),u1622(1623),u1623(1624),u1624(1625),u1625(1626),u1626(1627),u1627(1628),u1628(1629),u1629(1630),
- u1630(1631),u1631(1632),u1632(1633),u1633(1634),u1634(1635),u1635(1636),u1636(1637),u1637(1638),u1638(1639),u1639(1640),
- u1640(1641),u1641(1642),u1642(1643),u1643(1644),u1644(1645),u1645(1646),u1646(1647),u1647(1648),u1648(1649),u1649(1650),
- u1650(1651),u1651(1652),u1652(1653),u1653(1654),u1654(1655),u1655(1656),u1656(1657),u1657(1658),u1658(1659),u1659(1660),
- u1660(1661),u1661(1662),u1662(1663),u1663(1664),u1664(1665),u1665(1666),u1666(1667),u1667(1668),u1668(1669),u1669(1670),
- u1670(1671),u1671(1672),u1672(1673),u1673(1674),u1674(1675),u1675(1676),u1676(1677),u1677(1678),u1678(1679),u1679(1680),
- u1680(1681),u1681(1682),u1682(1683),u1683(1684),u1684(1685),u1685(1686),u1686(1687),u1687(1688),u1688(1689),u1689(1690),
- u1690(1691),u1691(1692),u1692(1693),u1693(1694),u1694(1695),u1695(1696),u1696(1697),u1697(1698),u1698(1699),u1699(1700),
- u1700(1701),u1701(1702),u1702(1703),u1703(1704),u1704(1705),u1705(1706),u1706(1707),u1707(1708),u1708(1709),u1709(1710),
- u1710(1711),u1711(1712),u1712(1713),u1713(1714),u1714(1715),u1715(1716),u1716(1717),u1717(1718),u1718(1719),u1719(1720),
- u1720(1721),u1721(1722),u1722(1723),u1723(1724),u1724(1725),u1725(1726),u1726(1727),u1727(1728),u1728(1729),u1729(1730),
- u1730(1731),u1731(1732),u1732(1733),u1733(1734),u1734(1735),u1735(1736),u1736(1737),u1737(1738),u1738(1739),u1739(1740),
- u1740(1741),u1741(1742),u1742(1743),u1743(1744),u1744(1745),u1745(1746),u1746(1747),u1747(1748),u1748(1749),u1749(1750),
- u1750(1751),u1751(1752),u1752(1753),u1753(1754),u1754(1755),u1755(1756),u1756(1757),u1757(1758),u1758(1759),u1759(1760),
- u1760(1761),u1761(1762),u1762(1763),u1763(1764),u1764(1765),u1765(1766),u1766(1767),u1767(1768),u1768(1769),u1769(1770),
- u1770(1771),u1771(1772),u1772(1773),u1773(1774),u1774(1775),u1775(1776),u1776(1777),u1777(1778),u1778(1779),u1779(1780),
- u1780(1781),u1781(1782),u1782(1783),u1783(1784),u1784(1785),u1785(1786),u1786(1787),u1787(1788),u1788(1789),u1789(1790),
- u1790(1791),u1791(1792),u1792(1793),u1793(1794),u1794(1795),u1795(1796),u1796(1797),u1797(1798),u1798(1799),u1799(1800),
- u1800(1801),u1801(1802),u1802(1803),u1803(1804),u1804(1805),u1805(1806),u1806(1807),u1807(1808),u1808(1809),u1809(1810),
- u1810(1811),u1811(1812),u1812(1813),u1813(1814),u1814(1815),u1815(1816),u1816(1817),u1817(1818),u1818(1819),u1819(1820),
- u1820(1821),u1821(1822),u1822(1823),u1823(1824),u1824(1825),u1825(1826),u1826(1827),u1827(1828),u1828(1829),u1829(1830),
- u1830(1831),u1831(1832),u1832(1833),u1833(1834),u1834(1835),u1835(1836),u1836(1837),u1837(1838),u1838(1839),u1839(1840),
- u1840(1841),u1841(1842),u1842(1843),u1843(1844),u1844(1845),u1845(1846),u1846(1847),u1847(1848),u1848(1849),u1849(1850),
- u1850(1851),u1851(1852),u1852(1853),u1853(1854),u1854(1855),u1855(1856),u1856(1857),u1857(1858),u1858(1859),u1859(1860),
- u1860(1861),u1861(1862),u1862(1863),u1863(1864),u1864(1865),u1865(1866),u1866(1867),u1867(1868),u1868(1869),u1869(1870),
- u1870(1871),u1871(1872),u1872(1873),u1873(1874),u1874(1875),u1875(1876),u1876(1877),u1877(1878),u1878(1879),u1879(1880),
- u1880(1881),u1881(1882),u1882(1883),u1883(1884),u1884(1885),u1885(1886),u1886(1887),u1887(1888),u1888(1889),u1889(1890),
- u1890(1891),u1891(1892),u1892(1893),u1893(1894),u1894(1895),u1895(1896),u1896(1897),u1897(1898),u1898(1899),u1899(1900),
- u1900(1901),u1901(1902),u1902(1903),u1903(1904),u1904(1905),u1905(1906),u1906(1907),u1907(1908),u1908(1909),u1909(1910),
- u1910(1911),u1911(1912),u1912(1913),u1913(1914),u1914(1915),u1915(1916),u1916(1917),u1917(1918),u1918(1919),u1919(1920),
- u1920(1921),u1921(1922),u1922(1923),u1923(1924),u1924(1925),u1925(1926),u1926(1927),u1927(1928),u1928(1929),u1929(1930),
- u1930(1931),u1931(1932),u1932(1933),u1933(1934),u1934(1935),u1935(1936),u1936(1937),u1937(1938),u1938(1939),u1939(1940),
- u1940(1941),u1941(1942),u1942(1943),u1943(1944),u1944(1945),u1945(1946),u1946(1947),u1947(1948),u1948(1949),u1949(1950),
- u1950(1951),u1951(1952),u1952(1953),u1953(1954),u1954(1955),u1955(1956),u1956(1957),u1957(1958),u1958(1959),u1959(1960),
- u1960(1961),u1961(1962),u1962(1963),u1963(1964),u1964(1965),u1965(1966),u1966(1967),u1967(1968),u1968(1969),u1969(1970),
- u1970(1971),u1971(1972),u1972(1973),u1973(1974),u1974(1975),u1975(1976),u1976(1977),u1977(1978),u1978(1979),u1979(1980),
- u1980(1981),u1981(1982),u1982(1983),u1983(1984),u1984(1985),u1985(1986),u1986(1987),u1987(1988),u1988(1989),u1989(1990),
- u1990(1991),u1991(1992),u1992(1993),u1993(1994),u1994(1995),u1995(1996),u1996(1997),u1997(1998),u1998(1999),u1999(2000)}
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each power output channel. Its value
- ranges between 1 and total number of output channels.
- This value is equivalent to the output channel number at
- the type label of the crate or power supply, but because the SMI
- index starts at 1, index 1 corresponds to U0."
- ::= { outputEntry 1 }
-
-outputName OBJECT-TYPE
- SYNTAX DisplayString (SIZE (1..4))
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "A textual string containing a short name of the
- output. If the crate is equipped with an alphanumeric
- display, this string is shown to identify a output channel."
- ::= { outputEntry 2 }
-
-outputGroup OBJECT-TYPE
- SYNTAX Integer32 (0..1999)
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The group number associated with this channel"
- ::= { outputEntry 3 }
-
-
-outputStatus OBJECT-TYPE
- SYNTAX BITS {
- outputOn (0) ,
- outputInhibit (1) ,
- outputFailureMinSenseVoltage (2),
- outputFailureMaxSenseVoltage (3),
- outputFailureMaxTerminalVoltage (4),
- outputFailureMaxCurrent (5),
- outputFailureMaxTemperature (6),
- outputFailureMaxPower (7),
- -- reserved
- outputFailureTimeout (9),
- outputCurrentLimited (10),
- outputRampUp (11),
- outputRampDown (12),
- outputEnableKill(13),
- outputEmergencyOff (14)
- }
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "A bit string which shows the status (health and operating conditions) of one output channel.
- If a bit is set (1), the explanation is satisfied:
- outputOn (0), output channel is on
- outputInhibit(1), external (hardware-)inhibit of the output channel
- outputFailureMinSenseVoltage (2) Supervision limit hurt: Sense voltage is too low
- outputFailureMaxSenseVoltage (3), Supervision limit hurt: Sense voltage is too high
- outputFailureMaxTerminalVoltage (4), Supervision limit hurt: Terminal voltage is too high
- outputFailureMaxCurrent (5), Supervision limit hurt: Current is too high
- outputFailureMaxTemperature (6), Supervision limit hurt: Heat sink temperature is too high
- outputFailureMaxPower (7), Supervision limit hurt: Output power is too high
- outputFailureTimeout (9), Communication timeout between output channel and main control
- outputCurrentLimited (10), Current limiting is active (constant current mode)
- outputRampUp (11), Output voltage is increasing (e.g. after switch on)
- outputRampDown (12), Output voltage is decreasing (e.g. after switch off)
- outputEnableKill (13), EnableKill is aktive
- outputEmergencyOff (14), EmergencyOff event is aktive
-
- "
-
- ::= { outputEntry 4 }
-
-
-
-
-outputMeasurementSenseVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured voltage at the sense input lines."
- ::= { outputEntry 5 }
-
-outputMeasurementTerminalVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured voltage at the output terminals."
- ::= { outputEntry 6 }
-
-outputMeasurementCurrent OBJECT-TYPE
- SYNTAX Float
- UNITS "A"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured output current."
- ::= { outputEntry 7 }
-
-outputMeasurementTemperature OBJECT-TYPE
- SYNTAX INTEGER { ok (-128), failure(127) }
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured temperature of the power module."
- ::= { outputEntry 8 }
-
-
-outputSwitch OBJECT-TYPE
- SYNTAX INTEGER { Off (0), On (1), resetEmergencyOff (2), setEmergencyOff (3), clearEvents (10) }
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Read: An enumerated value which shows the current state of
- the output channel.
-
- Write: Change the state of the channel.
- If the channel is On, and the write value is Off, then the channel
- will switch Off.
- If the channel is Off, and the write value is On, and if no other
- signals (mainInhibit, outputInhibit, outputEmergencyOff or outputFailureMaxCurrent)
- are active, then the channel will switch on.
-
- If the write value is resetEmergencyOff, then the channel will
- leave the state EmergencyOff. A write of clearEvents is necessary
- before the voltage can ramp up again.
- If the write value is setEmergencyOff, then the channel will have
- the state EmergencyOff, which means that the High Voltage will
- switch off without a ramp and reset of the outputVoltage to null volt.
-
- If the write value is clearEvents, then all failure messages
- of the outputStatus will be reset (all channel events, all module events
- and the state emergencyOff)."
- ::= { outputEntry 9 }
-
-outputVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The nominal output voltage of the channel."
- ::= { outputEntry 10 }
-
-outputAdjustVoltage OBJECT-TYPE
- SYNTAX Integer32 (-128..127)
- MAX-ACCESS read-write
- STATUS obsolete
- DESCRIPTION
- "A posibillity to make small changes of the output voltage."
- ::= { outputEntry 11 }
-
-outputCurrent OBJECT-TYPE
- SYNTAX Float
- UNITS "A"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The current limit of the channel."
- ::= { outputEntry 12 }
-
-outputVoltageRiseRate OBJECT-TYPE
- SYNTAX Float
- UNITS "V/s"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Voltage Fall Slew Rate [V/s].
- The slew rate of the output voltage if it increases (after switch on or if the Voltage has been
- changed).
- "
- ::= { outputEntry 13 }
-
-outputVoltageFallRate OBJECT-TYPE
- SYNTAX Float
- UNITS "V/s"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Voltage Rise Slew Rate [V/s].
- The slew rate of the output voltage if it decreases (after switch off or if the Voltage has been
- changed).
- "
- ::= { outputEntry 14 }
-
-outputSupervisionBehavior OBJECT-TYPE
- SYNTAX Integer32 (0..65535)
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "A bit field packed into an integer which define the behavior of the output channel / power supply
- after failures.
- For each supervision value, a two-bit field exists.
- The enumeration of this value (..L+..H*2) is:
- WIENER LV devices
- 0 ignore the failure
- 1 switch off this channel
- 2 switch off all channels with the same group number
- 3 switch off the complete crate.
- iseg HV devices
- 0 ignore the failure
- 1 switch off this channel by ramp down the voltage
- 2 switch off this channel by a emergencyOff
- 3 switch off the whole board of the HV module by emergencyOff.
- The position of the bit fields in the integer value are:
- Bit 0, 1: outputFailureMinSenseVoltage
- Bit 2, 3: outputFailureMaxSenseVoltage
- Bit 4, 5: outputFailureMaxTerminalVoltage
- Bit 6, 7: outputFailureMaxCurrent
- Bit 8, 9: outputFailureMaxTemperature
- Bit 10, 11: outputFailureMaxPower
- Bit 12, 13: outputFailureInhibit
- Bit 14, 15: outputFailureTimeout
- "
-
- ::= { outputEntry 15 }
-
-outputSupervisionMinSenseVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured sense voltage is below this value, the power supply
- performs the function defined by SupervisionAction."
- ::= { outputEntry 16 }
-
-outputSupervisionMaxSenseVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured sense voltage is above this value, the power supply
- performs the function defined by SupervisionAction."
- ::= { outputEntry 17 }
-
-outputSupervisionMaxTerminalVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured voltage at the power supply output
- terminals is above this value, the power supply
- performs the function defined by SupervisionAction."
- ::= { outputEntry 18 }
-
-outputSupervisionMaxCurrent OBJECT-TYPE
- SYNTAX Float
- UNITS "A"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured current is above this value, the power supply
- performs the function defined by SupervisionAction."
- ::= { outputEntry 19 }
-
---outputSupervisionMaxTemperature OBJECT-TYPE wohl besser config !!
--- SYNTAX INTEGER
--- MAX-ACCESS read-write
--- STATUS current
--- DESCRIPTION
--- "If the measured module temperature is above this value, the power supply
--- performs the function defined by SupervisionAction."
--- ::= { outputEntry 20 }
-
-
-
-outputConfigMaxSenseVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The maximum possible value of the sense voltage"
- ::= { outputEntry 21 }
-
-outputConfigMaxTerminalVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The maximum possible value of the terminal voltage"
- ::= { outputEntry 22 }
-
-outputConfigMaxCurrent OBJECT-TYPE
- SYNTAX Float
- UNITS "A"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The maximum possible value of the output current"
- ::= { outputEntry 23 }
-
-outputSupervisionMaxPower OBJECT-TYPE
- SYNTAX Float
- UNITS "W"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured power (measured current * measured terminal voltage)
- is above this value, the power supply performs the function defined
- by SupervisionAction."
- ::= { outputEntry 24 }
-
-outputCurrentRiseRate OBJECT-TYPE
- SYNTAX Float
- UNITS "A/s"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Current Fall Slew Rate [A/s].
- The slew rate of the output current if it increases (after
- switch on or if the Current has been changed).
- "
- ::= { outputEntry 25 }
-
-outputCurrentFallRate OBJECT-TYPE
- SYNTAX Float
- UNITS "A/s"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Current Rise Slew Rate [A/s].
- The slew rate of the output current if it decreases (after
- switch off or if the Current has been changed).
- "
- ::= { outputEntry 26 }
-
-outputTripTimeMaxCurrent OBJECT-TYPE
- SYNTAX INTEGER (0..4000)
- UNITS "ms"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Current trip time out [ms].
- The outputTripTimeMaxCurrent defines a span for the time out function.
- The activity is depending from the bit field outputFailureMaxCurrent
- of the outputSupervisionBehavior."
- ::= { outputEntry 27 }
-
--------------------------------------------------------------------------------
--- output->groups
--------------------------------------------------------------------------------
-
-groupsEntry OBJECT-TYPE
- SYNTAX GroupsEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A table row"
- INDEX { groupsIndex }
- ::= { groupsTable 1 }
-
-GroupsEntry ::=
- SEQUENCE {
- groupsIndex
- INTEGER,
--- outputGroupsName
--- DisplayString,
--- outputGroupsGroup
--- INTEGER,
-
--- outputGroupsStatus
--- BITS,
--- outputGroupsMeasurementSenseVoltage
--- Float,
--- outputMeasurementTerminalVoltage
--- Float,
--- outputMeasurementCurrent
--- Float,
--- outputMeasurementTemperature
--- INTEGER,
-
-
- groupsSwitch
- INTEGER
--- outputVoltage
--- Float,
--- outputAdjustVoltage
--- INTEGER,
--- outputCurrent
--- Float,
-
--- outputRampUp
--- Float,
--- outputRampDown
--- Float,
-
--- outputSupervisionBehavior
--- INTEGER,
--- outputSupervisionMinSenseVoltage
--- Float,
--- outputSupervisionMaxSenseVoltage
--- Float,
--- outputSupervisionMaxTerminalVoltage
--- Float,
--- outputSupervisionMaxCurrent
--- Float,
--- outputSupervisionMaxTemperature
--- INTEGER,
-
--- outputConfigMaxSenseVoltage
--- Float,
--- outputConfigMaxTerminalVoltage
--- Float,
--- outputConfigMaxCurrent
--- Float,
--- outputSupervisionMaxPower
--- Float,
- }
-
-groupsIndex OBJECT-TYPE
- SYNTAX Integer32 (0..1999)
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each power output group. Its value
- ranges between 1 and 1999.
- The special group 0 is predefined and gives access to all channels.
- "
- ::= { groupsEntry 1 }
-
-groupsSwitch OBJECT-TYPE
- SYNTAX INTEGER { undefined (-1), Off (0), On (1), resetEmergencyOff (2), setEmergencyOff(3), disableKill (4), enableKill (5), clearEvents(10) }
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Read: This function is not defined with groups of output channels.
-
- Write: Switch the state of all channels of a group.
- If any channel is On, and the write value is Off, then all channels
- will switch off.
- If any channel is Off, and the write value is On, and if no other
- signals (mainInhibit, outputInhibit, outputEmergencyOff or outputFailureMaxCurrent)
- are active, then all channels will switch on.
-
- If the write value is resetEmergencyOff, then all channels will
- leave the state EmergencyOff. A write of clearEvents is necessary
- before the voltage can ramp up again.
- If the write value is setEmergencyOff, then all channels will have
- the state EmergencyOff, which means that the High Voltage will
- switch off without a ramp and reset of the outputVoltage to null volt.
-
- If the write value is disableKILL, then all channels will switch
- to disableKill (outputStatus outputDisableKill).
- If the write value is enableKILL, then all channels will switch
- to enableKill (outputStatus outputEnableKill).
-
- If the write value is clearEvents, then all failure messages
- of the outputStatus will be cleared (all channel events,
- all module events and the state outputEmergencyOff will be reset)."
- ::= { groupsEntry 9 }
-
---groupsName OBJECT-TYPE
--- SYNTAX DisplayString (SIZE (1..4))
--- MAX-ACCESS read-only
--- STATUS current
--- DESCRIPTION
--- "A textual string containing a short name of the
--- output. If the crate is equipped with an alphanumeric
--- display, this string is shown to identify a output channel."
--- ::= { groupsEntry 2 }
-
-
-
-
--------------------------------------------------------------------------------
--- sensor
--------------------------------------------------------------------------------
---Sensor ::= SEQUENCE {
--- sensorNumber Integer32,
--- sensorTable SensorTable
---}
-
-sensorNumber OBJECT-TYPE
- SYNTAX Integer32 (0..8)
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The number of temperature sensors of the crate."
- ::= { sensor 1 }
-
-sensorTable OBJECT-TYPE
- SYNTAX SEQUENCE OF SensorEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A (conceptual table) of temperature sensor data."
- ::= { sensor 2 }
-
-sensorEntry OBJECT-TYPE
- SYNTAX SensorEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "An entry (conceptual row) of the sensorTable."
- INDEX { sensorIndex }
- ::= { sensorTable 1 }
-
-SensorEntry ::= SEQUENCE {
- sensorIndex INTEGER,
- sensorTemperature INTEGER,
- sensorWarningThreshold INTEGER,
- sensorFailureThreshold INTEGER
- }
-
-sensorIndex OBJECT-TYPE
- SYNTAX INTEGER { temp1 (1), temp2(2), temp3(3), temp4(4), temp5(5),
- temp6(6), temp7(7), temp8(8) }
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each temperature sensor in the crate"
- ::= { sensorEntry 1 }
-
-sensorTemperature OBJECT-TYPE
--- CHECK SYNTAX INTEGER { UNUSED(-128), (-127..127) }
- SYNTAX Integer32 (-128..127)
- UNITS "deg C"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured temperature of the sensor.
- Unused temperature probes have the special value -128"
- ::= { sensorEntry 2 }
-
-sensorWarningThreshold OBJECT-TYPE
--- CHECK SYNTAX INTEGER { (0..126), DISABLED(127) }
- SYNTAX Integer32 (0..127)
- UNITS "deg C"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured temperature of the sensor is higher than this
- value, the fan speed of the connected fan tray is increased.
- The value 127 has the special meaning: channel disabled."
- ::= { sensorEntry 3}
-
-sensorFailureThreshold OBJECT-TYPE
--- CHECK SYNTAX INTEGER { (0..126), DISABLED(127) }
- SYNTAX Integer32 (0..127)
- UNITS "deg C"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "If the measured temperature of the sensor is higher than this
- value, the power supply switches off.
- The value 127 has the special meaning: channel disabled."
- ::= { sensorEntry 4}
-
---################
-
--------------------------------------------------------------------------------
--- signal
--------------------------------------------------------------------------------
---Signal ::= SEQUENCE {
--- numberOfAnalogInputs Integer32,
--- analogInputTable AnalogInputTable
--- numberOfAnalogOutputs Integer32,
--- analogOutputTable AnalogOutputTable
--- digitalInput BITS,
--- digitalOutput BITS
---}
-
-numberOfAnalogInputs OBJECT-TYPE
- SYNTAX Integer32 (0..8)
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The number of additional analog inputs of the crate."
- ::= { signal 1 }
-
-analogInputTable OBJECT-TYPE
- SYNTAX SEQUENCE OF AnalogInputEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A (conceptual table) of analog input data."
- ::= { signal 2 }
-
-analogInputEntry OBJECT-TYPE
- SYNTAX AnalogInputEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "An entry (conceptual row) of the analogInputTable."
- INDEX { analogInputIndex }
- ::= { analogInputTable 1 }
-
-AnalogInputEntry ::= SEQUENCE {
- analogInputIndex INTEGER,
- analogMeasurementVoltage Float
- }
-
-analogInputIndex OBJECT-TYPE
- SYNTAX Integer32 (1..8)
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each analog input of the crate"
- ::= { analogInputEntry 1 }
-
-analogMeasurementVoltage OBJECT-TYPE
- SYNTAX Float
- UNITS "V"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured voltage of the analog input."
- ::= { analogInputEntry 2 }
-
-
-digitalInput OBJECT-TYPE
- SYNTAX BITS {
- d0 (0) ,
- d1 (1) ,
- d2 (2) ,
- d3 (3)
- }
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The value of the digital inputs."
- ::= { signal 5 }
-
-
-
-
--- ###################
--------------------------------------------------------------------------------
--- communication
--------------------------------------------------------------------------------
---Communication ::= SEQUENCE {
--- snmp Snmp,
--- tcpip Tcpip,
--- http Http,
--- telnet Telnet,
--- canbus Canbus,
--- rs232 RS232
---}
-
--------------------------------------------------------------------------------
--- communication.snmp
--------------------------------------------------------------------------------
-snmp OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "SNMP configuration."
- ::= { communication 1 }
-
---Snmp ::= SEQUENCE {
--- snmpCommunityTable SnmpCommunityTable,
--- snmpPort INTEGER
---}
-
-snmpCommunityTable OBJECT-TYPE
- SYNTAX SEQUENCE OF SnmpCommunityEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "The SNMP community string table for different views."
- ::= { snmp 1 }
-
-snmpCommunityEntry OBJECT-TYPE
- SYNTAX SnmpCommunityEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "One table row."
- INDEX { snmpAccessRight }
- ::= { snmpCommunityTable 1 }
-
-
-SnmpCommunityEntry ::= SEQUENCE {
- snmpAccessRight INTEGER,
- snmpCommunityName OCTET STRING
-}
-
-snmpAccessRight OBJECT-TYPE
- SYNTAX INTEGER { public (1), private (2), admin (3), guru (4) }
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each access right"
- ::= { snmpCommunityEntry 1 }
-
-snmpCommunityName OBJECT-TYPE
- SYNTAX OCTET STRING (SIZE (0..14))
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The SNMP community names for different views. The rights of the different communities are:
- public no write access
- private can switch power on/off, generate system reset
- admin can change supervision levels
- guru can change output voltage & current (this may destroy hardware if done wrong!)
- Setting a community name to a zero-length string completly
- disables the access to this view. If there is no higher-
- privileged community, the community name can only changed
- by direct access to the crate (not via network)!
- "
- ::= { snmpCommunityEntry 2}
-
-snmpPort OBJECT-TYPE
- SYNTAX Integer32
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The UDP port number of the SNMP protocol"
- ::= { snmp 2}
-
--------------------------------------------------------------------------------
--- communication.canTunnel
--------------------------------------------------------------------------------
-can OBJECT-IDENTITY
- STATUS current
- DESCRIPTION
- "CAN-Bus tunnel via SNMP."
- ::= { communication 2 }
-
-canBitRate OBJECT-TYPE
- SYNTAX Integer32
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Control of the CAN-Bus.
- The value defines the bit rate of the CAN-bus interface.
- A write disconnects the CAN interface from the ISEG modules and connects
- it to the SNMP communication. Both the receive and transmit fifos are
- cleared and the CAN interface is initialized with the selected bit rate.
- The special bit rate 0 disables the tunnel and switches back to normal operation.
- "
- ::= { can 1 }
-
-canReceive OBJECT-TYPE
- SYNTAX OCTET STRING (SIZE (14))
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "Control of the CAN-Bus Receive FIFO.
- A read access returns the total number of CAN messages stored in the receive
- fifo and the oldest message.
- This message is removed from the fifo.
- The OCTET STRING data is formatted according to the CANviaSNMP structure.
- "
- ::= { can 2 }
-
-canTransmit OBJECT-TYPE
- SYNTAX OCTET STRING (SIZE (14))
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Control of the CAN-Bus Transmit FIFO.
- A read access returns the total number of CAN messages stored in the transmit
- fifo and a NULL message.
- A write inserts the CAN message into the transmit fifo. This message will be
- transmitted via the CAN interface later. The total number of CAN messages
- stored in the transmit fifo and the recent message are returned.
- The OCTET STRING data is formatted according to the CANviaSNMP structure.
- "
- ::= { can 3 }
-
--------------------------------------------------------------------------------
--- communication....
--------------------------------------------------------------------------------
-
--- other future entries:
--- +-tcpip
--- | |
--- | +- tcpipIpAddress
--- | +- tcpipGateway
--- | +- tcpipSubnetMask
--- | +- tcpipNegotiation
--- | +- tcpipMAC
--- |
--- +-http
--- | |
--- | +- httpPort
--- | +- httpWriteEnable
--- |
--- +-telnet
--- | |
--- | +- telnetPort
--- |
--- +-canbus
--- | |
--- | +- address
--- | +- address2
--- | +- speed
--- |
--- +-rs232
--- | |
--- | +- ?
-
-
-
--------------------------------------------------------------------------------
--- powersupply
--------------------------------------------------------------------------------
-Powersupply ::= SEQUENCE {
- --psFirmwareVersion DisplayString,
- psSerialNumber DisplayString,
- psOperatingTime Integer32,
- psDirectAccess OCTET STRING
-}
-
---integrated in system.sysDesc
---psFirmwareVersion OBJECT-TYPE
--- SYNTAX DisplayString
--- MAX-ACCESS read-only
--- STATUS current
--- DESCRIPTION
--- "The firmware version of the power supply main CPU."
--- ::= { powersupply 1 }
-
-psSerialNumber OBJECT-TYPE
- SYNTAX DisplayString
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The serial number of the power supply."
- ::= { powersupply 2 }
-
-psOperatingTime OBJECT-TYPE
- SYNTAX Integer32
- UNITS "s"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The time in seconds for how long the power supply was switched on."
- ::= { powersupply 3 }
-
-psDirectAccess OBJECT-TYPE
- SYNTAX OCTET STRING (SIZE (1..14))
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "Direct data transfer to the UEP6000 power supply.
- A read access returns nothing, a write access returns the
- response of the power supply.
- "
- ::= { powersupply 1024 }
-
--------------------------------------------------------------------------------
--- fantray
--------------------------------------------------------------------------------
---Fantray ::= SEQUENCE {
--- fanFirmwareVersion DisplayString,
--- fanSerialNumber OCTET STRING,
--- fanOperatingTime Integer32,
--- fanAirTemperature INTEGER,
--- fanSwitchOffDelay INTEGER,
--- fanNominalSpeed INTEGER,
--- fanNumberOfFans INTEGER,
--- fanSpeedTable FanSpeedTable
---}
-
---integrated in system.sysDesc
---fanFirmwareVersion OBJECT-TYPE
--- SYNTAX DisplayString
--- MAX-ACCESS read-only
--- STATUS current
--- DESCRIPTION
--- "The firmware version of the fan tray CPU."
--- ::= { fantray 1 }
-
-fanSerialNumber OBJECT-TYPE
- SYNTAX DisplayString (SIZE (0..14))
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The serial number of the fan tray."
- ::= { fantray 2 }
-
-fanOperatingTime OBJECT-TYPE
- SYNTAX Integer32
- UNITS "s"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The time in seconds for how long the fan tray was switched on."
- ::= { fantray 3 }
-
-fanAirTemperature OBJECT-TYPE
- SYNTAX Integer32
- UNITS "deg C"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The temperature of the fan tray inlet air."
- ::= { fantray 4 }
-
-fanSwitchOffDelay OBJECT-TYPE
- SYNTAX Integer32 (0 .. 900)
- UNITS "s"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The maximum time in seconds for which the fans will continue running
- after the power supply has been switched off. This feature is used
- to cool down the electronics after switching off.
- "
- ::= { fantray 5 }
-
-fanNominalSpeed OBJECT-TYPE
--- CHECK SYNTAX INTEGER { (0) , (1200..3600) }
- SYNTAX Integer32 (0..3600)
- UNITS "RPM"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The nominal fan rotation speed (RPM, Revolutions Per Minute)
- Value 0 does switch off the fans (only allowed if at least
- one rack temperature sensor is present).
- Values 1..1199 are not allowed"
- ::= { fantray 6 }
-
-fanNumberOfFans OBJECT-TYPE
- SYNTAX Integer32 ( 0..12 )
- UNITS "Fans"
- MAX-ACCESS read-write
- STATUS current
- DESCRIPTION
- "The number of installed fans"
- ::= { fantray 7 }
-
-
-fanSpeedTable OBJECT-TYPE
- SYNTAX SEQUENCE OF FanSpeedEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A list of fanSpeedEntries."
- ::= { fantray 8 }
-
-fanSpeedEntry OBJECT-TYPE
- SYNTAX FanSpeedEntry
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A table row"
- INDEX { fanNumber }
- ::= { fanSpeedTable 1 }
-
-FanSpeedEntry ::= SEQUENCE {
- fanNumber
- INTEGER,
- fanSpeed
- INTEGER
-}
-
-fanNumber OBJECT-TYPE
- SYNTAX Integer32 ( 1..12 )
- MAX-ACCESS not-accessible
- STATUS current
- DESCRIPTION
- "A unique number for each fan."
- ::= { fanSpeedEntry 1 }
-
-fanSpeed OBJECT-TYPE
- SYNTAX Integer32
- UNITS "RPM"
- MAX-ACCESS read-only
- STATUS current
- DESCRIPTION
- "The measured fan rotation speed (RPM, Revolutions Per Minute)"
- ::= { fanSpeedEntry 2 }
-
-
-
-
-
--------------------------------------------------------------------------------
--- rack
--------------------------------------------------------------------------------
--- this is reserved for futer items (BIN serial number, plug&play, ...)
-
-
-
--------------------------------------------------------------------------------
-END
Index: sipmscan/trunk/mpod/mpod_voltage.sh
===================================================================
--- sipmscan/trunk/mpod/mpod_voltage.sh (revision 144)
+++ sipmscan/trunk/mpod/mpod_voltage.sh (nonexistent)
@@ -1,114 +0,0 @@
-#!/bin/bash
-
-# Commands:
-# snmpset - sets the selected attribute of a single channel
-# snmpget - prints the selected atribute of a single channel
-# snmpwalk - prints the selected attribute of all channels
-#
-# Attributes:
-# outputVoltage - float(F), R/W
-# outputCurrent - float(F), R/W
-# outputMeasurementSenseVoltage - float(F), R
-# outputMeasurementCurrent - float(F), R
-# outputSwitch - integer(i), R/W
-# outputVoltageRiseRate - float(F), R/W
-# outputStatus - bits, R
-
-#ip=194.249.156.124
-#ip=f9mpod.ijs.si
-
-#if [$1 -lt 99]; then
-# if [$2 -lt 74]; then
-# echo "Setting bias to " $2
-# snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$1 F $2
-# else
-# echo "Bias voltage needs to be smaller than 74V."
-# fi
-#else if [$1 -gt 99]; then
-# if [$2 -lt 35]; then
-# echo "Setting bias to " $2
-# snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$1 F $2
-# else
-# echo "Bias voltage needs to be smaller than 35V."
-# fi
-#fi
-
-function reset_all
-{
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.1 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.2 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.3 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.4 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.5 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.6 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.7 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.8 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.101 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.102 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.103 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.104 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.105 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.106 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.107 i 10
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.108 i 10
-
- exit 0
-}
-
-ip=f9mpod.ijs.si
-
-# save all arguments to array args
-args=("$@")
-
-argcnt=0
-outSel=-1
-outVolt=-1
-outSw=-1
-resetOut=-1
-getOut=-1
-
-# search the arguments for valid options
-for ARG in "${args[@]}"; do
- if [ "$ARG" == "--resetall" ]; then
- reset_all
- elif [ "$ARG" == "-g" ]; then
- getOut=1
- elif [ "$ARG" == "-r" ]; then
- resetOut=${args[$argcnt+1]}
- elif [ "$ARG" == "-o" ]; then
- outSel=${args[$argcnt+1]}
- elif [ "$ARG" == "-v" ]; then
- outVolt=${args[$argcnt+1]}
- elif [ "$ARG" == "-s" ]; then
- outSw=${args[$argcnt+1]}
- fi
- (( argcnt++ ))
-done
-
-if [ $resetOut != -1 ]; then
- if [ $resetOut -ge 1 -a $resetOut -le 8 ] || [ $resetOut -ge 101 -a $resetOut -le 108 ]; then
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$resetOut i 10
- else
- echo "Please select output between 1 and 8 (channel 1) or 101 and 108 (output 2)."
- fi
-else
- if [ $outSel != -1 ]; then
- # limit the channels to the correct value
- if [ $outSel -ge 1 -a $outSel -le 8 ] || [ $outSel -ge 101 -a $outSel -le 108 ]; then
- if [ $outVolt != -1 ]; then
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$outSel F $outVolt
- fi
- if [ $outSw != -1 ]; then
- snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$outSel i $outSw
- fi
- if [ $getOut != -1 ]; then
- snmpget -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$outSel
- snmpget -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$outSel
- fi
- else
- echo "Please select output between 1 and 8 (channel 1) or 101 and 108 (output 2)."
- fi
- fi
-fi
-
-exit 0
/sipmscan/trunk/mpod/mpod_voltage.sh
Property changes:
Deleted: svn:executable
## -1 +0,0 ##
-*
\ No newline at end of property
Index: sipmscan/trunk/mpod/instructions_mpod.txt
===================================================================
--- sipmscan/trunk/mpod/instructions_mpod.txt (revision 144)
+++ sipmscan/trunk/mpod/instructions_mpod.txt (nonexistent)
@@ -1,6 +0,0 @@
-mpod_voltage.sh has the following options:
- --resetall Resets all outputs
- -r [integer] Resets output selected with [integer]
- -o [integer] Selects output [integer]
- -v [float] Sets the voltage to [float]. Must be used in combination with -o
- -s [0/1] Turns output on (1) or off (0). Must be used in combination with -o
Index: sipmscan/trunk/mpod/test.sh.bak
===================================================================
--- sipmscan/trunk/mpod/test.sh.bak (revision 144)
+++ sipmscan/trunk/mpod/test.sh.bak (nonexistent)
@@ -1,24 +0,0 @@
-#!/bin/bash
-
-snmpsearch="--snmp-install="
-
-for var in $@
-do
- case $var in
- "$snmpsearch"*)
- echo "Mached argument: $var"
- snmpdir=${var#$snmpsearch}
- echo "SNMP directory = $snmpdir";;
- *) ;;
-# echo "Unmached argument: $var";;
- esac
-done
-
-printenv PATH | grep "snmp"
-if [ $? == 0 ]; then
- echo "Something found."
-else
- echo "Nothing found."
-fi
-
-exit 0
Index: sipmscan/trunk/daq.h
===================================================================
--- sipmscan/trunk/daq.h (revision 144)
+++ sipmscan/trunk/daq.h (nonexistent)
@@ -1,36 +0,0 @@
-#ifndef _daq_h_
-#define _daq_h_
-
-#define BUFF_L 2048
-
-// Number of channels we are using (used only if we run daqusb.C, not the GUI version)
-//#define NTDC 1 /* TDC */
-//#define NTDCCH 1
-//#define NADC 2 /* ADC */
-//#define NADCCH 1
-
-// Class for measurement process (DAQ for CAMAC)
-class daq
-{
-private:
-// Number of channels we are using
- int NTDC;
- int NTDCCH;
- int NADC;
- int NADCCH;
-
- int devDetect; // variable to tell if we detect any devices
-public:
- unsigned long stackwrite[BUFF_L],stackdata[10000],stackdump[27000];
- int fStop;
- int connect();
- int init(int);
- int start();
- int event(unsigned int *, int);
- int stop();
- int disconnect();
- daq();
- ~daq();
-};
-
-#endif
Index: sipmscan/trunk/README
===================================================================
--- sipmscan/trunk/README (revision 144)
+++ sipmscan/trunk/README (nonexistent)
@@ -1,155 +0,0 @@
-SOFTWARE FOR SIPM CHARACTERIZATION WITH CAMAC, SCOPE, BIAS VOLTAGE AND TABLE POSITION SUPPORT
-=============================================================================================
-By Gasper Kukec Mezek, April 2015.
-
-________________
-1. Installation:
-
-Pre-requisites for offline and online modes:
-a) Offline mode (support for histogramming and analysis):
- - A newer (5.34 or higher) pro version of ROOT (https://root.cern.ch).
-b) Online mode (support for histogramming, analysis and data acquisition):
- - Perl developer package libperl-dev for installation of net-snmp (sudo apt-get install libperl-dev).
- - Current version of net-snmp (http://www.net-snmp.org).
- - A newer (5.34 or higher) pro version of ROOT (https://root.cern.ch).
- - USB developer package libusb-dev (sudo apt-get install libusb-dev).
-
-Installation is done through the usual "./configure" and "make" commands to enable the use of this software with 32 bit or 64 bit systems.
-
-Configure takes the following arguments:
-- First argument is the configure option (help, nomake, all, clean, compress):
- help = shows configure help
- all = prepares OS dependent files and makes the needed usb daq libraries
- nomake = only prepares OS dependent files
- clean = cleans the installation to the base file structure (keeps the results directory)
- compress = compresses the base installation into a tar-ball
-- Second argument is the online/offline configure setting (only used when first argument is nomake or all), that enables the software to work with:
- a connected CAMAC and scope (I)
- only a connected scope (S)
- with no connected devices (O)
-- The following arguments set specific computer details and can be entered in any order:
- a) --root-install=/path/to/root/directory -> The ROOT install directory, if it is not installed in a standard location (especially needed when running the program with superuser, since it usually does not have the required environment variables).
- b) --snmp-install=/path/to/snmp/directory -> The NET-SNMP install directory, if it is not installed in a standard location.
- c) --ostype=YYYY -> Optional argument to specifically set the OS type to either 32bit (YYYY = i686) or 64bit (YYYY = x86_64). If argument not supplied, the configure script will try to get this information automatically through uname.
-
-Running "./configure" or "./configure help" will give more information on specific uses.
-Example:
- ./configure all I --root-install=/opt/root --snmp-install=/opt/net-snmp --ostype=i686
-
-Makefile:
-Once configuration is done, a Makefile will be generated and further installation is done by running "make". Running "make relib" will only recreate the libraries in case something has been edited in them.
-Example:
- make
-
-On first run of the program, make sure to copy the ./mpod/WIENER-CRATE-MIB.txt to the MIB directory in your installation of net-snmp. This can be in:
- ~/.snmp/mibs
-or
- [/snmp/install/directory]/share/snmp/mibs
-
-________________________
-2. Running the software:
-
-Once installation is performed, use
- ./start.sh
-to start the software in offline mode or
- sudo ./start.sh
-to start the software in online mode. Once the software starts, it will let you know (in the terminal) if connection to CAMAC was correctly established.
-
-____________________
-3. Feature overview:
-
-The main window is divided into 5 subwindows:
-a) Settings window:
- - ON/OFF switches for voltage and surface scans.
- - a voltage limiter -> sets the maximum output voltage for safety reasons
- - clean plots toggle switch -> when ON, no additional stats will be displayed on plots/histograms
- - scope IP -> sets the oscilloscope IP address
- - LASER settings info panel -> this will be written to the output file and is used for supplying additional information
- - chamber temperature -> the chamber temperature to be written to the output file
- - incidence angle -> the angle at which the sample is rotated around its axis, relative to the LASER beam (0 degrees is perpendicular to LASER beam)
-
-b) Main measurement window:
- - settings for table position and bias voltage
- - when scans are enabled, additional settings for scans
- - number of events -> setting for the number of events to gather in a measurement
- - time stamp -> informational time (start time of measurement is written to output file)
- - file selector (for scans, the filenames will be appended sequential numbers to distinguish them)
- - start acquisition button -> starts the measurement based on selected settings
- - waveform analysis settings (channel, measurement type)
- - possibility to send custom one-line commands
-
-c) Histogram file selection window:
- - open past measurements for analysis
- - if using multiple files, use multiple file select or select all listed files
- - files will be used in order displayed on the list
- - to clear the complete list, use the clear list button
- - to edit the header information of currently selected files, use the edit header button
- - any opened measurement has an info display of its header at the bottom for easier navigation
-
-d) Histogram window:
- - displays the currently selected histogram in the histogram file selection window
-
-e) Histogram controls window:
- - directly linked to the histogram window, it enables plotting options
- - can set ranges on histogram plots
- - can change between different histogram types (ADC, TDC, ADC vs. TDC, 2D surface plot)
- - for the 2D surface plot, the relevant files need to be selected in the histogram file selection window
- - toggle for logarithmic Y scale
- - the currently selected histogram can be manually exported with the export button
- - fit settings used when running "Fit spectrum" and "Fit all selected" options in the Analysis menu
-
-On the top, there are 4 menus:
-a) File:
- - New Measurement -> not working
- - Exit -> exit the software (shortkey x)
-
-b) Analysis:
- - Histogram type -> change between histogram types (same as in histogram controls window)
- - Fit spectrum -> fit the currently open spectrum for peaks
- - Fit all selected -> fit all the selected ADC spectra selected in the histogram file selection window for peaks and display the breakdown voltage plots
- - Integrate spectrum (X, Y) -> integrate the ADC spectrum for multiple files with an X or Y scan (used for edge scans)
- - Relative PDE -> calculation of the relative PDE for the currently selected files
-
-c) Tools:
- - Fieldpoint temperature sensor -> direct graphing of the fieldpoint temperature sensor (with settings for fieldpoint channel, start time and end time), output is a graph (if exporting) and a comma separated list saved to folder ./fieldpoint. Updating the graph can cause unstable behavior. If possible, use ~/sipmscan/fieldpoint_standalone instead.
-
-d) Windows:
- - Specific window tiling
- - Switch between active windows
-
-e) Help information
-
-Important!
-When using any analysis method (surface 2D plot, fitting, integration, ADC spectra display) only events inside the selected TDC window will be used so set the TDC range accordingly.
-
-______________
-4. Change log:
-
-17.7.2015 (Current Rev):
-a) Fixed a problem with ADC peak fitting (peak fitting returning a segmentation fault).
-b) Added support to edit file headers (in case, some were created at an older date and did not include some header information or there was a mistake in writing them).
-c) Temperature data can only be retrieved when connected to the IJS network (IP = 178.172.43.xxx) and is disabled otherwise.
-d) The relative PDE measurement now takes the incidence angle value directly from input files.
-e) Currently, data acquisition only works on 32bit computers.
-f) Fixed issue with program not correctly writting multiple channels.
-
-5.5.2015 (Rev 128):
-a) Added a header display for opened files in the histogram file selection window. This enables a quicker view of the measurement information.
-b) Added an incidence angle input to be able to save sample rotation angle to headers of files.
-c) Added support for the fieldpoint temperature sensor (FP RTD 122). Can now plot and export data from the sensor for a specific channel and specific time range. For now, this option only works if the PC you are using this program on is connected to an internet/ethernet connection at IJS.
-d) Added a limited relative PDE analysis option. At this time, it takes the selected files and calculates the PDE, relative to the first selected file. The first file should be measured at incidence angle 0, with others having an incidence angle shift of +15 (1st file -> 0, 2nd file -> 15, 3rd file -> 30,...).
-
-9.4.2015 (Rev 127):
-a) Added communications panel for connecting to a Tektronix scope.
-b) Added limited support for waveform analysis with a Tektronix scope. For now, it only works when linking it to CAMAC acquisition.
-c) Added a manual chamber temperature entry field.
-
-16.3.2015 (Rev 117):
-a) First version of sipmscan.
-b) Added support for CAMAC, bias voltage settings and table position settings.
-c) Added support for opening measured histograms.
-d) Added support for analysis:
- - making surface plots
- - fitting the ADC spectrum
- - creating breakdown voltage plots
- - integrating the ADC spectrum with changing X or Y direction (edge scans)
Index: sipmscan/trunk/windowed_test.C
===================================================================
--- sipmscan/trunk/windowed_test.C (revision 144)
+++ sipmscan/trunk/windowed_test.C (nonexistent)
@@ -1,5658 +0,0 @@
-#include "workstation.h"
-#include "daq.h"
-#include "root_include.h"
-#include "windowed_test.h"
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-
-#include "daqscope.h"
-
-//---------------------------------------------------------------
-// Subwindow layout class
-
-class TGMdiSubwindow
-{
-RQ_OBJECT("TGMdiSubwindow")
-
-protected:
- TGMdiFrame *fMdiFrame;
-
-public:
- TGMdiSubwindow(TGMdiMainFrame *main, int w, int h);
-
- TGMdiFrame *GetMdiFrame() const { return fMdiFrame; }
- virtual Bool_t CloseWindow();
-};
-
-//---------------------------------------------------------------
-// Main window class
-
-class TGAppMainFrame
-{
-RQ_OBJECT("TGAppMainFrame")
-
-protected:
- TGMainFrame *fMain;
- TGMdiMainFrame *fMainFrame;
- TGMdiMenuBar *fMenuBar;
- TGLayoutHints *fMenuBarItemLayout;
- TGPopupMenu *fMenuFile, *fMenuAnalysis, *fMenuTools, *fMenuWindow, *fMenuHelp;
- TGPopupMenu *fMenuHisttype;
- TGMdiSubwindow *settingsPane, *mainSubwindow, *histogramPane, *histogramPaneFile, *histogramPaneCtr, *fieldpointPane, *headerPane;
-
- void InitMenu();
- void MeasurementLayout();
- void OpenWindow(int winid);
- void CloseWindow();
- Bool_t About();
-public:
- TGAppMainFrame(const TGWindow *p, int w, int h);
-
- void HandleMenu(Int_t id);
-
- void EnableVoltScan();
- void EnableSurfScan();
- void EnableZaxisScan();
- void VoltageLimit();
- void ChannelLimit();
- void CleanPlotToggle();
- void ConnectToScope();
-
- void SetVoltOut();
- void GetVoltOut();
- void ResetVoltOut();
- void SetPosition();
- void GetPosition();
- void HomePosition();
-
- void InitializeScope();
- void StartScopeAcq();
- void CustomScopeCommand();
- void SelectedMeasType(int mtype);
-
- void SaveFile();
- void StartAcq();
-
- void SelectDirectory();
- void ListMultiSelect();
- void ListSelectAll();
- void FileListNavigation(int pn);
- void HeaderEdit();
-
- void DisplayHistogram(char *histfile, int histtype);
- void SetHistRange();
- void ChangeHisttype(int type);
- void ChangeChannel();
- void HistogramExport();
- void MakeSurfPlot(TList *files);
- void MakeBreakdownPlot(int nrp, double *volt, double *volterr, double *psep1, double *pseperr1, double *psep2, double *pseperr2, double *psep3, double *pseperr3, char *plotfile, int separations);
-
- void FitSpectrum(TList *files, int q);
- void EdgeDetection(TGraph *pdf, TGraph *cdf, char *outname, TCanvas *g1dCanvas, double pdfmax, int direction);
- void IntegSpectrum(TList *files, int direction);
- void PhotonMu(TList *files);
-
- void UpdateTempPlot();
- void TempEndToggle();
- void ExportTempPlot();
- void GetTempFile(int set);
-
- void EditTickToggle(int set);
- void headerchange(char *histfile, bool *changetype);
- void headeredit();
-
- void RunMeas(void *ptr, int runCase, int zaxisscan, int &scanon);
-};
-
-const char *histExt = ".root";
-const char *histExtAll = "*.root";
-daq *gDaq;
-daqscope *gScopeDaq;
-//int debugSig = 0;
-int retTemp;
-int gStop=0;
-unsigned int gBuf[BSIZE];
-int logchange = 0;
-double tdctimeconversion = 45.0909;
-double lenconversion = 0.3595;
-int oscOn;
-const char *allMeasNames[11] = {"Amplitude","Area","Delay","Fall","Frequency","Maximum","Mean","Minimum","Peak-to-peak","Peak width","Rise"};
-
-// ROOT file variable structure -----------
-struct EventHeader {
- int nrch;
- int timestamp;
- double biasvolt;
- int xpos;
- int ypos;
- int zpos;
- double temperature;
- double angle;
- char laserinfo[256];
-} evtheader;
-
-struct EventData {
- int adcdata[8];
- int tdcdata[8];
-} evtdata;
-
-struct EventMeas {
- double measdata;
-} evtmeas;
-
-TFile *inroot;
-TFile *outroot;
-
-// Test graphs for scope measurements
-TCanvas *wCanvas;
-TGraph *testgraph;
-
-//---------------------------------------------------------------
-// Global variables
-
-TGCheckButton *voltscanOn;
-TGCheckButton *surfscanOn;
-TGCheckButton *zscanOn;
-TGTextEntry *oscIP;
-TGTextButton *oscConnect;
-TGCheckButton *histogramOn;
-TGNumberEntry *vHardlimit;
-TGNumberEntry *NCH;
-TGTextEntry *laserInfo;
-TGNumberEntry *chtemp;
-TGNumberEntry *incangle;
-TGCheckButton *cleanOn;
-
-TGTab *setTab;
-TGComboBox *vOutCh;
-TGNumberEntry *vOut;
-TGCheckButton *vOutOnOff;
-TGTextButton *vOutSet;
-TGTextButton *vOutGet;
-TGTextButton *vOutReset;
-TGNumberEntry *vOutStart;
-TGNumberEntry *vOutStop;
-TGNumberEntry *vOutStep;
-TGNumberEntry *xPos;
-TGNumberEntry *yPos;
-TGNumberEntry *zPos;
-TGTextButton *positionSet;
-TGTextButton *positionGet;
-TGTextButton *positionHome;
-TGNumberEntry *xPosMin;
-TGNumberEntry *xPosMax;
-TGNumberEntry *xPosStep;
-TGNumberEntry *yPosMin;
-TGNumberEntry *yPosMax;
-TGNumberEntry *yPosStep;
-TGNumberEntry *zPosMin;
-TGNumberEntry *zPosMax;
-TGNumberEntry *zPosStep;
-TGNumberEntry *evtNum;
-TGTextEntry *timeStamp;
-TGTextEntry *fileName;
-TGTextButton *saveFile;
-TGTextButton *measStart;
-TGLabel *busyLabel;
-TGHProgressBar *curProgress;
-
-TRootEmbeddedCanvas *histCanvas;
-
-TGTextButton *selectDir;
-TGListBox *fileList;
-TGCheckButton *multiSelect;
-TGCheckButton *multiSelectAll;
-TGTextButton *prevFile;
-TGTextButton *nextFile;
-TGTextButton *editHeader;
-
-TGTextEntry *disptime;
-TGNumberEntry *dispbias;
-TGTextEntry *disppos;
-TGNumberEntry *disptemp;
-TGNumberEntry *dispangle;
-TGTextEntry *displaser;
-
-TGNumberEntry *adcMinRange;
-TGNumberEntry *adcMaxRange;
-TGNumberEntry *tdcMinwindow;
-TGNumberEntry *tdcMaxwindow;
-TGNumberEntry *yMinRange;
-TGNumberEntry *yMaxRange;
-TGNumberEntry *selectCh;
-TGTextButton *changeADC;
-TGTextButton *changeTDC;
-TGTextButton *changeADCTDC;
-TGTextButton *change2Dsurf;
-TGCheckButton *logscale;
-TGTextButton *exportHist;
-TGNumberEntry *fitSigma;
-TGNumberEntry *fitTresh;
-TGNumberEntry *fitInter;
-TGNumberEntry *accError;
-TGNumberEntry *minPeak;
-TGNumberEntry *pedesLow;
-TGCheckButton *exfitplots;
-
-TGCheckButton *sCH[8];
-TGComboBox *sMeasType;
-TGCheckButton *sCamaclink;
-TGTextEntry *scopeCommand;
-TGTextEntry *scopeReturn;
-TGTextButton *sendScopeCustom;
-TGComboBox *sMeasgroup;
-TGTextButton *scopeInit;
-
-TRootEmbeddedCanvas *displayCanvas;
-TGComboBox *tempCh;
-TGComboBox *tempDay[2];
-TGComboBox *tempMonth[2];
-TGComboBox *tempYear[2];
-TGComboBox *tempHour[2];
-TGComboBox *tempMinute[2];
-TGComboBox *tempSecond[2];
-TGTextButton *tempFile[2];
-TGCheckButton *tempEndOn;
-TGTextButton *updateTemp;
-TGTextButton *exportTemp;
-//TGTextButton *closeTemp;
-
-TGCheckButton *biasedittick;
-TGNumberEntry *biasedit;
-TGCheckButton *posedittick;
-TGNumberEntry *posedit[3];
-TGCheckButton *tempedittick;
-TGNumberEntry *tempedit;
-TGCheckButton *angleedittick;
-TGNumberEntry *angleedit;
-TGCheckButton *laseredittick;
-TGTextEntry *laseredit;
-TGTextButton *editHead;
-
-Bool_t firstrun = kTRUE;
-Bool_t started;
-Bool_t cleanPlots = kTRUE;
-
-// Layout hints definitions
-TGLayoutHints *f0 = new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,2,2);
-TGLayoutHints *f0centerx = new TGLayoutHints(kLHintsCenterX,2,2,2,2);
-TGLayoutHints *f0centery = new TGLayoutHints(kLHintsLeft | kLHintsCenterY,2,2,2,2);
-TGLayoutHints *f0center2d = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY,2,2,2,2);
-TGLayoutHints *f0right = new TGLayoutHints(kLHintsRight | kLHintsTop,2,2,2,2);
-TGLayoutHints *f1 = new TGLayoutHints(kLHintsExpandX | kLHintsExpandY,2,2,2,2);
-TGLayoutHints *f2 = new TGLayoutHints(kLHintsExpandX,2,2,2,2);
-TGLayoutHints *f3 = new TGLayoutHints(kLHintsCenterY,2,2,20,2);
-TGLayoutHints *f3notop = new TGLayoutHints(kLHintsCenterY,4,4,2,30);
-
-// Separate functions -----------------------------------------
-void GetTime(int intime, char *outtime)
-{
- time_t rawtime;
- struct tm * timeinfo;
- if(intime < 0)
- time(&rawtime);
- else
- rawtime = (time_t)intime;
- timeinfo = localtime(&rawtime);
- sprintf(outtime, "%s", asctime(timeinfo));
- int len = strlen(outtime);
- if(len) outtime[len-1] = 0;
-}
-
-int MyTimer()
-{
- char cmd[100];
- GetTime(-1, cmd);
- if (timeStamp) timeStamp->SetText(cmd);
- return 0;
-}
-
-int GetChannel()
-{
- int selectedOutput;
- if(vOutCh->GetSelected() < 8) selectedOutput = (vOutCh->GetSelected())+1;
- else if( (vOutCh->GetSelected() >= 8) && (vOutCh->GetSelected() < 16) ) selectedOutput = (vOutCh->GetSelected())+93;
- else selectedOutput = 1;
-
- return selectedOutput;
-}
-
-void remove_ext(char *inname, char *outname)
-{
- char ctemp[256];
- for(int i = 0; i < (int)strlen(inname); i++)
- {
- if( (inname[i] == '.') && (i > (int)(strlen(inname)-6)) )
- {
- ctemp[i] = '\0';
- sprintf(outname, "%s", ctemp);
- break;
- }
- else
- ctemp[i] = inname[i];
- }
-
- if(debug)
- printf("Outfile (remove_ext): %s\n", outname);
-}
-
-void remove_from_last(char *inname, char search, char *outname)
-{
- char ctemp[256];
- int searchpos = -1;
- for(int i = (int)strlen(inname); i >= 0; i--)
- {
- if(inname[i] == search)
- {
- searchpos = i;
- break;
- }
- }
-
- for(int i = 0; i < searchpos; i++)
- ctemp[i] = inname[i];
-
- ctemp[searchpos] = '\0';
- sprintf(outname, "%s", ctemp);
-
- if(debug)
- printf("Outfile (remove_from_last): %s\n", outname);
-}
-
-void SeqNumber(int innum, int maxnum, char *outstr)
-{
- int zeronum = 5;
-
- // Check how many zeroes we need to add to get sequential numbers
- if( (maxnum > 0) && (maxnum < 1000) )
- zeronum = 2;
- else if( (maxnum >= 1000) && (maxnum < 10000) )
- zeronum = 3;
- else if( (maxnum >= 10000) && (maxnum < 100000) )
- zeronum = 4;
- else if( (maxnum >= 100000) && (maxnum < 1000000) )
- zeronum = 5;
-
- // Make the sequence number depending on the number of zeroes
- if(zeronum == 2)
- {
- if(innum < 10)
- sprintf(outstr, "00%d", innum);
- else if( (innum >= 10) && (innum < 100) )
- sprintf(outstr, "0%d", innum);
- else if( (innum >= 100) && (innum < 1000) )
- sprintf(outstr, "%d", innum);
- }
- else if(zeronum == 3)
- {
- if(innum < 10)
- sprintf(outstr, "000%d", innum);
- else if( (innum >= 10) && (innum < 100) )
- sprintf(outstr, "00%d", innum);
- else if( (innum >= 100) && (innum < 1000) )
- sprintf(outstr, "0%d", innum);
- else if( (innum >= 1000) && (innum < 10000) )
- sprintf(outstr, "%d", innum);
- }
- else if(zeronum == 4)
- {
- if(innum < 10)
- sprintf(outstr, "0000%d", innum);
- else if( (innum >= 10) && (innum < 100) )
- sprintf(outstr, "000%d", innum);
- else if( (innum >= 100) && (innum < 1000) )
- sprintf(outstr, "00%d", innum);
- else if( (innum >= 1000) && (innum < 10000) )
- sprintf(outstr, "0%d", innum);
- else if( (innum >= 10000) && (innum < 100000) )
- sprintf(outstr, "%d", innum);
- }
- else if(zeronum == 5)
- {
- if(innum < 10)
- sprintf(outstr, "00000%d", innum);
- else if( (innum >= 10) && (innum < 100) )
- sprintf(outstr, "0000%d", innum);
- else if( (innum >= 100) && (innum < 1000) )
- sprintf(outstr, "000%d", innum);
- else if( (innum >= 1000) && (innum < 10000) )
- sprintf(outstr, "00%d", innum);
- else if( (innum >= 10000) && (innum < 100000) )
- sprintf(outstr, "0%d", innum);
- else if( (innum >= 100000) && (innum < 1000000) )
- sprintf(outstr, "%d", innum);
- }
-}
-
-// Peak detection function
-int npeaks;
-double FindPeaks(double *x, double *par)
-{
- double result = 0;
- for(int i = 0; i < npeaks; i++)
- {
- double norm = par[3*i];
- double mean = par[3*i+1];
- double sigma = par[3*i+2];
- result += norm*TMath::Gaus(x[0], mean, sigma);
- }
- return result;
-}
-
-// Temperature sensor functions -----------------------------
-const char* dbname = "mysql://f9lab08.ijs.si/f9phdet";
-const char* tblname = "fprtd122";
-const char* username = "f9daq";
-const char* userpass = "f9lab";
-
-// Get the temperature from MYSQL database
-double GetTemperature(int ch, const char *s)
-{
- int bin=5+7*4-ch*4;
- char hex[16];
- strncpy(hex, (const char *) &s[bin], 4);
- hex[4]=0;
- int ix;
- sscanf (hex,"%x",&ix);
- //printf("0x%s\t",hex);
- return (ix/65535.)*1050.-200.;
-}
-
-// Transform local time to timestamp
-int GetTimeStamp(int *intime)
-{
- time_t rawtime;
- struct tm * timeinfo;
- time(&rawtime);
- timeinfo = localtime(&rawtime);
-
- printf("%d.%d.%d, %d:%d:%d\n", intime[0], intime[1], intime[2], intime[3], intime[4], intime[5]);
-
- timeinfo->tm_mday = intime[0];
- timeinfo->tm_mon = intime[1] - 1;
- timeinfo->tm_year = intime[2] - 1900;
- timeinfo->tm_hour = intime[3];
- timeinfo->tm_min = intime[4];
- timeinfo->tm_sec = intime[5];
-
- return (int)mktime(timeinfo);
-}
-
-// Get data from MYSQL database
-void fieldpoint(int *timerange, int selch)
-{
- char humantime[256];
-
- // Display selected timestamps
- GetTime(timerange[0], humantime);
- printf("Minimum time set to: %s (%d)\n", humantime, timerange[0]);
- if(timerange[1] != -1)
- {
- GetTime(timerange[1], humantime);
- printf("Maximum time set to: %s (%d)\n", humantime, timerange[1]);
- }
- printf("Selected fieldpoint channel: %d\n", selch);
- printf("\n");
-
- // Database settings
- TSQLServer *db = TSQLServer::Connect(dbname, username, userpass);
- printf("Server info: %s\n", db->ServerInfo());
- TSQLRow *row;
- TSQLResult *res;
-
- // list databases available on server
- printf("\nList all databases on server %s\n", db->GetHost());
- res = db->GetDataBases();
- while ((row = res->Next())) {
- printf("%s\n", row->GetField(0));
- delete row;
- }
- delete res;
-
- // list tables in database "test" (the permission tables)
- printf("\nList all tables in database \"f9phdet\" on server %s\n", db->GetHost());
- res = db->GetTables("f9phdet");
- while ((row = res->Next())) {
- printf("%s\n", row->GetField(0));
- delete row;
- }
- delete res;
-
- // list columns in table "runcatalog" in database "mysql"
- printf("\nList all columns in table \"f9phdet\" in database \"f9rtd122\" on server %s\n", db->GetHost());
- res = db->GetColumns("f9phdet", "fprtd122");
- while ((row = res->Next())) {
- printf("%s\n", row->GetField(0));
- delete row;
- }
- delete res;
-
- // query database and print results
- char sql[1000] = "SELECT status,data,timestamp FROM fprtd122 WHERE status='A272727272727272748' AND substring(data,1,4)='A00C' ";
- if(timerange[1] == -1)
- sprintf(sql,"%s AND timestamp>='%d'", sql, timerange[0]);
- else
- sprintf(sql,"%s AND timestamp>='%d' AND timestamp<='%d'", sql, timerange[0], timerange[1]);
- printf("%s\n",sql);
-
- res = db->Query(sql);
-
- int nrows = res->GetRowCount();
- printf("\nGot %d rows in result\n", nrows);
-
- // Printing and plotting
- char timeval[256];
- TGraph *gr;
- gr = new TGraph(nrows);
- gr->SetLineColor(kRed);
- gr->SetLineWidth(1);
- gr->SetMarkerColor(kRed);
- gr->SetMarkerStyle(20);
- gr->SetTitle("Temperature sensor;Time;Temperature (deg.)");
-
- FILE *fp;
- fp = fopen("./fieldpoint/dataout_fieldpoint.txt", "w");
-
- if(debug)
- printf("Time\tTemperature\n");
- for (int i = 0; i < nrows; i++) {
- row = res->Next();
-
- GetTime((int)atof(row->GetField(2)), timeval);
- double x = atof(row->GetField(2));
- double y = GetTemperature(selch,row->GetField(1));
- gr->SetPoint(i,x,y);
-
- fprintf(fp, "%s\t%f\n",timeval,y);
-
- if(debug)
- printf("%s\t%f\n",timeval,y);
-
- delete row;
- }
-
- fclose(fp);
-
- delete res;
- delete db;
-
- TCanvas *gCanvas = displayCanvas->GetCanvas();
- gCanvas->SetGrid();
- gr->GetXaxis()->SetTimeDisplay(1);
- gr->GetXaxis()->SetTimeFormat("%d.%m.%H:%M");
- gr->GetXaxis()->SetLabelSize(0.027);
- gr->GetXaxis()->SetTitleSize(0.038);
- gr->GetYaxis()->SetLabelSize(0.027);
- gr->GetYaxis()->SetTitleSize(0.038);
- gr->GetXaxis()->SetNdivisions(515,kTRUE);
- gr->Draw("AL");
-
- gCanvas->Modified();
- gCanvas->Update();
-}
-
-// Update the temperature plot
-void TGAppMainFrame::UpdateTempPlot()
-{
- int stime[6];
- int etime[6];
-
- int timestamp[2];
-
- time_t rtime;
- int curyear;
- time(&rtime);
- curyear = (int)(localtime(&rtime))->tm_year+1900;
-
- int leapy = 0;
-
- // Getting the start time
- stime[0] = (int)(tempDay[0]->GetSelected())+1;
- stime[2] = curyear - (int)(tempYear[0]->GetSelected());
- printf("%d, %d, %d\n", stime[2], curyear, (int)(tempYear[0]->GetSelected()));
- stime[3] = (int)(tempHour[0]->GetSelected());
- stime[4] = (int)(tempMinute[0]->GetSelected());
- stime[5] = (int)(tempSecond[0]->GetSelected());
-
- switch( tempMonth[0]->GetSelected() )
- {
- case 0:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 1:
- if( stime[2]%4 == 0)
- leapy = 1;
-
- if( (leapy == 1) && (stime[0] > 29) )
- {
- stime[0] = 29;
- tempDay[0]->Select(28);
- }
- else if( (leapy == 0) && (stime[0] > 28) )
- {
- stime[0] = 28;
- tempDay[0]->Select(27);
- }
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 2:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 3:
- if(stime[0] > 30)
- {
- stime[0] = 30;
- tempDay[0]->Select(29);
- }
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 4:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 5:
- if(stime[0] > 30)
- {
- stime[0] = 30;
- tempDay[0]->Select(29);
- }
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 6:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 7:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 8:
- if(stime[0] > 30)
- {
- stime[0] = 30;
- tempDay[0]->Select(29);
- }
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 9:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 10:
- if(stime[0] > 30)
- {
- stime[0] = 30;
- tempDay[0]->Select(29);
- }
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- case 11:
- stime[1] = (int)(tempMonth[0]->GetSelected())+1;
- break;
- default:
- break;
- }
-
- timestamp[0] = GetTimeStamp(stime);
- printf("Start time: %d\n", timestamp[0]);
-
- // Getting the end time
- etime[0] = (int)(tempDay[1]->GetSelected())+1;
- etime[2] = curyear - (int)(tempYear[1]->GetSelected());
- etime[3] = (int)(tempHour[1]->GetSelected());
- etime[4] = (int)(tempMinute[1]->GetSelected());
- etime[5] = (int)(tempSecond[1]->GetSelected());
-
- switch( tempMonth[1]->GetSelected() )
- {
- case 0:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 1:
- if( etime[2]%4 == 0)
- leapy = 1;
-
- if( (leapy == 1) && (etime[0] > 29) )
- {
- etime[0] = 29;
- tempDay[1]->Select(28);
- }
- else if( (leapy == 0) && (etime[0] > 28) )
- {
- etime[0] = 28;
- tempDay[1]->Select(27);
- }
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 2:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 3:
- if(etime[0] > 30)
- {
- etime[0] = 30;
- tempDay[1]->Select(29);
- }
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 4:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 5:
- if(etime[0] > 30)
- {
- etime[0] = 30;
- tempDay[1]->Select(29);
- }
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 6:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 7:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 8:
- if(etime[0] > 30)
- {
- etime[0] = 30;
- tempDay[1]->Select(29);
- }
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 9:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 10:
- if(etime[0] > 30)
- {
- etime[0] = 30;
- tempDay[1]->Select(29);
- }
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- case 11:
- etime[1] = (int)(tempMonth[1]->GetSelected())+1;
- break;
- default:
- break;
- }
-
- if( tempEndOn->IsDown() )
- timestamp[1] = -1;
- else
- timestamp[1] = GetTimeStamp(etime);
- printf("End time: %d\n", timestamp[1]);
-
- fieldpoint(timestamp, tempCh->GetSelected());
-}
-
-// Export the temperature plot to pdf
-void TGAppMainFrame::ExportTempPlot()
-{
- TCanvas *gCanvas = displayCanvas->GetCanvas();
- gCanvas->Modified();
- gCanvas->Update();
- gCanvas->SaveAs("./fieldpoint/plotout_fieldpoint.pdf");
-}
-
-// Get time information from a saved file
-void TGAppMainFrame::GetTempFile(int set)
-{
- TGFileInfo file_info;
- const char *filetypes[] = {"Histograms",histExtAll,0,0};
- file_info.fFileTypes = filetypes;
- file_info.fIniDir = StrDup("./results");
- file_info.fMultipleSelection = kFALSE;
- new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDOpen, &file_info);
- int i = 0;
-
- TTree *header_data;
- time_t rtime, ctime;
- struct tm * timeinfo;
-
- int curyear;
- time(&ctime);
- curyear = (int)(localtime(&ctime))->tm_year+1900;
-
- TList *files = file_info.fFileNamesList;
- TString fname;
- // If multiple files were selected, only use the first one
- if(files)
- {
- printf("Using only the first selected file.\n");
-
- TSystemFile *file;
- TIter next(files);
- while(i == 0)
- {
- file=(TSystemFile*)next();
- fname = file->GetName();
- i++;
- }
- }
- // If only one file was selected, use it
- else
- fname = file_info.fFilename;
-
- if((int)fname.Length() > 0)
- {
- inroot = new TFile(fname, "READ");
-
- inroot->GetObject("header_data", header_data);
-
- // Reading the timestamp information
- header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
- header_data->GetEntry(0);
-
- rtime = (time_t)evtheader.timestamp;
- timeinfo = localtime(&rtime);
-// printf("Time: %d.%d.%d, %d:%d:%d\n", timeinfo->tm_mday, timeinfo->tm_mon+1, timeinfo->tm_year+1900, timeinfo->tm_hour, timeinfo->tm_min, timeinfo->tm_sec);
-
- tempDay[set]->Select(timeinfo->tm_mday - 1);
- tempMonth[set]->Select(timeinfo->tm_mon);
- tempYear[set]->Select(curyear - (timeinfo->tm_year+1900));
- tempHour[set]->Select(timeinfo->tm_hour);
- tempMinute[set]->Select(timeinfo->tm_min);
- tempSecond[set]->Select(timeinfo->tm_sec);
-
- inroot->Close();
- }
- else
- printf("No file selected.\n");
-
- delete inroot;
-}
-
-// Toggle the endtime settings for temperature sensor
-void TGAppMainFrame::TempEndToggle()
-{
- if( tempEndOn->IsDown() )
- {
- tempDay[1]->SetEnabled(kFALSE);
- tempMonth[1]->SetEnabled(kFALSE);
- tempYear[1]->SetEnabled(kFALSE);
- tempHour[1]->SetEnabled(kFALSE);
- tempMinute[1]->SetEnabled(kFALSE);
- tempSecond[1]->SetEnabled(kFALSE);
- tempFile[1]->SetEnabled(kFALSE);
- }
- else
- {
- tempDay[1]->SetEnabled(kTRUE);
- tempMonth[1]->SetEnabled(kTRUE);
- tempYear[1]->SetEnabled(kTRUE);
- tempHour[1]->SetEnabled(kTRUE);
- tempMinute[1]->SetEnabled(kTRUE);
- tempSecond[1]->SetEnabled(kTRUE);
- tempFile[1]->SetEnabled(kTRUE);
- }
-}
-
-// --------------------------------------------------------------
-
-// Header editor functions --------------------------------------
-
-// Toggle the edit possibility for header entries
-void TGAppMainFrame::EditTickToggle(int set)
-{
- if(set == 1)
- {
- if(biasedittick->IsDown()) biasedit->SetState(kTRUE);
- else biasedit->SetState(kFALSE);
- }
- else if(set == 2)
- {
- if(posedittick->IsDown())
- {
- posedit[0]->SetState(kTRUE);
- posedit[1]->SetState(kTRUE);
- posedit[2]->SetState(kTRUE);
- }
- else
- {
- posedit[0]->SetState(kFALSE);
- posedit[1]->SetState(kFALSE);
- posedit[2]->SetState(kFALSE);
- }
- }
- else if(set == 3)
- {
- if(tempedittick->IsDown()) tempedit->SetState(kTRUE);
- else tempedit->SetState(kFALSE);
- }
- else if(set == 4)
- {
- if(angleedittick->IsDown()) angleedit->SetState(kTRUE);
- else angleedit->SetState(kFALSE);
- }
- else if(set == 5)
- {
- if(laseredittick->IsDown()) laseredit->SetState(kTRUE);
- else laseredit->SetState(kFALSE);
- }
-}
-
-// Run the editing of file headers
-void TGAppMainFrame::headerchange(char *histfile, bool *changetype)
-{
- if(debug)
- printf("Selected file: %s\n", histfile);
-
- // Preparing input file and the temporary output file
- inroot = new TFile(histfile, "READ");
-
- char outname[256];
- sprintf(outname, "%s/results/temp.root", rootdir);
- outroot = new TFile(outname, "RECREATE");
-
- // Tree structure of input file
- TTree *header_data, *meas_data, *scope_data;
-
- inroot->GetObject("header_data", header_data);
- inroot->GetObject("meas_data", meas_data);
- inroot->GetObject("scope_data", scope_data);
-
- // Tree structure of output file
- TTree *new_meas_data = meas_data->CloneTree();
- TTree *new_scope_data = scope_data->CloneTree();
-
- // Save branches from the old header to temporary variables
- header_data->SetBranchAddress("nrch", &evtheader.nrch);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("biasvolt", &evtheader.biasvolt);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("xpos", &evtheader.xpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("ypos", &evtheader.ypos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("zpos", &evtheader.zpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("temperature", &evtheader.temperature);
- header_data->GetEntry(0);
- if( header_data->FindBranch("angle") )
- {
- header_data->SetBranchAddress("angle", &evtheader.angle);
- header_data->GetEntry(0);
- }
- header_data->SetBranchAddress("laserinfo", &evtheader.laserinfo);
- header_data->GetEntry(0);
-
- int itemp[5] = {0,0,0,0,0};
- double dtemp[3] = {0.,0.,0.};
- char ctemp[256];
-
- itemp[0] = evtheader.nrch;
- itemp[1] = evtheader.timestamp;
- itemp[2] = evtheader.xpos;
- itemp[3] = evtheader.ypos;
- itemp[4] = evtheader.zpos;
- dtemp[0] = evtheader.biasvolt;
- dtemp[1] = evtheader.temperature;
- if( header_data->FindBranch("angle") )
- dtemp[2] = evtheader.angle;
- else
- dtemp[2] = 0.;
- sprintf(ctemp, "%s", evtheader.laserinfo);
-
- delete header_data;
- delete meas_data;
- delete scope_data;
- inroot->Close();
- delete inroot;
-
- // Prepare branches for the new header
- TTree *new_header_data = new TTree("header_data", "Header information for the measurement.");
- new_header_data->Branch("nrch", &evtheader.nrch, "nrch/I");
- new_header_data->Branch("timestamp", &evtheader.timestamp, "timestamp/I");
- new_header_data->Branch("biasvolt", &evtheader.biasvolt, "biasvolt/D");
- new_header_data->Branch("xpos", &evtheader.xpos, "xpos/I");
- new_header_data->Branch("ypos", &evtheader.ypos, "ypos/I");
- new_header_data->Branch("zpos", &evtheader.zpos, "zpos/I");
- new_header_data->Branch("temperature", &evtheader.temperature, "temperature/D");
- new_header_data->Branch("angle", &evtheader.angle, "temperature/D");
- new_header_data->Branch("laserinfo", &evtheader.laserinfo, "laserinfo/C");
-
- // Save new values (and old ones where we don't want to edit anything)
- evtheader.nrch = itemp[0];
- evtheader.timestamp = itemp[1];
- if(changetype[0])
- evtheader.biasvolt = (double)biasedit->GetNumber();
- else
- evtheader.biasvolt = dtemp[0];
- if(changetype[1])
- {
- evtheader.xpos = (int)posedit[0]->GetNumber();
- evtheader.ypos = (int)posedit[1]->GetNumber();
- evtheader.zpos = (int)posedit[2]->GetNumber();
- }
- else
- {
- evtheader.xpos = itemp[2];
- evtheader.ypos = itemp[3];
- evtheader.zpos = itemp[4];
- }
- if(changetype[2])
- evtheader.temperature = (double)tempedit->GetNumber();
- else
- evtheader.temperature = dtemp[1];
- if(changetype[3])
- evtheader.angle = (double)angleedit->GetNumber();
- else
- evtheader.angle = dtemp[2];
- if(changetype[4])
- sprintf(evtheader.laserinfo, "%s", laseredit->GetText());
- else
- sprintf(evtheader.laserinfo, "%s", ctemp);
-
- new_header_data->Fill();
-
- // Write down the temporary output file
- new_header_data->Write();
- new_meas_data->Write();
- new_scope_data->Write();
-
- delete new_header_data;
- delete new_meas_data;
- delete new_scope_data;
- outroot->Close();
- delete outroot;
-
- // Replace the original file with temporary output file (and delete temporary file)
- sprintf(outname, "cp -f %s/results/temp.root %s", rootdir, histfile);
- retTemp = system(outname);
- sprintf(outname, "rm -f %s/results/temp.root", rootdir);
- retTemp = system(outname);
-
- printf("Edited header in file: %s\n", histfile);
-}
-
-// Setup the editing of file headers
-void TGAppMainFrame::headeredit()
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- TList *files;
- // Changelist: Bias, Position, Temperature, Angle, Laser info
- bool changelist[] = { biasedittick->IsDown(), posedittick->IsDown(), tempedittick->IsDown(), angleedittick->IsDown(), laseredittick->IsDown() };
-
- if( nrfiles > 0 )
- {
- // check the selected file/files and return its name/their names
- files = new TList();
- fileList->GetSelectedEntries(files);
- if(files)
- {
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- if(debug)
- printf("Filename: %s\n", files->At(i)->GetTitle());
-
- headerchange( (char*)(files->At(i)->GetTitle()), changelist );
- }
- }
- }
- }
-}
-
-// --------------------------------------------------------------
-
-// Class related functions --------------------------------------
-
-// Apply the upper voltage limit from settings pane to main window
-void TGAppMainFrame::VoltageLimit()
-{
- vOut->SetLimitValues(0, vHardlimit->GetNumber() );
-}
-
-// Apply the upper channel limit from settings pane to histogram settings
-void TGAppMainFrame::ChannelLimit()
-{
- selectCh->SetLimitValues(0, (NCH->GetNumber()-1) );
-}
-
-// Enable or disable voltage scan controls
-void TGAppMainFrame::EnableVoltScan()
-{
- if(voltscanOn->IsOn())
- {
- vOutStart->SetState(kTRUE);
- vOutStop->SetState(kTRUE);
- vOutStep->SetState(kTRUE);
- }
- else
- {
- vOutStart->SetState(kFALSE);
- vOutStop->SetState(kFALSE);
- vOutStep->SetState(kFALSE);
- }
-}
-
-// Enable or disable surface scan controls
-void TGAppMainFrame::EnableSurfScan()
-{
- if(surfscanOn->IsOn())
- {
- xPosMin->SetState(kTRUE);
- xPosMax->SetState(kTRUE);
- xPosStep->SetState(kTRUE);
- yPosMin->SetState(kTRUE);
- yPosMax->SetState(kTRUE);
- yPosStep->SetState(kTRUE);
- }
- else
- {
- xPosMin->SetState(kFALSE);
- xPosMax->SetState(kFALSE);
- xPosStep->SetState(kFALSE);
- yPosMin->SetState(kFALSE);
- yPosMax->SetState(kFALSE);
- yPosStep->SetState(kFALSE);
- }
-}
-
-// Enable or disable Z axis scan controls
-void TGAppMainFrame::EnableZaxisScan()
-{
- if(zscanOn->IsOn())
- {
- zPosMin->SetState(kTRUE);
- zPosMax->SetState(kTRUE);
- zPosStep->SetState(kTRUE);
- }
- else
- {
- zPosMin->SetState(kFALSE);
- zPosMax->SetState(kFALSE);
- zPosStep->SetState(kFALSE);
- }
-}
-
-// Toggle clean plots on/off
-void TGAppMainFrame::CleanPlotToggle()
-{
- cleanPlots = cleanOn->IsDown();
-}
-
-// Connect to oscilloscope
-void TGAppMainFrame::ConnectToScope()
-{
- int scopeState = -1;
- char *IPaddr = (char*)oscIP->GetText();
- int IPcorr = 0;
-
- if(oscOn == 0)
- {
- // Check if the IP address has the required three .
- for(int i = 0; i < (int)strlen(IPaddr); i++)
- if(IPaddr[i] == '.')
- IPcorr++;
-
- if( (IPaddr != NULL) && (IPcorr == 3) )
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- printf("Connecting to oscilloscope.\n");
- retTemp = gScopeDaq->connect(IPaddr);
- scopeState = 1; // For testing instead of making a real connection
-#else
- scopeState = 1;
- retTemp = 0;
-#endif
- }
- else
- {
- scopeState = -1;
- printf("Please enter a valid scope IP address.\n");
- }
- }
- else if(oscOn > 0)
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- printf("Disconnecting from oscilloscope.\n");
- retTemp = gScopeDaq->disconnect(IPaddr);
- scopeState = -1; // For testing instead of making a real disconnection
-#else
- scopeState = -1;
- retTemp = 0;
-#endif
- }
-
- if(retTemp == 0)
- {
- if(scopeState >= 0)
- {
- oscIP->SetEnabled(kFALSE);
- oscConnect->SetText("Disconnect");
- oscConnect->SetTextJustify(36);
- oscConnect->SetWrapLength(-1);
- oscConnect->Resize(60,22);
-
- for(int i = 0; i < 8; i++)
- {
- sCH[i]->SetState(kButtonUp);
- sCH[i]->SetEnabled(kFALSE);
- }
- sMeasType->SetEnabled(kTRUE);
- sCamaclink->SetState(kButtonUp);
- sCamaclink->SetEnabled(kFALSE);
- scopeCommand->SetEnabled(kTRUE);
- sendScopeCustom->SetEnabled(kTRUE);
- sMeasgroup->SetEnabled(kFALSE);
- scopeInit->SetEnabled(kFALSE);
-
- oscOn = 1;
- }
- else
- {
- oscIP->SetEnabled(kTRUE);
- oscConnect->SetText("Connect");
- oscConnect->SetTextJustify(36);
- oscConnect->SetWrapLength(-1);
- oscConnect->Resize(60,22);
-
- for(int i = 0; i < 8; i++)
- {
- sCH[i]->SetState(kButtonUp);
- sCH[i]->SetEnabled(kFALSE);
- }
- sMeasType->Select(0);
- sMeasType->SetEnabled(kFALSE);
- sCamaclink->SetState(kButtonUp);
- sCamaclink->SetEnabled(kFALSE);
- scopeCommand->SetEnabled(kFALSE);
- sendScopeCustom->SetEnabled(kFALSE);
- sMeasgroup->SetEnabled(kFALSE);
- scopeInit->SetEnabled(kFALSE);
-
- oscOn = 0;
- }
- }
- else
- printf("Error! Connecting/disconnecting failed.\n");
-}
-
-// Set the output voltage
-void TGAppMainFrame::SetVoltOut()
-{
- char cmd[256];
- int outOn;
- float outputVoltage;
-
- outputVoltage = vOut->GetNumber();
-
- if(vOutOnOff->IsOn()) outOn = 1;
- else outOn = 0;
-
- fflush(stdout);
- sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s %d", rootdir, GetChannel(), outputVoltage, outOn);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-}
-
-// Get the output voltage
-void TGAppMainFrame::GetVoltOut()
-{
- char cmd[256];
-
- fflush(stdout);
- sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -g > %s/curvolt.txt", rootdir, GetChannel(), rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
-#if WORKSTAT == 'I'
- FILE* fvolt;
- double dtemp;
- char ctemp[24];
- sprintf(cmd, "%s/curvolt.txt", rootdir);
- fvolt = fopen(cmd, "r");
-
- if(fvolt != NULL)
- {
- sprintf(cmd, "WIENER-CRATE-MIB::outputVoltage.u%d = Opaque: Float: %s V\n", GetChannel()-1, "%lf" );
- retTemp = fscanf(fvolt, cmd, &dtemp);
- vOut->SetNumber(dtemp);
- sprintf(cmd, "WIENER-CRATE-MIB::outputSwitch.u%d = INTEGER: %s\n", GetChannel()-1, "%s" );
- retTemp = fscanf(fvolt, cmd, ctemp);
- if( strcmp(ctemp, "On(1)") == 0 )
- vOutOnOff->SetState(kButtonDown);
- else if( strcmp(ctemp, "Off(0)") == 0 )
- vOutOnOff->SetState(kButtonUp);
- }
-
- fclose(fvolt);
-#endif
-}
-
-// Reset the output voltage
-void TGAppMainFrame::ResetVoltOut()
-{
- char cmd[256];
-
- vOut->SetNumber(0.000);
- vOutOnOff->SetState(kButtonUp);
-
- fflush(stdout);
- sprintf(cmd, "%s/mpod/mpod_voltage.sh -r %d", rootdir, GetChannel());
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-}
-
-// Get the current table position
-void TGAppMainFrame::GetPosition()
-{
- char cmd[256];
-
- fflush(stdout);
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -p > %s/curpos.txt", rootdir, rootdir); // X-axis
- fflush(stdout);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -p >> %s/curpos.txt", rootdir, rootdir); // Y-axis
- fflush(stdout);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -p >> %s/curpos.txt", rootdir, rootdir); // Z-axis
- fflush(stdout);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
-#if WORKSTAT == 'I'
- FILE* fpos;
- int itemp;
- sprintf(cmd, "%s/curpos.txt", rootdir);
- fpos = fopen(cmd, "r");
-
- if(fpos != NULL)
- {
- retTemp = fscanf(fpos, "%d\n", &itemp);
- xPos->SetNumber(itemp);
- retTemp = fscanf(fpos, "%d\n", &itemp);
- yPos->SetNumber(itemp);
- retTemp = fscanf(fpos, "%d\n", &itemp);
- zPos->SetNumber(itemp);
- }
-
- fclose(fpos);
-#endif
-}
-
-// Set the current table position
-void TGAppMainFrame::SetPosition()
-{
- char cmd[256];
- int positX, positY, positZ;
-
- positX = xPos->GetNumber();
- positY = yPos->GetNumber();
- positZ = zPos->GetNumber();
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, positX, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, positY, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, positZ, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-}
-
-// Set the current table position to a predetermined HOME position
-void TGAppMainFrame::HomePosition()
-{
- char cmd[256];
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -h", rootdir); // X-axis
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -h", rootdir); // Y-axis
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -h", rootdir); // Z-axis
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-}
-
-// Initialize the currently connected scope for measurements
-void TGAppMainFrame::InitializeScope()
-{
- int iTemp;
- int chTemp[8];
- for(int i = 0; i < 8; i++) chTemp[i] = -1;
- gScopeDaq->scopeUseType = sMeasType->GetSelected();
-
- // Check what channels are selected
- iTemp = 0;
- for(int i = 0; i < 8; i++)
- {
- if(sCH[i]->IsDown())
- {
- chTemp[iTemp] = i;
- iTemp++;
- }
- }
- if(iTemp == 0)
- {
- // If no channel is selected, we select the first one
- chTemp[0] = 0;
- iTemp++;
- sCH[0]->SetState(kButtonDown);
- }
- // If measurement is used, only use the first selected channel
- if(gScopeDaq->scopeUseType == 2)
- {
- for(int i = 1; i < iTemp; i++)
- sCH[chTemp[i]]->SetState(kButtonUp);
- iTemp = 1;
- }
-
- gScopeDaq->scopeChanNr = iTemp;
- for(int i = 0; i < 8; i++) gScopeDaq->scopeChans[i] = chTemp[i];
-
- // Check which measurement is selected
- gScopeDaq->scopeMeasSel = sMeasgroup->GetSelected();
-
- gScopeDaq->init();
-}
-
-// Run a scope measurement
-void TGAppMainFrame::StartScopeAcq()
-{
- // Lock the scope front panel
- gScopeDaq->lockunlock(true);
-
- retTemp = gScopeDaq->event();
-
- if(gScopeDaq->scopeUseType == 1)
- {
- char len[16];
- int sval;
- short *spoints;
-
- if(retTemp == 0)
- {
- // Read the number of y bytes at beginning of CURVE binary data
- memcpy(len, &gScopeDaq->eventbuf[1],1);
- len[1] = 0;
- sval = atoi(len);
-// printf("Number of y bytes = %d\n", sval);
-
- // Read the data
- spoints = (short *)(&gScopeDaq->eventbuf[2+sval]);
-
- // Read the number of data points
- memcpy(len, &gScopeDaq->eventbuf[2],sval);
- len[sval] = 0;
- sval = atoi(len);
-// printf("Number of data points = %d\n", sval/2);
-
- double *grafx, *grafy;
- grafx = new double[sval/2];
- grafy = new double[sval/2];
- // Parse data and graph it
- for(int i = 0; i < sval/2; i++)
- {
- grafx[i] = i*gScopeDaq->tektime*10./(sval/2.);
- grafy[i] = ((double)spoints[i]*5.*gScopeDaq->tekvolt/32767.) - (gScopeDaq->choffset*gScopeDaq->tekvolt);
- }
-
- wCanvas->cd();
- testgraph = new TGraph(sval/2, grafx, grafy);
- testgraph->GetXaxis()->SetTitle("Time [s]");
- testgraph->GetXaxis()->SetRangeUser(grafx[0], grafx[(sval/2)-1]);
- testgraph->GetYaxis()->SetTitle("Voltage [V]");
- testgraph->Draw("AL");
- wCanvas->Modified();
- wCanvas->Update();
-
- delete[] grafx;
- delete[] grafy;
- }
- }
- else if(gScopeDaq->scopeUseType == 2)
- {
- if(retTemp == 0)
- {
- if(gScopeDaq->measubuf < 1.e-4)
- printf("Measurement: %le\n", gScopeDaq->measubuf);
- else
- printf("Measurement: %lf\n", gScopeDaq->measubuf);
- }
- }
-
- // Unlock the scope front panel
- gScopeDaq->lockunlock(false);
-}
-
-// Send a custom command to the scope
-void TGAppMainFrame::CustomScopeCommand()
-{
- char *cmd = (char*)scopeCommand->GetText();
- char ret[100000];
- if( strchr(cmd, '?') == NULL)
- {
- printf("Sending command: %s\n", cmd);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- gScopeDaq->customCommand(cmd, false, ret);
-#endif
- }
- else
- {
- printf("Sending query: %s\n", cmd);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- gScopeDaq->customCommand(cmd, true, ret);
-#endif
- }
-
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- scopeReturn->SetText(ret);
-#endif
-
-#if WORKSTAT == 'O'
- sprintf(ret, "Program running in offline mode. Use I or S when configuring...");
- scopeReturn->SetText(ret);
-#endif
-}
-
-// When we select the measurement type, change other scope settings accordingly
-void TGAppMainFrame::SelectedMeasType(int mtype)
-{
- // No waveform analysis
- if(mtype == 0)
- {
- for(int i = 0; i < 8; i++)
- {
- sCH[i]->SetState(kButtonUp);
- sCH[i]->SetEnabled(kFALSE);
- }
- sMeasType->SetEnabled(kTRUE);
- sCamaclink->SetState(kButtonUp);
- sCamaclink->SetEnabled(kFALSE);
- scopeCommand->SetEnabled(kTRUE);
- sendScopeCustom->SetEnabled(kTRUE);
- sMeasgroup->SetEnabled(kFALSE);
- scopeInit->SetEnabled(kFALSE);
-
- oscOn = 1;
- }
- // Complete waveform acquisition
- else if(mtype == 1)
- {
- for(int i = 0; i < 8; i++)
- sCH[i]->SetEnabled(kTRUE);
- sMeasType->SetEnabled(kTRUE);
- sCamaclink->SetState(kButtonDown);
- sCamaclink->SetEnabled(kTRUE);
- scopeCommand->SetEnabled(kTRUE);
- sendScopeCustom->SetEnabled(kTRUE);
- sMeasgroup->SetEnabled(kFALSE);
- scopeInit->SetEnabled(kTRUE);
-
- oscOn = 2;
- }
- // Waveform measurements
- else if(mtype == 2)
- {
- for(int i = 0; i < 8; i++)
- sCH[i]->SetEnabled(kTRUE);
- sMeasType->SetEnabled(kTRUE);
- sCamaclink->SetState(kButtonUp);
- sCamaclink->SetEnabled(kTRUE);
- scopeCommand->SetEnabled(kTRUE);
- sendScopeCustom->SetEnabled(kTRUE);
- sMeasgroup->SetEnabled(kTRUE);
- scopeInit->SetEnabled(kTRUE);
-
- oscOn = 3;
- }
-}
-
-// Make breakdown voltage plot
-void TGAppMainFrame::MakeBreakdownPlot(int nrp, double *volt, double *volterr, double *psep1, double *pseperr1, double *psep2, double *pseperr2, double *psep3, double *pseperr3, char *plotfile, int separations)
-{
- double fparam[2], fparamerr[2], meanval;
- TLatex *latex;
- char ctemp[256];
- int sortindex[nrp];
-
- TCanvas *canvas;
-
- if(separations == 1)
- {
- canvas = new TCanvas("canv","canv",900,400);
- }
- else if(separations == 2)
- {
- canvas = new TCanvas("canv","canv",900,800);
- canvas->Divide(1,2);
- }
- else
- {
- canvas = new TCanvas("canv","canv",900,1200);
- canvas->Divide(1,3);
- }
-
- // First graph is plotted always
- TGraphErrors *gr1 = new TGraphErrors(nrp, volt, psep1, volterr, pseperr1);
-
- if(!cleanPlots)
- gr1->SetTitle("1st - 2nd peak separation");
- else
- gr1->SetTitle();
- gr1->SetLineColor(kBlue);
- gr1->SetMarkerColor(kBlue);
- gr1->SetMarkerStyle(20);
- gr1->SetMarkerSize(0.4);
-
- // Plotting the first breakdown voltage plot
- canvas->cd(1);
- gPad->SetGridx(1);
- gPad->SetGridy(1);
-
- gr1->Draw("AP");
- gr1->GetXaxis()->SetTitle("Bias voltage (V)");
- gr1->GetYaxis()->SetTitle("Peak separation");
- gr1->GetYaxis()->CenterTitle();
- gr1->Fit("pol1","Q");
-
- TF1 *fit1 = gr1->GetFunction("pol1");
- fparam[0] = fit1->GetParameter(0);
- fparamerr[0] = fit1->GetParError(0);
- fparam[1] = fit1->GetParameter(1);
- fparamerr[1] = fit1->GetParError(1);
-
- TMath::Sort(nrp, psep1, sortindex, kFALSE);
-
- meanval = -fparam[0]/fparam[1];
- if(!cleanPlots)
- {
- sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
- latex = new TLatex();
- latex->SetTextSize(0.039);
- latex->DrawLatex(volt[0], 0.97*psep1[sortindex[nrp-1]], ctemp);
- }
- else
- printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
-
- // Second graph
- if(separations > 1)
- {
- TGraphErrors *gr2 = new TGraphErrors(nrp, volt, psep2, volterr, pseperr2);
-
- if(!cleanPlots)
- gr2->SetTitle("2nd - 3rd peak separation");
- else
- gr2->SetTitle();
- gr2->SetLineColor(kMagenta);
- gr2->SetMarkerColor(kMagenta);
- gr2->SetMarkerStyle(21);
- gr2->SetMarkerSize(0.4);
-
- // Plotting the second breakdown voltage plot
- canvas->cd(2);
- gPad->SetGridx(1);
- gPad->SetGridy(1);
-
- gr2->Draw("AP");
- gr2->GetXaxis()->SetTitle("Bias voltage (V)");
- gr2->GetYaxis()->SetTitle("Peak separation");
- gr2->GetYaxis()->CenterTitle();
- gr2->Fit("pol1","Q");
-
- TF1 *fit2 = gr2->GetFunction("pol1");
- fparam[0] = fit2->GetParameter(0);
- fparamerr[0] = fit2->GetParError(0);
- fparam[1] = fit2->GetParameter(1);
- fparamerr[1] = fit2->GetParError(1);
-
- meanval = -fparam[0]/fparam[1];
- if(!cleanPlots)
- {
- sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
- latex = new TLatex();
- latex->SetTextSize(0.039);
- latex->DrawLatex(volt[0], 0.97*psep2[sortindex[nrp-1]], ctemp);
- }
- else
- printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
- }
-
- // Third graph
- if(separations > 2)
- {
- TGraphErrors *gr3 = new TGraphErrors(nrp, volt, psep3, volterr, pseperr3);
-
- if(!cleanPlots)
- gr3->SetTitle("3rd - 4th peak separation");
- else
- gr3->SetTitle();
- gr3->SetLineColor(kGreen);
- gr3->SetMarkerColor(kGreen);
- gr3->SetMarkerStyle(22);
- gr3->SetMarkerSize(0.4);
-
- // Plotting the third breakdown voltage plot
- canvas->cd(3);
- gPad->SetGridx(1);
- gPad->SetGridy(1);
-
- gr3->Draw("AP");
- gr3->GetXaxis()->SetTitle("Bias voltage (V)");
- gr3->GetYaxis()->SetTitle("Peak separation");
- gr3->GetYaxis()->CenterTitle();
- gr3->Fit("pol1","Q");
-
- TF1 *fit3 = gr3->GetFunction("pol1");
- fparam[0] = fit3->GetParameter(0);
- fparamerr[0] = fit3->GetParError(0);
- fparam[1] = fit3->GetParameter(1);
- fparamerr[1] = fit3->GetParError(1);
-
- meanval = -fparam[0]/fparam[1];
- if(!cleanPlots)
- {
- sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
- latex = new TLatex();
- latex->SetTextSize(0.039);
- latex->DrawLatex(volt[0], 0.97*psep3[sortindex[nrp-1]], ctemp);
- }
- else
- printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
- }
-
- // Saving the produced plot
- canvas->SaveAs(plotfile);
-}
-
-// Fit the ADC spectrum peaks and make a breakdown voltage plot
-void TGAppMainFrame::FitSpectrum(TList *files, int q)
-{
- TCanvas *gCanvas = histCanvas->GetCanvas();
- gCanvas->cd();
- TH1F *histtemp;
- TSpectrum *spec;
- TH1 *histback;
- TH1F *h2;
- float *xpeaks;
- TF1 *fit;
- TF1 *fittingfunc;
- double *fparam;
- double *fparamerr;
- double meanparam[20], meanparamerr[20];
- int sortindex[20];
- char exportname[256];
- char paramname[256];
- char ctemp[256];
-
- FILE *fp;
- remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
- sprintf(paramname, "%s_fitresult.txt", ctemp);
- fp = fopen(paramname, "w");
- fclose(fp);
-
- int peaklimit = minPeak->GetNumber()+1; // +1 to account for the pedestal peak
- printf("The minimum peak limit is set to: %d\n", peaklimit);
- int p = 0;
- double dtemp;
- double volt[files->GetSize()], volterr[files->GetSize()], sep[3][files->GetSize()], seperr[3][files->GetSize()];
- int first = 1;
-
- // Initialize all values
- for(int m = 0; m < files->GetSize(); m++)
- {
- volt[m] = 0; volterr[m] = 0;
- for(int i = 0; i < 3; i++)
- { sep[i][m] = 0; seperr[i][m] = 0; }
- if(m < 20) { meanparam[m] = 0; meanparamerr[m] = 0; }
- }
-
- for(int m = 0; m < files->GetSize(); m++)
- {
- DisplayHistogram( (char*)(files->At(m)->GetTitle()), 0);
- dtemp = evtheader.biasvolt;
- gCanvas->Modified();
- gCanvas->Update();
-
- histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
- npeaks = 20;
- double par[3000];
- spec = new TSpectrum(npeaks);
- // Find spectrum background
- histback = spec->Background(histtemp, (int)fitInter->GetNumber(), "same");
- // Clone histogram and subtract background from it
- h2 = (TH1F*)histtemp->Clone("h2");
- h2->Add(histback, -1);
- // Search for the peaks
- int found = spec->Search(h2, fitSigma->GetNumber(), "goff", fitTresh->GetNumber() );
- printf("Found %d candidates to fit.\n",found);
- npeaks = found;
-
- xpeaks = spec->GetPositionX();
- for(int i = 0; i < found; i++)
- {
- float xp = xpeaks[i];
- int bin = h2->GetXaxis()->FindBin(xp);
- float yp = h2->GetBinContent(bin);
- par[3*i] = yp;
- par[3*i+1] = xp;
- par[3*i+2] = (double)fitSigma->GetNumber();
- }
-
- // Fit the histogram
- fit = new TF1("fit", FindPeaks, 0, 400, 3*npeaks);
- TVirtualFitter::Fitter(histtemp, 3*npeaks);
- fit->SetParameters(par);
- fit->SetNpx(300);
- h2->Fit("fit","Q"); // for quiet mode, add Q
- fittingfunc = h2->GetFunction("fit");
- fparam = fittingfunc->GetParameters();
- fparamerr = fittingfunc->GetParErrors();
-
- // Gather the parameters (mean peak value for now)
- int j = 1;
- int nrfit = 0;
- bool errors = false;
- while(1)
- {
- if( (fparam[j] < 1.E-30) || (fparamerr[j] < 1.E-10) )
- break;
- else
- {
- if(fparam[j] > pedesLow->GetNumber())
- {
- meanparam[nrfit] = fparam[j];
- meanparamerr[nrfit] = fparamerr[j];
- nrfit++;
- }
- }
-
- j+=3;
- }
- printf("%d peaks fitted.\n",nrfit);
-
- if(nrfit >= peaklimit)
- {
- TMath::Sort(nrfit, meanparam, sortindex, kFALSE);
-
- // Write out parameters to a file
-// fp = fopen(paramname, "a");
-
- // Only save the ones that do not have a too large error on peak separation for the first three peaks
-// if( ((TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]))/(meanparam[sortindex[2]] - meanparam[sortindex[1]]) < accError->GetNumber()) && ((TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]))/(meanparam[sortindex[3]] - meanparam[sortindex[2]]) < accError->GetNumber()) && ((TMath::Abs(meanparamerr[sortindex[4]]) + TMath::Abs(meanparamerr[sortindex[3]]))/(meanparam[sortindex[4]] - meanparam[sortindex[3]]) < accError->GetNumber()) )
-// if( (seperr[0][0]/sep[0][0] < accError->GetNumber()) && (seperr[1][0]/sep[1][0] < accError->GetNumber()) && (seperr[2][0]/sep[2][0] < accError->GetNumber()) )
-// {
-// fprintf(fp, "%le\t%d\t", dtemp, nrfit);
-
-// for(int i = 0; i < nrfit; i++)
-// {
-// if(debug)
-// printf("Peak %d (%lfV): %lf\t%lf\n", i+1, dtemp, meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
-// fprintf(fp, "%le\t%le\t", meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
-// }
-// printf("\n");
-// fprintf(fp, "\n");
-// }
-
-// fclose(fp);
-
- h2->SetStats(0);
-
- gCanvas->Modified();
- gCanvas->Update();
-
- // Save each fitting plot
- if(exfitplots->IsDown())
- {
- remove_ext((char*)files->At(m)->GetTitle(), ctemp);
- sprintf(exportname, "%s_fit.pdf", ctemp);
- gCanvas->SaveAs(exportname);
- }
-
- volt[p] = dtemp;
- volterr[p] = 1.e-4;
-
- if(nrfit == 3)
- {
- sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
- seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
-
- errors = (seperr[0][p]/sep[0][p] < accError->GetNumber());
-
- if(debug)
- printf("p=%d:\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p]);
- }
- else if(nrfit == 4)
- {
- sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
- sep[1][p] = meanparam[sortindex[3]] - meanparam[sortindex[2]];
- seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
- seperr[1][p] = TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]);
-
- errors = ((seperr[0][p]/sep[0][p] < accError->GetNumber()) && (seperr[1][p]/sep[1][p] < accError->GetNumber()));
-
- if(debug)
- printf("p=%d:\t%lf\t%lf\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p], sep[1][p], seperr[1][p]);
- }
- else if(nrfit > 4)
- {
- sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
- sep[1][p] = meanparam[sortindex[3]] - meanparam[sortindex[2]];
- sep[2][p] = meanparam[sortindex[4]] - meanparam[sortindex[3]];
- seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
- seperr[1][p] = TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]);
- seperr[2][p] = TMath::Abs(meanparamerr[sortindex[4]]) + TMath::Abs(meanparamerr[sortindex[3]]);
-
- errors = ((seperr[0][p]/sep[0][p] < accError->GetNumber()) && (seperr[1][p]/sep[1][p] < accError->GetNumber()) && (seperr[2][p]/sep[2][p] < accError->GetNumber()));
-
- if(debug)
- printf("p=%d:\t%lf\t%lf\t%lf\t%lf\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p], sep[1][p], seperr[1][p], sep[2][p], seperr[2][p]);
- }
-
- // Write out parameters to a file
- fp = fopen(paramname, "a");
-
- // Accept only the points with a small enough error
- if( errors )
- {
- if(first == 1)
- {
- fprintf(fp, "%le\t%d\t", dtemp, nrfit);
-
- for(int i = 0; i < nrfit; i++)
- {
- if(debug)
- printf("Peak %d (%lfV): %lf\t%lf\n", i+1, dtemp, meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
- fprintf(fp, "%le\t%le\t", meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
- }
- printf("\n");
- fprintf(fp, "\n");
- first = 0;
- }
-
- p++;
- }
- else
- {
- if(nrfit == 3)
- printf("Point (at %.2lfV) rejected due to too large errors: %lf\n", volt[p], seperr[0][p]/sep[0][p]);
- else if(nrfit == 4)
- printf("Point (at %.2lfV) rejected due to too large errors: %lf, %lf\n", volt[p], seperr[0][p]/sep[0][p], seperr[1][p]/sep[1][p]);
- else if(nrfit > 4)
- printf("Point (at %.2lfV) rejected due to too large errors: %lf, %lf, %lf\n", volt[p], seperr[0][p]/sep[0][p], seperr[1][p]/sep[1][p], seperr[2][p]/sep[2][p]);
- }
-
- fclose(fp);
- }
-
- if(q == 1) break;
-
- first = 1;
- }
-
- // Plot & fit breakdown voltage plots
- if(q > 1)
- {
- remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
- sprintf(paramname, "%s_breakdown.pdf", ctemp);
- MakeBreakdownPlot(p, volt, volterr, sep[0], seperr[0], sep[1], seperr[1], sep[2], seperr[2], paramname, peaklimit-2);
- }
-}
-
-// Plotting of PDF and CDF functions for the edge (with the added fit)
-void TGAppMainFrame::EdgeDetection(TGraph *pdf, TGraph *cdf, char *outname, TCanvas *g1dCanvas, double pdfmax, int direction)
-{
-// double x, y;
-
- pdf->Fit("gaus","Q");
- pdf->GetFunction("gaus")->SetNpx(400);
-/*
- for(int i = 0; i < nrpoints; i++)
- {
- pdf->GetPoint(i, x, y);
- pdf->SetPoint(i, x, (y/pdfmax) );
- }
-*/
- gStyle->SetOptFit(1);
-
- cdf->Draw("AL");
- gPad->Update();
- pdf->Draw("LP");
-
- g1dCanvas->Modified();
- g1dCanvas->Update();
-
- TPaveStats *stats = (TPaveStats*)pdf->FindObject("stats");
- if(!cleanPlots)
- {
-// stats->SetX1NDC(0.14); stats->SetX2NDC(0.28);
-// stats->SetY1NDC(0.83); stats->SetY2NDC(0.96);
- stats->SetX1NDC(0.86); stats->SetX2NDC(1.0);
- stats->SetY1NDC(0.87); stats->SetY2NDC(1.0);
- }
- else
- {
- stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
- stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
- }
-
- g1dCanvas->SetGridx(1);
- g1dCanvas->SetGridy(1);
- if(direction == 1)
- cdf->GetXaxis()->SetTitle("X [#mum]");
- else if(direction == 2)
- cdf->GetXaxis()->SetTitle("Y [#mum]");
- cdf->GetXaxis()->CenterTitle(kTRUE);
- cdf->GetXaxis()->SetLabelSize(0.022);
- cdf->GetYaxis()->SetTitle("Normalized ADC integral");
-// cdf->GetYaxis()->SetTitle("Normalized ADC integral (CDF)");
-// cdf->GetYaxis()->SetTitleColor(kBlue);
- cdf->GetYaxis()->CenterTitle(kTRUE);
- cdf->GetYaxis()->SetLabelSize(0.022);
- cdf->GetYaxis()->SetRangeUser(0,1);
- cdf->GetYaxis()->SetTitleSize(0.030);
-// cdf->GetYaxis()->SetLabelColor(kBlue);
- if(!cleanPlots)
- cdf->SetTitle("SiPM edge detection");
- else
- cdf->SetTitle();
- cdf->SetLineColor(kBlue);
- pdf->SetLineWidth(2);
- cdf->SetLineWidth(2);
-
-/* TGaxis *axis = new TGaxis(gPad->GetUxmax(), 0, gPad->GetUxmax(), 1, 0, pdfmax, 510, "+L");
- axis->Draw();
- axis->SetTitle("Normalized ADC integral (PDF)");
- axis->SetTitleSize(0.035);
- axis->CenterTitle();
- axis->SetTitleColor(kBlack);
- axis->SetTitleFont(42);
- axis->SetLabelSize(0.022);
- axis->SetLabelColor(kBlack);*/
-
- g1dCanvas->Modified();
- g1dCanvas->Update();
-
- g1dCanvas->SaveAs(outname);
-}
-
-// Integrate the spectrum
-void TGAppMainFrame::IntegSpectrum(TList *files, int direction)
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- char ctemp[256];
- int j, k = 0, m = 0, n = 0;
-
- TCanvas *gCanvas = new TCanvas("canv","canv",900,900);
- TCanvas *g1dCanvas = new TCanvas("canv1d","canv1d",1200,900);
- TTree *header_data, *meas_data;
- double *integralCount, *integralAcc;
- integralCount = new double[nrfiles];
- integralAcc = new double[nrfiles];
-// double xsurfmin, ysurfmin, zsurfmin;
- double *surfx, *surfy, *surfz;
- surfx = new double[nrfiles];
- surfy = new double[nrfiles];
- surfz = new double[nrfiles];
- for(int i = 0; i < (int)nrfiles; i++) {integralCount[i] = 0; integralAcc[i] = 0; }
-
- TGraph *gScan[2]; // graphs for PDF and CDF functions
- double pdfmax = -1;
- TGraph2D *gScan2D;
- gScan2D = new TGraph2D();
- int nrentries;
- double minInteg, maxInteg;
-
- char exportname[256];
-
- if(files->GetSize() > 0)
- {
- for(int i = 0; i < (int)files->GetSize(); i++)
- {
- n++;
- if(files->At(i))
- {
- sprintf(ctemp, "%s", files->At(i)->GetTitle());
- inroot = new TFile(ctemp, "READ");
-
- inroot->GetObject("header_data", header_data);
- inroot->GetObject("meas_data", meas_data);
-
- // Reading the header
- header_data->SetBranchAddress("xpos", &evtheader.xpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("ypos", &evtheader.ypos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("zpos", &evtheader.zpos);
- header_data->GetEntry(0);
-
- char rdc[256];
- j = selectCh->GetNumber();
- double rangetdc[2];
- rangetdc[0] = tdcMinwindow->GetNumber();
- rangetdc[1] = tdcMaxwindow->GetNumber();
-
- k = 0;
- m = 0;
-
- // Reading the data
- for(int e = 0; e < meas_data->GetEntries(); e++)
- {
- sprintf(rdc, "ADC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
- meas_data->GetEntry(e);
-
- sprintf(rdc, "TDC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
- meas_data->GetEntry(e);
-
- // If our data point is inside the TDC window
- if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
- {
- k++;
- m += evtdata.adcdata[j];
- }
- }
-
-/* if(n == 1) // these values can be used to set 0 value at first X, Y and Z positions
- {
- xsurfmin = evtheader.xpos;
- ysurfmin = evtheader.ypos;
- zsurfmin = evtheader.zpos;
- }
- surfx[i] = (double)(evtheader.xpos-xsurfmin)*lenconversion;
- surfy[i] = (double)(evtheader.ypos-ysurfmin)*lenconversion;
- surfz[i] = (double)(evtheader.zpos-zsurfmin)*lenconversion;*/
- surfx[i] = (double)(evtheader.xpos*lenconversion);
- surfy[i] = (double)(evtheader.ypos*lenconversion);
- surfz[i] = (double)(evtheader.zpos*lenconversion);
-
-/* surfx[i] = evtheader.xpos;
- surfy[i] = evtheader.ypos;
- surfz[i] = evtheader.zpos;
-*/
- integralCount[i] += ((double)m)/((double)k);
-
- inroot->Close();
- delete inroot;
- }
- }
-
- nrentries = n;
- printf("%d files were selected.\n", nrentries);
-
- double curzval = surfz[0];
- j = 0;
- int acc = 0;
- int zb;
- for(int i = 0; i <= nrentries; i++)
- {
- if(acc == nrentries)
- {
- minInteg = TMath::MinElement(j, integralAcc);
-
- for(int za = 0; za < j; za++)
- integralAcc[za] = integralAcc[za] - minInteg;
-
- maxInteg = TMath::MaxElement(j, integralAcc);
-
- for(int za = 0; za < j; za++)
- {
- zb = i-j+za;
- integralCount[zb] = integralAcc[za]/maxInteg;
- if(debug)
- printf("Integral check 2 (i=%d,j=%d,za=%d,z=%.2lf,zb=%d): %lf\t%lf\n", i, j, za, surfz[i-j], zb, integralCount[zb], integralAcc[za]/maxInteg);
- }
-
- // Plotting of PDF and CDF functions for the edge (with the added fit)
- gScan[1] = new TGraph();
- for(int za = 0; za < j; za++)
- {
- zb = i-j+za;
- if(direction == 1)
- gScan[1]->SetPoint(za, (double)surfx[zb], (double)integralAcc[za]/maxInteg);
- else if(direction == 2)
- gScan[1]->SetPoint(za, (double)surfy[zb], (double)integralAcc[za]/maxInteg);
-
- if( ((integralAcc[za+1]-integralAcc[za])/maxInteg > pdfmax) && (za < j-1) )
- pdfmax = (integralAcc[za+1]-integralAcc[za])/maxInteg;
- }
-
- pdfmax = (TMath::Ceil(pdfmax*10))/10.;
-
- gScan[0] = new TGraph();
- for(int za = j-1; za >= 0; za--)
- {
- zb = (i-1)-(j-1)+za;
- if((integralAcc[za]-integralAcc[za-1])/(maxInteg) < 0)
- {
- if(direction == 1)
- gScan[0]->SetPoint(za, (double)surfx[zb], 0);
- else if(direction == 2)
- gScan[0]->SetPoint(za, (double)surfy[zb], 0);
- }
- else
- {
- if(direction == 1)
- gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
- else if(direction == 2)
- gScan[0]->SetPoint(za, (double)surfy[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
-// gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(pdfmax*maxInteg));
- }
- }
-
- remove_from_last((char*)files->At(i-1)->GetTitle(), '_', ctemp);
- sprintf(exportname, "%s_edge.pdf", ctemp);
- EdgeDetection(gScan[0], gScan[1], exportname, g1dCanvas, pdfmax, direction);
-
-// delete gScan[0];
-// delete gScan[1];
-
- i--;
- pdfmax = 0;
- break;
- }
- else
- {
- if(surfz[i] == curzval)
- {
- integralAcc[j] = integralCount[i];
- if(debug)
- printf("Integral check 1 (i=%d,j=%d,z=%.2lf): %lf\t%lf\n", i, j, surfz[i], integralCount[i], integralAcc[j]);
- j++;
- acc++;
- }
- else
- {
- minInteg = TMath::MinElement(j, integralAcc);
-
- for(int za = 0; za < j; za++)
- integralAcc[za] = integralAcc[za] - minInteg;
-
- maxInteg = TMath::MaxElement(j, integralAcc);
-
- for(int za = 0; za < j; za++)
- {
- zb = i-j+za;
- integralCount[zb] = integralAcc[za]/maxInteg;
- if(debug)
- printf("Integral check 2 (i=%d,j=%d,za=%d,z=%.2lf,zb=%d): %lf\t%lf\n", i, j, za, surfz[i-j], zb, integralCount[zb], integralAcc[za]/maxInteg);
- }
-
- curzval = surfz[i];
- i--;
-
- // Plotting of PDF and CDF functions for the edge (with the added fit)
- gScan[1] = new TGraph();
- for(int za = 0; za < j; za++)
- {
- zb = i-(j-1)+za;
- if(direction == 1)
- gScan[1]->SetPoint(za, (double)surfx[zb], (double)integralAcc[za]/maxInteg);
- else if(direction == 2)
- gScan[1]->SetPoint(za, (double)surfy[zb], (double)integralAcc[za]/maxInteg);
-
- if( ((integralAcc[za+1]-integralAcc[za])/maxInteg > pdfmax) && (za < j-1) )
- pdfmax = (integralAcc[za+1]-integralAcc[za])/maxInteg;
- }
-
- pdfmax = (TMath::Ceil(pdfmax*10))/10.;
-
- gScan[0] = new TGraph();
- for(int za = j-1; za >= 0; za--)
- {
- zb = i-(j-1)+za;
- if((integralAcc[za]-integralAcc[za-1])/(maxInteg) < 0)
- {
- if(direction == 1)
- gScan[0]->SetPoint(za, (double)surfx[zb], 0);
- else if(direction == 2)
- gScan[0]->SetPoint(za, (double)surfy[zb], 0);
- }
- else
- {
- if(direction == 1)
- gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
- else if(direction == 2)
- gScan[0]->SetPoint(za, (double)surfy[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
-// gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(pdfmax*maxInteg));
- }
- }
-
- remove_from_last((char*)files->At(i)->GetTitle(), '_', ctemp);
- sprintf(exportname, "%s_edge.pdf", ctemp);
- EdgeDetection(gScan[0], gScan[1], exportname, g1dCanvas, pdfmax, direction);
-
- delete gScan[0];
- delete gScan[1];
-
- j = 0;
- pdfmax = 0;
- }
- }
- }
-
-// delete g1dCanvas;
-
- double range[4];
- if(direction == 1)
- {
- range[0] = TMath::MinElement(nrentries, surfx);
- range[1] = TMath::MaxElement(nrentries, surfx);
- }
- else if(direction == 2)
- {
- range[0] = TMath::MinElement(nrentries, surfy);
- range[1] = TMath::MaxElement(nrentries, surfy);
- }
- else
- {
- range[0] = TMath::MinElement(nrentries, surfx);
- range[1] = TMath::MaxElement(nrentries, surfx);
- }
- range[2] = TMath::MinElement(nrentries, surfz);
- range[3] = TMath::MaxElement(nrentries, surfz);
-
- // Plotting of 2D edge plot
- for(int i = 0; i < nrentries; i++)
- {
- if(direction == 1)
- {
- if(debug)
- printf("%.2lf\t%.2lf\t%lf\n", surfx[i], surfz[i], integralCount[i]);
- gScan2D->SetPoint(i, surfx[i], surfz[i], integralCount[i]);
- }
- else if(direction == 2)
- {
- if(debug)
- printf("%.2lf\t%.2lf\t%lf\n", surfy[i], surfz[i], integralCount[i]);
- gScan2D->SetPoint(i, surfy[i], surfz[i], integralCount[i]);
- }
- }
-
- gCanvas->cd();
- gStyle->SetPalette(1);
- gScan2D->Draw("COLZ");
-
- gCanvas->Modified();
- gCanvas->Update();
-
- if(direction == 1)
- gScan2D->GetXaxis()->SetTitle("X [#mum]");
- else if(direction == 2)
- gScan2D->GetXaxis()->SetTitle("Y [#mum]");
- gScan2D->GetXaxis()->CenterTitle(kTRUE);
- gScan2D->GetXaxis()->SetLabelSize(0.022);
- gScan2D->GetXaxis()->SetRangeUser(range[0], range[1]);
- gScan2D->GetXaxis()->SetNoExponent();
- gScan2D->GetYaxis()->SetTitle("Z [#mum]");
- gScan2D->GetYaxis()->SetTitleOffset(1.3);
- gScan2D->GetYaxis()->CenterTitle(kTRUE);
- gScan2D->GetYaxis()->SetLabelSize(0.022);
- gScan2D->GetYaxis()->SetRangeUser(range[2], range[3]);
- TGaxis *yax = (TGaxis*)gScan2D->GetYaxis();
- yax->SetMaxDigits(4);
- if(!cleanPlots)
- gScan2D->SetTitle("Laser focal point");
- else
- gScan2D->SetTitle();
-
- gCanvas->Modified();
- gCanvas->Update();
-
- remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
- sprintf(exportname, "%s", ctemp);
- remove_from_last(exportname, '_', ctemp);
- if(direction == 1)
- sprintf(exportname, "%s_xdir_focalpoint.pdf", ctemp);
- else if(direction == 2)
- sprintf(exportname, "%s_ydir_focalpoint.pdf", ctemp);
- gCanvas->SaveAs(exportname);
- }
-}
-
-// Integrate the spectrum
-void TGAppMainFrame::PhotonMu(TList *files)
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- char ctemp[256];
- int j, k = 0, m = 0, n = 0, k2 = 0, m2 = 0;
-
- TCanvas *gCanvas;
- TTree *header_data, *meas_data;
- double *integralCount, *integralPedestal;
- integralCount = new double[nrfiles];
- integralPedestal = new double[nrfiles];
- double *angle;
- double *pdeval;
- double *muval;
- angle = new double[nrfiles];
- pdeval = new double[nrfiles];
- muval = new double[nrfiles];
- for(int i = 0; i < (int)nrfiles; i++) {integralCount[i] = 0; integralPedestal[i] = 0; }
-
-// TGraph *gScan[2]; // graph for angle dependence
- int nrentries;
-
- TSpectrum *spec;
- TH1F *histtemp;
- TH1 *histback;
- TH1F *h2;
- float *xpeaks;
- TF1 *fit;
- TF1 *fittingfunc;
- double *fparam;
- double meanparam;
- int adcpedestal[2];
- double paramsigma = 0;
-
- if(files->GetSize() > 0)
- {
- for(int i = 0; i < (int)files->GetSize(); i++)
- {
- n++;
- if(files->At(i))
- {
- // Find the pedestal peak and the first minimum after pedestal ----------------
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
- histCanvas->GetCanvas()->Modified();
- histCanvas->GetCanvas()->Update();
-
- histtemp = (TH1F*)histCanvas->GetCanvas()->GetPrimitive(histname);
- npeaks = 1;
- double par[300];
- spec = new TSpectrum(npeaks);
- // Find spectrum background
- histback = spec->Background(histtemp, (int)fitInter->GetNumber(), "same");
- // Clone histogram and subtract background from it
- h2 = (TH1F*)histtemp->Clone("h2");
- h2->Add(histback, -1);
- // Search for the peaks
- int found = spec->Search(h2, fitSigma->GetNumber(), "goff", fitTresh->GetNumber() );
- printf("Found %d candidates to fit.\n",found);
- npeaks = found;
-
- xpeaks = spec->GetPositionX();
- for(j = 0; j < found; j++)
- {
- float xp = xpeaks[j];
- int bin = h2->GetXaxis()->FindBin(xp);
- float yp = h2->GetBinContent(bin);
- par[3*j] = yp;
- par[3*j+1] = xp;
- par[3*j+2] = (double)fitSigma->GetNumber();
- }
-
- // Fit the histogram
- fit = new TF1("fit", FindPeaks, 0, 400, 3*npeaks);
- TVirtualFitter::Fitter(histtemp, 3*npeaks);
- fit->SetParameters(par);
- fit->SetNpx(300);
- h2->Fit("fit","Q"); // for quiet mode, add Q
- fittingfunc = h2->GetFunction("fit");
- fparam = fittingfunc->GetParameters();
-
- // Gather the parameters (mean peak value for now)
- j = 1;
-
- meanparam = fparam[j];
- paramsigma = fparam[j+1];
-
-/* while(1)
- {
- if( (fparam[j] < 1.E-30) || (fparamerr[j] < 1.E-10) )
- break;
- else
- {
- if(fparam[j] > 0)
- {
- meanparam = fparam[j];
- meanparamerr = fparamerr[j];
- paramsigma = fparam[j+1];
- nrfit++;
- }
- }
-
- j+=3;
- }
-*/
- histCanvas->GetCanvas()->Modified();
- histCanvas->GetCanvas()->Update();
-
- j = 0;
- adcpedestal[0] = 0;
- adcpedestal[1] = -1;
- while(1)
- {
- int bin = histtemp->GetXaxis()->FindBin((int)(j+meanparam+paramsigma));
-
- int yp = histtemp->GetBinContent(bin);
- if(adcpedestal[1] == -1)
- {
- adcpedestal[0] = j+meanparam+paramsigma;
- adcpedestal[1] = yp;
- }
- else
- {
- if(adcpedestal[1] >= yp)
- {
- adcpedestal[0] = j+meanparam+paramsigma;
- adcpedestal[1] = yp;
- }
- else
- break;
- }
-
- j++;
- if(j > 50) break;
- }
-
- cout << "Pedestal ends with ADC value: " << adcpedestal[0] << endl;
-
- // ----------------------------------------------------------------------------
-
- sprintf(ctemp, "%s", files->At(i)->GetTitle());
- inroot = new TFile(ctemp, "READ");
-
- inroot->GetObject("header_data", header_data);
- inroot->GetObject("meas_data", meas_data);
-
- // Reading the header
- if( header_data->FindBranch("angle") )
- {
- header_data->SetBranchAddress("angle", &evtheader.angle);
- header_data->GetEntry(0);
- }
- else
- {
- printf("Error! Selected file has no angle header value. Please edit header to add the angle header value.\n");
- break;
- }
-
- char rdc[256];
- j = selectCh->GetNumber();
- double rangetdc[2];
- rangetdc[0] = tdcMinwindow->GetNumber();
- rangetdc[1] = tdcMaxwindow->GetNumber();
-
- k = 0;
- k2 = 0;
- m = 0;
- m2 = 0;
-
- // Reading the data
- for(int e = 0; e < meas_data->GetEntries(); e++)
- {
- sprintf(rdc, "ADC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
- meas_data->GetEntry(e);
-
- sprintf(rdc, "TDC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
- meas_data->GetEntry(e);
-
- // If our data point is inside the TDC window
- if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
- {
- // Gather only the integral of the pedestal
- if((double)evtdata.adcdata[j] < (double)adcpedestal[0]+0.5 )
- {
- k2++;
- m2 += evtdata.adcdata[j];
- }
-
- // Gather the complete integral
- k++;
- m += evtdata.adcdata[j];
- }
- }
-
- angle[i] = (double)(evtheader.angle); // angle in radians
-
-// integralCount[i] += ((double)m)/((double)k);
- integralCount[i] += (double)m;
- cout << "Integral (" << k << " evts) = " << integralCount[i] << endl;
-
- integralPedestal[i] += (double)m2;
- cout << "Integral (" << k2 << " evts) = " << integralPedestal[i] << endl;
-
- muval[i] = -TMath::Log((double)k2/(double)k);
-
- pdeval[i] = muval[i]/(muval[0]*TMath::Cos(angle[i]*TMath::ACos(-1.)/180.));
-
- inroot->Close();
- delete inroot;
- }
- }
-
- nrentries = n;
- printf("%d files were selected.\n", nrentries);
-
- cout << "angle\tmu\trelative PDE\n" << endl;
- for(int i = 0; i < (int)files->GetSize(); i++)
- {
- // Relative PDE calculation
- cout << angle[i] << "\t" << muval[i] << "\t" << pdeval[i] << endl;
- }
-
- // Plot mu and PDE angle dependance plots
- gCanvas = new TCanvas("canv","canv",1200,900);
- gCanvas->SetGrid();
-
- TGraph *pde = new TGraph(nrentries, angle, pdeval);
- pde->SetMarkerStyle(21);
- pde->SetMarkerSize(1.0);
- pde->SetMarkerColor(2);
- pde->SetLineWidth(2);
- pde->SetLineColor(2);
- pde->GetXaxis()->SetLabelSize(0.030);
- pde->GetXaxis()->CenterTitle();
- pde->GetXaxis()->SetRange(-5,90);
- pde->GetXaxis()->SetRangeUser(-5,90);
- pde->GetYaxis()->SetTitleOffset(1.2);
- pde->GetYaxis()->SetLabelSize(0.030);
- pde->GetYaxis()->CenterTitle();
- pde->GetYaxis()->SetRangeUser(0.3, 1.18);
- pde->Draw("ALP");
-
- pde->SetTitle(";Incidence angle (#circ);Relative PDE(#theta) / #mu(#theta)");
-
- TGraph *mugr = new TGraph(nrentries, angle, muval);
- mugr->SetMarkerStyle(20);
- mugr->SetMarkerSize(1.0);
- mugr->SetMarkerColor(4);
- mugr->SetLineWidth(2);
- mugr->SetLineColor(4);
- mugr->Draw("SAME;LP");
-
- gCanvas->Modified();
- gCanvas->Update();
- }
-}
-
-void TGAppMainFrame::RunMeas(void *ptr, int runCase, int zaxisscan, int &scanon)
-{
- printf("Start of Run, run case %d\n", runCase);
- float progVal;
-
- char ctemp[256];
- char ctemp2[256];
- char fname[256];
- int itemp = 0;
-
- remove_ext((char*)fileName->GetText(), ctemp);
-// printf("Save name: %s\nNo extension: %s\n", fileName->GetText(), ctemp);
-
- // Open file for writing
-/* if(runCase == 0)
- {
- sprintf(fname, "rm %s_%s", ctemp, histExtAll);
- retTemp = system(fname);
- }*/ // deleting might not be necesary due to RECREATE in root file open
-
- if( voltscanOn->IsOn() || surfscanOn->IsOn() )
- {
- if(zaxisscan == 0)
- {
- if( (voltscanOn->IsOn()) && (vOutStep->GetNumber() > 0.) )
- SeqNumber(runCase, (int)((vOutStop->GetNumber())-(vOutStart->GetNumber()))/(vOutStep->GetNumber()), ctemp2);
- else if( surfscanOn->IsOn() )
- {
- if( xPosStep->GetNumber() == 0 )
- itemp = 1;
- else
- itemp = (int)((xPosMax->GetNumber())-(xPosMin->GetNumber()))/(xPosStep->GetNumber());
-
- if( yPosStep->GetNumber() == 0 )
- itemp *= 1;
- else
- itemp *= (int)((yPosMax->GetNumber())-(yPosMin->GetNumber()))/(yPosStep->GetNumber());
- SeqNumber(runCase, itemp, ctemp2);
- }
- sprintf(fname, "%s_%s%s", ctemp, ctemp2, histExt);
- }
- else if(zaxisscan == 1)
- {
- SeqNumber((int)zPos->GetNumber(), (int)zPosMax->GetNumber(), ctemp2);
-
- if( (voltscanOn->IsOn()) && (vOutStep->GetNumber() > 0.) )
- {
- sprintf(fname, "%s_z%s_", ctemp, ctemp2);
- SeqNumber(runCase, (int)((vOutStop->GetNumber())-(vOutStart->GetNumber()))/(vOutStep->GetNumber())+1, ctemp2);
- strcat(fname, ctemp2);
- strcat(fname, histExt);
- }
- else if( surfscanOn->IsOn() )
- {
- sprintf(fname, "%s_z%s_", ctemp, ctemp2);
-
- if( xPosStep->GetNumber() == 0 )
- itemp = 1;
- else
- itemp = (int)((xPosMax->GetNumber())-(xPosMin->GetNumber()))/(xPosStep->GetNumber())+1;
-
- if( yPosStep->GetNumber() == 0 )
- itemp *= 1;
- else
- itemp *= (int)((yPosMax->GetNumber())-(yPosMin->GetNumber()))/(yPosStep->GetNumber())+1;
- SeqNumber(runCase, itemp, ctemp2);
- strcat(fname, ctemp2);
- strcat(fname, histExt);
- }
- else
- sprintf(fname, "%s_z%s%s", ctemp, ctemp2, histExt);
-
-/* if(runCase < 10)
- sprintf(fname, "%s_z%d_0000%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
- else if( (runCase >= 10) && (runCase < 100) )
- sprintf(fname, "%s_z%d_000%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
- else if( (runCase >= 100) && (runCase < 1000) )
- sprintf(fname, "%s_z%d_00%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
- else if( (runCase >= 1000) && (runCase < 10000) )
- sprintf(fname, "%s_z%d_0%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
- else if( (runCase >= 10000) && (runCase < 100000) )
- sprintf(fname, "%s_z%d_0%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
-*/ }
- }
- else if( !voltscanOn->IsOn() && !surfscanOn->IsOn() )
- sprintf(fname, "%s%s", ctemp, histExt);
-// printf("Rootfile: %s\n", fname);
-
- // Check if set voltage is below the hard limit
- if( vOut->GetNumber() > vHardlimit->GetNumber() )
- {
- printf("Voltage hard limit triggered (%lf > %lf)!\n", vOut->GetNumber(), vHardlimit->GetNumber() );
- vOut->SetNumber( vHardlimit->GetNumber() );
- }
-
- outroot = new TFile(fname, "RECREATE");
-
- TTree *header_data = new TTree("header_data", "Header information for the measurement.");
- TTree *meas_data = new TTree("meas_data", "Saved ADC and TDC measurement data.");
- TTree *scope_data = new TTree("scope_data", "Saved scope measurement data.");
-
- // Branches for the header
- header_data->Branch("nrch", &evtheader.nrch, "nrch/I");
- header_data->Branch("timestamp", &evtheader.timestamp, "timestamp/I");
- header_data->Branch("biasvolt", &evtheader.biasvolt, "biasvolt/D");
- header_data->Branch("xpos", &evtheader.xpos, "xpos/I");
- header_data->Branch("ypos", &evtheader.ypos, "ypos/I");
- header_data->Branch("zpos", &evtheader.zpos, "zpos/I");
- header_data->Branch("temperature", &evtheader.temperature, "temperature/D");
- header_data->Branch("laserinfo", &evtheader.laserinfo, "laserinfo/C");
-
- evtheader.nrch = (int)NCH->GetNumber()*2;
- evtheader.timestamp = (int)time(NULL);
- evtheader.biasvolt = (double)vOut->GetNumber();
- evtheader.xpos = (int)xPos->GetNumber();
- evtheader.ypos = (int)yPos->GetNumber();
- evtheader.zpos = (int)zPos->GetNumber();
- evtheader.temperature = (double)chtemp->GetNumber();
- evtheader.angle = (double)incangle->GetNumber();
- sprintf(evtheader.laserinfo, "%s", laserInfo->GetText());
-
- char histtime[256];
- GetTime(evtheader.timestamp, histtime);
-
- printf("Save file header information:\n");
- printf("- Number of channels: %d\n", evtheader.nrch);
- printf("- Timestamp: %d (%s)\n", evtheader.timestamp, histtime);
- printf("- Bias voltage: %lf\n", evtheader.biasvolt);
- printf("- Table position (X,Y,Z): %d, %d, %d\n", evtheader.xpos, evtheader.ypos, evtheader.zpos);
- printf("- Temperature: %lf\n", evtheader.temperature);
- printf("- Laser and filter settings: %s\n", evtheader.laserinfo);
-
- header_data->Fill();
-
- // Branches for ADC and TDC data
- for(int i = 0; i < evtheader.nrch/2; i++)
- {
- sprintf(ctemp, "ADC%d", i);
- sprintf(fname, "ADC%d/I", i);
- meas_data->Branch(ctemp, &evtdata.adcdata[i], fname);
-
- sprintf(ctemp, "TDC%d", i);
- sprintf(fname, "TDC%d/I", i);
- meas_data->Branch(ctemp, &evtdata.tdcdata[i], fname);
- }
-
- // Initialize the scope before measurement
- if( sCamaclink->IsDown() )
- InitializeScope();
-
- // Branch for scope measurement data
- if(gScopeDaq->scopeUseType == 2) // only if we select waveform measurement
- {
- if(gScopeDaq->scopeMeasSel == 0)
- scope_data->Branch("amp", &evtmeas.measdata, "amp/D");
- else if(gScopeDaq->scopeMeasSel == 1)
- scope_data->Branch("area", &evtmeas.measdata, "area/D");
- else if(gScopeDaq->scopeMeasSel == 2)
- scope_data->Branch("delay", &evtmeas.measdata, "delay/D");
- else if(gScopeDaq->scopeMeasSel == 3)
- scope_data->Branch("fall", &evtmeas.measdata, "fall/D");
- else if(gScopeDaq->scopeMeasSel == 4)
- scope_data->Branch("freq", &evtmeas.measdata, "freq/D");
- else if(gScopeDaq->scopeMeasSel == 5)
- scope_data->Branch("max", &evtmeas.measdata, "max/D");
- else if(gScopeDaq->scopeMeasSel == 6)
- scope_data->Branch("mean", &evtmeas.measdata, "mean/D");
- else if(gScopeDaq->scopeMeasSel == 7)
- scope_data->Branch("min", &evtmeas.measdata, "min/D");
- else if(gScopeDaq->scopeMeasSel == 8)
- scope_data->Branch("pk2p", &evtmeas.measdata, "pk2p/D");
- else if(gScopeDaq->scopeMeasSel == 9)
- scope_data->Branch("pwidth", &evtmeas.measdata, "pwidth/D");
- else if(gScopeDaq->scopeMeasSel == 10)
- scope_data->Branch("rise", &evtmeas.measdata, "rise/D");
- }
-
- int neve = (int) evtNum->GetNumber();
- int allEvt, zProg;
- zProg = 1;
-
-#if WORKSTAT == 'I'
-#else
-// ONLY FOR TESTING!
- TRandom *randNum = new TRandom();
- randNum->SetSeed(0);
-// ONLY FOR TESTING!
-#endif
-
- if (gDaq)
- {
- if(scanon == 0)
- {
- gDaq->init(evtheader.nrch);
- scanon = 1;
- }
- gDaq->fStop=0;
- // Start gathering
- gDaq->start();
-
- busyLabel->Enable();
-
- for (int n=0;n<neve && !gDaq->fStop ;/*n++*/)
- {
- int nb = gDaq->event(gBuf,BSIZE);
-
-#if WORKSTAT == 'I'
-#else
-// ONLY FOR TESTING!
- for(int i=0; i < evtheader.nrch; i++)
- {
- if(i == 1)
- gBuf[i] = randNum->Gaus(1500,300);
- else if(i == 0)
- gBuf[i] = randNum->Poisson(2500);
- }
-// ONLY FOR TESTING!
-#endif
- if (nb<=0) n--;
-
- int nc=0;
-
- while ( (nb>0) && (n<neve) )
- {
- for(int i = 0; i < evtheader.nrch; i++)
- {
- unsigned short adc = gBuf[i+nc]&0xFFFF;
- if(i % 2 == 0) // TDC
- evtdata.tdcdata[i/2] = (int)adc;
- else if(i % 2 == 1) // ADC
- evtdata.adcdata[i/2] = (int)adc;
-
- // Start plotting the scope waveform
- if( (gScopeDaq->scopeUseType == 1) && (sCamaclink->IsDown()) )
- StartScopeAcq();
- }
- meas_data->Fill();
-
- // Start making a scope measurement
- if( (gScopeDaq->scopeUseType == 2) && (sCamaclink->IsDown()) )
- {
- StartScopeAcq();
- evtmeas.measdata = gScopeDaq->measubuf;
- }
- scope_data->Fill();
-
- n++;
- nc += evtheader.nrch;
- nb -= evtheader.nrch;
- }
-
- MyTimer();
- allEvt = n;
- if (gSystem->ProcessEvents()) printf("Run Interrupted\n");
-
- if( (started) && (n == (neve*zProg)/10) )
- {
- progVal = (float)zProg*10;
- curProgress->SetPosition(progVal);
- zProg++;
- }
- }
-
- printf("Number of gathered events: %d\n", allEvt);
- measStart->SetText("Start acquisition");
- started = kFALSE;
-
- gDaq->stop();
- }
-
- busyLabel->Disable();
- printf("End of Run neve=%d\n",neve);
-
- header_data->Write();
- meas_data->Write();
- scope_data->Write();
- delete header_data;
- delete meas_data;
- delete scope_data;
-
- outroot->Close();
-}
-
-// Start the acquisition
-void TGAppMainFrame::StartAcq()
-{
- // Variable that will initialize camac only once (for scans)
- int scanon = 0;
-
- // Determine the type of measurement to perform
- int vscan = 0, pscan = 0, zscan = 0;
- if(voltscanOn->IsOn()) vscan = 1;
- if(surfscanOn->IsOn()) pscan = 1;
- if(zscanOn->IsOn()) zscan = 1;
-
- char cmd[256];
- int i, j, k;
- float progVal;
- FILE *pfin;
-
- // Variables for voltage scan
- float currentVoltage, minVoltage, maxVoltage, stepVoltage;
- int repetition;
-
- // Variables for surface scan
- int minXpos, maxXpos, stepXpos;
- int minYpos, maxYpos, stepYpos;
- int minZpos, maxZpos, stepZpos;
- int repetX, repetY, repetZ;
-
- // Voltage scan
- if( (vscan == 1) && (pscan == 0) )
- {
- if(started)
- {
- printf("Stopping current voltage scan...\n");
- gROOT->SetInterrupt();
- measStart->SetText("Start acquisition");
- started = kFALSE;
-
- pfin = fopen("finish_sig.txt","w");
- fprintf(pfin, "%s: Voltage scan stopped.", timeStamp->GetText());
- fclose(pfin);
- }
- else if(!started)
- {
- measStart->SetText("Stop acquisition");
- started = kTRUE;
-
- printf("Running a voltage scan...\n");
-
- minVoltage = vOutStart->GetNumber();
- maxVoltage = vOutStop->GetNumber();
- stepVoltage = vOutStep->GetNumber();
-
- if(stepVoltage == 0.)
- repetition = 1;
- else
- repetition = ((maxVoltage - minVoltage)/stepVoltage)+1;
-
- for(i=0; i < repetition; i++)
- {
- progVal = (float)(100.00/repetition)*i;
- curProgress->SetPosition(progVal);
-
- fflush(stdout);
- currentVoltage = minVoltage + stepVoltage*i;
- sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s 1", rootdir, GetChannel(), currentVoltage);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- printf("Waiting for voltage change...\n");
- sleep(3);
- vOut->SetNumber(currentVoltage);
- printf("Continuing...\n");
-
- // Here comes function to start histogramming <<<<<<<<<<<<<<<<<<<<<<<<
- RunMeas((void*)0, i, 0, scanon);
- fflush(stdout);
- }
-
- // Set output back to off
- fflush(stdout);
- printf("Measurement finished, returning to starting voltage...\n");
- sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s 1", rootdir, GetChannel(), minVoltage);
- vOut->SetNumber(minVoltage);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- progVal = 100.00;
- curProgress->SetPosition(progVal);
- printf("\n");
-
- pfin = fopen("finish_sig.txt","w");
- fprintf(pfin, "%s: Voltage scan finished.", timeStamp->GetText());
- fclose(pfin);
- }
- }
- // Surface scan
- else if( (pscan == 1) && (vscan == 0) )
- {
- minXpos = xPosMin->GetNumber();
- maxXpos = xPosMax->GetNumber();
- stepXpos = xPosStep->GetNumber();
- minYpos = yPosMin->GetNumber();
- maxYpos = yPosMax->GetNumber();
- stepYpos = yPosStep->GetNumber();
- minZpos = zPosMin->GetNumber();
- maxZpos = zPosMax->GetNumber();
- stepZpos = zPosStep->GetNumber();
-
- if(zscan == 1)
- {
- if(stepZpos == 0.) repetZ = 1;
- else repetZ = ((maxZpos - minZpos)/stepZpos)+1;
- }
- else
- {
- minZpos = zPos->GetNumber();
- repetZ = 1;
- }
-
- if(stepXpos == 0.) repetX = 1;
- else repetX = ((maxXpos - minXpos)/stepXpos)+1;
- if(stepYpos == 0.) repetY = 1;
- else repetY = ((maxYpos - minYpos)/stepYpos)+1;
-
- for(k=0; k < repetZ; k++)
- {
- fflush(stdout);
- // Y-axis change
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, minZpos + stepZpos*k, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- printf("Next Z position...\n");
- zPos->SetNumber(minZpos + stepZpos*k);
- fflush(stdout);
-
- for(j=0; j < repetY; j++)
- {
- fflush(stdout);
- // Y-axis change
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, minYpos + stepYpos*j, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- sleep(4);
- printf("Next Y position...\n");
- yPos->SetNumber(minYpos + stepYpos*j);
- fflush(stdout);
-
- for(i=0; i < repetX; i++)
- {
- progVal = (float)(100.00/(repetX*repetY))*(j*repetX+i);
- curProgress->SetPosition(progVal);
-
- // X-axis change
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, minXpos + stepXpos*i, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- printf("Next X position...\n");
- fflush(stdout);
-
- printf("Waiting for position change...\n");
- sleep(2);
- xPos->SetNumber(minXpos + stepXpos*i);
- printf("Continuing...\n");
-
-// for (k=0;k<(NTDCCH+NADCCH);k++) gHisto1D[k]->Reset();
-// for (k=0;k<(NTDCCH+NADCCH)/2;k++) gHisto2D[k]->Reset();
-
- // Here comes function to start histogramming <<<<<<<<<<<<<<<<<<<<<<<<
- RunMeas((void*)0, (j*repetX + i), zscan , scanon);
-
- fflush(stdout);
- }
-
- printf("\n");
- }
- }
-
- fflush(stdout);
- printf("Measurement finished, returning to starting position...\n");
- // X-axis return
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, minXpos, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- fflush(stdout);
-
- // Y-axis return
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, minYpos, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
-
- // Z-axis return
- sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, minZpos, rootdir);
-#if WORKSTAT == 'I'
- retTemp = system(cmd);
-#else
- printf("Cmd: %s\n",cmd);
-#endif
- xPos->SetNumber(minXpos);
- yPos->SetNumber(minYpos);
- zPos->SetNumber(minZpos);
-
- progVal = 100.00;
- curProgress->SetPosition(progVal);
- printf("\n");
-
- pfin = fopen("finish_sig.txt","w");
- fprintf(pfin, "%s: Surface scan finished.", timeStamp->GetText());
- fclose(pfin);
- }
- // Normal single measurement
- else if( (vscan == 0) && (pscan == 0) )
- {
- // Set the start button to stop and enable stopping of measurement
- if(started)
- {
- printf("Stopping current single scan...\n");
- gROOT->SetInterrupt();
-// gDaq->fStop=1;
- measStart->SetText("Start acquisition");
- started = kFALSE;
- }
- else if(!started)
- {
- measStart->SetText("Stop acquisition");
- started = kTRUE;
-
- printf("Running a single scan...\n");
- RunMeas((void*)0, 0, 0, scanon);
- printf("Measurement finished...\n");
- printf("\n");
- }
- }
-}
-
-// File browser for opening histograms
-void TGAppMainFrame::SelectDirectory()
-{
- int i = fileList->GetNumberOfEntries();
-
- TGFileInfo file_info;
- const char *filetypes[] = {"Histograms",histExtAll,0,0};
- file_info.fFileTypes = filetypes;
- file_info.fIniDir = StrDup("./results");
- file_info.fMultipleSelection = kTRUE;
- new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDOpen, &file_info);
-
- TList *files = file_info.fFileNamesList;
- if(files)
- {
- TSystemFile *file;
- TString fname;
- TIter next(files);
- while(file=(TSystemFile*)next())
- {
- fname = file->GetName();
- fileList->AddEntry(fname.Data(), i);
- i++;
- }
- }
- fileList->Layout();
-}
-
-// File browser for selecting the save file
-void TGAppMainFrame::SaveFile()
-{
- TGFileInfo file_info;
- const char *filetypes[] = {"Histograms",histExtAll,0,0};
- file_info.fFileTypes = filetypes;
- file_info.fIniDir = StrDup("./results");
- new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDSave, &file_info);
-
- fileName->SetText(file_info.fFilename);
-}
-
-// Toggle multiple selection in filelist
-void TGAppMainFrame::ListMultiSelect()
-{
- fileList->SetMultipleSelections((multiSelect->IsOn()));
-
- if(multiSelectAll->IsDown())
- multiSelectAll->SetState(kButtonUp);
-}
-
-// Select all entries in filelist
-void TGAppMainFrame::ListSelectAll()
-{
- if(multiSelectAll->IsDown())
- {
- multiSelect->SetState(kButtonDown);
- fileList->SetMultipleSelections((multiSelect->IsOn()));
- for(int i = 0; i < fileList->GetNumberOfEntries(); i++)
- fileList->Select(i,kTRUE);
- }
- else if(!multiSelectAll->IsDown())
- {
- multiSelect->SetState(kButtonUp);
- fileList->SetMultipleSelections((multiSelect->IsOn()));
- for(int i = 0; i < fileList->GetNumberOfEntries(); i++)
- fileList->Select(i,kFALSE);
- }
-}
-
-// Navigation buttons for the filelist (<<, >>) and double click
-void TGAppMainFrame::FileListNavigation(int pn)
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- int curSel;
- TList *files;
- if( nrfiles > 0 )
- {
- if(pn < -1)
- {
- if(multiSelect->IsOn())
- {
- // turn off multiple selection and select first file on list
- fileList->SetMultipleSelections(kFALSE);
- multiSelect->SetState(kButtonUp);
- multiSelectAll->SetState(kButtonUp);
-
- fileList->Select(0,kTRUE);
- }
- else
- {
- // if nothing is selected, curSel will be -1
- curSel = fileList->GetSelected();
- // go to next file on list
- if(pn == -3)
- {
- if( (curSel == (int)(nrfiles-1)) || (curSel == -1) )
- fileList->Select(0);
- else
- fileList->Select(curSel+1);
- }
- // go to previous file on list
- else if(pn == -2)
- {
- if( (curSel == 0) || (curSel == -1) )
- fileList->Select(nrfiles-1);
- else
- fileList->Select(curSel-1);
- }
- }
- }
-
- // check the newly selected file/files and return its name/their names
- files = new TList();
- fileList->GetSelectedEntries(files);
- if(files)
- {
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- if(debug)
- printf("Filename: %s\n", files->At(i)->GetTitle());
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
- }
- }
- }
-
- // Still need to include drawing of histograms we move to!!!
- }
-}
-
-// Open the header edit window when pressing on editHeader button
-void TGAppMainFrame::HeaderEdit()
-{
- OpenWindow(2);
-}
-
-// Display the currently selected histogram in file list
-void TGAppMainFrame::DisplayHistogram(char* histfile, int histtype)
-{
- if(debug)
- printf("Selected file: %s\n", histfile);
-
- TCanvas *gCanvas = histCanvas->GetCanvas();
-
- inroot = new TFile(histfile, "READ");
-
- TTree *header_data, *meas_data;
- inroot->GetObject("header_data", header_data);
- inroot->GetObject("meas_data", meas_data);
-
- // Reading the header
- header_data->SetBranchAddress("nrch", &evtheader.nrch);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("biasvolt", &evtheader.biasvolt);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("xpos", &evtheader.xpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("ypos", &evtheader.ypos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("zpos", &evtheader.zpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("temperature", &evtheader.temperature);
- header_data->GetEntry(0);
- if( header_data->FindBranch("angle") )
- {
- header_data->SetBranchAddress("angle", &evtheader.angle);
- header_data->GetEntry(0);
- }
- header_data->SetBranchAddress("laserinfo", &evtheader.laserinfo);
- header_data->GetEntry(0);
-
- char histtime[256];
- GetTime(evtheader.timestamp, histtime);
-
- // Displaying header information (debug and on the GUI)
- if(debug)
- {
- printf("Opened file header information:\n");
- printf("- Number of channels: %d\n", evtheader.nrch);
- printf("- Timestamp: %d (%s)\n", evtheader.timestamp, histtime);
- printf("- Bias voltage: %lf\n", evtheader.biasvolt);
- printf("- Table position (X,Y,Z): %d, %d, %d\n", evtheader.xpos, evtheader.ypos, evtheader.zpos);
- if(evtheader.temperature)
- printf("- Temperature: %lf\n", evtheader.temperature);
- if( header_data->FindBranch("angle") )
- printf("- Incidence angle: %lf\n", evtheader.angle);
- else
- printf("- Incidence angle: No angle information!\n");
- printf("- Laser and filter settings: %s\n", evtheader.laserinfo);
- }
-
- char ctemp[512];
- disptime->SetText(histtime);
- dispbias->SetNumber(evtheader.biasvolt);
- sprintf(ctemp, "%d, %d, %d", evtheader.xpos, evtheader.ypos, evtheader.zpos);
- disppos->SetText(ctemp);
- if(evtheader.temperature)
- disptemp->SetNumber(evtheader.temperature);
- else
- disptemp->SetNumber(0.0);
- if( header_data->FindBranch("angle") )
- dispangle->SetNumber(evtheader.angle);
- else
- dispangle->SetNumber(0.0);
- displaser->SetText(evtheader.laserinfo);
-
- int j;
- char rdc[256];
- char rdcsel[256];
-
- j = selectCh->GetNumber();
-
- printf("Found %d data points.\n", (int)meas_data->GetEntries());
-
- gCanvas->cd();
- double range[4];
- range[0] = adcMinRange->GetNumber();
- range[1] = adcMaxRange->GetNumber();
- range[2] = tdcMinwindow->GetNumber();
- range[3] = tdcMaxwindow->GetNumber();
-
- if(histtype == 0)
- {
- if( range[0] == range[1] )
- sprintf(rdc, "ADC%d>>%s", j, histname);
- else
- sprintf(rdc, "ADC%d>>%s(%d,%lf,%lf)", j, histname, (int)(range[1]-range[0]), range[0]-0.5, range[1]-0.5);
-
- sprintf(rdcsel, "(TDC%d>%lf)&&(TDC%d<%lf)", j, range[2]*tdctimeconversion, j, range[3]*tdctimeconversion);
- meas_data->Draw(rdc, rdcsel);
-
- sprintf(rdc, "ADC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);ADC;", j, evtheader.biasvolt, range[2], range[3]);
- TH1F *histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
- if(!cleanPlots)
- histtemp->SetTitle(rdc);
- else
- histtemp->SetTitle(";ADC;");
- histtemp->GetXaxis()->SetLabelSize(0.025);
- histtemp->GetXaxis()->CenterTitle(kTRUE);
- histtemp->GetYaxis()->SetLabelSize(0.025);
- if(cleanPlots)
- {
- TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
- yax->SetMaxDigits(4);
- }
-
- gCanvas->Modified();
- gCanvas->Update();
-
- if( yMinRange->GetNumber() != yMaxRange->GetNumber() )
- {
- if( (logscale->IsDown()) && (yMinRange->GetNumber() <= 0) )
- {
- histtemp->GetYaxis()->SetRangeUser(0.5, yMaxRange->GetNumber());
- yMinRange->SetNumber(0.5);
- logchange = 1;
- }
- else
- {
- gCanvas->SetLogy(kFALSE);
- if(logchange == 1)
- {
- yMinRange->SetNumber(0.0);
- logchange = 0;
- }
- histtemp->GetYaxis()->SetRangeUser(yMinRange->GetNumber(), yMaxRange->GetNumber());
- }
- }
-
- TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
- if(!cleanPlots)
- {
- stats->SetX1NDC(0.84); stats->SetX2NDC(0.97);
- stats->SetY1NDC(0.87); stats->SetY2NDC(0.97);
- }
- else
- {
- stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
- stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
- }
- }
- else if(histtype == 1)
- {
- if( range[0] == range[1] )
- sprintf(rdc, "(TDC%d/%lf)>>%s", j, tdctimeconversion, histname);
- else
- sprintf(rdc, "(TDC%d/%lf)>>%s(%d,%lf,%lf)", j, tdctimeconversion, histname, (int)((range[3]-range[2])*tdctimeconversion), range[2], range[3]);
- sprintf(rdcsel, "(TDC%d>%lf)&&(TDC%d<%lf)", j, range[2]*tdctimeconversion, j, range[3]*tdctimeconversion);
- meas_data->Draw(rdc, rdcsel);
-
- sprintf(rdc, "TDC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);Time (TDC channel) [ns];", j, evtheader.biasvolt, range[2], range[3]);
- TH1F *histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
- if(!cleanPlots)
- histtemp->SetTitle(rdc);
- else
- histtemp->SetTitle(";Time (TDC channel) [ns];");
- histtemp->GetXaxis()->SetLabelSize(0.025);
- histtemp->GetXaxis()->CenterTitle(kTRUE);
- histtemp->GetYaxis()->SetLabelSize(0.025);
- if(cleanPlots)
- {
- TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
- yax->SetMaxDigits(4);
- }
-
- gCanvas->Modified();
- gCanvas->Update();
-
- if( yMinRange->GetNumber() != yMaxRange->GetNumber() )
- {
- if( (logscale->IsDown()) && (yMinRange->GetNumber() <= 0) )
- {
- histtemp->GetYaxis()->SetRangeUser(0.5, yMaxRange->GetNumber());
- yMinRange->SetNumber(0.5);
- logchange = 1;
- }
- else
- {
- gCanvas->SetLogy(kFALSE);
- if(logchange == 1)
- {
- yMinRange->SetNumber(0.0);
- logchange = 0;
- }
- histtemp->GetYaxis()->SetRangeUser(yMinRange->GetNumber(), yMaxRange->GetNumber());
- }
- }
-
- TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
- if(!cleanPlots)
- {
- stats->SetX1NDC(0.84); stats->SetX2NDC(0.97);
- stats->SetY1NDC(0.87); stats->SetY2NDC(0.97);
- }
- else
- {
- stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
- stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
- }
- }
- else if(histtype == 2)
- {
- if( ((range[0] == range[1]) && (range[2] == range[3])) || (range[2] == range[3]) || (range[0] == range[1]) )
- sprintf(rdc, "(TDC%d/%lf):ADC%d>>%s", j, tdctimeconversion, j, histname);
- else
- sprintf(rdc, "(TDC%d/%lf):ADC%d>>%s(%d,%lf,%lf,%d,%lf,%lf)", j, tdctimeconversion, j, histname, (int)(range[1]-range[0])/2, range[0]-0.5, range[1]-0.5, (int)((range[3]-range[2])*tdctimeconversion)/2, range[2], range[3]);
- meas_data->Draw(rdc,"","COLZ");
-
- sprintf(rdc, "ADC/TDC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);ADC;TDC", j, evtheader.biasvolt, range[2], range[3]);
- TH2F *histtemp = (TH2F*)gCanvas->GetPrimitive(histname);
- if(!cleanPlots)
- histtemp->SetTitle(rdc);
- else
- histtemp->SetTitle(";ADC;Time (TDC channel) [ns]");
- histtemp->GetXaxis()->SetLabelSize(0.025);
- histtemp->GetXaxis()->CenterTitle(kTRUE);
- histtemp->GetYaxis()->SetLabelSize(0.025);
- histtemp->GetYaxis()->CenterTitle(kTRUE);
- histtemp->GetYaxis()->SetTitleOffset(1.35);
- if(cleanPlots)
- {
- TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
- yax->SetMaxDigits(4);
- }
-
- gCanvas->Modified();
- gCanvas->Update();
-
- TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
-// stats->SetOptStat(0);
- stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
- stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
-
- TPaletteAxis *gpalette = (TPaletteAxis*)histtemp->GetListOfFunctions()->FindObject("palette");
- gpalette->SetLabelSize(0.022);
- }
-
- if(histtype < 2)
- {
- if( logscale->IsDown() )
- gCanvas->SetLogy(kTRUE);
- else if( !logscale->IsDown() )
- gCanvas->SetLogy(kFALSE);
- }
- else
- gCanvas->SetLogy(kFALSE);
-
- gCanvas->Modified();
- gCanvas->Update();
-
- // If you close the opened file, the data can't be accessed by other functions
-}
-
-// Create a 2D surface plot and plot it
-void TGAppMainFrame::MakeSurfPlot(TList *files)
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- int j, k = 0, m = 0, n = 0;
- char ctemp[256];
- TCanvas *gCanvas = histCanvas->GetCanvas();
- TTree *header_data, *meas_data;
- double *integralCount;
- double *surfx, *surfy;
- double xsurfmin = 0, ysurfmin = 0;
- integralCount = new double[nrfiles];
- for(int i = 0; i < (int)nrfiles; i++) integralCount[i] = 0;
- surfx = new double[nrfiles];
- surfy = new double[nrfiles];
- int nrentries;
- TGraph2D *gScan2D;
- gScan2D = new TGraph2D();
-
-/* int zProg = 0;
- float progVal;
- curProgress->SetPosition(zProg);*/
-
- char exportname[256];
-
- if(multiSelect->IsOn())
- {
- printf("Creating a surface plot. Please wait...\n");
- fileList->GetSelectedEntries(files);
- if(files)
- {
- busyLabel->Enable();
-
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- n++;
-// printf("Filename: %s\n", files->At(i)->GetTitle());
-
- sprintf(ctemp, "%s", files->At(i)->GetTitle());
- inroot = new TFile(ctemp, "READ");
-
- inroot->GetObject("header_data", header_data);
- inroot->GetObject("meas_data", meas_data);
-
- // Reading the header
- header_data->SetBranchAddress("xpos", &evtheader.xpos);
- header_data->GetEntry(0);
- header_data->SetBranchAddress("ypos", &evtheader.ypos);
- header_data->GetEntry(0);
-
- char rdc[256];
- j = selectCh->GetNumber();
- double rangetdc[2];
- rangetdc[0] = tdcMinwindow->GetNumber();
- rangetdc[1] = tdcMaxwindow->GetNumber();
-
- k = 0;
- m = 0;
-
- // Reading the data
- for(int i = 0; i < meas_data->GetEntries(); i++)
- {
- sprintf(rdc, "ADC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
- meas_data->GetEntry(i);
-
- sprintf(rdc, "TDC%d", j);
- meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
- meas_data->GetEntry(i);
-
- // If our data point is inside the TDC window
- if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
- {
- k++;
- m += evtdata.adcdata[j];
- }
- }
-
- integralCount[n-1] += ((double)m)/((double)k);
- if(n == 1)
- {
- xsurfmin = evtheader.xpos;
- ysurfmin = evtheader.ypos;
- }
- surfx[n-1] = (double)(evtheader.xpos-xsurfmin)*lenconversion;
- surfy[n-1] = (double)(evtheader.ypos-ysurfmin)*lenconversion;
-
-/* if( n == (((files->GetSize())*zProg)/20)+1 ) // divide by 20 because files->GetSize() gives a double value of the files selected
- {
- progVal = (float)n;
- curProgress->SetPosition(progVal);
- zProg++;
- printf("Progress = %lf\n", progVal);
- }*/
-
- inroot->Close();
- delete inroot;
- }
- }
-
- busyLabel->Disable();
-
- nrentries = n;
- printf("%d files were selected.\n", nrentries);
-
- for(int i = 0; i < nrentries; i++)
- {
-// printf("At position (%d,%d), the ADC integral is: %lf.\n", surfx[i], surfy[i], integralCount[i]);
- gScan2D->SetPoint(i, surfx[i], surfy[i], integralCount[i]);
- }
- gCanvas->cd();
- gScan2D->Draw("COLZ");
-
- gCanvas->Modified();
- gCanvas->Update();
-
- gScan2D->GetXaxis()->SetTitle("X [#mum]");
- gScan2D->GetXaxis()->CenterTitle(kTRUE);
- gScan2D->GetXaxis()->SetLabelSize(0.022);
- gScan2D->GetXaxis()->SetRangeUser(surfx[0], surfx[nrentries-1]);
-// j = 500+(int)((surfx[nrentries-1]-surfx[0])/(surfx[1]-surfx[0]));
-// if(j > 510) j = 510;
- gScan2D->GetXaxis()->SetNdivisions(510, kTRUE);
- gScan2D->GetYaxis()->SetTitle("Y [#mum]");
- gScan2D->GetYaxis()->SetTitleOffset(1.3);
- gScan2D->GetYaxis()->CenterTitle(kTRUE);
- gScan2D->GetYaxis()->SetLabelSize(0.022);
- gScan2D->GetYaxis()->SetRangeUser(surfy[0], surfy[nrentries-1]);
-// j = 500+(int)((surfy[nrentries-1]-surfy[0])/(surfy[(int)((surfx[nrentries-1]-surfx[0])/(surfx[1]-surfx[0])+1)]-surfy[0]));
-// if(j > 510) j = 510;
- gScan2D->GetYaxis()->SetNdivisions(510, kTRUE);
-
- TGaxis *yax = (TGaxis*)gScan2D->GetYaxis();
- yax->SetMaxDigits(4);
-
- if(!cleanPlots)
- gScan2D->SetTitle("Surface scan");
- else
- gScan2D->SetTitle();
-
-// TPaletteAxis *gpalette = (TPaletteAxis*)gScan2D->GetListOfFunctions()->FindObject("palette");
-// gpalette->SetLabelSize(0.022);
-
- gCanvas->Modified();
- gCanvas->Update();
-
- remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
- sprintf(exportname, "%s_surfscan.pdf", ctemp);
- gCanvas->SaveAs(exportname);
- }
- }
- else
- {
- printf("To make a 2D surface scan plot, select multiple root files.\n");
- change2Dsurf->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
- }
-
- delete[] surfx;
- delete[] surfy;
- delete[] integralCount;
-}
-
-// Change histogram when changing the channel
-void TGAppMainFrame::ChangeChannel()
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- TList *files;
-
- if( nrfiles > 0 )
- {
- // check the newly selected file/files and return its name/their names
- files = new TList();
- fileList->GetSelectedEntries(files);
- if(files)
- {
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- if(debug)
- printf("Filename: %s\n", files->At(i)->GetTitle());
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
- }
- }
- }
- }
-}
-
-// Setting a predetermined X range
-void TGAppMainFrame::SetHistRange()
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
-
- if(nrfiles > 0)
- {
- TList *files;
- files = new TList();
- fileList->GetSelectedEntries(files);
- if(files)
- {
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- if(debug)
- printf("Filename: %s\n", files->At(i)->GetTitle());
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
- }
- }
- }
- }
-}
-
-// Changing the histogram type to display
-void TGAppMainFrame::ChangeHisttype(int type)
-{
- TGTextButton *pressedB = new TGTextButton();
- int menuID = 0;
- unsigned int nrfiles = fileList->GetNumberOfEntries();
-
- // ADC histogram
- if(type == 0)
- {
- pressedB = changeADC;
- menuID = M_ANALYSIS_HISTTYPE_1DADC;
-
- changeTDC->SetDown(kFALSE);
- changeADCTDC->SetDown(kFALSE);
- change2Dsurf->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
- }
- // TDC histogram
- else if(type == 1)
- {
- pressedB = changeTDC;
- menuID = M_ANALYSIS_HISTTYPE_1DTDC;
-
- changeADC->SetDown(kFALSE);
- changeADCTDC->SetDown(kFALSE);
- change2Dsurf->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
- }
- // ADC vs. TDC histogram
- else if(type == 2)
- {
- pressedB = changeADCTDC;
- menuID = M_ANALYSIS_HISTTYPE_2D;
-
- changeADC->SetDown(kFALSE);
- changeTDC->SetDown(kFALSE);
- change2Dsurf->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
- }
- // Surface scan plot
- else if(type == 3)
- {
- pressedB = change2Dsurf;
- menuID = M_ANALYSIS_HISTTYPE_SURF;
-
- changeADC->SetDown(kFALSE);
- changeTDC->SetDown(kFALSE);
- changeADCTDC->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
- fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
- }
-
- if( fMenuHisttype->IsEntryChecked(menuID) )
- {
- pressedB->SetDown(kFALSE);
- fMenuHisttype->UnCheckEntry(menuID);
- }
- else if( !fMenuHisttype->IsEntryChecked(menuID) )
- {
- pressedB->SetDown(kTRUE);
- fMenuHisttype->CheckEntry(menuID);
- }
-
- if(nrfiles > 0)
- {
- // Still need to add the switch!!!
- TList *files;
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- if(type < 3)
- DisplayHistogram( (char*)(files->At(0)->GetTitle()), type);
- else if(type == 3)
- MakeSurfPlot( files );
- }
-}
-
-// Changing the histogram type to display
-void TGAppMainFrame::HistogramExport()
-{
- unsigned int nrfiles = fileList->GetNumberOfEntries();
- TList *files;
- TCanvas *gCanvas = histCanvas->GetCanvas();
-
- char exportname[256];
- char ctemp[256];
-
- if(nrfiles > 0)
- {
- files = new TList();
- fileList->GetSelectedEntries(files);
- if(files)
- {
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_SURF) ) // for the surface scan, the plot from all selected files is already created
- {
- remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
- sprintf(exportname, "%s_surfscan.pdf", ctemp);
- gCanvas->SaveAs(exportname);
- }
- else
- {
- for(int i = 0; i < (int)nrfiles; i++)
- {
- if(files->At(i))
- {
- remove_ext((char*)files->At(i)->GetTitle(), ctemp);
-
- if(debug)
- printf("Filename: %s\n", files->At(i)->GetTitle());
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
- {
- sprintf(exportname, "%s_adc%d.pdf", ctemp, (int)selectCh->GetNumber());
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
- }
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
- {
- sprintf(exportname, "%s_tdc%d.pdf", ctemp, (int)selectCh->GetNumber());
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
- }
- else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
- {
- sprintf(exportname, "%s_adctdc%d.pdf", ctemp, (int)selectCh->GetNumber());
- DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
- }
-
- gCanvas->SaveAs(exportname);
- }
- }
- }
- }
- }
-}
-
-//---------------------------------------------------------------
-// Main window constructor definition (& layout)
-
-TGAppMainFrame::TGAppMainFrame(const TGWindow *p, int w, int h)
-{
- gDaq = new daq();
- gScopeDaq = new daqscope();
-
- // Define the main window and menubar
- fMain = new TGMainFrame(p, w, h, kVerticalFrame); // vertical frame split into menubar and main frame
- fMenuBar = new TGMdiMenuBar(fMain, 10, 10); // just prepare menubar, draw it with InitMenu()
- fMain->AddFrame(fMenuBar, new TGLayoutHints(kLHintsTop | kLHintsExpandX));
-
- // Define the main frame where opened subwindows will appear
- fMainFrame = new TGMdiMainFrame(fMain, fMenuBar, 300, 300);
- fMain->AddFrame(fMainFrame, new TGLayoutHints(kLHintsExpandX | kLHintsExpandY));
-
- // Initialize the menubar the initial measurement layout subwindows and display the main window
- InitMenu();
- MeasurementLayout();
- fMain->SetWindowName(WINDOW_NAME);
- fMain->MapSubwindows();
- fMain->MapWindow();
- fMain->Layout();
- GetPosition();
- GetVoltOut();
-}
-
-//---------------------------------------------------------------
-// Event handler for menubar actions
-
-void TGAppMainFrame::HandleMenu(Int_t id)
-{
- TList *files;
-
- switch (id) {
- case M_FILE_NEW:
- // Clear any values and histogram
- break;
-
- case M_FILE_EXIT:
- CloseWindow();
- break;
-
- case M_ANALYSIS_HISTTYPE_1DADC:
- // Toggles the ADC button
- ChangeHisttype(0);
- break;
-
- case M_ANALYSIS_HISTTYPE_1DTDC:
- ChangeHisttype(1);
- break;
-
- case M_ANALYSIS_HISTTYPE_2D:
- ChangeHisttype(2);
- break;
-
- case M_ANALYSIS_HISTTYPE_SURF:
- ChangeHisttype(3);
- break;
-
- case M_ANALYSIS_FIT:
- // Fit spectrum
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) && (files->GetSize() > 0) )
- FitSpectrum(files, 1);
- break;
-
- case M_ANALYSIS_FITSEL:
- // Fit all spectra
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- if( (fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC)) && (files->GetSize() > 1) )
- FitSpectrum(files, files->GetSize());
- break;
-
- case M_ANALYSIS_INTEGX:
- // Integrate the current spectra
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- IntegSpectrum(files, 1);
- break;
-
- case M_ANALYSIS_INTEGY:
- // Integrate the current spectra
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- IntegSpectrum(files, 2);
- break;
-
- case M_ANALYSIS_PHOTMU:
- // Integrate the current spectra and calculate mean of detected photons: mu = -log(Nped/Ntot)
- files = new TList();
- fileList->GetSelectedEntries(files);
-
- PhotonMu(files);
- break;
-
- case M_TOOLS_FIELDPOINT:
- OpenWindow(1);
- break;
-
- case M_WINDOW_HOR:
- fMainFrame->TileHorizontal();
- break;
-
- case M_WINDOW_VERT:
- fMainFrame->TileVertical();
- break;
-
- case M_HELP_ABOUT:
- About();
- break;
-
- default:
- fMainFrame->SetCurrent(id);
- break;
- }
-}
-
-//---------------------------------------------------------------
-// Initialize the main window menu
-
-void TGAppMainFrame::InitMenu()
-{
- fMenuBarItemLayout = new TGLayoutHints(kLHintsTop | kLHintsLeft, 0, 4, 0, 0);
-
- // Popup menu in menubar for File controls
- fMenuFile = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
- fMenuFile->AddEntry(new TGHotString("&New Measurement"), M_FILE_NEW);
- fMenuFile->AddSeparator();
- fMenuFile->AddEntry(new TGHotString("E&xit"), M_FILE_EXIT);
-
- // Popup menu in menubar for Analysis controls
- fMenuHisttype = new TGPopupMenu(gClient->GetRoot()); // adds a cascade menu that will be incorporated into analysis controls
- fMenuHisttype->AddEntry(new TGHotString("1D &ADC histogram"), M_ANALYSIS_HISTTYPE_1DADC);
- fMenuHisttype->AddEntry(new TGHotString("1D &TDC histogram"), M_ANALYSIS_HISTTYPE_1DTDC);
- fMenuHisttype->AddEntry(new TGHotString("&2D ADC vs. TDC histogram"), M_ANALYSIS_HISTTYPE_2D);
- fMenuHisttype->AddEntry(new TGHotString("2D &surface scan plot"), M_ANALYSIS_HISTTYPE_SURF);
-
- fMenuAnalysis = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
- fMenuAnalysis->AddPopup(new TGHotString("&Histogram type"), fMenuHisttype);
-
- fMenuAnalysis->AddEntry(new TGHotString("&Fit spectrum"), M_ANALYSIS_FIT);
- fMenuAnalysis->AddEntry(new TGHotString("Fit &all selected"), M_ANALYSIS_FITSEL);
- fMenuAnalysis->AddEntry(new TGHotString("Integrate spectrum (&X direction)"), M_ANALYSIS_INTEGX);
- fMenuAnalysis->AddEntry(new TGHotString("Integrate spectrum (&Y direction)"), M_ANALYSIS_INTEGY);
- fMenuAnalysis->AddEntry(new TGHotString("Relative &PDE"), M_ANALYSIS_PHOTMU);
-
- // Popup menu in menubar for External tools
- fMenuTools = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
- fMenuTools->AddEntry(new TGHotString("&Fieldpoint temperature sensor"), M_TOOLS_FIELDPOINT);
-
- // Popup menu in menubar for Window controls
- fMenuWindow = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
- fMenuWindow->AddEntry(new TGHotString("Tile &Horizontally"), M_WINDOW_HOR);
- fMenuWindow->AddEntry(new TGHotString("Tile &Vertically"), M_WINDOW_VERT);
- fMenuWindow->AddPopup(new TGHotString("&Windows"), fMainFrame->GetWinListMenu());
-
- // Popup menu in menubar for Help controls
- fMenuHelp = new TGPopupMenu(gClient->GetRoot());
- fMenuHelp->AddEntry(new TGHotString("&About"), M_HELP_ABOUT);
-
- // Connect all menu items with actions - handled by HandleMenu()
- fMenuFile->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
- fMenuAnalysis->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
- fMenuTools->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
- fMenuWindow->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
- fMenuHelp->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
-
- // Draw the created popup menus on the menubar
- fMenuBar->AddPopup(new TGHotString("&File"), fMenuFile, fMenuBarItemLayout);
- fMenuBar->AddPopup(new TGHotString("&Analysis"),fMenuAnalysis,fMenuBarItemLayout);
- fMenuBar->AddPopup(new TGHotString("&Tools"),fMenuTools,fMenuBarItemLayout);
- fMenuBar->AddPopup(new TGHotString("&Windows"),fMenuWindow,fMenuBarItemLayout);
- fMenuBar->AddPopup(new TGHotString("&Help"), fMenuHelp, fMenuBarItemLayout);
-
- // Disable fieldpoint if we are not connected to the IJS network
-#if IJSNET == 0
- fMenuTools->DisableEntry(M_TOOLS_FIELDPOINT);
-#endif
-}
-
-//---------------------------------------------------------------
-// Set the measurement subwindow layout
-
-void TGAppMainFrame::MeasurementLayout()
-{
- TGMdiFrame *mdiFrame;
-
- // Generic horizontal and vertical frames
- TGHorizontalFrame *fH1, *fH2, *fH3;
- TGVerticalFrame *fV1;
- TGGroupFrame *fG1;
- TGLabel *lab;
- TGCompositeFrame *fT1;
-
- // Sizes of internal group and subwindow structures
- int subwin[2];
- int subgroup[2];
-
-// Settings pane ---------------------------------------------------------------------------
- subwin[0] = (winWidth/6)-5; subwin[1] = 3*((winHeight/5)-5)-10;
- settingsPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = settingsPane->GetMdiFrame();
-
- // Check button to toggle voltage scan
- voltscanOn = new TGCheckButton(mdiFrame, "Voltage scan ON/OFF");
- voltscanOn->Resize(50,22);
- voltscanOn->SetState(kButtonUp);
- mdiFrame->AddFrame(voltscanOn, f0centerx);
-
- // Check button to toggle surface scan
- surfscanOn = new TGCheckButton(mdiFrame, "Surface scan ON/OFF");
- surfscanOn->Resize(50,22);
- surfscanOn->SetState(kButtonUp);
- mdiFrame->AddFrame(surfscanOn, f0centerx);
-
- // Check button to toggle Z direction scan
- zscanOn = new TGCheckButton(mdiFrame, "Z-axis scan ON/OFF");
- zscanOn->Resize(50,22);
- zscanOn->SetState(kButtonUp);
- mdiFrame->AddFrame(zscanOn, f0centerx);
-
- // Check button to toggle (open) the histogram window
-// histogramOn = new TGCheckButton(mdiFrame, "Histogram display ON/OFF");
-// histogramOn->Resize(50,22);
-// histogramOn->SetState(kButtonUp);
-// mdiFrame->AddFrame(histogramOn, f0centerx);
-
- subgroup[0] = subwin[0]-10;
- // Hard limit for maximum voltage we can set
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- lab = new TGLabel(fH1, "Voltage limit:");
- fH1->AddFrame(lab, f0center2d);
- vHardlimit = new TGNumberEntry(fH1, 70.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
- vHardlimit->Resize(80,22);
- fH1->AddFrame(vHardlimit, f0center2d);
- mdiFrame->AddFrame(fH1, f2);
-
- // Number of used channels
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- lab = new TGLabel(fH1, "Nr. of channels:");
- fH1->AddFrame(lab, f0center2d);
- NCH = new TGNumberEntry(fH1, 1, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 1, 8);
- NCH->Resize(40,22);
- fH1->AddFrame(NCH, f0center2d);
- mdiFrame->AddFrame(fH1, f2);
-
- // Check button to toggle plots with additional information or clean plots
- cleanOn = new TGCheckButton(mdiFrame, "Clean plots ON/OFF");
- cleanOn->Resize(50,22);
- cleanOn->SetState(kButtonDown);
- cleanPlots = 1;
- mdiFrame->AddFrame(cleanOn, f0centerx);
-
- // Button and textbox to enter the oscilloscope IP address
- lab = new TGLabel(mdiFrame, "Scope IP:");
- mdiFrame->AddFrame(lab, f0);
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- oscIP = new TGTextEntry(fH1, "178.172.43.157");
- oscIP->Resize(110,22);
- fH1->AddFrame(oscIP, f0);
- oscConnect = new TGTextButton(fH1, "Connect");
- oscConnect->SetTextJustify(36);
- oscConnect->SetWrapLength(-1);
- oscConnect->Resize(60,22);
- fH1->AddFrame(oscConnect, f0);
- oscOn = 0;
- mdiFrame->AddFrame(fH1, f2);
-
- // Laser settings (freq., tune, ND filter)
- lab = new TGLabel(mdiFrame, "Laser settings:");
- mdiFrame->AddFrame(lab, f0);
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- laserInfo = new TGTextEntry(fH1, "kHz, tune, ND");
- fH1->AddFrame(laserInfo, f2);
- mdiFrame->AddFrame(fH1, f2);
-
- // Chamber temperature (will only be manually set until we can get it directly from the chamber)
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- lab = new TGLabel(fH1, "Chamber temp.:");
- fH1->AddFrame(lab, f0center2d);
- chtemp = new TGNumberEntry(fH1, 25.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -70., 150.);
- chtemp->Resize(60,22);
- fH1->AddFrame(chtemp, f0center2d);
- mdiFrame->AddFrame(fH1, f2);
-
- // Incidence angle (will only be manually set until we can make it motorized)
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- lab = new TGLabel(fH1, "Incid. angle:");
- fH1->AddFrame(lab, f0center2d);
- incangle = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -180., 180.);
- incangle->Resize(60,22);
- fH1->AddFrame(incangle, f0center2d);
- mdiFrame->AddFrame(fH1, f2);
-
- mdiFrame->SetMdiHints(kMdiMinimize);
- mdiFrame->SetWindowName("Settings pane");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(0,0);
-// Settings pane ---------------------------------------------------------------------------
-
-// Main window -----------------------------------------------------------------------------
- subwin[0] = 3*((winWidth/6)-5); subwin[1] = 3*((winHeight/5)-5)-10;
- mainSubwindow = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = mainSubwindow->GetMdiFrame();
-
- // Voltage and position tab
- subgroup[0] = 2*subwin[0]/5-12;
- subgroup[1] = (subwin[1]+15)/2+5;
- setTab = new TGTab(mdiFrame, subgroup[0], subgroup[1]);
-
- fT1 = setTab->AddTab("Voltage + Position");
-
- fH1 = new TGHorizontalFrame(fT1, subwin[0], subgroup[1], kFixedHeight);
- // Left pane (Bias voltage controls)
- fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1], kFixedWidth | kFixedHeight);
- fG1 = new TGGroupFrame(fV1, "Bias voltage controls");
-
- // Output voltage supply channel
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Output channel:");
- fH2->AddFrame(lab, f0center2d);
- vOutCh = new TGComboBox(fH2, 200);
- vOutCh->AddEntry("1", 0);
- vOutCh->AddEntry("2", 1);
- vOutCh->AddEntry("3", 2);
- vOutCh->AddEntry("4", 3);
- vOutCh->AddEntry("5", 4);
- vOutCh->AddEntry("6", 5);
- vOutCh->AddEntry("7", 6);
- vOutCh->AddEntry("8", 7);
- vOutCh->AddEntry("101", 8);
- vOutCh->AddEntry("102", 9);
- vOutCh->AddEntry("103", 10);
- vOutCh->AddEntry("104", 11);
- vOutCh->AddEntry("105", 12);
- vOutCh->AddEntry("106", 13);
- vOutCh->AddEntry("107", 14);
- vOutCh->AddEntry("108", 15);
- vOutCh->Resize(50,22);
- vOutCh->Select(0);
- fH2->AddFrame(vOutCh, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- // Output voltage setting
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Output voltage:");
- fH2->AddFrame(lab, f0center2d);
- vOut = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, 0, vHardlimit->GetNumber());
- vOut->Resize(80,22);
- fH2->AddFrame(vOut, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- vOutOnOff = new TGCheckButton(fH2, "Output ON/OFF");
- vOutOnOff->Resize(subgroup[0]-10,22);
- vOutOnOff->SetState(kButtonUp);
- fH2->AddFrame(vOutOnOff, f0centerx);
- fG1->AddFrame(fH2, f2);
-
- // Set, get and reset voltage buttons
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH3 = new TGHorizontalFrame(fH2, subgroup[0], 30);
- vOutSet = new TGTextButton(fH3, "Set");
- vOutSet->SetTextJustify(36);
- vOutSet->SetWrapLength(-1);
- vOutSet->Resize(60,22);
- fH3->AddFrame(vOutSet, f0);
- vOutGet = new TGTextButton(fH3, "Get");
- vOutGet->SetTextJustify(36);
- vOutGet->SetWrapLength(-1);
- vOutGet->Resize(60,22);
- fH3->AddFrame(vOutGet, f0);
- vOutReset = new TGTextButton(fH3, "Reset");
- vOutReset->SetTextJustify(36);
- vOutReset->SetWrapLength(-1);
- vOutReset->Resize(60,22);
- fH3->AddFrame(vOutReset, f0);
- fH2->AddFrame(fH3, f0centerx);
- fG1->AddFrame(fH2, f2);
-
- // Voltage scan controls
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "V (min):");
- fH2->AddFrame(lab, f0center2d);
- vOutStart = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
- vOutStart->Resize(80,22);
- fH2->AddFrame(vOutStart, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "V (max):");
- fH2->AddFrame(lab, f0center2d);
- vOutStop = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
- vOutStop->Resize(80,22);
- fH2->AddFrame(vOutStop, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "V (step):");
- fH2->AddFrame(lab, f0center2d);
- vOutStep = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
- vOutStep->Resize(80,22);
- fH2->AddFrame(vOutStep, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fV1->AddFrame(fG1, f1);
- // Left pane (Bias voltage controls)
- fH1->AddFrame(fV1, f0);
-
- // Right pane (Table position controls)
- subgroup[0] = 3*subwin[0]/5-12;
- fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1], kFixedWidth | kFixedHeight);
- fG1 = new TGGroupFrame(fV1, "Table position controls");
-
- // X, Y and Z positions
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "X:");
- fH2->AddFrame(lab, f0center2d);
- xPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- xPos->Resize(80,22);
- fH2->AddFrame(xPos, f0center2d);
-
- lab = new TGLabel(fH2, "Z (min):");
- fH2->AddFrame(lab, f0center2d);
- zPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
- zPosMin->Resize(80,22);
- fH2->AddFrame(zPosMin, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Y:");
- fH2->AddFrame(lab, f0center2d);
- yPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- yPos->Resize(80,22);
- fH2->AddFrame(yPos, f0center2d);
-
- lab = new TGLabel(fH2, "Z (max):");
- fH2->AddFrame(lab, f0center2d);
- zPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
- zPosMax->Resize(80,22);
- fH2->AddFrame(zPosMax, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0] ,30);
- lab = new TGLabel(fH2, "Z:");
- fH2->AddFrame(lab, f0center2d);
- zPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
- zPos->Resize(80,22);
- fH2->AddFrame(zPos, f0center2d);
-
- lab = new TGLabel(fH2, "Z (step):");
- fH2->AddFrame(lab, f0center2d);
- zPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
- zPosStep->Resize(80,22);
- fH2->AddFrame(zPosStep, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- // Set, Get and Home the table position
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH3 = new TGHorizontalFrame(fH2, subgroup[0], 30);
- positionSet = new TGTextButton(fH3, "Set");
- positionSet->SetTextJustify(36);
- positionSet->SetWrapLength(-1);
- positionSet->Resize(60,22);
- fH3->AddFrame(positionSet, f0);
- positionGet = new TGTextButton(fH3, "Get");
- positionGet->SetTextJustify(36);
- positionGet->SetWrapLength(-1);
- positionGet->Resize(60,22);
- fH3->AddFrame(positionGet, f0);
- positionHome = new TGTextButton(fH3, "Home");
- positionHome->SetTextJustify(36);
- positionHome->SetWrapLength(-1);
- positionHome->Resize(60,22);
- fH3->AddFrame(positionHome, f0);
- fH2->AddFrame(fH3, f0centerx);
- fG1->AddFrame(fH2, f2);
-
- // Position scan controls
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "X (min):");
- fH2->AddFrame(lab, f0center2d);
- xPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- xPosMin->Resize(80,22);
- fH2->AddFrame(xPosMin, f0center2d);
-
- lab = new TGLabel(fH2, "Y (min):");
- fH2->AddFrame(lab, f0center2d);
- yPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- yPosMin->Resize(80,22);
- fH2->AddFrame(yPosMin, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "X (max):");
- fH2->AddFrame(lab, f0center2d);
- xPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- xPosMax->Resize(80,22);
- fH2->AddFrame(xPosMax, f0center2d);
-
- lab = new TGLabel(fH2, "Y (max):");
- fH2->AddFrame(lab, f0center2d);
- yPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
- yPosMax->Resize(80,22);
- fH2->AddFrame(yPosMax, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "X (step):");
- fH2->AddFrame(lab, f0center2d);
- xPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
- xPosStep->Resize(80,22);
- fH2->AddFrame(xPosStep, f0center2d);
-
- lab = new TGLabel(fH2, "Y (step):");
- fH2->AddFrame(lab, f0center2d);
- yPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
- yPosStep->Resize(80,22);
- fH2->AddFrame(yPosStep, f0center2d);
- fG1->AddFrame(fH2, f2);
-
- fV1->AddFrame(fG1, f1);
- // Right pane (Table position controls)
- fH1->AddFrame(fV1, f0);
- fT1->AddFrame(fH1, f1);
-
- // Waveform tab
- fT1 = setTab->AddTab("Waveform analysis");
- fH1 = new TGHorizontalFrame(fT1, subwin[0], subgroup[1], kFixedHeight);
- subgroup[0] = 1*subwin[0]/2-12;
- fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1]/3, kFixedWidth);
-
- fG1 = new TGGroupFrame(fV1, "Acquisition channel");
-
- // Selection of channels
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 100);
- sCH[0] = new TGCheckButton(fH2, "CH1");
- sCH[0]->Resize(50,22);
- sCH[0]->SetState(kButtonUp);
- fH2->AddFrame(sCH[0], f0centerx);
- sCH[1] = new TGCheckButton(fH2, "CH2");
- sCH[1]->Resize(50,22);
- sCH[1]->SetState(kButtonUp);
- fH2->AddFrame(sCH[1], f0centerx);
- sCH[2] = new TGCheckButton(fH2, "CH3");
- sCH[2]->Resize(50,22);
- sCH[2]->SetState(kButtonUp);
- fH2->AddFrame(sCH[2], f0centerx);
- sCH[3] = new TGCheckButton(fH2, "CH4");
- sCH[3]->Resize(50,22);
- sCH[3]->SetState(kButtonUp);
- fH2->AddFrame(sCH[3], f0centerx);
- fG1->AddFrame(fH2, f0centerx);
-
- // Selection of MATH channels
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 100);
- sCH[4] = new TGCheckButton(fH2, "MATH1");
- sCH[4]->Resize(50,22);
- sCH[4]->SetState(kButtonUp);
- fH2->AddFrame(sCH[4], f0centerx);
- sCH[5] = new TGCheckButton(fH2, "MATH2");
- sCH[5]->Resize(50,22);
- sCH[5]->SetState(kButtonUp);
- fH2->AddFrame(sCH[5], f0centerx);
- sCH[6] = new TGCheckButton(fH2, "MATH3");
- sCH[6]->Resize(50,22);
- sCH[6]->SetState(kButtonUp);
- fH2->AddFrame(sCH[6], f0centerx);
- sCH[7] = new TGCheckButton(fH2, "MATH4");
- sCH[7]->Resize(50,22);
- sCH[7]->SetState(kButtonUp);
- fH2->AddFrame(sCH[7], f0centerx);
- fG1->AddFrame(fH2, f0centerx);
-
- fV1->AddFrame(fG1, f2);
-
- // Selection of measurement type
- fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Scope use type:");
- fH2->AddFrame(lab, f0center2d);
- sMeasType = new TGComboBox(fH2, 200);
- sMeasType->AddEntry("No waveform analysis", 0);
- sMeasType->AddEntry("Waveform acquisition", 1);
- sMeasType->AddEntry("Measurement", 2);
- sMeasType->Resize(150,22);
- sMeasType->Select(0);
- fH2->AddFrame(sMeasType, f0center2d);
- fV1->AddFrame(fH2, f2);
-
- // Link waveform analysis to CAMAC acquisition
- sCamaclink = new TGCheckButton(fV1, "Link waveform to CAMAC acquisition");
- sCamaclink->Resize(200,22);
- sCamaclink->SetState(kButtonUp);
- fV1->AddFrame(sCamaclink, f0centerx);
-
- // Custom command interface for the scope
- lab = new TGLabel(fV1, "Custom scope command:");
- fV1->AddFrame(lab, new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,10,2) );
- fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
- scopeCommand = new TGTextEntry(fH2, "");
- scopeCommand->Resize(subgroup[0]-45,22);
- fH2->AddFrame(scopeCommand, f2);
- sendScopeCustom = new TGTextButton(fH2, "Send");
- sendScopeCustom->SetTextJustify(36);
- sendScopeCustom->SetWrapLength(-1);
- sendScopeCustom->Resize(80,22);
- fH2->AddFrame(sendScopeCustom, f0centery);
- fV1->AddFrame(fH2, f0);
-
- // Return value for custom scope command
- lab = new TGLabel(fV1, "Return:");
- fV1->AddFrame(lab, new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,10,2) );
- scopeReturn = new TGTextEntry(fV1, "");
- scopeReturn->Resize(subgroup[0],22);
- fV1->AddFrame(scopeReturn, f2);
-
- fH1->AddFrame(fV1, f0);
-
- // Wave measurement type
- fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1]/3, kFixedWidth);
- fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Meas. type:");
- fH2->AddFrame(lab, f0center2d);
- sMeasgroup = new TGComboBox(fH2, 200);
- for(int i = 0; i < 11; i++)
- sMeasgroup->AddEntry(allMeasNames[i], i);
- sMeasgroup->Resize(150,22);
- sMeasgroup->Select(4);
- fH2->AddFrame(sMeasgroup, f0center2d);
- fV1->AddFrame(fH2, f2);
-
- // Initialize current acquisition settings
- scopeInit = new TGTextButton(fV1, "Initialize scope");
- scopeInit->SetTextJustify(36);
- scopeInit->SetWrapLength(-1);
- scopeInit->Resize(80,22);
- fV1->AddFrame(scopeInit, f0centerx);
-
- fH1->AddFrame(fV1, f0);
- fT1->AddFrame(fH1, f1);
-
- mdiFrame->AddFrame(setTab, f0);
-
- // Bottom pane (File controls)
- subgroup[0] = subwin[0]-20;
- subgroup[1] = subwin[1]/3-30; //2*(3*((winWidth/6)-5))/5+10;
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], subgroup[1] /*1*(3*((winWidth/6)-5))/5+15*/ , kFixedWidth | kFixedHeight);
- fG1 = new TGGroupFrame(fH1, "Event/Data file controls");
-
- // Number of events
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Number of events:");
- fH2->AddFrame(lab, f0centery);
- evtNum = new TGNumberEntry(fH2, 10000, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
- evtNum->Resize(80,22);
- fH2->AddFrame(evtNum, f0centery);
- fG1->AddFrame(fH2, f2);
-
- // Time stamp display
- fH2 = new TGHorizontalFrame(fG1,600,200);
- lab = new TGLabel(fH2, "Time stamp:");
- fH2->AddFrame(lab, f0centery);
- timeStamp = new TGTextEntry(fH2, "");
- timeStamp->Resize(440,22);
- timeStamp->SetState(kFALSE); // time stamp is read-only
- fH2->AddFrame(timeStamp, f0centery);
- fG1->AddFrame(fH2, f2);
-
- // Save to file
- fH2 = new TGHorizontalFrame(fG1,600,200);
- lab = new TGLabel(fH2, "Save to file:");
- fH2->AddFrame(lab, f0centery);
- char *cTemp;
- cTemp = new char[256];
- sprintf(cTemp, "./results/test%s", histExt);
- fileName = new TGTextEntry(fH2, cTemp);
- delete[] cTemp;
- fileName->Resize(400,22);
- fileName->SetState(kFALSE);
- fH2->AddFrame(fileName, f0centery);
- saveFile = new TGTextButton(fH2, "...");
- saveFile->SetTextJustify(36);
- saveFile->SetWrapLength(-1);
- saveFile->Resize(80,22);
- fH2->AddFrame(saveFile, f0centery);
-// mdiFrame->AddFrame(fH2, f0);
- fG1->AddFrame(fH2, f2);
- fH1->AddFrame(fG1, f1);
- // Bottom pane (File controls)
- mdiFrame->AddFrame(fH1, f0);
-
- subgroup[0] = subwin[0]-70;
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- fH2 = new TGHorizontalFrame(fH1, 3*subgroup[0]/4, 30, kFixedWidth);
- measStart = new TGTextButton(fH2, "Start acquisition");
- measStart->SetTextJustify(36);
- measStart->SetWrapLength(-1);
- measStart->Resize(80,22);
- fH2->AddFrame(measStart, f0center2d);
-
- ULong_t fcolor;
- gClient->GetColorByName("red", fcolor);
-
- busyLabel = new TGLabel(fH2, "Busy"); //, fTextGC->GetGC(), labelfont, kChildFrame);
- busyLabel->SetTextJustify(36);
- busyLabel->Resize(80,22);
- busyLabel->Disable();
- busyLabel->SetTextColor(fcolor);
- fH2->AddFrame(busyLabel, f0center2d);
-
- curProgress = new TGHProgressBar(fH2, TGProgressBar::kStandard, 150);
- curProgress->ShowPosition();
- curProgress->SetRange(0,100);
- curProgress->SetBarColor("green");
- fH2->AddFrame(curProgress, f0center2d);
- fH1->AddFrame(fH2, f0centerx);
- mdiFrame->AddFrame(fH1, f2);
-
- mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize);
- mdiFrame->SetWindowName("Main measurement window");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move((winWidth/6),0);
-// Main window -----------------------------------------------------------------------------
-
-// Histogram pane --------------------------------------------------------------------------
- subwin[0] = 2*((winWidth/6)-5); subwin[1] = (int)(2.5*((winHeight/5)-5))-5;
- histogramPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = histogramPane->GetMdiFrame();
-
- histCanvas = new TRootEmbeddedCanvas("histCanvas",mdiFrame,900,900);
- mdiFrame->AddFrame(histCanvas, f1);
- TCanvas *gCanvas = histCanvas->GetCanvas();
- gCanvas->SetGridx();
- gCanvas->SetGridy();
-
- mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize);
- mdiFrame->SetWindowName("Histogram");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(4*((winWidth/6)-5)+10,0);
-// Histogram pane --------------------------------------------------------------------------
-
-// Histogram file selection pane -----------------------------------------------------------
- subwin[0] = 4*((winWidth/6)-5); subwin[1] = 2*((winHeight/5)-5)+15;
- histogramPaneFile = new TGMdiSubwindow(fMainFrame, subwin[0]+5, subwin[1]);
- mdiFrame = histogramPaneFile->GetMdiFrame();
-
- // Open browser for file selection
- subgroup[0] = subwin[0]-10;
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- lab = new TGLabel(fH1, "File selection:");
- fH1->AddFrame(lab, f0centery);
-
- selectDir = new TGTextButton(fH1, "...");
- selectDir->SetTextJustify(36);
- selectDir->SetWrapLength(-1);
- selectDir->Resize(80,22);
- fH1->AddFrame(selectDir, f0centery);
- mdiFrame->AddFrame(fH1, f2);
-
- // List view of the opened files
- fileList = new TGListBox(mdiFrame,1);
- fileList->GetVScrollbar();
- fileList->Resize(300, (3*subwin[1]/7)-10 );
- mdiFrame->AddFrame(fileList, f2);
-
- // Multiple file selection toggle, previous/next controls, clear list and edit header
- fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
- multiSelect = new TGCheckButton(fH1, "Multiple file select");
- multiSelect->Resize(50,22);
- multiSelect->SetState(kButtonUp);
- fH1->AddFrame(multiSelect, f0);
-
- multiSelectAll = new TGCheckButton(fH1, "Select all listed files");
- multiSelectAll->Resize(50,22);
- multiSelectAll->SetState(kButtonUp);
- fH1->AddFrame(multiSelectAll, f0);
-
- TGTextButton *clearList = new TGTextButton(fH1, "Clear list");
- clearList->SetTextJustify(36);
- clearList->SetWrapLength(-1);
- clearList->Resize(80,22);
- fH1->AddFrame(clearList, f0right);
-
- TGTextButton *editHeader = new TGTextButton(fH1, "Edit header");
- editHeader->SetTextJustify(36);
- editHeader->SetWrapLength(-1);
- editHeader->Resize(80,22);
- fH1->AddFrame(editHeader, f0right);
-
- nextFile = new TGTextButton(fH1, ">>");
- nextFile->SetTextJustify(36);
- nextFile->SetWrapLength(-1);
- nextFile->Resize(80,22);
- fH1->AddFrame(nextFile, f0right);
-
- prevFile = new TGTextButton(fH1, "<<");
- prevFile->SetTextJustify(36);
- prevFile->SetWrapLength(-1);
- prevFile->Resize(80,22);
- fH1->AddFrame(prevFile, f0right);
- mdiFrame->AddFrame(fH1, f2);
-
- // Header information of opened file
- fG1 = new TGGroupFrame(mdiFrame, "Opened file header information");
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Time:");
- fH1->AddFrame(lab, f0centery);
- disptime = new TGTextEntry(fH1, "");
- disptime->Resize(440,22);
- disptime->SetState(kFALSE);
- fH1->AddFrame(disptime, f0centery);
- fG1->AddFrame(fH1, f2);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Bias voltage:");
- fH1->AddFrame(lab, f0centery);
- dispbias = new TGNumberEntry(fH1, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
- dispbias->Resize(80,22);
- dispbias->SetState(kFALSE);
- fH1->AddFrame(dispbias, f0centery);
-
- lab = new TGLabel(fH1, "Position:");
- fH1->AddFrame(lab, f0centery);
- disppos = new TGTextEntry(fH1, "");
- disppos->Resize(200,22);
- disppos->SetState(kFALSE);
- fH1->AddFrame(disppos, f0centery);
-
- lab = new TGLabel(fH1, "Temperature:");
- fH1->AddFrame(lab, f0centery);
- disptemp = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- disptemp->Resize(80,22);
- disptemp->SetState(kFALSE);
- fH1->AddFrame(disptemp, f0centery);
-
- lab = new TGLabel(fH1, "Angle:");
- fH1->AddFrame(lab, f0centery);
- dispangle = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- dispangle->Resize(80,22);
- dispangle->SetState(kFALSE);
- fH1->AddFrame(dispangle, f0centery);
- fG1->AddFrame(fH1, f2);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Laser settings:");
- fH1->AddFrame(lab, f0centery);
- displaser = new TGTextEntry(fH1, "");
- displaser->Resize(440,22);
- displaser->SetState(kFALSE);
- fH1->AddFrame(displaser, f0centery);
- fG1->AddFrame(fH1, f2);
- mdiFrame->AddFrame(fG1, f2);
-
- mdiFrame->SetMdiHints(kMdiMinimize);
- mdiFrame->SetWindowName("Histogram file selection");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(0,3*((winHeight/5)-5)-5);
-// Histogram file selection pane -----------------------------------------------------------
-
-// Histogram controls pane -----------------------------------------------------------------
- subwin[0] = 2*((winWidth/6)-5); subwin[1] = (int)(2.5*((winHeight/5)-5))+10;
- histogramPaneCtr = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = histogramPaneCtr->GetMdiFrame();
-
- // Control for histogram X range
- subgroup[0] = subwin[0]-6;
- fG1 = new TGGroupFrame(mdiFrame, "Histogram display");
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "ADC range (min, max):");
- fH1->AddFrame(lab, f0centery);
- adcMinRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
- adcMinRange->Resize(80,22);
- fH1->AddFrame(adcMinRange, f0centery);
- adcMaxRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
- adcMaxRange->Resize(80,22);
- fH1->AddFrame(adcMaxRange, f0centery);
- fG1->AddFrame(fH1, f2);
-
- // TDC window for getting data
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "TDC range (min, max):");
- fH1->AddFrame(lab, f0centery);
- tdcMinwindow = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEAAnyNumber);
- tdcMinwindow->Resize(80,22);
- fH1->AddFrame(tdcMinwindow, f0centery);
- tdcMaxwindow = new TGNumberEntry(fH1, 221.8, 6, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEAAnyNumber);
- tdcMaxwindow->Resize(80,22);
- fH1->AddFrame(tdcMaxwindow, f0centery);
- fG1->AddFrame(fH1, f2);
-
- // Y axis range settings
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Y range (min, max):");
- fH1->AddFrame(lab, f0centery);
- yMinRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- yMinRange->Resize(80,22);
- fH1->AddFrame(yMinRange, f0centery);
- yMaxRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- yMaxRange->Resize(80,22);
- fH1->AddFrame(yMaxRange, f0centery);
- fG1->AddFrame(fH1, f2);
-
- // Select the channel to display
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Display channel:");
- fH1->AddFrame(lab, f0centery);
- selectCh = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 0, (NCH->GetNumber())-1);
- selectCh->Resize(40,22);
- fH1->AddFrame(selectCh, f0centery);
-
- changeADC = new TGTextButton(fH1, "ADC");
- changeADC->AllowStayDown(kTRUE);
- changeADC->SetDown(kTRUE);
- fMenuHisttype->CheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
- changeADC->SetTextJustify(36);
- changeADC->SetWrapLength(-1);
- changeADC->Resize(60,22);
- fH1->AddFrame(changeADC, f0centery);
-
- changeTDC = new TGTextButton(fH1, "TDC");
- changeTDC->AllowStayDown(kTRUE);
- changeTDC->SetTextJustify(36);
- changeTDC->SetWrapLength(-1);
- changeTDC->Resize(60,22);
- fH1->AddFrame(changeTDC, f0centery);
-
- changeADCTDC = new TGTextButton(fH1, "ADC/TDC");
- changeADCTDC->AllowStayDown(kTRUE);
- changeADCTDC->SetTextJustify(36);
- changeADCTDC->SetWrapLength(-1);
- changeADCTDC->Resize(60,22);
- fH1->AddFrame(changeADCTDC, f0centery);
-
- change2Dsurf = new TGTextButton(fH1, "Surf 2D");
- change2Dsurf->AllowStayDown(kTRUE);
- change2Dsurf->SetTextJustify(36);
- change2Dsurf->SetWrapLength(-1);
- change2Dsurf->Resize(60,22);
- fH1->AddFrame(change2Dsurf, f0);
- fG1->AddFrame(fH1, f2);
-
- logscale = new TGCheckButton(fG1, "Logarithmic scale ON/OFF");
- logscale->Resize(50,22);
- logscale->SetState(kButtonUp);
- fG1->AddFrame(logscale, f0centerx);
-
- // Export the selected files
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 100);
- fH2 = new TGHorizontalFrame(fH1, subgroup[0], 100);
- lab = new TGLabel(fH2, "Export selected histograms:");
- fH2->AddFrame(lab, f0centery);
-
- exportHist = new TGTextButton(fH2, "Export");
- exportHist->SetTextJustify(36);
- exportHist->SetWrapLength(-1);
- exportHist->Resize(80,22);
- fH2->AddFrame(exportHist, f0centery);
- fH1->AddFrame(fH2, f0centerx);
- fG1->AddFrame(fH1, f2);
- mdiFrame->AddFrame(fG1, f2);
-
- // Fitting controls for ADC spectrum
- fG1 = new TGGroupFrame(mdiFrame, "Fit Settings");
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Peak sigma:");
- fH2->AddFrame(lab, f0centery);
- fitSigma = new TGNumberEntry(fH2, 1.2, 3, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEANonNegative);
- fitSigma->Resize(60,22);
- fH2->AddFrame(fitSigma, f0centery);
-
- lab = new TGLabel(fH2, " Signal/Noise treshold:");
- fH2->AddFrame(lab, f0centery);
- fitTresh = new TGNumberEntry(fH2, 5.0E-3, 3, 999, TGNumberFormat::kNESReal, TGNumberFormat::kNEANonNegative);
- fitTresh->Resize(60,22);
- fH2->AddFrame(fitTresh, f0centery);
- fH1->AddFrame(fH2, f0centerx);
- fG1->AddFrame(fH1, f2);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Background interpolation:");
- fH2->AddFrame(lab, f0centery);
- fitInter = new TGNumberEntry(fH2, 7, 3, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
- fitInter->Resize(60,22);
- fH2->AddFrame(fitInter, f0centery);
- fH1->AddFrame(fH2, f0centerx);
- fG1->AddFrame(fH1, f2);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Peak fit max. acceptable error:");
- fH2->AddFrame(lab, f0centery);
- accError = new TGNumberEntry(fH2, 0.15, 3, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEANonNegative);
- accError->Resize(60,22);
- fH2->AddFrame(accError, f0centery);
- fH1->AddFrame(fH2, f0centerx);
- fG1->AddFrame(fH1, f2);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
- lab = new TGLabel(fH2, "Peak min. limit:");
- fH2->AddFrame(lab, f0centery);
- minPeak = new TGNumberEntry(fH2, 4, 3, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 2, 20);
- minPeak->Resize(50,22);
- fH2->AddFrame(minPeak, f0centery);
-
- lab = new TGLabel(fH2, " Pedestal lower limit:");
- fH2->AddFrame(lab, f0centery);
- pedesLow = new TGNumberEntry(fH2, 0.00, 3, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEANonNegative);
- pedesLow->Resize(60,22);
- fH2->AddFrame(pedesLow, f0centery);
- fH1->AddFrame(fH2, f0centerx);
- fG1->AddFrame(fH1, f2);
-
- exfitplots = new TGCheckButton(fG1, "Export fitting plots ON/OFF");
- exfitplots->Resize(50,22);
- exfitplots->SetState(kButtonUp);
- fG1->AddFrame(exfitplots, f0centerx);
- mdiFrame->AddFrame(fG1, f2);
-
- mdiFrame->SetMdiHints(kMdiMinimize);
- mdiFrame->SetWindowName("Histogram controls");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(4*((winWidth/6)-5)+10,(int)(2.5*((winHeight/5)-5)));
-// Histogram controls pane -----------------------------------------------------------------
-
- // Action connections
- voltscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableVoltScan()");
- surfscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableSurfScan()");
- zscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableZaxisScan()");
-// histogramOn->Connect("Clicked()", "TGAppMainFrame", this, "HistogramToggle()");
- vHardlimit->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "VoltageLimit()");
- (vHardlimit->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "VoltageLimit()");
- NCH->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "ChannelLimit()");
- (NCH->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "ChannelLimit()");
- cleanOn->Connect("Clicked()", "TGAppMainFrame", this, "CleanPlotToggle()");
- oscConnect->Connect("Clicked()", "TGAppMainFrame", this, "ConnectToScope()");
- vOutSet->Connect("Clicked()", "TGAppMainFrame", this, "SetVoltOut()");
- vOutGet->Connect("Clicked()", "TGAppMainFrame", this, "GetVoltOut()");
- vOutReset->Connect("Clicked()", "TGAppMainFrame", this, "ResetVoltOut()");
- positionSet->Connect("Clicked()", "TGAppMainFrame", this, "SetPosition()");
- positionGet->Connect("Clicked()", "TGAppMainFrame", this, "GetPosition()");
- positionHome->Connect("Clicked()", "TGAppMainFrame", this, "HomePosition()");
- saveFile->Connect("Clicked()", "TGAppMainFrame", this, "SaveFile()");
- measStart->Connect("Clicked()", "TGAppMainFrame", this, "StartAcq()");
- selectDir->Connect("Clicked()", "TGAppMainFrame", this, "SelectDirectory()");
- multiSelect->Connect("Clicked()", "TGAppMainFrame", this, "ListMultiSelect()");
- multiSelectAll->Connect("Clicked()", "TGAppMainFrame", this, "ListSelectAll()");
- editHeader->Connect("Clicked()", "TGAppMainFrame", this, "HeaderEdit()");
- prevFile->Connect("Clicked()", "TGAppMainFrame", this, "FileListNavigation(=-2)");
- nextFile->Connect("Clicked()", "TGAppMainFrame", this, "FileListNavigation(=-3)");
- fileList->Connect("DoubleClicked(Int_t)", "TGAppMainFrame", this, "FileListNavigation(Int_t)");
- clearList->Connect("Clicked()", "TGListBox", fileList, "RemoveAll()");
-
- adcMinRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (adcMinRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- adcMaxRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (adcMaxRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- yMinRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (yMinRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- yMaxRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (yMaxRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- tdcMinwindow->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (tdcMinwindow->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- tdcMaxwindow->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
- (tdcMaxwindow->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
- changeADC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=0)");
- changeTDC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=1)");
- changeADCTDC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=2)");
- change2Dsurf->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=3)");
- selectCh->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "ChangeChannel()");
- (selectCh->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "ChangeChannel()");
- logscale->Connect("Clicked()", "TGAppMainFrame", this, "SetHistRange()");
- exportHist->Connect("Clicked()", "TGAppMainFrame", this, "HistogramExport()");
-
- scopeInit->Connect("Clicked()", "TGAppMainFrame", this, "InitializeScope()");
- sendScopeCustom->Connect("Clicked()", "TGAppMainFrame", this, "CustomScopeCommand()");
- sMeasType->Connect("Selected(Int_t)", "TGAppMainFrame", this, "SelectedMeasType(Int_t)");
-
- started = kFALSE;
-
- for(int i = 0; i < 8; i++) sCH[i]->SetEnabled(kFALSE);
- sMeasType->SetEnabled(kFALSE);
- sCamaclink->SetEnabled(kFALSE);
- scopeCommand->SetEnabled(kFALSE);
- sendScopeCustom->SetEnabled(kFALSE);
- sMeasgroup->SetEnabled(kFALSE);
- scopeInit->SetEnabled(kFALSE);
-
- EnableVoltScan();
- EnableSurfScan();
- EnableZaxisScan();
-
- // Testing canvas for scope waveforms
- wCanvas = new TCanvas("wCanvas", "Waveform canvas", 600, 300);
-}
-
-//---------------------------------------------------------------
-// Opening a new subwindow
-
-void TGAppMainFrame::OpenWindow(int winid)
-{
- /* WinID:
- * - 1 = fieldpoint temperature sensor
- * - 2 = file header editor
- */
-
- TGMdiFrame *mdiFrame;
-
- // Generic horizontal and vertical frames
- TGHorizontalFrame *fH1, *fH2;
- TGGroupFrame *fG1;
- TGLabel *lab;
-
- int subwin[2];
- int subgroup[2];
-
- char ctemp[256];
-
-// Fieldpoint pane -------------------------------------------------------------------------
- if(winid == 1)
- {
- time_t rtime;
- int yearrange[2];
-
- subwin[0] = 3*((winWidth/4)-5); subwin[1] = (int)(2*((winHeight/3)-5))+10;
- fieldpointPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = fieldpointPane->GetMdiFrame();
-
- subgroup[0] = subwin[0]-10;
- subgroup[1] = 7*subwin[1]/12;
-
- // Display canvas for temperature sensor
- displayCanvas = new TRootEmbeddedCanvas("displayCanvas",mdiFrame,subgroup[0],subgroup[1]);
- mdiFrame->AddFrame(displayCanvas, f0centerx);
- TCanvas *gCanvas = displayCanvas->GetCanvas();
- gCanvas->SetGridx();
- gCanvas->SetGridy();
-
- fG1 = new TGGroupFrame(mdiFrame, "Temperature sensor settings");
- // Channel selector
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- lab = new TGLabel(fH1, "Fieldpoint channel:");
- fH1->AddFrame(lab, f0centery);
- tempCh = new TGComboBox(fH1, 200);
- tempCh->AddEntry("0", 0);
- tempCh->AddEntry("1", 1);
- tempCh->AddEntry("2", 2);
- tempCh->AddEntry("3", 3);
- tempCh->AddEntry("4", 4);
- tempCh->AddEntry("5", 5);
- tempCh->AddEntry("6", 6);
- tempCh->AddEntry("7", 7);
- tempCh->Resize(50,22);
- tempCh->Select(1);
- fH1->AddFrame(tempCh, f0centery);
- fG1->AddFrame(fH1, f2);
-
- // Start and stop time ------------------------
- time(&rtime);
-
- lab = new TGLabel(fG1, "Start time:");
- fG1->AddFrame(lab, f0);
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- // Start day
- lab = new TGLabel(fH1, "\tDay: ");
- fH1->AddFrame(lab, f0centery);
- tempDay[0] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 31; i++)
- {
- sprintf(ctemp, "%d", i+1);
- tempDay[0]->AddEntry(ctemp, i);
- }
- tempDay[0]->Resize(50,22);
- tempDay[0]->Select((int)(localtime(&rtime))->tm_mday-1);
- fH1->AddFrame(tempDay[0], f0centery);
-
- // Start month
- lab = new TGLabel(fH1, " Month: ");
- fH1->AddFrame(lab, f0centery);
- tempMonth[0] = new TGComboBox(fH1, 200);
- tempMonth[0]->AddEntry("January", 0);
- tempMonth[0]->AddEntry("February", 1);
- tempMonth[0]->AddEntry("March", 2);
- tempMonth[0]->AddEntry("April", 3);
- tempMonth[0]->AddEntry("May", 4);
- tempMonth[0]->AddEntry("June", 5);
- tempMonth[0]->AddEntry("July", 6);
- tempMonth[0]->AddEntry("August", 7);
- tempMonth[0]->AddEntry("September", 8);
- tempMonth[0]->AddEntry("October", 9);
- tempMonth[0]->AddEntry("November", 10);
- tempMonth[0]->AddEntry("December", 11);
- tempMonth[0]->Resize(80,22);
- tempMonth[0]->Select((int)(localtime(&rtime))->tm_mon);
- fH1->AddFrame(tempMonth[0], f0centery);
-
- // Start year
- yearrange[0] = 2010;
- yearrange[1] = (int)(localtime(&rtime))->tm_year+1900;
-
- lab = new TGLabel(fH1, " Year: ");
- fH1->AddFrame(lab, f0centery);
- tempYear[0] = new TGComboBox(fH1, 200);
- for(int i = 0; i < (yearrange[1]-yearrange[0])+1; i++)
- {
- sprintf(ctemp, "%d", yearrange[1]-i);
- tempYear[0]->AddEntry(ctemp, i);
- }
- tempYear[0]->Resize(60,22);
- tempYear[0]->Select(0);
- fH1->AddFrame(tempYear[0], f0centery);
-
- // Start hour
- lab = new TGLabel(fH1, " Hour: ");
- fH1->AddFrame(lab, f0centery);
- tempHour[0] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 24; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempHour[0]->AddEntry(ctemp, i);
- }
- tempHour[0]->Resize(50,22);
- tempHour[0]->Select(7);
- fH1->AddFrame(tempHour[0], f0centery);
-
- // Start minute
- lab = new TGLabel(fH1, " Minute: ");
- fH1->AddFrame(lab, f0centery);
- tempMinute[0] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 60; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempMinute[0]->AddEntry(ctemp, i);
- }
- tempMinute[0]->Resize(50,22);
- tempMinute[0]->Select(0);
- fH1->AddFrame(tempMinute[0], f0centery);
-
- // Start second
- lab = new TGLabel(fH1, " Second: ");
- fH1->AddFrame(lab, f0centery);
- tempSecond[0] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 60; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempSecond[0]->AddEntry(ctemp, i);
- }
- tempSecond[0]->Resize(50,22);
- tempSecond[0]->Select(0);
- fH1->AddFrame(tempSecond[0], f0centery);
-
- // Get start time from file
- lab = new TGLabel(fH1, " ");
- fH1->AddFrame(lab, f0centery);
- tempFile[0] = new TGTextButton(fH1, "Get from file...");
- tempFile[0]->SetTextJustify(36);
- tempFile[0]->SetWrapLength(-1);
- tempFile[0]->Resize(100,22);
- fH1->AddFrame(tempFile[0], f0centery);
-
- fG1->AddFrame(fH1, f2);
-
- // Use the end time or not
- tempEndOn = new TGCheckButton(fG1, "Draw to last time point (ON/OFF)");
- tempEndOn->Resize(100,22);
- tempEndOn->SetState(kButtonUp);
- fG1->AddFrame(tempEndOn, f0);
-
- lab = new TGLabel(fG1, "End time:");
- fG1->AddFrame(lab, f0);
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- // End day
- lab = new TGLabel(fH1, "\tDay: ");
- fH1->AddFrame(lab, f0centery);
- tempDay[1] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 31; i++)
- {
- sprintf(ctemp, "%d", i+1);
- tempDay[1]->AddEntry(ctemp, i);
- }
- tempDay[1]->Resize(50,22);
- tempDay[1]->Select((int)(localtime(&rtime))->tm_mday-1);
- fH1->AddFrame(tempDay[1], f0centery);
-
- // End month
- lab = new TGLabel(fH1, " Month: ");
- fH1->AddFrame(lab, f0centery);
- tempMonth[1] = new TGComboBox(fH1, 200);
- tempMonth[1]->AddEntry("January", 0);
- tempMonth[1]->AddEntry("February", 1);
- tempMonth[1]->AddEntry("March", 2);
- tempMonth[1]->AddEntry("April", 3);
- tempMonth[1]->AddEntry("May", 4);
- tempMonth[1]->AddEntry("June", 5);
- tempMonth[1]->AddEntry("July", 6);
- tempMonth[1]->AddEntry("August", 7);
- tempMonth[1]->AddEntry("September", 8);
- tempMonth[1]->AddEntry("October", 9);
- tempMonth[1]->AddEntry("November", 10);
- tempMonth[1]->AddEntry("December", 11);
- tempMonth[1]->Resize(80,22);
- tempMonth[1]->Select((int)(localtime(&rtime))->tm_mon);
- fH1->AddFrame(tempMonth[1], f0centery);
-
- // End year
- time(&rtime);
- yearrange[0] = 2010;
- yearrange[1] = (int)(localtime(&rtime))->tm_year+1900;
-
- lab = new TGLabel(fH1, " Year: ");
- fH1->AddFrame(lab, f0centery);
- tempYear[1] = new TGComboBox(fH1, 200);
- for(int i = 0; i < (yearrange[1]-yearrange[0])+1; i++)
- {
- sprintf(ctemp, "%d", yearrange[1]-i);
- tempYear[1]->AddEntry(ctemp, i);
- }
- tempYear[1]->Resize(60,22);
- tempYear[1]->Select(0);
- fH1->AddFrame(tempYear[1], f0centery);
-
- // End hour
- lab = new TGLabel(fH1, " Hour: ");
- fH1->AddFrame(lab, f0centery);
- tempHour[1] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 24; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempHour[1]->AddEntry(ctemp, i);
- }
- tempHour[1]->Resize(50,22);
- tempHour[1]->Select(18);
- fH1->AddFrame(tempHour[1], f0centery);
-
- // End minute
- lab = new TGLabel(fH1, " Minute: ");
- fH1->AddFrame(lab, f0centery);
- tempMinute[1] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 60; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempMinute[1]->AddEntry(ctemp, i);
- }
- tempMinute[1]->Resize(50,22);
- tempMinute[1]->Select(0);
- fH1->AddFrame(tempMinute[1], f0centery);
-
- // End second
- lab = new TGLabel(fH1, " Second: ");
- fH1->AddFrame(lab, f0centery);
- tempSecond[1] = new TGComboBox(fH1, 200);
- for(int i = 0; i < 60; i++)
- {
- if(i < 10)
- sprintf(ctemp, "0%d", i);
- else
- sprintf(ctemp, "%d", i);
- tempSecond[1]->AddEntry(ctemp, i);
- }
- tempSecond[1]->Resize(50,22);
- tempSecond[1]->Select(0);
- fH1->AddFrame(tempSecond[1], f0centery);
-
- // Get start time from file
- lab = new TGLabel(fH1, " ");
- fH1->AddFrame(lab, f0centery);
- tempFile[1] = new TGTextButton(fH1, "Get from file...");
- tempFile[1]->SetTextJustify(36);
- tempFile[1]->SetWrapLength(-1);
- tempFile[1]->Resize(100,22);
- fH1->AddFrame(tempFile[1], f0centery);
-
- fG1->AddFrame(fH1, f2);
- // Start and stop time ------------------------
-
- // Control buttons
- fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- fH1 = new TGHorizontalFrame(fH2, subgroup[0], 30);
- updateTemp = new TGTextButton(fH1, "Update");
- updateTemp->SetTextJustify(36);
- updateTemp->SetWrapLength(-1);
- updateTemp->Resize(80,22);
- fH1->AddFrame(updateTemp, f0);
-
- exportTemp = new TGTextButton(fH1, "Export");
- exportTemp->SetTextJustify(36);
- exportTemp->SetWrapLength(-1);
- exportTemp->Resize(80,22);
- fH1->AddFrame(exportTemp, f0);
-
-/* closeTemp = new TGTextButton(fH1, "Close");
- closeTemp->SetTextJustify(36);
- closeTemp->SetWrapLength(-1);
- closeTemp->Resize(80,22);
- fH1->AddFrame(closeTemp, f0);*/
- fH2->AddFrame(fH1, f0centerx);
-
- fG1->AddFrame(fH2, f2);
-
- mdiFrame->AddFrame(fG1, f1);
-
- mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize | kMdiClose);
- mdiFrame->SetWindowName("Fieldpoint FP RTD 122 temperature sensor");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(1*((winWidth/12)-5)+10,(int)(1*((winHeight/12)-5)));
-
- // Action connections
- updateTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
- tempEndOn->Connect("Clicked()", "TGAppMainFrame", this, "TempEndToggle()");
- exportTemp->Connect("Clicked()", "TGAppMainFrame", this, "ExportTempPlot()");
- tempFile[0]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=0)");
- tempFile[1]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=1)");
-// closeTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
- }
-// Fieldpoint pane -------------------------------------------------------------------------
-//
-// Header editor pane ----------------------------------------------------------------------
- else if(winid == 2)
- {
- subwin[0] = 12*((winWidth/16)-5); subwin[1] = (int)(1*((winHeight/3)-10));
- headerPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
- mdiFrame = headerPane->GetMdiFrame();
-
- subgroup[0] = subwin[0]-10;
- subgroup[1] = 7*subwin[1]/12;
-
- // Changing header info (no timestamp change possible)
- fG1 = new TGGroupFrame(mdiFrame, "Header edit information");
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- biasedittick = new TGCheckButton(fH1, "Bias voltage edit: ");
- biasedittick->Resize(80,22);
- biasedittick->SetState(kButtonUp);
- fH1->AddFrame(biasedittick, f0centerx);
- biasedit = new TGNumberEntry(fH1, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEANonNegative);
- biasedit->Resize(80,22);
- biasedit->SetState(kFALSE);
- fH1->AddFrame(biasedit, f0centery);
- fG1->AddFrame(fH1, f0);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- posedittick = new TGCheckButton(fH1, "Table position edit (X, Y, Z): ");
- posedittick->Resize(80,22);
- posedittick->SetState(kButtonUp);
- fH1->AddFrame(posedittick, f0centerx);
- for(int i = 0; i < 3; i++)
- {
- posedit[i] = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
- posedit[i]->Resize(80,22);
- posedit[i]->SetState(kFALSE);
- fH1->AddFrame(posedit[i], f0centery);
- }
- fG1->AddFrame(fH1, f0);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- tempedittick = new TGCheckButton(fH1, "Chamber temperature edit: ");
- tempedittick->Resize(80,22);
- tempedittick->SetState(kButtonUp);
- fH1->AddFrame(tempedittick, f0centerx);
- tempedit = new TGNumberEntry(fH1, 0.00, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- tempedit->Resize(80,22);
- tempedit->SetState(kFALSE);
- fH1->AddFrame(tempedit, f0centery);
- fG1->AddFrame(fH1, f0);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- angleedittick = new TGCheckButton(fH1, "Incidence angle edit: ");
- angleedittick->Resize(80,22);
- angleedittick->SetState(kButtonUp);
- fH1->AddFrame(angleedittick, f0centerx);
- angleedit = new TGNumberEntry(fH1, 0.00, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
- angleedit->Resize(80,22);
- angleedit->SetState(kFALSE);
- fH1->AddFrame(angleedit, f0centery);
- fG1->AddFrame(fH1, f0);
-
- fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
- laseredittick = new TGCheckButton(fH1, "Laser settings edit: ");
- laseredittick->Resize(80,22);
- laseredittick->SetState(kButtonUp);
- fH1->AddFrame(laseredittick, f0centerx);
- laseredit = new TGTextEntry(fH1, "");
- laseredit->Resize(440,22);
- laseredit->SetState(kFALSE);
- fH1->AddFrame(laseredit, f0centery);
- fG1->AddFrame(fH1, f0);
-
- ULong_t fcolor;
- gClient->GetColorByName("red", fcolor);
-
- lab = new TGLabel(fG1, "Note: Tick checkbox in front of each header information you wish to change (for security, they are unticked by default).");
- fG1->AddFrame(lab, f0centerx);
- lab = new TGLabel(fG1, "Warning: Using button \"Edit header\" will edit headers in all files currently selected in the Histogram file selection window.");
- lab->SetTextColor(fcolor);
- fG1->AddFrame(lab, f0centerx);
-
- mdiFrame->AddFrame(fG1, f2);
-
- editHead = new TGTextButton(mdiFrame, "Edit header");
- editHead->SetTextJustify(36);
- editHead->SetWrapLength(-1);
- editHead->Resize(80,22);
- mdiFrame->AddFrame(editHead, f0centerx);
-
- mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize | kMdiClose);
- mdiFrame->SetWindowName("Edit datafile header");
- mdiFrame->MapSubwindows();
- mdiFrame->Layout();
- mdiFrame->Move(1*((winWidth/12)-5)-30,(int)(1*((winHeight/12)-5)));
-
- // Action connections
- biasedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=1)");
- posedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=2)");
- tempedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=3)");
- angleedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=4)");
- laseredittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=5)");
- editHead->Connect("Clicked()", "TGAppMainFrame", this, "headeredit()");
-/* updateTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
- tempEndOn->Connect("Clicked()", "TGAppMainFrame", this, "TempEndToggle()");
- exportTemp->Connect("Clicked()", "TGAppMainFrame", this, "ExportTempPlot()");
- tempFile[0]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=0)");
- tempFile[1]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=1)");
-*/ }
-// Header editor pane ----------------------------------------------------------------------
-//
- else
- printf("Window not implemented yet.\n");
-}
-
-//---------------------------------------------------------------
-// Closing the main application window and checking the about information
-
-void TGAppMainFrame::CloseWindow()
-{
- gApplication->Terminate(0);
-}
-
-Bool_t TGAppMainFrame::About()
-{
- int ret = 0;
-
- new TGMsgBox(gClient->GetRoot(), fMain,
- fMain->GetWindowName(), "This is an application.",
- kMBIconQuestion, kMBClose, &ret);
-
- if(debug == 1)
- if(ret == kMBClose)
- printf("Closing the About window (%d).\n", ret);
-
- return kFALSE;
-}
-
-//---------------------------------------------------------------
-// Subwindow constructor definition (& layout) and close subwindow action
-
-TGMdiSubwindow::TGMdiSubwindow(TGMdiMainFrame *main, int w, int h)
-{
- // Create a new subwindow
- fMdiFrame = new TGMdiFrame(main, w, h);
- fMdiFrame->Connect("CloseWindow()", "TGMdiSubwindow", this, "CloseWindow()"); // setting here to =0 -> will always ask before closing window
- fMdiFrame->DontCallClose(); // only let this window close if Yes is pressed when closing window
-
-}
-
-Bool_t TGMdiSubwindow::CloseWindow()
-{
-/* int ret = 0;
-
- new TGMsgBox(gClient->GetRoot(), fMdiFrame,
- fMdiFrame->GetWindowName(), "Really want to close the window?",
- kMBIconExclamation, kMBYes | kMBNo, &ret);
- if (ret == kMBYes) return fMdiFrame->CloseWindow();
-
- return kFALSE;*/
- return fMdiFrame->CloseWindow();
-}
-
-//---------------------------------------------------------------
-// Main function
-
-void windowed_test()
-{
- new TGAppMainFrame(gClient->GetRoot(), winWidth, winHeight);
-}
-
-//#ifdef STANDALONE
-int main(int argc, char **argv)
-{
- TApplication theApp("MdiTest", &argc, argv);
-
- windowed_test();
-
- theApp.Run();
-
- return 0;
-}
-//#endif
Index: sipmscan/trunk/vxi11_x86_64/README.txt
===================================================================
--- sipmscan/trunk/vxi11_x86_64/README.txt (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/README.txt (nonexistent)
@@ -1,98 +0,0 @@
-RPC PROTOCOL FOR COMMUNICATING WITH VXI11-ENABLED DEVICES OVER ETHERNET FROM LINUX
-==================================================================================
-(including instruments such as oscilloscopes, by manufacturers such as
-Agilent and Tektronix, amongst others).
-
-By Steve D. Sharples, June 2006.
-
-This is a collection of source code that will allow you to talk to ethernet-
-enabled instruments that use the VXI11 protocol, from Linux. This includes
-a wide range of instruments (including oscilloscopes, logic analysers,
-function generators etc) by a wide range of manufacturers (including
-Tektronix and Agilent to name just a couple). An interactive "send and
-receive" utility is included as an example.
-
-You may want to build on to this libraries for your specific instruments -
-I'm currently working on libraries for talking to Agilent Infiniium scopes,
-and will probably do the same for Tektronix scopes too. Basically if you've
-got a Programmer's Reference for your instrument, and this code, you should
-be able to cobble something together.
-
-This collection of code has been produced because I grew frustrated at how
-difficult it seemed to be to do a relatively simple task. None of the
-major manufacturers had any "out of the box" Linux solutions to talking to
-their instruments (although often I would talk to technical folks who would
-try their best to help). One of the solutions offered was to use something
-called NI VISA; parts of this are closed source, it was enormous, and I had
-worries about legacy issues with changing PC hardware.
-
-Via Guy McBride at Agilent, I obtained a copy of a vxi11.x RPC file similar
-to the one included here (although no-one at Agilent seemed to know or care
-where it came from). After lots of searching on the information superhighway
-I located what I believe is the original source (or something like it); see
-the section on vxi11.x below. This source seems to have literally been written
-from the published VXI11 protocol. I also received from Agilent a simple
-example program that showed you how to use the protocol; working from this
-and the (open) source that uses the vxi11.x that is included here, I wrote
-vxi11_cmd and the user libraries.
-
-This collection of source code consists of:
-
-(1) vxi11.x
-This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
-which are part of the asynDriver (R4-5) EPICS module, which, at time of
-writing, is available from:
-http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
-More general information about EPICS is available from:
-http://www.aps.anl.gov/epics/
-This code is open source, and is covered under the copyright notice and
-software license agreement shown below, and also at:
-http://www.aps.anl.gov/epics/license/open.php
-
-It is intended as a lightweight base for the vxi11 rpc protocol. If you
-run rpcgen on this file, it will generate C files and headers, from which
-it is relatively simple to write C programs to communicate with a range
-of ethernet-enabled instruments, such as oscilloscopes and function
-generators by manufacturers such as Agilent and Tektronix (amongst many
-others).
-
-(2) vxi11_user.cc (and vxi11_user.h)
-These are (fairly) friendly user libraries. At the core are 4 key functions:
-vxi11_open(), vxi11_close(), vxi11_send() and vxi11_receive(). These allow
-you to talk to your device. There are also some other functions that I
-considered to be generally useful (send_and_receive, functions for sending
-and receiving fixed length data blocks etc) that are all non-instrument-
-specific.
-
-(3) vxi11_cmd.c
-This is a fairly simple interactive utility that allows you to send
-commands and queries to your vxi11-enabled instrument, which you
-locate by way of IP address. I recommend you start with *IDN? It shows you
-how the vxi11_user library works
-
-(4) Makefile
-Type "make" to compile the source above. Type "make clean" to remove
-old object files and ./vxi11_cmd. Type "make install" to copy
-./vxi11_cmd to /usr/local/bin/
-
-(5) GNU_General_Public_License.txt
-Fairly obvious. All programs, source, readme files etc NOT covered by any
-other license (e.g. vxi11.x, which is covered by its own open source
-license) are covered by this license.
-
-These programs are free software; you can redistribute it and/or
-modify it under the terms of the GNU General Public License
-as published by the Free Software Foundation; either version 2
-of the License, or (at your option) any later version.
-
-These programs are distributed in the hope that they will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
-The author's email address is steve.no.spam.sharples@nottingham.ac.uk
-(you can work it out!)
Index: sipmscan/trunk/vxi11_x86_64/vxi11_user.h
===================================================================
--- sipmscan/trunk/vxi11_x86_64/vxi11_user.h (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/vxi11_user.h (nonexistent)
@@ -1,87 +0,0 @@
-/* vxi11_user.h
- * Copyright (C) 2006 Steve D. Sharples
- *
- * User library for opening, closing, sending to and receiving from
- * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
- * generated by rpcgen vxi11.x.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- * The author's email address is steve.sharples@nottingham.ac.uk
- */
-
-#ifndef __VXI11_USER__
-#define __VXI11_USER__
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <rpc/rpc.h>
-#include "vxi11.h"
-
-#define VXI11_DEFAULT_TIMEOUT 10000 /* in ms */
-#define VXI11_READ_TIMEOUT 2000 /* in ms */
-#define VXI11_CLIENT CLIENT
-#define VXI11_LINK Create_LinkResp
-#define VXI11_MAX_CLIENTS 256 /* maximum no of unique IP addresses/clients */
-#define VXI11_NULL_READ_RESP 50 /* vxi11_receive() return value if a query
- * times out ON THE INSTRUMENT (and so we have
- * to resend the query again) */
-#define VXI11_NULL_WRITE_RESP 51 /* vxi11_send() return value if a sent command
- * times out ON THE INSTURMENT. */
-
-struct CLINK {
- VXI11_CLIENT *client;
- VXI11_LINK *link;
- } ;
-typedef struct CLINK CLINK;
-
-/* The four main functions: open, close, send, receieve (plus a couple of wrappers) */
-/* In fact all 6 of these are wrappers to the original functions listed at the
- * bottom, that use separate CLIENT and VXI11_LINK structures. It was easier to
- * write wrappers for these functions than to re-write the original functions
- * themselves. These are the 4 (or 6 if you like) key user functions that you
- * should probably be using. They all use the CLINK structure. */
-int vxi11_open_device(const char *ip, CLINK *clink);
-int vxi11_open_device(const char *ip, CLINK *clink, char *device);
-int vxi11_close_device(const char *ip, CLINK *clink);
-int vxi11_send(CLINK *clink, const char *cmd);
-int vxi11_send(CLINK *clink, const char *cmd, unsigned long len);
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len);
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
-
-/* Utility functions, that use send() and receive(). Use these too. */
-int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len);
-long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
-long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout);
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout);
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout);
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd);
-double vxi11_obtain_double_value(CLINK *link, const char *cmd);
-
-/* When I first wrote this library I used separate client and links. I've
- * retained the original functions and just written clink wrappers for them
- * (see above) as it's perhaps a little clearer this way. Probably not worth
- * delving this deep in use, but it's where the real nitty gritty is. */
-int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
-int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
-int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link);
-int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link);
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd);
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len);
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len);
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout);
-
-#endif
Index: sipmscan/trunk/vxi11_x86_64/Makefile
===================================================================
--- sipmscan/trunk/vxi11_x86_64/Makefile (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/Makefile (nonexistent)
@@ -1,18 +0,0 @@
-VERSION=1.08
-
-#CFLAGS = -Wall -g
-CFLAGS = -g
-CXX = g++
-
-.PHONY: clean objs
-
-objs: vxi11.h
- $(CXX) -c -fPIC $(CFLAGS) vxi11_user.cc
- $(CXX) -c -fPIC $(CFLAGS) vxi11_clnt.c
- $(CXX) -c -fPIC $(CFLAGS) vxi11_xdr.c
-
-vxi11.h: vxi11.x
- rpcgen -M vxi11.x
-
-clean:
- rm -f *.o vxi11_cmd vxi11.h vxi11_svc.c vxi11_xdr.c vxi11_clnt.c #TAGS
Index: sipmscan/trunk/vxi11_x86_64/vxi11.x
===================================================================
--- sipmscan/trunk/vxi11_x86_64/vxi11.x (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/vxi11.x (nonexistent)
@@ -1,317 +0,0 @@
-/* This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
- * which are part of the asynDriver (R4-5) EPICS module, which, at time of
- * writing, is available from:
- * http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
- * More general information about EPICS is available from:
- * http://www.aps.anl.gov/epics/
- * This code is open source, and is covered under the copyright notice and
- * software license agreement shown below, and also at:
- * http://www.aps.anl.gov/epics/license/open.php
- *
- * In order to comply with section 4.3 of the software license agreement, here
- * is a PROMINENT NOTICE OF CHNAGES TO THE SOFTWARE
- * ===========================================
- * (1) This file, vxi11.x, is the concatenation of the files vxi11core.rpcl and
- * vxi11intr.rpcl
- * (2) Tab spacing has been tidied up
- *
- * It is intended as a lightweight base for the vxi11 rpc protocol. If you
- * run rpcgen on this file, it will generate C files and headers, from which
- * it is relatively simple to write C programs to communicate with a range
- * of ethernet-enabled instruments, such as oscilloscopes and function
- * generated by manufacturers such as Agilent and Tektronix (amongst many
- * others).
- *
- * For what it's worth, this concatenation was done by Steve Sharples at
- * the University of Nottingham, UK, on 1 June 2006.
- *
- * Copyright notice and software license agreement follow, then the
- * original comments from vxi11core.rpcl etc.
- *
- ******************************************************************************
- * Copyright © 2006 <University of Chicago and other copyright holders>. All
- * rights reserved.
- ******************************************************************************
- *
- ******************************************************************************
- * vxi11.x is distributed subject to the following license conditions:
- * SOFTWARE LICENSE AGREEMENT
- * Software: vxi11.x
- *
- * 1. The "Software", below, refers to vxi11.x (in either source code, or
- * binary form and accompanying documentation). Each licensee is addressed
- * as "you" or "Licensee."
- *
- * 2. The copyright holders shown above and their third-party licensors hereby
- * grant Licensee a royalty-free nonexclusive license, subject to the
- * limitations stated herein and U.S. Government license rights.
- *
- * 3. You may modify and make a copy or copies of the Software for use within
- * your organization, if you meet the following conditions:
- * 1. Copies in source code must include the copyright notice and this
- * Software License Agreement.
- * 2. Copies in binary form must include the copyright notice and this
- * Software License Agreement in the documentation and/or other
- * materials provided with the copy.
- *
- * 4. You may modify a copy or copies of the Software or any portion of it,
- * thus forming a work based on the Software, and distribute copies of such
- * work outside your organization, if you meet all of the following
- * conditions:
- * 1. Copies in source code must include the copyright notice and this
- * Software License Agreement;
- * 2. Copies in binary form must include the copyright notice and this
- * Software License Agreement in the documentation and/or other
- * materials provided with the copy;
- * 3. Modified copies and works based on the Software must carry
- * prominent notices stating that you changed specified portions of
- * the Software.
- *
- * 5. Portions of the Software resulted from work developed under a U.S.
- * Government contract and are subject to the following license: the
- * Government is granted for itself and others acting on its behalf a
- * paid-up, nonexclusive, irrevocable worldwide license in this computer
- * software to reproduce, prepare derivative works, and perform publicly
- * and display publicly.
- *
- * 6. WARRANTY DISCLAIMER. THE SOFTWARE IS SUPPLIED "AS IS" WITHOUT WARRANTY OF
- * ANY KIND. THE COPYRIGHT HOLDERS, THEIR THIRD PARTY LICENSORS, THE UNITED
- * STATES, THE UNITED STATES DEPARTMENT OF ENERGY, AND THEIR EMPLOYEES: (1)
- * DISCLAIM ANY WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
- * ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
- * PURPOSE, TITLE OR NON-INFRINGEMENT, (2) DO NOT ASSUME ANY LEGAL LIABILITY
- * OR RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF THE
- * SOFTWARE, (3) DO NOT REPRESENT THAT USE OF THE SOFTWARE WOULD NOT INFRINGE
- * PRIVATELY OWNED RIGHTS, (4) DO NOT WARRANT THAT THE SOFTWARE WILL FUNCTION
- * UNINTERRUPTED, THAT IT IS ERROR-FREE OR THAT ANY ERRORS WILL BE CORRECTED.
- *
- * 7. LIMITATION OF LIABILITY. IN NO EVENT WILL THE COPYRIGHT HOLDERS, THEIR
- * THIRD PARTY LICENSORS, THE UNITED STATES, THE UNITED STATES DEPARTMENT OF
- * ENERGY, OR THEIR EMPLOYEES: BE LIABLE FOR ANY INDIRECT, INCIDENTAL,
- * CONSEQUENTIAL, SPECIAL OR PUNITIVE DAMAGES OF ANY KIND OR NATURE,
- * INCLUDING BUT NOT LIMITED TO LOSS OF PROFITS OR LOSS OF DATA, FOR ANY
- * REASON WHATSOEVER, WHETHER SUCH LIABILITY IS ASSERTED ON THE BASIS OF
- * CONTRACT, TORT (INCLUDING NEGLIGENCE OR STRICT LIABILITY), OR OTHERWISE,
- * EVEN IF ANY OF SAID PARTIES HAS BEEN WARNED OF THE POSSIBILITY OF SUCH
- * LOSS OR DAMAGES.
- ******************************************************************************
- */
-
-/******************************************************************************
- *
- * vxi11core.rpcl
- *
- * This file is best viewed with a tabwidth of 4
- *
- ******************************************************************************
- *
- * TODO:
- *
- ******************************************************************************
- *
- * Original Author: someone from VXIbus Consortium
- * Current Author: Benjamin Franksen
- * Date: 03-06-97
- *
- * RPCL description of the core- and abort-channel of the TCP/IP Instrument
- * Protocol Specification.
- *
- *
- * Modification Log:
- * -----------------
- * .00 03-06-97 bfr created this file
- *
- ******************************************************************************
- *
- * Notes:
- *
- * This stuff is literally from
- *
- * VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification
- *
- */
-
-typedef long Device_Link;
-
-enum Device_AddrFamily
-{
- DEVICE_TCP,
- DEVICE_UDP
-};
-
-typedef long Device_Flags;
-
-typedef long Device_ErrorCode;
-
-struct Device_Error
-{
- Device_ErrorCode error;
-};
-
-struct Create_LinkParms
-{
- long clientId; /* implementation specific value */
- bool lockDevice; /* attempt to lock the device */
- unsigned long lock_timeout; /* time to wait for lock */
- string device<>; /* name of device */
-};
-struct Create_LinkResp
-{
- Device_ErrorCode error;
- Device_Link lid;
- unsigned short abortPort; /* for the abort RPC */
- unsigned long maxRecvSize; /* max # of bytes accepted on write */
-};
-struct Device_WriteParms
-{
- Device_Link lid; /* link id from create_link */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- Device_Flags flags; /* flags with options */
- opaque data<>; /* the data length and the data itself */
-};
-struct Device_WriteResp
-{
- Device_ErrorCode error;
- unsigned long size; /* # of bytes written */
-};
-struct Device_ReadParms
-{
- Device_Link lid; /* link id from create_link */
- unsigned long requestSize; /* # of bytes requested */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- Device_Flags flags; /* flags with options */
- char termChar; /* valid if flags & termchrset */
-};
-struct Device_ReadResp
-{
- Device_ErrorCode error;
- long reason; /* why read completed */
- opaque data<>; /* the data length and the data itself */
-};
-struct Device_ReadStbResp
-{
- Device_ErrorCode error;
- unsigned char stb; /* the returned status byte */
-};
-struct Device_GenericParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* flags with options */
- unsigned long lock_timeout; /* time to wait for lock */
- unsigned long io_timeout; /* time to wait for I/O */
-};
-struct Device_RemoteFunc
-{
- unsigned long hostAddr; /* host servicing interrupt */
- unsigned long hostPort; /* valid port # on client */
- unsigned long progNum; /* DEVICE_INTR */
- unsigned long progVers; /* DEVICE_INTR_VERSION */
- Device_AddrFamily progFamily; /* DEVICE_UDP | DEVICE_TCP */
-};
-struct Device_EnableSrqParms
-{
- Device_Link lid; /* link id from create_link */
- bool enable; /* enable or disable intr's */
- opaque handle<40>; /* host specific data */
-};
-struct Device_LockParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* contains the waitlock flag */
- unsigned long lock_timeout; /* time to wait for lock */
-};
-struct Device_DocmdParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* flags with options */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- long cmd; /* which command to execute */
- bool network_order; /* client's byte order */
- long datasize; /* size of individual data elements */
- opaque data_in<>; /* docmd data parameters */
-};
-struct Device_DocmdResp
-{
- Device_ErrorCode error;
- opaque data_out<>; /* returned data parameters */
-};
-
-program DEVICE_ASYNC
-{
- version DEVICE_ASYNC_VERSION
- {
- Device_Error device_abort (Device_Link) = 1;
- } = 1;
-} = 0x0607B0;
-
-program DEVICE_CORE
-{
- version DEVICE_CORE_VERSION
- {
- Create_LinkResp create_link (Create_LinkParms) = 10;
- Device_WriteResp device_write (Device_WriteParms) = 11;
- Device_ReadResp device_read (Device_ReadParms) = 12;
- Device_ReadStbResp device_readstb (Device_GenericParms) = 13;
- Device_Error device_trigger (Device_GenericParms) = 14;
- Device_Error device_clear (Device_GenericParms) = 15;
- Device_Error device_remote (Device_GenericParms) = 16;
- Device_Error device_local (Device_GenericParms) = 17;
- Device_Error device_lock (Device_LockParms) = 18;
- Device_Error device_unlock (Device_Link) = 19;
- Device_Error device_enable_srq (Device_EnableSrqParms) = 20;
- Device_DocmdResp device_docmd (Device_DocmdParms) = 22;
- Device_Error destroy_link (Device_Link) = 23;
- Device_Error create_intr_chan (Device_RemoteFunc) = 25;
- Device_Error destroy_intr_chan (void) = 26;
- } = 1;
-} = 0x0607AF;
-
-/******************************************************************************
- *
- * vxi11intr.rpcl
- *
- * This file is best viewed with a tabwidth of 4
- *
- ******************************************************************************
- *
- * TODO:
- *
- ******************************************************************************
- *
- * Original Author: someone from VXIbus Consortium
- * Current Author: Benjamin Franksen
- * Date: 03-06-97
- *
- * RPCL description of the intr-channel of the TCP/IP Instrument Protocol
- * Specification.
- *
- *
- * Modification Log:
- * -----------------
- * .00 03-06-97 bfr created this file
- *
- ******************************************************************************
- *
- * Notes:
- *
- * This stuff is literally from
- *
- * "VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification"
- *
- */
-
-struct Device_SrqParms
-{
- opaque handle<>;
-};
-
-program DEVICE_INTR
-{
- version DEVICE_INTR_VERSION
- {
- void device_intr_srq (Device_SrqParms) = 30;
- } = 1;
-} = 0x0607B1;
Index: sipmscan/trunk/vxi11_x86_64/vxi11_cmd.cc
===================================================================
--- sipmscan/trunk/vxi11_x86_64/vxi11_cmd.cc (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/vxi11_cmd.cc (nonexistent)
@@ -1,83 +0,0 @@
-/* vxi11_cmd.c
- * Copyright (C) 2006 Steve D. Sharples
- *
- * A simple interactive utility that allows you to send commands and queries to
- * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
- * generated by rpcgen vxi11.x, and the vxi11_user.h user libraries.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- * The author's email address is steve.sharples@nottingham.ac.uk
- */
-
-#include "vxi11_user.h"
-#define BUF_LEN 100000
-
-int main(int argc, char *argv[]) {
-
-static char *device_ip;
-static char *device_name;
-char cmd[256];
-char buf[BUF_LEN];
-int ret;
-long bytes_returned;
-CLINK *clink;
-
- clink = new CLINK;
-
- if (argc < 2) {
- printf("usage: %s your.inst.ip.addr [device_name]\n",argv[0]);
- exit(1);
- }
-
- device_ip = argv[1];
- if (argc > 2) {
- device_name = argv[2];
- ret=vxi11_open_device(device_ip,clink,device_name);
- }
- else {
- ret=vxi11_open_device(device_ip,clink);
- }
-
- if (ret != 0) {
- printf("Error: could not open device %s, quitting\n",device_ip);
- exit(2);
- }
-
- while(1){
- memset(cmd, 0, 256); // initialize command string
- memset(buf, 0, BUF_LEN); // initialize buffer
- printf("Input command or query ('q' to exit): ");
- fgets(cmd,256,stdin);
- cmd[strlen(cmd)-1] = 0; // just gets rid of the \n
- if (strncasecmp(cmd, "q",1) == 0) break;
-
- if (vxi11_send(clink, cmd) < 0) break;
- if (strstr(cmd, "?") != 0) {
- bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
- if (bytes_returned > 0) {
- printf("%s\n",buf);
- }
- else if (bytes_returned == -15) {
- printf("*** [ NOTHING RECEIVED ] ***\n");
- }
- else break;
- }
- }
-
- ret=vxi11_close_device(device_ip,clink);
- return 0;
- }
-
Index: sipmscan/trunk/vxi11_x86_64/GNU_General_Public_License.txt
===================================================================
--- sipmscan/trunk/vxi11_x86_64/GNU_General_Public_License.txt (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/GNU_General_Public_License.txt (nonexistent)
@@ -1,340 +0,0 @@
- GNU GENERAL PUBLIC LICENSE
- Version 2, June 1991
-
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
- 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- Everyone is permitted to copy and distribute verbatim copies
- of this license document, but changing it is not allowed.
-
- Preamble
-
- The licenses for most software are designed to take away your
-freedom to share and change it. By contrast, the GNU General Public
-License is intended to guarantee your freedom to share and change free
-software--to make sure the software is free for all its users. This
-General Public License applies to most of the Free Software
-Foundation's software and to any other program whose authors commit to
-using it. (Some other Free Software Foundation software is covered by
-the GNU Library General Public License instead.) You can apply it to
-your programs, too.
-
- When we speak of free software, we are referring to freedom, not
-price. Our General Public Licenses are designed to make sure that you
-have the freedom to distribute copies of free software (and charge for
-this service if you wish), that you receive source code or can get it
-if you want it, that you can change the software or use pieces of it
-in new free programs; and that you know you can do these things.
-
- To protect your rights, we need to make restrictions that forbid
-anyone to deny you these rights or to ask you to surrender the rights.
-These restrictions translate to certain responsibilities for you if you
-distribute copies of the software, or if you modify it.
-
- For example, if you distribute copies of such a program, whether
-gratis or for a fee, you must give the recipients all the rights that
-you have. You must make sure that they, too, receive or can get the
-source code. And you must show them these terms so they know their
-rights.
-
- We protect your rights with two steps: (1) copyright the software, and
-(2) offer you this license which gives you legal permission to copy,
-distribute and/or modify the software.
-
- Also, for each author's protection and ours, we want to make certain
-that everyone understands that there is no warranty for this free
-software. If the software is modified by someone else and passed on, we
-want its recipients to know that what they have is not the original, so
-that any problems introduced by others will not reflect on the original
-authors' reputations.
-
- Finally, any free program is threatened constantly by software
-patents. We wish to avoid the danger that redistributors of a free
-program will individually obtain patent licenses, in effect making the
-program proprietary. To prevent this, we have made it clear that any
-patent must be licensed for everyone's free use or not licensed at all.
-
- The precise terms and conditions for copying, distribution and
-modification follow.
-
- GNU GENERAL PUBLIC LICENSE
- TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-
- 0. This License applies to any program or other work which contains
-a notice placed by the copyright holder saying it may be distributed
-under the terms of this General Public License. The "Program", below,
-refers to any such program or work, and a "work based on the Program"
-means either the Program or any derivative work under copyright law:
-that is to say, a work containing the Program or a portion of it,
-either verbatim or with modifications and/or translated into another
-language. (Hereinafter, translation is included without limitation in
-the term "modification".) Each licensee is addressed as "you".
-
-Activities other than copying, distribution and modification are not
-covered by this License; they are outside its scope. The act of
-running the Program is not restricted, and the output from the Program
-is covered only if its contents constitute a work based on the
-Program (independent of having been made by running the Program).
-Whether that is true depends on what the Program does.
-
- 1. You may copy and distribute verbatim copies of the Program's
-source code as you receive it, in any medium, provided that you
-conspicuously and appropriately publish on each copy an appropriate
-copyright notice and disclaimer of warranty; keep intact all the
-notices that refer to this License and to the absence of any warranty;
-and give any other recipients of the Program a copy of this License
-along with the Program.
-
-You may charge a fee for the physical act of transferring a copy, and
-you may at your option offer warranty protection in exchange for a fee.
-
- 2. You may modify your copy or copies of the Program or any portion
-of it, thus forming a work based on the Program, and copy and
-distribute such modifications or work under the terms of Section 1
-above, provided that you also meet all of these conditions:
-
- a) You must cause the modified files to carry prominent notices
- stating that you changed the files and the date of any change.
-
- b) You must cause any work that you distribute or publish, that in
- whole or in part contains or is derived from the Program or any
- part thereof, to be licensed as a whole at no charge to all third
- parties under the terms of this License.
-
- c) If the modified program normally reads commands interactively
- when run, you must cause it, when started running for such
- interactive use in the most ordinary way, to print or display an
- announcement including an appropriate copyright notice and a
- notice that there is no warranty (or else, saying that you provide
- a warranty) and that users may redistribute the program under
- these conditions, and telling the user how to view a copy of this
- License. (Exception: if the Program itself is interactive but
- does not normally print such an announcement, your work based on
- the Program is not required to print an announcement.)
-
-These requirements apply to the modified work as a whole. If
-identifiable sections of that work are not derived from the Program,
-and can be reasonably considered independent and separate works in
-themselves, then this License, and its terms, do not apply to those
-sections when you distribute them as separate works. But when you
-distribute the same sections as part of a whole which is a work based
-on the Program, the distribution of the whole must be on the terms of
-this License, whose permissions for other licensees extend to the
-entire whole, and thus to each and every part regardless of who wrote it.
-
-Thus, it is not the intent of this section to claim rights or contest
-your rights to work written entirely by you; rather, the intent is to
-exercise the right to control the distribution of derivative or
-collective works based on the Program.
-
-In addition, mere aggregation of another work not based on the Program
-with the Program (or with a work based on the Program) on a volume of
-a storage or distribution medium does not bring the other work under
-the scope of this License.
-
- 3. You may copy and distribute the Program (or a work based on it,
-under Section 2) in object code or executable form under the terms of
-Sections 1 and 2 above provided that you also do one of the following:
-
- a) Accompany it with the complete corresponding machine-readable
- source code, which must be distributed under the terms of Sections
- 1 and 2 above on a medium customarily used for software interchange; or,
-
- b) Accompany it with a written offer, valid for at least three
- years, to give any third party, for a charge no more than your
- cost of physically performing source distribution, a complete
- machine-readable copy of the corresponding source code, to be
- distributed under the terms of Sections 1 and 2 above on a medium
- customarily used for software interchange; or,
-
- c) Accompany it with the information you received as to the offer
- to distribute corresponding source code. (This alternative is
- allowed only for noncommercial distribution and only if you
- received the program in object code or executable form with such
- an offer, in accord with Subsection b above.)
-
-The source code for a work means the preferred form of the work for
-making modifications to it. For an executable work, complete source
-code means all the source code for all modules it contains, plus any
-associated interface definition files, plus the scripts used to
-control compilation and installation of the executable. However, as a
-special exception, the source code distributed need not include
-anything that is normally distributed (in either source or binary
-form) with the major components (compiler, kernel, and so on) of the
-operating system on which the executable runs, unless that component
-itself accompanies the executable.
-
-If distribution of executable or object code is made by offering
-access to copy from a designated place, then offering equivalent
-access to copy the source code from the same place counts as
-distribution of the source code, even though third parties are not
-compelled to copy the source along with the object code.
-
- 4. You may not copy, modify, sublicense, or distribute the Program
-except as expressly provided under this License. Any attempt
-otherwise to copy, modify, sublicense or distribute the Program is
-void, and will automatically terminate your rights under this License.
-However, parties who have received copies, or rights, from you under
-this License will not have their licenses terminated so long as such
-parties remain in full compliance.
-
- 5. You are not required to accept this License, since you have not
-signed it. However, nothing else grants you permission to modify or
-distribute the Program or its derivative works. These actions are
-prohibited by law if you do not accept this License. Therefore, by
-modifying or distributing the Program (or any work based on the
-Program), you indicate your acceptance of this License to do so, and
-all its terms and conditions for copying, distributing or modifying
-the Program or works based on it.
-
- 6. Each time you redistribute the Program (or any work based on the
-Program), the recipient automatically receives a license from the
-original licensor to copy, distribute or modify the Program subject to
-these terms and conditions. You may not impose any further
-restrictions on the recipients' exercise of the rights granted herein.
-You are not responsible for enforcing compliance by third parties to
-this License.
-
- 7. If, as a consequence of a court judgment or allegation of patent
-infringement or for any other reason (not limited to patent issues),
-conditions are imposed on you (whether by court order, agreement or
-otherwise) that contradict the conditions of this License, they do not
-excuse you from the conditions of this License. If you cannot
-distribute so as to satisfy simultaneously your obligations under this
-License and any other pertinent obligations, then as a consequence you
-may not distribute the Program at all. For example, if a patent
-license would not permit royalty-free redistribution of the Program by
-all those who receive copies directly or indirectly through you, then
-the only way you could satisfy both it and this License would be to
-refrain entirely from distribution of the Program.
-
-If any portion of this section is held invalid or unenforceable under
-any particular circumstance, the balance of the section is intended to
-apply and the section as a whole is intended to apply in other
-circumstances.
-
-It is not the purpose of this section to induce you to infringe any
-patents or other property right claims or to contest validity of any
-such claims; this section has the sole purpose of protecting the
-integrity of the free software distribution system, which is
-implemented by public license practices. Many people have made
-generous contributions to the wide range of software distributed
-through that system in reliance on consistent application of that
-system; it is up to the author/donor to decide if he or she is willing
-to distribute software through any other system and a licensee cannot
-impose that choice.
-
-This section is intended to make thoroughly clear what is believed to
-be a consequence of the rest of this License.
-
- 8. If the distribution and/or use of the Program is restricted in
-certain countries either by patents or by copyrighted interfaces, the
-original copyright holder who places the Program under this License
-may add an explicit geographical distribution limitation excluding
-those countries, so that distribution is permitted only in or among
-countries not thus excluded. In such case, this License incorporates
-the limitation as if written in the body of this License.
-
- 9. The Free Software Foundation may publish revised and/or new versions
-of the General Public License from time to time. Such new versions will
-be similar in spirit to the present version, but may differ in detail to
-address new problems or concerns.
-
-Each version is given a distinguishing version number. If the Program
-specifies a version number of this License which applies to it and "any
-later version", you have the option of following the terms and conditions
-either of that version or of any later version published by the Free
-Software Foundation. If the Program does not specify a version number of
-this License, you may choose any version ever published by the Free Software
-Foundation.
-
- 10. If you wish to incorporate parts of the Program into other free
-programs whose distribution conditions are different, write to the author
-to ask for permission. For software which is copyrighted by the Free
-Software Foundation, write to the Free Software Foundation; we sometimes
-make exceptions for this. Our decision will be guided by the two goals
-of preserving the free status of all derivatives of our free software and
-of promoting the sharing and reuse of software generally.
-
- NO WARRANTY
-
- 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
-FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
-OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
-PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
-OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
-TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
-PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
-REPAIR OR CORRECTION.
-
- 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
-WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
-REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
-INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
-OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
-TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
-YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
-PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
-POSSIBILITY OF SUCH DAMAGES.
-
- END OF TERMS AND CONDITIONS
-
- How to Apply These Terms to Your New Programs
-
- If you develop a new program, and you want it to be of the greatest
-possible use to the public, the best way to achieve this is to make it
-free software which everyone can redistribute and change under these terms.
-
- To do so, attach the following notices to the program. It is safest
-to attach them to the start of each source file to most effectively
-convey the exclusion of warranty; and each file should have at least
-the "copyright" line and a pointer to where the full notice is found.
-
- <one line to give the program's name and a brief idea of what it does.>
- Copyright (C) <year> <name of author>
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-
-
-Also add information on how to contact you by electronic and paper mail.
-
-If the program is interactive, make it output a short notice like this
-when it starts in an interactive mode:
-
- Gnomovision version 69, Copyright (C) year name of author
- Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
- This is free software, and you are welcome to redistribute it
- under certain conditions; type `show c' for details.
-
-The hypothetical commands `show w' and `show c' should show the appropriate
-parts of the General Public License. Of course, the commands you use may
-be called something other than `show w' and `show c'; they could even be
-mouse-clicks or menu items--whatever suits your program.
-
-You should also get your employer (if you work as a programmer) or your
-school, if any, to sign a "copyright disclaimer" for the program, if
-necessary. Here is a sample; alter the names:
-
- Yoyodyne, Inc., hereby disclaims all copyright interest in the program
- `Gnomovision' (which makes passes at compilers) written by James Hacker.
-
- <signature of Ty Coon>, 1 April 1989
- Ty Coon, President of Vice
-
-This General Public License does not permit incorporating your program into
-proprietary programs. If your program is a subroutine library, you may
-consider it more useful to permit linking proprietary applications with the
-library. If this is what you want to do, use the GNU Library General
-Public License instead of this License.
Index: sipmscan/trunk/vxi11_x86_64/CHANGELOG.txt
===================================================================
--- sipmscan/trunk/vxi11_x86_64/CHANGELOG.txt (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/CHANGELOG.txt (nonexistent)
@@ -1,218 +0,0 @@
-------------------------------------------------------------------------------
-vxi11_1.10 - 9/09/2010
-
-Bug fix (thanks to Stephan Mahr): in vxi11_close(), remove the IP address
-from the global array that keeps track of them so that if the same device
-is opened again, then a new client is created, rather than it attempting
-to use the old one (which was destroyed on the previous close).
-
-------------------------------------------------------------------------------
-vxi11_1.09 - 7/06/2010
-
-Moved over to bazaar VCS (from RCS).
-
-Makefile cleanups. Fixed signed/unsigned comparisons. Use consistent (and
-sane) struct separator spacing in code.
-
-Fix int casting on printf statements to fix new compiler warnings/errors
-(thanks to Shouri Chatterjee for pointing this out).
-
-------------------------------------------------------------------------------
-vxi11_1.08 - 3/09/2009
-
-Added a sanity check for link->maxRecvSize to make sure it's >0. This gets
-around a bug in some versions of the Agilent Infiniium scope software.
-
-Changed the erroneous strncpy() to memcpy() in vxi11_send, as we could be
-sending binary data (not just strings).
-
-Changed a lot of char *'s to const char *'s in an attempt to get rid of
-pedantic gcc compiler warnings.
-
-------------------------------------------------------------------------------
-vxi11_1.07 - 9/10/2007
-
-Minor change to vxi11_receive_data_block(), this fn now copes with instruments
-that return just "#0" (for whatever reason). Suggestion by Jarek Sadowski,
-gratefully received.
-
-------------------------------------------------------------------------------
-vxi11_1.06 - 31/08/2007
-
-Bug fix in vxi11_receive(), to ensure that no more than "len" bytes are ever
-received (and so avoiding a segmentation fault). This was a bug introduced in
-release 1.04 whilst making some other changes to the vxi11_receive() fn.
-
-Many thanks to Rob Penny for spotting the bug and providing a patch.
-
-------------------------------------------------------------------------------
-vxi11_1.05 - 11/07/2007
-
-Added the ability to specify a "device name" when calling vxi11_open_device().
-For regular VXI11-based instruments, such as scopes and AFGs, the device name
-is usually "hard wired" to be "inst0", and up to now this has been hard wired
-into the vxi11_user code. However, devices such as LAN to GPIB gateways need
-some way of distinguishing between different devices... they are a single
-client (one IP address), with multiple devices.
-
-The vxi11_user fn, vxi11_open_device(), now takes a third argument
-(char *device).
-This gets passed to the core vxi11_open_device() fn (the one that deals with
-separate clients and links), and the core vxi11_open_link() fn; these two
-core functions have also had an extra parameter added accordingly. In order
-to not break the API, a wrapper function is provided in the form of the
-original vxi11_open_device() fn, that just takes 2 arguments
-(char *ip, CLINK *clink), this then passes "inst0" as the device argument.
-Backwards-compatible wrappers for the core functions have NOT been provided.
-These are generally not used from userland anyway. Hopefully this won't
-upset anyone!
-
-vxi11_cmd, the simple test utility, has also been updated. You can now,
-optionally, pass the device_name as a second argument (after the ip
-address). The source has been renamed to vxi11_cmd.cc (from vxi11_cmd.c), as
-it is C++ code not C.
-
-Some minor tidying up in vxi11_user.h
-
-With thanks to Oliver Schulz for bringing LAN to GPIB gateways to my
-attention, for suggesting changes to the vxi11_user library to allow them to
-be accommodated, and for tidying some things up.
-
-------------------------------------------------------------------------------
-vxi11_1.04 - 10/07/2007
-
-Patch applied, which was kindly provided by Robert Larice. This sorts out
-the confusion (on my part) about the structures returned by the rpcgen
-generated *_1() functions... these are statically allocated temporary structs,
-apparently. In the words of Robert Larice:
-
-******
-Hello Dr. Sharples,
-
- I'm sending some patches for your nice gem "vxi11_1.03"
-
- In the source code there were some strange comments, concerning
- a commented free() around ... Manfred S. ...
- and some notes, suggesting you had trouble to get more than one link
- working.
-
- I think thats caused by some misuse of the rpcgen generated subroutines.
- 1) those rpcgen generated *_1 functions returned pointers to
- statically allocated temporary structs.
- those where meant to be instantly copied to the user's space,
- which wasn't done
- thus instead of
- Device_ReadResp *read_resp;
- read_resp = device_read_1(...)
- one should have written someting like:
- Device_ReadResp *read_resp;
- read_resp = malloc(...)
- memcpy(read_resp, device_read_1(...), ...)
- 2) but a better fix is to use the rpcgen -M Flag
- which allows to pass the memory space as a third argument
- so one can write
- Device_ReadResp *read_resp;
- read_resp = malloc(...)
- device_read_1(..., read_resp, ...)
- furthermore this is now automatically thread save
- 3) the rpcgen function device_read_1
- expects a target buffer to be passed via read_resp
- which was not done.
- 4) the return value of vxi11_receive() was computed incorrectly
- 5) minor, Makefile typo's
- CFLAGS versus
- CLFAGS
-
-******
-
-Robert didn't have more than one device to try the patch with, but I've just
-tried it and everything seems fine. So I've removed all references to the
-VXI11_ENABLE_MULTIPLE_CLIENTS global variable, and removed the call to
-vxi11_open_link() from the vxi11_send() fn. There has been an associated
-tidying of functions, and removal of some comments.
-
-Thanks once again to Robert Larice for the patch and the explanation!
-
-------------------------------------------------------------------------------
-vxi11_1.03 - 29/01/2007
-
-Some bug-fixes (thanks to Manfred S.), and extra awareness of the
-possibility that instruments could time out after receiving a query WITHOUT
-causing an error condition. In some cases (prior to these changes) this
-could have resulted in a segmentation fault.
-
-Specifically:
-
-(1) removed call to ANSI free() fn in vxi11_receive, which according to
- Manfred S. "is not necessary and wrong (crashes)".
-
-(2) added extra check in vxi11_receive() to see if read_resp==NULL.
- read_resp can apparently be NULL if (eg) you send an instrument a
- query, but the instrument is so busy with something else for so long
- that it forgets the original query. So this extra check is for that
- situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
- calling function.
-
-(3) vxi11_send_and_receive() is now aware of the possibility of being
- returned -VXI11_NULL_READ_RESP. If so, it re-sends the query, until
- either getting a "regular" read error (read_resp->error!=0) or a
- successful read.
-
-(4) Similar to (2)... added extra check in vxi11_send() to see if
- write_resp==NULL. If so, return -VXI11_NULL_WRITE_RESP. As with (3),
- send_and_receive() is now aware of this possibility.
-
-------------------------------------------------------------------------------
-vxi11_1.02 - 25/08/2006
-
-Important changes to the core vxi11_send() function, which should be
-invisible to the user.
-
-For those interested, the function now takes note of the value of
-link->maxRecvSize, which is the maximum number of bytes that the vxi11
-intrument you're talking to can receive in one go. For many instruments
-this may be a few kB, which isn't a problem for sending short commands;
-however, sending large chunks of data (for example sending waveforms
-to instruments) may exceed this maxRecvSize. The core vxi11_send() function
-has been re-written to ensure that only a maximum of [maxRecvSize] bytes are
-written in one go... the function sits in a loop until all the message/
-data is written.
-
-Also tidied up some of the return values (specifically with regard to
-vxi11_send() and vxi11_send_data_block() ).
-
-------------------------------------------------------------------------------
-vxi11_1.01 - 06/07/2006
-
-Fair few changes since v1.00, all in vxi11_user.c and vxi11_user.h
-
-Found I was having problems talking to multiple links on the same
-client, if I created a different client for each one. So introduced
-a few global variables to keep track of all the ip addresses of
-clients that the library is asked to create, and only creating new
-clients if the ip address is different. This puts a limit of how
-many unique ip addresses (clients) a single process can connect to.
-Set this value at 256 (should hopefully be enough!).
-
-Next I found that talking to different clients on different ip
-addresses didn't work. It turns out that create_link_1() creates
-a static structure. This this link is associated with a given
-client (and hence a given IP address), then the only way I could
-think of making things work was to add a call to an
-vxi11_open_link() function before each send command (no idea what
-this adds to overheads and it's very messy!) - at least I was
-able to get this to only happen when we are using more than one
-client/ip address.
-
-Also, while I was at it, I re-ordered the functions a little -
-starts with core user functions, extra user functions, then core
-library functions at the end. Added a few more comments. Tidied
-up. Left some debugging info in, but commented out.
-
-------------------------------------------------------------------------------
-vxi11_1.00 - 23/06/2006
-
-Initial release.
-
-------------------------------------------------------------------------------
-
Index: sipmscan/trunk/vxi11_x86_64/vxi11_user.cc
===================================================================
--- sipmscan/trunk/vxi11_x86_64/vxi11_user.cc (revision 144)
+++ sipmscan/trunk/vxi11_x86_64/vxi11_user.cc (nonexistent)
@@ -1,589 +0,0 @@
-/* vxi11_user.cc
- * Copyright (C) 2006 Steve D. Sharples
- *
- * User library for opening, closing, sending to and receiving from
- * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
- * generated by rpcgen vxi11.x.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- * The author's email address is steve.sharples@nottingham.ac.uk
- */
-
-#include "vxi11_user.h"
-
-/*****************************************************************************
- * GENERAL NOTES
- *****************************************************************************
- *
- * There are four functions at the heart of this library:
- *
- * int vxi11_open_device(char *ip, CLIENT **client, VXI11_LINK **link)
- * int vxi11_close_device(char *ip, CLIENT *client, VXI11_LINK *link)
- * int vxi11_send(CLIENT *client, VXI11_LINK *link, char *cmd, unsigned long len)
- * long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout)
- *
- * Note that all 4 of these use separate client and link structures. All the
- * other functions are built on these four core functions, and the first layer
- * of abstraction is to combine the CLIENT and VXI11_LINK structures into a
- * single entity, which I've called a CLINK. For the send and receive
- * functions, this is just a simple wrapper. For the open and close functions
- * it's a bit more complicated, because we somehow have to keep track of
- * whether we've already opened a device with the same IP address before (in
- * which case we need to recycle a previously created client), or whether
- * we've still got any other links to a given IP address left when we are
- * asked to close a clink (in which case we can sever the link, but have to
- * keep the client open). This is so the person using this library from
- * userland does not have to keep track of whether they are talking to a
- * different physical instrument or not each time they establish a connection.
- *
- * So the base functions that the user will probably want to use are:
- *
- * int vxi11_open_device(char *ip, CLINK *clink)
- * int vxi11_close_device(char *ip, CLINK *clink)
- * int vxi11_send(CLINK *clink, char *cmd, unsigned long len)
- * --- or --- (if sending just text)
- * int vxi11_send(CLINK *clink, char *cmd)
- * long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
- *
- * There are then useful (to me, anyway) more specific functions built on top
- * of these:
- *
- * int vxi11_send_data_block(CLINK *clink, char *cmd, char *buffer, unsigned long len)
- * long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
- * long vxi11_send_and_receive(CLINK *clink, char *cmd, char *buf, unsigned long buf_len, unsigned long timeout)
- * long vxi11_obtain_long_value(CLINK *clink, char *cmd, unsigned long timeout)
- * double vxi11_obtain_double_value(CLINK *clink, char *cmd, unsigned long timeout)
- *
- * (then there are some shorthand wrappers for the above without specifying
- * the timeout due to sheer laziness---explore yourself)
- */
-
-
-/* Global variables. Keep track of multiple links per client. We need this
- * because:
- * - we'd like the library to be able to cope with multiple links to a given
- * client AND multiple links to multiple clients
- * - we'd like to just refer to a client/link ("clink") as a single
- * entity from user land, we don't want to worry about different
- * initialisation procedures, depending on whether it's an instrument
- * with the same IP address or not
- */
-char VXI11_IP_ADDRESS[VXI11_MAX_CLIENTS][20];
-CLIENT *VXI11_CLIENT_ADDRESS[VXI11_MAX_CLIENTS];
-int VXI11_DEVICE_NO = 0;
-int VXI11_LINK_COUNT[VXI11_MAX_CLIENTS];
-
-/*****************************************************************************
- * KEY USER FUNCTIONS - USE THESE FROM YOUR PROGRAMS OR INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* OPEN FUNCTIONS *
- * ============== */
-
-/* Use this function from user land to open a device and create a link. Can be
- * used multiple times for the same device (the library will keep track).*/
-int vxi11_open_device(const char *ip, CLINK *clink, char *device) {
-int ret;
-int l;
-int device_no=-1;
-
-// printf("before doing anything, clink->link = %ld\n", clink->link);
- /* Have a look to see if we've already initialised an instrument with
- * this IP address */
- for (l=0; l<VXI11_MAX_CLIENTS; l++){
- if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
- device_no=l;
-// printf("Open function, search, found ip address %s, device no %d\n",ip,device_no);
- }
- }
-
- /* Couldn't find a match, must be a new IP address */
- if (device_no < 0) {
- /* Uh-oh, we're out of storage space. Increase the #define
- * for VXI11_MAX_CLIENTS in vxi11_user.h */
- if (VXI11_DEVICE_NO >= VXI11_MAX_CLIENTS) {
- printf("Error: maximum of %d clients allowed\n",VXI11_MAX_CLIENTS);
- ret = -VXI11_MAX_CLIENTS;
- }
- /* Create a new client, keep a note of where the client pointer
- * is, for this IP address. Because it's a new client, this
- * must be link number 1. Keep track of how many devices we've
- * opened so we don't run out of storage space. */
- else {
- ret = vxi11_open_device(ip, &(clink->client), &(clink->link), device);
- strncpy(VXI11_IP_ADDRESS[VXI11_DEVICE_NO],ip,20);
- VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO] = clink->client;
- VXI11_LINK_COUNT[VXI11_DEVICE_NO]=1;
-// printf("Open function, could not find ip address %s.\n",ip);
-// printf("So now, VXI11_IP_ADDRESS[%d]=%s,\n",VXI11_DEVICE_NO,VXI11_IP_ADDRESS[VXI11_DEVICE_NO]);
-// printf("VXI11_CLIENT_ADDRESS[%d]=%ld,\n",VXI11_DEVICE_NO,VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO]);
-// printf(" clink->client=%ld,\n",clink->client);
-// printf("VXI11_LINK_COUNT[%d]=%d.\n",VXI11_DEVICE_NO,VXI11_LINK_COUNT[VXI11_DEVICE_NO]);
- VXI11_DEVICE_NO++;
- }
- }
- /* already got a client for this IP address */
- else {
- /* Copy the client pointer address. Just establish a new link
- * (not a new client). Add one to the link count */
- clink->client = VXI11_CLIENT_ADDRESS[device_no];
- ret = vxi11_open_link(ip, &(clink->client), &(clink->link), device);
-// printf("Found an ip address, copying client from VXI11_CLIENT_ADDRESS[%d]\n",device_no);
- VXI11_LINK_COUNT[device_no]++;
-// printf("Have just incremented VXI11_LINK_COUNT[%d], it's now %d\n",device_no,VXI11_LINK_COUNT[device_no]);
- }
-// printf("after creating link, clink->link = %ld\n", clink->link);
- return ret;
- }
-
-/* This is a wrapper function, used for the situations where there is only one
- * "device" per client. This is the case for most (if not all) VXI11
- * instruments; however, it is _not_ the case for devices such as LAN to GPIB
- * gateways. These are single clients that communicate to many instruments
- * (devices). In order to differentiate between them, we need to pass a device
- * name. This gets used in the vxi11_open_link() fn, as the link_parms.device
- * value. */
-int vxi11_open_device(const char *ip, CLINK *clink) {
- char device[6];
- strncpy(device,"inst0",6);
- return vxi11_open_device(ip, clink, device);
- }
-
-
-
-/* CLOSE FUNCTION *
- * ============== */
-
-/* Use this function from user land to close a device and/or sever a link. Can
- * be used multiple times for the same device (the library will keep track).*/
-int vxi11_close_device(const char *ip, CLINK *clink) {
-int l,ret;
-int device_no = -1;
-
- /* Which instrument are we referring to? */
- for (l=0; l<VXI11_MAX_CLIENTS; l++){
- if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
- device_no=l;
- }
- }
- /* Something's up if we can't find the IP address! */
- if (device_no == -1) {
- printf("vxi11_close_device: error: I have no record of you ever opening device\n");
- printf(" with IP address %s\n",ip);
- ret = -4;
- }
- else { /* Found the IP, there's more than one link to that instrument,
- * so keep track and just close the link */
- if (VXI11_LINK_COUNT[device_no] > 1 ) {
- ret = vxi11_close_link(ip,clink->client, clink->link);
- VXI11_LINK_COUNT[device_no]--;
- }
- /* Found the IP, it's the last link, so close the device (link
- * AND client) */
- else {
- ret = vxi11_close_device(ip, clink->client, clink->link);
- /* Remove the IP address, so that if we re-open the same device
- * we do it properly */
- memset(VXI11_IP_ADDRESS[device_no], 0, 20);
- }
- }
- return ret;
- }
-
-
-/* SEND FUNCTIONS *
- * ============== */
-
-/* A _lot_ of the time we are sending text strings, and can safely rely on
- * strlen(cmd). */
-int vxi11_send(CLINK *clink, const char *cmd) {
- return vxi11_send(clink, cmd, strlen(cmd));
- }
-
-/* We still need the version of the function where the length is set explicitly
- * though, for when we are sending fixed length data blocks. */
-int vxi11_send(CLINK *clink, const char *cmd, unsigned long len) {
- return vxi11_send(clink->client, clink->link, cmd, len);
- }
-
-
-/* RECEIVE FUNCTIONS *
- * ================= */
-
-/* Lazy wrapper for when I can't be bothered to specify a read timeout */
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len) {
- return vxi11_receive(clink, buffer, len, VXI11_READ_TIMEOUT);
- }
-
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
- return vxi11_receive(clink->client, clink->link, buffer, len, timeout);
- }
-
-
-
-/*****************************************************************************
- * USEFUL ADDITIONAL HIGHER LEVER USER FUNCTIONS - USE THESE FROM YOUR *
- * PROGRAMS OR INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* SEND FIXED LENGTH DATA BLOCK FUNCTION *
- * ===================================== */
-int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len) {
-char *out_buffer;
-int cmd_len=strlen(cmd);
-int ret;
-
- out_buffer=new char[cmd_len+10+len];
- sprintf(out_buffer,"%s#8%08lu",cmd,len);
- memcpy(out_buffer+cmd_len+10,buffer,(unsigned long) len);
- ret = vxi11_send(clink, out_buffer, (unsigned long) (cmd_len+10+len));
- delete[] out_buffer;
- return ret;
- }
-
-
-/* RECEIVE FIXED LENGTH DATA BLOCK FUNCTION *
- * ======================================== */
-
-/* This function reads a response in the form of a definite-length block, such
- * as when you ask for waveform data. The data is returned in the following
- * format:
- * #800001000<1000 bytes of data>
- * ||\______/
- * || |
- * || \---- number of bytes of data
- * |\--------- number of digits that follow (in this case 8, with leading 0's)
- * \---------- always starts with #
- */
-long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
-/* I'm not sure what the maximum length of this header is, I'll assume it's
- * 11 (#9 + 9 digits) */
-unsigned long necessary_buffer_size;
-char *in_buffer;
-int ret;
-int ndigits;
-unsigned long returned_bytes;
-int l;
-char scan_cmd[20];
- necessary_buffer_size=len+12;
- in_buffer=new char[necessary_buffer_size];
- ret=vxi11_receive(clink, in_buffer, necessary_buffer_size, timeout);
- if (ret < 0) return ret;
- if (in_buffer[0] != '#') {
- printf("vxi11_user: data block error: data block does not begin with '#'\n");
- printf("First 20 characters received were: '");
- for(l=0;l<20;l++) {
- printf("%c",in_buffer[l]);
- }
- printf("'\n");
- return -3;
- }
-
- /* first find out how many digits */
- sscanf(in_buffer,"#%1d",&ndigits);
- /* some instruments, if there is a problem acquiring the data, return only "#0" */
- if (ndigits > 0) {
- /* now that we know, we can convert the next <ndigits> bytes into an unsigned long */
- sprintf(scan_cmd,"#%%1d%%%dlu",ndigits);
- sscanf(in_buffer,scan_cmd,&ndigits,&returned_bytes);
- memcpy(buffer, in_buffer+(ndigits+2), returned_bytes);
- delete[] in_buffer;
- return (long) returned_bytes;
- }
- else return 0;
- }
-
-
-/* SEND AND RECEIVE FUNCTION *
- * ========================= */
-
-/* This is mainly a useful function for the overloaded vxi11_obtain_value()
- * fn's, but is also handy and useful for user and library use */
-long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout) {
-int ret;
-long bytes_returned;
- do {
- ret = vxi11_send(clink, cmd);
- if (ret != 0) {
- if (ret != -VXI11_NULL_WRITE_RESP) {
- printf("Error: vxi11_send_and_receive: could not send cmd.\n");
- printf(" The function vxi11_send returned %d. ",ret);
- return -1;
- }
- else printf("(Info: VXI11_NULL_WRITE_RESP in vxi11_send_and_receive, resending query)\n");
- }
-
- bytes_returned = vxi11_receive(clink, buf, buf_len, timeout);
- if (bytes_returned <= 0) {
- if (bytes_returned >-VXI11_NULL_READ_RESP) {
- printf("Error: vxi11_send_and_receive: problem reading reply.\n");
- printf(" The function vxi11_receive returned %ld. ",bytes_returned);
- return -2;
- }
- else printf("(Info: VXI11_NULL_READ_RESP in vxi11_send_and_receive, resending query)\n");
- }
- } while (bytes_returned == -VXI11_NULL_READ_RESP || ret == -VXI11_NULL_WRITE_RESP);
- return 0;
- }
-
-
-/* FUNCTIONS TO RETURN A LONG INTEGER VALUE SENT AS RESPONSE TO A QUERY *
- * ==================================================================== */
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout) {
-char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
- memset(buf, 0, 50);
- if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
- printf("Returning 0\n");
- return 0;
- }
- return strtol(buf, (char **)NULL, 10);
- }
-
-/* Lazy wrapper function with default read timeout */
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd) {
- return vxi11_obtain_long_value(clink, cmd, VXI11_READ_TIMEOUT);
- }
-
-
-/* FUNCTIONS TO RETURN A DOUBLE FLOAT VALUE SENT AS RESPONSE TO A QUERY *
- * ==================================================================== */
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout) {
-char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
-double val;
- memset(buf, 0, 50);
- if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
- printf("Returning 0.0\n");
- return 0.0;
- }
- val = strtod(buf, (char **)NULL);
- return val;
- }
-
-/* Lazy wrapper function with default read timeout */
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd) {
- return vxi11_obtain_double_value(clink, cmd, VXI11_READ_TIMEOUT);
- }
-
-
-/*****************************************************************************
- * CORE FUNCTIONS - YOU SHOULDN'T NEED TO USE THESE FROM YOUR PROGRAMS OR *
- * INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* OPEN FUNCTIONS *
- * ============== */
-int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
-
- *client = clnt_create(ip, DEVICE_CORE, DEVICE_CORE_VERSION, "tcp");
-
- if (*client == NULL) {
- clnt_pcreateerror(ip);
- return -1;
- }
-
- return vxi11_open_link(ip, client, link, device);
- }
-
-int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
-
-Create_LinkParms link_parms;
-
- /* Set link parameters */
- link_parms.clientId = (long) *client;
- link_parms.lockDevice = 0;
- link_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
- link_parms.device = device;
-
- *link = (Create_LinkResp *) calloc(1, sizeof(Create_LinkResp));
-
- if (create_link_1(&link_parms, *link, *client) != RPC_SUCCESS) {
- clnt_perror(*client, ip);
- return -2;
- }
- return 0;
- }
-
-
-/* CLOSE FUNCTIONS *
- * =============== */
-int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link) {
-int ret;
-
- ret = vxi11_close_link(ip, client, link);
-
- clnt_destroy(client);
-
- return ret;
- }
-
-int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link) {
-Device_Error dev_error;
- memset(&dev_error, 0, sizeof(dev_error));
-
- if (destroy_link_1(&link->lid, &dev_error, client) != RPC_SUCCESS) {
- clnt_perror(client,ip);
- return -1;
- }
-
- return 0;
- }
-
-
-/* SEND FUNCTIONS *
- * ============== */
-
-/* A _lot_ of the time we are sending text strings, and can safely rely on
- * strlen(cmd). */
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd) {
- return vxi11_send(client, link, cmd, strlen(cmd));
- }
-
-/* We still need the version of the function where the length is set explicitly
- * though, for when we are sending fixed length data blocks. */
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len) {
-Device_WriteParms write_parms;
-unsigned int bytes_left = len;
-char *send_cmd;
-
- send_cmd = new char[len];
- memcpy(send_cmd, cmd, len);
-
- write_parms.lid = link->lid;
- write_parms.io_timeout = VXI11_DEFAULT_TIMEOUT;
- write_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
-
-/* We can only write (link->maxRecvSize) bytes at a time, so we sit in a loop,
- * writing a chunk at a time, until we're done. */
-
- do {
- Device_WriteResp write_resp;
- memset(&write_resp, 0, sizeof(write_resp));
-
- if (bytes_left <= link->maxRecvSize) {
- write_parms.flags = 8;
- write_parms.data.data_len = bytes_left;
- }
- else {
- write_parms.flags = 0;
- /* We need to check that maxRecvSize is a sane value (ie >0). Believe it
- * or not, on some versions of Agilent Infiniium scope firmware the scope
- * returned "0", which breaks Rule B.6.3 of the VXI-11 protocol. Nevertheless
- * we need to catch this, otherwise the program just hangs. */
- if (link->maxRecvSize > 0) {
- write_parms.data.data_len = link->maxRecvSize;
- }
- else {
- write_parms.data.data_len = 4096; /* pretty much anything should be able to cope with 4kB */
- }
- }
- write_parms.data.data_val = send_cmd + (len - bytes_left);
-
- if(device_write_1(&write_parms, &write_resp, client) != RPC_SUCCESS) {
- delete[] send_cmd;
- return -VXI11_NULL_WRITE_RESP; /* The instrument did not acknowledge the write, just completely
- dropped it. There was no vxi11 comms error as such, the
- instrument is just being rude. Usually occurs when the instrument
- is busy. If we don't check this first, then the following
- line causes a seg fault */
- }
- if (write_resp.error != 0) {
- printf("vxi11_user: write error: %d\n", (int)write_resp.error);
- delete[] send_cmd;
- return -(write_resp.error);
- }
- bytes_left -= write_resp.size;
- } while (bytes_left > 0);
-
- delete[] send_cmd;
- return 0;
- }
-
-
-/* RECEIVE FUNCTIONS *
- * ================= */
-
-// It appeared that this function wasn't correctly dealing with more data available than specified in len.
-// This patch attempts to fix this issue. RDP 2007/8/13
-
-/* wrapper, for default timeout */ long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len) { return vxi11_receive(client, link, buffer, len, VXI11_READ_TIMEOUT);
- }
-
-#define RCV_END_BIT 0x04 // An end indicator has been read
-#define RCV_CHR_BIT 0x02 // A termchr is set in flags and a character which matches termChar is transferred
-#define RCV_REQCNT_BIT 0x01 // requestSize bytes have been transferred. This includes a request size of zero.
-
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout) {
-Device_ReadParms read_parms;
-Device_ReadResp read_resp;
-unsigned long curr_pos = 0;
-
- read_parms.lid = link->lid;
- read_parms.requestSize = len;
- read_parms.io_timeout = timeout; /* in ms */
- read_parms.lock_timeout = timeout; /* in ms */
- read_parms.flags = 0;
- read_parms.termChar = 0;
-
- do {
- memset(&read_resp, 0, sizeof(read_resp));
-
- read_resp.data.data_val = buffer + curr_pos;
- read_parms.requestSize = len - curr_pos; // Never request more total data than originally specified in len
-
- if(device_read_1(&read_parms, &read_resp, client) != RPC_SUCCESS) {
- return -VXI11_NULL_READ_RESP; /* there is nothing to read. Usually occurs after sending a query
- which times out on the instrument. If we don't check this first,
- then the following line causes a seg fault */
- }
- if (read_resp.error != 0) {
- /* Read failed for reason specified in error code.
- * (From published VXI-11 protocol, section B.5.2)
- * 0 no error
- * 1 syntax error
- * 3 device not accessible
- * 4 invalid link identifier
- * 5 parameter error
- * 6 channel not established
- * 8 operation not supported
- * 9 out of resources
- * 11 device locked by another link
- * 12 no lock held by this link
- * 15 I/O timeout
- * 17 I/O error
- * 21 invalid address
- * 23 abort
- * 29 channel already established
- */
-
- printf("vxi11_user: read error: %d\n", (int)read_resp.error);
- return -(read_resp.error);
- }
-
- if((curr_pos + read_resp.data.data_len) <= len) {
- curr_pos += read_resp.data.data_len;
- }
- if( (read_resp.reason & RCV_END_BIT) || (read_resp.reason & RCV_CHR_BIT) ) {
- break;
- }
- else if( curr_pos == len ) {
- printf("xvi11_user: read error: buffer too small. Read %d bytes without hitting terminator.\n", (int)curr_pos );
- return -100;
- }
- } while(1);
- return (curr_pos); /*actual number of bytes received*/
-
- }
-
Index: sipmscan/trunk/windowed_test.h
===================================================================
--- sipmscan/trunk/windowed_test.h (revision 144)
+++ sipmscan/trunk/windowed_test.h (nonexistent)
@@ -1,42 +0,0 @@
-#ifndef _windowedtest_h_
-#define _windowedtest_h_
-
-#define debug 0
-#define winWidth 1240
-#define winHeight 900
-#define WINDOW_NAME "CAMAC/MPOD/4MM DAQ software"
-#define BSIZE 10000
-#define histname "hdata"
-
-#include <time.h>
-
-//int debugSig = 0;
-
-enum EMenuIds {
- M_FILE_NEW,
-// M_FILE_CLOSE,
- M_FILE_EXIT,
-
- M_ANALYSIS_HISTTYPE,
- M_ANALYSIS_HISTTYPE_1DADC,
- M_ANALYSIS_HISTTYPE_1DTDC,
- M_ANALYSIS_HISTTYPE_2D,
- M_ANALYSIS_HISTTYPE_SURF,
- M_ANALYSIS_FIT,
- M_ANALYSIS_FITSEL,
- M_ANALYSIS_INTEGX,
- M_ANALYSIS_INTEGY,
- M_ANALYSIS_PHOTMU,
-
- M_TOOLS_FIELDPOINT,
-
- M_WINDOW_HOR,
- M_WINDOW_VERT,
-
- M_HELP_ABOUT
-};
-
-// Function that transforms timestamp to local time
-void GetTime(int intime, char *outtime);
-
-#endif
Index: sipmscan/trunk/wusbcc.h
===================================================================
--- sipmscan/trunk/wusbcc.h (revision 144)
+++ sipmscan/trunk/wusbcc.h (nonexistent)
@@ -1,15 +0,0 @@
-#ifndef _WUSBCC_H
-#define _WUSBCC_H
-
-#define NAF(N,A,F) 0x4000+(N)*0x200+(A)*0x20+(F)
-#define NAFS(N,A,F) (N)*0x200+(A)*0x20+(F)
-
-#define CSSA_RQX(N,A,F,DATA,Q,X) CAMAC_read(udev,(N),(A),(F),(DATA),(Q),(X))
-#define CSSA_WQX(N,A,F,DATA,Q,X) CAMAC_write(udev,(N),(A),(F),(DATA),(Q),(X))
-
-#define CCCZ CAMAC_Z(udev)
-#define CCCC CAMAC_C(udev)
-#define CSET_I CAMAC_I(udev,1)
-#define CREM_I CAMAC_I(udev,0)
-
-#endif
Index: sipmscan/trunk/daqscope.h
===================================================================
--- sipmscan/trunk/daqscope.h (revision 144)
+++ sipmscan/trunk/daqscope.h (nonexistent)
@@ -1,84 +0,0 @@
-#ifndef _daqscope_h_
-#define _daqscope_h_
-
-#define WAVE_LEN 100000
-
-//class VmUsbStack;
-class daqscope {
-public:
- int scopeUseType;
- int scopeChanNr;
- int scopeChans[8];
- char scopeChanstring[256];
- int scopeMeasSel;
- char eventbuf[WAVE_LEN];
- double measubuf;
- double tektime, tekvolt;
- double choffset;
-
- int fStop;
- double tekunit(char *prefix);
-
- int init();
- int event();
- int customCommand(char *command, bool query, char *sReturn);
- int connect(char* IPaddr);
- int disconnect(char* IPaddr);
- int lockunlock(bool lockit);
- daqscope();
- ~daqscope();
-
-// VmUsbStack * fStack;
-// VmUsbStack * fInit;
-
-/* int OSrepetition;
- int OSmeasu;
- int OSmeasuchan;
- int OSgating;
- int OSsaving;
- int OSinf;
- int nmeaslc;
- char OSchannels[1024];
- char IP[1024];
- char lecroycmd[1024];
- char lecroycmd2[1024];
- char lecroywfm[1024];
- int lecroystate;
- char pch[1024];
- char lecroyadd[1024];
- char multibuf[WAVE_LEN];
- char eventbuf[WAVE_LEN];
- double tektime,tekvolt,lctime,lcvolt;
- int fastacqstate; // GKM - variable that saves the fastacq state
- double choffset; // GKM - position offset for signal
-
- int fPoints;
- int fStop;
- int fMode;
- int clear();
- int end();
- int event();
- int lecroyevent();
- void measurement(float&);
- void measulecroy(float&);
- void measumult();
- int init();
- int initlecroy();
- int connect(char* IPaddr);
- int disconnect(char* IPaddr);
- void fileopen(const char*);
- void fileclose();
- void countcontrol();
- void fastacq(int setting); // GKM - gets tek out of fastacq
- void header();
- void measuheader();
- void lecroyheader();
- void lecroywave();
- double tekunit(char*);
- double lcunit(char*);
- daqscope();
-// daqscope(const char *);
- ~daqscope();*/
-};
-
-#endif
Index: sipmscan/trunk/root_include.h
===================================================================
--- sipmscan/trunk/root_include.h (revision 144)
+++ sipmscan/trunk/root_include.h (nonexistent)
@@ -1,225 +0,0 @@
-#ifndef _root_include_h_
-#define _root_include_h_
-
-// ROOT base includes
-#ifndef ROOT_TRootBrowser
-#include "TRootBrowser.h"
-#endif
-#ifndef ROOT_IOstream
-#include "Riostream.h"
-#endif
-#ifndef ROOT_TSystem
-#include "TSystem.h"
-#endif
-#ifndef ROOT_TApplication
-#include "TApplication.h"
-#endif
-#ifndef ROOT_TROOT
-#include "TROOT.h"
-#endif
-#ifndef ROOT_RQ_Object
-#include "RQ_OBJECT.h"
-#endif
-#ifndef ROOT_TGClient
-#include "TGClient.h"
-#endif
-#ifndef ROOT_TGResourcePool
-#include "TGResourcePool.h"
-#endif
-
-// ROOT GUI frame includes
-#ifndef ROOT_TGFrame
-#include "TGFrame.h"
-#endif
-#ifndef ROOT_TGDockableFrame
-#include "TGDockableFrame.h"
-#endif
-#ifndef ROOT_TGMenu
-#include "TGMenu.h"
-#endif
-#ifndef ROOT_TGMdiDecorFrame
-#include "TGMdiDecorFrame.h"
-#endif
-#ifndef ROOT_TGMdiFrame
-#include "TGMdiFrame.h"
-#endif
-#ifndef ROOT_TGMdiMainFrame
-#include "TGMdiMainFrame.h"
-#endif
-#ifndef ROOT_TGMdiMenu
-#include "TGMdiMenu.h"
-#endif
-#ifndef ROOT_TGMdi
-#include "TGMdi.h"
-#endif
-#ifndef ROOT_TG3DLine
-#include "TG3DLine.h"
-#endif
-#ifndef ROOT_TGStatusBar
-#include "TGStatusBar.h"
-#endif
-
-// ROOT GUI builder incudes (not needed)
-#ifndef ROOT_TRootGuiBuilder
-#include "TRootGuiBuilder.h"
-#endif
-#ifndef ROOT_TGuiBldHintsButton
-#include "TGuiBldHintsButton.h"
-#endif
-#ifndef ROOT_TGuiBldHintsEditor
-#include "TGuiBldHintsEditor.h"
-#endif
-#ifndef ROOT_TGuiBldEditor
-#include "TGuiBldEditor.h"
-#endif
-#ifndef ROOT_TGuiBldDragManager
-#include "TGuiBldDragManager.h"
-#endif
-
-// ROOT GUI object includes
-#ifndef ROOT_TGListBox
-#include "TGListBox.h"
-#endif
-#ifndef ROOT_TGNumberEntry
-#include "TGNumberEntry.h"
-#endif
-#ifndef ROOT_TGScrollBar
-#include "TGScrollBar.h"
-#endif
-#ifndef ROOT_TGFileDialog
-#include "TGFileDialog.h"
-#endif
-#ifndef ROOT_TGShutter
-#include "TGShutter.h"
-#endif
-#ifndef ROOT_TGButtonGroup
-#include "TGButtonGroup.h"
-#endif
-#ifndef ROOT_TGCanvas
-#include "TGCanvas.h"
-#endif
-#ifndef ROOT_TGButton
-#include "TGButton.h"
-#endif
-#ifndef ROOT_TGTextEdit
-#include "TGTextEdit.h"
-#endif
-#ifndef ROOT_TGLabel
-#include "TGLabel.h"
-#endif
-#ifndef ROOT_TGView
-#include "TGView.h"
-#endif
-#ifndef ROOT_TGTab
-#include "TGTab.h"
-#endif
-#ifndef ROOT_TGListView
-#include "TGListView.h"
-#endif
-#ifndef ROOT_TGSplitter
-#include "TGSplitter.h"
-#endif
-#ifndef ROOT_TGListTree
-#include "TGListTree.h"
-#endif
-#ifndef ROOT_TGToolTip
-#include "TGToolTip.h"
-#endif
-#ifndef ROOT_TGToolBar
-#include "TGToolBar.h"
-#endif
-#ifndef ROOT_TRootEmbeddedCanvas
-#include "TRootEmbeddedCanvas.h"
-#endif
-#ifndef ROOT_TCanvas
-#include "TCanvas.h"
-#endif
-#ifndef ROOT_TGComboBox
-#include "TGComboBox.h"
-#endif
-#ifndef ROOT_TGProgressBar
-#include "TGProgressBar.h"
-#endif
-#ifndef ROOT_TGTextEntry
-#include "TGTextEntry.h"
-#endif
-#ifndef ROOT_TGMsgBox
-#include "TGMsgBox.h"
-#endif
-#ifndef ROOT_TGSlider
-#include "TGSlider.h"
-#endif
-#ifndef ROOT_TGFSContainer
-#include "TGFSContainer.h"
-#endif
-#ifndef ROOT_TGFSComboBox
-#include "TGFSComboBox.h"
-#endif
-
-// ROOT File browser includes
-#ifndef ROOT_TSystemDir
-#include "TSystemDirectory.h"
-#endif
-#ifndef ROOT_TTree
-#include "TTree.h"
-#endif
-#ifndef ROOT_TFile
-#include "TFile.h"
-#endif
-
-// ROOT plotting includes
-#ifndef ROOT_TPaveStats
-#include "TPaveStats.h"
-#endif
-#ifndef ROOT_TGraph2D
-#include "TGraph2D.h"
-#endif
-#ifndef ROOT_TLatex
-#include "TLatex.h"
-#endif
-#ifndef ROOT_TGraphErrors
-#include "TGraphErrors.h"
-#endif
-#ifndef ROOT_TStyle
-#include "TStyle.h"
-#endif
-#ifndef ROOT_TPaletteAxis
-#include "TPaletteAxis.h"
-#endif
-#ifndef ROOT_TGraph
-#include "TGraph.h"
-#endif
-#ifndef ROOT_TH1F
-#include "TH1F.h"
-#endif
-#ifndef ROOT_TH2F
-#include "TH2F.h"
-#endif
-#ifndef ROOT_TF1
-#include "TF1.h"
-#endif
-#ifndef ROOT_TSpectrum
-#include "TSpectrum.h"
-#endif
-#ifndef ROOT_TVirtualFitter
-#include "TVirtualFitter.h"
-#endif
-#ifndef ROOT_TMath
-#include "TMath.h"
-#endif
-#ifndef ROOT_TRandom
-#include "TRandom.h"
-#endif
-
-// ROOT MYSQL includes
-#ifndef ROOT_TSQLServer
-#include <TSQLServer.h>
-#endif
-#ifndef ROOT_TSQLResult
-#include <TSQLResult.h>
-#endif
-#ifndef ROOT_TSQLRow
-#include <TSQLRow.h>
-#endif
-
-#endif
Index: sipmscan/trunk/libxxusb.cpp
===================================================================
--- sipmscan/trunk/libxxusb.cpp (revision 144)
+++ sipmscan/trunk/libxxusb.cpp (nonexistent)
@@ -1,1651 +0,0 @@
-
-// libxxusb.cpp : Defines the entry point for the DLL application.
-//
-
-
-
-#include <string.h>
-#include <malloc.h>
-//#include "usb.h"
-#include "libxxusb.h"
-#include <time.h>
-
-
-
-
-// 03/09/06 Release 3.00 changes
-// 07/28/06 correction CAMAC write for F to be in range 16...23
-// 10/09/06 correction CAMAC read for F to be in range <16 OR >23
-// 10/16/06 CAMAC DGG corrected
-// 12/28/07 Open corrected for bug when calling register after opening
-/*
-******** xxusb_longstack_execute ************************
-
- Executes stack array passed to the function and returns the data read from the VME bus
-
- Paramters:
- hdev: USB device handle returned from an open function
- DataBuffer: pointer to the dual use buffer
- when calling , DataBuffer contains (unsigned short) stack data, with first word serving
- as a placeholder
- upon successful return, DataBuffer contains (unsigned short) VME data
- lDataLen: The number of bytes to be fetched from VME bus - not less than the actual number
- expected, or the function will return -5 code. For stack consisting only of write operations,
- lDataLen may be set to 1.
- timeout: The time in ms that should be spent tryimg to write data.
-
- Returns:
- When Successful, the number of bytes read from xxusb.
- Upon failure, a negative number
-
- Note:
- The function must pass a pointer to an array of unsigned integer stack data, in which the first word
- is left empty to serve as a placeholder.
- The function is intended for executing long stacks, up to 4 MBytes long, both "write" and "read"
- oriented, such as using multi-block transfer operations.
- Structure upon call:
- DataBuffer(0) = 0(don't care place holder)
- DataBuffer(1) = (unsigned short)StackLength bits 0-15
- DataBuffer(2) = (unsigned short)StackLength bits 16-20
- DataBuffer(3 - StackLength +2) (unsigned short) stack data
- StackLength represents the number of words following DataBuffer(1) word, thus the total number
- of words is StackLength+2
- Structure upon return:
- DataBuffer(0 - (ReturnValue/2-1)) - (unsigned short)array of returned data when ReturnValue>0
-*/
-
-int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
-{
- int ret;
- char *cbuf;
- unsigned short *usbuf;
- int bufsize;
-
- cbuf = (char *)DataBuffer;
- usbuf = (unsigned short *)DataBuffer;
- cbuf[0]=12;
- cbuf[1]=0;
- bufsize = 2*(usbuf[1]+0x10000*usbuf[2])+4;
- ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, cbuf, bufsize, timeout);
- if (ret>0)
- ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
-
- return ret;
-}
-
-/*
-******** xxusb_bulk_read ************************
-
- Reads the content of the usbfifo whenever "FIFO full" flag is set,
- otherwise times out.
-
- Paramters:
- hdev: USB device handle returned from an open function
- DataBuffer: pointer to an array to store data that is read from the VME bus;
- the array may be declared as byte, unsigned short, or unsigned long
- lDatalen: The number of bytes to read from xxusb
- timeout: The time in ms that should be spent waiting for data.
-
- Returns:
- When Successful, the number of bytes read from xxusb.
- Upon failure, a negative number
-
- Note:
- Depending upon the actual need, the function may be used to return the data in a form
- of an array of bytes, unsigned short integers (16 bits), or unsigned long integers (32 bits).
- The latter option of passing a pointer to an array of unsigned long integers is meaningful when
- xxusb data buffering option is used (bit 7=128 of the global register) that requires data
- 32-bit data alignment.
-
-*/
-int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
-{
-int ret;
-char *cbuf;
-cbuf = (char *)DataBuffer;
- ret = usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
- return ret;
-}
-
-/*
-******** xxusb_bulk_write ************************
-
- Writes the content of an array of bytes, unsigned short integers, or unsigned long integers
- to the USB port fifo; times out when the USB fifo is full (e.g., when xxusb is busy).
-
- Paramters:
- hdev: USB device handle returned from an open function
- DataBuffer: pointer to an array storing the data to be sent;
- the array may be declared as byte, unsigned short, or unsigned long
- lDatalen: The number of bytes to to send to xxusb
- timeout: The time in ms that should be spent waiting for data.
-
- Returns:
- When Successful, the number of bytes passed to xxusb.
- Upon failure, a negative number
-
- Note:
- Depending upon the actual need, the function may be used to pass to xxusb the data in a form
- of an array of bytes, unsigned short integers (16 bits), or unsigned long integers (32 bits).
-*/
-int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
-{
-int ret;
-char *cbuf;
-cbuf = (char *)DataBuffer;
- ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, cbuf, lDataLen, timeout);
- return ret;
-}
-
-/*
-******** xxusb_usbfifo_read ************************
-
- Reads data stored in the xxusb fifo and packs them in an array of long integers.
-
- Paramters:
- hdev: USB device handle returned from an open function
- DataBuffer: pointer to an array of long to store data that is read
- the data occupy only the least significant 16 bits of the 32-bit data words
- lDatalen: The number of bytes to read from the xxusb
- timeout: The time in ms that should be spent waiting for data.
-
- Returns:
- When Successful, the number of bytes read from xxusb.
- Upon failure, a negative number
-
- Note:
- The function is not economical as it wastes half of the space required for storing
- the data received. Also, it is relatively slow, as it performs extensive data repacking.
- It is recommended to use xxusb_bulk_read with a pointer to an array of unsigned short
- integers.
-*/
-int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout)
-{
-int ret;
-char *cbuf;
-unsigned short *usbuf;
-int i;
-
-cbuf = (char *)DataBuffer;
-usbuf = (unsigned short *)DataBuffer;
-
- ret = usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
- if (ret > 0)
- for (i=ret/2-1; i >= 0; i=i-1)
- {
- usbuf[i*2]=usbuf[i];
- usbuf[i*2+1]=0;
- }
- return ret;
-}
-
-
-//******************************************************//
-//******************* GENERAL XX_USB *******************//
-//******************************************************//
-// The following are functions used for both VM_USB & CC_USB
-
-
-/*
-******** xxusb_register_write ************************
-
- Writes Data to the xxusb register selected by RedAddr. For
- acceptable values for RegData and RegAddr see the manual
- the module you are using.
-
- Parameters:
- hdev: usb device handle returned from open device
- RegAddr: The internal address if the xxusb
- RegData: The Data to be written to the register
-
- Returns:
- Number of bytes sent to xxusb if successful
- 0 if the register is write only
- Negative numbers if the call fails
-*/
-short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData)
-{
- long RegD;
- char buf[8]={5,0,0,0,0,0,0,0};
- int ret;
- int lDataLen;
- int timeout;
- if ((RegAddr==0) || (RegAddr==12) || (RegAddr==15))
- return 0;
- buf[2]=(char)(RegAddr & 15);
- buf[4]=(char)(RegData & 255);
-
- RegD = RegData >> 8;
- buf[5]=(char)(RegD & 255);
- RegD = RegD >>8;
- if (RegAddr==8)
- {
- buf[6]=(char)(RegD & 255);
- lDataLen=8;
- }
- else
- lDataLen=6;
- timeout=10;
- ret=xxusb_bulk_write(hDev, buf, lDataLen, timeout);
- return ret;
-}
-
-/*
-******** xxusb_stack_write ************************
-
- Writes a stack of VME/CAMAC calls to the VM_USB/CC_USB
- to be executed upon trigger.
-
- Parameters:
- hdev: usb device handle returned from an open function
- StackAddr: internal register to which the stack should be written
- lpStackData: Pointer to an array holding the stack
-
- Returns:
- The number of Bytes written to the xxusb when successful
- A negative number upon failure
-*/
-short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *intbuf)
-{
- int timeout;
- short ret;
- short lDataLen;
- char buf[2000];
- short i;
- int bufsize;
-
- buf[0]=(char)((StackAddr & 51) + 4);
- buf[1]=0;
- lDataLen=(short)(intbuf[0] & 0xFFF);
- buf[2]=(char)(lDataLen & 255);
- lDataLen = lDataLen >> 8;
- buf[3] = (char)(lDataLen & 255);
- bufsize=intbuf[0]*2+4;
- if (intbuf[0]==0)
- return 0;
- for (i=1; i <= intbuf[0]; i++)
- {
- buf[2+2*i] = (char)(intbuf[i] & 255);
- buf[3+2*i] = (char)((intbuf[i] >>8) & 255);
- }
- timeout=50;
- ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, bufsize, timeout);
- return ret;
-}
-
-/*
-******** xxusb_stack_execute **********************
-
- Writes, executes and returns the value of a DAQ stack.
-
- Parameters:
- hdev: USB device handle returned from an open function
- intbuf: Pointer to an array holding the values stack. Upon return
- Pointer value is the Data returned from the stack.
-
- Returns:
- When successful, the number of Bytes read from xxusb
- Upon Failure, a negative number.
-*/
-short xxusb_stack_execute(usb_dev_handle *hDev, long *intbuf)
-{
- int timeout;
- short ret;
- short lDataLen;
- char buf[26700];
- short i;
- int bufsize;
- int ii = 0;
-
- buf[0]=12;
- buf[1]=0;
- lDataLen=(short)(intbuf[0] & 0xFFF);
- buf[2]=(char)(lDataLen & 255);
- lDataLen = lDataLen >> 8;
- buf[3] = (char)(lDataLen & 15);
- bufsize=intbuf[0]*2+4;
- if (intbuf[0]==0)
- return 0;
- for (i=1; i <= intbuf[0]; i++)
- {
- buf[2+2*i] = (char)(intbuf[i] & 255);
- buf[3+2*i] = (char)((intbuf[i] >>8) & 255);
- }
- timeout=2000;
- ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, bufsize, timeout);
- if (ret>0)
- {
- lDataLen=26700;
- timeout=6000;
- ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, buf, lDataLen, timeout);
- if (ret>0)
- for (i=0; i < ret; i=i+2)
- intbuf[ii++]=(UCHAR)(buf[i]) +(UCHAR)( buf[i+1])*256;
- }
- return ret;
-}
-
-/*
-******** xxusb_stack_read ************************
-
- Reads the current DAQ stack stored by xxusb
-
- Parameters:
- hdev: USB device handle returned by an open function
- StackAddr: Indicates which stack to read, primary or secondary
- intbuf: Pointer to a array where the stack can be stored
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *intbuf)
-{
- int timeout;
- short ret;
- short lDataLen;
- short bufsize;
- char buf[1600];
- int i;
-
- buf[0]=(char)(StackAddr & 51);
- buf[1]=0;
- lDataLen = 2;
- timeout=100;
- ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, lDataLen, timeout);
- if (ret < 0)
- return ret;
- else
- bufsize=1600;
- int ii=0;
- {
- ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, buf, bufsize, timeout);
- if (ret>0)
- for (i=0; i < ret; i=i+2)
- intbuf[ii++]=(UCHAR)(buf[i]) + (UCHAR)(buf[i+1])*256;
- return ret;
-
- }
-}
-
-/*
-******** xxusb_register_read ************************
-
- Reads the current contents of an internal xxusb register
-
- Parameters:
- hdev: USB device handle returned from an open function
- RegAddr: The internal address of the register from which to read
- RegData: Pointer to a long to hold the data.
-
- Returns:
- When Successful, the number of bytes read from xxusb.
- Upon failure, a negative number
-*/
-short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData)
-{
-//long RegD;
-int timeout;
- char buf[4]={1,0,0,0};
- int ret;
- int lDataLen;
-
- buf[2]=(char)(RegAddr & 15);
- timeout=10;
- lDataLen=4;
- ret=xxusb_bulk_write(hDev, buf, lDataLen, timeout);
- if (ret < 0)
- return (short)ret;
- else
- {
- lDataLen=8;
- timeout=100;
- ret=xxusb_bulk_read(hDev, buf, lDataLen, timeout);
- if (ret<0)
- return (short)ret;
- else
- {
- *RegData=(UCHAR)(buf[0])+256*(UCHAR)(buf[1]);
- if (ret==4)
- *RegData=*RegData+0x10000*(UCHAR)(buf[2]);
- return (short)ret;
- }
- }
-}
-
-/*
-******** xxusb_reset_toggle ************************
-
- Toggles the reset state of the FPGA while the xxusb in programming mode
-
- Parameters
- hdev: US B device handle returned from an open function
-
- Returns:
- Upon failure, a negative number
-*/
-short xxusb_reset_toggle(usb_dev_handle *hDev)
-{
- short ret;
- char buf[2] = {(char)255,(char)255};
- int lDataLen=2;
- int timeout=1000;
- ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf,lDataLen, timeout);
- return (short)ret;
-}
-
-/*
-******** xxusb_devices_find ************************
-
- Determines the number and parameters of all xxusb devices attched to
- the computer.
-
- Parameters:
- xxdev: pointer to an array on which the device parameters are stored
-
- Returns:
- Upon success, returns the number of devices found
- Upon Failure returns a negative number
-*/
-short xxusb_devices_find(xxusb_device_type *xxdev)
-{
- short DevFound = 0;
- usb_dev_handle *udev;
- struct usb_bus *bus;
- struct usb_device *dev;
-struct usb_bus *usb_busses;
- char string[256];
- short ret;
- usb_init();
- usb_find_busses();
- usb_busses=usb_get_busses();
- usb_find_devices();
- for (bus=usb_busses; bus; bus = bus->next)
- {
- for (dev = bus->devices; dev; dev= dev->next)
- {
- if (dev->descriptor.idVendor==XXUSB_WIENER_VENDOR_ID)
- {
- udev = usb_open(dev);
- if (udev)
- {
- ret = usb_get_string_simple(udev, dev->descriptor.iSerialNumber, string, sizeof(string));
- if (ret >0 )
- {
- xxdev[DevFound].usbdev=dev;
- strcpy(xxdev[DevFound].SerialString, string);
- DevFound++;
- }
- usb_close(udev);
- }
- else return -1;
- }
- }
- }
- return DevFound;
-}
-
-/*
-******** xxusb_device_close ************************
-
- Closes an xxusb device
-
- Parameters:
- hdev: USB device handle returned from an open function
-
- Returns: 1
-*/
-short xxusb_device_close(usb_dev_handle *hDev)
-{
- short ret;
- ret=usb_release_interface(hDev,0);
- usb_close(hDev);
- return 1;
-}
-
-/*
-******** xxusb_device_open ************************
-
- Opens an xxusb device found by xxusb_device_find
-
- Parameters:
- dev: a usb device
-
- Returns:
- A USB device handle
-*/
-usb_dev_handle* xxusb_device_open(struct usb_device *dev)
-{
- short ret;
- long val;
- int count =0;
- usb_dev_handle *udev;
- udev = usb_open(dev);
- ret = usb_set_configuration(udev,1);
- ret = usb_claim_interface(udev,0);
-// RESET USB (added 10/16/06 Andreas Ruben)
- ret=xxusb_register_write(udev, 10, 0x04);
-// Loop to find known state (added 12/28/07 TH / AR)
- ret =-1;
- while ((ret <0) && (count <10))
- {
- xxusb_register_read(udev, 0, &val);
- count++;
- }
-
- return udev;
-}
-
-/*
-******** xxusb_flash_program ************************
-
- --Untested and therefore uncommented--
-*/
-short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect)
-{
- int i=0;
- int k=0;
- short ret=0;
- time_t t1,t2;
-
- char *pconfig;
- char *pbuf;
- pconfig=config;
- char buf[518] ={(char)0xAA,(char)0xAA,(char)0x55,(char)0x55,(char)0xA0,(char)0xA0};
- while (*pconfig++ != -1);
- for (i=0; i<nsect; i++)
- {
- pbuf=buf+6;
- for (k=0; k<256; k++)
- {
- *(pbuf++)=*(pconfig);
- *(pbuf++)=*(pconfig++);
- }
- ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, 518, 2000);
- if (ret<0)
- return ret;
- t1=clock()+(time_t)(0.03*CLOCKS_PER_SEC);
- while (t1>clock());
- t2=clock();
- }
- return ret;
-}
-
-/*
-******** xxusb_flashblock_program ************************
-
- --Untested and therefore uncommented--
-*/
-short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config)
-{
- int k=0;
- short ret=0;
-
- UCHAR *pconfig;
- char *pbuf;
- pconfig=config;
- char buf[518] ={(char)0xAA,(char)0xAA,(char)0x55,(char)0x55,(char)0xA0,(char)0xA0};
- pbuf=buf+6;
- for (k=0; k<256; k++)
- {
- *(pbuf++)=(UCHAR)(*(pconfig));
- *(pbuf++)=(UCHAR)(*(pconfig++));
- }
- ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, 518, 2000);
- return ret;
-}
-
-/*
-******** xxusb_serial_open ************************
-
- Opens a xxusb device whose serial number is given
-
- Parameters:
- SerialString: a char string that gives the serial number of
- the device you wish to open. It takes the form:
- VM0009 - for a vm_usb with serial number 9 or
- CC0009 - for a cc_usb with serial number 9
-
- Returns:
- A USB device handle
-*/
-usb_dev_handle* xxusb_serial_open(char *SerialString)
-{
- short DevFound = 0;
- usb_dev_handle *udev = NULL;
- struct usb_bus *bus;
- struct usb_device *dev;
-struct usb_bus *usb_busses;
-char string[7];
- short ret;
-// usb_set_debug(4);
- usb_init();
- usb_find_busses();
- usb_busses=usb_get_busses();
- usb_find_devices();
- for (bus=usb_busses; bus; bus = bus->next)
- {
- for (dev = bus->devices; dev; dev= dev->next)
- {
- if (dev->descriptor.idVendor==XXUSB_WIENER_VENDOR_ID)
- {
- udev = xxusb_device_open(dev);
- if (udev)
- {
- ret = usb_get_string_simple(udev, dev->descriptor.iSerialNumber, string, sizeof(string));
- if (ret >0 )
- {
- if (strcmp(string,SerialString)==0)
- return udev;
- }
- usb_close(udev);
- }
- }
- }
- }
- udev = NULL;
- return udev;
-}
-
-
-//******************************************************//
-//****************** EZ_VME Functions ******************//
-//******************************************************//
-// The following are functions used to perform simple
-// VME Functions with the VM_USB
-
-/*
-******** VME_write_32 ************************
-
- Writes a 32 bit data word to the VME bus
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Address_Modifier: VME address modifier for the VME call
- VME_Address: Address to write the data to
- Data: 32 bit data word to be written to VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data)
-{
- long intbuf[1000];
- short ret;
- intbuf[0]=7;
- intbuf[1]=0;
- intbuf[2]=Address_Modifier;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff);
- intbuf[5]=((VME_Address >>16) & 0xffff);
- intbuf[6]=(Data & 0xffff);
- intbuf[7]=((Data >> 16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-/*
-******** VME_read_32 ************************
-
-
- Reads a 32 bit data word from a VME address
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Address_Modifier: VME address modifier for the VME call
- VME_Address: Address to read the data from
- Data: 32 bit data word read from VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data)
-{
- long intbuf[1000];
- short ret;
- intbuf[0]=5;
- intbuf[1]=0;
- intbuf[2]=Address_Modifier +0x100;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff);
- intbuf[5]=((VME_Address >>16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Data=intbuf[0] + (intbuf[1] * 0x10000);
- return ret;
-}
-
-/*
-******** VME_write_16 ************************
-
- Writes a 16 bit data word to the VME bus
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Address_Modifier: VME address modifier for the VME call
- VME_Address: Address to write the data to
- Data: word to be written to VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data)
-{
- long intbuf[1000];
- short ret;
- intbuf[0]=7;
- intbuf[1]=0;
- intbuf[2]=Address_Modifier;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff)+ 0x01;
- intbuf[5]=((VME_Address >>16) & 0xffff);
- intbuf[6]=(Data & 0xffff);
- intbuf[7]=0;
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-/*
-******** VME_read_16 ************************
-
- Reads a 16 bit data word from a VME address
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Address_Modifier: VME address modifier for the VME call
- VME_Address: Address to read the data from
- Data: word read from VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data)
-{
- long intbuf[1000];
- short ret;
- intbuf[0]=5;
- intbuf[1]=0;
- intbuf[2]=Address_Modifier +0x100;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff)+ 0x01;
- intbuf[5]=((VME_Address >>16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Data=intbuf[0];
- return ret;
-}
-
-/*
-******** VME_BLT_read_32 ************************
-
- Performs block transfer of 32 bit words from a VME address
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Address_Modifier: VME address modifier for the VME call
- count: number of data words to read
- VME_Address: Address to read the data from
- Data: pointer to an array to hold the data words
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_BLT_read_32(usb_dev_handle *hdev, short Adress_Modifier, int count, long VME_Address, long Data[])
-{
- long intbuf[1000];
- short ret;
- int i=0;
- if (count > 255) return -1;
- intbuf[0]=5;
- intbuf[1]=0;
- intbuf[2]=Adress_Modifier +0x100;
- intbuf[3]=(count << 8);
- intbuf[4]=(VME_Address & 0xffff);
- intbuf[5]=((VME_Address >>16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- int j=0;
- for (i=0;i<(2*count);i=i+2)
- {
- Data[j]=intbuf[i] + (intbuf[i+1] * 0x10000);
- j++;
- }
- return ret;
-}
-
-//******************************************************//
-//****************** VM_USB Registers ******************//
-//******************************************************//
-// The following are functions used to set the registers
-// in the VM_USB
-
-/*
-******** VME_register_write ************************
-
- Writes to the vmusb registers that are accessible through
- VME style calls
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- VME_Address: The VME Address of the internal register
- Data: Data to be written to VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data)
-{
- long intbuf[1000];
- short ret;
-
- intbuf[0]=7;
- intbuf[1]=0;
- intbuf[2]=0x1000;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff);
- intbuf[5]=((VME_Address >>16) & 0xffff);
- intbuf[6]=(Data & 0xffff);
- intbuf[7]=((Data >> 16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-/*
-******** VME_register_read ************************
-
- Reads from the vmusb registers that are accessible trough VME style calls
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- VME_Address: The VME Address of the internal register
- Data: Data read from VME_Address
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data)
-{
- long intbuf[1000];
- short ret;
-
- intbuf[0]=5;
- intbuf[1]=0;
- intbuf[2]=0x1100;
- intbuf[3]=0;
- intbuf[4]=(VME_Address & 0xffff);
- intbuf[5]=((VME_Address >>16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Data=intbuf[0] + (intbuf[1] * 0x10000);
- return ret;
-}
-
-/*
-******** VME_LED_settings ************************
-
- Sets the vmusb LED's
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- LED: The number which corresponds to an LED values are:
- 0 - for Top YELLOW LED
- 1 - for RED LED
- 2 - for GREEN LED
- 3 - for Bottom YELLOW LED
- code: The LED aource selector code, valid values for each LED
- are listed in the manual
- invert: to invert the LED lighting
- latch: sets LED latch bit
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch)
-{
- short ret;
-// long internal;
- long Data;
-
- if( (LED <0) ||(LED > 3) || (code < 0) || (code > 7)) return -1;
-
- VME_register_read(hdev,0xc,&Data);
- if(LED == 0)
- {
- Data = Data & 0xFFFFFF00;
- Data = Data | code;
- if (invert == 1 && latch == 1) Data = Data | 0x18;
- if (invert == 1 && latch == 0) Data = Data | 0x08;
- if (invert == 0 && latch == 1) Data = Data | 0x10;
- }
- if(LED == 1)
- {
- Data = Data & 0xFFFF00FF;
- Data = Data | (code * 0x0100);
- if (invert == 1 && latch == 1) Data = Data | 0x1800;
- if (invert == 1 && latch == 0) Data = Data | 0x0800;
- if (invert == 0 && latch == 1) Data = Data | 0x1000;
- }
- if(LED == 2)
- {
- Data = Data & 0xFF00FFFF;
- Data = Data | (code * 0x10000);
- if (invert == 1 && latch == 1) Data = Data | 0x180000;
- if (invert == 1 && latch == 0) Data = Data | 0x080000;
- if (invert == 0 && latch == 1) Data = Data | 0x100000;
- }
- if(LED == 3)
- {
- Data = Data & 0x00FFFFFF;
- Data = Data | (code * 0x10000);
- if (invert == 1 && latch == 1) Data = Data | 0x18000000;
- if (invert == 1 && latch == 0) Data = Data | 0x08000000;
- if (invert == 0 && latch == 1) Data = Data | 0x10000000;
- }
- ret = VME_register_write(hdev, 0xc, Data);
- return ret;
-}
-
-/*
-******** VME_DGG ************************
-
- Sets the parameters for Gate & Delay channel A of vmusb
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- channel: Which DGG channel to use Valid Values are:
- 0 - For DGG A
- 1 - For DGG B
- trigger: Determines what triggers the start of the DGG Valid values are:
- 0 - Channel disabled
- 1 - NIM input 1
- 2 - NIM input 2
- 3 - Event Trigger
- 4 - End of Event
- 5 - USB Trigger
- 6 - Pulser
- output: Determines which NIM output to use for the channel, Vaild values are:
- 0 - for NIM O1
- 1 - for NIM O2
- delay: 32 bit word consisting of
- lower 16 bits: Delay_fine in steps of 12.5ns between trigger and start of gate
- upper 16 bits: Delay_coarse in steps of 81.7us between trigger and start of gate
- gate: the time the gate should stay open in steps of 12.5ns
- invert: is 1 if you wish to invert the DGG channel output
- latch: is 1 if you wish to run the DGG channel latched
-
- Returns:
- Returns 1 when successful
- Upon failure, a negative number
-*/
-short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger, unsigned short output,
- long delay, unsigned short gate, unsigned short invert, unsigned short latch)
-{
- long Data, DGData, Delay_ext;
- long internal;
- short ret;
-
-
- ret = VME_register_read(hdev, 0x10, &Data);
- // check and correct values
- if(ret<=0) return -1;
-
- if(channel >1) channel =1;
- if(invert >1) invert =1;
- if(latch >1) latch =1;
- if(output >1) output =1;
- if(trigger >6) trigger =0;
-
- // define Delay and Gate data
- DGData = gate * 0x10000;
- DGData += (unsigned short) delay;
-
- // Set channel, output, invert, latch
- if (output == 0)
- {
- Data = Data & 0xFFFFFF00;
- Data += 0x04 + channel +0x08*invert + 0x10*latch;
- }
- if (output == 1)
- {
- Data = Data & 0xFFFF00FF;
- Data += (0x04 + channel +0x08*invert + 0x10*latch)*0x100;
- }
-
- // Set trigger, delay, gate
-
- if(channel ==0) // CHANNEL DGG_A
- {
- internal = (trigger * 0x1000000) ;
- Data= Data & 0xF0FFFFFF;
- Data += internal;
- ret = VME_register_write(hdev,0x10,Data);
- if(ret<=0) return -1;
- ret=VME_register_write(hdev,0x14,DGData);
- if(ret<=0) return -1;
- // Set coarse delay in DGG_Extended register
- ret = VME_register_read(hdev,0x38,&Data);
- Delay_ext= (Data & 0xffff0000);
- Delay_ext+= ((delay/0x10000) & 0xffff);
- ret = VME_register_write(hdev,0x38,Delay_ext);
- }
- if( channel ==1) // CHANNEL DGG_B
- {
- internal = (trigger * 0x10000000) ;
- Data= Data & 0x0FFFFFFF;
- Data += internal;
- ret = VME_register_write(hdev,0x10,Data);
- if(ret<=0) return -1;
- ret=VME_register_write(hdev,0x18,DGData);
- if(ret<=0) return -1;
- // Set coarse delay in DGG_Extended register
- ret = VME_register_read(hdev,0x38,&Data);
- Delay_ext= (Data & 0x0000ffff);
- Delay_ext+= (delay & 0xffff0000);
- ret = VME_register_write(hdev,0x38,Delay_ext);
- }
- return 1;
-
-}
-
-/*
-******** VME_Output_settings ************************
-
- Sets the vmusb NIM output register
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Channel: The number which corresponds to an output:
- 1 - for Output 1
- 2 - for Output 2
- code: The Output selector code, valid values
- are listed in the manual
- invert: to invert the output
- latch: sets latch bit
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch)
-{
-
- short ret;
-// long internal;
- long Data;
-
- if( (Channel <1) ||(Channel > 2) || (code < 0) || (code > 7)) return -1;
- VME_register_read(hdev,0x10,&Data);
- if(Channel == 1)
- {
- Data = Data & 0xFFFF00;
- Data = Data | code;
- if (invert == 1 && latch == 1) Data = Data | 0x18;
- if (invert == 1 && latch == 0) Data = Data | 0x08;
- if (invert == 0 && latch == 1) Data = Data | 0x10;
- }
- if(Channel == 2)
- {
- Data = Data & 0xFF00FF;
- Data = Data | (code * 0x0100);
- if (invert == 1 && latch == 1) Data = Data | 0x1800;
- if (invert == 1 && latch == 0) Data = Data | 0x0800;
- if (invert == 0 && latch == 1) Data = Data | 0x1000;
- }
- ret = VME_register_write(hdev, 0x10, Data);
- return ret;
-}
-
-
-//******************************************************//
-//****************** CC_USB Registers ******************//
-//******************************************************//
-// The following are functions used to set the registers
-// in the CAMAC_USB
-
-/*
-******** CAMAC_register_write *****************
-
- Performs a CAMAC write to CC_USB register
-
- Parameters:
- hdev: USB device handle returned from an open function
- A: CAMAC Subaddress
- F: CAMAC Function
- Data: data to be written
-
- Returns:
- Number of bytes written to xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data)
-{
- int F = 16;
- int N = 25;
- long intbuf[4];
- int ret;
-
- intbuf[0]=1;
- intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
- intbuf[0]=3;
- intbuf[2]=(Data & 0xffff);
- intbuf[3]=((Data >>16) & 0xffff);
- ret = xxusb_stack_execute(hdev, intbuf);
-
- return ret;
-}
-
-/*
-******** CAMAC_register_read ************************
-
- Performs a CAMAC read from CC_USB register
-
- Parameters:
- hdev: USB device handle returned from an open function
- N: CAMAC Station Number
- A: CAMAC Subaddress
- F: CAMAC Function
- Q: The Q response from the CAMAC dataway
- X: The comment accepted response from CAMAC dataway
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data)
-{
- int F = 0;
- int N = 25;
- long intbuf[4];
- int ret;
-
- intbuf[0]=1;
- intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Data=intbuf[0] + (intbuf[1] * 0x10000);
-
- return ret;
-}
-
-/*
-******** CAMAC_DGG ************************
-
- Sets the parameters for Gate & Delay channel A of CC_USB
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- channel: Which DGG channel to use Valid Values are:
- 0 - For DGG A
- 1 - For DGG B
- trigger: Determines what triggers the start of the DGG Valid values are:
- 0 - Channel disabled
- 1 - NIM input 1
- 2 - NIM input 2
- 3 - NIM input 2
- 4 - Event Trigger
- 5 - End of Event
- 6 - USB Trigger
- 7 - Pulser
- output: Determines which NIM output to use for the channel, Vaild values are:
- 1 - for NIM O1
- 2 - for NIM O2
- 3 - for NIM O3
- delay: Delay in steps of 12.5ns between trigger and start of gate
- gate: the time the gate should stay open in steps of 12.5ns
- invert: is 1 if you wish to invert the DGG channel output
- latch: is 1 if you wish to run the DGG channel latched
-
- Returns:
- Returns 1 when successful
- Upon failure, a negative number
-*/
-short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output,
- int delay, int gate, short invert, short latch)
-
-
-
-{
-// short channel_ID;
- long Data;
- long internal;
- short ret;
- long Delay_ext;
-
- ret = CAMAC_register_read(hdev,5,&Data);
- //Set trigger
- if((output < 1 ) || (output >3) || (channel < 0 ) || (channel > 1))
- return -1;
- if(output ==1)
- {
- if(channel ==0)
- {
- internal = 0x03;
- } else {
- internal = 0x04;
- }
- }
- if(output ==2)
- {
- if(channel ==0)
- {
- internal = 0x04;
- } else {
- internal = 0x05;
- }
- }
- if(output ==3)
- {
- if(channel ==0)
- {
- internal = 0x05;
- } else {
- internal = 0x06;
- }
- }
-
-
-// Set invert bit
- if(invert ==1)
- internal = internal | 0x10;
- else
- internal = internal & 0x0F;
- // Set Latch Bit
- if(latch==1)
- internal = internal | 0x20;
- else
- internal = internal & 0x1F;
-// Add new data to old
- if(output == 1)
- {
- Data = Data & 0xFFFF00;
- Data = Data | internal;
- }
- if(output == 2)
- {
- Data = Data & 0xFF00FF;
- Data = Data |(internal * 0x100);
- }
- if(output == 3)
- {
- Data = Data & 0x00FFFF;
- Data = Data | (internal * 0x10000) ;
- }
- CAMAC_register_write(hdev, 5, Data);
- ret = CAMAC_register_read(hdev,6,&Data);
-//Set Trigger
- if(trigger <0 || trigger > 7)
- return -1;
- if(channel ==0)
- {
- Data = Data & 0xFF00FFFF;
- internal = trigger * 0x10000;
- Data = Data | internal;
- } else {
- Data = Data & 0x00FFFFFF;
- internal = trigger * 0x1000000;
- Data = Data | internal;
- }
- ret = CAMAC_register_write(hdev, 6, Data);
- if(channel == 0)
- {
-// Write Delay and Gate info
- ret = CAMAC_register_read(hdev,13,&Data);
- Delay_ext= (Data & 0xffff0000);
- Delay_ext+= ((delay/0x10000) & 0xffff);
- internal = gate * 0x10000;
- Data = internal + (delay & 0xffff);
- ret=CAMAC_register_write(hdev,7,Data);
-// Set coarse delay in DGG_Extended register
- ret=CAMAC_register_write(hdev,13,Delay_ext);
- }
- else
- {
- ret=CAMAC_register_write(hdev,8,Data);
- ret = CAMAC_register_read(hdev,13,&Data);
- Delay_ext= (Data & 0x0000ffff);
- Delay_ext+= (delay & 0xffff0000);
- internal = gate * 0x10000;
- Data = internal + (delay & 0xffff);
-// Set coarse delay in DGG_Extended register
- ret=CAMAC_register_write(hdev,13,Delay_ext);
- }
- return 1;
-}
-
-/*
-******** CAMAC_LED_settings ************************
-
- Writes a data word to the vmusb LED register
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- LED: The number which corresponds to an LED values are:
- 1 - for RED LED
- 2 - for GREEN LED
- 3 - for Yellow LED
- code: The LED aource selector code, valid values for each LED
- are listed in the manual
- invert: to invert the LED lighting
- latch: sets LED latch bit
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch)
-{
-
- short ret;
-// long internal;
- long Data;
-
- if( (LED <1) ||(LED > 3) || (code < 0) || (code > 7))
- return -1;
-
- CAMAC_register_read(hdev,4,&Data);
-
- if(LED == 1)
- {
- Data = Data & 0xFFFF00;
- Data = Data | code;
- if (invert == 1 && latch == 1)
- Data = Data | 0x30;
- if (invert == 1 && latch == 0)
- Data = Data | 0x10;
- if (invert == 0 && latch == 1)
- Data = Data | 0x20;
- }
- if(LED == 2)
- {
- Data = Data & 0xFF00FF;
- Data = Data | (code * 0x0100);
- if (invert == 1 && latch == 1)
- Data = Data | 0x3000;
- if (invert == 1 && latch == 0)
- Data = Data | 0x1000;
- if (invert == 0 && latch == 1)
- Data = Data | 0x2000;
- }
- if(LED == 3)
- {
- Data = Data & 0x00FFFF;
- Data = Data | (code * 0x10000);
- if (invert == 1 && latch == 1)
- Data = Data | 0x300000;
- if (invert == 1 && latch == 0)
- Data = Data | 0x100000;
- if (invert == 0 && latch == 1)
- Data = Data | 0x200000;
- }
- ret = CAMAC_register_write(hdev, 4, Data);
- return ret;
-}
-
-/*
-******** CAMAC_Output_settings ************************
-
- Writes a data word to the vmusb LED register
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Channel: The number which corresponds to an output:
- 1 - for Output 1
- 2 - for Output 2
- 3 - for Output 3
- code: The Output selector code, valid values
- are listed in the manual
- invert: to invert the output
- latch: sets latch bit
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch)
-{
- short ret;
-// long internal;
- long Data;
-
- if( (Channel <1) ||(Channel > 3) || (code < 0) || (code > 7))
- return -1;
-
- CAMAC_register_read(hdev,5,&Data);
-
- if(Channel == 1)
- {
- Data = Data & 0xFFFF00;
- Data = Data | code;
- if (invert == 1 && latch == 1)
- Data = Data | 0x30;
- if (invert == 1 && latch == 0)
- Data = Data | 0x10;
- if (invert == 0 && latch == 1)
- Data = Data | 0x20;
- }
- if(Channel == 2)
- {
- Data = Data & 0xFF00FF;
- Data = Data | (code * 0x0100);
- if (invert == 1 && latch == 1)
- Data = Data | 0x3000;
- if (invert == 1 && latch == 0)
- Data = Data | 0x1000;
- if (invert == 0 && latch == 1)
- Data = Data | 0x2000;
- }
- if(Channel == 3)
- {
- Data = Data & 0x00FFFF;
- Data = Data | (code * 0x10000);
- if (invert == 1 && latch == 1)
- Data = Data | 0x300000;
- if (invert == 1 && latch == 0)
- Data = Data | 0x100000;
- if (invert == 0 && latch == 1)
- Data = Data | 0x200000;
- }
- ret = CAMAC_register_write(hdev, 5, Data);
- return ret;
-}
-
-/*
-******** CAMAC_write_LAM_mask ************************
-
- Writes the data word to the LAM mask register
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Data: LAM mask to write
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data)
-{
- short ret;
- ret = CAMAC_register_write(hdev, 9, Data);
-
- return ret;
-}
-
-/*
-******** CAMAC_read_LAM_mask ************************
-
- Writes the data word to the LAM mask register
-
- Parameters:
- hdev: USB devcie handle returned from an open function
- Data: LAM mask to write
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data)
-{
- long intbuf[4];
- int ret;
- int N = 25;
- int F = 0;
- int A = 9;
-
- // CAMAC direct read function
- intbuf[0]=1;
- intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Data=intbuf[0] + (intbuf[1] & 255) * 0x10000;
- return ret;
-}
-
-
-//******************************************************//
-//**************** EZ_CAMAC Functions ******************//
-//******************************************************//
-// The following are functions used to perform simple
-// CAMAC Functions with the CC_USB
-
-
-/*
-******** CAMAC_write ************************
-
- Performs a CAMAC write using NAF comments
-
- Parameters:
- hdev: USB device handle returned from an open function
- N: CAMAC Station Number
- A: CAMAC Subaddress
- F: CAMAC Function (16...23)
- Q: The Q response from the CAMAC dataway
- X: The comment accepted response from CAMAC dataway
-
- Returns:
- Number of bytes written to xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X)
-{
- long intbuf[4];
- int ret;
-// CAMAC direct write function
- intbuf[0]=1;
- intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
- if ((F > 15) && (F < 24))
- {
- intbuf[0]=3;
- intbuf[2]=(Data & 0xffff);
- intbuf[3]=((Data >>16) & 255);
- ret = xxusb_stack_execute(hdev, intbuf);
- *Q = (intbuf[0] & 1);
- *X = ((intbuf[0] >> 1) & 1);
- }
- return ret;
-}
-
-/*
-******** CAMAC_read ************************
-
- Performs a CAMAC read using NAF comments
-
- Parameters:
- hdev: USB device handle returned from an open function
- N: CAMAC Station Number
- A: CAMAC Subaddress
- F: CAMAC Function (F<16 or F>23)
- Q: The Q response from the CAMAC dataway
- X: The comment accepted response from CAMAC dataway
-
- Returns:
- Number of bytes read from xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X)
-{
- long intbuf[4];
- int ret;
- // CAMAC direct read function
- intbuf[0]=1;
- intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- if ((F < 16) || (F >23))
- {
- *Data=intbuf[0] + (intbuf[1] & 255) * 0x10000; //24-bit word
- *Q = ((intbuf[1] >> 8) & 1);
- *X = ((intbuf[1] >> 9) & 1);
- }
- return ret;
-}
-
-/*
-******** CAMAC_Z ************************
-
- Performs a CAMAC init
-
- Parameters:
- hdev: USB device handle returned from an open function
-
- Returns:
- Number of bytes written to xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_Z(usb_dev_handle *hdev)
-{
- long intbuf[4];
- int ret;
-// CAMAC Z = N(28) A(8) F(29)
- intbuf[0]=1;
- intbuf[1]=(long)(29+8*32+28*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-/*
-******** CAMAC_C ************************
-
- Performs a CAMAC clear
-
- Parameters:
- hdev: USB device handle returned from an open function
-
- Returns:
- Number of bytes written to xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_C(usb_dev_handle *hdev)
-{
- long intbuf[4];
- int ret;
- intbuf[0]=1;
- intbuf[1]=(long)(29+9*32+28*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-/*
-******** CAMAC_I ************************
-
- Set CAMAC inhibit
-
- Parameters:
- hdev: USB device handle returned from an open function
-
- Returns:
- Number of bytes written to xxusb when successful
- Upon failure, a negative number
-*/
-short CAMAC_I(usb_dev_handle *hdev, int inhibit)
-{
- long intbuf[4];
- int ret;
- intbuf[0]=1;
- if (inhibit) intbuf[1]=(long)(24+9*32+29*512 + 0x4000);
- else intbuf[1]=(long)(26+9*32+29*512 + 0x4000);
- ret = xxusb_stack_execute(hdev, intbuf);
- return ret;
-}
-
-
Index: sipmscan/trunk/input/libxxusb.h.online
===================================================================
--- sipmscan/trunk/input/libxxusb.h.online (revision 144)
+++ sipmscan/trunk/input/libxxusb.h.online (nonexistent)
@@ -1,111 +0,0 @@
-#include <usb.h>
-
-
-#define XXUSB_WIENER_VENDOR_ID 0x16DC /* Wiener, Plein & Baus */
-#define XXUSB_VMUSB_PRODUCT_ID 0x000B /* VM-USB */
-#define XXUSB_CCUSB_PRODUCT_ID 0x0001 /* CC-USB */
-#define XXUSB_ENDPOINT_OUT 2 /* Endpoint 2 Out*/
-#define XXUSB_ENDPOINT_IN 0x86 /* Endpoint 6 In */
-#define XXUSB_FIRMWARE_REGISTER 0
-#define XXUSB_GLOBAL_REGISTER 1
-#define XXUSB_ACTION_REGISTER 10
-#define XXUSB_DELAYS_REGISTER 2
-#define XXUSB_WATCHDOG_REGISTER 3
-#define XXUSB_SELLEDA_REGISTER 6
-#define XXUSB_SELNIM_REGISTER 7
-#define XXUSB_SELLEDB_REGISTER 4
-#define XXUSB_SERIAL_REGISTER 15
-#define XXUSB_LAMMASK_REGISTER 8
-#define XXUSB_LAM_REGISTER 12
-#define XXUSB_READOUT_STACK 2
-#define XXUSB_SCALER_STACK 3
-#define XXUSB_NAF_DIRECT 12
-
-struct XXUSB_STACK
-{
-long Data;
-short Hit;
-short APatt;
-short Num;
-short HitMask;
-};
-
-struct XXUSB_CC_COMMAND_TYPE
-{
-short Crate;
-short F;
-short A;
-short N;
-long Data;
-short NoS2;
-short LongD;
-short HitPatt;
-short QStop;
-short LAMMode;
-short UseHit;
-short Repeat;
-short AddrScan;
-short FastCam;
-short NumMod;
-short AddrPatt;
-long HitMask[4];
-long Num;
-};
-
-struct xxusb_device_typ
-{
- struct usb_device *usbdev;
- char SerialString[7];
-};
-
-typedef struct xxusb_device_typ xxusb_device_type;
-typedef unsigned char UCHAR;
-typedef struct usb_bus usb_busx;
-
-
-int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout);
-
-short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData);
-short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *StackData);
-short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *StackData);
-short xxusb_stack_execute(usb_dev_handle *hDev, long *StackData);
-short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData);
-short xxusb_reset_toggle(usb_dev_handle *hDev);
-
-short xxusb_devices_find(xxusb_device_type *xxusbDev);
-short xxusb_device_close(usb_dev_handle *hDev);
-usb_dev_handle* xxusb_device_open(struct usb_device *dev);
-short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect);
-short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config);
-usb_dev_handle* xxusb_serial_open(char *SerialString);
-
-short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data);
-short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data);
-short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
-short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger,unsigned short output, long delay, unsigned short gate, unsigned short invert, unsigned short latch);
-
-short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
-
-short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data);
-short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data);
-short VME_BLT_read_32(usb_dev_handle *hdev, short Address_Modifier, int count, long VME_Address, long Data[]);
-short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
-short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
-
-short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output, int delay, int gate, short invert, short latch);
-short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data);
-short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data);
-short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
-short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
-short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data);
-short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data);
-
-short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X);
-short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X);
-short CAMAC_Z(usb_dev_handle *hdev);
-short CAMAC_C(usb_dev_handle *hdev);
-short CAMAC_I(usb_dev_handle *hdev, int inhibit);
-
Index: sipmscan/trunk/input/start.sh.in
===================================================================
--- sipmscan/trunk/input/start.sh.in (revision 144)
+++ sipmscan/trunk/input/start.sh.in (nonexistent)
@@ -1,23 +0,0 @@
-if [ $rootdirectory != -1 ]; then
- printenv ROOTSYS > /dev/null
- if [ $? != 0 ]; then
- echo "Preparing ROOT..."
- source $rootdirectory/bin/thisroot.sh
- fi
-fi
-
-if [ $snmpdirectory != -1 ]; then
- printenv PATH | grep "snmp" > /dev/null
- if [ $? != 0 ]; then
- echo "Preparing NET-SNMP..."
- export PATH=$snmpdirectory/bin:$PATH
- fi
-fi
-
-if [ ! -d results ]; then
- mkdir results
-fi
-
-root -l "$dir/start.cxx(\"$dir\")"
-
-
/sipmscan/trunk/input/start.sh.in
Property changes:
Deleted: svn:executable
## -1 +0,0 ##
-*
\ No newline at end of property
Index: sipmscan/trunk/input/workstation.h.in
===================================================================
--- sipmscan/trunk/input/workstation.h.in (revision 144)
+++ sipmscan/trunk/input/workstation.h.in (nonexistent)
@@ -1,14 +0,0 @@
-#ifndef _workstation_h_
-#define _workstation_h_
-
-// Define the working computer (O=offline, S=offline with scope, I=IJS/online) and the base directory
-#define WORKSTAT 'N'
-
-// Define if working computer is connected to IJS ethernet network (for fieldpoint)
-#define IJSNET 1
-
-#ifdef WORKSTAT
- #define rootdir "path-to-installation"
-#endif
-
-#endif
Index: sipmscan/trunk/input/usb.h.offline
===================================================================
--- sipmscan/trunk/input/usb.h.offline (revision 144)
+++ sipmscan/trunk/input/usb.h.offline (nonexistent)
@@ -1,344 +0,0 @@
-/*
- * Prototypes, structure definitions and macros.
- *
- * Copyright (c) 2000-2003 Johannes Erdfelt <johannes@erdfelt.com>
- *
- * This library is covered by the LGPL, read LICENSE for details.
- *
- * This file (and only this file) may alternatively be licensed under the
- * BSD license as well, read LICENSE for details.
- */
-#ifndef __USB_H__
-#define __USB_H__
-
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdint.h>
-#include <limits.h>
-
-#include <sys/param.h>
-#include <dirent.h>
-
-/*
- * USB spec information
- *
- * This is all stuff grabbed from various USB specs and is pretty much
- * not subject to change
- */
-
-/*
- * Device and/or Interface Class codes
- */
-#define USB_CLASS_PER_INTERFACE 0 /* for DeviceClass */
-#define USB_CLASS_AUDIO 1
-#define USB_CLASS_COMM 2
-#define USB_CLASS_HID 3
-#define USB_CLASS_PRINTER 7
-#define USB_CLASS_PTP 6
-#define USB_CLASS_MASS_STORAGE 8
-#define USB_CLASS_HUB 9
-#define USB_CLASS_DATA 10
-#define USB_CLASS_VENDOR_SPEC 0xff
-
-/*
- * Descriptor types
- */
-#define USB_DT_DEVICE 0x01
-#define USB_DT_CONFIG 0x02
-#define USB_DT_STRING 0x03
-#define USB_DT_INTERFACE 0x04
-#define USB_DT_ENDPOINT 0x05
-
-#define USB_DT_HID 0x21
-#define USB_DT_REPORT 0x22
-#define USB_DT_PHYSICAL 0x23
-#define USB_DT_HUB 0x29
-
-/*
- * Descriptor sizes per descriptor type
- */
-#define USB_DT_DEVICE_SIZE 18
-#define USB_DT_CONFIG_SIZE 9
-#define USB_DT_INTERFACE_SIZE 9
-#define USB_DT_ENDPOINT_SIZE 7
-#define USB_DT_ENDPOINT_AUDIO_SIZE 9 /* Audio extension */
-#define USB_DT_HUB_NONVAR_SIZE 7
-
-/* All standard descriptors have these 2 fields in common */
-struct usb_descriptor_header {
- uint8_t bLength;
- uint8_t bDescriptorType;
-} __attribute__ ((packed));
-
-/* String descriptor */
-struct usb_string_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint16_t wData[1];
-} __attribute__ ((packed));
-
-/* HID descriptor */
-struct usb_hid_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint16_t bcdHID;
- uint8_t bCountryCode;
- uint8_t bNumDescriptors;
- /* uint8_t bReportDescriptorType; */
- /* uint16_t wDescriptorLength; */
- /* ... */
-} __attribute__ ((packed));
-
-/* Endpoint descriptor */
-#define USB_MAXENDPOINTS 32
-struct usb_endpoint_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint8_t bEndpointAddress;
- uint8_t bmAttributes;
- uint16_t wMaxPacketSize;
- uint8_t bInterval;
- uint8_t bRefresh;
- uint8_t bSynchAddress;
-
- unsigned char *extra; /* Extra descriptors */
- int extralen;
-};
-
-#define USB_ENDPOINT_ADDRESS_MASK 0x0f /* in bEndpointAddress */
-#define USB_ENDPOINT_DIR_MASK 0x80
-
-#define USB_ENDPOINT_TYPE_MASK 0x03 /* in bmAttributes */
-#define USB_ENDPOINT_TYPE_CONTROL 0
-#define USB_ENDPOINT_TYPE_ISOCHRONOUS 1
-#define USB_ENDPOINT_TYPE_BULK 2
-#define USB_ENDPOINT_TYPE_INTERRUPT 3
-
-/* Interface descriptor */
-#define USB_MAXINTERFACES 32
-struct usb_interface_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint8_t bInterfaceNumber;
- uint8_t bAlternateSetting;
- uint8_t bNumEndpoints;
- uint8_t bInterfaceClass;
- uint8_t bInterfaceSubClass;
- uint8_t bInterfaceProtocol;
- uint8_t iInterface;
-
- struct usb_endpoint_descriptor *endpoint;
-
- unsigned char *extra; /* Extra descriptors */
- int extralen;
-};
-
-#define USB_MAXALTSETTING 128 /* Hard limit */
-struct usb_interface {
- struct usb_interface_descriptor *altsetting;
-
- int num_altsetting;
-};
-
-/* Configuration descriptor information.. */
-#define USB_MAXCONFIG 8
-struct usb_config_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint16_t wTotalLength;
- uint8_t bNumInterfaces;
- uint8_t bConfigurationValue;
- uint8_t iConfiguration;
- uint8_t bmAttributes;
- uint8_t MaxPower;
-
- struct usb_interface *interface;
-
- unsigned char *extra; /* Extra descriptors */
- int extralen;
-};
-
-/* Device descriptor */
-struct usb_device_descriptor {
- uint8_t bLength;
- uint8_t bDescriptorType;
- uint16_t bcdUSB;
- uint8_t bDeviceClass;
- uint8_t bDeviceSubClass;
- uint8_t bDeviceProtocol;
- uint8_t bMaxPacketSize0;
- uint16_t idVendor;
- uint16_t idProduct;
- uint16_t bcdDevice;
- uint8_t iManufacturer;
- uint8_t iProduct;
- uint8_t iSerialNumber;
- uint8_t bNumConfigurations;
-} __attribute__ ((packed));
-
-struct usb_ctrl_setup {
- uint8_t bRequestType;
- uint8_t bRequest;
- uint16_t wValue;
- uint16_t wIndex;
- uint16_t wLength;
-} __attribute__ ((packed));
-
-/*
- * Standard requests
- */
-#define USB_REQ_GET_STATUS 0x00
-#define USB_REQ_CLEAR_FEATURE 0x01
-/* 0x02 is reserved */
-#define USB_REQ_SET_FEATURE 0x03
-/* 0x04 is reserved */
-#define USB_REQ_SET_ADDRESS 0x05
-#define USB_REQ_GET_DESCRIPTOR 0x06
-#define USB_REQ_SET_DESCRIPTOR 0x07
-#define USB_REQ_GET_CONFIGURATION 0x08
-#define USB_REQ_SET_CONFIGURATION 0x09
-#define USB_REQ_GET_INTERFACE 0x0A
-#define USB_REQ_SET_INTERFACE 0x0B
-#define USB_REQ_SYNCH_FRAME 0x0C
-
-#define USB_TYPE_STANDARD (0x00 << 5)
-#define USB_TYPE_CLASS (0x01 << 5)
-#define USB_TYPE_VENDOR (0x02 << 5)
-#define USB_TYPE_RESERVED (0x03 << 5)
-
-#define USB_RECIP_DEVICE 0x00
-#define USB_RECIP_INTERFACE 0x01
-#define USB_RECIP_ENDPOINT 0x02
-#define USB_RECIP_OTHER 0x03
-
-/*
- * Various libusb API related stuff
- */
-
-#define USB_ENDPOINT_IN 0x80
-#define USB_ENDPOINT_OUT 0x00
-
-/* Error codes */
-#define USB_ERROR_BEGIN 500000
-
-/*
- * This is supposed to look weird. This file is generated from autoconf
- * and I didn't want to make this too complicated.
- */
-#if 0
-#define USB_LE16_TO_CPU(x) do { x = ((x & 0xff) << 8) | ((x & 0xff00) >> 8); } while(0)
-#else
-#define USB_LE16_TO_CPU(x)
-#endif
-
-/* Data types */
-struct usb_device;
-struct usb_bus;
-
-/*
- * To maintain compatibility with applications already built with libusb,
- * we must only add entries to the end of this structure. NEVER delete or
- * move members and only change types if you really know what you're doing.
- */
-#ifdef PATH_MAX
-#define LIBUSB_PATH_MAX PATH_MAX
-#else
-#define LIBUSB_PATH_MAX 4096
-#endif
-struct usb_device {
- struct usb_device *next, *prev;
-
- char filename[LIBUSB_PATH_MAX + 1];
-
- struct usb_bus *bus;
-
- struct usb_device_descriptor descriptor;
- struct usb_config_descriptor *config;
-
- void *dev; /* Darwin support */
-
- uint8_t devnum;
-
- unsigned char num_children;
- struct usb_device **children;
-};
-
-struct usb_bus {
- struct usb_bus *next, *prev;
-
- char dirname[LIBUSB_PATH_MAX + 1];
-
- struct usb_device *devices;
- uint32_t location;
-
- struct usb_device *root_dev;
-};
-
-struct usb_dev_handle;
-typedef struct usb_dev_handle usb_dev_handle;
-
-/* Variables */
-extern struct usb_bus *usb_busses;
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-
-/* Function prototypes */
-
-/* usb.c */
-usb_dev_handle *usb_open(struct usb_device *dev);
-int usb_close(usb_dev_handle *dev);
-int usb_get_string(usb_dev_handle *dev, int index, int langid, char *buf,
- size_t buflen);
-int usb_get_string_simple(usb_dev_handle *dev, int index, char *buf,
- size_t buflen);
-
-/* descriptors.c */
-int usb_get_descriptor_by_endpoint(usb_dev_handle *udev, int ep,
- unsigned char type, unsigned char index, void *buf, int size);
-int usb_get_descriptor(usb_dev_handle *udev, unsigned char type,
- unsigned char index, void *buf, int size);
-
-/* <arch>.c */
-int usb_bulk_write(usb_dev_handle *dev, int ep, const char *bytes, int size,
- int timeout);
-int usb_bulk_read(usb_dev_handle *dev, int ep, char *bytes, int size,
- int timeout);
-int usb_interrupt_write(usb_dev_handle *dev, int ep, const char *bytes, int size,
- int timeout);
-int usb_interrupt_read(usb_dev_handle *dev, int ep, char *bytes, int size,
- int timeout);
-int usb_control_msg(usb_dev_handle *dev, int requesttype, int request,
- int value, int index, char *bytes, int size, int timeout);
-int usb_set_configuration(usb_dev_handle *dev, int configuration);
-int usb_claim_interface(usb_dev_handle *dev, int interface);
-int usb_release_interface(usb_dev_handle *dev, int interface);
-int usb_set_altinterface(usb_dev_handle *dev, int alternate);
-int usb_resetep(usb_dev_handle *dev, unsigned int ep);
-int usb_clear_halt(usb_dev_handle *dev, unsigned int ep);
-int usb_reset(usb_dev_handle *dev);
-
-#if 1
-#define LIBUSB_HAS_GET_DRIVER_NP 1
-int usb_get_driver_np(usb_dev_handle *dev, int interface, char *name,
- unsigned int namelen);
-#define LIBUSB_HAS_DETACH_KERNEL_DRIVER_NP 1
-int usb_detach_kernel_driver_np(usb_dev_handle *dev, int interface);
-#endif
-
-char *usb_strerror(void);
-
-void usb_init(void);
-void usb_set_debug(int level);
-int usb_find_busses(void);
-int usb_find_devices(void);
-struct usb_device *usb_device(usb_dev_handle *dev);
-struct usb_bus *usb_get_busses(void);
-
-#ifdef __cplusplus
-}
-#endif
-
-#endif /* __USB_H__ */
-
Index: sipmscan/trunk/input/daqusb.C.offline
===================================================================
--- sipmscan/trunk/input/daqusb.C.offline (revision 144)
+++ sipmscan/trunk/input/daqusb.C.offline (nonexistent)
@@ -1,258 +0,0 @@
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <sys/mman.h>
-#include <errno.h>
-#include <signal.h>
-#include <ctype.h>
-#include <time.h>
-//#include "wusbxx_dll.h" /* the header of the shared library */
-#include "daq.h"
-
-//#define DEBUG /* vkljuci dodatni izpis */
-#ifdef DEBUG
- #define DBG(X) X
- #define DBGFUNI(X) printf(">>> %s -> %d\n",#X,(X))
-#else
- #define DBG(X)
- #define DBGFUNI(X) X
-#endif
-
-/* definiram lokacije enot*/
-//#define NTDC 1 /* TDC */
-//#define NTDCCH 8
-//#define NADC 2 /* ADC */
-//#define NADCCH 8
-int ctrlc=0;
-char *ccserial=(char*)"CC0126";
-int devDetect; // variable to tell if we detect any devices
-
-int daq::connect(){
-// odpri daq
-/* xxusb_device_type devices[100];
- //struct usb_device *dev;
- devDetect = xxusb_devices_find(devices);
-// printf("Detected devices: %d\n", devDetect);
- //dev = devices[0].usbdev;
- //udev = xxusb_device_open(dev);
-
- if(devDetect > 0)
- {
- WUSBXX_load(NULL);
- WUSBXX_open(ccserial);
- printf("daq::connect()\n");
- }
- else
-*/ printf("daq::connect() - No devices were detected!\n");
- return 0;
-}
-
-int daq::init(int chan = 0){
-
-// int i;
-// long k;
-
-/* DBGFUNI(xxusb_register_write(udev,1,0x0)); // Stop DAQ mode
- while (xxusb_usbfifo_read(udev, (int*) stackdump,BUFF_L,100)>0);
-
- CCCZ;
- CCCC;
- CREM_I;
-
- NTDC = 1;
- NADC = 2;
- if(chan != 0)
- {
- NTDCCH = chan/2;
- NADCCH = chan/2;
- }
- else
- {
- NTDCCH = 1;
- NADCCH = 1;
- }
- printf("after: NTDCCH = %d, NADCCH = %d\n", NTDCCH, NADCCH);
-
-// create command stack for the TDC and ADC
- k=1;
- for(i=0;(i<NTDCCH)&&(i<NADCCH);i++) { stackwrite[k++]=NAF(NTDC,i,0); stackwrite[k++]=NAF(NADC,i,0); }
-// for(i=0;i<NADCCH;i++) stackwrite[k++]=NAF(NADC,i,0);
- stackwrite[k++]=NAF(NTDC,0,9);
- stackwrite[k++]=NAF(NADC,0,9);
- stackwrite[k++]=NAFS(0,0,16); // insert next word to data
- stackwrite[k++]=0xfafb; // event termination word
- stackwrite[0]=k-1;
-// upload stack #2
- xxusb_stack_write(udev,0x2,(long int *)stackwrite);
- xxusb_stack_read(udev,0x2,(long int *) stackdata);
- DBG(for(i=0;i<k;i++) printf("0x%04x\n",stackdata[i]);)
-
- int ret[10];
-
- CAMAC_LED_settings(udev, 1,1,0,0);
- ret[0] = CAMAC_register_read(udev,0,&k);
- printf("Firmware ID (return %d) -> 0x%08lX\n",ret[0],k); // GKM: Firmware ID (i.e. 0x72000001 = 0111 0010 0000 0000 0000 0000 0000 0001)
- ret[1] = CAMAC_register_read(udev,1,&k);
- printf("Global Mode (return %d) -> 0x%08lX\n",ret[1],k);
- k=(k&0xF000)|0x0005; // set buffer length: n=0..6 -> 0x10000 >> n, n=7 -> single event
- ret[0] = CAMAC_register_write(udev,1,k); // GKM: sets the buffer length (i.e. k=5 -> buf length=128 words)
- ret[1] = CAMAC_register_write(udev,2,0x80); // wait 0x80 us after trigger // GKM: delay settings in microseconds
- ret[2] = CAMAC_register_write(udev,3,0x0); // Scaler Readout Control Register // GKM: scaler readout settings - sets the frequency of readout (if 0, it is disabled)
- ret[3] = CAMAC_register_write(udev,9,0x0); // Lam Mask Register // GKM: When 0, readout is triggered by the signal on NIM input
- ret[4] = CAMAC_register_write(udev,14,0x0); // USB Bulk Transfer Setup Register
-
- // CAMAC_DGG(udev,1,2,3,0,200,0,0);
- // CAMAC_DGG(udev,0,0,0,0,100,0,0);
- ret[5] = CAMAC_register_write(udev,5,(0x06<<16)+(0x04<<8)+0x00); // output // GKM: NIM outputs (i.e. 0x060400 = 00 0110 0000 0100 0000 0000 -> NIM O2=DGG_B, NIM O3=DGG_A)
- ret[6] = CAMAC_register_write(udev,6,(0x01<<24)+(0x01<<16)+(0x0<<8)+0x0); // SCLR & DGG // GKM: device source selector (i.e. 0x01010000 = 00 0000 0001 0000 0001 0000 0000 0000 0000 -> DGG_A=NIM I1, DGG_B=NIM I1, SCLR=disabled)
- ret[7] = CAMAC_register_write(udev,7,(100<<16)+0); // output // GKM: Delay and Gate Generator A registers (i.e. 0x00640000 = 0000 0000 0110 0100 0000 0000 0000 0000 -> DDG_A [gate=100, delay=0])
- ret[8] = CAMAC_register_write(udev,8,(10000<<16)+0); // output // GKM: Delay and Gate Generator B registers (i.e. 0x27100000 = 0010 0111 0001 0000 0000 0000 0000 0000 -> DDG_B [gate=10000, delay=0])
- ret[9] = CAMAC_register_write(udev,13,0); // output // GKM: Extended (course) delay (i.e. 0x00000000 = 0 -> DDG_A ext=0, DDG_B ext=0)
-
-// for(i = 0; i < 10; i++) printf("Setting %d? -> return = %d\n",i,ret[i]);
-
-// ret[0] = CAMAC_register_read(udev,1,&k);
-// printf("k (return %d) -> 0x%08lX\n",ret[0],k);
-
-*/ printf("daq::init()\n");
- return 0;
-}
-
-int daq::start(){
-// xxusb_register_write(udev,1,0x1); // Start DAQ mode
- printf("daq::start()\n");
- return 0;
-}
-
-int daq::stop(){
-// xxusb_register_write(udev,1,0x0); // Stop DAQ mode
-// while (xxusb_usbfifo_read(udev,(int *)stackdump,BUFF_L,30)>0);
- printf("daq::stop()\n");
- return 0;
-}
-
-int daq::event(unsigned int *data, int maxn){
-// int ib,count;
- int count;
-/* int events,evsize;
- short ret;
-
- ib=0;
- ret=xxusb_usbfifo_read(udev,(int *) stackdata,BUFF_L,500);
- events=stackdata[ib++];
- DBG(printf("ret=%d,events=0x%08x\n",ret,events);)
- if ((ret<0)||(ret!=(((NTDCCH+NADCCH)*4+4)*events+4))) return 0;
-
- count=0;
- while (ib<(ret/2-1)){
- evsize = stackdata[ib++]&0xffff;
- DBG(printf("Event:%d EvSize:%d\n", events, evsize);)
- for (int i=0;i<(NTDCCH+NADCCH);i++,ib++) data[count++] =stackdata[ib++]&0xffff;
- if (stackdata[ib++]!=0xfafb){
- printf("Error!\n");,
- return 0;
- }
- events--;
- if (fStop) return 0;
- }
- if (stackdata[ib++]!=0xffff){
- printf("Error!\n");
- return 0;
- }
-*/
- count = 1;
- return count;
-}
-
-int daq::disconnect(){
-// zapri daq
-// WUSBXX_close();
- printf("daq::disconnect()\n");
- return 0;
-}
-
-daq::daq(){
- fStop=0;
- connect();
-// if(devDetect > 0)
-// init();
-}
-
-daq::~daq(){
-disconnect();
-}
-
-#ifdef MAIN
-void CatchSig (int signumber)
-{
- ctrlc = 1;
-}
-
-
-int main (int argc, char **argv){
-
- int neve=1000000;
- char *fname="test.dat";
- if (argc==1) {
- printf("Uporaba: %s stevilo_dogodkov ime_datoteke\n",argv[0]);
- printf("Meritev prekini s Ctrl-C, ce je nabranih dogodkov ze dovolj\n");
- exit(0);
- }
- if (argc>1) neve = atoi(argv[1]);
- if (argc>2) fname = argv[2];
-
-
-// intercept routine
- if (signal (SIGINT, CatchSig) == SIG_E,RR) perror ("sigignore");
-
-#define BSIZE 10000
- int i,ieve,nc,nb;
-// int hdr[4]={1,(NTDCCH+4)*sizeof(int)}; // hdr[0]=1, hdr[1]=(NTDCCH+4)*4
- int hdr[4]={1,(NTDCCH+NADCCH+4)*sizeof(int)};
- unsigned short adc;
- unsigned int data[BSIZE];
- daq *d= new daq();,
- time_t time_check;,
-
-// odpremo datoteko za pisanje
- FILE *fp=fopen(fname,"w");
-
- d->start();
- ieve=0;
-
- while((ieve<neve)&&(!ctrlc)){
- nc=d->event(data,BSIZE);
- nb=0;
- while((nc>0)&&(ieve++<neve)&&(!ctrlc)){
- // zapis v datoteko
- hdr[2]=time(NULL);
- hdr[3]=ieve;
- fwrite(hdr,sizeof(int),4 ,fp);
- fwrite(&data[nb],sizeof(int),(NTDCCH+NADCCH),fp);
-// DBG(
- for(i=0;i<(NTDCCH+NADCCH);i++){
- adc=data[nb+i]&0xFFFF;
- if(i % 2 == 0)
-printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
-// printf("nev=%4d %d. TDC data=%d\n",ieve,i/2,adc);
- else if(i % 2 == 1)
-printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
-// printf("nev=%4d %d. ADC data=%d\n",ieve,i/2,adc);
- }
-printf("\n");
-// )
- nb+=(NTDCCH+NADCCH);
- nc-=(NTDCCH+NADCCH);
- if (!(ieve%1000)) printf("event no. -> %d\n",ieve);
- };
- };
-
- d->stop();
- fclose(fp);
- printf("Podatki so v datoteki %s\n", fname);
- delete d;
-
- return 0;
-}
-#endif
Index: sipmscan/trunk/input/Makefile.in
===================================================================
--- sipmscan/trunk/input/Makefile.in (revision 144)
+++ sipmscan/trunk/input/Makefile.in (nonexistent)
@@ -1,99 +0,0 @@
-# Make variables ----------------------------------------------------
-
-# ROOT include and libraries
-ROOTINC=$(shell root-config --incdir )
-ROOTLIB=$(shell root-config --libs )
-LIBS1=$(shell root-config --cflags --glibs )
-
-# Includes, 32 vs. 64 bit type, libraries
-INC=-I. -I$(ROOTINC)
-OSTYPE=none
-LIBS=$(ROOTLIB) -L./ -lm
-
-# Source and debug prefixes
-SRC = .
-DBG =
-
-# CAMAC DAQ library variables
-OBJ_FILES = wusbxx_dll.o libxxusb.o
-LIBFILE = libdaqusb.a
-
-# Specific variables for the main program
-TARGET = windowed_test
-DAQFILE = $(SRC)/daqusb.C
-FILES = $(SRC)/daqusb.C $(SRC)/windowed_test.C $(SRC)/daqscope.C
-HEADER = daq.h workstation.h root_include.h windowed_test.h
-CAMLIB = $(LIBFILE)
-SHLIB = $(LIBFILE) libvxi11.a
-
-# VXI scope connection variables, Scope DAQ library variables
-VXIDIR = ./vxi11_$(OSTYPE)
-#VXI_FILES = $(VXIDIR)/vxi11_user.o $(VXIDIR)/vxi11.h $(VXIDIR)/vxi11_clnt.c $(VXIDIR)/vxi11_xdr.c
-VXI_OBJECT = $(VXIDIR)/vxi11_user.o $(VXIDIR)/vxi11_clnt.o $(VXIDIR)/vxi11_xdr.o
-# -----------------------------------------------------------------------------
-
-# Base rules ------------------------------------------------------------------
-
-# Make the main program and libraries
-all: $(TARGET) libdaqusb.so libvxi11.so
-
-# Rules for making the main program
-$(TARGET): $(FILES) workstation.h daq.h library $(SHLIB)
- @echo "Generating dictionary Dict.C..."
- rootcint -f GuiDict.C -c $(INC) $(CPPFLAGS) windowed_test.h GuiLinkDef.h
- $(CXX) $(INC) -fPIC -g -Wall $(FILES) GuiDict.C $(CPPFLAGS) $(VXI_OBJECT) -o $(TARGET) $(SHLIB) $(LIBS1) -lstdc++ -lSpectrum
-# -----------------------------------------------------------------------------
-
-# CAMAC DAQ library rules -----------------------------------------------------
-
-# Rules for making CAMAC DAQ library source files (wusbxx_dll and libxxusb)
-library: $(OBJ_FILES)
-
-wusbxx_dll.o:wusbxx_dll.c wusbxx_dll.h
-libxxusb.o: libxxusb.cpp libxxusb.h
-
-.cc.o:
- $(CXX) -fPIC -c $<
- ar r $(LIBFILE) $@
-
-.cpp.o:
- $(CXX) -fPIC -c $<
- ar r $(LIBFILE) $@
-
-.c.o:
- $(CXX) -fPIC -c $<
- ar r $(LIBFILE) $@
-
-# Rules for recreating the CAMAC DAQ libraries even if they exist (libdaqusb.so/.a)
-relib:
- rm -f libdaqusb.so libdaqusb.a libvxi11.so libvxi11.a
- make libdaqusb.so libvxi11.so
-
-# Rule for making the CAMAC DAQ library (libdaqusb.so)
-libdaqusb.so: $(DAQFILE) $(LIBFILE)
- @echo "Generating dictionary Dict.C..."
- rootcint -f Dict.C -c $(INC) $(CPPFLAGS) $(HEADER) GuiLinkDef.h
- $(CXX) $(CPPFLAGS) $(INC) -fPIC -g -Wall $(DAQFILE) Dict.C $(CAMLIB) -shared -o $@
-
-# Rule for making the CAMAC DAQ library (libdaqusb.a)
-$(LIBFILE): $(OBJ_FILES)
- ar r $@ $^
-# -----------------------------------------------------------------------------
-
-# Scope DAQ library rules -----------------------------------------------------
-
-libvxi11.so: libvxi11.a
- @echo "Generating dictionary VxiDict.C..."
- rootcint -f VxiDict.C -c $(INC) $(CPPFLAGS) daqscope.h GuiLinkDef.h
- $(CXX) $(CPPFLAGS) $(INC) -fPIC -g -Wall daqscope.C VxiDict.C -L. libvxi11.a -shared -o $@
-
-libvxi11.a: $(VXI_OBJECT)
- ar r $@ $^
-# -----------------------------------------------------------------------------
-
-# Clean rule ------------------------------------------------------------------
-
-# Rule for cleaning the installation
-clean:
- rm -f Dict.C Dict.h GuiDict.C GuiDict.h windowed_test windowed_test_C.d windowed_test_C.so curpos.txt curvolt.txt workstation.h VxiDict.C VxiDict.h daqscope.C daqusb.C start.sh usb.h libxxusb.h libdaqusb.a libdaqusb.so libvxi11.a libvxi11.so *.o finish_sig.txt
-# -----------------------------------------------------------------------------
Index: sipmscan/trunk/input/daqusb.C.online
===================================================================
--- sipmscan/trunk/input/daqusb.C.online (revision 144)
+++ sipmscan/trunk/input/daqusb.C.online (nonexistent)
@@ -1,257 +0,0 @@
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <sys/mman.h>
-#include <errno.h>
-#include <signal.h>
-#include <ctype.h>
-#include <time.h>
-#include "wusbxx_dll.h" /* the header of the shared library */
-#include "daq.h"
-
-//#define DEBUG /* vkljuci dodatni izpis */
-#ifdef DEBUG
- #define DBG(X) X
- #define DBGFUNI(X) printf(">>> %s -> %d\n",#X,(X))
-#else
- #define DBG(X)
- #define DBGFUNI(X) X
-#endif
-
-/* definiram lokacije enot*/
-//#define NTDC 1 /* TDC */
-//#define NTDCCH 8
-//#define NADC 2 /* ADC */
-//#define NADCCH 8
-int ctrlc=0;
-char *ccserial=(char*)"CC0126";
-//int devDetect; // variable to tell if we detect any devices
-
-int daq::connect(){
-// odpri daq
- xxusb_device_type devices[100];
- //struct usb_device *dev;
- devDetect = xxusb_devices_find(devices);
-// printf("Detected devices: %d\n", devDetect);
- //dev = devices[0].usbdev;
- //udev = xxusb_device_open(dev);
-
- if(devDetect > 0)
- {
- WUSBXX_load(NULL);
- WUSBXX_open(ccserial);
- printf("daq::connect()\n");
- }
- else
- printf("daq::connect() - No devices were detected!\n");
- return 0;
-}
-
-int daq::init(int chan = 0){
-
- int i;
- long k;
-
- DBGFUNI(xxusb_register_write(udev,1,0x0)); // Stop DAQ mode
- while (xxusb_usbfifo_read(udev, (int*) stackdump,BUFF_L,100)>0);
-
- CCCZ;
- CCCC;
- CREM_I;
-
- NTDC = 1;
- NADC = 2;
- if(chan != 0)
- {
- NTDCCH = chan/2;
- NADCCH = chan/2;
- }
- else
- {
- NTDCCH = 1;
- NADCCH = 1;
- }
- printf("after: NTDCCH = %d, NADCCH = %d\n", NTDCCH, NADCCH);
-
-// create command stack for the TDC and ADC
- k=1;
- for(i=0;(i<NTDCCH)&&(i<NADCCH);i++) { stackwrite[k++]=NAF(NTDC,i,0); stackwrite[k++]=NAF(NADC,i,0); }
-// for(i=0;i<NADCCH;i++) stackwrite[k++]=NAF(NADC,i,0);
- stackwrite[k++]=NAF(NTDC,0,9);
- stackwrite[k++]=NAF(NADC,0,9);
- stackwrite[k++]=NAFS(0,0,16); // insert next word to data
- stackwrite[k++]=0xfafb; // event termination word
- stackwrite[0]=k-1;
-// upload stack #2
- xxusb_stack_write(udev,0x2,(long int *)stackwrite);
- xxusb_stack_read(udev,0x2,(long int *) stackdata);
- DBG(for(i=0;i<k;i++) printf("0x%04x\n",stackdata[i]);)
-
- int ret[10];
-
- CAMAC_LED_settings(udev, 1,1,0,0);
- ret[0] = CAMAC_register_read(udev,0,&k);
- printf("Firmware ID (return %d) -> 0x%08lX\n",ret[0],k); // GKM: Firmware ID (i.e. 0x72000001 = 0111 0010 0000 0000 0000 0000 0000 0001)
- ret[1] = CAMAC_register_read(udev,1,&k);
- printf("Global Mode (return %d) -> 0x%08lX\n",ret[1],k);
- k=(k&0xF000)|0x0005; // set buffer length: n=0..6 -> 0x10000 >> n, n=7 -> single event
- ret[0] = CAMAC_register_write(udev,1,k); // GKM: sets the buffer length (i.e. k=5 -> buf length=128 words)
- ret[1] = CAMAC_register_write(udev,2,0x80); // wait 0x80 us after trigger // GKM: delay settings in microseconds
- ret[2] = CAMAC_register_write(udev,3,0x0); // Scaler Readout Control Register // GKM: scaler readout settings - sets the frequency of readout (if 0, it is disabled)
- ret[3] = CAMAC_register_write(udev,9,0x0); // Lam Mask Register // GKM: When 0, readout is triggered by the signal on NIM input
- ret[4] = CAMAC_register_write(udev,14,0x0); // USB Bulk Transfer Setup Register
-
- // CAMAC_DGG(udev,1,2,3,0,200,0,0);
- // CAMAC_DGG(udev,0,0,0,0,100,0,0);
- ret[5] = CAMAC_register_write(udev,5,(0x06<<16)+(0x04<<8)+0x00); // output // GKM: NIM outputs (i.e. 0x060400 = 00 0110 0000 0100 0000 0000 -> NIM O2=DGG_B, NIM O3=DGG_A)
- ret[6] = CAMAC_register_write(udev,6,(0x01<<24)+(0x01<<16)+(0x0<<8)+0x0); // SCLR & DGG // GKM: device source selector (i.e. 0x01010000 = 00 0000 0001 0000 0001 0000 0000 0000 0000 -> DGG_A=NIM I1, DGG_B=NIM I1, SCLR=disabled)
- ret[7] = CAMAC_register_write(udev,7,(100<<16)+0); // output // GKM: Delay and Gate Generator A registers (i.e. 0x00640000 = 0000 0000 0110 0100 0000 0000 0000 0000 -> DDG_A [gate=100, delay=0])
- ret[8] = CAMAC_register_write(udev,8,(10000<<16)+0); // output // GKM: Delay and Gate Generator B registers (i.e. 0x27100000 = 0010 0111 0001 0000 0000 0000 0000 0000 -> DDG_B [gate=10000, delay=0])
- ret[9] = CAMAC_register_write(udev,13,0); // output // GKM: Extended (course) delay (i.e. 0x00000000 = 0 -> DDG_A ext=0, DDG_B ext=0)
-
-// for(i = 0; i < 10; i++) printf("Setting %d? -> return = %d\n",i,ret[i]);
-
-// ret[0] = CAMAC_register_read(udev,1,&k);
-// printf("k (return %d) -> 0x%08lX\n",ret[0],k);
-
- printf("daq::init()\n");
- return 0;
-}
-
-int daq::start(){
- xxusb_register_write(udev,1,0x1); // Start DAQ mode
- printf("daq::start()\n");
- return 0;
-}
-
-int daq::stop(){
- xxusb_register_write(udev,1,0x0); // Stop DAQ mode
- while (xxusb_usbfifo_read(udev,(int *)stackdump,BUFF_L,30)>0);
- printf("daq::stop()\n");
- return 0;
-}
-
-int daq::event(unsigned int *data, int maxn){
- int ib,count;
- int events,evsize;
- short ret;
-
- ib=0;
- ret=xxusb_usbfifo_read(udev,(int *) stackdata,BUFF_L,500);
- events=stackdata[ib++];
- DBG(printf("ret=%d,events=0x%08x\n",ret,events);)
- if ((ret<0)||(ret!=(((NTDCCH+NADCCH)*4+4)*events+4))) return 0;
-
- count=0;
- while (ib<(ret/2-1)){
- evsize = stackdata[ib++]&0xffff;
- DBG(printf("Event:%d EvSize:%d\n", events, evsize);)
- for (int i=0;i<(NTDCCH+NADCCH);i++,ib++) data[count++] =stackdata[ib++]&0xffff;
- if (stackdata[ib++]!=0xfafb){
- printf("Error!\n");
- return 0;
- }
- events--;
- if (fStop) return 0;
- }
- if (stackdata[ib++]!=0xffff){
- printf("Error!\n");
- return 0;
- }
-
-// count = 1;
- return count;
-}
-
-int daq::disconnect(){
-// zapri daq
- WUSBXX_close();
- printf("daq::disconnect()\n");
- return 0;
-}
-
-daq::daq(){
- fStop=0;
- connect();
-// if(devDetect > 0)
-// init();
-}
-
-daq::~daq(){
-disconnect();
-}
-
-#ifdef MAIN
-void CatchSig (int signumber)
-{
- ctrlc = 1;
-}
-
-
-int main (int argc, char **argv){
-
- int neve=1000000;
- char *fname="test.dat";
- if (argc==1) {
- printf("Uporaba: %s stevilo_dogodkov ime_datoteke\n",argv[0]);
- printf("Meritev prekini s Ctrl-C, ce je nabranih dogodkov ze dovolj\n");
- exit(0);
- }
- if (argc>1) neve = atoi(argv[1]);
- if (argc>2) fname = argv[2];
-
-
-// intercept routine
- if (signal (SIGINT, CatchSig) == SIG_ERR) perror ("sigignore");
-
-#define BSIZE 10000
- int i,ieve,nc,nb;
-// int hdr[4]={1,(NTDCCH+4)*sizeof(int)}; // hdr[0]=1, hdr[1]=(NTDCCH+4)*4
- int hdr[4]={1,(NTDCCH+NADCCH+4)*sizeof(int)};
- unsigned short adc;
- unsigned int data[BSIZE];
- daq *d= new daq();
- time_t time_check;
-
-// odpremo datoteko za pisanje
- FILE *fp=fopen(fname,"w");
-
- d->start();
- ieve=0;
-
- while((ieve<neve)&&(!ctrlc)){
- nc=d->event(data,BSIZE);
- nb=0;
- while((nc>0)&&(ieve++<neve)&&(!ctrlc)){
- // zapis v datoteko
- hdr[2]=time(NULL);
- hdr[3]=ieve;
- fwrite(hdr,sizeof(int),4 ,fp);
- fwrite(&data[nb],sizeof(int),(NTDCCH+NADCCH),fp);
-// DBG(
- for(i=0;i<(NTDCCH+NADCCH);i++){
- adc=data[nb+i]&0xFFFF;
- if(i % 2 == 0)
-printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
-// printf("nev=%4d %d. TDC data=%d\n",ieve,i/2,adc);
- else if(i % 2 == 1)
-printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
-// printf("nev=%4d %d. ADC data=%d\n",ieve,i/2,adc);
- }
-printf("\n");
-// )
- nb+=(NTDCCH+NADCCH);
- nc-=(NTDCCH+NADCCH);
- if (!(ieve%1000)) printf("event no. -> %d\n",ieve);
- };
- };
-
- d->stop();
- fclose(fp);
- printf("Podatki so v datoteki %s\n", fname);
- delete d;
-
- return 0;
-}
-#endif
Index: sipmscan/trunk/input/daqscope.C.in
===================================================================
--- sipmscan/trunk/input/daqscope.C.in (revision 144)
+++ sipmscan/trunk/input/daqscope.C.in (nonexistent)
@@ -1,390 +0,0 @@
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include "vxi11_user.h"
-#include "daqscope.h"
-#include "workstation.h"
-
-CLINK *clink;
-char *savedIP;
-const char *allChans[8] = {"CH1","CH2","CH3","CH4","MATH1","MATH2","MATH3","MATH4"};
-const char *measType[11] = {"AMP","ARE","DEL","FALL","FREQ","MAX","MEAN","MINI","PK2P","PWI","RIS"};
-char *bbq;
-
-// Query and command functions to simplify analysis --------------
-int vxi11_query(CLINK *clink, const char *mycmd)
-{
- char buf[WAVE_LEN];
- memset(buf, 0, WAVE_LEN);
- vxi11_send(clink, mycmd);
- int bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
- if (bytes_returned > 0)
- {
- printf("%s\n", buf);
- }
- else if (bytes_returned == -15)
- printf("*** [ NOTHING RECEIVED ] ***\n");
-
- return 0;
-}
-
-void vxi11_command(CLINK *clink,char *mycmd)
-{
- char buf[WAVE_LEN];
- memset(buf, 0, WAVE_LEN);
- vxi11_send(clink, mycmd);
-}
-// ---------------------------------------------------------------
-
-// Tektronix unit conversion -------------------------------------
-double daqscope::tekunit(char *prefix)
-{
- if (strcmp(prefix,"m")==0) return 0.001;
- else if (strcmp(prefix,"u")==0) return 0.000001;
- else if (strcmp(prefix,"n")==0) return 0.000000001;
- else return 1;
-}
-// ---------------------------------------------------------------
-
-// Connect to a scope through IP address IPaddr ------------------
-int daqscope::connect(char *IPaddr)
-{
- int iTemp;
- char buf[WAVE_LEN];
- printf("daqscope::connect(%s)\n", IPaddr);
- clink = new CLINK;
- iTemp = vxi11_open_device(IPaddr, clink);
- if(iTemp == 0)
- {
- vxi11_send(clink, "*IDN?");
- vxi11_receive(clink, buf, WAVE_LEN);
- printf("Connected to device (%s): %s\n", IPaddr, buf);
- savedIP = IPaddr;
- return iTemp;
- }
- else
- return iTemp;
-}
-// ---------------------------------------------------------------
-
-// Disconnect from scope with IP address IPaddr ------------------
-int daqscope::disconnect(char *IPaddr)
-{
- int iTemp;
- printf("daqscope::disconnect(%s)\n", IPaddr);
- iTemp = vxi11_close_device(IPaddr, clink);
- if(iTemp == 0)
- {
- printf("Disconnected from device (%s).\n", IPaddr);
- delete clink;
- }
- return iTemp;
-}
-// ---------------------------------------------------------------
-
-// Initialize the scope for waveform or measurement --------------
-int daqscope::init()
-{
- int iTemp;
- char cmd[512];
- char cTemp[256];
- printf("daqscope::init()\n");
-
- printf("Measurement type is: %d\n", scopeUseType);
-
- // For measurements, only one channel can be used (rise, fall, period,...)
- if(scopeUseType == 2) scopeChanNr = 1;
- printf("Nr. of channels selected: %d\n", scopeChanNr);
-
- // Only use scope if measurement is different than 0
- if(scopeUseType == 0)
- return 0;
- else
- {
- // Combine all selected channels into a comma separated string
- for(int i = 0; i < scopeChanNr; i++)
- {
- if(i == scopeChanNr-1)
- {
- if(i == 0) sprintf(scopeChanstring, "%s", allChans[scopeChans[i]]);
- else sprintf(cTemp, "%s", allChans[scopeChans[i]]);
- }
- else
- {
- if(i == 0) sprintf(scopeChanstring, "%s,", allChans[scopeChans[i]]);
- else sprintf(cTemp, "%s,", allChans[scopeChans[i]]);
- }
- if(i > 0)
- strcat(scopeChanstring, cTemp);
- }
- printf("Selected channels: %s\n", scopeChanstring);
-
- // Check scope ID and turn the header display on
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_query(clink, "*IDN?");
- vxi11_command(clink,(char*)"HEADER ON");
-#else
- printf("Identify Tek (*IDN?, HEADER ON)\n");
-#endif
-
- // Set the scope data sources
- sprintf(cmd, "DATA:SOURCE %s", scopeChanstring);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink,cmd);
-#else
- printf("Set data source (DATA:SOURCE): %s\n", cmd);
-#endif
-
- // Set to fast acquisition and set encoding
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink,(char*)"FASTACQ:STATE 0");
- vxi11_command(clink,(char*)"DATA:ENCDG SRIBINARY");
- vxi11_command(clink,(char*)"WFMO:BYT_N 2");
-
- // Set gating (currently not used)
- vxi11_command(clink,(char*)"GAT OFF");
-#else
- printf("Set fastacq, encoding and gating (FASTACQ:STATE 0, DATA:ENCDG SRIBINARY, WFMO:BYT_N 2, MEASU:GAT OFF).\n");
-#endif
-
- // Check scale on each of selected channels (is this even needed?)
- bbq = strtok(scopeChanstring,",");
- while(bbq != NULL)
- {
- sprintf(cmd,"%s:SCALE?",bbq);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_query(clink,cmd);
-#else
- printf("Return the scale of channel: %s\n", cmd);
-#endif
- bbq = strtok(NULL, ",");
- }
-
- // Check waveform and data options/settings
- char buf[WAVE_LEN];
- memset(buf, 0, WAVE_LEN);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_send(clink, "WFMO:WFID?");
- iTemp = vxi11_receive(clink, buf, WAVE_LEN);
- printf("Init out (length = %d): %s\n", iTemp, buf);
-#else
- printf("Get acquisition parameters (WFMOUTPRE:WFID?).\n");
- sprintf(buf, ":WFMOUTPRE:WFID \"Ch1, DC coupling, 20.0mV/div, 10.0ns/div, 500 points, Sample mode\"");
- iTemp = strlen(buf);
-#endif
- if (iTemp == -15)
- printf("\n*** [ NOTHING RECEIVED ] ***\n");
- else
- {
- bbq = strtok(buf,","); // break WFID out into substrings
- for (int k = 0; k < 5; k++)
- {
- // info on voltage per division setting
- if (k == 2)
- {
- memcpy(cTemp, &bbq[1], 5);
- cTemp[5] = 0;
- bbq[7] = 0;
- tekvolt = atoi(cTemp)*tekunit(&bbq[6]);
- printf("Voltage per division: %lf\n", tekvolt);
- }
- // info on time per division setting
- if (k == 3)
- {
- memcpy(cTemp, &bbq[1], 5);
- cTemp[5] = 0;
- bbq[7] = 0;
- tektime = atoi(cTemp)*tekunit(&bbq[6]);
- printf("Time per division: %lf\n", tektime);
- }
- // info on last point to be transfered by CURVE?
- if (k == 4)
- {
- bbq[strlen(bbq)-7] = 0;
- sprintf(cmd, "DATA:STOP %d", atoi(bbq));
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink, cmd);
-#else
- printf("Stop data collection (DATA:STOP): %s\n", cmd);
-#endif
- }
-// printf("bbq = %s\n",bbq);
- bbq = strtok (NULL, ",");
- }
- }
-
- // Recheck waveform and data options/settings, turn off header
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_query(clink,"WFMO:WFID?");
- vxi11_query(clink,"DATA?");
- vxi11_command(clink,(char*)"HEADER OFF");
-#else
- printf("Data format query (WFMOUTPRE:WFID?, DATA?, HEADER OFF).\n");
-#endif
-
- // Get the channel y-axis offset (only for one CH so far)
- char posoff[WAVE_LEN];
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- sprintf(cmd, "%s:POS?", allChans[scopeChans[0]]);
- vxi11_command(clink, cmd);
- vxi11_receive(clink, posoff, WAVE_LEN);
- choffset = (double)atof(posoff);
-#else
- sprintf(posoff, "Just some temporary string info.");
- printf("Check for channel position offset (CHx:POS?)\n");
-#endif
-
- // If measurements are to be performed
- if(scopeUseType == 2)
- {
- sprintf(cmd, "MEASU:IMM:SOURCE1 %s", scopeChanstring);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink, cmd);
-#else
- printf("Set immediate measurement source (MEASU:IMM:SOURCE1): %s\n", cmd);
-#endif
-
- sprintf(cmd, "MEASU:IMM:TYP %s", measType[scopeMeasSel]);
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink, cmd);
-#else
- printf("Set immediate measurement type (MEASU:IMM:TYP): %s\n", cmd);
-#endif
- }
-
- return 0;
- }
-}
-// ---------------------------------------------------------------
-
-// Send a custom command to the scope ----------------------------
-int daqscope::customCommand(char *command, bool query, char *sReturn)
-{
- if(query)
- {
- char buf[WAVE_LEN];
- memset(buf, 0, WAVE_LEN);
- vxi11_send(clink, command);
- int bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
- if (bytes_returned > 0)
- {
- printf("%s\n", buf);
- sprintf(sReturn, "%s", buf);
-
- // For testing purposes
-/* if( strcmp(command, "CURVE?") == 0 )
- {
- FILE *fp;
- char tst[2];
- fp = fopen("./curve_return.txt","w");
- for(int i = 6; i < bytes_returned; i++)
- {
- if(i%2 == 1)
- {
- tst[0] = buf[i];
- tst[1] = buf[i-1];
- fprintf(fp, "bytes returned = %d\tbyte %d = %d\treturn = %s\n", bytes_returned, i, buf[i], tst);
- }
- else
- fprintf(fp, "bytes returned = %d\tbyte %d = %d\n", bytes_returned, i, buf[i]);
- }
- fclose(fp);
- }*/
- }
- else if (bytes_returned == -15)
- {
- printf("*** [ NOTHING RECEIVED ] ***\n");
- sprintf(sReturn, "*** [ NOTHING RECEIVED ] ***");
- }
- }
- else
- {
- vxi11_command(clink, command);
- sprintf(sReturn, "*** [ COMMAND NOT QUERY - NO RETURN ] ***");
- }
-
- return 0;
-}
-// ---------------------------------------------------------------
-
-// Get a measuring event (either waveform or measure) ------------
-int daqscope::lockunlock(bool lockit)
-{
- // Lock the scope front panel for measurements
- if(lockit)
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink,(char*)"LOCK ALL");
- return 0;
-#else
-// printf("Locking the front panel (LOCK ALL).\n");
- return -1;
-#endif
- }
- // Unlock the scope front panel after measurements
- else
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- vxi11_command(clink,(char*)"LOCK NONE");
- return 0;
-#else
-// printf("Unlocking the front panel (LOCK ALL).\n");
- return -1;
-#endif
- }
-}
-// ---------------------------------------------------------------
-
-// Get a measuring event (either waveform or measure) ------------
-int daqscope::event()
-{
- int bytes_returned;
-
- if(scopeUseType == 0)
- return -1;
- else if(scopeUseType == 1)
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- memset(eventbuf, 0, WAVE_LEN);
- vxi11_send(clink, "CURVE?");
- bytes_returned = vxi11_receive(clink, eventbuf, WAVE_LEN);
-#else
- printf("Ask to return the waveform (CURVE?)\n");
- bytes_returned = 0;
-#endif
-
- if(bytes_returned > 0) return 0;
- else return -1;
- }
- else if(scopeUseType == 2)
- {
-#if WORKSTAT == 'I' || WORKSTAT == 'S'
- char buf[WAVE_LEN];
- memset(buf, 0, WAVE_LEN);
- vxi11_send(clink, "MEASU:IMMED:VALUE?");
- bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
- measubuf = (double)atof(buf);
-#else
-// printf("Ask to return the measurement (MEASU:IMMED:VALUE?)\n");
- bytes_returned = 0;
- measubuf = (double)rand()/(double)RAND_MAX;
-#endif
-
- if(bytes_returned > 0) return 0;
- else return -1;
- }
- else
- return -1;
-}
-// ---------------------------------------------------------------
-
-// daqscope class constructor and destructor ---------------------
-daqscope::daqscope() {
- fStop=0;
-}
-
-daqscope::~daqscope() {
- disconnect(savedIP);
-}
-// ---------------------------------------------------------------
Index: sipmscan/trunk/input/libxxusb.h.offline
===================================================================
--- sipmscan/trunk/input/libxxusb.h.offline (revision 144)
+++ sipmscan/trunk/input/libxxusb.h.offline (nonexistent)
@@ -1,111 +0,0 @@
-#include "usb.h"
-
-
-#define XXUSB_WIENER_VENDOR_ID 0x16DC /* Wiener, Plein & Baus */
-#define XXUSB_VMUSB_PRODUCT_ID 0x000B /* VM-USB */
-#define XXUSB_CCUSB_PRODUCT_ID 0x0001 /* CC-USB */
-#define XXUSB_ENDPOINT_OUT 2 /* Endpoint 2 Out*/
-#define XXUSB_ENDPOINT_IN 0x86 /* Endpoint 6 In */
-#define XXUSB_FIRMWARE_REGISTER 0
-#define XXUSB_GLOBAL_REGISTER 1
-#define XXUSB_ACTION_REGISTER 10
-#define XXUSB_DELAYS_REGISTER 2
-#define XXUSB_WATCHDOG_REGISTER 3
-#define XXUSB_SELLEDA_REGISTER 6
-#define XXUSB_SELNIM_REGISTER 7
-#define XXUSB_SELLEDB_REGISTER 4
-#define XXUSB_SERIAL_REGISTER 15
-#define XXUSB_LAMMASK_REGISTER 8
-#define XXUSB_LAM_REGISTER 12
-#define XXUSB_READOUT_STACK 2
-#define XXUSB_SCALER_STACK 3
-#define XXUSB_NAF_DIRECT 12
-
-struct XXUSB_STACK
-{
-long Data;
-short Hit;
-short APatt;
-short Num;
-short HitMask;
-};
-
-struct XXUSB_CC_COMMAND_TYPE
-{
-short Crate;
-short F;
-short A;
-short N;
-long Data;
-short NoS2;
-short LongD;
-short HitPatt;
-short QStop;
-short LAMMode;
-short UseHit;
-short Repeat;
-short AddrScan;
-short FastCam;
-short NumMod;
-short AddrPatt;
-long HitMask[4];
-long Num;
-};
-
-struct xxusb_device_typ
-{
- struct usb_device *usbdev;
- char SerialString[7];
-};
-
-typedef struct xxusb_device_typ xxusb_device_type;
-typedef unsigned char UCHAR;
-typedef struct usb_bus usb_busx;
-
-
-int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
-int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout);
-
-short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData);
-short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *StackData);
-short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *StackData);
-short xxusb_stack_execute(usb_dev_handle *hDev, long *StackData);
-short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData);
-short xxusb_reset_toggle(usb_dev_handle *hDev);
-
-short xxusb_devices_find(xxusb_device_type *xxusbDev);
-short xxusb_device_close(usb_dev_handle *hDev);
-usb_dev_handle* xxusb_device_open(struct usb_device *dev);
-short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect);
-short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config);
-usb_dev_handle* xxusb_serial_open(char *SerialString);
-
-short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data);
-short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data);
-short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
-short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger,unsigned short output, long delay, unsigned short gate, unsigned short invert, unsigned short latch);
-
-short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
-
-short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data);
-short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data);
-short VME_BLT_read_32(usb_dev_handle *hdev, short Address_Modifier, int count, long VME_Address, long Data[]);
-short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
-short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
-
-short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output, int delay, int gate, short invert, short latch);
-short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data);
-short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data);
-short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
-short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
-short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data);
-short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data);
-
-short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X);
-short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X);
-short CAMAC_Z(usb_dev_handle *hdev);
-short CAMAC_C(usb_dev_handle *hdev);
-short CAMAC_I(usb_dev_handle *hdev, int inhibit);
-
Index: sipmscan/trunk/GuiLinkDef.h
===================================================================
--- sipmscan/trunk/GuiLinkDef.h (revision 144)
+++ sipmscan/trunk/GuiLinkDef.h (nonexistent)
@@ -1,17 +0,0 @@
-#ifdef __CINT__
-
-#pragma link off all globals;
-#pragma link off all classes;
-#pragma link off all functions;
-//#pragma link C++ class TGMdiSubwindow+;
-//#pragma link C++ class TGAppMainFrame+;
-
-//#pragma link C++ function MyEventHandler;
-//#pragma link C++ function GetDebug;
-//#pragma link C++ function MyRedraw;
-//#pragma link C++ function MyTimer;
-
-//#pragma link C++ class daq;
-
-#endif
-
Index: sipmscan/trunk/wusbxx_dll.c
===================================================================
--- sipmscan/trunk/wusbxx_dll.c (revision 144)
+++ sipmscan/trunk/wusbxx_dll.c (nonexistent)
@@ -1,104 +0,0 @@
-#include "wusbxx_dll.h"
-
-usb_dev_handle *udev;
-
-
-
-void _VI_FUNC WUSBXX_load (char* module_path)
-{
-
- /*
- if (module_path == NULL)
- DLLHandle = LoadLibrary("libxxusb.dll");
- else
- DLLHandle = LoadLibrary(module_path);
-
- if (!(xxusb_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_register_read"))) exit(1);
- if (!(xxusb_stack_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_read"))) exit(1);
- if (!(xxusb_stack_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_write"))) exit(1);
- if (!(xxusb_stack_execute_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_execute"))) exit(1);
- if (!(xxusb_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_register_write"))) exit(1);
- if (!(xxusb_usbfifo_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_usbfifo_read"))) exit(1);
- if (!(xxusb_bulk_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_bulk_read"))) exit(1);
- if (!(xxusb_bulk_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_bulk_write"))) exit(1);
- if (!(xxusb_reset_toggle_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_reset_toggle"))) exit(1);
-
- if (!(xxusb_devices_find_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_devices_find"))) exit(1);
- if (!(xxusb_device_close_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_device_close"))) exit(1);
- if (!(xxusb_device_open_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_device_open"))) exit(1);
- if (!(xxusb_flash_program_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_flash_program"))) exit(1);
- if (!(xxusb_flashblock_program_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_flashblock_program"))) exit(1);
- if (!(xxusb_serial_open_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_serial_open"))) exit(1);
-
- if (!(VME_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"VME_register_write"))) exit(1);
- if (!(VME_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"VME_register_read"))) exit(1);
- if (!(VME_LED_settings_Ptr = (void*) GetProcAddress(DLLHandle,"VME_LED_settings"))) exit(1);
- if (!(VME_DGG_Ptr = (void*) GetProcAddress(DLLHandle,"VME_DGG"))) exit(1);
- if (!(VME_Output_settings_Ptr = (void*) GetProcAddress(DLLHandle,"VME_Output_settings"))) exit(1);
- if (!(VME_read_16_Ptr = (void*) GetProcAddress(DLLHandle,"VME_read_16"))) exit(1);
- if (!(VME_read_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_read_32"))) exit(1);
- if (!(VME_BLT_read_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_BLT_read_32"))) exit(1);
- if (!(VME_write_16_Ptr = (void*) GetProcAddress(DLLHandle,"VME_write_16"))) exit(1);
- if (!(VME_write_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_write_32"))) exit(1);
-
- if (!(CAMAC_DGG_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_DGG"))) exit(1);
- if (!(CAMAC_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_register_read"))) exit(1);
- if (!(CAMAC_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_register_write"))) exit(1);
- if (!(CAMAC_LED_settings_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_LED_settings"))) exit(1);
- if (!(CAMAC_Output_settings_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_Output_settings"))) exit(1);
- if (!(CAMAC_read_LAM_mask_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_read_LAM_mask"))) exit(1);
- if (!(CAMAC_write_LAM_mask_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_write_LAM_mask"))) exit(1);
- if (!(CAMAC_write_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_write"))) exit(1);
- if (!(CAMAC_read_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_read"))) exit(1);
- if (!(CAMAC_Z_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_Z"))) exit(1);
- if (!(CAMAC_C_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_C"))) exit(1);
- if (!(CAMAC_I_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_I"))) exit(1);
-*/
-}
-
-void _VI_FUNC WUSBXX_open (char *serial)
-{
- if (serial != NULL)
- udev = xxusb_serial_open(serial);
-}
-
-void _VI_FUNC WUSBXX_close (void)
-{
- if (udev) xxusb_device_close(udev);
-}
-
-int _VI_FUNC WUSBXX_CCread (int n, int a, int f, unsigned long *data)
-{
- long intbuf[4];
- int ret;
- // CAMAC direct read function
- intbuf[0]=1;
- intbuf[1]=(long)(f+a*32+n*512 + 0x4000);
- ret = xxusb_stack_execute(udev, intbuf);
- if (f < 16)
- {
- *data=intbuf[0] + intbuf[1] * 0x10000; //24-bit word
-// *Q = ((intbuf[1] >> 8) & 1);
-// *X = ((intbuf[1] >> 9) & 1);
- }
- return ret;
-}
-
-int _VI_FUNC WUSBXX_CCwrite (int n, int a, int f, unsigned long data)
-{
- long intbuf[4];
- int ret;
-// CAMAC direct write function
- intbuf[0]=1;
- intbuf[1]=(long)(f+a*32+n*512 + 0x4000);
- if ((f > 15) && (f < 24))
- {
- intbuf[0]=3;
- intbuf[2]=(data & 0xffff);
- intbuf[3]=((data >>16) & 255);
- ret = xxusb_stack_execute(udev, intbuf);
-// *Q = (intbuf[0] & 1);
-// *X = ((intbuf[0] >> 1) & 1);
- }
- return ret;
-}
Index: sipmscan/trunk/wusbxx_dll.h
===================================================================
--- sipmscan/trunk/wusbxx_dll.h (revision 144)
+++ sipmscan/trunk/wusbxx_dll.h (nonexistent)
@@ -1,19 +0,0 @@
-#ifndef _WUSBXX_DLL_H
-#define _WUSBXX_DLL_H
-
-#include <stdlib.h>
-#include <stdio.h>
-
-#include "libxxusb.h"
-#include "wusbcc.h"
-#define _VI_FUNC
-extern usb_dev_handle *udev;
-
-void _VI_FUNC WUSBXX_load (char *module_path);
-void _VI_FUNC WUSBXX_open (char *serial);
-void _VI_FUNC WUSBXX_close (void);
-int _VI_FUNC WUSBXX_CCread (int n, int a, int f, unsigned long *data);
-int _VI_FUNC WUSBXX_CCwrite (int n, int a, int f, unsigned long data);
-
-#endif
-
Index: sipmscan/trunk/vxi11_i686/Makefile
===================================================================
--- sipmscan/trunk/vxi11_i686/Makefile (revision 144)
+++ sipmscan/trunk/vxi11_i686/Makefile (nonexistent)
@@ -1,18 +0,0 @@
-VERSION=1.08
-
-#CFLAGS = -Wall -g
-CFLAGS = -g
-CXX = g++
-
-.PHONY: clean objs
-
-objs: vxi11.h
- $(CXX) -c -fPIC $(CFLAGS) vxi11_user.cc
- $(CXX) -c -fPIC $(CFLAGS) vxi11_clnt.c
- $(CXX) -c -fPIC $(CFLAGS) vxi11_xdr.c
-
-vxi11.h: vxi11.x
- rpcgen -M vxi11.x
-
-clean:
- rm -f *.o vxi11_cmd vxi11.h vxi11_svc.c vxi11_xdr.c vxi11_clnt.c #TAGS
Index: sipmscan/trunk/vxi11_i686/vxi11.x
===================================================================
--- sipmscan/trunk/vxi11_i686/vxi11.x (revision 144)
+++ sipmscan/trunk/vxi11_i686/vxi11.x (nonexistent)
@@ -1,317 +0,0 @@
-/* This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
- * which are part of the asynDriver (R4-5) EPICS module, which, at time of
- * writing, is available from:
- * http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
- * More general information about EPICS is available from:
- * http://www.aps.anl.gov/epics/
- * This code is open source, and is covered under the copyright notice and
- * software license agreement shown below, and also at:
- * http://www.aps.anl.gov/epics/license/open.php
- *
- * In order to comply with section 4.3 of the software license agreement, here
- * is a PROMINENT NOTICE OF CHNAGES TO THE SOFTWARE
- * ===========================================
- * (1) This file, vxi11.x, is the concatenation of the files vxi11core.rpcl and
- * vxi11intr.rpcl
- * (2) Tab spacing has been tidied up
- *
- * It is intended as a lightweight base for the vxi11 rpc protocol. If you
- * run rpcgen on this file, it will generate C files and headers, from which
- * it is relatively simple to write C programs to communicate with a range
- * of ethernet-enabled instruments, such as oscilloscopes and function
- * generated by manufacturers such as Agilent and Tektronix (amongst many
- * others).
- *
- * For what it's worth, this concatenation was done by Steve Sharples at
- * the University of Nottingham, UK, on 1 June 2006.
- *
- * Copyright notice and software license agreement follow, then the
- * original comments from vxi11core.rpcl etc.
- *
- ******************************************************************************
- * Copyright © 2006 <University of Chicago and other copyright holders>. All
- * rights reserved.
- ******************************************************************************
- *
- ******************************************************************************
- * vxi11.x is distributed subject to the following license conditions:
- * SOFTWARE LICENSE AGREEMENT
- * Software: vxi11.x
- *
- * 1. The "Software", below, refers to vxi11.x (in either source code, or
- * binary form and accompanying documentation). Each licensee is addressed
- * as "you" or "Licensee."
- *
- * 2. The copyright holders shown above and their third-party licensors hereby
- * grant Licensee a royalty-free nonexclusive license, subject to the
- * limitations stated herein and U.S. Government license rights.
- *
- * 3. You may modify and make a copy or copies of the Software for use within
- * your organization, if you meet the following conditions:
- * 1. Copies in source code must include the copyright notice and this
- * Software License Agreement.
- * 2. Copies in binary form must include the copyright notice and this
- * Software License Agreement in the documentation and/or other
- * materials provided with the copy.
- *
- * 4. You may modify a copy or copies of the Software or any portion of it,
- * thus forming a work based on the Software, and distribute copies of such
- * work outside your organization, if you meet all of the following
- * conditions:
- * 1. Copies in source code must include the copyright notice and this
- * Software License Agreement;
- * 2. Copies in binary form must include the copyright notice and this
- * Software License Agreement in the documentation and/or other
- * materials provided with the copy;
- * 3. Modified copies and works based on the Software must carry
- * prominent notices stating that you changed specified portions of
- * the Software.
- *
- * 5. Portions of the Software resulted from work developed under a U.S.
- * Government contract and are subject to the following license: the
- * Government is granted for itself and others acting on its behalf a
- * paid-up, nonexclusive, irrevocable worldwide license in this computer
- * software to reproduce, prepare derivative works, and perform publicly
- * and display publicly.
- *
- * 6. WARRANTY DISCLAIMER. THE SOFTWARE IS SUPPLIED "AS IS" WITHOUT WARRANTY OF
- * ANY KIND. THE COPYRIGHT HOLDERS, THEIR THIRD PARTY LICENSORS, THE UNITED
- * STATES, THE UNITED STATES DEPARTMENT OF ENERGY, AND THEIR EMPLOYEES: (1)
- * DISCLAIM ANY WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
- * ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
- * PURPOSE, TITLE OR NON-INFRINGEMENT, (2) DO NOT ASSUME ANY LEGAL LIABILITY
- * OR RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF THE
- * SOFTWARE, (3) DO NOT REPRESENT THAT USE OF THE SOFTWARE WOULD NOT INFRINGE
- * PRIVATELY OWNED RIGHTS, (4) DO NOT WARRANT THAT THE SOFTWARE WILL FUNCTION
- * UNINTERRUPTED, THAT IT IS ERROR-FREE OR THAT ANY ERRORS WILL BE CORRECTED.
- *
- * 7. LIMITATION OF LIABILITY. IN NO EVENT WILL THE COPYRIGHT HOLDERS, THEIR
- * THIRD PARTY LICENSORS, THE UNITED STATES, THE UNITED STATES DEPARTMENT OF
- * ENERGY, OR THEIR EMPLOYEES: BE LIABLE FOR ANY INDIRECT, INCIDENTAL,
- * CONSEQUENTIAL, SPECIAL OR PUNITIVE DAMAGES OF ANY KIND OR NATURE,
- * INCLUDING BUT NOT LIMITED TO LOSS OF PROFITS OR LOSS OF DATA, FOR ANY
- * REASON WHATSOEVER, WHETHER SUCH LIABILITY IS ASSERTED ON THE BASIS OF
- * CONTRACT, TORT (INCLUDING NEGLIGENCE OR STRICT LIABILITY), OR OTHERWISE,
- * EVEN IF ANY OF SAID PARTIES HAS BEEN WARNED OF THE POSSIBILITY OF SUCH
- * LOSS OR DAMAGES.
- ******************************************************************************
- */
-
-/******************************************************************************
- *
- * vxi11core.rpcl
- *
- * This file is best viewed with a tabwidth of 4
- *
- ******************************************************************************
- *
- * TODO:
- *
- ******************************************************************************
- *
- * Original Author: someone from VXIbus Consortium
- * Current Author: Benjamin Franksen
- * Date: 03-06-97
- *
- * RPCL description of the core- and abort-channel of the TCP/IP Instrument
- * Protocol Specification.
- *
- *
- * Modification Log:
- * -----------------
- * .00 03-06-97 bfr created this file
- *
- ******************************************************************************
- *
- * Notes:
- *
- * This stuff is literally from
- *
- * VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification
- *
- */
-
-typedef long Device_Link;
-
-enum Device_AddrFamily
-{
- DEVICE_TCP,
- DEVICE_UDP
-};
-
-typedef long Device_Flags;
-
-typedef long Device_ErrorCode;
-
-struct Device_Error
-{
- Device_ErrorCode error;
-};
-
-struct Create_LinkParms
-{
- long clientId; /* implementation specific value */
- bool lockDevice; /* attempt to lock the device */
- unsigned long lock_timeout; /* time to wait for lock */
- string device<>; /* name of device */
-};
-struct Create_LinkResp
-{
- Device_ErrorCode error;
- Device_Link lid;
- unsigned short abortPort; /* for the abort RPC */
- unsigned long maxRecvSize; /* max # of bytes accepted on write */
-};
-struct Device_WriteParms
-{
- Device_Link lid; /* link id from create_link */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- Device_Flags flags; /* flags with options */
- opaque data<>; /* the data length and the data itself */
-};
-struct Device_WriteResp
-{
- Device_ErrorCode error;
- unsigned long size; /* # of bytes written */
-};
-struct Device_ReadParms
-{
- Device_Link lid; /* link id from create_link */
- unsigned long requestSize; /* # of bytes requested */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- Device_Flags flags; /* flags with options */
- char termChar; /* valid if flags & termchrset */
-};
-struct Device_ReadResp
-{
- Device_ErrorCode error;
- long reason; /* why read completed */
- opaque data<>; /* the data length and the data itself */
-};
-struct Device_ReadStbResp
-{
- Device_ErrorCode error;
- unsigned char stb; /* the returned status byte */
-};
-struct Device_GenericParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* flags with options */
- unsigned long lock_timeout; /* time to wait for lock */
- unsigned long io_timeout; /* time to wait for I/O */
-};
-struct Device_RemoteFunc
-{
- unsigned long hostAddr; /* host servicing interrupt */
- unsigned long hostPort; /* valid port # on client */
- unsigned long progNum; /* DEVICE_INTR */
- unsigned long progVers; /* DEVICE_INTR_VERSION */
- Device_AddrFamily progFamily; /* DEVICE_UDP | DEVICE_TCP */
-};
-struct Device_EnableSrqParms
-{
- Device_Link lid; /* link id from create_link */
- bool enable; /* enable or disable intr's */
- opaque handle<40>; /* host specific data */
-};
-struct Device_LockParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* contains the waitlock flag */
- unsigned long lock_timeout; /* time to wait for lock */
-};
-struct Device_DocmdParms
-{
- Device_Link lid; /* link id from create_link */
- Device_Flags flags; /* flags with options */
- unsigned long io_timeout; /* time to wait for I/O */
- unsigned long lock_timeout; /* time to wait for lock */
- long cmd; /* which command to execute */
- bool network_order; /* client's byte order */
- long datasize; /* size of individual data elements */
- opaque data_in<>; /* docmd data parameters */
-};
-struct Device_DocmdResp
-{
- Device_ErrorCode error;
- opaque data_out<>; /* returned data parameters */
-};
-
-program DEVICE_ASYNC
-{
- version DEVICE_ASYNC_VERSION
- {
- Device_Error device_abort (Device_Link) = 1;
- } = 1;
-} = 0x0607B0;
-
-program DEVICE_CORE
-{
- version DEVICE_CORE_VERSION
- {
- Create_LinkResp create_link (Create_LinkParms) = 10;
- Device_WriteResp device_write (Device_WriteParms) = 11;
- Device_ReadResp device_read (Device_ReadParms) = 12;
- Device_ReadStbResp device_readstb (Device_GenericParms) = 13;
- Device_Error device_trigger (Device_GenericParms) = 14;
- Device_Error device_clear (Device_GenericParms) = 15;
- Device_Error device_remote (Device_GenericParms) = 16;
- Device_Error device_local (Device_GenericParms) = 17;
- Device_Error device_lock (Device_LockParms) = 18;
- Device_Error device_unlock (Device_Link) = 19;
- Device_Error device_enable_srq (Device_EnableSrqParms) = 20;
- Device_DocmdResp device_docmd (Device_DocmdParms) = 22;
- Device_Error destroy_link (Device_Link) = 23;
- Device_Error create_intr_chan (Device_RemoteFunc) = 25;
- Device_Error destroy_intr_chan (void) = 26;
- } = 1;
-} = 0x0607AF;
-
-/******************************************************************************
- *
- * vxi11intr.rpcl
- *
- * This file is best viewed with a tabwidth of 4
- *
- ******************************************************************************
- *
- * TODO:
- *
- ******************************************************************************
- *
- * Original Author: someone from VXIbus Consortium
- * Current Author: Benjamin Franksen
- * Date: 03-06-97
- *
- * RPCL description of the intr-channel of the TCP/IP Instrument Protocol
- * Specification.
- *
- *
- * Modification Log:
- * -----------------
- * .00 03-06-97 bfr created this file
- *
- ******************************************************************************
- *
- * Notes:
- *
- * This stuff is literally from
- *
- * "VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification"
- *
- */
-
-struct Device_SrqParms
-{
- opaque handle<>;
-};
-
-program DEVICE_INTR
-{
- version DEVICE_INTR_VERSION
- {
- void device_intr_srq (Device_SrqParms) = 30;
- } = 1;
-} = 0x0607B1;
Index: sipmscan/trunk/vxi11_i686/vxi11_cmd.cc
===================================================================
--- sipmscan/trunk/vxi11_i686/vxi11_cmd.cc (revision 144)
+++ sipmscan/trunk/vxi11_i686/vxi11_cmd.cc (nonexistent)
@@ -1,237 +0,0 @@
-/*Predelava vmesnika vxi11 za lastne potrebe IJS F9*/
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include "vxi11_user.h"
-#define BUF_LEN 100000
-
-CLINK *clink;
-FILE *test,*test1;
-
-int query(char *mycmd){
-char buf[BUF_LEN];
-
-memset(buf, 0, BUF_LEN);
-vxi11_send(clink, mycmd);
-int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
-if (bytes_returned > 0) {
- printf("%s\n",buf);
-} else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
-
-return 0;
-}
-
-int command(char *mycmd){
-char buf[BUF_LEN];
-
-memset(buf, 0, BUF_LEN);
-vxi11_send(clink, mycmd);
-
-return 0;
-}
-
-int queryrep(char *mycmd,char *mycmp,int i){
-char buf[BUF_LEN];
-
-memset(buf, 0, BUF_LEN);
-vxi11_send(clink, mycmd);
-int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
-
-if(strcmp(buf,mycmp)!=0){
- if (bytes_returned > 0) fprintf(test1,"%d %s",i,buf);
- else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
-
- }
- strcpy(mycmp,buf);
-
-return 0;
-}
-
-/*float *fbuf;
-fbuf= (float *) buf;
-if (bytes_returned > 0){
- for (int j=1;j<3;j++) printf("%f\n",fbuf[j]);
- }
-*/
-
-int main(void) {
-
-static char *device_ip;
-static char *device_name;
-char cmd[256],ukaz[256],end[256];
-char buf[BUF_LEN],pr1[BUF_LEN],pr2[BUF_LEN];
-int ret;
-long bytes_returned;
-
-int i,m,vnos;
-
-clink = new CLINK;
-time_t t1,t2;
-
-/*
- fread(buf,1,size,fp);
- float *fbuf=(float *) buf;
- fbuf[0]
-
-*/
- memset(ukaz, 0, 256);
- printf("\nIJS F9 - September 2010 - Pripravil: Jaka Mur - Beta verzija\n\nProgram za povezavo in nadzor Tektronix ali LeCroy osciloskopa.\nAvtomatsko se program poveze z IP naslovom 194.249.156.91.\nVnesi 'a' za nadaljevanje, 'q' za izhod ali IP za drugo napravo: ");
-
- while(1){
- scanf("%s",&ukaz);
-
- if (strncasecmp(ukaz, "q",1) == 0) return 0;
-
- else if (strncasecmp(ukaz, "a",1) != 0) ret=vxi11_open_device(ukaz,clink);
- else ret=vxi11_open_device("194.249.156.91",clink); //privzeti IP naprave
-
- printf("\nPovezan z ");
-
- memset(buf, 0, BUF_LEN);
- vxi11_send(clink, "*IDN?");
- bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
- if (bytes_returned > 0) {
- printf("%s",buf);
- break;}
- else if (bytes_returned == -15) {
- printf("Error.");
- if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
- else ret=vxi11_close_device(ukaz,clink);
- return 0;
- }
-
- }
-
- printf("\nNekatere pomembnejse nastavitve:\n");
- command("HEADER ON");
- command("DATA:SOURCE CH1");
- query("DAT?");
-
- char odg[256];
- printf("Zelite spreminjati nastavitve? y/n/q: ");
- scanf("%s",&odg);
- fgets(cmd,256,stdin);
-
- if (strncasecmp(odg, "q",1) == 0) {
- if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
- else ret=vxi11_close_device(ukaz,clink);
- return 0;
- }
- else if (strncasecmp(odg, "y",1) == 0){
- printf("\nSpisek komand je v Programmer Manualu!\n");
- while(1){
- memset(cmd, 0, 256);
- memset(buf, 0, BUF_LEN);
-
- printf("Vnesi ukaz, vprasanje, 'q' za izhod ali 'x' za nadaljevanje: ");
- fgets(cmd,256,stdin);
- cmd[strlen(cmd)-1] = 0;
- if (strncasecmp(cmd, "q",1) == 0) {
- if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
- else ret=vxi11_close_device(ukaz,clink);
- return 0;
- }
- if (strncasecmp(cmd, "x",1) == 0) break;
-
- if (vxi11_send(clink, cmd) < 0) break;
- if (strstr(cmd, "?") != 0) {
- bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
- if (bytes_returned > 0) {
- printf("%s\n",buf);
- }
- else if (bytes_returned == -15) {
- printf("*** [ NOTHING RECEIVED ] ***\n");
- }
- else break;
- }
- }
- }
-
- command("HEADER OFF");
-
- printf("\nIzbor serije meritev\n1 = za zapis waveformov v binarnem formatu\n2 = MEASU:IMM test\n3 = Shenanigans\nVnesi #: ");
- scanf("%d",&vnos);
-//prva opcija
- if (vnos==1){
-
- printf("\nTrenutno je nastavljeno zapisovanje celotnih waveformov iz CH1 v datoteko 'test.txt'. Vnesite zeljeno stevilo ponovitev: ");
- scanf("%d",&m);
-
- test=fopen("/media/disk/vxi11_1.08/test.txt","w");
- command("DATA:SOURCE CH1");
- command("DATA:START 1");
- command("DATA:STOP 1000");
- command("DATA:ENCDG RPBINARY");
-
-(void) time(&t1);
- query("ACQUIRE:NUMFRAMESACQUIRED?");
-
- for(i=1;i<m+1;i++) { //zajem binarnih podatkov
-
- memset(buf, 0, BUF_LEN);
- vxi11_send(clink, "CURVE?");
- int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
-
- if (bytes_returned > 0) fwrite(buf,1,bytes_returned,test);
- if(strcmp(buf,pr1)!=0){
- if (bytes_returned > 0) fwrite(buf,1,1000,test);
- else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
- }
- strcpy(pr1,buf);
- }
-
- query("ACQUIRE:NUMFRAMESACQUIRED?");
-(void) time(&t2);
-
- printf("Koncano!\n");
- printf("Trajanje: %ld s\n",(int)t2-t1);
- fclose(test);
-
- }
-//druga opcija
- else if (vnos==2){
-
- test1=fopen("/media/disk/vxi11_1.08/test1.txt","w");
-
- printf("Vnesi zeljeno stevilo meritev minimuma LeCroy: ");
- scanf("%d",&m);
-
- for (i=0;i<m;i++) queryrep("C1:PAVA? MIN",pr2,i);
-
- fclose(test1);
- }
-//tretja opcija
- else if (vnos==3){
-
- test1=fopen("/media/disk/vxi11_1.08/test1.txt","w");
-
- printf("Vnesi zeljeno stevilo zajemov: ");
- scanf("%d",&m);
-
- command("DATA:SOURCE CH1, CH2");
- command("DATA:START 1");
- command("DATA:STOP 1000");
- command("DATA:ENCDG ASCII");
-
- query("ACQUIRE:NUMFRAMESACQUIRED?");
-
- for (i=0;i<m;i++) queryrep("CURVE?",pr2,i);
-
- query("ACQUIRE:NUMFRAMESACQUIRED?");
-
- fclose(test1);
- }
-
- if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
- else ret=vxi11_close_device(ukaz,clink);
-
- printf("Meritve opravljene!\nZa zakljucek pritisni 'q'! ");
- scanf("%s",&end);
-
- if (strcmp(end,"q")==0);
-
- return 0;
-}
-
Index: sipmscan/trunk/vxi11_i686/GNU_General_Public_License.txt
===================================================================
--- sipmscan/trunk/vxi11_i686/GNU_General_Public_License.txt (revision 144)
+++ sipmscan/trunk/vxi11_i686/GNU_General_Public_License.txt (nonexistent)
@@ -1,340 +0,0 @@
- GNU GENERAL PUBLIC LICENSE
- Version 2, June 1991
-
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
- 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- Everyone is permitted to copy and distribute verbatim copies
- of this license document, but changing it is not allowed.
-
- Preamble
-
- The licenses for most software are designed to take away your
-freedom to share and change it. By contrast, the GNU General Public
-License is intended to guarantee your freedom to share and change free
-software--to make sure the software is free for all its users. This
-General Public License applies to most of the Free Software
-Foundation's software and to any other program whose authors commit to
-using it. (Some other Free Software Foundation software is covered by
-the GNU Library General Public License instead.) You can apply it to
-your programs, too.
-
- When we speak of free software, we are referring to freedom, not
-price. Our General Public Licenses are designed to make sure that you
-have the freedom to distribute copies of free software (and charge for
-this service if you wish), that you receive source code or can get it
-if you want it, that you can change the software or use pieces of it
-in new free programs; and that you know you can do these things.
-
- To protect your rights, we need to make restrictions that forbid
-anyone to deny you these rights or to ask you to surrender the rights.
-These restrictions translate to certain responsibilities for you if you
-distribute copies of the software, or if you modify it.
-
- For example, if you distribute copies of such a program, whether
-gratis or for a fee, you must give the recipients all the rights that
-you have. You must make sure that they, too, receive or can get the
-source code. And you must show them these terms so they know their
-rights.
-
- We protect your rights with two steps: (1) copyright the software, and
-(2) offer you this license which gives you legal permission to copy,
-distribute and/or modify the software.
-
- Also, for each author's protection and ours, we want to make certain
-that everyone understands that there is no warranty for this free
-software. If the software is modified by someone else and passed on, we
-want its recipients to know that what they have is not the original, so
-that any problems introduced by others will not reflect on the original
-authors' reputations.
-
- Finally, any free program is threatened constantly by software
-patents. We wish to avoid the danger that redistributors of a free
-program will individually obtain patent licenses, in effect making the
-program proprietary. To prevent this, we have made it clear that any
-patent must be licensed for everyone's free use or not licensed at all.
-
- The precise terms and conditions for copying, distribution and
-modification follow.
-
- GNU GENERAL PUBLIC LICENSE
- TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-
- 0. This License applies to any program or other work which contains
-a notice placed by the copyright holder saying it may be distributed
-under the terms of this General Public License. The "Program", below,
-refers to any such program or work, and a "work based on the Program"
-means either the Program or any derivative work under copyright law:
-that is to say, a work containing the Program or a portion of it,
-either verbatim or with modifications and/or translated into another
-language. (Hereinafter, translation is included without limitation in
-the term "modification".) Each licensee is addressed as "you".
-
-Activities other than copying, distribution and modification are not
-covered by this License; they are outside its scope. The act of
-running the Program is not restricted, and the output from the Program
-is covered only if its contents constitute a work based on the
-Program (independent of having been made by running the Program).
-Whether that is true depends on what the Program does.
-
- 1. You may copy and distribute verbatim copies of the Program's
-source code as you receive it, in any medium, provided that you
-conspicuously and appropriately publish on each copy an appropriate
-copyright notice and disclaimer of warranty; keep intact all the
-notices that refer to this License and to the absence of any warranty;
-and give any other recipients of the Program a copy of this License
-along with the Program.
-
-You may charge a fee for the physical act of transferring a copy, and
-you may at your option offer warranty protection in exchange for a fee.
-
- 2. You may modify your copy or copies of the Program or any portion
-of it, thus forming a work based on the Program, and copy and
-distribute such modifications or work under the terms of Section 1
-above, provided that you also meet all of these conditions:
-
- a) You must cause the modified files to carry prominent notices
- stating that you changed the files and the date of any change.
-
- b) You must cause any work that you distribute or publish, that in
- whole or in part contains or is derived from the Program or any
- part thereof, to be licensed as a whole at no charge to all third
- parties under the terms of this License.
-
- c) If the modified program normally reads commands interactively
- when run, you must cause it, when started running for such
- interactive use in the most ordinary way, to print or display an
- announcement including an appropriate copyright notice and a
- notice that there is no warranty (or else, saying that you provide
- a warranty) and that users may redistribute the program under
- these conditions, and telling the user how to view a copy of this
- License. (Exception: if the Program itself is interactive but
- does not normally print such an announcement, your work based on
- the Program is not required to print an announcement.)
-
-These requirements apply to the modified work as a whole. If
-identifiable sections of that work are not derived from the Program,
-and can be reasonably considered independent and separate works in
-themselves, then this License, and its terms, do not apply to those
-sections when you distribute them as separate works. But when you
-distribute the same sections as part of a whole which is a work based
-on the Program, the distribution of the whole must be on the terms of
-this License, whose permissions for other licensees extend to the
-entire whole, and thus to each and every part regardless of who wrote it.
-
-Thus, it is not the intent of this section to claim rights or contest
-your rights to work written entirely by you; rather, the intent is to
-exercise the right to control the distribution of derivative or
-collective works based on the Program.
-
-In addition, mere aggregation of another work not based on the Program
-with the Program (or with a work based on the Program) on a volume of
-a storage or distribution medium does not bring the other work under
-the scope of this License.
-
- 3. You may copy and distribute the Program (or a work based on it,
-under Section 2) in object code or executable form under the terms of
-Sections 1 and 2 above provided that you also do one of the following:
-
- a) Accompany it with the complete corresponding machine-readable
- source code, which must be distributed under the terms of Sections
- 1 and 2 above on a medium customarily used for software interchange; or,
-
- b) Accompany it with a written offer, valid for at least three
- years, to give any third party, for a charge no more than your
- cost of physically performing source distribution, a complete
- machine-readable copy of the corresponding source code, to be
- distributed under the terms of Sections 1 and 2 above on a medium
- customarily used for software interchange; or,
-
- c) Accompany it with the information you received as to the offer
- to distribute corresponding source code. (This alternative is
- allowed only for noncommercial distribution and only if you
- received the program in object code or executable form with such
- an offer, in accord with Subsection b above.)
-
-The source code for a work means the preferred form of the work for
-making modifications to it. For an executable work, complete source
-code means all the source code for all modules it contains, plus any
-associated interface definition files, plus the scripts used to
-control compilation and installation of the executable. However, as a
-special exception, the source code distributed need not include
-anything that is normally distributed (in either source or binary
-form) with the major components (compiler, kernel, and so on) of the
-operating system on which the executable runs, unless that component
-itself accompanies the executable.
-
-If distribution of executable or object code is made by offering
-access to copy from a designated place, then offering equivalent
-access to copy the source code from the same place counts as
-distribution of the source code, even though third parties are not
-compelled to copy the source along with the object code.
-
- 4. You may not copy, modify, sublicense, or distribute the Program
-except as expressly provided under this License. Any attempt
-otherwise to copy, modify, sublicense or distribute the Program is
-void, and will automatically terminate your rights under this License.
-However, parties who have received copies, or rights, from you under
-this License will not have their licenses terminated so long as such
-parties remain in full compliance.
-
- 5. You are not required to accept this License, since you have not
-signed it. However, nothing else grants you permission to modify or
-distribute the Program or its derivative works. These actions are
-prohibited by law if you do not accept this License. Therefore, by
-modifying or distributing the Program (or any work based on the
-Program), you indicate your acceptance of this License to do so, and
-all its terms and conditions for copying, distributing or modifying
-the Program or works based on it.
-
- 6. Each time you redistribute the Program (or any work based on the
-Program), the recipient automatically receives a license from the
-original licensor to copy, distribute or modify the Program subject to
-these terms and conditions. You may not impose any further
-restrictions on the recipients' exercise of the rights granted herein.
-You are not responsible for enforcing compliance by third parties to
-this License.
-
- 7. If, as a consequence of a court judgment or allegation of patent
-infringement or for any other reason (not limited to patent issues),
-conditions are imposed on you (whether by court order, agreement or
-otherwise) that contradict the conditions of this License, they do not
-excuse you from the conditions of this License. If you cannot
-distribute so as to satisfy simultaneously your obligations under this
-License and any other pertinent obligations, then as a consequence you
-may not distribute the Program at all. For example, if a patent
-license would not permit royalty-free redistribution of the Program by
-all those who receive copies directly or indirectly through you, then
-the only way you could satisfy both it and this License would be to
-refrain entirely from distribution of the Program.
-
-If any portion of this section is held invalid or unenforceable under
-any particular circumstance, the balance of the section is intended to
-apply and the section as a whole is intended to apply in other
-circumstances.
-
-It is not the purpose of this section to induce you to infringe any
-patents or other property right claims or to contest validity of any
-such claims; this section has the sole purpose of protecting the
-integrity of the free software distribution system, which is
-implemented by public license practices. Many people have made
-generous contributions to the wide range of software distributed
-through that system in reliance on consistent application of that
-system; it is up to the author/donor to decide if he or she is willing
-to distribute software through any other system and a licensee cannot
-impose that choice.
-
-This section is intended to make thoroughly clear what is believed to
-be a consequence of the rest of this License.
-
- 8. If the distribution and/or use of the Program is restricted in
-certain countries either by patents or by copyrighted interfaces, the
-original copyright holder who places the Program under this License
-may add an explicit geographical distribution limitation excluding
-those countries, so that distribution is permitted only in or among
-countries not thus excluded. In such case, this License incorporates
-the limitation as if written in the body of this License.
-
- 9. The Free Software Foundation may publish revised and/or new versions
-of the General Public License from time to time. Such new versions will
-be similar in spirit to the present version, but may differ in detail to
-address new problems or concerns.
-
-Each version is given a distinguishing version number. If the Program
-specifies a version number of this License which applies to it and "any
-later version", you have the option of following the terms and conditions
-either of that version or of any later version published by the Free
-Software Foundation. If the Program does not specify a version number of
-this License, you may choose any version ever published by the Free Software
-Foundation.
-
- 10. If you wish to incorporate parts of the Program into other free
-programs whose distribution conditions are different, write to the author
-to ask for permission. For software which is copyrighted by the Free
-Software Foundation, write to the Free Software Foundation; we sometimes
-make exceptions for this. Our decision will be guided by the two goals
-of preserving the free status of all derivatives of our free software and
-of promoting the sharing and reuse of software generally.
-
- NO WARRANTY
-
- 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
-FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
-OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
-PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
-OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
-TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
-PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
-REPAIR OR CORRECTION.
-
- 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
-WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
-REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
-INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
-OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
-TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
-YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
-PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
-POSSIBILITY OF SUCH DAMAGES.
-
- END OF TERMS AND CONDITIONS
-
- How to Apply These Terms to Your New Programs
-
- If you develop a new program, and you want it to be of the greatest
-possible use to the public, the best way to achieve this is to make it
-free software which everyone can redistribute and change under these terms.
-
- To do so, attach the following notices to the program. It is safest
-to attach them to the start of each source file to most effectively
-convey the exclusion of warranty; and each file should have at least
-the "copyright" line and a pointer to where the full notice is found.
-
- <one line to give the program's name and a brief idea of what it does.>
- Copyright (C) <year> <name of author>
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-
-
-Also add information on how to contact you by electronic and paper mail.
-
-If the program is interactive, make it output a short notice like this
-when it starts in an interactive mode:
-
- Gnomovision version 69, Copyright (C) year name of author
- Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
- This is free software, and you are welcome to redistribute it
- under certain conditions; type `show c' for details.
-
-The hypothetical commands `show w' and `show c' should show the appropriate
-parts of the General Public License. Of course, the commands you use may
-be called something other than `show w' and `show c'; they could even be
-mouse-clicks or menu items--whatever suits your program.
-
-You should also get your employer (if you work as a programmer) or your
-school, if any, to sign a "copyright disclaimer" for the program, if
-necessary. Here is a sample; alter the names:
-
- Yoyodyne, Inc., hereby disclaims all copyright interest in the program
- `Gnomovision' (which makes passes at compilers) written by James Hacker.
-
- <signature of Ty Coon>, 1 April 1989
- Ty Coon, President of Vice
-
-This General Public License does not permit incorporating your program into
-proprietary programs. If your program is a subroutine library, you may
-consider it more useful to permit linking proprietary applications with the
-library. If this is what you want to do, use the GNU Library General
-Public License instead of this License.
Index: sipmscan/trunk/vxi11_i686/CHANGELOG.txt
===================================================================
--- sipmscan/trunk/vxi11_i686/CHANGELOG.txt (revision 144)
+++ sipmscan/trunk/vxi11_i686/CHANGELOG.txt (nonexistent)
@@ -1,199 +0,0 @@
-------------------------------------------------------------------------------
-vxi11_1.08 - 3/09/2009
-
-Added a sanity check for link->maxRecvSize to make sure it's >0. This gets
-around a bug in some versions of the Agilent Infiniium scope software.
-
-Changed the erroneous strncpy() to memcpy() in vxi11_send, as we could be
-sending binary data (not just strings).
-
-Changed a lot of char *'s to const char *'s in an attempt to get rid of
-pedantic gcc compiler warnings.
-
-------------------------------------------------------------------------------
-vxi11_1.07 - 9/10/2007
-
-Minor change to vxi11_receive_data_block(), this fn now copes with instruments
-that return just "#0" (for whatever reason). Suggestion by Jarek Sadowski,
-gratefully received.
-
-------------------------------------------------------------------------------
-vxi11_1.06 - 31/08/2007
-
-Bug fix in vxi11_receive(), to ensure that no more than "len" bytes are ever
-received (and so avoiding a segmentation fault). This was a bug introduced in
-release 1.04 whilst making some other changes to the vxi11_receive() fn.
-
-Many thanks to Rob Penny for spotting the bug and providing a patch.
-
-------------------------------------------------------------------------------
-vxi11_1.05 - 11/07/2007
-
-Added the ability to specify a "device name" when calling vxi11_open_device().
-For regular VXI11-based instruments, such as scopes and AFGs, the device name
-is usually "hard wired" to be "inst0", and up to now this has been hard wired
-into the vxi11_user code. However, devices such as LAN to GPIB gateways need
-some way of distinguishing between different devices... they are a single
-client (one IP address), with multiple devices.
-
-The vxi11_user fn, vxi11_open_device(), now takes a third argument
-(char *device).
-This gets passed to the core vxi11_open_device() fn (the one that deals with
-separate clients and links), and the core vxi11_open_link() fn; these two
-core functions have also had an extra parameter added accordingly. In order
-to not break the API, a wrapper function is provided in the form of the
-original vxi11_open_device() fn, that just takes 2 arguments
-(char *ip, CLINK *clink), this then passes "inst0" as the device argument.
-Backwards-compatible wrappers for the core functions have NOT been provided.
-These are generally not used from userland anyway. Hopefully this won't
-upset anyone!
-
-vxi11_cmd, the simple test utility, has also been updated. You can now,
-optionally, pass the device_name as a second argument (after the ip
-address). The source has been renamed to vxi11_cmd.cc (from vxi11_cmd.c), as
-it is C++ code not C.
-
-Some minor tidying up in vxi11_user.h
-
-With thanks to Oliver Schulz for bringing LAN to GPIB gateways to my
-attention, for suggesting changes to the vxi11_user library to allow them to
-be accommodated, and for tidying some things up.
-
-------------------------------------------------------------------------------
-vxi11_1.04 - 10/07/2007
-
-Patch applied, which was kindly provided by Robert Larice. This sorts out
-the confusion (on my part) about the structures returned by the rpcgen
-generated *_1() functions... these are statically allocated temporary structs,
-apparently. In the words of Robert Larice:
-
-******
-Hello Dr. Sharples,
-
- I'm sending some patches for your nice gem "vxi11_1.03"
-
- In the source code there were some strange comments, concerning
- a commented free() around ... Manfred S. ...
- and some notes, suggesting you had trouble to get more than one link
- working.
-
- I think thats caused by some misuse of the rpcgen generated subroutines.
- 1) those rpcgen generated *_1 functions returned pointers to
- statically allocated temporary structs.
- those where meant to be instantly copied to the user's space,
- which wasn't done
- thus instead of
- Device_ReadResp *read_resp;
- read_resp = device_read_1(...)
- one should have written someting like:
- Device_ReadResp *read_resp;
- read_resp = malloc(...)
- memcpy(read_resp, device_read_1(...), ...)
- 2) but a better fix is to use the rpcgen -M Flag
- which allows to pass the memory space as a third argument
- so one can write
- Device_ReadResp *read_resp;
- read_resp = malloc(...)
- device_read_1(..., read_resp, ...)
- furthermore this is now automatically thread save
- 3) the rpcgen function device_read_1
- expects a target buffer to be passed via read_resp
- which was not done.
- 4) the return value of vxi11_receive() was computed incorrectly
- 5) minor, Makefile typo's
- CFLAGS versus
- CLFAGS
-
-******
-
-Robert didn't have more than one device to try the patch with, but I've just
-tried it and everything seems fine. So I've removed all references to the
-VXI11_ENABLE_MULTIPLE_CLIENTS global variable, and removed the call to
-vxi11_open_link() from the vxi11_send() fn. There has been an associated
-tidying of functions, and removal of some comments.
-
-Thanks once again to Robert Larice for the patch and the explanation!
-
-------------------------------------------------------------------------------
-vxi11_1.03 - 29/01/2007
-
-Some bug-fixes (thanks to Manfred S.), and extra awareness of the
-possibility that instruments could time out after receiving a query WITHOUT
-causing an error condition. In some cases (prior to these changes) this
-could have resulted in a segmentation fault.
-
-Specifically:
-
-(1) removed call to ANSI free() fn in vxi11_receive, which according to
- Manfred S. "is not necessary and wrong (crashes)".
-
-(2) added extra check in vxi11_receive() to see if read_resp==NULL.
- read_resp can apparently be NULL if (eg) you send an instrument a
- query, but the instrument is so busy with something else for so long
- that it forgets the original query. So this extra check is for that
- situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
- calling function.
-
-(3) vxi11_send_and_receive() is now aware of the possibility of being
- returned -VXI11_NULL_READ_RESP. If so, it re-sends the query, until
- either getting a "regular" read error (read_resp->error!=0) or a
- successful read.
-
-(4) Similar to (2)... added extra check in vxi11_send() to see if
- write_resp==NULL. If so, return -VXI11_NULL_WRITE_RESP. As with (3),
- send_and_receive() is now aware of this possibility.
-
-------------------------------------------------------------------------------
-vxi11_1.02 - 25/08/2006
-
-Important changes to the core vxi11_send() function, which should be
-invisible to the user.
-
-For those interested, the function now takes note of the value of
-link->maxRecvSize, which is the maximum number of bytes that the vxi11
-intrument you're talking to can receive in one go. For many instruments
-this may be a few kB, which isn't a problem for sending short commands;
-however, sending large chunks of data (for example sending waveforms
-to instruments) may exceed this maxRecvSize. The core vxi11_send() function
-has been re-written to ensure that only a maximum of [maxRecvSize] bytes are
-written in one go... the function sits in a loop until all the message/
-data is written.
-
-Also tidied up some of the return values (specifically with regard to
-vxi11_send() and vxi11_send_data_block() ).
-
-------------------------------------------------------------------------------
-vxi11_1.01 - 06/07/2006
-
-Fair few changes since v1.00, all in vxi11_user.c and vxi11_user.h
-
-Found I was having problems talking to multiple links on the same
-client, if I created a different client for each one. So introduced
-a few global variables to keep track of all the ip addresses of
-clients that the library is asked to create, and only creating new
-clients if the ip address is different. This puts a limit of how
-many unique ip addresses (clients) a single process can connect to.
-Set this value at 256 (should hopefully be enough!).
-
-Next I found that talking to different clients on different ip
-addresses didn't work. It turns out that create_link_1() creates
-a static structure. This this link is associated with a given
-client (and hence a given IP address), then the only way I could
-think of making things work was to add a call to an
-vxi11_open_link() function before each send command (no idea what
-this adds to overheads and it's very messy!) - at least I was
-able to get this to only happen when we are using more than one
-client/ip address.
-
-Also, while I was at it, I re-ordered the functions a little -
-starts with core user functions, extra user functions, then core
-library functions at the end. Added a few more comments. Tidied
-up. Left some debugging info in, but commented out.
-
-------------------------------------------------------------------------------
-vxi11_1.00 - 23/06/2006
-
-Initial release.
-
-------------------------------------------------------------------------------
-
Index: sipmscan/trunk/vxi11_i686/vxi11_user.cc
===================================================================
--- sipmscan/trunk/vxi11_i686/vxi11_user.cc (revision 144)
+++ sipmscan/trunk/vxi11_i686/vxi11_user.cc (nonexistent)
@@ -1,728 +0,0 @@
-/* Revision history: */
-/* $Id: vxi11_user.cc,v 1.17 2008/10/20 07:59:54 sds Exp $ */
-/*
- * $Log: vxi11_user.cc,v $
- * Revision 1.17 2008/10/20 07:59:54 sds
- * Removed Manfred's surname at his request from the comments/acknowledgments.
- *
- * Revision 1.16 2008/09/03 14:30:13 sds
- * added sanity check for link->maxRecvSize to make sure it's >0.
- * This got around a bug in some versions of the Agilent Infiniium
- * scope software.
- *
- * Revision 1.15 2007/10/30 12:55:15 sds
- * changed the erroneous strncpy() to memcpy() in vxi11_send,
- * as we could be sending binary data (not just strings).
- *
- * Revision 1.14 2007/10/30 12:46:48 sds
- * changed a lot of char *'s to const char *'s in an attempt to get
- * rid of pedantic gcc compiler warnings.
- *
- * Revision 1.13 2007/10/09 08:42:57 sds
- * Minor change to vxi11_receive_data_block(), this fn now
- * copes with instruments that return just "#0" (for whatever
- * reason). Suggestion by Jarek Sadowski.
- *
- * Revision 1.12 2007/08/31 10:32:39 sds
- * Bug fix in vxi11_receive(), to ensure that no more than "len"
- * bytes are ever received (and so avoiding a segmentation fault).
- * This was a bug introduced in release 1.04 (RCS 1.10) whilst
- * making some other changes to the vxi11_receive() fn. Many thanks
- * to Rob Penny for spotting the bug and providing a patch.
- *
- * Revision 1.11 2007/07/10 13:49:18 sds
- * Changed the vxi11_open_device() fn to accept a third argument, char *device.
- * This gets passed to the core vxi11_open_device() fn (the one that deals with
- * separate clients and links), and the core vxi11_open_link() fn; these two
- * core functions have also had an extra parameter added accordingly. In order
- * to not break the API, a wrapper function is provided in the form of the
- * original vxi11_open_device() fn, that just takes 2 arguments
- * (char *ip, CLINK *clink), this then passes "inst0" as the device argument.
- * Backwards-compatible wrappers for the core functions have NOT been provided.
- * These are generally not used from userland anyway. Hopefully this won't
- * upset anyone!
- *
- * Revision 1.10 2007/07/10 11:12:12 sds
- * Patches provided by Robert Larice. This basically solves the problem
- * of having to recreate a link each time you change client. In the words
- * of Robert:
- *
- * ---------
- * In the source code there were some strange comments, suggesting
- * you had trouble to get more than one link working.
- *
- * I think thats caused by some misuse of the rpcgen generated subroutines.
- * 1) those rpcgen generated *_1 functions returned pointers to
- * statically allocated temporary structs.
- * those where meant to be instantly copied to the user's space,
- * which wasn't done, thus instead of
- * Device_ReadResp *read_resp;
- * read_resp = device_read_1(...)
- * one should have written someting like:
- * Device_ReadResp *read_resp;
- * read_resp = malloc(...)
- * memcpy(read_resp, device_read_1(...), ...)
- * 2) but a better fix is to use the rpcgen -M Flag
- * which allows to pass the memory space as a third argument
- * so one can write
- * Device_ReadResp *read_resp;
- * read_resp = malloc(...)
- * device_read_1(..., read_resp, ...)
- * furthermore this is now automatically thread save
- * 3) the rpcgen function device_read_1
- * expects a target buffer to be passed via read_resp
- * which was not done.
- * 4) the return value of vxi11_receive() was computed incorrectly
- * 5) minor, Makefile typo's
- * ---------
- * So big thanks to Robert Larice for the patch! I've tested it
- * (briefly) on more than one scope, and with multiple links per
- * client, and it seems to work fine. I've thus removed all references
- * to VXI11_ENABLE_MULTIPLE_CLIENTS, and deleted the vxi11_open_link()
- * function that WASN'T passed an ip address (that was only called
- * from the vxi11_send() fn, when there was more than one client).
- *
- * Revision 1.9 2006/12/08 12:06:58 ijc
- * Basically the same changes as revision 1.8, except replace all
- * references to "vxi11_receive" with "vxi11_send" and all references
- * to "-VXI11_NULL_READ_RESP" with "-VXI11_NULL_WRITE_RESP".
- *
- * Revision 1.8 2006/12/07 12:22:20 sds
- * Couple of changes, related.
- * (1) added extra check in vxi11_receive() to see if read_resp==NULL.
- * read_resp can apparently be NULL if (eg) you send an instrument a
- * query, but the instrument is so busy with something else for so long
- * that it forgets the original query. So this extra check is for that
- * situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
- * calling function.
- * (2) vxi11_send_and_receive() is now aware of the possibility of
- * being returned -VXI11_NULL_READ_RESP. If so, it re-sends the query,
- * until either getting a "regular" read error (read_resp->error!=0) or
- * a successful read.
- *
- * Revision 1.7 2006/12/06 16:27:47 sds
- * removed call to ANSI free() fn in vxi11_receive, which according to
- * Manfred S. "is not necessary and wrong (crashes)".
- *
- * Revision 1.6 2006/08/25 13:45:12 sds
- * Major improvements to the vxi11_send function. Now takes
- * link->maxRecvSize into account, and writes a chunk at a time
- * until the entire message is sent. Important for sending large
- * data sets, because the data you want to send may be larger than
- * the instrument's "input buffer."
- *
- * Revision 1.5 2006/08/25 13:06:44 sds
- * tidied up some of the return values, and made sure that if a
- * sub-function returned an error value, this would also be
- * returned by the calling function.
- *
- * Revision 1.4 2006/07/06 13:04:59 sds
- * Lots of changes this revision.
- * Found I was having problems talking to multiple links on the same
- * client, if I created a different client for each one. So introduced
- * a few global variables to keep track of all the ip addresses of
- * clients that the library is asked to create, and only creating new
- * clients if the ip address is different. This puts a limit of how
- * many unique ip addresses (clients) a single process can connect to.
- * Set this value at 256 (should hopefully be enough!).
- * Next I found that talking to different clients on different ip
- * addresses didn't work. It turns out that create_link_1() creates
- * a static structure. This this link is associated with a given
- * client (and hence a given IP address), then the only way I could
- * think of making things work was to add a call to an
- * vxi11_open_link() function before each send command (no idea what
- * this adds to overheads and it's very messy!) - at least I was
- * able to get this to only happen when we are using more than one
- * client/ip address.
- * Also, while I was at it, I re-ordered the functions a little -
- * starts with core user functions, extra user functions, then core
- * library functions at the end. Added a few more comments. Tidied
- * up. Left some debugging info in, but commented out.
- *
- * Revision 1.3 2006/06/26 12:40:56 sds
- * Introduced a new CLINK structure, to reduce the number of arguments
- * passed to functions. Wrote wrappers for open(), close(), send()
- * and receieve() functions, then adjusted all the other functions built
- * on those to make use of the CLINK structure.
- *
- * Revision 1.2 2006/06/26 10:29:48 sds
- * Added GNU GPL and copyright notices.
- *
- */
-
-/* vxi11_user.cc
- * Copyright (C) 2006 Steve D. Sharples
- *
- * User library for opening, closing, sending to and receiving from
- * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
- * generated by rpcgen vxi11.x.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- * The author's email address is steve.sharples@nottingham.ac.uk
- */
-
-#include "vxi11_user.h"
-
-/*****************************************************************************
- * GENERAL NOTES
- *****************************************************************************
- *
- * There are four functions at the heart of this library:
- *
- * int vxi11_open_device(char *ip, CLIENT **client, VXI11_LINK **link)
- * int vxi11_close_device(char *ip, CLIENT *client, VXI11_LINK *link)
- * int vxi11_send(CLIENT *client, VXI11_LINK *link, char *cmd, unsigned long len)
- * long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout)
- *
- * Note that all 4 of these use separate client and link structures. All the
- * other functions are built on these four core functions, and the first layer
- * of abstraction is to combine the CLIENT and VXI11_LINK structures into a
- * single entity, which I've called a CLINK. For the send and receive
- * functions, this is just a simple wrapper. For the open and close functions
- * it's a bit more complicated, because we somehow have to keep track of
- * whether we've already opened a device with the same IP address before (in
- * which case we need to recycle a previously created client), or whether
- * we've still got any other links to a given IP address left when we are
- * asked to close a clink (in which case we can sever the link, but have to
- * keep the client open). This is so the person using this library from
- * userland does not have to keep track of whether they are talking to a
- * different physical instrument or not each time they establish a connection.
- *
- * So the base functions that the user will probably want to use are:
- *
- * int vxi11_open_device(char *ip, CLINK *clink)
- * int vxi11_close_device(char *ip, CLINK *clink)
- * int vxi11_send(CLINK *clink, char *cmd, unsigned long len)
- * --- or --- (if sending just text)
- * int vxi11_send(CLINK *clink, char *cmd)
- * long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
- *
- * There are then useful (to me, anyway) more specific functions built on top
- * of these:
- *
- * int vxi11_send_data_block(CLINK *clink, char *cmd, char *buffer, unsigned long len)
- * long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
- * long vxi11_send_and_receive(CLINK *clink, char *cmd, char *buf, unsigned long buf_len, unsigned long timeout)
- * long vxi11_obtain_long_value(CLINK *clink, char *cmd, unsigned long timeout)
- * double vxi11_obtain_double_value(CLINK *clink, char *cmd, unsigned long timeout)
- *
- * (then there are some shorthand wrappers for the above without specifying
- * the timeout due to sheer laziness---explore yourself)
- */
-
-
-/* Global variables. Keep track of multiple links per client. We need this
- * because:
- * - we'd like the library to be able to cope with multiple links to a given
- * client AND multiple links to multiple clients
- * - we'd like to just refer to a client/link ("clink") as a single
- * entity from user land, we don't want to worry about different
- * initialisation procedures, depending on whether it's an instrument
- * with the same IP address or not
- */
-char VXI11_IP_ADDRESS[VXI11_MAX_CLIENTS][20];
-CLIENT *VXI11_CLIENT_ADDRESS[VXI11_MAX_CLIENTS];
-int VXI11_DEVICE_NO = 0;
-int VXI11_LINK_COUNT[VXI11_MAX_CLIENTS];
-
-/*****************************************************************************
- * KEY USER FUNCTIONS - USE THESE FROM YOUR PROGRAMS OR INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* OPEN FUNCTIONS *
- * ============== */
-
-/* Use this function from user land to open a device and create a link. Can be
- * used multiple times for the same device (the library will keep track).*/
-int vxi11_open_device(const char *ip, CLINK *clink, char *device) {
-int ret;
-int l;
-int device_no=-1;
-
-// printf("before doing anything, clink->link = %ld\n", clink->link);
- /* Have a look to see if we've already initialised an instrument with
- * this IP address */
- for (l=0; l<VXI11_MAX_CLIENTS; l++){
- if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
- device_no=l;
-// printf("Open function, search, found ip address %s, device no %d\n",ip,device_no);
- }
- }
-
- /* Couldn't find a match, must be a new IP address */
- if (device_no < 0) {
- /* Uh-oh, we're out of storage space. Increase the #define
- * for VXI11_MAX_CLIENTS in vxi11_user.h */
- if (VXI11_DEVICE_NO >= VXI11_MAX_CLIENTS) {
- printf("Error: maximum of %d clients allowed\n",VXI11_MAX_CLIENTS);
- ret = -VXI11_MAX_CLIENTS;
- }
- /* Create a new client, keep a note of where the client pointer
- * is, for this IP address. Because it's a new client, this
- * must be link number 1. Keep track of how many devices we've
- * opened so we don't run out of storage space. */
- else {
- ret = vxi11_open_device(ip, &(clink->client), &(clink->link), device);
- strncpy(VXI11_IP_ADDRESS[VXI11_DEVICE_NO],ip,20);
- VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO] = clink->client;
- VXI11_LINK_COUNT[VXI11_DEVICE_NO]=1;
-// printf("Open function, could not find ip address %s.\n",ip);
-// printf("So now, VXI11_IP_ADDRESS[%d]=%s,\n",VXI11_DEVICE_NO,VXI11_IP_ADDRESS[VXI11_DEVICE_NO]);
-// printf("VXI11_CLIENT_ADDRESS[%d]=%ld,\n",VXI11_DEVICE_NO,VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO]);
-// printf(" clink->client=%ld,\n",clink->client);
-// printf("VXI11_LINK_COUNT[%d]=%d.\n",VXI11_DEVICE_NO,VXI11_LINK_COUNT[VXI11_DEVICE_NO]);
- VXI11_DEVICE_NO++;
- }
- }
- /* already got a client for this IP address */
- else {
- /* Copy the client pointer address. Just establish a new link
- * (not a new client). Add one to the link count */
- clink->client = VXI11_CLIENT_ADDRESS[device_no];
- ret = vxi11_open_link(ip, &(clink->client), &(clink->link), device);
-// printf("Found an ip address, copying client from VXI11_CLIENT_ADDRESS[%d]\n",device_no);
- VXI11_LINK_COUNT[device_no]++;
-// printf("Have just incremented VXI11_LINK_COUNT[%d], it's now %d\n",device_no,VXI11_LINK_COUNT[device_no]);
- }
-// printf("after creating link, clink->link = %ld\n", clink->link);
- return ret;
- }
-
-/* This is a wrapper function, used for the situations where there is only one
- * "device" per client. This is the case for most (if not all) VXI11
- * instruments; however, it is _not_ the case for devices such as LAN to GPIB
- * gateways. These are single clients that communicate to many instruments
- * (devices). In order to differentiate between them, we need to pass a device
- * name. This gets used in the vxi11_open_link() fn, as the link_parms.device
- * value. */
-int vxi11_open_device(const char *ip, CLINK *clink) {
- char device[6];
- strncpy(device,"inst0",6);
- return vxi11_open_device(ip, clink, device);
- }
-
-
-
-/* CLOSE FUNCTION *
- * ============== */
-
-/* Use this function from user land to close a device and/or sever a link. Can
- * be used multiple times for the same device (the library will keep track).*/
-int vxi11_close_device(const char *ip, CLINK *clink) {
-int l,ret;
-int device_no = -1;
-
- /* Which instrument are we referring to? */
- for (l=0; l<VXI11_MAX_CLIENTS; l++){
- if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
- device_no=l;
- }
- }
- /* Something's up if we can't find the IP address! */
- if (device_no == -1) {
- printf("vxi11_close_device: error: I have no record of you ever opening device\n");
- printf(" with IP address %s\n",ip);
- ret = -4;
- }
- else { /* Found the IP, there's more than one link to that instrument,
- * so keep track and just close the link */
- if (VXI11_LINK_COUNT[device_no] > 1 ) {
- ret = vxi11_close_link(ip,clink->client, clink->link);
- VXI11_LINK_COUNT[device_no]--;
- }
- /* Found the IP, it's the last link, so close the device (link
- * AND client) */
- else {
- ret = vxi11_close_device(ip, clink->client, clink->link);
- }
- }
- return ret;
- }
-
-
-/* SEND FUNCTIONS *
- * ============== */
-
-/* A _lot_ of the time we are sending text strings, and can safely rely on
- * strlen(cmd). */
-int vxi11_send(CLINK *clink, const char *cmd) {
- return vxi11_send(clink, cmd, strlen(cmd));
- }
-
-/* We still need the version of the function where the length is set explicitly
- * though, for when we are sending fixed length data blocks. */
-int vxi11_send(CLINK *clink, const char *cmd, unsigned long len) {
- return vxi11_send(clink->client, clink->link, cmd, len);
- }
-
-
-/* RECEIVE FUNCTIONS *
- * ================= */
-
-/* Lazy wrapper for when I can't be bothered to specify a read timeout */
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len) {
- return vxi11_receive(clink, buffer, len, VXI11_READ_TIMEOUT);
- }
-
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
- return vxi11_receive(clink->client, clink->link, buffer, len, timeout);
- }
-
-
-
-/*****************************************************************************
- * USEFUL ADDITIONAL HIGHER LEVER USER FUNCTIONS - USE THESE FROM YOUR *
- * PROGRAMS OR INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* SEND FIXED LENGTH DATA BLOCK FUNCTION *
- * ===================================== */
-int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len) {
-char *out_buffer;
-int cmd_len=strlen(cmd);
-int ret;
-
- out_buffer=new char[cmd_len+10+len];
- sprintf(out_buffer,"%s#8%08lu",cmd,len);
- memcpy(out_buffer+cmd_len+10,buffer,(unsigned long) len);
- ret = vxi11_send(clink, out_buffer, (unsigned long) (cmd_len+10+len));
- delete[] out_buffer;
- return ret;
- }
-
-
-/* RECEIVE FIXED LENGTH DATA BLOCK FUNCTION *
- * ======================================== */
-
-/* This function reads a response in the form of a definite-length block, such
- * as when you ask for waveform data. The data is returned in the following
- * format:
- * #800001000<1000 bytes of data>
- * ||\______/
- * || |
- * || \---- number of bytes of data
- * |\--------- number of digits that follow (in this case 8, with leading 0's)
- * \---------- always starts with #
- */
-long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
-/* I'm not sure what the maximum length of this header is, I'll assume it's
- * 11 (#9 + 9 digits) */
-unsigned long necessary_buffer_size;
-char *in_buffer;
-int ret;
-int ndigits;
-unsigned long returned_bytes;
-int l;
-char scan_cmd[20];
- necessary_buffer_size=len+12;
- in_buffer=new char[necessary_buffer_size];
- ret=vxi11_receive(clink, in_buffer, necessary_buffer_size, timeout);
- if (ret < 0) return ret;
- if (in_buffer[0] != '#') {
- printf("vxi11_user: data block error: data block does not begin with '#'\n");
- printf("First 20 characters received were: '");
- for(l=0;l<20;l++) {
- printf("%c",in_buffer[l]);
- }
- printf("'\n");
- return -3;
- }
-
- /* first find out how many digits */
- sscanf(in_buffer,"#%1d",&ndigits);
- /* some instruments, if there is a problem acquiring the data, return only "#0" */
- if (ndigits > 0) {
- /* now that we know, we can convert the next <ndigits> bytes into an unsigned long */
- sprintf(scan_cmd,"#%%1d%%%dlu",ndigits);
- sscanf(in_buffer,scan_cmd,&ndigits,&returned_bytes);
- memcpy(buffer, in_buffer+(ndigits+2), returned_bytes);
- delete[] in_buffer;
- return (long) returned_bytes;
- }
- else return 0;
- }
-
-
-/* SEND AND RECEIVE FUNCTION *
- * ========================= */
-
-/* This is mainly a useful function for the overloaded vxi11_obtain_value()
- * fn's, but is also handy and useful for user and library use */
-long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout) {
-int ret;
-long bytes_returned;
- do {
- ret = vxi11_send(clink, cmd);
- if (ret != 0) {
- if (ret != -VXI11_NULL_WRITE_RESP) {
- printf("Error: vxi11_send_and_receive: could not send cmd.\n");
- printf(" The function vxi11_send returned %d. ",ret);
- return -1;
- }
- else printf("(Info: VXI11_NULL_WRITE_RESP in vxi11_send_and_receive, resending query)\n");
- }
-
- bytes_returned = vxi11_receive(clink, buf, buf_len, timeout);
- if (bytes_returned <= 0) {
- if (bytes_returned >-VXI11_NULL_READ_RESP) {
- printf("Error: vxi11_send_and_receive: problem reading reply.\n");
- printf(" The function vxi11_receive returned %ld. ",bytes_returned);
- return -2;
- }
- else printf("(Info: VXI11_NULL_READ_RESP in vxi11_send_and_receive, resending query)\n");
- }
- } while (bytes_returned == -VXI11_NULL_READ_RESP || ret == -VXI11_NULL_WRITE_RESP);
- return 0;
- }
-
-
-/* FUNCTIONS TO RETURN A LONG INTEGER VALUE SENT AS RESPONSE TO A QUERY *
- * ==================================================================== */
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout) {
-char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
- memset(buf, 0, 50);
- if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
- printf("Returning 0\n");
- return 0;
- }
- return strtol(buf, (char **)NULL, 10);
- }
-
-/* Lazy wrapper function with default read timeout */
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd) {
- return vxi11_obtain_long_value(clink, cmd, VXI11_READ_TIMEOUT);
- }
-
-
-/* FUNCTIONS TO RETURN A DOUBLE FLOAT VALUE SENT AS RESPONSE TO A QUERY *
- * ==================================================================== */
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout) {
-char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
-double val;
- memset(buf, 0, 50);
- if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
- printf("Returning 0.0\n");
- return 0.0;
- }
- val = strtod(buf, (char **)NULL);
- return val;
- }
-
-/* Lazy wrapper function with default read timeout */
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd) {
- return vxi11_obtain_double_value(clink, cmd, VXI11_READ_TIMEOUT);
- }
-
-
-/*****************************************************************************
- * CORE FUNCTIONS - YOU SHOULDN'T NEED TO USE THESE FROM YOUR PROGRAMS OR *
- * INSTRUMENT LIBRARIES *
- *****************************************************************************/
-
-/* OPEN FUNCTIONS *
- * ============== */
-int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
-
- *client = clnt_create(ip, DEVICE_CORE, DEVICE_CORE_VERSION, "tcp");
-
- if (*client == NULL) {
- clnt_pcreateerror(ip);
- return -1;
- }
-
- return vxi11_open_link(ip, client, link, device);
- }
-
-int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
-
-Create_LinkParms link_parms;
-
- /* Set link parameters */
- link_parms.clientId = (long) *client;
- link_parms.lockDevice = 0;
- link_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
- link_parms.device = device;
-
- *link = (Create_LinkResp *) calloc(1, sizeof(Create_LinkResp));
-
- if (create_link_1(&link_parms, *link, *client) != RPC_SUCCESS) {
- clnt_perror(*client, ip);
- return -2;
- }
- return 0;
- }
-
-
-/* CLOSE FUNCTIONS *
- * =============== */
-int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link) {
-int ret;
-
- ret = vxi11_close_link(ip, client, link);
-
- clnt_destroy(client);
-
- return ret;
- }
-
-int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link) {
-Device_Error dev_error;
- memset(&dev_error, 0, sizeof(dev_error));
-
- if (destroy_link_1(&link->lid, &dev_error, client) != RPC_SUCCESS) {
- clnt_perror(client,ip);
- return -1;
- }
-
- return 0;
- }
-
-
-/* SEND FUNCTIONS *
- * ============== */
-
-/* A _lot_ of the time we are sending text strings, and can safely rely on
- * strlen(cmd). */
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd) {
- return vxi11_send(client, link, cmd, strlen(cmd));
- }
-
-/* We still need the version of the function where the length is set explicitly
- * though, for when we are sending fixed length data blocks. */
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len) {
-Device_WriteParms write_parms;
-int bytes_left = (int)len;
-char *send_cmd;
-
- send_cmd = new char[len];
- memcpy(send_cmd, cmd, len);
-
- write_parms.lid = link->lid;
- write_parms.io_timeout = VXI11_DEFAULT_TIMEOUT;
- write_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
-
-/* We can only write (link->maxRecvSize) bytes at a time, so we sit in a loop,
- * writing a chunk at a time, until we're done. */
-
- do {
- Device_WriteResp write_resp;
- memset(&write_resp, 0, sizeof(write_resp));
-
- if (bytes_left <= link->maxRecvSize) {
- write_parms.flags = 8;
- write_parms.data.data_len = bytes_left;
- }
- else {
- write_parms.flags = 0;
- /* We need to check that maxRecvSize is a sane value (ie >0). Believe it
- * or not, on some versions of Agilent Infiniium scope firmware the scope
- * returned "0", which breaks Rule B.6.3 of the VXI-11 protocol. Nevertheless
- * we need to catch this, otherwise the program just hangs. */
- if (link->maxRecvSize > 0) {
- write_parms.data.data_len = link->maxRecvSize;
- }
- else {
- write_parms.data.data_len = 4096; /* pretty much anything should be able to cope with 4kB */
- }
- }
- write_parms.data.data_val = send_cmd + (len - bytes_left);
-
- if(device_write_1(&write_parms, &write_resp, client) != RPC_SUCCESS) {
- delete[] send_cmd;
- return -VXI11_NULL_WRITE_RESP; /* The instrument did not acknowledge the write, just completely
- dropped it. There was no vxi11 comms error as such, the
- instrument is just being rude. Usually occurs when the instrument
- is busy. If we don't check this first, then the following
- line causes a seg fault */
- }
- if (write_resp . error != 0) {
- printf("vxi11_user: write error: %d\n",write_resp . error);
- delete[] send_cmd;
- return -(write_resp . error);
- }
- bytes_left -= write_resp . size;
- } while (bytes_left > 0);
-
- delete[] send_cmd;
- return 0;
- }
-
-
-/* RECEIVE FUNCTIONS *
- * ================= */
-
-// It appeared that this function wasn't correctly dealing with more data available than specified in len.
-// This patch attempts to fix this issue. RDP 2007/8/13
-
-/* wrapper, for default timeout */ long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len) { return vxi11_receive(client, link, buffer, len, VXI11_READ_TIMEOUT);
- }
-
-#define RCV_END_BIT 0x04 // An end indicator has been read
-#define RCV_CHR_BIT 0x02 // A termchr is set in flags and a character which matches termChar is transferred
-#define RCV_REQCNT_BIT 0x01 // requestSize bytes have been transferred. This includes a request size of zero.
-
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout) {
-Device_ReadParms read_parms;
-Device_ReadResp read_resp;
-long curr_pos = 0;
-
- read_parms.lid = link->lid;
- read_parms.requestSize = len;
- read_parms.io_timeout = timeout; /* in ms */
- read_parms.lock_timeout = timeout; /* in ms */
- read_parms.flags = 0;
- read_parms.termChar = 0;
-
- do {
- memset(&read_resp, 0, sizeof(read_resp));
-
- read_resp.data.data_val = buffer + curr_pos;
- read_parms.requestSize = len - curr_pos; // Never request more total data than originally specified in len
-
- if(device_read_1(&read_parms, &read_resp, client) != RPC_SUCCESS) {
- return -VXI11_NULL_READ_RESP; /* there is nothing to read. Usually occurs after sending a query
- which times out on the instrument. If we don't check this first,
- then the following line causes a seg fault */
- }
- if (read_resp . error != 0) {
- /* Read failed for reason specified in error code.
- * 0 no error
- * 4 invalid link identifier
- * 11 device locked by another link
- * 15 I/O timeout
- * 17 I/O error
- * 23 abort
- */
-
- printf("vxi11_user: read error: %d\n",read_resp . error);
- return -(read_resp . error);
- }
-
- if((curr_pos + read_resp . data.data_len) <= len) {
- curr_pos += read_resp . data.data_len;
- }
- if( (read_resp.reason & RCV_END_BIT) || (read_resp.reason & RCV_CHR_BIT) ) {
- break;
- }
- else if( curr_pos == len ) {
- printf("xvi11_user: read error: buffer too small. Read %d bytes without hitting terminator.\n", curr_pos );
- return -100;
- }
- } while(1);
- return (curr_pos); /*actual number of bytes received*/
-
- }
-
Index: sipmscan/trunk/vxi11_i686/vxi11_user.h
===================================================================
--- sipmscan/trunk/vxi11_i686/vxi11_user.h (revision 144)
+++ sipmscan/trunk/vxi11_i686/vxi11_user.h (nonexistent)
@@ -1,136 +0,0 @@
-/* Revision history: */
-/* $Id: vxi11_user.h,v 1.10 2007/10/30 12:47:33 sds Exp $ */
-/*
- * $Log: vxi11_user.h,v $
- * Revision 1.10 2007/10/30 12:47:33 sds
- * changed a lot of char *'s to const char *'s in an attempt to get
- * rid of pedantic gcc compiler warnings.
- *
- * Revision 1.9 2007/07/11 14:20:56 sds
- * removed #include <iostream> as not needed
- * removed using namespace std
- *
- * Revision 1.8 2007/07/10 13:54:11 sds
- * Added extra function:
- * int vxi11_open_device(char *ip, CLINK *clink, char *device);
- * This replaces the original vxi11_open_device fn, which did not pass
- * a char *device. Wrapper fn used for backwards compatibility.
- *
- * Revision 1.7 2007/07/10 11:20:43 sds
- * removed the following function:
- * int vxi11_open_link(CLIENT **client, VXI11_LINK **link);
- * ...since it was no longer needed, following the patch by
- * Robert Larice.
- *
- * Revision 1.6 2006/12/08 11:47:14 ijc
- * error on last ci, sorted.
- *
- * Revision 1.5 2006/12/08 11:45:29 ijc
- * added #define VXI11_NULL_READ_RESP
- *
- * Revision 1.4 2006/12/07 12:26:17 sds
- * added VXI11_NULL_READ_RESP #define
- *
- * Revision 1.3 2006/07/06 13:03:28 sds
- * Surrounded the whole header with #ifndef __VXI11_USER__.
- * Added a couple of vxi11_open_link() fns and a vxi11_close_link() fn, to
- * separate the link stuff from the client stuff.
- *
- * Revision 1.2 2006/06/26 12:42:54 sds
- * Introduced a new CLINK structure, to reduce the number of arguments
- * passed to functions. Wrote wrappers for open(), close(), send()
- * and receieve() functions, then adjusted all the other functions built
- * on those to make use of the CLINK structure.
- *
- * Revision 1.1 2006/06/26 10:36:02 sds
- * Initial revision
- *
- */
-
-/* vxi11_user.h
- * Copyright (C) 2006 Steve D. Sharples
- *
- * User library for opening, closing, sending to and receiving from
- * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
- * generated by rpcgen vxi11.x.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- * The author's email address is steve.sharples@nottingham.ac.uk
- */
-
-#ifndef __VXI11_USER__
-#define __VXI11_USER__
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <rpc/rpc.h>
-#include "vxi11.h"
-
-#define VXI11_DEFAULT_TIMEOUT 10000 /* in ms */
-#define VXI11_READ_TIMEOUT 2000 /* in ms */
-#define VXI11_CLIENT CLIENT
-#define VXI11_LINK Create_LinkResp
-#define VXI11_MAX_CLIENTS 256 /* maximum no of unique IP addresses/clients */
-#define VXI11_NULL_READ_RESP 50 /* vxi11_receive() return value if a query
- * times out ON THE INSTRUMENT (and so we have
- * to resend the query again) */
-#define VXI11_NULL_WRITE_RESP 51 /* vxi11_send() return value if a sent command
- * times out ON THE INSTURMENT. */
-
-struct CLINK {
- VXI11_CLIENT *client;
- VXI11_LINK *link;
- } ;
-typedef struct CLINK CLINK;
-
-/* The four main functions: open, close, send, receieve (plus a couple of wrappers) */
-/* In fact all 6 of these are wrappers to the original functions listed at the
- * bottom, that use separate CLIENT and VXI11_LINK structures. It was easier to
- * write wrappers for these functions than to re-write the original functions
- * themselves. These are the 4 (or 6 if you like) key user functions that you
- * should probably be using. They all use the CLINK structure. */
-int vxi11_open_device(const char *ip, CLINK *clink);
-int vxi11_open_device(const char *ip, CLINK *clink, char *device);
-int vxi11_close_device(const char *ip, CLINK *clink);
-int vxi11_send(CLINK *clink, const char *cmd);
-int vxi11_send(CLINK *clink, const char *cmd, unsigned long len);
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len);
-long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
-int vxi11_queryxx(CLINK *clink, char *mycmd);
-/* Utility functions, that use send() and receive(). Use these too. */
-int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len);
-long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
-long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout);
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout);
-double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout);
-long vxi11_obtain_long_value(CLINK *clink, const char *cmd);
-double vxi11_obtain_double_value(CLINK *link, const char *cmd);
-
-/* When I first wrote this library I used separate client and links. I've
- * retained the original functions and just written clink wrappers for them
- * (see above) as it's perhaps a little clearer this way. Probably not worth
- * delving this deep in use, but it's where the real nitty gritty is. */
-int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
-int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
-int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link);
-int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link);
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd);
-int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len);
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len);
-long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout);
-
-#endif
Index: sipmscan/trunk_v0.9/GuiLinkDef.h
===================================================================
--- sipmscan/trunk_v0.9/GuiLinkDef.h (nonexistent)
+++ sipmscan/trunk_v0.9/GuiLinkDef.h (revision 145)
@@ -0,0 +1,17 @@
+#ifdef __CINT__
+
+#pragma link off all globals;
+#pragma link off all classes;
+#pragma link off all functions;
+//#pragma link C++ class TGMdiSubwindow+;
+//#pragma link C++ class TGAppMainFrame+;
+
+//#pragma link C++ function MyEventHandler;
+//#pragma link C++ function GetDebug;
+//#pragma link C++ function MyRedraw;
+//#pragma link C++ function MyTimer;
+
+//#pragma link C++ class daq;
+
+#endif
+
Index: sipmscan/trunk_v0.9/MIKRO/.root_hist
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/.root_hist (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/.root_hist (revision 145)
@@ -0,0 +1,11 @@
+1000/0.3595
+125000+2782
+133000+2782
+.q
+135750-127750
+127750+4000
+10000*0.3595
+30000*0.3595
+80000*0.3595
+180000*0.3595
+.q
Index: sipmscan/trunk_v0.9/MIKRO/MIKRO.c
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/MIKRO.c (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/MIKRO.c (revision 145)
@@ -0,0 +1,296 @@
+#include "rs232.h"
+#include "MIKRO.h"
+
+//#define DEBUG
+
+#define COMWAIT 0.5
+#define COMDELAY 0.1
+
+static char MIKRO_Send[100], MIKRO_Receive[100];
+static char MIKRO_Device, MIKRO_Axes, MIKRO_Response;
+static int MIKRO_Port;
+static int nin, nout, rstat;
+static int MIKRO_type[100];
+
+int MIKRO_Cmd (int node, char *cmd)
+{
+ printf("Command: %1d %s\n",node,cmd);
+ Delay(COMDELAY);
+ FlushInQ (MIKRO_Port);
+ nout = sprintf (MIKRO_Send, "%1d %s\r", node, cmd);
+ ComWrt (MIKRO_Port, MIKRO_Send, nout);
+ if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+ if (nin==2) return (0);
+ }
+ return (-1);
+}
+
+int MIKRO_Set (int node, char cmd[], int val)
+{
+ printf("Command: %1d %s %d\n",node,cmd, val);
+ Delay(COMDELAY);
+ FlushInQ (MIKRO_Port);
+ nout = sprintf (MIKRO_Send, "%1d %s %d\r", node, cmd, val);
+ ComWrt (MIKRO_Port, MIKRO_Send, nout);
+ if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+ if (nin==2) return (0);
+ }
+ return (-1);
+}
+
+int MIKRO_Get (int node, char cmd[], int *val)
+{
+ short int stmp;
+
+ Delay(COMDELAY);
+ FlushInQ (MIKRO_Port);
+ nout = sprintf (MIKRO_Send, "%1d %s\r", node, cmd);
+ ComWrt (MIKRO_Port, MIKRO_Send, nout);
+ if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+ if (nin>0){
+// MIKRO_Receive[--nin]=0;
+ switch (nin) {
+ case 9:
+ sscanf (MIKRO_Receive, "%*x %hx",&stmp);
+ *val=stmp;
+ return (0);
+ case 13:
+ sscanf (MIKRO_Receive, "%*x %x",val);
+ return (0);
+ default:
+ printf("Node %d Com error => bytes rcved=0x%02x buf=%s\n",node,nin,MIKRO_Receive);
+ break;
+ }
+ }
+ }
+ return (-1);
+}
+
+int MIKRO_GetStat (int node)
+{
+ int tmp;
+
+ Delay(COMDELAY);
+ FlushInQ (MIKRO_Port);
+ nout = sprintf (MIKRO_Send, "%1d st\r", node);
+ ComWrt (MIKRO_Port, MIKRO_Send, nout);
+ if ((nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa))==0) {
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+// if (nin>0) nin--;
+ MIKRO_Receive[nin]=0;
+ if (nin==9) {
+ tmp=0;
+ sscanf (MIKRO_Receive, "%*x %hx",(short int *)&tmp);
+ return (tmp);
+ }
+ }
+ return (-1);
+}
+
+int _VI_FUNC MIKRO_Open (char * dev)
+{
+
+
+ MIKRO_Port=OpenComConfig (dev, "", 38400, 0, 8, 1, 512, 512);
+// SetXMode (MIKRO_Port, 0);
+// SetCTSMode (MIKRO_Port, LWRS_HWHANDSHAKE_OFF);
+// SetComTime (MIKRO_Port, COMWAIT);
+
+ return 0;
+}
+
+int _VI_FUNC MIKRO_Init (int node, int type)
+{
+ MIKRO_type[node]=type;
+ Delay(0.1);
+ MIKRO_Cmd(node,"ok 1");
+ MIKRO_Cmd(node,"ab");
+ switch (type){
+ case 1: // 3M Linear
+ MIKRO_Cmd(node,"k 1");
+ MIKRO_Cmd(node,"ad 200");
+ MIKRO_Cmd(node,"aa 2");
+ MIKRO_Cmd(node,"fa 1");
+ MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
+ MIKRO_Cmd(node,"sr 1000");
+ MIKRO_Cmd(node,"sp 750");
+ MIKRO_Cmd(node,"ac 100");
+ MIKRO_Cmd(node,"dc 200");
+ MIKRO_Cmd(node,"por 28000");
+ MIKRO_Cmd(node,"i 600");
+ MIKRO_Cmd(node,"ano 2350");
+ MIKRO_Cmd(node,"ls 1");
+ MIKRO_Cmd(node,"hp 1");
+ MIKRO_Cmd(node,"hf 1");
+ break;
+ case 2: // 3M Rotary
+ MIKRO_Cmd(node,"k 1");
+ MIKRO_Cmd(node,"ad 200");
+ MIKRO_Cmd(node,"aa 1");
+ MIKRO_Cmd(node,"fa 1");
+ MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
+ MIKRO_Cmd(node,"sr 1000");
+ MIKRO_Cmd(node,"sp 550");
+ MIKRO_Cmd(node,"ac 100");
+ MIKRO_Cmd(node,"dc 200");
+ MIKRO_Cmd(node,"por 28000");
+ MIKRO_Cmd(node,"i 600");
+ MIKRO_Cmd(node,"ano 2350");
+ MIKRO_Cmd(node,"ls 99");
+ MIKRO_Cmd(node,"hp 1");
+ MIKRO_Cmd(node,"hf 1");
+ break;
+ case 3: // 4M Linear
+ MIKRO_Cmd(node,"k 1");
+ MIKRO_Cmd(node,"ad 1000");
+ MIKRO_Cmd(node,"aa 2");
+ MIKRO_Cmd(node,"fa 1");
+ MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
+ MIKRO_Cmd(node,"sr 1000");
+ MIKRO_Cmd(node,"sp 1000");
+ MIKRO_Cmd(node,"ac 100");
+ MIKRO_Cmd(node,"dc 200");
+ MIKRO_Cmd(node,"por 28000");
+ MIKRO_Cmd(node,"i 600");
+ MIKRO_Cmd(node,"ano 2600");
+ MIKRO_Cmd(node,"ls 1");
+ MIKRO_Cmd(node,"hp 1");
+ MIKRO_Cmd(node,"hf 1");
+ break;
+ case 4: // 4M Rotary
+ MIKRO_Cmd(node,"k 1");
+ MIKRO_Cmd(node,"ad 100");
+ MIKRO_Cmd(node,"aa 1");
+ MIKRO_Cmd(node,"fa 1");
+ MIKRO_Cmd(node,"fd 3000"); // Set Max Dynamic Following Error (1000)
+ MIKRO_Cmd(node,"sp 800");
+ MIKRO_Cmd(node,"sr 1000");
+ MIKRO_Cmd(node,"ac 100");
+ MIKRO_Cmd(node,"dc 200");
+ MIKRO_Cmd(node,"por 28000");
+ MIKRO_Cmd(node,"i 600");
+ MIKRO_Cmd(node,"ano 2600");
+ MIKRO_Cmd(node,"ls 99");
+ break;
+ default:
+ break;
+ }
+ MIKRO_Cmd(node,"rd 0");
+ MIKRO_Cmd(node,"n 2");
+ MIKRO_Cmd(node,"en");
+ if (type != 0){
+ MIKRO_Cmd(node,"eeboot 1");
+ MIKRO_Cmd(node,"eepsav 1");
+ Delay(0.1);
+ }
+ return 0;
+}
+
+int _VI_FUNC MIKRO_Reset (int node)
+{
+
+ MIKRO_Cmd(node,"di"); // disables the node
+
+ Delay(COMDELAY);
+ nout = sprintf (MIKRO_Send, "%1d rn\r", node); // resets the node
+ ComWrt (MIKRO_Port, MIKRO_Send, nout);
+
+ SetComTime (MIKRO_Port, 20);
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+ SetComTime (MIKRO_Port, COMWAIT);
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+// if (nin!=0) nin--;
+// MIKRO_Receive[nin]=0;
+ printf("%s\n",MIKRO_Receive);
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+ nin = ComRdTerm (MIKRO_Port, MIKRO_Receive, 30, 0xa);
+// if (nin!=0) nin--;
+// MIKRO_Receive[nin]=0;
+ printf("%s\n",MIKRO_Receive);
+ MIKRO_Init(node,0);
+ return 0;
+}
+
+int _VI_FUNC MIKRO_ReferenceMove (int node)
+{
+ int fac=10;
+ int n2,as;
+
+ MIKRO_Cmd(node,"ab");
+ MIKRO_Cmd(node,"en");
+ MIKRO_Set(node,"ll",-1000000);
+ MIKRO_Set(node,"ll",1000000);
+
+ if (!(MIKRO_GetStat(node)&0x8000)){
+ MIKRO_Set(node,"v", -100*fac);
+ do {
+ MIKRO_GetPosition(node,&n2);
+ MIKRO_Get(node,"as",&as);
+ printf("Approaching N-limit node=%d pos=%d speed=%d\n",node,n2,as);
+ } while (MIKRO_GetStat(node)&0x1 );
+ if (!(MIKRO_GetStat(node)&0x8000)){
+ printf("N-limit not reached! Trying with half speed.\n");
+ MIKRO_Set(node,"v", -50*fac);
+ do {
+ MIKRO_GetPosition(node,&n2);
+ MIKRO_Get(node,"as",&as);
+ printf("Approaching N-limit node=%d pos=%d speed=%d\n",node,n2,as);
+ } while (MIKRO_GetStat(node)&0x1 );
+ if (!(MIKRO_GetStat(node)&0x8000)){
+ printf("N-limit not reached! Aborting ...\n");
+ MIKRO_Cmd(node,"ab");
+ return -1;
+ }
+ }
+ }
+ MIKRO_MoveFor(node,1000);
+ MIKRO_Set(node,"v", -10*fac);
+ do {
+ MIKRO_GetPosition(node,&n2);
+ MIKRO_Get(node,"as",&as);
+ printf("Fine tuning 0: node=%d pos=%d speed=%d\n",node,n2, as);
+ } while (MIKRO_GetStat(node)&0x1);
+ if (!(MIKRO_GetStat(node)&0x8000)){
+ printf("N-limit not reached! Aborting ...\n");
+ MIKRO_Cmd(node,"ab");
+ return -1;
+ }
+
+ MIKRO_MoveFor(node,1000);
+ MIKRO_Set(node,"ho",0);
+ MIKRO_Set(node,"ll",-100);
+ MIKRO_Set(node,"ll",500100);
+ return 0;
+}
+
+int _VI_FUNC MIKRO_MoveFor (int node, int dist)
+{
+ MIKRO_Set(node,"lr", dist);
+ MIKRO_Cmd(node,"mv");
+ while (MIKRO_GetStat(node)&1) Delay(0.1);
+ return 0;
+}
+
+int _VI_FUNC MIKRO_MoveTo (int node, int dest)
+{
+// printf("-> MIKRO_MoveTo \n");
+ MIKRO_Set(node,"la", dest);
+ MIKRO_Cmd(node,"mv");
+ while (MIKRO_GetStat(node)&1) Delay(0.1);
+ return 0;
+}
+
+int _VI_FUNC MIKRO_GetPosition (int node, int pos[])
+{
+ MIKRO_Get(node,"pos",pos);
+ return 0;
+}
+
+void _VI_FUNC MIKRO_Close (void)
+{
+CloseCom (MIKRO_Port);
+}
+
Index: sipmscan/trunk_v0.9/MIKRO/MIKRO.h
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/MIKRO.h (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/MIKRO.h (revision 145)
@@ -0,0 +1,21 @@
+
+#define _VI_FUNC
+int _VI_FUNC MIKRO_Open (char *dev);
+
+int _VI_FUNC MIKRO_Reset (int node);
+
+int _VI_FUNC MIKRO_Init (int node, int type);
+
+int _VI_FUNC MIKRO_ReferenceMove (int node);
+
+int _VI_FUNC MIKRO_MoveFor (int node, int dist);
+
+int _VI_FUNC MIKRO_MoveTo (int node, int dest);
+
+int _VI_FUNC MIKRO_GetPosition (int node, int pos[]);
+
+int _VI_FUNC MIKRO_SetZero (char axes);
+
+int _VI_FUNC MIKRO_SetPlain (char axes);
+
+void _VI_FUNC MIKRO_Close (void);
Index: sipmscan/trunk_v0.9/MIKRO/Makefile
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/Makefile (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/Makefile (revision 145)
@@ -0,0 +1,4 @@
+mikro_ctrl: mikro_ctrl.c rs232.c rs232.h MIKRO.c
+ gcc mikro_ctrl.c rs232.c MIKRO.c -o mikro_ctrl -lm
+mikro_ctrl_d: mikro_ctrl.c rs232.c rs232.h MIKRO.c
+ gcc mikro_ctrl.c rs232.c MIKRO.c -o mikro_ctrl_d -lm -DDEBUG
Index: sipmscan/trunk_v0.9/MIKRO/mikro_ctrl
===================================================================
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/sipmscan/trunk_v0.9/MIKRO/mikro_ctrl
Property changes:
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+application/octet-stream
\ No newline at end of property
Index: sipmscan/trunk_v0.9/MIKRO/mikro_ctrl.c
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/mikro_ctrl.c (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/mikro_ctrl.c (revision 145)
@@ -0,0 +1,148 @@
+#include <stdlib.h>
+#include <stdio.h>
+#include "MIKRO.h"
+
+
+#include <getopt.h>
+
+#define MIKRO_COM "/dev/ttyUSB0"
+
+int help(){
+ fprintf(stderr,"Usage: mikro [-i node][-n node] [-u up] [-d down] [-r node] [-h node] [-a] [-g] [-m pos]\n");
+ fprintf(stderr," Options:\n");
+ fprintf(stderr,"[-n node] -i type .. initialize node + save to EEPROM\n");
+ fprintf(stderr," (1=3MLin,2=3MRot,3=4MLin,4=4MRot,0=skip\n");
+ fprintf(stderr," -n node -h .. homing procedure for node\n");
+ fprintf(stderr," -n node -r .. reset node\n");
+ fprintf(stderr," -n node -u .. move node for +1000\n");
+ fprintf(stderr," -n node -d .. move node for -1000\n");
+ fprintf(stderr,"[-n node] -a .. current status of the nodes\n");
+ fprintf(stderr," -n node -v value -s cmd .. set value of the cmd on the node\n");
+ fprintf(stderr," -n node -g cmd .. get value of the cmd on the node\n");
+ fprintf(stderr," -n node -m position .. move node to position\n");
+ fprintf(stderr," -l delaysec .. loop test with the delay delaysec\n");
+ return 0;
+}
+
+int main (int argc, char ** argv){
+ int i,j,k;
+ int node=0,opt,value=0,itype=0;
+ int nr_nodes=3;
+ int ierr;
+ int pos,xpos,ypos,zpos;
+ char custcmd[20];
+ char statbits[16][10]={"Moving","In-Pos","Mode","AMN Mode","%Done","DNet","DNErr","FD-Error",
+ "Disable","R-Lim","Local","Estop","Event1","P-Lim","Event2","N-Lim"};
+
+ MIKRO_Open (MIKRO_COM);
+
+ // ":" just indicates that this option needs an argument
+ while ((opt = getopt(argc, argv, "i:av:s:l:udn:c:pm:g:hre")) != -1) {
+ switch (opt) {
+ case 'i':
+ itype = atoi(optarg);
+ if(node != 0)
+ MIKRO_Init (node,itype);
+ else
+ for(i=1; i<nr_nodes+1; i++) MIKRO_Init (i,itype);
+ break;
+ case 'a':
+ if(node != 0) {
+ pos=0;
+ ierr=MIKRO_GetStat(node);
+ MIKRO_GetPosition (node, &pos);
+ printf("node %d position %d status =%04x\n",node,pos,ierr);
+ for(i=0; i<16; i++){
+ printf("%d: %s\n", (ierr&1),statbits[i]);
+ ierr>>=1;
+ }
+ }else{
+ pos=0;
+ for (j=1;j<nr_nodes+1;j++){
+ ierr=MIKRO_GetStat(j);
+ MIKRO_GetPosition (j, &pos);
+ printf("node %d position %d status =%04x\n",j,pos,ierr);
+ for(i=0; i<16; i++){
+ printf("%d: %s\n", (ierr&1),statbits[i]);
+ ierr>>=1;
+ }
+ }
+ }
+ break;
+ case 'l':
+ printf("MIKRO_MoveTo Loop\n");
+ for (i=0;i<5;i++){
+ xpos=i*1000+10000;
+ MIKRO_MoveTo (1, xpos);
+ for (j=0;j<5;j++){
+ ypos=j*1000+10000;
+ MIKRO_MoveTo (2, ypos);
+ for (k=0;k<50;k++){
+ zpos=k*1000+10000;
+ MIKRO_MoveTo (3, zpos);
+ printf("x=%d y=%d z=%d\n",xpos,ypos,zpos);
+ Delay(atof(optarg));
+ }
+ }
+ }
+ break;
+ case 'n':
+ node = atoi(optarg);
+ break;
+ case 'm':
+ MIKRO_MoveTo (node, atoi(optarg));
+ printf("MIKRO_MoveTo node=%d pos=%d \n",node,atoi(optarg));
+ MIKRO_GetPosition (node, &i);
+ printf("node %d position %d \n",node,i);
+ break;
+ case 'v':
+ value=atoi(optarg);
+ break;
+ case 's':
+ MIKRO_Set (node,optarg,value);
+ printf("MIKRO_Set node %d cmd=%s val=%d\n",node,optarg, value);
+ break;
+ case 'g':
+ MIKRO_Get (node,optarg,&i);
+ printf("MIKRO_Get node %d cmd=%s val=%d\n",node,optarg, i);
+ break;
+ case 'h':
+ printf("MIKRO_ReferenceMove node=%d\n",node);
+ MIKRO_ReferenceMove (node);
+ break;
+ case 'r':
+ printf("MIKRO_Reset node=%d\n",node);
+ MIKRO_Reset (node);
+ break;
+ case 'u':
+ MIKRO_Set(node,"lr", 1000);
+ MIKRO_Cmd(node,"mv");
+ break;
+ case 'd':
+ MIKRO_Set(node,"lr", -1000);
+ MIKRO_Cmd(node,"mv");
+ break;
+ case 'e':
+ MIKRO_Cmd(node,"ab");
+ MIKRO_Cmd(node,"n 2");
+ MIKRO_Cmd(node,"en");
+ break;
+ case 'c': // cust. com.
+ sprintf(custcmd,"%s",optarg);
+ MIKRO_Cmd(node,custcmd);
+ break;
+ case 'p': // get pos.
+ if(node != 0){
+ MIKRO_GetPosition (node, &pos);
+ printf("%d\n",pos);
+ }
+ break;
+ default: // '?'
+ help();
+ break;
+ }
+ }
+ if (argc==1) help();
+ MIKRO_Close ();
+ return 0;
+}
Index: sipmscan/trunk_v0.9/MIKRO/mikro_ctrl_d
===================================================================
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/sipmscan/trunk_v0.9/MIKRO/mikro_ctrl_d
Property changes:
Added: svn:mime-type
## -0,0 +1 ##
+application/octet-stream
\ No newline at end of property
Index: sipmscan/trunk_v0.9/MIKRO/quick_scan.sh
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/quick_scan.sh (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/quick_scan.sh (revision 145)
@@ -0,0 +1,15 @@
+#! /bin/bash
+
+#fname=$1
+#num_events=$2
+
+#./addheader $fname 1 $num_events 0 0 0 0 0 0
+#./addheader $fname 3 0 0 0 0 0 0
+#./daq $fname $num_events
+#./addheader $fname 2
+
+position=`./mikro_ctrl -a | grep -o '[[:digit:]]*' | awk -F : '{if(NR==2 || NR==5){print $1}}'`
+#pos_x=${position}[0]
+#pos_y=${position}[1]
+#echo "position x = " $pos_x " position y = " $pos_y
+echo $position >> test.txt
Index: sipmscan/trunk_v0.9/MIKRO/rs232.c
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/rs232.c (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/rs232.c (revision 145)
@@ -0,0 +1,125 @@
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <string.h>
+#include <termios.h>
+
+#include "rs232.h"
+//#define DEBUG
+
+const int debug=0;
+
+struct termios tattr;
+
+int Delay(double sec){
+ return usleep((int) (sec*1e6) );
+}
+
+int SetComTime(int fd, double timeout_seconds){
+
+ int ntenth;
+
+ ntenth = (int)(timeout_seconds*10);
+ tattr.c_cc[VTIME] = ntenth;
+ tcsetattr(fd, TCSANOW, &tattr);
+#ifdef DEBUG
+ printf("SetComTime: %d\n", ntenth);
+#endif
+ return 0;
+}
+
+int FlushInQ(int fd){
+ return 0;
+}
+
+int FlushOutQ(int fd){
+ return 0;
+}
+
+int ComWrt (int fd, char* cmd, int Count ){
+
+ int nwr;
+
+ nwr=write(fd, cmd, Count);
+#ifdef DEBUG
+ printf ( "ComWrt: %d, %d, %s\n", Count, nwr, cmd);
+#endif
+ return nwr;
+}
+
+int ComRdTerm (int fd, char *response, int nb, int termchar)
+{
+
+ int nread, nloop;
+
+ nread=0;
+ nloop=0;
+
+#ifdef DEBUG
+ printf ( "ComRdTerm start\n") ;
+#endif
+// rewind(fpr);
+ while (1) {
+ if (nloop++ == nb) return -1;
+// nread += read ( fd, response+nread, nb-nread );
+ nread += read ( fd, response+nread, 1 );
+#ifdef DEBUG
+ response[nread]=0;
+ printf ("ComRdTerm nread: %d %d %s\n", nloop, nread, response) ;
+#endif
+ if (nread>1) if(response[nread-1] == termchar) break;
+ }
+
+ nread = nread - 2;
+ response[nread]=0;
+#ifdef DEBUG
+ printf("CmdRdTerm: %s\n",response);
+#endif
+ return nread;
+}
+
+int OpenComConfig( char *dev, char * device_name, long Baud_Rate, int Parity, int Data_Bits,
+ int Stop_Bits, int Input_Queue_Size, int Output_Queue_Size ){
+
+ int fd;
+
+ memset (&tattr, 0, sizeof tattr);
+
+ fd=open(dev, O_RDWR | O_NOCTTY | O_SYNC);
+// see 'man tcsetattr'
+ tcgetattr (fd, &tattr);
+ cfmakeraw(&tattr);
+ cfsetspeed(&tattr, B38400);
+// cfsetispeed(&tattr, B38400);
+// cfsetospeed(&tattr, B38400);
+// input modes
+ tattr.c_iflag&=~IGNBRK;
+ tattr.c_iflag&=~(IGNCR | ICRNL | INLCR);
+ tattr.c_iflag&=~(IXON | IXOFF | IXANY);
+// output modess
+ tattr.c_oflag=0;
+// local modes
+ tattr.c_lflag=0;
+ tattr.c_lflag &= ~(ICANON|ECHO) ; // canonical mode and echo input char
+// control modes
+ tattr.c_cflag |= (CLOCAL | CREAD); // ignore modem controls,
+ // enable reading
+ tattr.c_cflag &= ~(PARENB | PARODD); // shut off parity
+ tattr.c_cflag &= ~CSTOPB; // set two stop bits
+ tattr.c_cflag &= ~CRTSCTS; // enable RTS/CTS flow control
+
+ tattr.c_cc[VMIN] = 0;
+ tattr.c_cc[VTIME] = 2;
+ tcsetattr(fd, TCSAFLUSH, &tattr);
+
+#ifdef DEBUG
+ printf("OpenComConfig\n");
+#endif
+ return fd; ;
+}
+
+
+int CloseCom (int fd){
+
+ close(fd);
+ return;
+}
Index: sipmscan/trunk_v0.9/MIKRO/rs232.h
===================================================================
--- sipmscan/trunk_v0.9/MIKRO/rs232.h (nonexistent)
+++ sipmscan/trunk_v0.9/MIKRO/rs232.h (revision 145)
@@ -0,0 +1,20 @@
+#ifndef _RS232_H_
+#define _RS232_H_
+#include <stdlib.h>
+#include <stdio.h>
+
+#define LWRS_HWHANDSHAKE_OFF 0
+#define LWRS_HWHANDSHAKE_CTS_RTS_DTR 1
+#define LWRS_HWHANDSHAKE_CTS_RTS 2
+
+int Delay(double seconds);
+int FlushInQ(int fd);
+int FlushOutQ(int fd);
+int ComWrt (int fd, char* cmd, int Count ) ;
+int ComRdTerm (int fd, char* result, int count, int termchar );
+int OpenComConfig(char *dev, char * device_name, long Baud_Rate, int Parity, int Data_Bits,
+ int Stop_Bits, int Input_Queue_Size, int Output_Queue_Size );
+int CloseCom (int fd);
+int SetComTime(int fd, double timeout_seconds);
+#endif
+
Index: sipmscan/trunk_v0.9/README
===================================================================
--- sipmscan/trunk_v0.9/README (nonexistent)
+++ sipmscan/trunk_v0.9/README (revision 145)
@@ -0,0 +1,155 @@
+SOFTWARE FOR SIPM CHARACTERIZATION WITH CAMAC, SCOPE, BIAS VOLTAGE AND TABLE POSITION SUPPORT
+=============================================================================================
+By Gasper Kukec Mezek, April 2015.
+
+________________
+1. Installation:
+
+Pre-requisites for offline and online modes:
+a) Offline mode (support for histogramming and analysis):
+ - A newer (5.34 or higher) pro version of ROOT (https://root.cern.ch).
+b) Online mode (support for histogramming, analysis and data acquisition):
+ - Perl developer package libperl-dev for installation of net-snmp (sudo apt-get install libperl-dev).
+ - Current version of net-snmp (http://www.net-snmp.org).
+ - A newer (5.34 or higher) pro version of ROOT (https://root.cern.ch).
+ - USB developer package libusb-dev (sudo apt-get install libusb-dev).
+
+Installation is done through the usual "./configure" and "make" commands to enable the use of this software with 32 bit or 64 bit systems.
+
+Configure takes the following arguments:
+- First argument is the configure option (help, nomake, all, clean, compress):
+ help = shows configure help
+ all = prepares OS dependent files and makes the needed usb daq libraries
+ nomake = only prepares OS dependent files
+ clean = cleans the installation to the base file structure (keeps the results directory)
+ compress = compresses the base installation into a tar-ball
+- Second argument is the online/offline configure setting (only used when first argument is nomake or all), that enables the software to work with:
+ a connected CAMAC and scope (I)
+ only a connected scope (S)
+ with no connected devices (O)
+- The following arguments set specific computer details and can be entered in any order:
+ a) --root-install=/path/to/root/directory -> The ROOT install directory, if it is not installed in a standard location (especially needed when running the program with superuser, since it usually does not have the required environment variables).
+ b) --snmp-install=/path/to/snmp/directory -> The NET-SNMP install directory, if it is not installed in a standard location.
+ c) --ostype=YYYY -> Optional argument to specifically set the OS type to either 32bit (YYYY = i686) or 64bit (YYYY = x86_64). If argument not supplied, the configure script will try to get this information automatically through uname.
+
+Running "./configure" or "./configure help" will give more information on specific uses.
+Example:
+ ./configure all I --root-install=/opt/root --snmp-install=/opt/net-snmp --ostype=i686
+
+Makefile:
+Once configuration is done, a Makefile will be generated and further installation is done by running "make". Running "make relib" will only recreate the libraries in case something has been edited in them.
+Example:
+ make
+
+On first run of the program, make sure to copy the ./mpod/WIENER-CRATE-MIB.txt to the MIB directory in your installation of net-snmp. This can be in:
+ ~/.snmp/mibs
+or
+ [/snmp/install/directory]/share/snmp/mibs
+
+________________________
+2. Running the software:
+
+Once installation is performed, use
+ ./start.sh
+to start the software in offline mode or
+ sudo ./start.sh
+to start the software in online mode. Once the software starts, it will let you know (in the terminal) if connection to CAMAC was correctly established.
+
+____________________
+3. Feature overview:
+
+The main window is divided into 5 subwindows:
+a) Settings window:
+ - ON/OFF switches for voltage and surface scans.
+ - a voltage limiter -> sets the maximum output voltage for safety reasons
+ - clean plots toggle switch -> when ON, no additional stats will be displayed on plots/histograms
+ - scope IP -> sets the oscilloscope IP address
+ - LASER settings info panel -> this will be written to the output file and is used for supplying additional information
+ - chamber temperature -> the chamber temperature to be written to the output file
+ - incidence angle -> the angle at which the sample is rotated around its axis, relative to the LASER beam (0 degrees is perpendicular to LASER beam)
+
+b) Main measurement window:
+ - settings for table position and bias voltage
+ - when scans are enabled, additional settings for scans
+ - number of events -> setting for the number of events to gather in a measurement
+ - time stamp -> informational time (start time of measurement is written to output file)
+ - file selector (for scans, the filenames will be appended sequential numbers to distinguish them)
+ - start acquisition button -> starts the measurement based on selected settings
+ - waveform analysis settings (channel, measurement type)
+ - possibility to send custom one-line commands
+
+c) Histogram file selection window:
+ - open past measurements for analysis
+ - if using multiple files, use multiple file select or select all listed files
+ - files will be used in order displayed on the list
+ - to clear the complete list, use the clear list button
+ - to edit the header information of currently selected files, use the edit header button
+ - any opened measurement has an info display of its header at the bottom for easier navigation
+
+d) Histogram window:
+ - displays the currently selected histogram in the histogram file selection window
+
+e) Histogram controls window:
+ - directly linked to the histogram window, it enables plotting options
+ - can set ranges on histogram plots
+ - can change between different histogram types (ADC, TDC, ADC vs. TDC, 2D surface plot)
+ - for the 2D surface plot, the relevant files need to be selected in the histogram file selection window
+ - toggle for logarithmic Y scale
+ - the currently selected histogram can be manually exported with the export button
+ - fit settings used when running "Fit spectrum" and "Fit all selected" options in the Analysis menu
+
+On the top, there are 4 menus:
+a) File:
+ - New Measurement -> not working
+ - Exit -> exit the software (shortkey x)
+
+b) Analysis:
+ - Histogram type -> change between histogram types (same as in histogram controls window)
+ - Fit spectrum -> fit the currently open spectrum for peaks
+ - Fit all selected -> fit all the selected ADC spectra selected in the histogram file selection window for peaks and display the breakdown voltage plots
+ - Integrate spectrum (X, Y) -> integrate the ADC spectrum for multiple files with an X or Y scan (used for edge scans)
+ - Relative PDE -> calculation of the relative PDE for the currently selected files
+
+c) Tools:
+ - Fieldpoint temperature sensor -> direct graphing of the fieldpoint temperature sensor (with settings for fieldpoint channel, start time and end time), output is a graph (if exporting) and a comma separated list saved to folder ./fieldpoint. Updating the graph can cause unstable behavior. If possible, use ~/sipmscan/fieldpoint_standalone instead.
+
+d) Windows:
+ - Specific window tiling
+ - Switch between active windows
+
+e) Help information
+
+Important!
+When using any analysis method (surface 2D plot, fitting, integration, ADC spectra display) only events inside the selected TDC window will be used so set the TDC range accordingly.
+
+______________
+4. Change log:
+
+17.7.2015 (Current Rev):
+a) Fixed a problem with ADC peak fitting (peak fitting returning a segmentation fault).
+b) Added support to edit file headers (in case, some were created at an older date and did not include some header information or there was a mistake in writing them).
+c) Temperature data can only be retrieved when connected to the IJS network (IP = 178.172.43.xxx) and is disabled otherwise.
+d) The relative PDE measurement now takes the incidence angle value directly from input files.
+e) Currently, data acquisition only works on 32bit computers.
+f) Fixed issue with program not correctly writting multiple channels.
+
+5.5.2015 (Rev 128):
+a) Added a header display for opened files in the histogram file selection window. This enables a quicker view of the measurement information.
+b) Added an incidence angle input to be able to save sample rotation angle to headers of files.
+c) Added support for the fieldpoint temperature sensor (FP RTD 122). Can now plot and export data from the sensor for a specific channel and specific time range. For now, this option only works if the PC you are using this program on is connected to an internet/ethernet connection at IJS.
+d) Added a limited relative PDE analysis option. At this time, it takes the selected files and calculates the PDE, relative to the first selected file. The first file should be measured at incidence angle 0, with others having an incidence angle shift of +15 (1st file -> 0, 2nd file -> 15, 3rd file -> 30,...).
+
+9.4.2015 (Rev 127):
+a) Added communications panel for connecting to a Tektronix scope.
+b) Added limited support for waveform analysis with a Tektronix scope. For now, it only works when linking it to CAMAC acquisition.
+c) Added a manual chamber temperature entry field.
+
+16.3.2015 (Rev 117):
+a) First version of sipmscan.
+b) Added support for CAMAC, bias voltage settings and table position settings.
+c) Added support for opening measured histograms.
+d) Added support for analysis:
+ - making surface plots
+ - fitting the ADC spectrum
+ - creating breakdown voltage plots
+ - integrating the ADC spectrum with changing X or Y direction (edge scans)
Index: sipmscan/trunk_v0.9/configure
===================================================================
--- sipmscan/trunk_v0.9/configure (nonexistent)
+++ sipmscan/trunk_v0.9/configure (revision 145)
@@ -0,0 +1,289 @@
+#!/bin/bash
+
+function colorecho
+{
+ echo -e$2 "\033[33m$1\033[39m"
+}
+
+function errorecho
+{
+ echo -e "\031[33m$1\033[39m"
+}
+
+function helptext()
+{
+ colorecho "#------------------------------"
+ colorecho "# Configure instructions: -----"
+ colorecho "#------------------------------"
+ colorecho ""
+ colorecho "./configure [option] [type] [install directories] [ostype]"
+ colorecho ""
+ colorecho "[option] = Option for configure:"
+ colorecho " help Display configure instructions."
+ colorecho " nomake Only prepare system dependent files (base directory and online/offline mode)."
+ colorecho " all Prepare system dependent files and make used libraries."
+ colorecho " clean Clean the installation directory. Does not clean the results directory."
+ colorecho " compress Compress the source code in a tar-ball."
+ colorecho ""
+ colorecho "[type] = Configure for use in online or offline mode (only needed in nomake and all):"
+ colorecho " I Online mode."
+ colorecho " O Offline mode (no connection to CAMAC, motor, voltage supply and scope)."
+ colorecho " S Offline mode with scope connection (no connection to CAMAC, motor and voltage supply)."
+ colorecho ""
+ colorecho "[install directories] = Directories where ROOT and NET-SNMP are installed (when running with superuser, this is important, otherwise optional):"
+ colorecho " --root-install=/root/install/directory"
+ colorecho " --snmp-install=/snmp/install/directory"
+ colorecho ""
+ colorecho "[ostype] = Specific setting for 64bit or 32bit version of OS (optional):"
+ colorecho " --ostype=i686 32bit OS type"
+ colorecho " --ostype=x86_64 64bit OS type"
+ colorecho ""
+ colorecho "Example:"
+ colorecho " ./configure all I --root-install=/home/user/root --snmp-install=/home/user/snmp"
+ colorecho ""
+ colorecho "#------------------------------"
+}
+
+# Check for arguments
+if [ "$1" == "" ]; then
+ errorecho "Error! No arguments supplied."
+ echo ""
+ helptext
+ exit 1
+else
+ # When using help, only display help and then exit
+ if [ "$1" == "help" ]; then
+ helptext
+ exit 0
+ fi
+
+ # Print help and exit if we give a wrong first argument
+ if [ "$1" != "nomake" ] && [ "$1" != "all" ] && [ "$1" != "clean" ] && [ "$1" != "compress" ]; then
+ errorecho "Error! Wrong configuration option selected (first argument)."
+ echo ""
+ helptext
+ exit 1
+ fi
+
+ startdir=$PWD
+
+ # Check for ROOT and NET-SNMP install directories and for OS type
+ snmpsearch="--snmp-install="
+ rootsearch="--root-install="
+ ossearch="--ostype="
+ snmpdirectory=-1
+ rootdirectory=-1
+ osmanual=-1
+ for var in $@
+ do
+ case $var in
+ "$snmpsearch"*)
+ snmpdirectory=${var#$snmpsearch}
+ echo "NET-SNMP directory: $snmpdirectory";;
+ "$rootsearch"*)
+ rootdirectory=${var#$rootsearch}
+ echo "ROOT directory: $rootdirectory";;
+ "$ossearch"*)
+ osmanual=${var#$ossearch};;
+ *) ;;
+ esac
+ done
+
+ # If n ot supplied, check automatically for OS type
+ if [ $osmanual == -1 ]; then
+ ostype=`uname -p`
+ if [ "$ostype" != "x86_64" ] && [ "$ostype" != "i686" ]; then
+ ostype=`uname -i`
+ if [ "$ostype" != "x86_64" ] && [ "$ostype" != "i686" ]; then
+ ostype=`uname -m`
+ fi
+ fi
+ else
+ ostype=$osmanual
+ fi
+
+ # Check for installation directory of ROOT - if variables not currently set, remind user to set them before running make
+ if [ "$1" != "clean" ] && [ "$1" != "compress" ]; then
+ if [ $rootdirectory != -1 ]; then
+ printenv ROOTSYS > /dev/null
+ if [ $? != 0 ]; then
+ colorecho "ROOT environment variables not set. Please run \"source $rootdirectory/bin/thisroot.sh\", before using make."
+ fi
+ else
+ colorecho "Before running make, please make sure ROOT environment variables are set."
+ fi
+ fi
+
+ # Compiles the table microcontroller program
+ if [ "$1" == "all" ]; then
+ if [ -d $startdir/MIKRO ]; then
+ cd $startdir/MIKRO
+ rm -f $startdir/MIKRO/mikro_ctrl
+ make
+ cd $startdir
+ fi
+ fi
+
+ # When using compress, only create a tar-ball and then exit
+ if [ "$1" == "compress" ]; then
+ cd $startdir
+ if [ ! -d $startdir/camac_gui_windowed ]; then
+ mkdir $startdir/camac_gui_windowed
+ mkdir $startdir/camac_gui_windowed/results
+ echo "Copying source files to temporary directory $startdir/camac_gui_windowed..."
+ cp -r configure daq.h daqscope.h GuiLinkDef.h libxxusb.cpp root_include.h README start.cxx windowed_test.C windowed_test.h wusbcc.h wusbxx_dll.c wusbxx_dll.h mpod/ MIKRO/ vxi11_x86_64/ vxi11_i686/ input/ fieldpoint/ ./camac_gui_windowed/
+ cd $startdir/camac_gui_windowed
+ echo "Cleaning the base directory in $startdir/camac_gui_windowed..."
+ rm -f *.bakc
+ cd $startdir/camac_gui_windowed/input
+ echo "Cleaning the input directory in $startdir/camac_gui_windowed/input..."
+ rm -f *.bak
+ cd $startdir/camac_gui_windowed/vxi11_x86_64
+ echo "Cleaning the 64 bit VXI11 directory in $startdir/camac_gui_windowed/vxi11_x86_64..."
+ rm -f *.bak
+ make clean
+ cd $startdir/camac_gui_windowed/vxi11_i686
+ echo "Cleaning the 32 bit VXI11 directory in $startdir/camac_gui_windowed/vxi11_i686..."
+ rm -f *.bak
+ make clean
+ cd $startdir
+ echo "Creating a tar-ball camac_gui_windowed.tar.gz..."
+ tar czf $startdir/camac_gui_windowed.tar.gz ./camac_gui_windowed
+ echo "Removing the temporary directory $startdir/camac_gui_windowed..."
+ rm -r $startdir/camac_gui_windowed
+ exit 0
+ else
+ errorecho "Error! Directory ./camac_gui_windowed already exists."
+ exit 1
+ fi
+ fi
+
+ # Configure the workstation information and directory of program (0 if we find something and 1 otherwise)
+ basedir=$(echo $startdir | sed 's/\//\\\//g')
+
+ if [ "$1" == "nomake" ] || [ "$1" == "all" ]; then
+ if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
+ # Setting up the current working computer
+ grep -q "#define WORKSTAT 'N'" $startdir/input/workstation.h.in
+ if [ $? == 0 ]; then
+ sed "s/define WORKSTAT 'N'/define WORKSTAT '$2'/" $startdir/input/workstation.h.in > $startdir/input/workstation.h.mid
+ fi
+ grep -q "#define rootdir \"path-to-installation\"" $startdir/input/workstation.h.in
+ if [ $? == 0 ]; then
+ sed "s/path-to-installation/$basedir/g" $startdir/input/workstation.h.mid > $startdir/input/workstation.h.mid2
+ rm $startdir/input/workstation.h.mid
+ fi
+ # Check if we are connected to IJS network
+ etnet=$(ifconfig | grep "178.172.43.")
+ if [ "$etnet" == "" ]; then
+ sed "s/define IJSNET 1/define IJSNET 0/" $startdir/input/workstation.h.mid2 > $startdir/workstation.h
+ rm $startdir/input/workstation.h.mid2
+ else
+ cp $startdir/input/workstation.h.mid2 $startdir/workstation.h
+ rm $startdir/input/workstation.h.mid2
+ fi
+ # Setting up the OS type specific files
+ grep -q "#include \"vxi11_user.h\"" $startdir/input/daqscope.C.in
+ if [ $? == 0 ]; then
+ sed "s/vxi11_user.h/.\/vxi11_$ostype\/vxi11_user.h/g" $startdir/input/daqscope.C.in > $startdir/daqscope.C
+ fi
+ grep -q "SHLIB = \$(LIBFILE) libvxi11.a" $startdir/input/Makefile.in
+ if [ $? == 0 ]; then
+ if [ "$2" == "I" ]; then
+ sed "s/SHLIB = \$(LIBFILE) libvxi11.a/SHLIB = \$(LIBFILE) libvxi11.a -lusb/g" $startdir/input/Makefile.in > $startdir/Makefile.mid
+ fi
+ fi
+ grep -q "CAMLIB = \$(LIBFILE)" $startdir/input/Makefile.in
+ if [ $? == 0 ]; then
+ if [ "$2" == "I" ]; then
+ sed "s/CAMLIB = \$(LIBFILE)/CAMLIB = \$(LIBFILE) -lusb/g" $startdir/Makefile.mid > $startdir/Makefile.mid2
+ rm $startdir/Makefile.mid
+ elif [ "$2" == "O" ] || [ "$2" == "S" ]; then
+ cp $startdir/input/Makefile.in $startdir/Makefile.mid2
+ fi
+ fi
+ sed "s/OSTYPE=none/OSTYPE=$ostype/g" $startdir/Makefile.mid2 > $startdir/Makefile
+ rm $startdir/Makefile.mid2
+
+ if [ "$2" == "O" ] || [ "$2" == "S" ]; then
+ cp $startdir/input/daqusb.C.offline $startdir/daqusb.C
+ cp $startdir/input/libxxusb.h.offline $startdir/libxxusb.h
+ cp $startdir/input/usb.h.offline $startdir/usb.h
+ elif [ "$2" == "I" ]; then
+ cp $startdir/input/daqusb.C.online $startdir/daqusb.C
+ cp $startdir/input/libxxusb.h.online $startdir/libxxusb.h
+ fi
+
+ echo "#!/bin/bash" > $startdir/start.sh
+ echo "dir=\`dirname \$0\`" >> $startdir/start.sh
+ echo "" >> $startdir/start.sh
+ echo "snmpdirectory=$snmpdirectory" >> $startdir/start.sh
+ echo "rootdirectory=$rootdirectory" >> $startdir/start.sh
+ echo "" >> $startdir/start.sh
+ cat $startdir/input/start.sh.in >> $startdir/start.sh
+ chmod a+x $startdir/start.sh
+ fi
+ fi
+
+ # In case we just want to set the workstation information, exit here
+ if [ "$1" == "nomake" ]; then
+ exit 0
+ fi
+
+ # 64 bit configuration rules
+ if [ $ostype == "x86_64" ]; then
+ vxidir=$startdir/vxi11_$ostype
+ if [ -d $vxidir ]; then
+ cd $vxidir
+ if [ "$1" == "clean" ]; then
+ make clean
+ cd $startdir
+ make clean
+ rm -f Makefile
+ else
+ if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
+ make
+ else
+ errorecho "Error! No configuration type selected (second argument)."
+ echo ""
+ helptext
+ exit 1
+ fi
+ fi
+ cd $startdir
+ else
+ errorecho "No 64 bit VXI11 source folder."
+ exit 1
+ fi
+ # 32 bit configuration rules
+ elif [ $ostype == "i686" ]; then
+ vxidir=$startdir/vxi11_$ostype
+ if [ -d $vxidir ]; then
+ cd $vxidir
+ if [ "$1" == "clean" ]; then
+ make clean
+ cd $startdir
+ make clean
+ rm -f Makefile
+ else
+ if [ "$2" == "O" ] || [ "$2" == "I" ] || [ "$2" == "S" ]; then
+ make
+ else
+ errorecho "Error! No installation type selected (second argument)."
+ echo ""
+ helptext
+ exit 1
+ fi
+ fi
+ cd $startdir
+ else
+ errorecho "No 32 bit VXI11 source folder."
+ exit 1
+ fi
+ else
+ errorecho "No OS type information found."
+ exit 1
+ fi
+fi
+
+exit 0
/sipmscan/trunk_v0.9/configure
Property changes:
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Index: sipmscan/trunk_v0.9/daq.h
===================================================================
--- sipmscan/trunk_v0.9/daq.h (nonexistent)
+++ sipmscan/trunk_v0.9/daq.h (revision 145)
@@ -0,0 +1,36 @@
+#ifndef _daq_h_
+#define _daq_h_
+
+#define BUFF_L 2048
+
+// Number of channels we are using (used only if we run daqusb.C, not the GUI version)
+//#define NTDC 1 /* TDC */
+//#define NTDCCH 1
+//#define NADC 2 /* ADC */
+//#define NADCCH 1
+
+// Class for measurement process (DAQ for CAMAC)
+class daq
+{
+private:
+// Number of channels we are using
+ int NTDC;
+ int NTDCCH;
+ int NADC;
+ int NADCCH;
+
+ int devDetect; // variable to tell if we detect any devices
+public:
+ unsigned long stackwrite[BUFF_L],stackdata[10000],stackdump[27000];
+ int fStop;
+ int connect();
+ int init(int);
+ int start();
+ int event(unsigned int *, int);
+ int stop();
+ int disconnect();
+ daq();
+ ~daq();
+};
+
+#endif
Index: sipmscan/trunk_v0.9/daqscope.h
===================================================================
--- sipmscan/trunk_v0.9/daqscope.h (nonexistent)
+++ sipmscan/trunk_v0.9/daqscope.h (revision 145)
@@ -0,0 +1,84 @@
+#ifndef _daqscope_h_
+#define _daqscope_h_
+
+#define WAVE_LEN 100000
+
+//class VmUsbStack;
+class daqscope {
+public:
+ int scopeUseType;
+ int scopeChanNr;
+ int scopeChans[8];
+ char scopeChanstring[256];
+ int scopeMeasSel;
+ char eventbuf[WAVE_LEN];
+ double measubuf;
+ double tektime, tekvolt;
+ double choffset;
+
+ int fStop;
+ double tekunit(char *prefix);
+
+ int init();
+ int event();
+ int customCommand(char *command, bool query, char *sReturn);
+ int connect(char* IPaddr);
+ int disconnect(char* IPaddr);
+ int lockunlock(bool lockit);
+ daqscope();
+ ~daqscope();
+
+// VmUsbStack * fStack;
+// VmUsbStack * fInit;
+
+/* int OSrepetition;
+ int OSmeasu;
+ int OSmeasuchan;
+ int OSgating;
+ int OSsaving;
+ int OSinf;
+ int nmeaslc;
+ char OSchannels[1024];
+ char IP[1024];
+ char lecroycmd[1024];
+ char lecroycmd2[1024];
+ char lecroywfm[1024];
+ int lecroystate;
+ char pch[1024];
+ char lecroyadd[1024];
+ char multibuf[WAVE_LEN];
+ char eventbuf[WAVE_LEN];
+ double tektime,tekvolt,lctime,lcvolt;
+ int fastacqstate; // GKM - variable that saves the fastacq state
+ double choffset; // GKM - position offset for signal
+
+ int fPoints;
+ int fStop;
+ int fMode;
+ int clear();
+ int end();
+ int event();
+ int lecroyevent();
+ void measurement(float&);
+ void measulecroy(float&);
+ void measumult();
+ int init();
+ int initlecroy();
+ int connect(char* IPaddr);
+ int disconnect(char* IPaddr);
+ void fileopen(const char*);
+ void fileclose();
+ void countcontrol();
+ void fastacq(int setting); // GKM - gets tek out of fastacq
+ void header();
+ void measuheader();
+ void lecroyheader();
+ void lecroywave();
+ double tekunit(char*);
+ double lcunit(char*);
+ daqscope();
+// daqscope(const char *);
+ ~daqscope();*/
+};
+
+#endif
Index: sipmscan/trunk_v0.9/fieldpoint/dataout_fieldpoint.txt
===================================================================
--- sipmscan/trunk_v0.9/fieldpoint/dataout_fieldpoint.txt (nonexistent)
+++ sipmscan/trunk_v0.9/fieldpoint/dataout_fieldpoint.txt (revision 145)
@@ -0,0 +1,29 @@
+Fri Jun 26 09:00:06 2015 24.083314
+Fri Jun 26 09:50:06 2015 -0.350195
+Fri Jun 26 09:55:05 2015 0.066377
+Fri Jun 26 10:00:10 2015 -2.144656
+Fri Jun 26 10:05:21 2015 -0.814832
+Fri Jun 26 10:10:05 2015 -1.792172
+Fri Jun 26 10:15:06 2015 -2.785534
+Fri Jun 26 10:35:05 2015 2.886244
+Fri Jun 26 11:25:05 2015 1.860838
+Fri Jun 26 11:30:05 2015 3.943694
+Fri Jun 26 11:35:10 2015 1.828794
+Fri Jun 26 11:40:21 2015 2.613870
+Fri Jun 26 11:45:05 2015 1.844816
+Fri Jun 26 11:50:05 2015 3.463035
+Fri Jun 26 12:10:06 2015 2.405585
+Fri Jun 26 13:00:05 2015 2.133211
+Fri Jun 26 13:05:05 2015 1.860838
+Fri Jun 26 13:10:11 2015 1.748684
+Fri Jun 26 13:15:21 2015 3.575189
+Fri Jun 26 13:20:05 2015 10.640879
+Fri Jun 26 13:25:05 2015 16.777295
+Fri Jun 26 13:45:05 2015 25.140764
+Fri Jun 26 14:35:06 2015 -1.984436
+Fri Jun 26 14:40:05 2015 -3.955138
+Fri Jun 26 14:45:11 2015 -1.519799
+Fri Jun 26 14:50:21 2015 -3.522545
+Fri Jun 26 14:55:05 2015 -3.009842
+Fri Jun 26 15:00:05 2015 -3.971160
+Fri Jun 26 15:20:05 2015 14.213779
Index: sipmscan/trunk_v0.9/input/Makefile.in
===================================================================
--- sipmscan/trunk_v0.9/input/Makefile.in (nonexistent)
+++ sipmscan/trunk_v0.9/input/Makefile.in (revision 145)
@@ -0,0 +1,99 @@
+# Make variables ----------------------------------------------------
+
+# ROOT include and libraries
+ROOTINC=$(shell root-config --incdir )
+ROOTLIB=$(shell root-config --libs )
+LIBS1=$(shell root-config --cflags --glibs )
+
+# Includes, 32 vs. 64 bit type, libraries
+INC=-I. -I$(ROOTINC)
+OSTYPE=none
+LIBS=$(ROOTLIB) -L./ -lm
+
+# Source and debug prefixes
+SRC = .
+DBG =
+
+# CAMAC DAQ library variables
+OBJ_FILES = wusbxx_dll.o libxxusb.o
+LIBFILE = libdaqusb.a
+
+# Specific variables for the main program
+TARGET = windowed_test
+DAQFILE = $(SRC)/daqusb.C
+FILES = $(SRC)/daqusb.C $(SRC)/windowed_test.C $(SRC)/daqscope.C
+HEADER = daq.h workstation.h root_include.h windowed_test.h
+CAMLIB = $(LIBFILE)
+SHLIB = $(LIBFILE) libvxi11.a
+
+# VXI scope connection variables, Scope DAQ library variables
+VXIDIR = ./vxi11_$(OSTYPE)
+#VXI_FILES = $(VXIDIR)/vxi11_user.o $(VXIDIR)/vxi11.h $(VXIDIR)/vxi11_clnt.c $(VXIDIR)/vxi11_xdr.c
+VXI_OBJECT = $(VXIDIR)/vxi11_user.o $(VXIDIR)/vxi11_clnt.o $(VXIDIR)/vxi11_xdr.o
+# -----------------------------------------------------------------------------
+
+# Base rules ------------------------------------------------------------------
+
+# Make the main program and libraries
+all: $(TARGET) libdaqusb.so libvxi11.so
+
+# Rules for making the main program
+$(TARGET): $(FILES) workstation.h daq.h library $(SHLIB)
+ @echo "Generating dictionary Dict.C..."
+ rootcint -f GuiDict.C -c $(INC) $(CPPFLAGS) windowed_test.h GuiLinkDef.h
+ $(CXX) $(INC) -fPIC -g -Wall $(FILES) GuiDict.C $(CPPFLAGS) $(VXI_OBJECT) -o $(TARGET) $(SHLIB) $(LIBS1) -lstdc++ -lSpectrum
+# -----------------------------------------------------------------------------
+
+# CAMAC DAQ library rules -----------------------------------------------------
+
+# Rules for making CAMAC DAQ library source files (wusbxx_dll and libxxusb)
+library: $(OBJ_FILES)
+
+wusbxx_dll.o:wusbxx_dll.c wusbxx_dll.h
+libxxusb.o: libxxusb.cpp libxxusb.h
+
+.cc.o:
+ $(CXX) -fPIC -c $<
+ ar r $(LIBFILE) $@
+
+.cpp.o:
+ $(CXX) -fPIC -c $<
+ ar r $(LIBFILE) $@
+
+.c.o:
+ $(CXX) -fPIC -c $<
+ ar r $(LIBFILE) $@
+
+# Rules for recreating the CAMAC DAQ libraries even if they exist (libdaqusb.so/.a)
+relib:
+ rm -f libdaqusb.so libdaqusb.a libvxi11.so libvxi11.a
+ make libdaqusb.so libvxi11.so
+
+# Rule for making the CAMAC DAQ library (libdaqusb.so)
+libdaqusb.so: $(DAQFILE) $(LIBFILE)
+ @echo "Generating dictionary Dict.C..."
+ rootcint -f Dict.C -c $(INC) $(CPPFLAGS) $(HEADER) GuiLinkDef.h
+ $(CXX) $(CPPFLAGS) $(INC) -fPIC -g -Wall $(DAQFILE) Dict.C $(CAMLIB) -shared -o $@
+
+# Rule for making the CAMAC DAQ library (libdaqusb.a)
+$(LIBFILE): $(OBJ_FILES)
+ ar r $@ $^
+# -----------------------------------------------------------------------------
+
+# Scope DAQ library rules -----------------------------------------------------
+
+libvxi11.so: libvxi11.a
+ @echo "Generating dictionary VxiDict.C..."
+ rootcint -f VxiDict.C -c $(INC) $(CPPFLAGS) daqscope.h GuiLinkDef.h
+ $(CXX) $(CPPFLAGS) $(INC) -fPIC -g -Wall daqscope.C VxiDict.C -L. libvxi11.a -shared -o $@
+
+libvxi11.a: $(VXI_OBJECT)
+ ar r $@ $^
+# -----------------------------------------------------------------------------
+
+# Clean rule ------------------------------------------------------------------
+
+# Rule for cleaning the installation
+clean:
+ rm -f Dict.C Dict.h GuiDict.C GuiDict.h windowed_test windowed_test_C.d windowed_test_C.so curpos.txt curvolt.txt workstation.h VxiDict.C VxiDict.h daqscope.C daqusb.C start.sh usb.h libxxusb.h libdaqusb.a libdaqusb.so libvxi11.a libvxi11.so *.o finish_sig.txt
+# -----------------------------------------------------------------------------
Index: sipmscan/trunk_v0.9/input/daqscope.C.in
===================================================================
--- sipmscan/trunk_v0.9/input/daqscope.C.in (nonexistent)
+++ sipmscan/trunk_v0.9/input/daqscope.C.in (revision 145)
@@ -0,0 +1,390 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "vxi11_user.h"
+#include "daqscope.h"
+#include "workstation.h"
+
+CLINK *clink;
+char *savedIP;
+const char *allChans[8] = {"CH1","CH2","CH3","CH4","MATH1","MATH2","MATH3","MATH4"};
+const char *measType[11] = {"AMP","ARE","DEL","FALL","FREQ","MAX","MEAN","MINI","PK2P","PWI","RIS"};
+char *bbq;
+
+// Query and command functions to simplify analysis --------------
+int vxi11_query(CLINK *clink, const char *mycmd)
+{
+ char buf[WAVE_LEN];
+ memset(buf, 0, WAVE_LEN);
+ vxi11_send(clink, mycmd);
+ int bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
+ if (bytes_returned > 0)
+ {
+ printf("%s\n", buf);
+ }
+ else if (bytes_returned == -15)
+ printf("*** [ NOTHING RECEIVED ] ***\n");
+
+ return 0;
+}
+
+void vxi11_command(CLINK *clink,char *mycmd)
+{
+ char buf[WAVE_LEN];
+ memset(buf, 0, WAVE_LEN);
+ vxi11_send(clink, mycmd);
+}
+// ---------------------------------------------------------------
+
+// Tektronix unit conversion -------------------------------------
+double daqscope::tekunit(char *prefix)
+{
+ if (strcmp(prefix,"m")==0) return 0.001;
+ else if (strcmp(prefix,"u")==0) return 0.000001;
+ else if (strcmp(prefix,"n")==0) return 0.000000001;
+ else return 1;
+}
+// ---------------------------------------------------------------
+
+// Connect to a scope through IP address IPaddr ------------------
+int daqscope::connect(char *IPaddr)
+{
+ int iTemp;
+ char buf[WAVE_LEN];
+ printf("daqscope::connect(%s)\n", IPaddr);
+ clink = new CLINK;
+ iTemp = vxi11_open_device(IPaddr, clink);
+ if(iTemp == 0)
+ {
+ vxi11_send(clink, "*IDN?");
+ vxi11_receive(clink, buf, WAVE_LEN);
+ printf("Connected to device (%s): %s\n", IPaddr, buf);
+ savedIP = IPaddr;
+ return iTemp;
+ }
+ else
+ return iTemp;
+}
+// ---------------------------------------------------------------
+
+// Disconnect from scope with IP address IPaddr ------------------
+int daqscope::disconnect(char *IPaddr)
+{
+ int iTemp;
+ printf("daqscope::disconnect(%s)\n", IPaddr);
+ iTemp = vxi11_close_device(IPaddr, clink);
+ if(iTemp == 0)
+ {
+ printf("Disconnected from device (%s).\n", IPaddr);
+ delete clink;
+ }
+ return iTemp;
+}
+// ---------------------------------------------------------------
+
+// Initialize the scope for waveform or measurement --------------
+int daqscope::init()
+{
+ int iTemp;
+ char cmd[512];
+ char cTemp[256];
+ printf("daqscope::init()\n");
+
+ printf("Measurement type is: %d\n", scopeUseType);
+
+ // For measurements, only one channel can be used (rise, fall, period,...)
+ if(scopeUseType == 2) scopeChanNr = 1;
+ printf("Nr. of channels selected: %d\n", scopeChanNr);
+
+ // Only use scope if measurement is different than 0
+ if(scopeUseType == 0)
+ return 0;
+ else
+ {
+ // Combine all selected channels into a comma separated string
+ for(int i = 0; i < scopeChanNr; i++)
+ {
+ if(i == scopeChanNr-1)
+ {
+ if(i == 0) sprintf(scopeChanstring, "%s", allChans[scopeChans[i]]);
+ else sprintf(cTemp, "%s", allChans[scopeChans[i]]);
+ }
+ else
+ {
+ if(i == 0) sprintf(scopeChanstring, "%s,", allChans[scopeChans[i]]);
+ else sprintf(cTemp, "%s,", allChans[scopeChans[i]]);
+ }
+ if(i > 0)
+ strcat(scopeChanstring, cTemp);
+ }
+ printf("Selected channels: %s\n", scopeChanstring);
+
+ // Check scope ID and turn the header display on
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_query(clink, "*IDN?");
+ vxi11_command(clink,(char*)"HEADER ON");
+#else
+ printf("Identify Tek (*IDN?, HEADER ON)\n");
+#endif
+
+ // Set the scope data sources
+ sprintf(cmd, "DATA:SOURCE %s", scopeChanstring);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink,cmd);
+#else
+ printf("Set data source (DATA:SOURCE): %s\n", cmd);
+#endif
+
+ // Set to fast acquisition and set encoding
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink,(char*)"FASTACQ:STATE 0");
+ vxi11_command(clink,(char*)"DATA:ENCDG SRIBINARY");
+ vxi11_command(clink,(char*)"WFMO:BYT_N 2");
+
+ // Set gating (currently not used)
+ vxi11_command(clink,(char*)"GAT OFF");
+#else
+ printf("Set fastacq, encoding and gating (FASTACQ:STATE 0, DATA:ENCDG SRIBINARY, WFMO:BYT_N 2, MEASU:GAT OFF).\n");
+#endif
+
+ // Check scale on each of selected channels (is this even needed?)
+ bbq = strtok(scopeChanstring,",");
+ while(bbq != NULL)
+ {
+ sprintf(cmd,"%s:SCALE?",bbq);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_query(clink,cmd);
+#else
+ printf("Return the scale of channel: %s\n", cmd);
+#endif
+ bbq = strtok(NULL, ",");
+ }
+
+ // Check waveform and data options/settings
+ char buf[WAVE_LEN];
+ memset(buf, 0, WAVE_LEN);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_send(clink, "WFMO:WFID?");
+ iTemp = vxi11_receive(clink, buf, WAVE_LEN);
+ printf("Init out (length = %d): %s\n", iTemp, buf);
+#else
+ printf("Get acquisition parameters (WFMOUTPRE:WFID?).\n");
+ sprintf(buf, ":WFMOUTPRE:WFID \"Ch1, DC coupling, 20.0mV/div, 10.0ns/div, 500 points, Sample mode\"");
+ iTemp = strlen(buf);
+#endif
+ if (iTemp == -15)
+ printf("\n*** [ NOTHING RECEIVED ] ***\n");
+ else
+ {
+ bbq = strtok(buf,","); // break WFID out into substrings
+ for (int k = 0; k < 5; k++)
+ {
+ // info on voltage per division setting
+ if (k == 2)
+ {
+ memcpy(cTemp, &bbq[1], 5);
+ cTemp[5] = 0;
+ bbq[7] = 0;
+ tekvolt = atoi(cTemp)*tekunit(&bbq[6]);
+ printf("Voltage per division: %lf\n", tekvolt);
+ }
+ // info on time per division setting
+ if (k == 3)
+ {
+ memcpy(cTemp, &bbq[1], 5);
+ cTemp[5] = 0;
+ bbq[7] = 0;
+ tektime = atoi(cTemp)*tekunit(&bbq[6]);
+ printf("Time per division: %lf\n", tektime);
+ }
+ // info on last point to be transfered by CURVE?
+ if (k == 4)
+ {
+ bbq[strlen(bbq)-7] = 0;
+ sprintf(cmd, "DATA:STOP %d", atoi(bbq));
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink, cmd);
+#else
+ printf("Stop data collection (DATA:STOP): %s\n", cmd);
+#endif
+ }
+// printf("bbq = %s\n",bbq);
+ bbq = strtok (NULL, ",");
+ }
+ }
+
+ // Recheck waveform and data options/settings, turn off header
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_query(clink,"WFMO:WFID?");
+ vxi11_query(clink,"DATA?");
+ vxi11_command(clink,(char*)"HEADER OFF");
+#else
+ printf("Data format query (WFMOUTPRE:WFID?, DATA?, HEADER OFF).\n");
+#endif
+
+ // Get the channel y-axis offset (only for one CH so far)
+ char posoff[WAVE_LEN];
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ sprintf(cmd, "%s:POS?", allChans[scopeChans[0]]);
+ vxi11_command(clink, cmd);
+ vxi11_receive(clink, posoff, WAVE_LEN);
+ choffset = (double)atof(posoff);
+#else
+ sprintf(posoff, "Just some temporary string info.");
+ printf("Check for channel position offset (CHx:POS?)\n");
+#endif
+
+ // If measurements are to be performed
+ if(scopeUseType == 2)
+ {
+ sprintf(cmd, "MEASU:IMM:SOURCE1 %s", scopeChanstring);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink, cmd);
+#else
+ printf("Set immediate measurement source (MEASU:IMM:SOURCE1): %s\n", cmd);
+#endif
+
+ sprintf(cmd, "MEASU:IMM:TYP %s", measType[scopeMeasSel]);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink, cmd);
+#else
+ printf("Set immediate measurement type (MEASU:IMM:TYP): %s\n", cmd);
+#endif
+ }
+
+ return 0;
+ }
+}
+// ---------------------------------------------------------------
+
+// Send a custom command to the scope ----------------------------
+int daqscope::customCommand(char *command, bool query, char *sReturn)
+{
+ if(query)
+ {
+ char buf[WAVE_LEN];
+ memset(buf, 0, WAVE_LEN);
+ vxi11_send(clink, command);
+ int bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
+ if (bytes_returned > 0)
+ {
+ printf("%s\n", buf);
+ sprintf(sReturn, "%s", buf);
+
+ // For testing purposes
+/* if( strcmp(command, "CURVE?") == 0 )
+ {
+ FILE *fp;
+ char tst[2];
+ fp = fopen("./curve_return.txt","w");
+ for(int i = 6; i < bytes_returned; i++)
+ {
+ if(i%2 == 1)
+ {
+ tst[0] = buf[i];
+ tst[1] = buf[i-1];
+ fprintf(fp, "bytes returned = %d\tbyte %d = %d\treturn = %s\n", bytes_returned, i, buf[i], tst);
+ }
+ else
+ fprintf(fp, "bytes returned = %d\tbyte %d = %d\n", bytes_returned, i, buf[i]);
+ }
+ fclose(fp);
+ }*/
+ }
+ else if (bytes_returned == -15)
+ {
+ printf("*** [ NOTHING RECEIVED ] ***\n");
+ sprintf(sReturn, "*** [ NOTHING RECEIVED ] ***");
+ }
+ }
+ else
+ {
+ vxi11_command(clink, command);
+ sprintf(sReturn, "*** [ COMMAND NOT QUERY - NO RETURN ] ***");
+ }
+
+ return 0;
+}
+// ---------------------------------------------------------------
+
+// Get a measuring event (either waveform or measure) ------------
+int daqscope::lockunlock(bool lockit)
+{
+ // Lock the scope front panel for measurements
+ if(lockit)
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink,(char*)"LOCK ALL");
+ return 0;
+#else
+// printf("Locking the front panel (LOCK ALL).\n");
+ return -1;
+#endif
+ }
+ // Unlock the scope front panel after measurements
+ else
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ vxi11_command(clink,(char*)"LOCK NONE");
+ return 0;
+#else
+// printf("Unlocking the front panel (LOCK ALL).\n");
+ return -1;
+#endif
+ }
+}
+// ---------------------------------------------------------------
+
+// Get a measuring event (either waveform or measure) ------------
+int daqscope::event()
+{
+ int bytes_returned;
+
+ if(scopeUseType == 0)
+ return -1;
+ else if(scopeUseType == 1)
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ memset(eventbuf, 0, WAVE_LEN);
+ vxi11_send(clink, "CURVE?");
+ bytes_returned = vxi11_receive(clink, eventbuf, WAVE_LEN);
+#else
+ printf("Ask to return the waveform (CURVE?)\n");
+ bytes_returned = 0;
+#endif
+
+ if(bytes_returned > 0) return 0;
+ else return -1;
+ }
+ else if(scopeUseType == 2)
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ char buf[WAVE_LEN];
+ memset(buf, 0, WAVE_LEN);
+ vxi11_send(clink, "MEASU:IMMED:VALUE?");
+ bytes_returned = vxi11_receive(clink, buf, WAVE_LEN);
+ measubuf = (double)atof(buf);
+#else
+// printf("Ask to return the measurement (MEASU:IMMED:VALUE?)\n");
+ bytes_returned = 0;
+ measubuf = (double)rand()/(double)RAND_MAX;
+#endif
+
+ if(bytes_returned > 0) return 0;
+ else return -1;
+ }
+ else
+ return -1;
+}
+// ---------------------------------------------------------------
+
+// daqscope class constructor and destructor ---------------------
+daqscope::daqscope() {
+ fStop=0;
+}
+
+daqscope::~daqscope() {
+ disconnect(savedIP);
+}
+// ---------------------------------------------------------------
Index: sipmscan/trunk_v0.9/input/daqusb.C.offline
===================================================================
--- sipmscan/trunk_v0.9/input/daqusb.C.offline (nonexistent)
+++ sipmscan/trunk_v0.9/input/daqusb.C.offline (revision 145)
@@ -0,0 +1,258 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include <sys/mman.h>
+#include <errno.h>
+#include <signal.h>
+#include <ctype.h>
+#include <time.h>
+//#include "wusbxx_dll.h" /* the header of the shared library */
+#include "daq.h"
+
+//#define DEBUG /* vkljuci dodatni izpis */
+#ifdef DEBUG
+ #define DBG(X) X
+ #define DBGFUNI(X) printf(">>> %s -> %d\n",#X,(X))
+#else
+ #define DBG(X)
+ #define DBGFUNI(X) X
+#endif
+
+/* definiram lokacije enot*/
+//#define NTDC 1 /* TDC */
+//#define NTDCCH 8
+//#define NADC 2 /* ADC */
+//#define NADCCH 8
+int ctrlc=0;
+char *ccserial=(char*)"CC0126";
+int devDetect; // variable to tell if we detect any devices
+
+int daq::connect(){
+// odpri daq
+/* xxusb_device_type devices[100];
+ //struct usb_device *dev;
+ devDetect = xxusb_devices_find(devices);
+// printf("Detected devices: %d\n", devDetect);
+ //dev = devices[0].usbdev;
+ //udev = xxusb_device_open(dev);
+
+ if(devDetect > 0)
+ {
+ WUSBXX_load(NULL);
+ WUSBXX_open(ccserial);
+ printf("daq::connect()\n");
+ }
+ else
+*/ printf("daq::connect() - No devices were detected!\n");
+ return 0;
+}
+
+int daq::init(int chan = 0){
+
+// int i;
+// long k;
+
+/* DBGFUNI(xxusb_register_write(udev,1,0x0)); // Stop DAQ mode
+ while (xxusb_usbfifo_read(udev, (int*) stackdump,BUFF_L,100)>0);
+
+ CCCZ;
+ CCCC;
+ CREM_I;
+
+ NTDC = 1;
+ NADC = 2;
+ if(chan != 0)
+ {
+ NTDCCH = chan/2;
+ NADCCH = chan/2;
+ }
+ else
+ {
+ NTDCCH = 1;
+ NADCCH = 1;
+ }
+ printf("after: NTDCCH = %d, NADCCH = %d\n", NTDCCH, NADCCH);
+
+// create command stack for the TDC and ADC
+ k=1;
+ for(i=0;(i<NTDCCH)&&(i<NADCCH);i++) { stackwrite[k++]=NAF(NTDC,i,0); stackwrite[k++]=NAF(NADC,i,0); }
+// for(i=0;i<NADCCH;i++) stackwrite[k++]=NAF(NADC,i,0);
+ stackwrite[k++]=NAF(NTDC,0,9);
+ stackwrite[k++]=NAF(NADC,0,9);
+ stackwrite[k++]=NAFS(0,0,16); // insert next word to data
+ stackwrite[k++]=0xfafb; // event termination word
+ stackwrite[0]=k-1;
+// upload stack #2
+ xxusb_stack_write(udev,0x2,(long int *)stackwrite);
+ xxusb_stack_read(udev,0x2,(long int *) stackdata);
+ DBG(for(i=0;i<k;i++) printf("0x%04x\n",stackdata[i]);)
+
+ int ret[10];
+
+ CAMAC_LED_settings(udev, 1,1,0,0);
+ ret[0] = CAMAC_register_read(udev,0,&k);
+ printf("Firmware ID (return %d) -> 0x%08lX\n",ret[0],k); // GKM: Firmware ID (i.e. 0x72000001 = 0111 0010 0000 0000 0000 0000 0000 0001)
+ ret[1] = CAMAC_register_read(udev,1,&k);
+ printf("Global Mode (return %d) -> 0x%08lX\n",ret[1],k);
+ k=(k&0xF000)|0x0005; // set buffer length: n=0..6 -> 0x10000 >> n, n=7 -> single event
+ ret[0] = CAMAC_register_write(udev,1,k); // GKM: sets the buffer length (i.e. k=5 -> buf length=128 words)
+ ret[1] = CAMAC_register_write(udev,2,0x80); // wait 0x80 us after trigger // GKM: delay settings in microseconds
+ ret[2] = CAMAC_register_write(udev,3,0x0); // Scaler Readout Control Register // GKM: scaler readout settings - sets the frequency of readout (if 0, it is disabled)
+ ret[3] = CAMAC_register_write(udev,9,0x0); // Lam Mask Register // GKM: When 0, readout is triggered by the signal on NIM input
+ ret[4] = CAMAC_register_write(udev,14,0x0); // USB Bulk Transfer Setup Register
+
+ // CAMAC_DGG(udev,1,2,3,0,200,0,0);
+ // CAMAC_DGG(udev,0,0,0,0,100,0,0);
+ ret[5] = CAMAC_register_write(udev,5,(0x06<<16)+(0x04<<8)+0x00); // output // GKM: NIM outputs (i.e. 0x060400 = 00 0110 0000 0100 0000 0000 -> NIM O2=DGG_B, NIM O3=DGG_A)
+ ret[6] = CAMAC_register_write(udev,6,(0x01<<24)+(0x01<<16)+(0x0<<8)+0x0); // SCLR & DGG // GKM: device source selector (i.e. 0x01010000 = 00 0000 0001 0000 0001 0000 0000 0000 0000 -> DGG_A=NIM I1, DGG_B=NIM I1, SCLR=disabled)
+ ret[7] = CAMAC_register_write(udev,7,(100<<16)+0); // output // GKM: Delay and Gate Generator A registers (i.e. 0x00640000 = 0000 0000 0110 0100 0000 0000 0000 0000 -> DDG_A [gate=100, delay=0])
+ ret[8] = CAMAC_register_write(udev,8,(10000<<16)+0); // output // GKM: Delay and Gate Generator B registers (i.e. 0x27100000 = 0010 0111 0001 0000 0000 0000 0000 0000 -> DDG_B [gate=10000, delay=0])
+ ret[9] = CAMAC_register_write(udev,13,0); // output // GKM: Extended (course) delay (i.e. 0x00000000 = 0 -> DDG_A ext=0, DDG_B ext=0)
+
+// for(i = 0; i < 10; i++) printf("Setting %d? -> return = %d\n",i,ret[i]);
+
+// ret[0] = CAMAC_register_read(udev,1,&k);
+// printf("k (return %d) -> 0x%08lX\n",ret[0],k);
+
+*/ printf("daq::init()\n");
+ return 0;
+}
+
+int daq::start(){
+// xxusb_register_write(udev,1,0x1); // Start DAQ mode
+ printf("daq::start()\n");
+ return 0;
+}
+
+int daq::stop(){
+// xxusb_register_write(udev,1,0x0); // Stop DAQ mode
+// while (xxusb_usbfifo_read(udev,(int *)stackdump,BUFF_L,30)>0);
+ printf("daq::stop()\n");
+ return 0;
+}
+
+int daq::event(unsigned int *data, int maxn){
+// int ib,count;
+ int count;
+/* int events,evsize;
+ short ret;
+
+ ib=0;
+ ret=xxusb_usbfifo_read(udev,(int *) stackdata,BUFF_L,500);
+ events=stackdata[ib++];
+ DBG(printf("ret=%d,events=0x%08x\n",ret,events);)
+ if ((ret<0)||(ret!=(((NTDCCH+NADCCH)*4+4)*events+4))) return 0;
+
+ count=0;
+ while (ib<(ret/2-1)){
+ evsize = stackdata[ib++]&0xffff;
+ DBG(printf("Event:%d EvSize:%d\n", events, evsize);)
+ for (int i=0;i<(NTDCCH+NADCCH);i++,ib++) data[count++] =stackdata[ib++]&0xffff;
+ if (stackdata[ib++]!=0xfafb){
+ printf("Error!\n");,
+ return 0;
+ }
+ events--;
+ if (fStop) return 0;
+ }
+ if (stackdata[ib++]!=0xffff){
+ printf("Error!\n");
+ return 0;
+ }
+*/
+ count = 1;
+ return count;
+}
+
+int daq::disconnect(){
+// zapri daq
+// WUSBXX_close();
+ printf("daq::disconnect()\n");
+ return 0;
+}
+
+daq::daq(){
+ fStop=0;
+ connect();
+// if(devDetect > 0)
+// init();
+}
+
+daq::~daq(){
+disconnect();
+}
+
+#ifdef MAIN
+void CatchSig (int signumber)
+{
+ ctrlc = 1;
+}
+
+
+int main (int argc, char **argv){
+
+ int neve=1000000;
+ char *fname="test.dat";
+ if (argc==1) {
+ printf("Uporaba: %s stevilo_dogodkov ime_datoteke\n",argv[0]);
+ printf("Meritev prekini s Ctrl-C, ce je nabranih dogodkov ze dovolj\n");
+ exit(0);
+ }
+ if (argc>1) neve = atoi(argv[1]);
+ if (argc>2) fname = argv[2];
+
+
+// intercept routine
+ if (signal (SIGINT, CatchSig) == SIG_E,RR) perror ("sigignore");
+
+#define BSIZE 10000
+ int i,ieve,nc,nb;
+// int hdr[4]={1,(NTDCCH+4)*sizeof(int)}; // hdr[0]=1, hdr[1]=(NTDCCH+4)*4
+ int hdr[4]={1,(NTDCCH+NADCCH+4)*sizeof(int)};
+ unsigned short adc;
+ unsigned int data[BSIZE];
+ daq *d= new daq();,
+ time_t time_check;,
+
+// odpremo datoteko za pisanje
+ FILE *fp=fopen(fname,"w");
+
+ d->start();
+ ieve=0;
+
+ while((ieve<neve)&&(!ctrlc)){
+ nc=d->event(data,BSIZE);
+ nb=0;
+ while((nc>0)&&(ieve++<neve)&&(!ctrlc)){
+ // zapis v datoteko
+ hdr[2]=time(NULL);
+ hdr[3]=ieve;
+ fwrite(hdr,sizeof(int),4 ,fp);
+ fwrite(&data[nb],sizeof(int),(NTDCCH+NADCCH),fp);
+// DBG(
+ for(i=0;i<(NTDCCH+NADCCH);i++){
+ adc=data[nb+i]&0xFFFF;
+ if(i % 2 == 0)
+printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
+// printf("nev=%4d %d. TDC data=%d\n",ieve,i/2,adc);
+ else if(i % 2 == 1)
+printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
+// printf("nev=%4d %d. ADC data=%d\n",ieve,i/2,adc);
+ }
+printf("\n");
+// )
+ nb+=(NTDCCH+NADCCH);
+ nc-=(NTDCCH+NADCCH);
+ if (!(ieve%1000)) printf("event no. -> %d\n",ieve);
+ };
+ };
+
+ d->stop();
+ fclose(fp);
+ printf("Podatki so v datoteki %s\n", fname);
+ delete d;
+
+ return 0;
+}
+#endif
Index: sipmscan/trunk_v0.9/input/daqusb.C.online
===================================================================
--- sipmscan/trunk_v0.9/input/daqusb.C.online (nonexistent)
+++ sipmscan/trunk_v0.9/input/daqusb.C.online (revision 145)
@@ -0,0 +1,257 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include <sys/mman.h>
+#include <errno.h>
+#include <signal.h>
+#include <ctype.h>
+#include <time.h>
+#include "wusbxx_dll.h" /* the header of the shared library */
+#include "daq.h"
+
+//#define DEBUG /* vkljuci dodatni izpis */
+#ifdef DEBUG
+ #define DBG(X) X
+ #define DBGFUNI(X) printf(">>> %s -> %d\n",#X,(X))
+#else
+ #define DBG(X)
+ #define DBGFUNI(X) X
+#endif
+
+/* definiram lokacije enot*/
+//#define NTDC 1 /* TDC */
+//#define NTDCCH 8
+//#define NADC 2 /* ADC */
+//#define NADCCH 8
+int ctrlc=0;
+char *ccserial=(char*)"CC0126";
+//int devDetect; // variable to tell if we detect any devices
+
+int daq::connect(){
+// odpri daq
+ xxusb_device_type devices[100];
+ //struct usb_device *dev;
+ devDetect = xxusb_devices_find(devices);
+// printf("Detected devices: %d\n", devDetect);
+ //dev = devices[0].usbdev;
+ //udev = xxusb_device_open(dev);
+
+ if(devDetect > 0)
+ {
+ WUSBXX_load(NULL);
+ WUSBXX_open(ccserial);
+ printf("daq::connect()\n");
+ }
+ else
+ printf("daq::connect() - No devices were detected!\n");
+ return 0;
+}
+
+int daq::init(int chan = 0){
+
+ int i;
+ long k;
+
+ DBGFUNI(xxusb_register_write(udev,1,0x0)); // Stop DAQ mode
+ while (xxusb_usbfifo_read(udev, (int*) stackdump,BUFF_L,100)>0);
+
+ CCCZ;
+ CCCC;
+ CREM_I;
+
+ NTDC = 1;
+ NADC = 2;
+ if(chan != 0)
+ {
+ NTDCCH = chan/2;
+ NADCCH = chan/2;
+ }
+ else
+ {
+ NTDCCH = 1;
+ NADCCH = 1;
+ }
+ printf("after: NTDCCH = %d, NADCCH = %d\n", NTDCCH, NADCCH);
+
+// create command stack for the TDC and ADC
+ k=1;
+ for(i=0;(i<NTDCCH)&&(i<NADCCH);i++) { stackwrite[k++]=NAF(NTDC,i,0); stackwrite[k++]=NAF(NADC,i,0); }
+// for(i=0;i<NADCCH;i++) stackwrite[k++]=NAF(NADC,i,0);
+ stackwrite[k++]=NAF(NTDC,0,9);
+ stackwrite[k++]=NAF(NADC,0,9);
+ stackwrite[k++]=NAFS(0,0,16); // insert next word to data
+ stackwrite[k++]=0xfafb; // event termination word
+ stackwrite[0]=k-1;
+// upload stack #2
+ xxusb_stack_write(udev,0x2,(long int *)stackwrite);
+ xxusb_stack_read(udev,0x2,(long int *) stackdata);
+ DBG(for(i=0;i<k;i++) printf("0x%04x\n",stackdata[i]);)
+
+ int ret[10];
+
+ CAMAC_LED_settings(udev, 1,1,0,0);
+ ret[0] = CAMAC_register_read(udev,0,&k);
+ printf("Firmware ID (return %d) -> 0x%08lX\n",ret[0],k); // GKM: Firmware ID (i.e. 0x72000001 = 0111 0010 0000 0000 0000 0000 0000 0001)
+ ret[1] = CAMAC_register_read(udev,1,&k);
+ printf("Global Mode (return %d) -> 0x%08lX\n",ret[1],k);
+ k=(k&0xF000)|0x0005; // set buffer length: n=0..6 -> 0x10000 >> n, n=7 -> single event
+ ret[0] = CAMAC_register_write(udev,1,k); // GKM: sets the buffer length (i.e. k=5 -> buf length=128 words)
+ ret[1] = CAMAC_register_write(udev,2,0x80); // wait 0x80 us after trigger // GKM: delay settings in microseconds
+ ret[2] = CAMAC_register_write(udev,3,0x0); // Scaler Readout Control Register // GKM: scaler readout settings - sets the frequency of readout (if 0, it is disabled)
+ ret[3] = CAMAC_register_write(udev,9,0x0); // Lam Mask Register // GKM: When 0, readout is triggered by the signal on NIM input
+ ret[4] = CAMAC_register_write(udev,14,0x0); // USB Bulk Transfer Setup Register
+
+ // CAMAC_DGG(udev,1,2,3,0,200,0,0);
+ // CAMAC_DGG(udev,0,0,0,0,100,0,0);
+ ret[5] = CAMAC_register_write(udev,5,(0x06<<16)+(0x04<<8)+0x00); // output // GKM: NIM outputs (i.e. 0x060400 = 00 0110 0000 0100 0000 0000 -> NIM O2=DGG_B, NIM O3=DGG_A)
+ ret[6] = CAMAC_register_write(udev,6,(0x01<<24)+(0x01<<16)+(0x0<<8)+0x0); // SCLR & DGG // GKM: device source selector (i.e. 0x01010000 = 00 0000 0001 0000 0001 0000 0000 0000 0000 -> DGG_A=NIM I1, DGG_B=NIM I1, SCLR=disabled)
+ ret[7] = CAMAC_register_write(udev,7,(100<<16)+0); // output // GKM: Delay and Gate Generator A registers (i.e. 0x00640000 = 0000 0000 0110 0100 0000 0000 0000 0000 -> DDG_A [gate=100, delay=0])
+ ret[8] = CAMAC_register_write(udev,8,(10000<<16)+0); // output // GKM: Delay and Gate Generator B registers (i.e. 0x27100000 = 0010 0111 0001 0000 0000 0000 0000 0000 -> DDG_B [gate=10000, delay=0])
+ ret[9] = CAMAC_register_write(udev,13,0); // output // GKM: Extended (course) delay (i.e. 0x00000000 = 0 -> DDG_A ext=0, DDG_B ext=0)
+
+// for(i = 0; i < 10; i++) printf("Setting %d? -> return = %d\n",i,ret[i]);
+
+// ret[0] = CAMAC_register_read(udev,1,&k);
+// printf("k (return %d) -> 0x%08lX\n",ret[0],k);
+
+ printf("daq::init()\n");
+ return 0;
+}
+
+int daq::start(){
+ xxusb_register_write(udev,1,0x1); // Start DAQ mode
+ printf("daq::start()\n");
+ return 0;
+}
+
+int daq::stop(){
+ xxusb_register_write(udev,1,0x0); // Stop DAQ mode
+ while (xxusb_usbfifo_read(udev,(int *)stackdump,BUFF_L,30)>0);
+ printf("daq::stop()\n");
+ return 0;
+}
+
+int daq::event(unsigned int *data, int maxn){
+ int ib,count;
+ int events,evsize;
+ short ret;
+
+ ib=0;
+ ret=xxusb_usbfifo_read(udev,(int *) stackdata,BUFF_L,500);
+ events=stackdata[ib++];
+ DBG(printf("ret=%d,events=0x%08x\n",ret,events);)
+ if ((ret<0)||(ret!=(((NTDCCH+NADCCH)*4+4)*events+4))) return 0;
+
+ count=0;
+ while (ib<(ret/2-1)){
+ evsize = stackdata[ib++]&0xffff;
+ DBG(printf("Event:%d EvSize:%d\n", events, evsize);)
+ for (int i=0;i<(NTDCCH+NADCCH);i++,ib++) data[count++] =stackdata[ib++]&0xffff;
+ if (stackdata[ib++]!=0xfafb){
+ printf("Error!\n");
+ return 0;
+ }
+ events--;
+ if (fStop) return 0;
+ }
+ if (stackdata[ib++]!=0xffff){
+ printf("Error!\n");
+ return 0;
+ }
+
+// count = 1;
+ return count;
+}
+
+int daq::disconnect(){
+// zapri daq
+ WUSBXX_close();
+ printf("daq::disconnect()\n");
+ return 0;
+}
+
+daq::daq(){
+ fStop=0;
+ connect();
+// if(devDetect > 0)
+// init();
+}
+
+daq::~daq(){
+disconnect();
+}
+
+#ifdef MAIN
+void CatchSig (int signumber)
+{
+ ctrlc = 1;
+}
+
+
+int main (int argc, char **argv){
+
+ int neve=1000000;
+ char *fname="test.dat";
+ if (argc==1) {
+ printf("Uporaba: %s stevilo_dogodkov ime_datoteke\n",argv[0]);
+ printf("Meritev prekini s Ctrl-C, ce je nabranih dogodkov ze dovolj\n");
+ exit(0);
+ }
+ if (argc>1) neve = atoi(argv[1]);
+ if (argc>2) fname = argv[2];
+
+
+// intercept routine
+ if (signal (SIGINT, CatchSig) == SIG_ERR) perror ("sigignore");
+
+#define BSIZE 10000
+ int i,ieve,nc,nb;
+// int hdr[4]={1,(NTDCCH+4)*sizeof(int)}; // hdr[0]=1, hdr[1]=(NTDCCH+4)*4
+ int hdr[4]={1,(NTDCCH+NADCCH+4)*sizeof(int)};
+ unsigned short adc;
+ unsigned int data[BSIZE];
+ daq *d= new daq();
+ time_t time_check;
+
+// odpremo datoteko za pisanje
+ FILE *fp=fopen(fname,"w");
+
+ d->start();
+ ieve=0;
+
+ while((ieve<neve)&&(!ctrlc)){
+ nc=d->event(data,BSIZE);
+ nb=0;
+ while((nc>0)&&(ieve++<neve)&&(!ctrlc)){
+ // zapis v datoteko
+ hdr[2]=time(NULL);
+ hdr[3]=ieve;
+ fwrite(hdr,sizeof(int),4 ,fp);
+ fwrite(&data[nb],sizeof(int),(NTDCCH+NADCCH),fp);
+// DBG(
+ for(i=0;i<(NTDCCH+NADCCH);i++){
+ adc=data[nb+i]&0xFFFF;
+ if(i % 2 == 0)
+printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
+// printf("nev=%4d %d. TDC data=%d\n",ieve,i/2,adc);
+ else if(i % 2 == 1)
+printf(/*"nev=%4d %d. TDC data=%d\n"*/"%d\t"/*,ieve,i*//*/2*/,adc);
+// printf("nev=%4d %d. ADC data=%d\n",ieve,i/2,adc);
+ }
+printf("\n");
+// )
+ nb+=(NTDCCH+NADCCH);
+ nc-=(NTDCCH+NADCCH);
+ if (!(ieve%1000)) printf("event no. -> %d\n",ieve);
+ };
+ };
+
+ d->stop();
+ fclose(fp);
+ printf("Podatki so v datoteki %s\n", fname);
+ delete d;
+
+ return 0;
+}
+#endif
Index: sipmscan/trunk_v0.9/input/libxxusb.h.offline
===================================================================
--- sipmscan/trunk_v0.9/input/libxxusb.h.offline (nonexistent)
+++ sipmscan/trunk_v0.9/input/libxxusb.h.offline (revision 145)
@@ -0,0 +1,111 @@
+#include "usb.h"
+
+
+#define XXUSB_WIENER_VENDOR_ID 0x16DC /* Wiener, Plein & Baus */
+#define XXUSB_VMUSB_PRODUCT_ID 0x000B /* VM-USB */
+#define XXUSB_CCUSB_PRODUCT_ID 0x0001 /* CC-USB */
+#define XXUSB_ENDPOINT_OUT 2 /* Endpoint 2 Out*/
+#define XXUSB_ENDPOINT_IN 0x86 /* Endpoint 6 In */
+#define XXUSB_FIRMWARE_REGISTER 0
+#define XXUSB_GLOBAL_REGISTER 1
+#define XXUSB_ACTION_REGISTER 10
+#define XXUSB_DELAYS_REGISTER 2
+#define XXUSB_WATCHDOG_REGISTER 3
+#define XXUSB_SELLEDA_REGISTER 6
+#define XXUSB_SELNIM_REGISTER 7
+#define XXUSB_SELLEDB_REGISTER 4
+#define XXUSB_SERIAL_REGISTER 15
+#define XXUSB_LAMMASK_REGISTER 8
+#define XXUSB_LAM_REGISTER 12
+#define XXUSB_READOUT_STACK 2
+#define XXUSB_SCALER_STACK 3
+#define XXUSB_NAF_DIRECT 12
+
+struct XXUSB_STACK
+{
+long Data;
+short Hit;
+short APatt;
+short Num;
+short HitMask;
+};
+
+struct XXUSB_CC_COMMAND_TYPE
+{
+short Crate;
+short F;
+short A;
+short N;
+long Data;
+short NoS2;
+short LongD;
+short HitPatt;
+short QStop;
+short LAMMode;
+short UseHit;
+short Repeat;
+short AddrScan;
+short FastCam;
+short NumMod;
+short AddrPatt;
+long HitMask[4];
+long Num;
+};
+
+struct xxusb_device_typ
+{
+ struct usb_device *usbdev;
+ char SerialString[7];
+};
+
+typedef struct xxusb_device_typ xxusb_device_type;
+typedef unsigned char UCHAR;
+typedef struct usb_bus usb_busx;
+
+
+int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout);
+
+short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData);
+short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *StackData);
+short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *StackData);
+short xxusb_stack_execute(usb_dev_handle *hDev, long *StackData);
+short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData);
+short xxusb_reset_toggle(usb_dev_handle *hDev);
+
+short xxusb_devices_find(xxusb_device_type *xxusbDev);
+short xxusb_device_close(usb_dev_handle *hDev);
+usb_dev_handle* xxusb_device_open(struct usb_device *dev);
+short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect);
+short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config);
+usb_dev_handle* xxusb_serial_open(char *SerialString);
+
+short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data);
+short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data);
+short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
+short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger,unsigned short output, long delay, unsigned short gate, unsigned short invert, unsigned short latch);
+
+short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
+
+short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data);
+short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data);
+short VME_BLT_read_32(usb_dev_handle *hdev, short Address_Modifier, int count, long VME_Address, long Data[]);
+short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
+short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
+
+short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output, int delay, int gate, short invert, short latch);
+short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data);
+short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data);
+short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
+short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
+short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data);
+short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data);
+
+short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X);
+short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X);
+short CAMAC_Z(usb_dev_handle *hdev);
+short CAMAC_C(usb_dev_handle *hdev);
+short CAMAC_I(usb_dev_handle *hdev, int inhibit);
+
Index: sipmscan/trunk_v0.9/input/libxxusb.h.online
===================================================================
--- sipmscan/trunk_v0.9/input/libxxusb.h.online (nonexistent)
+++ sipmscan/trunk_v0.9/input/libxxusb.h.online (revision 145)
@@ -0,0 +1,111 @@
+#include <usb.h>
+
+
+#define XXUSB_WIENER_VENDOR_ID 0x16DC /* Wiener, Plein & Baus */
+#define XXUSB_VMUSB_PRODUCT_ID 0x000B /* VM-USB */
+#define XXUSB_CCUSB_PRODUCT_ID 0x0001 /* CC-USB */
+#define XXUSB_ENDPOINT_OUT 2 /* Endpoint 2 Out*/
+#define XXUSB_ENDPOINT_IN 0x86 /* Endpoint 6 In */
+#define XXUSB_FIRMWARE_REGISTER 0
+#define XXUSB_GLOBAL_REGISTER 1
+#define XXUSB_ACTION_REGISTER 10
+#define XXUSB_DELAYS_REGISTER 2
+#define XXUSB_WATCHDOG_REGISTER 3
+#define XXUSB_SELLEDA_REGISTER 6
+#define XXUSB_SELNIM_REGISTER 7
+#define XXUSB_SELLEDB_REGISTER 4
+#define XXUSB_SERIAL_REGISTER 15
+#define XXUSB_LAMMASK_REGISTER 8
+#define XXUSB_LAM_REGISTER 12
+#define XXUSB_READOUT_STACK 2
+#define XXUSB_SCALER_STACK 3
+#define XXUSB_NAF_DIRECT 12
+
+struct XXUSB_STACK
+{
+long Data;
+short Hit;
+short APatt;
+short Num;
+short HitMask;
+};
+
+struct XXUSB_CC_COMMAND_TYPE
+{
+short Crate;
+short F;
+short A;
+short N;
+long Data;
+short NoS2;
+short LongD;
+short HitPatt;
+short QStop;
+short LAMMode;
+short UseHit;
+short Repeat;
+short AddrScan;
+short FastCam;
+short NumMod;
+short AddrPatt;
+long HitMask[4];
+long Num;
+};
+
+struct xxusb_device_typ
+{
+ struct usb_device *usbdev;
+ char SerialString[7];
+};
+
+typedef struct xxusb_device_typ xxusb_device_type;
+typedef unsigned char UCHAR;
+typedef struct usb_bus usb_busx;
+
+
+int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout);
+int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout);
+
+short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData);
+short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *StackData);
+short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *StackData);
+short xxusb_stack_execute(usb_dev_handle *hDev, long *StackData);
+short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData);
+short xxusb_reset_toggle(usb_dev_handle *hDev);
+
+short xxusb_devices_find(xxusb_device_type *xxusbDev);
+short xxusb_device_close(usb_dev_handle *hDev);
+usb_dev_handle* xxusb_device_open(struct usb_device *dev);
+short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect);
+short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config);
+usb_dev_handle* xxusb_serial_open(char *SerialString);
+
+short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data);
+short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data);
+short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
+short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger,unsigned short output, long delay, unsigned short gate, unsigned short invert, unsigned short latch);
+
+short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
+
+short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data);
+short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data);
+short VME_BLT_read_32(usb_dev_handle *hdev, short Address_Modifier, int count, long VME_Address, long Data[]);
+short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
+short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data);
+
+short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output, int delay, int gate, short invert, short latch);
+short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data);
+short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data);
+short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch);
+short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch);
+short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data);
+short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data);
+
+short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X);
+short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X);
+short CAMAC_Z(usb_dev_handle *hdev);
+short CAMAC_C(usb_dev_handle *hdev);
+short CAMAC_I(usb_dev_handle *hdev, int inhibit);
+
Index: sipmscan/trunk_v0.9/input/start.sh.in
===================================================================
--- sipmscan/trunk_v0.9/input/start.sh.in (nonexistent)
+++ sipmscan/trunk_v0.9/input/start.sh.in (revision 145)
@@ -0,0 +1,23 @@
+if [ $rootdirectory != -1 ]; then
+ printenv ROOTSYS > /dev/null
+ if [ $? != 0 ]; then
+ echo "Preparing ROOT..."
+ source $rootdirectory/bin/thisroot.sh
+ fi
+fi
+
+if [ $snmpdirectory != -1 ]; then
+ printenv PATH | grep "snmp" > /dev/null
+ if [ $? != 0 ]; then
+ echo "Preparing NET-SNMP..."
+ export PATH=$snmpdirectory/bin:$PATH
+ fi
+fi
+
+if [ ! -d results ]; then
+ mkdir results
+fi
+
+root -l "$dir/start.cxx(\"$dir\")"
+
+
/sipmscan/trunk_v0.9/input/start.sh.in
Property changes:
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Index: sipmscan/trunk_v0.9/input/usb.h.offline
===================================================================
--- sipmscan/trunk_v0.9/input/usb.h.offline (nonexistent)
+++ sipmscan/trunk_v0.9/input/usb.h.offline (revision 145)
@@ -0,0 +1,344 @@
+/*
+ * Prototypes, structure definitions and macros.
+ *
+ * Copyright (c) 2000-2003 Johannes Erdfelt <johannes@erdfelt.com>
+ *
+ * This library is covered by the LGPL, read LICENSE for details.
+ *
+ * This file (and only this file) may alternatively be licensed under the
+ * BSD license as well, read LICENSE for details.
+ */
+#ifndef __USB_H__
+#define __USB_H__
+
+#include <unistd.h>
+#include <stdlib.h>
+#include <stdint.h>
+#include <limits.h>
+
+#include <sys/param.h>
+#include <dirent.h>
+
+/*
+ * USB spec information
+ *
+ * This is all stuff grabbed from various USB specs and is pretty much
+ * not subject to change
+ */
+
+/*
+ * Device and/or Interface Class codes
+ */
+#define USB_CLASS_PER_INTERFACE 0 /* for DeviceClass */
+#define USB_CLASS_AUDIO 1
+#define USB_CLASS_COMM 2
+#define USB_CLASS_HID 3
+#define USB_CLASS_PRINTER 7
+#define USB_CLASS_PTP 6
+#define USB_CLASS_MASS_STORAGE 8
+#define USB_CLASS_HUB 9
+#define USB_CLASS_DATA 10
+#define USB_CLASS_VENDOR_SPEC 0xff
+
+/*
+ * Descriptor types
+ */
+#define USB_DT_DEVICE 0x01
+#define USB_DT_CONFIG 0x02
+#define USB_DT_STRING 0x03
+#define USB_DT_INTERFACE 0x04
+#define USB_DT_ENDPOINT 0x05
+
+#define USB_DT_HID 0x21
+#define USB_DT_REPORT 0x22
+#define USB_DT_PHYSICAL 0x23
+#define USB_DT_HUB 0x29
+
+/*
+ * Descriptor sizes per descriptor type
+ */
+#define USB_DT_DEVICE_SIZE 18
+#define USB_DT_CONFIG_SIZE 9
+#define USB_DT_INTERFACE_SIZE 9
+#define USB_DT_ENDPOINT_SIZE 7
+#define USB_DT_ENDPOINT_AUDIO_SIZE 9 /* Audio extension */
+#define USB_DT_HUB_NONVAR_SIZE 7
+
+/* All standard descriptors have these 2 fields in common */
+struct usb_descriptor_header {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+} __attribute__ ((packed));
+
+/* String descriptor */
+struct usb_string_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint16_t wData[1];
+} __attribute__ ((packed));
+
+/* HID descriptor */
+struct usb_hid_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint16_t bcdHID;
+ uint8_t bCountryCode;
+ uint8_t bNumDescriptors;
+ /* uint8_t bReportDescriptorType; */
+ /* uint16_t wDescriptorLength; */
+ /* ... */
+} __attribute__ ((packed));
+
+/* Endpoint descriptor */
+#define USB_MAXENDPOINTS 32
+struct usb_endpoint_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint8_t bEndpointAddress;
+ uint8_t bmAttributes;
+ uint16_t wMaxPacketSize;
+ uint8_t bInterval;
+ uint8_t bRefresh;
+ uint8_t bSynchAddress;
+
+ unsigned char *extra; /* Extra descriptors */
+ int extralen;
+};
+
+#define USB_ENDPOINT_ADDRESS_MASK 0x0f /* in bEndpointAddress */
+#define USB_ENDPOINT_DIR_MASK 0x80
+
+#define USB_ENDPOINT_TYPE_MASK 0x03 /* in bmAttributes */
+#define USB_ENDPOINT_TYPE_CONTROL 0
+#define USB_ENDPOINT_TYPE_ISOCHRONOUS 1
+#define USB_ENDPOINT_TYPE_BULK 2
+#define USB_ENDPOINT_TYPE_INTERRUPT 3
+
+/* Interface descriptor */
+#define USB_MAXINTERFACES 32
+struct usb_interface_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint8_t bInterfaceNumber;
+ uint8_t bAlternateSetting;
+ uint8_t bNumEndpoints;
+ uint8_t bInterfaceClass;
+ uint8_t bInterfaceSubClass;
+ uint8_t bInterfaceProtocol;
+ uint8_t iInterface;
+
+ struct usb_endpoint_descriptor *endpoint;
+
+ unsigned char *extra; /* Extra descriptors */
+ int extralen;
+};
+
+#define USB_MAXALTSETTING 128 /* Hard limit */
+struct usb_interface {
+ struct usb_interface_descriptor *altsetting;
+
+ int num_altsetting;
+};
+
+/* Configuration descriptor information.. */
+#define USB_MAXCONFIG 8
+struct usb_config_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint16_t wTotalLength;
+ uint8_t bNumInterfaces;
+ uint8_t bConfigurationValue;
+ uint8_t iConfiguration;
+ uint8_t bmAttributes;
+ uint8_t MaxPower;
+
+ struct usb_interface *interface;
+
+ unsigned char *extra; /* Extra descriptors */
+ int extralen;
+};
+
+/* Device descriptor */
+struct usb_device_descriptor {
+ uint8_t bLength;
+ uint8_t bDescriptorType;
+ uint16_t bcdUSB;
+ uint8_t bDeviceClass;
+ uint8_t bDeviceSubClass;
+ uint8_t bDeviceProtocol;
+ uint8_t bMaxPacketSize0;
+ uint16_t idVendor;
+ uint16_t idProduct;
+ uint16_t bcdDevice;
+ uint8_t iManufacturer;
+ uint8_t iProduct;
+ uint8_t iSerialNumber;
+ uint8_t bNumConfigurations;
+} __attribute__ ((packed));
+
+struct usb_ctrl_setup {
+ uint8_t bRequestType;
+ uint8_t bRequest;
+ uint16_t wValue;
+ uint16_t wIndex;
+ uint16_t wLength;
+} __attribute__ ((packed));
+
+/*
+ * Standard requests
+ */
+#define USB_REQ_GET_STATUS 0x00
+#define USB_REQ_CLEAR_FEATURE 0x01
+/* 0x02 is reserved */
+#define USB_REQ_SET_FEATURE 0x03
+/* 0x04 is reserved */
+#define USB_REQ_SET_ADDRESS 0x05
+#define USB_REQ_GET_DESCRIPTOR 0x06
+#define USB_REQ_SET_DESCRIPTOR 0x07
+#define USB_REQ_GET_CONFIGURATION 0x08
+#define USB_REQ_SET_CONFIGURATION 0x09
+#define USB_REQ_GET_INTERFACE 0x0A
+#define USB_REQ_SET_INTERFACE 0x0B
+#define USB_REQ_SYNCH_FRAME 0x0C
+
+#define USB_TYPE_STANDARD (0x00 << 5)
+#define USB_TYPE_CLASS (0x01 << 5)
+#define USB_TYPE_VENDOR (0x02 << 5)
+#define USB_TYPE_RESERVED (0x03 << 5)
+
+#define USB_RECIP_DEVICE 0x00
+#define USB_RECIP_INTERFACE 0x01
+#define USB_RECIP_ENDPOINT 0x02
+#define USB_RECIP_OTHER 0x03
+
+/*
+ * Various libusb API related stuff
+ */
+
+#define USB_ENDPOINT_IN 0x80
+#define USB_ENDPOINT_OUT 0x00
+
+/* Error codes */
+#define USB_ERROR_BEGIN 500000
+
+/*
+ * This is supposed to look weird. This file is generated from autoconf
+ * and I didn't want to make this too complicated.
+ */
+#if 0
+#define USB_LE16_TO_CPU(x) do { x = ((x & 0xff) << 8) | ((x & 0xff00) >> 8); } while(0)
+#else
+#define USB_LE16_TO_CPU(x)
+#endif
+
+/* Data types */
+struct usb_device;
+struct usb_bus;
+
+/*
+ * To maintain compatibility with applications already built with libusb,
+ * we must only add entries to the end of this structure. NEVER delete or
+ * move members and only change types if you really know what you're doing.
+ */
+#ifdef PATH_MAX
+#define LIBUSB_PATH_MAX PATH_MAX
+#else
+#define LIBUSB_PATH_MAX 4096
+#endif
+struct usb_device {
+ struct usb_device *next, *prev;
+
+ char filename[LIBUSB_PATH_MAX + 1];
+
+ struct usb_bus *bus;
+
+ struct usb_device_descriptor descriptor;
+ struct usb_config_descriptor *config;
+
+ void *dev; /* Darwin support */
+
+ uint8_t devnum;
+
+ unsigned char num_children;
+ struct usb_device **children;
+};
+
+struct usb_bus {
+ struct usb_bus *next, *prev;
+
+ char dirname[LIBUSB_PATH_MAX + 1];
+
+ struct usb_device *devices;
+ uint32_t location;
+
+ struct usb_device *root_dev;
+};
+
+struct usb_dev_handle;
+typedef struct usb_dev_handle usb_dev_handle;
+
+/* Variables */
+extern struct usb_bus *usb_busses;
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* Function prototypes */
+
+/* usb.c */
+usb_dev_handle *usb_open(struct usb_device *dev);
+int usb_close(usb_dev_handle *dev);
+int usb_get_string(usb_dev_handle *dev, int index, int langid, char *buf,
+ size_t buflen);
+int usb_get_string_simple(usb_dev_handle *dev, int index, char *buf,
+ size_t buflen);
+
+/* descriptors.c */
+int usb_get_descriptor_by_endpoint(usb_dev_handle *udev, int ep,
+ unsigned char type, unsigned char index, void *buf, int size);
+int usb_get_descriptor(usb_dev_handle *udev, unsigned char type,
+ unsigned char index, void *buf, int size);
+
+/* <arch>.c */
+int usb_bulk_write(usb_dev_handle *dev, int ep, const char *bytes, int size,
+ int timeout);
+int usb_bulk_read(usb_dev_handle *dev, int ep, char *bytes, int size,
+ int timeout);
+int usb_interrupt_write(usb_dev_handle *dev, int ep, const char *bytes, int size,
+ int timeout);
+int usb_interrupt_read(usb_dev_handle *dev, int ep, char *bytes, int size,
+ int timeout);
+int usb_control_msg(usb_dev_handle *dev, int requesttype, int request,
+ int value, int index, char *bytes, int size, int timeout);
+int usb_set_configuration(usb_dev_handle *dev, int configuration);
+int usb_claim_interface(usb_dev_handle *dev, int interface);
+int usb_release_interface(usb_dev_handle *dev, int interface);
+int usb_set_altinterface(usb_dev_handle *dev, int alternate);
+int usb_resetep(usb_dev_handle *dev, unsigned int ep);
+int usb_clear_halt(usb_dev_handle *dev, unsigned int ep);
+int usb_reset(usb_dev_handle *dev);
+
+#if 1
+#define LIBUSB_HAS_GET_DRIVER_NP 1
+int usb_get_driver_np(usb_dev_handle *dev, int interface, char *name,
+ unsigned int namelen);
+#define LIBUSB_HAS_DETACH_KERNEL_DRIVER_NP 1
+int usb_detach_kernel_driver_np(usb_dev_handle *dev, int interface);
+#endif
+
+char *usb_strerror(void);
+
+void usb_init(void);
+void usb_set_debug(int level);
+int usb_find_busses(void);
+int usb_find_devices(void);
+struct usb_device *usb_device(usb_dev_handle *dev);
+struct usb_bus *usb_get_busses(void);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* __USB_H__ */
+
Index: sipmscan/trunk_v0.9/input/workstation.h.in
===================================================================
--- sipmscan/trunk_v0.9/input/workstation.h.in (nonexistent)
+++ sipmscan/trunk_v0.9/input/workstation.h.in (revision 145)
@@ -0,0 +1,14 @@
+#ifndef _workstation_h_
+#define _workstation_h_
+
+// Define the working computer (O=offline, S=offline with scope, I=IJS/online) and the base directory
+#define WORKSTAT 'N'
+
+// Define if working computer is connected to IJS ethernet network (for fieldpoint)
+#define IJSNET 1
+
+#ifdef WORKSTAT
+ #define rootdir "path-to-installation"
+#endif
+
+#endif
Index: sipmscan/trunk_v0.9/libxxusb.cpp
===================================================================
--- sipmscan/trunk_v0.9/libxxusb.cpp (nonexistent)
+++ sipmscan/trunk_v0.9/libxxusb.cpp (revision 145)
@@ -0,0 +1,1651 @@
+
+// libxxusb.cpp : Defines the entry point for the DLL application.
+//
+
+
+
+#include <string.h>
+#include <malloc.h>
+//#include "usb.h"
+#include "libxxusb.h"
+#include <time.h>
+
+
+
+
+// 03/09/06 Release 3.00 changes
+// 07/28/06 correction CAMAC write for F to be in range 16...23
+// 10/09/06 correction CAMAC read for F to be in range <16 OR >23
+// 10/16/06 CAMAC DGG corrected
+// 12/28/07 Open corrected for bug when calling register after opening
+/*
+******** xxusb_longstack_execute ************************
+
+ Executes stack array passed to the function and returns the data read from the VME bus
+
+ Paramters:
+ hdev: USB device handle returned from an open function
+ DataBuffer: pointer to the dual use buffer
+ when calling , DataBuffer contains (unsigned short) stack data, with first word serving
+ as a placeholder
+ upon successful return, DataBuffer contains (unsigned short) VME data
+ lDataLen: The number of bytes to be fetched from VME bus - not less than the actual number
+ expected, or the function will return -5 code. For stack consisting only of write operations,
+ lDataLen may be set to 1.
+ timeout: The time in ms that should be spent tryimg to write data.
+
+ Returns:
+ When Successful, the number of bytes read from xxusb.
+ Upon failure, a negative number
+
+ Note:
+ The function must pass a pointer to an array of unsigned integer stack data, in which the first word
+ is left empty to serve as a placeholder.
+ The function is intended for executing long stacks, up to 4 MBytes long, both "write" and "read"
+ oriented, such as using multi-block transfer operations.
+ Structure upon call:
+ DataBuffer(0) = 0(don't care place holder)
+ DataBuffer(1) = (unsigned short)StackLength bits 0-15
+ DataBuffer(2) = (unsigned short)StackLength bits 16-20
+ DataBuffer(3 - StackLength +2) (unsigned short) stack data
+ StackLength represents the number of words following DataBuffer(1) word, thus the total number
+ of words is StackLength+2
+ Structure upon return:
+ DataBuffer(0 - (ReturnValue/2-1)) - (unsigned short)array of returned data when ReturnValue>0
+*/
+
+int xxusb_longstack_execute(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
+{
+ int ret;
+ char *cbuf;
+ unsigned short *usbuf;
+ int bufsize;
+
+ cbuf = (char *)DataBuffer;
+ usbuf = (unsigned short *)DataBuffer;
+ cbuf[0]=12;
+ cbuf[1]=0;
+ bufsize = 2*(usbuf[1]+0x10000*usbuf[2])+4;
+ ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, cbuf, bufsize, timeout);
+ if (ret>0)
+ ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
+
+ return ret;
+}
+
+/*
+******** xxusb_bulk_read ************************
+
+ Reads the content of the usbfifo whenever "FIFO full" flag is set,
+ otherwise times out.
+
+ Paramters:
+ hdev: USB device handle returned from an open function
+ DataBuffer: pointer to an array to store data that is read from the VME bus;
+ the array may be declared as byte, unsigned short, or unsigned long
+ lDatalen: The number of bytes to read from xxusb
+ timeout: The time in ms that should be spent waiting for data.
+
+ Returns:
+ When Successful, the number of bytes read from xxusb.
+ Upon failure, a negative number
+
+ Note:
+ Depending upon the actual need, the function may be used to return the data in a form
+ of an array of bytes, unsigned short integers (16 bits), or unsigned long integers (32 bits).
+ The latter option of passing a pointer to an array of unsigned long integers is meaningful when
+ xxusb data buffering option is used (bit 7=128 of the global register) that requires data
+ 32-bit data alignment.
+
+*/
+int xxusb_bulk_read(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
+{
+int ret;
+char *cbuf;
+cbuf = (char *)DataBuffer;
+ ret = usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
+ return ret;
+}
+
+/*
+******** xxusb_bulk_write ************************
+
+ Writes the content of an array of bytes, unsigned short integers, or unsigned long integers
+ to the USB port fifo; times out when the USB fifo is full (e.g., when xxusb is busy).
+
+ Paramters:
+ hdev: USB device handle returned from an open function
+ DataBuffer: pointer to an array storing the data to be sent;
+ the array may be declared as byte, unsigned short, or unsigned long
+ lDatalen: The number of bytes to to send to xxusb
+ timeout: The time in ms that should be spent waiting for data.
+
+ Returns:
+ When Successful, the number of bytes passed to xxusb.
+ Upon failure, a negative number
+
+ Note:
+ Depending upon the actual need, the function may be used to pass to xxusb the data in a form
+ of an array of bytes, unsigned short integers (16 bits), or unsigned long integers (32 bits).
+*/
+int xxusb_bulk_write(usb_dev_handle *hDev, void *DataBuffer, int lDataLen, int timeout)
+{
+int ret;
+char *cbuf;
+cbuf = (char *)DataBuffer;
+ ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, cbuf, lDataLen, timeout);
+ return ret;
+}
+
+/*
+******** xxusb_usbfifo_read ************************
+
+ Reads data stored in the xxusb fifo and packs them in an array of long integers.
+
+ Paramters:
+ hdev: USB device handle returned from an open function
+ DataBuffer: pointer to an array of long to store data that is read
+ the data occupy only the least significant 16 bits of the 32-bit data words
+ lDatalen: The number of bytes to read from the xxusb
+ timeout: The time in ms that should be spent waiting for data.
+
+ Returns:
+ When Successful, the number of bytes read from xxusb.
+ Upon failure, a negative number
+
+ Note:
+ The function is not economical as it wastes half of the space required for storing
+ the data received. Also, it is relatively slow, as it performs extensive data repacking.
+ It is recommended to use xxusb_bulk_read with a pointer to an array of unsigned short
+ integers.
+*/
+int xxusb_usbfifo_read(usb_dev_handle *hDev, int *DataBuffer, int lDataLen, int timeout)
+{
+int ret;
+char *cbuf;
+unsigned short *usbuf;
+int i;
+
+cbuf = (char *)DataBuffer;
+usbuf = (unsigned short *)DataBuffer;
+
+ ret = usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, cbuf, lDataLen, timeout);
+ if (ret > 0)
+ for (i=ret/2-1; i >= 0; i=i-1)
+ {
+ usbuf[i*2]=usbuf[i];
+ usbuf[i*2+1]=0;
+ }
+ return ret;
+}
+
+
+//******************************************************//
+//******************* GENERAL XX_USB *******************//
+//******************************************************//
+// The following are functions used for both VM_USB & CC_USB
+
+
+/*
+******** xxusb_register_write ************************
+
+ Writes Data to the xxusb register selected by RedAddr. For
+ acceptable values for RegData and RegAddr see the manual
+ the module you are using.
+
+ Parameters:
+ hdev: usb device handle returned from open device
+ RegAddr: The internal address if the xxusb
+ RegData: The Data to be written to the register
+
+ Returns:
+ Number of bytes sent to xxusb if successful
+ 0 if the register is write only
+ Negative numbers if the call fails
+*/
+short xxusb_register_write(usb_dev_handle *hDev, short RegAddr, long RegData)
+{
+ long RegD;
+ char buf[8]={5,0,0,0,0,0,0,0};
+ int ret;
+ int lDataLen;
+ int timeout;
+ if ((RegAddr==0) || (RegAddr==12) || (RegAddr==15))
+ return 0;
+ buf[2]=(char)(RegAddr & 15);
+ buf[4]=(char)(RegData & 255);
+
+ RegD = RegData >> 8;
+ buf[5]=(char)(RegD & 255);
+ RegD = RegD >>8;
+ if (RegAddr==8)
+ {
+ buf[6]=(char)(RegD & 255);
+ lDataLen=8;
+ }
+ else
+ lDataLen=6;
+ timeout=10;
+ ret=xxusb_bulk_write(hDev, buf, lDataLen, timeout);
+ return ret;
+}
+
+/*
+******** xxusb_stack_write ************************
+
+ Writes a stack of VME/CAMAC calls to the VM_USB/CC_USB
+ to be executed upon trigger.
+
+ Parameters:
+ hdev: usb device handle returned from an open function
+ StackAddr: internal register to which the stack should be written
+ lpStackData: Pointer to an array holding the stack
+
+ Returns:
+ The number of Bytes written to the xxusb when successful
+ A negative number upon failure
+*/
+short xxusb_stack_write(usb_dev_handle *hDev, short StackAddr, long *intbuf)
+{
+ int timeout;
+ short ret;
+ short lDataLen;
+ char buf[2000];
+ short i;
+ int bufsize;
+
+ buf[0]=(char)((StackAddr & 51) + 4);
+ buf[1]=0;
+ lDataLen=(short)(intbuf[0] & 0xFFF);
+ buf[2]=(char)(lDataLen & 255);
+ lDataLen = lDataLen >> 8;
+ buf[3] = (char)(lDataLen & 255);
+ bufsize=intbuf[0]*2+4;
+ if (intbuf[0]==0)
+ return 0;
+ for (i=1; i <= intbuf[0]; i++)
+ {
+ buf[2+2*i] = (char)(intbuf[i] & 255);
+ buf[3+2*i] = (char)((intbuf[i] >>8) & 255);
+ }
+ timeout=50;
+ ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, bufsize, timeout);
+ return ret;
+}
+
+/*
+******** xxusb_stack_execute **********************
+
+ Writes, executes and returns the value of a DAQ stack.
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ intbuf: Pointer to an array holding the values stack. Upon return
+ Pointer value is the Data returned from the stack.
+
+ Returns:
+ When successful, the number of Bytes read from xxusb
+ Upon Failure, a negative number.
+*/
+short xxusb_stack_execute(usb_dev_handle *hDev, long *intbuf)
+{
+ int timeout;
+ short ret;
+ short lDataLen;
+ char buf[26700];
+ short i;
+ int bufsize;
+ int ii = 0;
+
+ buf[0]=12;
+ buf[1]=0;
+ lDataLen=(short)(intbuf[0] & 0xFFF);
+ buf[2]=(char)(lDataLen & 255);
+ lDataLen = lDataLen >> 8;
+ buf[3] = (char)(lDataLen & 15);
+ bufsize=intbuf[0]*2+4;
+ if (intbuf[0]==0)
+ return 0;
+ for (i=1; i <= intbuf[0]; i++)
+ {
+ buf[2+2*i] = (char)(intbuf[i] & 255);
+ buf[3+2*i] = (char)((intbuf[i] >>8) & 255);
+ }
+ timeout=2000;
+ ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, bufsize, timeout);
+ if (ret>0)
+ {
+ lDataLen=26700;
+ timeout=6000;
+ ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, buf, lDataLen, timeout);
+ if (ret>0)
+ for (i=0; i < ret; i=i+2)
+ intbuf[ii++]=(UCHAR)(buf[i]) +(UCHAR)( buf[i+1])*256;
+ }
+ return ret;
+}
+
+/*
+******** xxusb_stack_read ************************
+
+ Reads the current DAQ stack stored by xxusb
+
+ Parameters:
+ hdev: USB device handle returned by an open function
+ StackAddr: Indicates which stack to read, primary or secondary
+ intbuf: Pointer to a array where the stack can be stored
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short xxusb_stack_read(usb_dev_handle *hDev, short StackAddr, long *intbuf)
+{
+ int timeout;
+ short ret;
+ short lDataLen;
+ short bufsize;
+ char buf[1600];
+ int i;
+
+ buf[0]=(char)(StackAddr & 51);
+ buf[1]=0;
+ lDataLen = 2;
+ timeout=100;
+ ret=usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, lDataLen, timeout);
+ if (ret < 0)
+ return ret;
+ else
+ bufsize=1600;
+ int ii=0;
+ {
+ ret=usb_bulk_read(hDev, XXUSB_ENDPOINT_IN, buf, bufsize, timeout);
+ if (ret>0)
+ for (i=0; i < ret; i=i+2)
+ intbuf[ii++]=(UCHAR)(buf[i]) + (UCHAR)(buf[i+1])*256;
+ return ret;
+
+ }
+}
+
+/*
+******** xxusb_register_read ************************
+
+ Reads the current contents of an internal xxusb register
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ RegAddr: The internal address of the register from which to read
+ RegData: Pointer to a long to hold the data.
+
+ Returns:
+ When Successful, the number of bytes read from xxusb.
+ Upon failure, a negative number
+*/
+short xxusb_register_read(usb_dev_handle *hDev, short RegAddr, long *RegData)
+{
+//long RegD;
+int timeout;
+ char buf[4]={1,0,0,0};
+ int ret;
+ int lDataLen;
+
+ buf[2]=(char)(RegAddr & 15);
+ timeout=10;
+ lDataLen=4;
+ ret=xxusb_bulk_write(hDev, buf, lDataLen, timeout);
+ if (ret < 0)
+ return (short)ret;
+ else
+ {
+ lDataLen=8;
+ timeout=100;
+ ret=xxusb_bulk_read(hDev, buf, lDataLen, timeout);
+ if (ret<0)
+ return (short)ret;
+ else
+ {
+ *RegData=(UCHAR)(buf[0])+256*(UCHAR)(buf[1]);
+ if (ret==4)
+ *RegData=*RegData+0x10000*(UCHAR)(buf[2]);
+ return (short)ret;
+ }
+ }
+}
+
+/*
+******** xxusb_reset_toggle ************************
+
+ Toggles the reset state of the FPGA while the xxusb in programming mode
+
+ Parameters
+ hdev: US B device handle returned from an open function
+
+ Returns:
+ Upon failure, a negative number
+*/
+short xxusb_reset_toggle(usb_dev_handle *hDev)
+{
+ short ret;
+ char buf[2] = {(char)255,(char)255};
+ int lDataLen=2;
+ int timeout=1000;
+ ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf,lDataLen, timeout);
+ return (short)ret;
+}
+
+/*
+******** xxusb_devices_find ************************
+
+ Determines the number and parameters of all xxusb devices attched to
+ the computer.
+
+ Parameters:
+ xxdev: pointer to an array on which the device parameters are stored
+
+ Returns:
+ Upon success, returns the number of devices found
+ Upon Failure returns a negative number
+*/
+short xxusb_devices_find(xxusb_device_type *xxdev)
+{
+ short DevFound = 0;
+ usb_dev_handle *udev;
+ struct usb_bus *bus;
+ struct usb_device *dev;
+struct usb_bus *usb_busses;
+ char string[256];
+ short ret;
+ usb_init();
+ usb_find_busses();
+ usb_busses=usb_get_busses();
+ usb_find_devices();
+ for (bus=usb_busses; bus; bus = bus->next)
+ {
+ for (dev = bus->devices; dev; dev= dev->next)
+ {
+ if (dev->descriptor.idVendor==XXUSB_WIENER_VENDOR_ID)
+ {
+ udev = usb_open(dev);
+ if (udev)
+ {
+ ret = usb_get_string_simple(udev, dev->descriptor.iSerialNumber, string, sizeof(string));
+ if (ret >0 )
+ {
+ xxdev[DevFound].usbdev=dev;
+ strcpy(xxdev[DevFound].SerialString, string);
+ DevFound++;
+ }
+ usb_close(udev);
+ }
+ else return -1;
+ }
+ }
+ }
+ return DevFound;
+}
+
+/*
+******** xxusb_device_close ************************
+
+ Closes an xxusb device
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+
+ Returns: 1
+*/
+short xxusb_device_close(usb_dev_handle *hDev)
+{
+ short ret;
+ ret=usb_release_interface(hDev,0);
+ usb_close(hDev);
+ return 1;
+}
+
+/*
+******** xxusb_device_open ************************
+
+ Opens an xxusb device found by xxusb_device_find
+
+ Parameters:
+ dev: a usb device
+
+ Returns:
+ A USB device handle
+*/
+usb_dev_handle* xxusb_device_open(struct usb_device *dev)
+{
+ short ret;
+ long val;
+ int count =0;
+ usb_dev_handle *udev;
+ udev = usb_open(dev);
+ ret = usb_set_configuration(udev,1);
+ ret = usb_claim_interface(udev,0);
+// RESET USB (added 10/16/06 Andreas Ruben)
+ ret=xxusb_register_write(udev, 10, 0x04);
+// Loop to find known state (added 12/28/07 TH / AR)
+ ret =-1;
+ while ((ret <0) && (count <10))
+ {
+ xxusb_register_read(udev, 0, &val);
+ count++;
+ }
+
+ return udev;
+}
+
+/*
+******** xxusb_flash_program ************************
+
+ --Untested and therefore uncommented--
+*/
+short xxusb_flash_program(usb_dev_handle *hDev, char *config, short nsect)
+{
+ int i=0;
+ int k=0;
+ short ret=0;
+ time_t t1,t2;
+
+ char *pconfig;
+ char *pbuf;
+ pconfig=config;
+ char buf[518] ={(char)0xAA,(char)0xAA,(char)0x55,(char)0x55,(char)0xA0,(char)0xA0};
+ while (*pconfig++ != -1);
+ for (i=0; i<nsect; i++)
+ {
+ pbuf=buf+6;
+ for (k=0; k<256; k++)
+ {
+ *(pbuf++)=*(pconfig);
+ *(pbuf++)=*(pconfig++);
+ }
+ ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, 518, 2000);
+ if (ret<0)
+ return ret;
+ t1=clock()+(time_t)(0.03*CLOCKS_PER_SEC);
+ while (t1>clock());
+ t2=clock();
+ }
+ return ret;
+}
+
+/*
+******** xxusb_flashblock_program ************************
+
+ --Untested and therefore uncommented--
+*/
+short xxusb_flashblock_program(usb_dev_handle *hDev, UCHAR *config)
+{
+ int k=0;
+ short ret=0;
+
+ UCHAR *pconfig;
+ char *pbuf;
+ pconfig=config;
+ char buf[518] ={(char)0xAA,(char)0xAA,(char)0x55,(char)0x55,(char)0xA0,(char)0xA0};
+ pbuf=buf+6;
+ for (k=0; k<256; k++)
+ {
+ *(pbuf++)=(UCHAR)(*(pconfig));
+ *(pbuf++)=(UCHAR)(*(pconfig++));
+ }
+ ret = usb_bulk_write(hDev, XXUSB_ENDPOINT_OUT, buf, 518, 2000);
+ return ret;
+}
+
+/*
+******** xxusb_serial_open ************************
+
+ Opens a xxusb device whose serial number is given
+
+ Parameters:
+ SerialString: a char string that gives the serial number of
+ the device you wish to open. It takes the form:
+ VM0009 - for a vm_usb with serial number 9 or
+ CC0009 - for a cc_usb with serial number 9
+
+ Returns:
+ A USB device handle
+*/
+usb_dev_handle* xxusb_serial_open(char *SerialString)
+{
+ short DevFound = 0;
+ usb_dev_handle *udev = NULL;
+ struct usb_bus *bus;
+ struct usb_device *dev;
+struct usb_bus *usb_busses;
+char string[7];
+ short ret;
+// usb_set_debug(4);
+ usb_init();
+ usb_find_busses();
+ usb_busses=usb_get_busses();
+ usb_find_devices();
+ for (bus=usb_busses; bus; bus = bus->next)
+ {
+ for (dev = bus->devices; dev; dev= dev->next)
+ {
+ if (dev->descriptor.idVendor==XXUSB_WIENER_VENDOR_ID)
+ {
+ udev = xxusb_device_open(dev);
+ if (udev)
+ {
+ ret = usb_get_string_simple(udev, dev->descriptor.iSerialNumber, string, sizeof(string));
+ if (ret >0 )
+ {
+ if (strcmp(string,SerialString)==0)
+ return udev;
+ }
+ usb_close(udev);
+ }
+ }
+ }
+ }
+ udev = NULL;
+ return udev;
+}
+
+
+//******************************************************//
+//****************** EZ_VME Functions ******************//
+//******************************************************//
+// The following are functions used to perform simple
+// VME Functions with the VM_USB
+
+/*
+******** VME_write_32 ************************
+
+ Writes a 32 bit data word to the VME bus
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Address_Modifier: VME address modifier for the VME call
+ VME_Address: Address to write the data to
+ Data: 32 bit data word to be written to VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_write_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data)
+{
+ long intbuf[1000];
+ short ret;
+ intbuf[0]=7;
+ intbuf[1]=0;
+ intbuf[2]=Address_Modifier;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff);
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ intbuf[6]=(Data & 0xffff);
+ intbuf[7]=((Data >> 16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+/*
+******** VME_read_32 ************************
+
+
+ Reads a 32 bit data word from a VME address
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Address_Modifier: VME address modifier for the VME call
+ VME_Address: Address to read the data from
+ Data: 32 bit data word read from VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_read_32(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long *Data)
+{
+ long intbuf[1000];
+ short ret;
+ intbuf[0]=5;
+ intbuf[1]=0;
+ intbuf[2]=Address_Modifier +0x100;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff);
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Data=intbuf[0] + (intbuf[1] * 0x10000);
+ return ret;
+}
+
+/*
+******** VME_write_16 ************************
+
+ Writes a 16 bit data word to the VME bus
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Address_Modifier: VME address modifier for the VME call
+ VME_Address: Address to write the data to
+ Data: word to be written to VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_write_16(usb_dev_handle *hdev, short Address_Modifier, long VME_Address, long Data)
+{
+ long intbuf[1000];
+ short ret;
+ intbuf[0]=7;
+ intbuf[1]=0;
+ intbuf[2]=Address_Modifier;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff)+ 0x01;
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ intbuf[6]=(Data & 0xffff);
+ intbuf[7]=0;
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+/*
+******** VME_read_16 ************************
+
+ Reads a 16 bit data word from a VME address
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Address_Modifier: VME address modifier for the VME call
+ VME_Address: Address to read the data from
+ Data: word read from VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_read_16(usb_dev_handle *hdev,short Address_Modifier, long VME_Address, long *Data)
+{
+ long intbuf[1000];
+ short ret;
+ intbuf[0]=5;
+ intbuf[1]=0;
+ intbuf[2]=Address_Modifier +0x100;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff)+ 0x01;
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Data=intbuf[0];
+ return ret;
+}
+
+/*
+******** VME_BLT_read_32 ************************
+
+ Performs block transfer of 32 bit words from a VME address
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Address_Modifier: VME address modifier for the VME call
+ count: number of data words to read
+ VME_Address: Address to read the data from
+ Data: pointer to an array to hold the data words
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_BLT_read_32(usb_dev_handle *hdev, short Adress_Modifier, int count, long VME_Address, long Data[])
+{
+ long intbuf[1000];
+ short ret;
+ int i=0;
+ if (count > 255) return -1;
+ intbuf[0]=5;
+ intbuf[1]=0;
+ intbuf[2]=Adress_Modifier +0x100;
+ intbuf[3]=(count << 8);
+ intbuf[4]=(VME_Address & 0xffff);
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ int j=0;
+ for (i=0;i<(2*count);i=i+2)
+ {
+ Data[j]=intbuf[i] + (intbuf[i+1] * 0x10000);
+ j++;
+ }
+ return ret;
+}
+
+//******************************************************//
+//****************** VM_USB Registers ******************//
+//******************************************************//
+// The following are functions used to set the registers
+// in the VM_USB
+
+/*
+******** VME_register_write ************************
+
+ Writes to the vmusb registers that are accessible through
+ VME style calls
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ VME_Address: The VME Address of the internal register
+ Data: Data to be written to VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_register_write(usb_dev_handle *hdev, long VME_Address, long Data)
+{
+ long intbuf[1000];
+ short ret;
+
+ intbuf[0]=7;
+ intbuf[1]=0;
+ intbuf[2]=0x1000;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff);
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ intbuf[6]=(Data & 0xffff);
+ intbuf[7]=((Data >> 16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+/*
+******** VME_register_read ************************
+
+ Reads from the vmusb registers that are accessible trough VME style calls
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ VME_Address: The VME Address of the internal register
+ Data: Data read from VME_Address
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_register_read(usb_dev_handle *hdev, long VME_Address, long *Data)
+{
+ long intbuf[1000];
+ short ret;
+
+ intbuf[0]=5;
+ intbuf[1]=0;
+ intbuf[2]=0x1100;
+ intbuf[3]=0;
+ intbuf[4]=(VME_Address & 0xffff);
+ intbuf[5]=((VME_Address >>16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Data=intbuf[0] + (intbuf[1] * 0x10000);
+ return ret;
+}
+
+/*
+******** VME_LED_settings ************************
+
+ Sets the vmusb LED's
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ LED: The number which corresponds to an LED values are:
+ 0 - for Top YELLOW LED
+ 1 - for RED LED
+ 2 - for GREEN LED
+ 3 - for Bottom YELLOW LED
+ code: The LED aource selector code, valid values for each LED
+ are listed in the manual
+ invert: to invert the LED lighting
+ latch: sets LED latch bit
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch)
+{
+ short ret;
+// long internal;
+ long Data;
+
+ if( (LED <0) ||(LED > 3) || (code < 0) || (code > 7)) return -1;
+
+ VME_register_read(hdev,0xc,&Data);
+ if(LED == 0)
+ {
+ Data = Data & 0xFFFFFF00;
+ Data = Data | code;
+ if (invert == 1 && latch == 1) Data = Data | 0x18;
+ if (invert == 1 && latch == 0) Data = Data | 0x08;
+ if (invert == 0 && latch == 1) Data = Data | 0x10;
+ }
+ if(LED == 1)
+ {
+ Data = Data & 0xFFFF00FF;
+ Data = Data | (code * 0x0100);
+ if (invert == 1 && latch == 1) Data = Data | 0x1800;
+ if (invert == 1 && latch == 0) Data = Data | 0x0800;
+ if (invert == 0 && latch == 1) Data = Data | 0x1000;
+ }
+ if(LED == 2)
+ {
+ Data = Data & 0xFF00FFFF;
+ Data = Data | (code * 0x10000);
+ if (invert == 1 && latch == 1) Data = Data | 0x180000;
+ if (invert == 1 && latch == 0) Data = Data | 0x080000;
+ if (invert == 0 && latch == 1) Data = Data | 0x100000;
+ }
+ if(LED == 3)
+ {
+ Data = Data & 0x00FFFFFF;
+ Data = Data | (code * 0x10000);
+ if (invert == 1 && latch == 1) Data = Data | 0x18000000;
+ if (invert == 1 && latch == 0) Data = Data | 0x08000000;
+ if (invert == 0 && latch == 1) Data = Data | 0x10000000;
+ }
+ ret = VME_register_write(hdev, 0xc, Data);
+ return ret;
+}
+
+/*
+******** VME_DGG ************************
+
+ Sets the parameters for Gate & Delay channel A of vmusb
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ channel: Which DGG channel to use Valid Values are:
+ 0 - For DGG A
+ 1 - For DGG B
+ trigger: Determines what triggers the start of the DGG Valid values are:
+ 0 - Channel disabled
+ 1 - NIM input 1
+ 2 - NIM input 2
+ 3 - Event Trigger
+ 4 - End of Event
+ 5 - USB Trigger
+ 6 - Pulser
+ output: Determines which NIM output to use for the channel, Vaild values are:
+ 0 - for NIM O1
+ 1 - for NIM O2
+ delay: 32 bit word consisting of
+ lower 16 bits: Delay_fine in steps of 12.5ns between trigger and start of gate
+ upper 16 bits: Delay_coarse in steps of 81.7us between trigger and start of gate
+ gate: the time the gate should stay open in steps of 12.5ns
+ invert: is 1 if you wish to invert the DGG channel output
+ latch: is 1 if you wish to run the DGG channel latched
+
+ Returns:
+ Returns 1 when successful
+ Upon failure, a negative number
+*/
+short VME_DGG(usb_dev_handle *hdev, unsigned short channel, unsigned short trigger, unsigned short output,
+ long delay, unsigned short gate, unsigned short invert, unsigned short latch)
+{
+ long Data, DGData, Delay_ext;
+ long internal;
+ short ret;
+
+
+ ret = VME_register_read(hdev, 0x10, &Data);
+ // check and correct values
+ if(ret<=0) return -1;
+
+ if(channel >1) channel =1;
+ if(invert >1) invert =1;
+ if(latch >1) latch =1;
+ if(output >1) output =1;
+ if(trigger >6) trigger =0;
+
+ // define Delay and Gate data
+ DGData = gate * 0x10000;
+ DGData += (unsigned short) delay;
+
+ // Set channel, output, invert, latch
+ if (output == 0)
+ {
+ Data = Data & 0xFFFFFF00;
+ Data += 0x04 + channel +0x08*invert + 0x10*latch;
+ }
+ if (output == 1)
+ {
+ Data = Data & 0xFFFF00FF;
+ Data += (0x04 + channel +0x08*invert + 0x10*latch)*0x100;
+ }
+
+ // Set trigger, delay, gate
+
+ if(channel ==0) // CHANNEL DGG_A
+ {
+ internal = (trigger * 0x1000000) ;
+ Data= Data & 0xF0FFFFFF;
+ Data += internal;
+ ret = VME_register_write(hdev,0x10,Data);
+ if(ret<=0) return -1;
+ ret=VME_register_write(hdev,0x14,DGData);
+ if(ret<=0) return -1;
+ // Set coarse delay in DGG_Extended register
+ ret = VME_register_read(hdev,0x38,&Data);
+ Delay_ext= (Data & 0xffff0000);
+ Delay_ext+= ((delay/0x10000) & 0xffff);
+ ret = VME_register_write(hdev,0x38,Delay_ext);
+ }
+ if( channel ==1) // CHANNEL DGG_B
+ {
+ internal = (trigger * 0x10000000) ;
+ Data= Data & 0x0FFFFFFF;
+ Data += internal;
+ ret = VME_register_write(hdev,0x10,Data);
+ if(ret<=0) return -1;
+ ret=VME_register_write(hdev,0x18,DGData);
+ if(ret<=0) return -1;
+ // Set coarse delay in DGG_Extended register
+ ret = VME_register_read(hdev,0x38,&Data);
+ Delay_ext= (Data & 0x0000ffff);
+ Delay_ext+= (delay & 0xffff0000);
+ ret = VME_register_write(hdev,0x38,Delay_ext);
+ }
+ return 1;
+
+}
+
+/*
+******** VME_Output_settings ************************
+
+ Sets the vmusb NIM output register
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Channel: The number which corresponds to an output:
+ 1 - for Output 1
+ 2 - for Output 2
+ code: The Output selector code, valid values
+ are listed in the manual
+ invert: to invert the output
+ latch: sets latch bit
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short VME_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch)
+{
+
+ short ret;
+// long internal;
+ long Data;
+
+ if( (Channel <1) ||(Channel > 2) || (code < 0) || (code > 7)) return -1;
+ VME_register_read(hdev,0x10,&Data);
+ if(Channel == 1)
+ {
+ Data = Data & 0xFFFF00;
+ Data = Data | code;
+ if (invert == 1 && latch == 1) Data = Data | 0x18;
+ if (invert == 1 && latch == 0) Data = Data | 0x08;
+ if (invert == 0 && latch == 1) Data = Data | 0x10;
+ }
+ if(Channel == 2)
+ {
+ Data = Data & 0xFF00FF;
+ Data = Data | (code * 0x0100);
+ if (invert == 1 && latch == 1) Data = Data | 0x1800;
+ if (invert == 1 && latch == 0) Data = Data | 0x0800;
+ if (invert == 0 && latch == 1) Data = Data | 0x1000;
+ }
+ ret = VME_register_write(hdev, 0x10, Data);
+ return ret;
+}
+
+
+//******************************************************//
+//****************** CC_USB Registers ******************//
+//******************************************************//
+// The following are functions used to set the registers
+// in the CAMAC_USB
+
+/*
+******** CAMAC_register_write *****************
+
+ Performs a CAMAC write to CC_USB register
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ A: CAMAC Subaddress
+ F: CAMAC Function
+ Data: data to be written
+
+ Returns:
+ Number of bytes written to xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_register_write(usb_dev_handle *hdev, int A, long Data)
+{
+ int F = 16;
+ int N = 25;
+ long intbuf[4];
+ int ret;
+
+ intbuf[0]=1;
+ intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
+ intbuf[0]=3;
+ intbuf[2]=(Data & 0xffff);
+ intbuf[3]=((Data >>16) & 0xffff);
+ ret = xxusb_stack_execute(hdev, intbuf);
+
+ return ret;
+}
+
+/*
+******** CAMAC_register_read ************************
+
+ Performs a CAMAC read from CC_USB register
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ N: CAMAC Station Number
+ A: CAMAC Subaddress
+ F: CAMAC Function
+ Q: The Q response from the CAMAC dataway
+ X: The comment accepted response from CAMAC dataway
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_register_read(usb_dev_handle *hdev, int A, long *Data)
+{
+ int F = 0;
+ int N = 25;
+ long intbuf[4];
+ int ret;
+
+ intbuf[0]=1;
+ intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Data=intbuf[0] + (intbuf[1] * 0x10000);
+
+ return ret;
+}
+
+/*
+******** CAMAC_DGG ************************
+
+ Sets the parameters for Gate & Delay channel A of CC_USB
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ channel: Which DGG channel to use Valid Values are:
+ 0 - For DGG A
+ 1 - For DGG B
+ trigger: Determines what triggers the start of the DGG Valid values are:
+ 0 - Channel disabled
+ 1 - NIM input 1
+ 2 - NIM input 2
+ 3 - NIM input 2
+ 4 - Event Trigger
+ 5 - End of Event
+ 6 - USB Trigger
+ 7 - Pulser
+ output: Determines which NIM output to use for the channel, Vaild values are:
+ 1 - for NIM O1
+ 2 - for NIM O2
+ 3 - for NIM O3
+ delay: Delay in steps of 12.5ns between trigger and start of gate
+ gate: the time the gate should stay open in steps of 12.5ns
+ invert: is 1 if you wish to invert the DGG channel output
+ latch: is 1 if you wish to run the DGG channel latched
+
+ Returns:
+ Returns 1 when successful
+ Upon failure, a negative number
+*/
+short CAMAC_DGG(usb_dev_handle *hdev, short channel, short trigger, short output,
+ int delay, int gate, short invert, short latch)
+
+
+
+{
+// short channel_ID;
+ long Data;
+ long internal;
+ short ret;
+ long Delay_ext;
+
+ ret = CAMAC_register_read(hdev,5,&Data);
+ //Set trigger
+ if((output < 1 ) || (output >3) || (channel < 0 ) || (channel > 1))
+ return -1;
+ if(output ==1)
+ {
+ if(channel ==0)
+ {
+ internal = 0x03;
+ } else {
+ internal = 0x04;
+ }
+ }
+ if(output ==2)
+ {
+ if(channel ==0)
+ {
+ internal = 0x04;
+ } else {
+ internal = 0x05;
+ }
+ }
+ if(output ==3)
+ {
+ if(channel ==0)
+ {
+ internal = 0x05;
+ } else {
+ internal = 0x06;
+ }
+ }
+
+
+// Set invert bit
+ if(invert ==1)
+ internal = internal | 0x10;
+ else
+ internal = internal & 0x0F;
+ // Set Latch Bit
+ if(latch==1)
+ internal = internal | 0x20;
+ else
+ internal = internal & 0x1F;
+// Add new data to old
+ if(output == 1)
+ {
+ Data = Data & 0xFFFF00;
+ Data = Data | internal;
+ }
+ if(output == 2)
+ {
+ Data = Data & 0xFF00FF;
+ Data = Data |(internal * 0x100);
+ }
+ if(output == 3)
+ {
+ Data = Data & 0x00FFFF;
+ Data = Data | (internal * 0x10000) ;
+ }
+ CAMAC_register_write(hdev, 5, Data);
+ ret = CAMAC_register_read(hdev,6,&Data);
+//Set Trigger
+ if(trigger <0 || trigger > 7)
+ return -1;
+ if(channel ==0)
+ {
+ Data = Data & 0xFF00FFFF;
+ internal = trigger * 0x10000;
+ Data = Data | internal;
+ } else {
+ Data = Data & 0x00FFFFFF;
+ internal = trigger * 0x1000000;
+ Data = Data | internal;
+ }
+ ret = CAMAC_register_write(hdev, 6, Data);
+ if(channel == 0)
+ {
+// Write Delay and Gate info
+ ret = CAMAC_register_read(hdev,13,&Data);
+ Delay_ext= (Data & 0xffff0000);
+ Delay_ext+= ((delay/0x10000) & 0xffff);
+ internal = gate * 0x10000;
+ Data = internal + (delay & 0xffff);
+ ret=CAMAC_register_write(hdev,7,Data);
+// Set coarse delay in DGG_Extended register
+ ret=CAMAC_register_write(hdev,13,Delay_ext);
+ }
+ else
+ {
+ ret=CAMAC_register_write(hdev,8,Data);
+ ret = CAMAC_register_read(hdev,13,&Data);
+ Delay_ext= (Data & 0x0000ffff);
+ Delay_ext+= (delay & 0xffff0000);
+ internal = gate * 0x10000;
+ Data = internal + (delay & 0xffff);
+// Set coarse delay in DGG_Extended register
+ ret=CAMAC_register_write(hdev,13,Delay_ext);
+ }
+ return 1;
+}
+
+/*
+******** CAMAC_LED_settings ************************
+
+ Writes a data word to the vmusb LED register
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ LED: The number which corresponds to an LED values are:
+ 1 - for RED LED
+ 2 - for GREEN LED
+ 3 - for Yellow LED
+ code: The LED aource selector code, valid values for each LED
+ are listed in the manual
+ invert: to invert the LED lighting
+ latch: sets LED latch bit
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_LED_settings(usb_dev_handle *hdev, int LED, int code, int invert, int latch)
+{
+
+ short ret;
+// long internal;
+ long Data;
+
+ if( (LED <1) ||(LED > 3) || (code < 0) || (code > 7))
+ return -1;
+
+ CAMAC_register_read(hdev,4,&Data);
+
+ if(LED == 1)
+ {
+ Data = Data & 0xFFFF00;
+ Data = Data | code;
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x30;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x10;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x20;
+ }
+ if(LED == 2)
+ {
+ Data = Data & 0xFF00FF;
+ Data = Data | (code * 0x0100);
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x3000;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x1000;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x2000;
+ }
+ if(LED == 3)
+ {
+ Data = Data & 0x00FFFF;
+ Data = Data | (code * 0x10000);
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x300000;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x100000;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x200000;
+ }
+ ret = CAMAC_register_write(hdev, 4, Data);
+ return ret;
+}
+
+/*
+******** CAMAC_Output_settings ************************
+
+ Writes a data word to the vmusb LED register
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Channel: The number which corresponds to an output:
+ 1 - for Output 1
+ 2 - for Output 2
+ 3 - for Output 3
+ code: The Output selector code, valid values
+ are listed in the manual
+ invert: to invert the output
+ latch: sets latch bit
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_Output_settings(usb_dev_handle *hdev, int Channel, int code, int invert, int latch)
+{
+ short ret;
+// long internal;
+ long Data;
+
+ if( (Channel <1) ||(Channel > 3) || (code < 0) || (code > 7))
+ return -1;
+
+ CAMAC_register_read(hdev,5,&Data);
+
+ if(Channel == 1)
+ {
+ Data = Data & 0xFFFF00;
+ Data = Data | code;
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x30;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x10;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x20;
+ }
+ if(Channel == 2)
+ {
+ Data = Data & 0xFF00FF;
+ Data = Data | (code * 0x0100);
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x3000;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x1000;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x2000;
+ }
+ if(Channel == 3)
+ {
+ Data = Data & 0x00FFFF;
+ Data = Data | (code * 0x10000);
+ if (invert == 1 && latch == 1)
+ Data = Data | 0x300000;
+ if (invert == 1 && latch == 0)
+ Data = Data | 0x100000;
+ if (invert == 0 && latch == 1)
+ Data = Data | 0x200000;
+ }
+ ret = CAMAC_register_write(hdev, 5, Data);
+ return ret;
+}
+
+/*
+******** CAMAC_write_LAM_mask ************************
+
+ Writes the data word to the LAM mask register
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Data: LAM mask to write
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_write_LAM_mask(usb_dev_handle *hdev, long Data)
+{
+ short ret;
+ ret = CAMAC_register_write(hdev, 9, Data);
+
+ return ret;
+}
+
+/*
+******** CAMAC_read_LAM_mask ************************
+
+ Writes the data word to the LAM mask register
+
+ Parameters:
+ hdev: USB devcie handle returned from an open function
+ Data: LAM mask to write
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_read_LAM_mask(usb_dev_handle *hdev, long *Data)
+{
+ long intbuf[4];
+ int ret;
+ int N = 25;
+ int F = 0;
+ int A = 9;
+
+ // CAMAC direct read function
+ intbuf[0]=1;
+ intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Data=intbuf[0] + (intbuf[1] & 255) * 0x10000;
+ return ret;
+}
+
+
+//******************************************************//
+//**************** EZ_CAMAC Functions ******************//
+//******************************************************//
+// The following are functions used to perform simple
+// CAMAC Functions with the CC_USB
+
+
+/*
+******** CAMAC_write ************************
+
+ Performs a CAMAC write using NAF comments
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ N: CAMAC Station Number
+ A: CAMAC Subaddress
+ F: CAMAC Function (16...23)
+ Q: The Q response from the CAMAC dataway
+ X: The comment accepted response from CAMAC dataway
+
+ Returns:
+ Number of bytes written to xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_write(usb_dev_handle *hdev, int N, int A, int F, long Data, int *Q, int *X)
+{
+ long intbuf[4];
+ int ret;
+// CAMAC direct write function
+ intbuf[0]=1;
+ intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
+ if ((F > 15) && (F < 24))
+ {
+ intbuf[0]=3;
+ intbuf[2]=(Data & 0xffff);
+ intbuf[3]=((Data >>16) & 255);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ *Q = (intbuf[0] & 1);
+ *X = ((intbuf[0] >> 1) & 1);
+ }
+ return ret;
+}
+
+/*
+******** CAMAC_read ************************
+
+ Performs a CAMAC read using NAF comments
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+ N: CAMAC Station Number
+ A: CAMAC Subaddress
+ F: CAMAC Function (F<16 or F>23)
+ Q: The Q response from the CAMAC dataway
+ X: The comment accepted response from CAMAC dataway
+
+ Returns:
+ Number of bytes read from xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_read(usb_dev_handle *hdev, int N, int A, int F, long *Data, int *Q, int *X)
+{
+ long intbuf[4];
+ int ret;
+ // CAMAC direct read function
+ intbuf[0]=1;
+ intbuf[1]=(long)(F+A*32+N*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ if ((F < 16) || (F >23))
+ {
+ *Data=intbuf[0] + (intbuf[1] & 255) * 0x10000; //24-bit word
+ *Q = ((intbuf[1] >> 8) & 1);
+ *X = ((intbuf[1] >> 9) & 1);
+ }
+ return ret;
+}
+
+/*
+******** CAMAC_Z ************************
+
+ Performs a CAMAC init
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+
+ Returns:
+ Number of bytes written to xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_Z(usb_dev_handle *hdev)
+{
+ long intbuf[4];
+ int ret;
+// CAMAC Z = N(28) A(8) F(29)
+ intbuf[0]=1;
+ intbuf[1]=(long)(29+8*32+28*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+/*
+******** CAMAC_C ************************
+
+ Performs a CAMAC clear
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+
+ Returns:
+ Number of bytes written to xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_C(usb_dev_handle *hdev)
+{
+ long intbuf[4];
+ int ret;
+ intbuf[0]=1;
+ intbuf[1]=(long)(29+9*32+28*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+/*
+******** CAMAC_I ************************
+
+ Set CAMAC inhibit
+
+ Parameters:
+ hdev: USB device handle returned from an open function
+
+ Returns:
+ Number of bytes written to xxusb when successful
+ Upon failure, a negative number
+*/
+short CAMAC_I(usb_dev_handle *hdev, int inhibit)
+{
+ long intbuf[4];
+ int ret;
+ intbuf[0]=1;
+ if (inhibit) intbuf[1]=(long)(24+9*32+29*512 + 0x4000);
+ else intbuf[1]=(long)(26+9*32+29*512 + 0x4000);
+ ret = xxusb_stack_execute(hdev, intbuf);
+ return ret;
+}
+
+
Index: sipmscan/trunk_v0.9/mpod/WIENER-CRATE-MIB.txt
===================================================================
--- sipmscan/trunk_v0.9/mpod/WIENER-CRATE-MIB.txt (nonexistent)
+++ sipmscan/trunk_v0.9/mpod/WIENER-CRATE-MIB.txt (revision 145)
@@ -0,0 +1,1578 @@
+----------------------------------------------------------------------------------------------------
+-- $HeadURL: http://svn.wiener-d.com/src/enet/trunk/mibs/WIENER-CRATE-MIB.txt $
+-- $LastChangedDate: 2008-11-27 12:00:00 +0100 (Fr, 21. Nov 2008) $
+-- $LastChangedRevision: 617 / 510 $
+-- $LastChangedBy: koester (roemer)$
+-- Copyright © 2005-2007 W-IE-NE-R Plein & Baus GmbH, Burscheid, Germany
+----------------------------------------------------------------------------------------------------
+WIENER-CRATE-MIB DEFINITIONS ::= BEGIN
+
+IMPORTS
+ OBJECT-TYPE, MODULE-IDENTITY, OBJECT-IDENTITY,
+ Integer32, Opaque, enterprises
+ FROM SNMPv2-SMI
+
+ TEXTUAL-CONVENTION, DisplayString
+ FROM SNMPv2-TC
+
+-- Float
+-- FROM NET-SNMP-TC
+-- Float
+-- FROM UCD-SNMP-MIB
+ ;
+
+
+
+
+wiener MODULE-IDENTITY
+ LAST-UPDATED "200810090000Z" -- October 9, 2008
+ ORGANIZATION "WIENER Plein & Baus GmbH"
+ CONTACT-INFO "
+ postal: WIENER Plein & Baus GmbH
+ Mullersbaum 20
+ D-51399 Burscheid
+ Germany
+
+ email: info@wiener-d.com
+
+ "
+
+ DESCRIPTION
+ "Introduction of the communication.can branch.
+ "
+
+
+ REVISION "200805060000Z" -- May 6, 2008
+ DESCRIPTION
+ "Introduction of the signal branch.
+ "
+
+ REVISION "200804150000Z" -- April 15, 2008
+ DESCRIPTION
+ "Enlargement of u0..u11 -> u0..u1999
+ "
+
+ REVISION "200804100000Z" -- April 10, 2008
+ DESCRIPTION
+ "This revision uses again Integer32 instead of Counter32.
+ "
+
+ REVISION "200804020000Z" -- April 02, 2008
+ DESCRIPTION
+ "This revision modifies the syntax of this file to be complient with smilint.
+ "
+
+ REVISION "200709100000Z"
+ DESCRIPTION
+ "This revision introduces new OIDs for debug functionality:
+ sysDebugMemory8, sysDebugMemory16 and sysDebugMemory32.
+ "
+
+ REVISION "200703160000Z"
+ DESCRIPTION
+ "This revision introduces new OIDs for slew control:
+ outputVoltageRiseRate and outputVoltageFallRate.
+ "
+
+ REVISION "200502010000Z"
+ DESCRIPTION
+ "This revision introduces new OIDs for group managment:
+ groupTable
+ "
+
+ REVISION "200406280000Z"
+ DESCRIPTION
+ "WIENER Crate MIB, actual Firmware: UEL6E 4.02.
+ Initial Version.
+ "
+
+ ::= { enterprises 19947 }
+
+
+-------------------------------------------------------------------------------
+-- Define the Float Textual Convention
+-- This definition was written by David Perkins.
+--
+Float ::= TEXTUAL-CONVENTION
+ STATUS current
+ DESCRIPTION
+ "A single precision floating-point number. The semantics
+ and encoding are identical for type 'single' defined in
+ IEEE Standard for Binary Floating-Point,
+ ANSI/IEEE Std 754-1985.
+ The value is restricted to the BER serialization of
+ the following ASN.1 type:
+ FLOATTYPE ::= [120] IMPLICIT FloatType
+ (note: the value 120 is the sum of '30'h and '48'h)
+ The BER serialization of the length for values of
+ this type must use the definite length, short
+ encoding form.
+
+ For example, the BER serialization of value 123
+ of type FLOATTYPE is '9f780442f60000'h. (The tag
+ is '9f78'h; the length is '04'h; and the value is
+ '42f60000'h.) The BER serialization of value
+ '9f780442f60000'h of data type Opaque is
+ '44079f780442f60000'h. (The tag is '44'h; the length
+ is '07'h; and the value is '9f780442f60000'h."
+ SYNTAX Opaque (SIZE (7))
+
+-------------------------------------------------------------------------------
+-- crate
+-------------------------------------------------------------------------------
+
+crate OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "SNMP control for electronic crates. A crate is a complete electronic system and
+ consists of the mechanical rack, a power supply, a fan tray and a backplane.
+ All this things are necessary to provide an adequate housing for electronic
+ modules (e.g. VME CPU's)"
+ ::= { wiener 1 }
+
+--Crate ::= SEQUENCE {
+-- system System,
+-- input Input,
+-- output Output,
+-- sensor Sensor,
+-- communication Communication,
+-- powersupply Powersupply,
+-- fantray Fantray,
+-- rack Rack
+--}
+
+system OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "A collection of objects which affect the complete crate"
+ ::= { crate 1 }
+
+
+input OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are associated with the power input of the crate"
+ ::= { crate 2 }
+
+output OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are associated with the power output of the crate"
+ ::= { crate 3 }
+
+sensor OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are associated with temperature sensors in the crate"
+ ::= { crate 4 }
+
+communication OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which affect the remote control of the crate"
+ ::= { crate 5 }
+
+powersupply OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are specific for the power supply of the crate"
+ ::= { crate 6 }
+
+fantray OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are specific for the fan tray of the crate"
+ ::= { crate 7 }
+
+rack OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are specific for the crate (BIN) of the crate"
+ ::= { crate 8 }
+
+signal OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "All objects which are associated with analog/digtal input/output in the crate"
+ ::= { crate 9 }
+
+
+-------------------------------------------------------------------------------
+-- system
+-------------------------------------------------------------------------------
+System ::= SEQUENCE {
+ sysMainSwitch INTEGER,
+ sysStatus BITS,
+ sysVmeSysReset INTEGER,
+ sysDebugMemory8 Integer32,
+ sysDebugMemory16 Integer32,
+ sysDebugMemory32 Integer32
+}
+
+sysMainSwitch OBJECT-TYPE
+ SYNTAX INTEGER { off (0), on (1) }
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Read: An enumerated value which shows the current state of
+ the crates main switch.
+ Write: Try to switch the complete crate ON or OFF.
+ Only the values ON or OFF are allowed."
+ ::= { system 1 }
+
+sysStatus OBJECT-TYPE
+ SYNTAX BITS {
+ mainOn (0) ,
+ mainInhibit (1) ,
+ localControlOnly (2) ,
+ inputFailure (3) ,
+ outputFailure (4) ,
+ fantrayFailure (5) ,
+ sensorFailure (6),
+ vmeSysfail (7),
+ plugAndPlayIncompatible (8)
+ }
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "A bit string which shows the status (health) of the complete crate.
+ If a bit is set (1), the explanation is satisfied
+ mainOn (0), system is switched on, individual outputs may be controlled by their specific ON/INHIBIT
+ mainInhibit(1), external (hardware-)inhibit of the complete system
+ localControlOnly (2), local control only (CANBUS write access denied)
+ inputFailure (3), any input failure (e.g. power fail)
+ outputFailure (4), any output failure, details in outputTable
+ fantrayFailure (5), fantray failure
+ sensorFailure (6), temperature of the external sensors too high
+ VmeSysfail(7), VME SYSFAIL signal is active
+ plugAndPlayIncompatible (8) wrong power supply and rack connected
+ "
+ ::= { system 2 }
+
+
+-- ERROR_BIN_CHECKSUM(?),
+
+
+
+
+
+sysVmeSysReset OBJECT-TYPE
+ SYNTAX INTEGER { trigger (1) }
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Read: Always 0.
+ Write: Trigger the generation of the VME SYSRESET signal.
+ This signal will be active for a time of 200 ms"
+ ::= { system 3 }
+
+sysDebugMemory8 OBJECT-TYPE
+ SYNTAX Integer32 (0..255)
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Debug 16-bit memory access."
+ ::= { system 1024 }
+
+sysDebugMemory16 OBJECT-TYPE
+ SYNTAX Integer32 (0..65535)
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Debug 16-bit memory access."
+ ::= { system 1025 }
+
+sysDebugMemory32 OBJECT-TYPE
+ SYNTAX Integer32 (-2147483648..2147483647)
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Debug 32-bit memory access."
+ ::= { system 1026 }
+
+-------------------------------------------------------------------------------
+-- input
+-------------------------------------------------------------------------------
+-- reserved, possible entries:
+-- inputSetPfcVoltage
+-- inputMesPowerFail
+-- inputMesVoltage
+-- inputMesCurrent
+-- inputMesPower
+-- inputMesTemperature
+-------------------------------------------------------------------------------
+-- output
+-------------------------------------------------------------------------------
+--Output ::= SEQUENCE {
+-- outputNumber Integer32,
+-- outputTable OutputTable,
+-- groupsNumber Integer32,
+-- groupsTable GroupsTable
+-- ??TotalPower
+--}
+
+outputNumber OBJECT-TYPE
+ SYNTAX Integer32 (0..1999)
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The number of output channels of the crate."
+ ::= { output 1 }
+
+outputTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF OutputEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A list of output entries."
+ ::= { output 2 }
+
+groupsNumber OBJECT-TYPE
+ SYNTAX Integer32 (1..1999)
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The number of output groups of the crate."
+ ::= { output 3 }
+
+groupsTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF GroupsEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A list of output groups entries."
+ ::= { output 4 }
+
+outputEntry OBJECT-TYPE
+ SYNTAX OutputEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A table row"
+ INDEX { outputIndex }
+ ::= { outputTable 1 }
+
+OutputEntry ::= SEQUENCE {
+ outputIndex INTEGER,
+ outputName DisplayString,
+ outputGroup INTEGER,
+ outputStatus BITS,
+ outputMeasurementSenseVoltage Float,
+ outputMeasurementTerminalVoltage Float,
+ outputMeasurementCurrent Float,
+ outputMeasurementTemperature INTEGER,
+
+ outputSwitch INTEGER,
+ outputVoltage Float,
+ outputAdjustVoltage Integer32,
+ outputCurrent Float,
+
+ outputVoltageRiseRate Float,
+ outputVoltageFallRate Float,
+
+ outputSupervisionBehavior Integer32,
+ outputSupervisionMinSenseVoltage Float,
+ outputSupervisionMaxSenseVoltage Float,
+ outputSupervisionMaxTerminalVoltage Float,
+ outputSupervisionMaxCurrent Float,
+-- outputSupervisionMaxTemperature Integer32,
+
+ outputConfigMaxSenseVoltage Float,
+ outputConfigMaxTerminalVoltage Float,
+ outputConfigMaxCurrent Float,
+ outputSupervisionMaxPower Float,
+
+ outputCurrentRiseRate Float,
+ outputCurrentFallRate Float,
+ outputTripTimeMaxCurrent INTEGER
+ }
+
+
+outputIndex OBJECT-TYPE
+ SYNTAX INTEGER {
+ u0(1),u1(2),u2(3),u3(4),u4(5),u5(6),u6(7),u7(8),u8(9),u9(10),
+ u10(11),u11(12),u12(13),u13(14),u14(15),u15(16),u16(17),u17(18),u18(19),u19(20),
+ u20(21),u21(22),u22(23),u23(24),u24(25),u25(26),u26(27),u27(28),u28(29),u29(30),
+ u30(31),u31(32),u32(33),u33(34),u34(35),u35(36),u36(37),u37(38),u38(39),u39(40),
+ u40(41),u41(42),u42(43),u43(44),u44(45),u45(46),u46(47),u47(48),u48(49),u49(50),
+ u50(51),u51(52),u52(53),u53(54),u54(55),u55(56),u56(57),u57(58),u58(59),u59(60),
+ u60(61),u61(62),u62(63),u63(64),u64(65),u65(66),u66(67),u67(68),u68(69),u69(70),
+ u70(71),u71(72),u72(73),u73(74),u74(75),u75(76),u76(77),u77(78),u78(79),u79(80),
+ u80(81),u81(82),u82(83),u83(84),u84(85),u85(86),u86(87),u87(88),u88(89),u89(90),
+ u90(91),u91(92),u92(93),u93(94),u94(95),u95(96),u96(97),u97(98),u98(99),u99(100),
+ u100(101),u101(102),u102(103),u103(104),u104(105),u105(106),u106(107),u107(108),u108(109),u109(110),
+ u110(111),u111(112),u112(113),u113(114),u114(115),u115(116),u116(117),u117(118),u118(119),u119(120),
+ u120(121),u121(122),u122(123),u123(124),u124(125),u125(126),u126(127),u127(128),u128(129),u129(130),
+ u130(131),u131(132),u132(133),u133(134),u134(135),u135(136),u136(137),u137(138),u138(139),u139(140),
+ u140(141),u141(142),u142(143),u143(144),u144(145),u145(146),u146(147),u147(148),u148(149),u149(150),
+ u150(151),u151(152),u152(153),u153(154),u154(155),u155(156),u156(157),u157(158),u158(159),u159(160),
+ u160(161),u161(162),u162(163),u163(164),u164(165),u165(166),u166(167),u167(168),u168(169),u169(170),
+ u170(171),u171(172),u172(173),u173(174),u174(175),u175(176),u176(177),u177(178),u178(179),u179(180),
+ u180(181),u181(182),u182(183),u183(184),u184(185),u185(186),u186(187),u187(188),u188(189),u189(190),
+ u190(191),u191(192),u192(193),u193(194),u194(195),u195(196),u196(197),u197(198),u198(199),u199(200),
+ u200(201),u201(202),u202(203),u203(204),u204(205),u205(206),u206(207),u207(208),u208(209),u209(210),
+ u210(211),u211(212),u212(213),u213(214),u214(215),u215(216),u216(217),u217(218),u218(219),u219(220),
+ u220(221),u221(222),u222(223),u223(224),u224(225),u225(226),u226(227),u227(228),u228(229),u229(230),
+ u230(231),u231(232),u232(233),u233(234),u234(235),u235(236),u236(237),u237(238),u238(239),u239(240),
+ u240(241),u241(242),u242(243),u243(244),u244(245),u245(246),u246(247),u247(248),u248(249),u249(250),
+ u250(251),u251(252),u252(253),u253(254),u254(255),u255(256),u256(257),u257(258),u258(259),u259(260),
+ u260(261),u261(262),u262(263),u263(264),u264(265),u265(266),u266(267),u267(268),u268(269),u269(270),
+ u270(271),u271(272),u272(273),u273(274),u274(275),u275(276),u276(277),u277(278),u278(279),u279(280),
+ u280(281),u281(282),u282(283),u283(284),u284(285),u285(286),u286(287),u287(288),u288(289),u289(290),
+ u290(291),u291(292),u292(293),u293(294),u294(295),u295(296),u296(297),u297(298),u298(299),u299(300),
+ u300(301),u301(302),u302(303),u303(304),u304(305),u305(306),u306(307),u307(308),u308(309),u309(310),
+ u310(311),u311(312),u312(313),u313(314),u314(315),u315(316),u316(317),u317(318),u318(319),u319(320),
+ u320(321),u321(322),u322(323),u323(324),u324(325),u325(326),u326(327),u327(328),u328(329),u329(330),
+ u330(331),u331(332),u332(333),u333(334),u334(335),u335(336),u336(337),u337(338),u338(339),u339(340),
+ u340(341),u341(342),u342(343),u343(344),u344(345),u345(346),u346(347),u347(348),u348(349),u349(350),
+ u350(351),u351(352),u352(353),u353(354),u354(355),u355(356),u356(357),u357(358),u358(359),u359(360),
+ u360(361),u361(362),u362(363),u363(364),u364(365),u365(366),u366(367),u367(368),u368(369),u369(370),
+ u370(371),u371(372),u372(373),u373(374),u374(375),u375(376),u376(377),u377(378),u378(379),u379(380),
+ u380(381),u381(382),u382(383),u383(384),u384(385),u385(386),u386(387),u387(388),u388(389),u389(390),
+ u390(391),u391(392),u392(393),u393(394),u394(395),u395(396),u396(397),u397(398),u398(399),u399(400),
+ u400(401),u401(402),u402(403),u403(404),u404(405),u405(406),u406(407),u407(408),u408(409),u409(410),
+ u410(411),u411(412),u412(413),u413(414),u414(415),u415(416),u416(417),u417(418),u418(419),u419(420),
+ u420(421),u421(422),u422(423),u423(424),u424(425),u425(426),u426(427),u427(428),u428(429),u429(430),
+ u430(431),u431(432),u432(433),u433(434),u434(435),u435(436),u436(437),u437(438),u438(439),u439(440),
+ u440(441),u441(442),u442(443),u443(444),u444(445),u445(446),u446(447),u447(448),u448(449),u449(450),
+ u450(451),u451(452),u452(453),u453(454),u454(455),u455(456),u456(457),u457(458),u458(459),u459(460),
+ u460(461),u461(462),u462(463),u463(464),u464(465),u465(466),u466(467),u467(468),u468(469),u469(470),
+ u470(471),u471(472),u472(473),u473(474),u474(475),u475(476),u476(477),u477(478),u478(479),u479(480),
+ u480(481),u481(482),u482(483),u483(484),u484(485),u485(486),u486(487),u487(488),u488(489),u489(490),
+ u490(491),u491(492),u492(493),u493(494),u494(495),u495(496),u496(497),u497(498),u498(499),u499(500),
+ u500(501),u501(502),u502(503),u503(504),u504(505),u505(506),u506(507),u507(508),u508(509),u509(510),
+ u510(511),u511(512),u512(513),u513(514),u514(515),u515(516),u516(517),u517(518),u518(519),u519(520),
+ u520(521),u521(522),u522(523),u523(524),u524(525),u525(526),u526(527),u527(528),u528(529),u529(530),
+ u530(531),u531(532),u532(533),u533(534),u534(535),u535(536),u536(537),u537(538),u538(539),u539(540),
+ u540(541),u541(542),u542(543),u543(544),u544(545),u545(546),u546(547),u547(548),u548(549),u549(550),
+ u550(551),u551(552),u552(553),u553(554),u554(555),u555(556),u556(557),u557(558),u558(559),u559(560),
+ u560(561),u561(562),u562(563),u563(564),u564(565),u565(566),u566(567),u567(568),u568(569),u569(570),
+ u570(571),u571(572),u572(573),u573(574),u574(575),u575(576),u576(577),u577(578),u578(579),u579(580),
+ u580(581),u581(582),u582(583),u583(584),u584(585),u585(586),u586(587),u587(588),u588(589),u589(590),
+ u590(591),u591(592),u592(593),u593(594),u594(595),u595(596),u596(597),u597(598),u598(599),u599(600),
+ u600(601),u601(602),u602(603),u603(604),u604(605),u605(606),u606(607),u607(608),u608(609),u609(610),
+ u610(611),u611(612),u612(613),u613(614),u614(615),u615(616),u616(617),u617(618),u618(619),u619(620),
+ u620(621),u621(622),u622(623),u623(624),u624(625),u625(626),u626(627),u627(628),u628(629),u629(630),
+ u630(631),u631(632),u632(633),u633(634),u634(635),u635(636),u636(637),u637(638),u638(639),u639(640),
+ u640(641),u641(642),u642(643),u643(644),u644(645),u645(646),u646(647),u647(648),u648(649),u649(650),
+ u650(651),u651(652),u652(653),u653(654),u654(655),u655(656),u656(657),u657(658),u658(659),u659(660),
+ u660(661),u661(662),u662(663),u663(664),u664(665),u665(666),u666(667),u667(668),u668(669),u669(670),
+ u670(671),u671(672),u672(673),u673(674),u674(675),u675(676),u676(677),u677(678),u678(679),u679(680),
+ u680(681),u681(682),u682(683),u683(684),u684(685),u685(686),u686(687),u687(688),u688(689),u689(690),
+ u690(691),u691(692),u692(693),u693(694),u694(695),u695(696),u696(697),u697(698),u698(699),u699(700),
+ u700(701),u701(702),u702(703),u703(704),u704(705),u705(706),u706(707),u707(708),u708(709),u709(710),
+ u710(711),u711(712),u712(713),u713(714),u714(715),u715(716),u716(717),u717(718),u718(719),u719(720),
+ u720(721),u721(722),u722(723),u723(724),u724(725),u725(726),u726(727),u727(728),u728(729),u729(730),
+ u730(731),u731(732),u732(733),u733(734),u734(735),u735(736),u736(737),u737(738),u738(739),u739(740),
+ u740(741),u741(742),u742(743),u743(744),u744(745),u745(746),u746(747),u747(748),u748(749),u749(750),
+ u750(751),u751(752),u752(753),u753(754),u754(755),u755(756),u756(757),u757(758),u758(759),u759(760),
+ u760(761),u761(762),u762(763),u763(764),u764(765),u765(766),u766(767),u767(768),u768(769),u769(770),
+ u770(771),u771(772),u772(773),u773(774),u774(775),u775(776),u776(777),u777(778),u778(779),u779(780),
+ u780(781),u781(782),u782(783),u783(784),u784(785),u785(786),u786(787),u787(788),u788(789),u789(790),
+ u790(791),u791(792),u792(793),u793(794),u794(795),u795(796),u796(797),u797(798),u798(799),u799(800),
+ u800(801),u801(802),u802(803),u803(804),u804(805),u805(806),u806(807),u807(808),u808(809),u809(810),
+ u810(811),u811(812),u812(813),u813(814),u814(815),u815(816),u816(817),u817(818),u818(819),u819(820),
+ u820(821),u821(822),u822(823),u823(824),u824(825),u825(826),u826(827),u827(828),u828(829),u829(830),
+ u830(831),u831(832),u832(833),u833(834),u834(835),u835(836),u836(837),u837(838),u838(839),u839(840),
+ u840(841),u841(842),u842(843),u843(844),u844(845),u845(846),u846(847),u847(848),u848(849),u849(850),
+ u850(851),u851(852),u852(853),u853(854),u854(855),u855(856),u856(857),u857(858),u858(859),u859(860),
+ u860(861),u861(862),u862(863),u863(864),u864(865),u865(866),u866(867),u867(868),u868(869),u869(870),
+ u870(871),u871(872),u872(873),u873(874),u874(875),u875(876),u876(877),u877(878),u878(879),u879(880),
+ u880(881),u881(882),u882(883),u883(884),u884(885),u885(886),u886(887),u887(888),u888(889),u889(890),
+ u890(891),u891(892),u892(893),u893(894),u894(895),u895(896),u896(897),u897(898),u898(899),u899(900),
+ u900(901),u901(902),u902(903),u903(904),u904(905),u905(906),u906(907),u907(908),u908(909),u909(910),
+ u910(911),u911(912),u912(913),u913(914),u914(915),u915(916),u916(917),u917(918),u918(919),u919(920),
+ u920(921),u921(922),u922(923),u923(924),u924(925),u925(926),u926(927),u927(928),u928(929),u929(930),
+ u930(931),u931(932),u932(933),u933(934),u934(935),u935(936),u936(937),u937(938),u938(939),u939(940),
+ u940(941),u941(942),u942(943),u943(944),u944(945),u945(946),u946(947),u947(948),u948(949),u949(950),
+ u950(951),u951(952),u952(953),u953(954),u954(955),u955(956),u956(957),u957(958),u958(959),u959(960),
+ u960(961),u961(962),u962(963),u963(964),u964(965),u965(966),u966(967),u967(968),u968(969),u969(970),
+ u970(971),u971(972),u972(973),u973(974),u974(975),u975(976),u976(977),u977(978),u978(979),u979(980),
+ u980(981),u981(982),u982(983),u983(984),u984(985),u985(986),u986(987),u987(988),u988(989),u989(990),
+ u990(991),u991(992),u992(993),u993(994),u994(995),u995(996),u996(997),u997(998),u998(999),u999(1000),
+ u1000(1001),u1001(1002),u1002(1003),u1003(1004),u1004(1005),u1005(1006),u1006(1007),u1007(1008),u1008(1009),u1009(1010),
+ u1010(1011),u1011(1012),u1012(1013),u1013(1014),u1014(1015),u1015(1016),u1016(1017),u1017(1018),u1018(1019),u1019(1020),
+ u1020(1021),u1021(1022),u1022(1023),u1023(1024),u1024(1025),u1025(1026),u1026(1027),u1027(1028),u1028(1029),u1029(1030),
+ u1030(1031),u1031(1032),u1032(1033),u1033(1034),u1034(1035),u1035(1036),u1036(1037),u1037(1038),u1038(1039),u1039(1040),
+ u1040(1041),u1041(1042),u1042(1043),u1043(1044),u1044(1045),u1045(1046),u1046(1047),u1047(1048),u1048(1049),u1049(1050),
+ u1050(1051),u1051(1052),u1052(1053),u1053(1054),u1054(1055),u1055(1056),u1056(1057),u1057(1058),u1058(1059),u1059(1060),
+ u1060(1061),u1061(1062),u1062(1063),u1063(1064),u1064(1065),u1065(1066),u1066(1067),u1067(1068),u1068(1069),u1069(1070),
+ u1070(1071),u1071(1072),u1072(1073),u1073(1074),u1074(1075),u1075(1076),u1076(1077),u1077(1078),u1078(1079),u1079(1080),
+ u1080(1081),u1081(1082),u1082(1083),u1083(1084),u1084(1085),u1085(1086),u1086(1087),u1087(1088),u1088(1089),u1089(1090),
+ u1090(1091),u1091(1092),u1092(1093),u1093(1094),u1094(1095),u1095(1096),u1096(1097),u1097(1098),u1098(1099),u1099(1100),
+ u1100(1101),u1101(1102),u1102(1103),u1103(1104),u1104(1105),u1105(1106),u1106(1107),u1107(1108),u1108(1109),u1109(1110),
+ u1110(1111),u1111(1112),u1112(1113),u1113(1114),u1114(1115),u1115(1116),u1116(1117),u1117(1118),u1118(1119),u1119(1120),
+ u1120(1121),u1121(1122),u1122(1123),u1123(1124),u1124(1125),u1125(1126),u1126(1127),u1127(1128),u1128(1129),u1129(1130),
+ u1130(1131),u1131(1132),u1132(1133),u1133(1134),u1134(1135),u1135(1136),u1136(1137),u1137(1138),u1138(1139),u1139(1140),
+ u1140(1141),u1141(1142),u1142(1143),u1143(1144),u1144(1145),u1145(1146),u1146(1147),u1147(1148),u1148(1149),u1149(1150),
+ u1150(1151),u1151(1152),u1152(1153),u1153(1154),u1154(1155),u1155(1156),u1156(1157),u1157(1158),u1158(1159),u1159(1160),
+ u1160(1161),u1161(1162),u1162(1163),u1163(1164),u1164(1165),u1165(1166),u1166(1167),u1167(1168),u1168(1169),u1169(1170),
+ u1170(1171),u1171(1172),u1172(1173),u1173(1174),u1174(1175),u1175(1176),u1176(1177),u1177(1178),u1178(1179),u1179(1180),
+ u1180(1181),u1181(1182),u1182(1183),u1183(1184),u1184(1185),u1185(1186),u1186(1187),u1187(1188),u1188(1189),u1189(1190),
+ u1190(1191),u1191(1192),u1192(1193),u1193(1194),u1194(1195),u1195(1196),u1196(1197),u1197(1198),u1198(1199),u1199(1200),
+ u1200(1201),u1201(1202),u1202(1203),u1203(1204),u1204(1205),u1205(1206),u1206(1207),u1207(1208),u1208(1209),u1209(1210),
+ u1210(1211),u1211(1212),u1212(1213),u1213(1214),u1214(1215),u1215(1216),u1216(1217),u1217(1218),u1218(1219),u1219(1220),
+ u1220(1221),u1221(1222),u1222(1223),u1223(1224),u1224(1225),u1225(1226),u1226(1227),u1227(1228),u1228(1229),u1229(1230),
+ u1230(1231),u1231(1232),u1232(1233),u1233(1234),u1234(1235),u1235(1236),u1236(1237),u1237(1238),u1238(1239),u1239(1240),
+ u1240(1241),u1241(1242),u1242(1243),u1243(1244),u1244(1245),u1245(1246),u1246(1247),u1247(1248),u1248(1249),u1249(1250),
+ u1250(1251),u1251(1252),u1252(1253),u1253(1254),u1254(1255),u1255(1256),u1256(1257),u1257(1258),u1258(1259),u1259(1260),
+ u1260(1261),u1261(1262),u1262(1263),u1263(1264),u1264(1265),u1265(1266),u1266(1267),u1267(1268),u1268(1269),u1269(1270),
+ u1270(1271),u1271(1272),u1272(1273),u1273(1274),u1274(1275),u1275(1276),u1276(1277),u1277(1278),u1278(1279),u1279(1280),
+ u1280(1281),u1281(1282),u1282(1283),u1283(1284),u1284(1285),u1285(1286),u1286(1287),u1287(1288),u1288(1289),u1289(1290),
+ u1290(1291),u1291(1292),u1292(1293),u1293(1294),u1294(1295),u1295(1296),u1296(1297),u1297(1298),u1298(1299),u1299(1300),
+ u1300(1301),u1301(1302),u1302(1303),u1303(1304),u1304(1305),u1305(1306),u1306(1307),u1307(1308),u1308(1309),u1309(1310),
+ u1310(1311),u1311(1312),u1312(1313),u1313(1314),u1314(1315),u1315(1316),u1316(1317),u1317(1318),u1318(1319),u1319(1320),
+ u1320(1321),u1321(1322),u1322(1323),u1323(1324),u1324(1325),u1325(1326),u1326(1327),u1327(1328),u1328(1329),u1329(1330),
+ u1330(1331),u1331(1332),u1332(1333),u1333(1334),u1334(1335),u1335(1336),u1336(1337),u1337(1338),u1338(1339),u1339(1340),
+ u1340(1341),u1341(1342),u1342(1343),u1343(1344),u1344(1345),u1345(1346),u1346(1347),u1347(1348),u1348(1349),u1349(1350),
+ u1350(1351),u1351(1352),u1352(1353),u1353(1354),u1354(1355),u1355(1356),u1356(1357),u1357(1358),u1358(1359),u1359(1360),
+ u1360(1361),u1361(1362),u1362(1363),u1363(1364),u1364(1365),u1365(1366),u1366(1367),u1367(1368),u1368(1369),u1369(1370),
+ u1370(1371),u1371(1372),u1372(1373),u1373(1374),u1374(1375),u1375(1376),u1376(1377),u1377(1378),u1378(1379),u1379(1380),
+ u1380(1381),u1381(1382),u1382(1383),u1383(1384),u1384(1385),u1385(1386),u1386(1387),u1387(1388),u1388(1389),u1389(1390),
+ u1390(1391),u1391(1392),u1392(1393),u1393(1394),u1394(1395),u1395(1396),u1396(1397),u1397(1398),u1398(1399),u1399(1400),
+ u1400(1401),u1401(1402),u1402(1403),u1403(1404),u1404(1405),u1405(1406),u1406(1407),u1407(1408),u1408(1409),u1409(1410),
+ u1410(1411),u1411(1412),u1412(1413),u1413(1414),u1414(1415),u1415(1416),u1416(1417),u1417(1418),u1418(1419),u1419(1420),
+ u1420(1421),u1421(1422),u1422(1423),u1423(1424),u1424(1425),u1425(1426),u1426(1427),u1427(1428),u1428(1429),u1429(1430),
+ u1430(1431),u1431(1432),u1432(1433),u1433(1434),u1434(1435),u1435(1436),u1436(1437),u1437(1438),u1438(1439),u1439(1440),
+ u1440(1441),u1441(1442),u1442(1443),u1443(1444),u1444(1445),u1445(1446),u1446(1447),u1447(1448),u1448(1449),u1449(1450),
+ u1450(1451),u1451(1452),u1452(1453),u1453(1454),u1454(1455),u1455(1456),u1456(1457),u1457(1458),u1458(1459),u1459(1460),
+ u1460(1461),u1461(1462),u1462(1463),u1463(1464),u1464(1465),u1465(1466),u1466(1467),u1467(1468),u1468(1469),u1469(1470),
+ u1470(1471),u1471(1472),u1472(1473),u1473(1474),u1474(1475),u1475(1476),u1476(1477),u1477(1478),u1478(1479),u1479(1480),
+ u1480(1481),u1481(1482),u1482(1483),u1483(1484),u1484(1485),u1485(1486),u1486(1487),u1487(1488),u1488(1489),u1489(1490),
+ u1490(1491),u1491(1492),u1492(1493),u1493(1494),u1494(1495),u1495(1496),u1496(1497),u1497(1498),u1498(1499),u1499(1500),
+ u1500(1501),u1501(1502),u1502(1503),u1503(1504),u1504(1505),u1505(1506),u1506(1507),u1507(1508),u1508(1509),u1509(1510),
+ u1510(1511),u1511(1512),u1512(1513),u1513(1514),u1514(1515),u1515(1516),u1516(1517),u1517(1518),u1518(1519),u1519(1520),
+ u1520(1521),u1521(1522),u1522(1523),u1523(1524),u1524(1525),u1525(1526),u1526(1527),u1527(1528),u1528(1529),u1529(1530),
+ u1530(1531),u1531(1532),u1532(1533),u1533(1534),u1534(1535),u1535(1536),u1536(1537),u1537(1538),u1538(1539),u1539(1540),
+ u1540(1541),u1541(1542),u1542(1543),u1543(1544),u1544(1545),u1545(1546),u1546(1547),u1547(1548),u1548(1549),u1549(1550),
+ u1550(1551),u1551(1552),u1552(1553),u1553(1554),u1554(1555),u1555(1556),u1556(1557),u1557(1558),u1558(1559),u1559(1560),
+ u1560(1561),u1561(1562),u1562(1563),u1563(1564),u1564(1565),u1565(1566),u1566(1567),u1567(1568),u1568(1569),u1569(1570),
+ u1570(1571),u1571(1572),u1572(1573),u1573(1574),u1574(1575),u1575(1576),u1576(1577),u1577(1578),u1578(1579),u1579(1580),
+ u1580(1581),u1581(1582),u1582(1583),u1583(1584),u1584(1585),u1585(1586),u1586(1587),u1587(1588),u1588(1589),u1589(1590),
+ u1590(1591),u1591(1592),u1592(1593),u1593(1594),u1594(1595),u1595(1596),u1596(1597),u1597(1598),u1598(1599),u1599(1600),
+ u1600(1601),u1601(1602),u1602(1603),u1603(1604),u1604(1605),u1605(1606),u1606(1607),u1607(1608),u1608(1609),u1609(1610),
+ u1610(1611),u1611(1612),u1612(1613),u1613(1614),u1614(1615),u1615(1616),u1616(1617),u1617(1618),u1618(1619),u1619(1620),
+ u1620(1621),u1621(1622),u1622(1623),u1623(1624),u1624(1625),u1625(1626),u1626(1627),u1627(1628),u1628(1629),u1629(1630),
+ u1630(1631),u1631(1632),u1632(1633),u1633(1634),u1634(1635),u1635(1636),u1636(1637),u1637(1638),u1638(1639),u1639(1640),
+ u1640(1641),u1641(1642),u1642(1643),u1643(1644),u1644(1645),u1645(1646),u1646(1647),u1647(1648),u1648(1649),u1649(1650),
+ u1650(1651),u1651(1652),u1652(1653),u1653(1654),u1654(1655),u1655(1656),u1656(1657),u1657(1658),u1658(1659),u1659(1660),
+ u1660(1661),u1661(1662),u1662(1663),u1663(1664),u1664(1665),u1665(1666),u1666(1667),u1667(1668),u1668(1669),u1669(1670),
+ u1670(1671),u1671(1672),u1672(1673),u1673(1674),u1674(1675),u1675(1676),u1676(1677),u1677(1678),u1678(1679),u1679(1680),
+ u1680(1681),u1681(1682),u1682(1683),u1683(1684),u1684(1685),u1685(1686),u1686(1687),u1687(1688),u1688(1689),u1689(1690),
+ u1690(1691),u1691(1692),u1692(1693),u1693(1694),u1694(1695),u1695(1696),u1696(1697),u1697(1698),u1698(1699),u1699(1700),
+ u1700(1701),u1701(1702),u1702(1703),u1703(1704),u1704(1705),u1705(1706),u1706(1707),u1707(1708),u1708(1709),u1709(1710),
+ u1710(1711),u1711(1712),u1712(1713),u1713(1714),u1714(1715),u1715(1716),u1716(1717),u1717(1718),u1718(1719),u1719(1720),
+ u1720(1721),u1721(1722),u1722(1723),u1723(1724),u1724(1725),u1725(1726),u1726(1727),u1727(1728),u1728(1729),u1729(1730),
+ u1730(1731),u1731(1732),u1732(1733),u1733(1734),u1734(1735),u1735(1736),u1736(1737),u1737(1738),u1738(1739),u1739(1740),
+ u1740(1741),u1741(1742),u1742(1743),u1743(1744),u1744(1745),u1745(1746),u1746(1747),u1747(1748),u1748(1749),u1749(1750),
+ u1750(1751),u1751(1752),u1752(1753),u1753(1754),u1754(1755),u1755(1756),u1756(1757),u1757(1758),u1758(1759),u1759(1760),
+ u1760(1761),u1761(1762),u1762(1763),u1763(1764),u1764(1765),u1765(1766),u1766(1767),u1767(1768),u1768(1769),u1769(1770),
+ u1770(1771),u1771(1772),u1772(1773),u1773(1774),u1774(1775),u1775(1776),u1776(1777),u1777(1778),u1778(1779),u1779(1780),
+ u1780(1781),u1781(1782),u1782(1783),u1783(1784),u1784(1785),u1785(1786),u1786(1787),u1787(1788),u1788(1789),u1789(1790),
+ u1790(1791),u1791(1792),u1792(1793),u1793(1794),u1794(1795),u1795(1796),u1796(1797),u1797(1798),u1798(1799),u1799(1800),
+ u1800(1801),u1801(1802),u1802(1803),u1803(1804),u1804(1805),u1805(1806),u1806(1807),u1807(1808),u1808(1809),u1809(1810),
+ u1810(1811),u1811(1812),u1812(1813),u1813(1814),u1814(1815),u1815(1816),u1816(1817),u1817(1818),u1818(1819),u1819(1820),
+ u1820(1821),u1821(1822),u1822(1823),u1823(1824),u1824(1825),u1825(1826),u1826(1827),u1827(1828),u1828(1829),u1829(1830),
+ u1830(1831),u1831(1832),u1832(1833),u1833(1834),u1834(1835),u1835(1836),u1836(1837),u1837(1838),u1838(1839),u1839(1840),
+ u1840(1841),u1841(1842),u1842(1843),u1843(1844),u1844(1845),u1845(1846),u1846(1847),u1847(1848),u1848(1849),u1849(1850),
+ u1850(1851),u1851(1852),u1852(1853),u1853(1854),u1854(1855),u1855(1856),u1856(1857),u1857(1858),u1858(1859),u1859(1860),
+ u1860(1861),u1861(1862),u1862(1863),u1863(1864),u1864(1865),u1865(1866),u1866(1867),u1867(1868),u1868(1869),u1869(1870),
+ u1870(1871),u1871(1872),u1872(1873),u1873(1874),u1874(1875),u1875(1876),u1876(1877),u1877(1878),u1878(1879),u1879(1880),
+ u1880(1881),u1881(1882),u1882(1883),u1883(1884),u1884(1885),u1885(1886),u1886(1887),u1887(1888),u1888(1889),u1889(1890),
+ u1890(1891),u1891(1892),u1892(1893),u1893(1894),u1894(1895),u1895(1896),u1896(1897),u1897(1898),u1898(1899),u1899(1900),
+ u1900(1901),u1901(1902),u1902(1903),u1903(1904),u1904(1905),u1905(1906),u1906(1907),u1907(1908),u1908(1909),u1909(1910),
+ u1910(1911),u1911(1912),u1912(1913),u1913(1914),u1914(1915),u1915(1916),u1916(1917),u1917(1918),u1918(1919),u1919(1920),
+ u1920(1921),u1921(1922),u1922(1923),u1923(1924),u1924(1925),u1925(1926),u1926(1927),u1927(1928),u1928(1929),u1929(1930),
+ u1930(1931),u1931(1932),u1932(1933),u1933(1934),u1934(1935),u1935(1936),u1936(1937),u1937(1938),u1938(1939),u1939(1940),
+ u1940(1941),u1941(1942),u1942(1943),u1943(1944),u1944(1945),u1945(1946),u1946(1947),u1947(1948),u1948(1949),u1949(1950),
+ u1950(1951),u1951(1952),u1952(1953),u1953(1954),u1954(1955),u1955(1956),u1956(1957),u1957(1958),u1958(1959),u1959(1960),
+ u1960(1961),u1961(1962),u1962(1963),u1963(1964),u1964(1965),u1965(1966),u1966(1967),u1967(1968),u1968(1969),u1969(1970),
+ u1970(1971),u1971(1972),u1972(1973),u1973(1974),u1974(1975),u1975(1976),u1976(1977),u1977(1978),u1978(1979),u1979(1980),
+ u1980(1981),u1981(1982),u1982(1983),u1983(1984),u1984(1985),u1985(1986),u1986(1987),u1987(1988),u1988(1989),u1989(1990),
+ u1990(1991),u1991(1992),u1992(1993),u1993(1994),u1994(1995),u1995(1996),u1996(1997),u1997(1998),u1998(1999),u1999(2000)}
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each power output channel. Its value
+ ranges between 1 and total number of output channels.
+ This value is equivalent to the output channel number at
+ the type label of the crate or power supply, but because the SMI
+ index starts at 1, index 1 corresponds to U0."
+ ::= { outputEntry 1 }
+
+outputName OBJECT-TYPE
+ SYNTAX DisplayString (SIZE (1..4))
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "A textual string containing a short name of the
+ output. If the crate is equipped with an alphanumeric
+ display, this string is shown to identify a output channel."
+ ::= { outputEntry 2 }
+
+outputGroup OBJECT-TYPE
+ SYNTAX Integer32 (0..1999)
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The group number associated with this channel"
+ ::= { outputEntry 3 }
+
+
+outputStatus OBJECT-TYPE
+ SYNTAX BITS {
+ outputOn (0) ,
+ outputInhibit (1) ,
+ outputFailureMinSenseVoltage (2),
+ outputFailureMaxSenseVoltage (3),
+ outputFailureMaxTerminalVoltage (4),
+ outputFailureMaxCurrent (5),
+ outputFailureMaxTemperature (6),
+ outputFailureMaxPower (7),
+ -- reserved
+ outputFailureTimeout (9),
+ outputCurrentLimited (10),
+ outputRampUp (11),
+ outputRampDown (12),
+ outputEnableKill(13),
+ outputEmergencyOff (14)
+ }
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "A bit string which shows the status (health and operating conditions) of one output channel.
+ If a bit is set (1), the explanation is satisfied:
+ outputOn (0), output channel is on
+ outputInhibit(1), external (hardware-)inhibit of the output channel
+ outputFailureMinSenseVoltage (2) Supervision limit hurt: Sense voltage is too low
+ outputFailureMaxSenseVoltage (3), Supervision limit hurt: Sense voltage is too high
+ outputFailureMaxTerminalVoltage (4), Supervision limit hurt: Terminal voltage is too high
+ outputFailureMaxCurrent (5), Supervision limit hurt: Current is too high
+ outputFailureMaxTemperature (6), Supervision limit hurt: Heat sink temperature is too high
+ outputFailureMaxPower (7), Supervision limit hurt: Output power is too high
+ outputFailureTimeout (9), Communication timeout between output channel and main control
+ outputCurrentLimited (10), Current limiting is active (constant current mode)
+ outputRampUp (11), Output voltage is increasing (e.g. after switch on)
+ outputRampDown (12), Output voltage is decreasing (e.g. after switch off)
+ outputEnableKill (13), EnableKill is aktive
+ outputEmergencyOff (14), EmergencyOff event is aktive
+
+ "
+
+ ::= { outputEntry 4 }
+
+
+
+
+outputMeasurementSenseVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured voltage at the sense input lines."
+ ::= { outputEntry 5 }
+
+outputMeasurementTerminalVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured voltage at the output terminals."
+ ::= { outputEntry 6 }
+
+outputMeasurementCurrent OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured output current."
+ ::= { outputEntry 7 }
+
+outputMeasurementTemperature OBJECT-TYPE
+ SYNTAX INTEGER { ok (-128), failure(127) }
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured temperature of the power module."
+ ::= { outputEntry 8 }
+
+
+outputSwitch OBJECT-TYPE
+ SYNTAX INTEGER { Off (0), On (1), resetEmergencyOff (2), setEmergencyOff (3), clearEvents (10) }
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Read: An enumerated value which shows the current state of
+ the output channel.
+
+ Write: Change the state of the channel.
+ If the channel is On, and the write value is Off, then the channel
+ will switch Off.
+ If the channel is Off, and the write value is On, and if no other
+ signals (mainInhibit, outputInhibit, outputEmergencyOff or outputFailureMaxCurrent)
+ are active, then the channel will switch on.
+
+ If the write value is resetEmergencyOff, then the channel will
+ leave the state EmergencyOff. A write of clearEvents is necessary
+ before the voltage can ramp up again.
+ If the write value is setEmergencyOff, then the channel will have
+ the state EmergencyOff, which means that the High Voltage will
+ switch off without a ramp and reset of the outputVoltage to null volt.
+
+ If the write value is clearEvents, then all failure messages
+ of the outputStatus will be reset (all channel events, all module events
+ and the state emergencyOff)."
+ ::= { outputEntry 9 }
+
+outputVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The nominal output voltage of the channel."
+ ::= { outputEntry 10 }
+
+outputAdjustVoltage OBJECT-TYPE
+ SYNTAX Integer32 (-128..127)
+ MAX-ACCESS read-write
+ STATUS obsolete
+ DESCRIPTION
+ "A posibillity to make small changes of the output voltage."
+ ::= { outputEntry 11 }
+
+outputCurrent OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The current limit of the channel."
+ ::= { outputEntry 12 }
+
+outputVoltageRiseRate OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V/s"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Voltage Fall Slew Rate [V/s].
+ The slew rate of the output voltage if it increases (after switch on or if the Voltage has been
+ changed).
+ "
+ ::= { outputEntry 13 }
+
+outputVoltageFallRate OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V/s"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Voltage Rise Slew Rate [V/s].
+ The slew rate of the output voltage if it decreases (after switch off or if the Voltage has been
+ changed).
+ "
+ ::= { outputEntry 14 }
+
+outputSupervisionBehavior OBJECT-TYPE
+ SYNTAX Integer32 (0..65535)
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "A bit field packed into an integer which define the behavior of the output channel / power supply
+ after failures.
+ For each supervision value, a two-bit field exists.
+ The enumeration of this value (..L+..H*2) is:
+ WIENER LV devices
+ 0 ignore the failure
+ 1 switch off this channel
+ 2 switch off all channels with the same group number
+ 3 switch off the complete crate.
+ iseg HV devices
+ 0 ignore the failure
+ 1 switch off this channel by ramp down the voltage
+ 2 switch off this channel by a emergencyOff
+ 3 switch off the whole board of the HV module by emergencyOff.
+ The position of the bit fields in the integer value are:
+ Bit 0, 1: outputFailureMinSenseVoltage
+ Bit 2, 3: outputFailureMaxSenseVoltage
+ Bit 4, 5: outputFailureMaxTerminalVoltage
+ Bit 6, 7: outputFailureMaxCurrent
+ Bit 8, 9: outputFailureMaxTemperature
+ Bit 10, 11: outputFailureMaxPower
+ Bit 12, 13: outputFailureInhibit
+ Bit 14, 15: outputFailureTimeout
+ "
+
+ ::= { outputEntry 15 }
+
+outputSupervisionMinSenseVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured sense voltage is below this value, the power supply
+ performs the function defined by SupervisionAction."
+ ::= { outputEntry 16 }
+
+outputSupervisionMaxSenseVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured sense voltage is above this value, the power supply
+ performs the function defined by SupervisionAction."
+ ::= { outputEntry 17 }
+
+outputSupervisionMaxTerminalVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured voltage at the power supply output
+ terminals is above this value, the power supply
+ performs the function defined by SupervisionAction."
+ ::= { outputEntry 18 }
+
+outputSupervisionMaxCurrent OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured current is above this value, the power supply
+ performs the function defined by SupervisionAction."
+ ::= { outputEntry 19 }
+
+--outputSupervisionMaxTemperature OBJECT-TYPE wohl besser config !!
+-- SYNTAX INTEGER
+-- MAX-ACCESS read-write
+-- STATUS current
+-- DESCRIPTION
+-- "If the measured module temperature is above this value, the power supply
+-- performs the function defined by SupervisionAction."
+-- ::= { outputEntry 20 }
+
+
+
+outputConfigMaxSenseVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The maximum possible value of the sense voltage"
+ ::= { outputEntry 21 }
+
+outputConfigMaxTerminalVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The maximum possible value of the terminal voltage"
+ ::= { outputEntry 22 }
+
+outputConfigMaxCurrent OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The maximum possible value of the output current"
+ ::= { outputEntry 23 }
+
+outputSupervisionMaxPower OBJECT-TYPE
+ SYNTAX Float
+ UNITS "W"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured power (measured current * measured terminal voltage)
+ is above this value, the power supply performs the function defined
+ by SupervisionAction."
+ ::= { outputEntry 24 }
+
+outputCurrentRiseRate OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A/s"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Current Fall Slew Rate [A/s].
+ The slew rate of the output current if it increases (after
+ switch on or if the Current has been changed).
+ "
+ ::= { outputEntry 25 }
+
+outputCurrentFallRate OBJECT-TYPE
+ SYNTAX Float
+ UNITS "A/s"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Current Rise Slew Rate [A/s].
+ The slew rate of the output current if it decreases (after
+ switch off or if the Current has been changed).
+ "
+ ::= { outputEntry 26 }
+
+outputTripTimeMaxCurrent OBJECT-TYPE
+ SYNTAX INTEGER (0..4000)
+ UNITS "ms"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Current trip time out [ms].
+ The outputTripTimeMaxCurrent defines a span for the time out function.
+ The activity is depending from the bit field outputFailureMaxCurrent
+ of the outputSupervisionBehavior."
+ ::= { outputEntry 27 }
+
+-------------------------------------------------------------------------------
+-- output->groups
+-------------------------------------------------------------------------------
+
+groupsEntry OBJECT-TYPE
+ SYNTAX GroupsEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A table row"
+ INDEX { groupsIndex }
+ ::= { groupsTable 1 }
+
+GroupsEntry ::=
+ SEQUENCE {
+ groupsIndex
+ INTEGER,
+-- outputGroupsName
+-- DisplayString,
+-- outputGroupsGroup
+-- INTEGER,
+
+-- outputGroupsStatus
+-- BITS,
+-- outputGroupsMeasurementSenseVoltage
+-- Float,
+-- outputMeasurementTerminalVoltage
+-- Float,
+-- outputMeasurementCurrent
+-- Float,
+-- outputMeasurementTemperature
+-- INTEGER,
+
+
+ groupsSwitch
+ INTEGER
+-- outputVoltage
+-- Float,
+-- outputAdjustVoltage
+-- INTEGER,
+-- outputCurrent
+-- Float,
+
+-- outputRampUp
+-- Float,
+-- outputRampDown
+-- Float,
+
+-- outputSupervisionBehavior
+-- INTEGER,
+-- outputSupervisionMinSenseVoltage
+-- Float,
+-- outputSupervisionMaxSenseVoltage
+-- Float,
+-- outputSupervisionMaxTerminalVoltage
+-- Float,
+-- outputSupervisionMaxCurrent
+-- Float,
+-- outputSupervisionMaxTemperature
+-- INTEGER,
+
+-- outputConfigMaxSenseVoltage
+-- Float,
+-- outputConfigMaxTerminalVoltage
+-- Float,
+-- outputConfigMaxCurrent
+-- Float,
+-- outputSupervisionMaxPower
+-- Float,
+ }
+
+groupsIndex OBJECT-TYPE
+ SYNTAX Integer32 (0..1999)
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each power output group. Its value
+ ranges between 1 and 1999.
+ The special group 0 is predefined and gives access to all channels.
+ "
+ ::= { groupsEntry 1 }
+
+groupsSwitch OBJECT-TYPE
+ SYNTAX INTEGER { undefined (-1), Off (0), On (1), resetEmergencyOff (2), setEmergencyOff(3), disableKill (4), enableKill (5), clearEvents(10) }
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Read: This function is not defined with groups of output channels.
+
+ Write: Switch the state of all channels of a group.
+ If any channel is On, and the write value is Off, then all channels
+ will switch off.
+ If any channel is Off, and the write value is On, and if no other
+ signals (mainInhibit, outputInhibit, outputEmergencyOff or outputFailureMaxCurrent)
+ are active, then all channels will switch on.
+
+ If the write value is resetEmergencyOff, then all channels will
+ leave the state EmergencyOff. A write of clearEvents is necessary
+ before the voltage can ramp up again.
+ If the write value is setEmergencyOff, then all channels will have
+ the state EmergencyOff, which means that the High Voltage will
+ switch off without a ramp and reset of the outputVoltage to null volt.
+
+ If the write value is disableKILL, then all channels will switch
+ to disableKill (outputStatus outputDisableKill).
+ If the write value is enableKILL, then all channels will switch
+ to enableKill (outputStatus outputEnableKill).
+
+ If the write value is clearEvents, then all failure messages
+ of the outputStatus will be cleared (all channel events,
+ all module events and the state outputEmergencyOff will be reset)."
+ ::= { groupsEntry 9 }
+
+--groupsName OBJECT-TYPE
+-- SYNTAX DisplayString (SIZE (1..4))
+-- MAX-ACCESS read-only
+-- STATUS current
+-- DESCRIPTION
+-- "A textual string containing a short name of the
+-- output. If the crate is equipped with an alphanumeric
+-- display, this string is shown to identify a output channel."
+-- ::= { groupsEntry 2 }
+
+
+
+
+-------------------------------------------------------------------------------
+-- sensor
+-------------------------------------------------------------------------------
+--Sensor ::= SEQUENCE {
+-- sensorNumber Integer32,
+-- sensorTable SensorTable
+--}
+
+sensorNumber OBJECT-TYPE
+ SYNTAX Integer32 (0..8)
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The number of temperature sensors of the crate."
+ ::= { sensor 1 }
+
+sensorTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF SensorEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A (conceptual table) of temperature sensor data."
+ ::= { sensor 2 }
+
+sensorEntry OBJECT-TYPE
+ SYNTAX SensorEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "An entry (conceptual row) of the sensorTable."
+ INDEX { sensorIndex }
+ ::= { sensorTable 1 }
+
+SensorEntry ::= SEQUENCE {
+ sensorIndex INTEGER,
+ sensorTemperature INTEGER,
+ sensorWarningThreshold INTEGER,
+ sensorFailureThreshold INTEGER
+ }
+
+sensorIndex OBJECT-TYPE
+ SYNTAX INTEGER { temp1 (1), temp2(2), temp3(3), temp4(4), temp5(5),
+ temp6(6), temp7(7), temp8(8) }
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each temperature sensor in the crate"
+ ::= { sensorEntry 1 }
+
+sensorTemperature OBJECT-TYPE
+-- CHECK SYNTAX INTEGER { UNUSED(-128), (-127..127) }
+ SYNTAX Integer32 (-128..127)
+ UNITS "deg C"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured temperature of the sensor.
+ Unused temperature probes have the special value -128"
+ ::= { sensorEntry 2 }
+
+sensorWarningThreshold OBJECT-TYPE
+-- CHECK SYNTAX INTEGER { (0..126), DISABLED(127) }
+ SYNTAX Integer32 (0..127)
+ UNITS "deg C"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured temperature of the sensor is higher than this
+ value, the fan speed of the connected fan tray is increased.
+ The value 127 has the special meaning: channel disabled."
+ ::= { sensorEntry 3}
+
+sensorFailureThreshold OBJECT-TYPE
+-- CHECK SYNTAX INTEGER { (0..126), DISABLED(127) }
+ SYNTAX Integer32 (0..127)
+ UNITS "deg C"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "If the measured temperature of the sensor is higher than this
+ value, the power supply switches off.
+ The value 127 has the special meaning: channel disabled."
+ ::= { sensorEntry 4}
+
+--################
+
+-------------------------------------------------------------------------------
+-- signal
+-------------------------------------------------------------------------------
+--Signal ::= SEQUENCE {
+-- numberOfAnalogInputs Integer32,
+-- analogInputTable AnalogInputTable
+-- numberOfAnalogOutputs Integer32,
+-- analogOutputTable AnalogOutputTable
+-- digitalInput BITS,
+-- digitalOutput BITS
+--}
+
+numberOfAnalogInputs OBJECT-TYPE
+ SYNTAX Integer32 (0..8)
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The number of additional analog inputs of the crate."
+ ::= { signal 1 }
+
+analogInputTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF AnalogInputEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A (conceptual table) of analog input data."
+ ::= { signal 2 }
+
+analogInputEntry OBJECT-TYPE
+ SYNTAX AnalogInputEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "An entry (conceptual row) of the analogInputTable."
+ INDEX { analogInputIndex }
+ ::= { analogInputTable 1 }
+
+AnalogInputEntry ::= SEQUENCE {
+ analogInputIndex INTEGER,
+ analogMeasurementVoltage Float
+ }
+
+analogInputIndex OBJECT-TYPE
+ SYNTAX Integer32 (1..8)
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each analog input of the crate"
+ ::= { analogInputEntry 1 }
+
+analogMeasurementVoltage OBJECT-TYPE
+ SYNTAX Float
+ UNITS "V"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured voltage of the analog input."
+ ::= { analogInputEntry 2 }
+
+
+digitalInput OBJECT-TYPE
+ SYNTAX BITS {
+ d0 (0) ,
+ d1 (1) ,
+ d2 (2) ,
+ d3 (3)
+ }
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The value of the digital inputs."
+ ::= { signal 5 }
+
+
+
+
+-- ###################
+-------------------------------------------------------------------------------
+-- communication
+-------------------------------------------------------------------------------
+--Communication ::= SEQUENCE {
+-- snmp Snmp,
+-- tcpip Tcpip,
+-- http Http,
+-- telnet Telnet,
+-- canbus Canbus,
+-- rs232 RS232
+--}
+
+-------------------------------------------------------------------------------
+-- communication.snmp
+-------------------------------------------------------------------------------
+snmp OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "SNMP configuration."
+ ::= { communication 1 }
+
+--Snmp ::= SEQUENCE {
+-- snmpCommunityTable SnmpCommunityTable,
+-- snmpPort INTEGER
+--}
+
+snmpCommunityTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF SnmpCommunityEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "The SNMP community string table for different views."
+ ::= { snmp 1 }
+
+snmpCommunityEntry OBJECT-TYPE
+ SYNTAX SnmpCommunityEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "One table row."
+ INDEX { snmpAccessRight }
+ ::= { snmpCommunityTable 1 }
+
+
+SnmpCommunityEntry ::= SEQUENCE {
+ snmpAccessRight INTEGER,
+ snmpCommunityName OCTET STRING
+}
+
+snmpAccessRight OBJECT-TYPE
+ SYNTAX INTEGER { public (1), private (2), admin (3), guru (4) }
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each access right"
+ ::= { snmpCommunityEntry 1 }
+
+snmpCommunityName OBJECT-TYPE
+ SYNTAX OCTET STRING (SIZE (0..14))
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The SNMP community names for different views. The rights of the different communities are:
+ public no write access
+ private can switch power on/off, generate system reset
+ admin can change supervision levels
+ guru can change output voltage & current (this may destroy hardware if done wrong!)
+ Setting a community name to a zero-length string completly
+ disables the access to this view. If there is no higher-
+ privileged community, the community name can only changed
+ by direct access to the crate (not via network)!
+ "
+ ::= { snmpCommunityEntry 2}
+
+snmpPort OBJECT-TYPE
+ SYNTAX Integer32
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The UDP port number of the SNMP protocol"
+ ::= { snmp 2}
+
+-------------------------------------------------------------------------------
+-- communication.canTunnel
+-------------------------------------------------------------------------------
+can OBJECT-IDENTITY
+ STATUS current
+ DESCRIPTION
+ "CAN-Bus tunnel via SNMP."
+ ::= { communication 2 }
+
+canBitRate OBJECT-TYPE
+ SYNTAX Integer32
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Control of the CAN-Bus.
+ The value defines the bit rate of the CAN-bus interface.
+ A write disconnects the CAN interface from the ISEG modules and connects
+ it to the SNMP communication. Both the receive and transmit fifos are
+ cleared and the CAN interface is initialized with the selected bit rate.
+ The special bit rate 0 disables the tunnel and switches back to normal operation.
+ "
+ ::= { can 1 }
+
+canReceive OBJECT-TYPE
+ SYNTAX OCTET STRING (SIZE (14))
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "Control of the CAN-Bus Receive FIFO.
+ A read access returns the total number of CAN messages stored in the receive
+ fifo and the oldest message.
+ This message is removed from the fifo.
+ The OCTET STRING data is formatted according to the CANviaSNMP structure.
+ "
+ ::= { can 2 }
+
+canTransmit OBJECT-TYPE
+ SYNTAX OCTET STRING (SIZE (14))
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Control of the CAN-Bus Transmit FIFO.
+ A read access returns the total number of CAN messages stored in the transmit
+ fifo and a NULL message.
+ A write inserts the CAN message into the transmit fifo. This message will be
+ transmitted via the CAN interface later. The total number of CAN messages
+ stored in the transmit fifo and the recent message are returned.
+ The OCTET STRING data is formatted according to the CANviaSNMP structure.
+ "
+ ::= { can 3 }
+
+-------------------------------------------------------------------------------
+-- communication....
+-------------------------------------------------------------------------------
+
+-- other future entries:
+-- +-tcpip
+-- | |
+-- | +- tcpipIpAddress
+-- | +- tcpipGateway
+-- | +- tcpipSubnetMask
+-- | +- tcpipNegotiation
+-- | +- tcpipMAC
+-- |
+-- +-http
+-- | |
+-- | +- httpPort
+-- | +- httpWriteEnable
+-- |
+-- +-telnet
+-- | |
+-- | +- telnetPort
+-- |
+-- +-canbus
+-- | |
+-- | +- address
+-- | +- address2
+-- | +- speed
+-- |
+-- +-rs232
+-- | |
+-- | +- ?
+
+
+
+-------------------------------------------------------------------------------
+-- powersupply
+-------------------------------------------------------------------------------
+Powersupply ::= SEQUENCE {
+ --psFirmwareVersion DisplayString,
+ psSerialNumber DisplayString,
+ psOperatingTime Integer32,
+ psDirectAccess OCTET STRING
+}
+
+--integrated in system.sysDesc
+--psFirmwareVersion OBJECT-TYPE
+-- SYNTAX DisplayString
+-- MAX-ACCESS read-only
+-- STATUS current
+-- DESCRIPTION
+-- "The firmware version of the power supply main CPU."
+-- ::= { powersupply 1 }
+
+psSerialNumber OBJECT-TYPE
+ SYNTAX DisplayString
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The serial number of the power supply."
+ ::= { powersupply 2 }
+
+psOperatingTime OBJECT-TYPE
+ SYNTAX Integer32
+ UNITS "s"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The time in seconds for how long the power supply was switched on."
+ ::= { powersupply 3 }
+
+psDirectAccess OBJECT-TYPE
+ SYNTAX OCTET STRING (SIZE (1..14))
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "Direct data transfer to the UEP6000 power supply.
+ A read access returns nothing, a write access returns the
+ response of the power supply.
+ "
+ ::= { powersupply 1024 }
+
+-------------------------------------------------------------------------------
+-- fantray
+-------------------------------------------------------------------------------
+--Fantray ::= SEQUENCE {
+-- fanFirmwareVersion DisplayString,
+-- fanSerialNumber OCTET STRING,
+-- fanOperatingTime Integer32,
+-- fanAirTemperature INTEGER,
+-- fanSwitchOffDelay INTEGER,
+-- fanNominalSpeed INTEGER,
+-- fanNumberOfFans INTEGER,
+-- fanSpeedTable FanSpeedTable
+--}
+
+--integrated in system.sysDesc
+--fanFirmwareVersion OBJECT-TYPE
+-- SYNTAX DisplayString
+-- MAX-ACCESS read-only
+-- STATUS current
+-- DESCRIPTION
+-- "The firmware version of the fan tray CPU."
+-- ::= { fantray 1 }
+
+fanSerialNumber OBJECT-TYPE
+ SYNTAX DisplayString (SIZE (0..14))
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The serial number of the fan tray."
+ ::= { fantray 2 }
+
+fanOperatingTime OBJECT-TYPE
+ SYNTAX Integer32
+ UNITS "s"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The time in seconds for how long the fan tray was switched on."
+ ::= { fantray 3 }
+
+fanAirTemperature OBJECT-TYPE
+ SYNTAX Integer32
+ UNITS "deg C"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The temperature of the fan tray inlet air."
+ ::= { fantray 4 }
+
+fanSwitchOffDelay OBJECT-TYPE
+ SYNTAX Integer32 (0 .. 900)
+ UNITS "s"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The maximum time in seconds for which the fans will continue running
+ after the power supply has been switched off. This feature is used
+ to cool down the electronics after switching off.
+ "
+ ::= { fantray 5 }
+
+fanNominalSpeed OBJECT-TYPE
+-- CHECK SYNTAX INTEGER { (0) , (1200..3600) }
+ SYNTAX Integer32 (0..3600)
+ UNITS "RPM"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The nominal fan rotation speed (RPM, Revolutions Per Minute)
+ Value 0 does switch off the fans (only allowed if at least
+ one rack temperature sensor is present).
+ Values 1..1199 are not allowed"
+ ::= { fantray 6 }
+
+fanNumberOfFans OBJECT-TYPE
+ SYNTAX Integer32 ( 0..12 )
+ UNITS "Fans"
+ MAX-ACCESS read-write
+ STATUS current
+ DESCRIPTION
+ "The number of installed fans"
+ ::= { fantray 7 }
+
+
+fanSpeedTable OBJECT-TYPE
+ SYNTAX SEQUENCE OF FanSpeedEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A list of fanSpeedEntries."
+ ::= { fantray 8 }
+
+fanSpeedEntry OBJECT-TYPE
+ SYNTAX FanSpeedEntry
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A table row"
+ INDEX { fanNumber }
+ ::= { fanSpeedTable 1 }
+
+FanSpeedEntry ::= SEQUENCE {
+ fanNumber
+ INTEGER,
+ fanSpeed
+ INTEGER
+}
+
+fanNumber OBJECT-TYPE
+ SYNTAX Integer32 ( 1..12 )
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION
+ "A unique number for each fan."
+ ::= { fanSpeedEntry 1 }
+
+fanSpeed OBJECT-TYPE
+ SYNTAX Integer32
+ UNITS "RPM"
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION
+ "The measured fan rotation speed (RPM, Revolutions Per Minute)"
+ ::= { fanSpeedEntry 2 }
+
+
+
+
+
+-------------------------------------------------------------------------------
+-- rack
+-------------------------------------------------------------------------------
+-- this is reserved for futer items (BIN serial number, plug&play, ...)
+
+
+
+-------------------------------------------------------------------------------
+END
Index: sipmscan/trunk_v0.9/mpod/instructions_mpod.txt
===================================================================
--- sipmscan/trunk_v0.9/mpod/instructions_mpod.txt (nonexistent)
+++ sipmscan/trunk_v0.9/mpod/instructions_mpod.txt (revision 145)
@@ -0,0 +1,6 @@
+mpod_voltage.sh has the following options:
+ --resetall Resets all outputs
+ -r [integer] Resets output selected with [integer]
+ -o [integer] Selects output [integer]
+ -v [float] Sets the voltage to [float]. Must be used in combination with -o
+ -s [0/1] Turns output on (1) or off (0). Must be used in combination with -o
Index: sipmscan/trunk_v0.9/mpod/mpod_voltage.sh
===================================================================
--- sipmscan/trunk_v0.9/mpod/mpod_voltage.sh (nonexistent)
+++ sipmscan/trunk_v0.9/mpod/mpod_voltage.sh (revision 145)
@@ -0,0 +1,114 @@
+#!/bin/bash
+
+# Commands:
+# snmpset - sets the selected attribute of a single channel
+# snmpget - prints the selected atribute of a single channel
+# snmpwalk - prints the selected attribute of all channels
+#
+# Attributes:
+# outputVoltage - float(F), R/W
+# outputCurrent - float(F), R/W
+# outputMeasurementSenseVoltage - float(F), R
+# outputMeasurementCurrent - float(F), R
+# outputSwitch - integer(i), R/W
+# outputVoltageRiseRate - float(F), R/W
+# outputStatus - bits, R
+
+#ip=194.249.156.124
+#ip=f9mpod.ijs.si
+
+#if [$1 -lt 99]; then
+# if [$2 -lt 74]; then
+# echo "Setting bias to " $2
+# snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$1 F $2
+# else
+# echo "Bias voltage needs to be smaller than 74V."
+# fi
+#else if [$1 -gt 99]; then
+# if [$2 -lt 35]; then
+# echo "Setting bias to " $2
+# snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$1 F $2
+# else
+# echo "Bias voltage needs to be smaller than 35V."
+# fi
+#fi
+
+ip=f9mpod.ijs.si
+
+function reset_all
+{
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.1 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.2 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.3 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.4 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.5 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.6 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.7 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.8 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.101 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.102 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.103 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.104 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.105 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.106 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.107 i 10
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.108 i 10
+
+ exit 0
+}
+
+# save all arguments to array args
+args=("$@")
+
+argcnt=0
+outSel=-1
+outVolt=-1
+outSw=-1
+resetOut=-1
+getOut=-1
+
+# search the arguments for valid options
+for ARG in "${args[@]}"; do
+ if [ "$ARG" == "--resetall" ]; then
+ reset_all
+ elif [ "$ARG" == "-g" ]; then
+ getOut=1
+ elif [ "$ARG" == "-r" ]; then
+ resetOut=${args[$argcnt+1]}
+ elif [ "$ARG" == "-o" ]; then
+ outSel=${args[$argcnt+1]}
+ elif [ "$ARG" == "-v" ]; then
+ outVolt=${args[$argcnt+1]}
+ elif [ "$ARG" == "-s" ]; then
+ outSw=${args[$argcnt+1]}
+ fi
+ (( argcnt++ ))
+done
+
+if [ $resetOut != -1 ]; then
+ if [ $resetOut -ge 1 -a $resetOut -le 8 ] || [ $resetOut -ge 101 -a $resetOut -le 108 ]; then
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$resetOut i 10
+ else
+ echo "Please select output between 1 and 8 (channel 1) or 101 and 108 (output 2)."
+ fi
+else
+ if [ $outSel != -1 ]; then
+ # limit the channels to the correct value
+ if [ $outSel -ge 1 -a $outSel -le 8 ] || [ $outSel -ge 101 -a $outSel -le 108 ]; then
+ if [ $outVolt != -1 ]; then
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$outSel F $outVolt
+ fi
+ if [ $outSw != -1 ]; then
+ snmpset -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$outSel i $outSw
+ fi
+ if [ $getOut != -1 ]; then
+ snmpget -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputVoltage.$outSel
+ snmpget -v 2c -M +. -m +WIENER-CRATE-MIB -c guru $ip outputSwitch.$outSel
+ fi
+ else
+ echo "Please select output between 1 and 8 (channel 1) or 101 and 108 (output 2)."
+ fi
+ fi
+fi
+
+exit 0
/sipmscan/trunk_v0.9/mpod/mpod_voltage.sh
Property changes:
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Index: sipmscan/trunk_v0.9/mpod/test.sh
===================================================================
--- sipmscan/trunk_v0.9/mpod/test.sh (nonexistent)
+++ sipmscan/trunk_v0.9/mpod/test.sh (revision 145)
@@ -0,0 +1,31 @@
+#!/bin/bash
+
+snmpsearch="--snmp-install="
+
+for var in $@
+do
+ case $var in
+ "$snmpsearch"*)
+ echo "Mached argument: $var"
+ snmpdir=${var#$snmpsearch}
+ echo "SNMP directory = $snmpdir";;
+ *) ;;
+# echo "Unmached argument: $var";;
+ esac
+done
+
+printenv PATH | grep "snmp"
+if [ $? == 0 ]; then
+ echo "Something found."
+else
+ echo "Nothing found."
+fi
+
+printenv ROOTSYS > /dev/null
+if [ $? == 0 ]; then
+ echo "Something found."
+else
+ echo "Nothing found."
+fi
+
+exit 0
Index: sipmscan/trunk_v0.9/root_include.h
===================================================================
--- sipmscan/trunk_v0.9/root_include.h (nonexistent)
+++ sipmscan/trunk_v0.9/root_include.h (revision 145)
@@ -0,0 +1,225 @@
+#ifndef _root_include_h_
+#define _root_include_h_
+
+// ROOT base includes
+#ifndef ROOT_TRootBrowser
+#include "TRootBrowser.h"
+#endif
+#ifndef ROOT_IOstream
+#include "Riostream.h"
+#endif
+#ifndef ROOT_TSystem
+#include "TSystem.h"
+#endif
+#ifndef ROOT_TApplication
+#include "TApplication.h"
+#endif
+#ifndef ROOT_TROOT
+#include "TROOT.h"
+#endif
+#ifndef ROOT_RQ_Object
+#include "RQ_OBJECT.h"
+#endif
+#ifndef ROOT_TGClient
+#include "TGClient.h"
+#endif
+#ifndef ROOT_TGResourcePool
+#include "TGResourcePool.h"
+#endif
+
+// ROOT GUI frame includes
+#ifndef ROOT_TGFrame
+#include "TGFrame.h"
+#endif
+#ifndef ROOT_TGDockableFrame
+#include "TGDockableFrame.h"
+#endif
+#ifndef ROOT_TGMenu
+#include "TGMenu.h"
+#endif
+#ifndef ROOT_TGMdiDecorFrame
+#include "TGMdiDecorFrame.h"
+#endif
+#ifndef ROOT_TGMdiFrame
+#include "TGMdiFrame.h"
+#endif
+#ifndef ROOT_TGMdiMainFrame
+#include "TGMdiMainFrame.h"
+#endif
+#ifndef ROOT_TGMdiMenu
+#include "TGMdiMenu.h"
+#endif
+#ifndef ROOT_TGMdi
+#include "TGMdi.h"
+#endif
+#ifndef ROOT_TG3DLine
+#include "TG3DLine.h"
+#endif
+#ifndef ROOT_TGStatusBar
+#include "TGStatusBar.h"
+#endif
+
+// ROOT GUI builder incudes (not needed)
+#ifndef ROOT_TRootGuiBuilder
+#include "TRootGuiBuilder.h"
+#endif
+#ifndef ROOT_TGuiBldHintsButton
+#include "TGuiBldHintsButton.h"
+#endif
+#ifndef ROOT_TGuiBldHintsEditor
+#include "TGuiBldHintsEditor.h"
+#endif
+#ifndef ROOT_TGuiBldEditor
+#include "TGuiBldEditor.h"
+#endif
+#ifndef ROOT_TGuiBldDragManager
+#include "TGuiBldDragManager.h"
+#endif
+
+// ROOT GUI object includes
+#ifndef ROOT_TGListBox
+#include "TGListBox.h"
+#endif
+#ifndef ROOT_TGNumberEntry
+#include "TGNumberEntry.h"
+#endif
+#ifndef ROOT_TGScrollBar
+#include "TGScrollBar.h"
+#endif
+#ifndef ROOT_TGFileDialog
+#include "TGFileDialog.h"
+#endif
+#ifndef ROOT_TGShutter
+#include "TGShutter.h"
+#endif
+#ifndef ROOT_TGButtonGroup
+#include "TGButtonGroup.h"
+#endif
+#ifndef ROOT_TGCanvas
+#include "TGCanvas.h"
+#endif
+#ifndef ROOT_TGButton
+#include "TGButton.h"
+#endif
+#ifndef ROOT_TGTextEdit
+#include "TGTextEdit.h"
+#endif
+#ifndef ROOT_TGLabel
+#include "TGLabel.h"
+#endif
+#ifndef ROOT_TGView
+#include "TGView.h"
+#endif
+#ifndef ROOT_TGTab
+#include "TGTab.h"
+#endif
+#ifndef ROOT_TGListView
+#include "TGListView.h"
+#endif
+#ifndef ROOT_TGSplitter
+#include "TGSplitter.h"
+#endif
+#ifndef ROOT_TGListTree
+#include "TGListTree.h"
+#endif
+#ifndef ROOT_TGToolTip
+#include "TGToolTip.h"
+#endif
+#ifndef ROOT_TGToolBar
+#include "TGToolBar.h"
+#endif
+#ifndef ROOT_TRootEmbeddedCanvas
+#include "TRootEmbeddedCanvas.h"
+#endif
+#ifndef ROOT_TCanvas
+#include "TCanvas.h"
+#endif
+#ifndef ROOT_TGComboBox
+#include "TGComboBox.h"
+#endif
+#ifndef ROOT_TGProgressBar
+#include "TGProgressBar.h"
+#endif
+#ifndef ROOT_TGTextEntry
+#include "TGTextEntry.h"
+#endif
+#ifndef ROOT_TGMsgBox
+#include "TGMsgBox.h"
+#endif
+#ifndef ROOT_TGSlider
+#include "TGSlider.h"
+#endif
+#ifndef ROOT_TGFSContainer
+#include "TGFSContainer.h"
+#endif
+#ifndef ROOT_TGFSComboBox
+#include "TGFSComboBox.h"
+#endif
+
+// ROOT File browser includes
+#ifndef ROOT_TSystemDir
+#include "TSystemDirectory.h"
+#endif
+#ifndef ROOT_TTree
+#include "TTree.h"
+#endif
+#ifndef ROOT_TFile
+#include "TFile.h"
+#endif
+
+// ROOT plotting includes
+#ifndef ROOT_TPaveStats
+#include "TPaveStats.h"
+#endif
+#ifndef ROOT_TGraph2D
+#include "TGraph2D.h"
+#endif
+#ifndef ROOT_TLatex
+#include "TLatex.h"
+#endif
+#ifndef ROOT_TGraphErrors
+#include "TGraphErrors.h"
+#endif
+#ifndef ROOT_TStyle
+#include "TStyle.h"
+#endif
+#ifndef ROOT_TPaletteAxis
+#include "TPaletteAxis.h"
+#endif
+#ifndef ROOT_TGraph
+#include "TGraph.h"
+#endif
+#ifndef ROOT_TH1F
+#include "TH1F.h"
+#endif
+#ifndef ROOT_TH2F
+#include "TH2F.h"
+#endif
+#ifndef ROOT_TF1
+#include "TF1.h"
+#endif
+#ifndef ROOT_TSpectrum
+#include "TSpectrum.h"
+#endif
+#ifndef ROOT_TVirtualFitter
+#include "TVirtualFitter.h"
+#endif
+#ifndef ROOT_TMath
+#include "TMath.h"
+#endif
+#ifndef ROOT_TRandom
+#include "TRandom.h"
+#endif
+
+// ROOT MYSQL includes
+#ifndef ROOT_TSQLServer
+#include <TSQLServer.h>
+#endif
+#ifndef ROOT_TSQLResult
+#include <TSQLResult.h>
+#endif
+#ifndef ROOT_TSQLRow
+#include <TSQLRow.h>
+#endif
+
+#endif
Index: sipmscan/trunk_v0.9/start.cxx
===================================================================
--- sipmscan/trunk_v0.9/start.cxx (nonexistent)
+++ sipmscan/trunk_v0.9/start.cxx (revision 145)
@@ -0,0 +1,8 @@
+
+int start(char *path="."){
+ gROOT->SetMacroPath(path);
+ gROOT->ProcessLine(".L libdaqusb.so");
+ gROOT->ProcessLine(".L libvxi11.so");
+ gROOT->ProcessLine(".L windowed_test.C+");
+ windowed_test();
+}
/sipmscan/trunk_v0.9/start.cxx
Property changes:
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Index: sipmscan/trunk_v0.9/vxi11_i686/CHANGELOG.txt
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/CHANGELOG.txt (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/CHANGELOG.txt (revision 145)
@@ -0,0 +1,199 @@
+------------------------------------------------------------------------------
+vxi11_1.08 - 3/09/2009
+
+Added a sanity check for link->maxRecvSize to make sure it's >0. This gets
+around a bug in some versions of the Agilent Infiniium scope software.
+
+Changed the erroneous strncpy() to memcpy() in vxi11_send, as we could be
+sending binary data (not just strings).
+
+Changed a lot of char *'s to const char *'s in an attempt to get rid of
+pedantic gcc compiler warnings.
+
+------------------------------------------------------------------------------
+vxi11_1.07 - 9/10/2007
+
+Minor change to vxi11_receive_data_block(), this fn now copes with instruments
+that return just "#0" (for whatever reason). Suggestion by Jarek Sadowski,
+gratefully received.
+
+------------------------------------------------------------------------------
+vxi11_1.06 - 31/08/2007
+
+Bug fix in vxi11_receive(), to ensure that no more than "len" bytes are ever
+received (and so avoiding a segmentation fault). This was a bug introduced in
+release 1.04 whilst making some other changes to the vxi11_receive() fn.
+
+Many thanks to Rob Penny for spotting the bug and providing a patch.
+
+------------------------------------------------------------------------------
+vxi11_1.05 - 11/07/2007
+
+Added the ability to specify a "device name" when calling vxi11_open_device().
+For regular VXI11-based instruments, such as scopes and AFGs, the device name
+is usually "hard wired" to be "inst0", and up to now this has been hard wired
+into the vxi11_user code. However, devices such as LAN to GPIB gateways need
+some way of distinguishing between different devices... they are a single
+client (one IP address), with multiple devices.
+
+The vxi11_user fn, vxi11_open_device(), now takes a third argument
+(char *device).
+This gets passed to the core vxi11_open_device() fn (the one that deals with
+separate clients and links), and the core vxi11_open_link() fn; these two
+core functions have also had an extra parameter added accordingly. In order
+to not break the API, a wrapper function is provided in the form of the
+original vxi11_open_device() fn, that just takes 2 arguments
+(char *ip, CLINK *clink), this then passes "inst0" as the device argument.
+Backwards-compatible wrappers for the core functions have NOT been provided.
+These are generally not used from userland anyway. Hopefully this won't
+upset anyone!
+
+vxi11_cmd, the simple test utility, has also been updated. You can now,
+optionally, pass the device_name as a second argument (after the ip
+address). The source has been renamed to vxi11_cmd.cc (from vxi11_cmd.c), as
+it is C++ code not C.
+
+Some minor tidying up in vxi11_user.h
+
+With thanks to Oliver Schulz for bringing LAN to GPIB gateways to my
+attention, for suggesting changes to the vxi11_user library to allow them to
+be accommodated, and for tidying some things up.
+
+------------------------------------------------------------------------------
+vxi11_1.04 - 10/07/2007
+
+Patch applied, which was kindly provided by Robert Larice. This sorts out
+the confusion (on my part) about the structures returned by the rpcgen
+generated *_1() functions... these are statically allocated temporary structs,
+apparently. In the words of Robert Larice:
+
+******
+Hello Dr. Sharples,
+
+ I'm sending some patches for your nice gem "vxi11_1.03"
+
+ In the source code there were some strange comments, concerning
+ a commented free() around ... Manfred S. ...
+ and some notes, suggesting you had trouble to get more than one link
+ working.
+
+ I think thats caused by some misuse of the rpcgen generated subroutines.
+ 1) those rpcgen generated *_1 functions returned pointers to
+ statically allocated temporary structs.
+ those where meant to be instantly copied to the user's space,
+ which wasn't done
+ thus instead of
+ Device_ReadResp *read_resp;
+ read_resp = device_read_1(...)
+ one should have written someting like:
+ Device_ReadResp *read_resp;
+ read_resp = malloc(...)
+ memcpy(read_resp, device_read_1(...), ...)
+ 2) but a better fix is to use the rpcgen -M Flag
+ which allows to pass the memory space as a third argument
+ so one can write
+ Device_ReadResp *read_resp;
+ read_resp = malloc(...)
+ device_read_1(..., read_resp, ...)
+ furthermore this is now automatically thread save
+ 3) the rpcgen function device_read_1
+ expects a target buffer to be passed via read_resp
+ which was not done.
+ 4) the return value of vxi11_receive() was computed incorrectly
+ 5) minor, Makefile typo's
+ CFLAGS versus
+ CLFAGS
+
+******
+
+Robert didn't have more than one device to try the patch with, but I've just
+tried it and everything seems fine. So I've removed all references to the
+VXI11_ENABLE_MULTIPLE_CLIENTS global variable, and removed the call to
+vxi11_open_link() from the vxi11_send() fn. There has been an associated
+tidying of functions, and removal of some comments.
+
+Thanks once again to Robert Larice for the patch and the explanation!
+
+------------------------------------------------------------------------------
+vxi11_1.03 - 29/01/2007
+
+Some bug-fixes (thanks to Manfred S.), and extra awareness of the
+possibility that instruments could time out after receiving a query WITHOUT
+causing an error condition. In some cases (prior to these changes) this
+could have resulted in a segmentation fault.
+
+Specifically:
+
+(1) removed call to ANSI free() fn in vxi11_receive, which according to
+ Manfred S. "is not necessary and wrong (crashes)".
+
+(2) added extra check in vxi11_receive() to see if read_resp==NULL.
+ read_resp can apparently be NULL if (eg) you send an instrument a
+ query, but the instrument is so busy with something else for so long
+ that it forgets the original query. So this extra check is for that
+ situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
+ calling function.
+
+(3) vxi11_send_and_receive() is now aware of the possibility of being
+ returned -VXI11_NULL_READ_RESP. If so, it re-sends the query, until
+ either getting a "regular" read error (read_resp->error!=0) or a
+ successful read.
+
+(4) Similar to (2)... added extra check in vxi11_send() to see if
+ write_resp==NULL. If so, return -VXI11_NULL_WRITE_RESP. As with (3),
+ send_and_receive() is now aware of this possibility.
+
+------------------------------------------------------------------------------
+vxi11_1.02 - 25/08/2006
+
+Important changes to the core vxi11_send() function, which should be
+invisible to the user.
+
+For those interested, the function now takes note of the value of
+link->maxRecvSize, which is the maximum number of bytes that the vxi11
+intrument you're talking to can receive in one go. For many instruments
+this may be a few kB, which isn't a problem for sending short commands;
+however, sending large chunks of data (for example sending waveforms
+to instruments) may exceed this maxRecvSize. The core vxi11_send() function
+has been re-written to ensure that only a maximum of [maxRecvSize] bytes are
+written in one go... the function sits in a loop until all the message/
+data is written.
+
+Also tidied up some of the return values (specifically with regard to
+vxi11_send() and vxi11_send_data_block() ).
+
+------------------------------------------------------------------------------
+vxi11_1.01 - 06/07/2006
+
+Fair few changes since v1.00, all in vxi11_user.c and vxi11_user.h
+
+Found I was having problems talking to multiple links on the same
+client, if I created a different client for each one. So introduced
+a few global variables to keep track of all the ip addresses of
+clients that the library is asked to create, and only creating new
+clients if the ip address is different. This puts a limit of how
+many unique ip addresses (clients) a single process can connect to.
+Set this value at 256 (should hopefully be enough!).
+
+Next I found that talking to different clients on different ip
+addresses didn't work. It turns out that create_link_1() creates
+a static structure. This this link is associated with a given
+client (and hence a given IP address), then the only way I could
+think of making things work was to add a call to an
+vxi11_open_link() function before each send command (no idea what
+this adds to overheads and it's very messy!) - at least I was
+able to get this to only happen when we are using more than one
+client/ip address.
+
+Also, while I was at it, I re-ordered the functions a little -
+starts with core user functions, extra user functions, then core
+library functions at the end. Added a few more comments. Tidied
+up. Left some debugging info in, but commented out.
+
+------------------------------------------------------------------------------
+vxi11_1.00 - 23/06/2006
+
+Initial release.
+
+------------------------------------------------------------------------------
+
Index: sipmscan/trunk_v0.9/vxi11_i686/GNU_General_Public_License.txt
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/GNU_General_Public_License.txt (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/GNU_General_Public_License.txt (revision 145)
@@ -0,0 +1,340 @@
+ GNU GENERAL PUBLIC LICENSE
+ Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+ 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+ Preamble
+
+ The licenses for most software are designed to take away your
+freedom to share and change it. By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users. This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it. (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.) You can apply it to
+your programs, too.
+
+ When we speak of free software, we are referring to freedom, not
+price. Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+ To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+ For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have. You must make sure that they, too, receive or can get the
+source code. And you must show them these terms so they know their
+rights.
+
+ We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+ Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software. If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+ Finally, any free program is threatened constantly by software
+patents. We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary. To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+ The precise terms and conditions for copying, distribution and
+modification follow.
+
+ GNU GENERAL PUBLIC LICENSE
+ TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+ 0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License. The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language. (Hereinafter, translation is included without limitation in
+the term "modification".) Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope. The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+ 1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+ 2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+ a) You must cause the modified files to carry prominent notices
+ stating that you changed the files and the date of any change.
+
+ b) You must cause any work that you distribute or publish, that in
+ whole or in part contains or is derived from the Program or any
+ part thereof, to be licensed as a whole at no charge to all third
+ parties under the terms of this License.
+
+ c) If the modified program normally reads commands interactively
+ when run, you must cause it, when started running for such
+ interactive use in the most ordinary way, to print or display an
+ announcement including an appropriate copyright notice and a
+ notice that there is no warranty (or else, saying that you provide
+ a warranty) and that users may redistribute the program under
+ these conditions, and telling the user how to view a copy of this
+ License. (Exception: if the Program itself is interactive but
+ does not normally print such an announcement, your work based on
+ the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole. If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works. But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+ 3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+ a) Accompany it with the complete corresponding machine-readable
+ source code, which must be distributed under the terms of Sections
+ 1 and 2 above on a medium customarily used for software interchange; or,
+
+ b) Accompany it with a written offer, valid for at least three
+ years, to give any third party, for a charge no more than your
+ cost of physically performing source distribution, a complete
+ machine-readable copy of the corresponding source code, to be
+ distributed under the terms of Sections 1 and 2 above on a medium
+ customarily used for software interchange; or,
+
+ c) Accompany it with the information you received as to the offer
+ to distribute corresponding source code. (This alternative is
+ allowed only for noncommercial distribution and only if you
+ received the program in object code or executable form with such
+ an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it. For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable. However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+ 4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License. Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+ 5. You are not required to accept this License, since you have not
+signed it. However, nothing else grants you permission to modify or
+distribute the Program or its derivative works. These actions are
+prohibited by law if you do not accept this License. Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+ 6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions. You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+ 7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License. If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all. For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices. Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+ 8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded. In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+ 9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time. Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number. If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation. If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+ 10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission. For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this. Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+ NO WARRANTY
+
+ 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+ 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+ END OF TERMS AND CONDITIONS
+
+ How to Apply These Terms to Your New Programs
+
+ If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+ To do so, attach the following notices to the program. It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+ <one line to give the program's name and a brief idea of what it does.>
+ Copyright (C) <year> <name of author>
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+ Gnomovision version 69, Copyright (C) year name of author
+ Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+ This is free software, and you are welcome to redistribute it
+ under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License. Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary. Here is a sample; alter the names:
+
+ Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+ `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+ <signature of Ty Coon>, 1 April 1989
+ Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs. If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library. If this is what you want to do, use the GNU Library General
+Public License instead of this License.
Index: sipmscan/trunk_v0.9/vxi11_i686/Makefile
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/Makefile (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/Makefile (revision 145)
@@ -0,0 +1,18 @@
+VERSION=1.08
+
+#CFLAGS = -Wall -g
+CFLAGS = -g
+CXX = g++
+
+.PHONY: clean objs
+
+objs: vxi11.h
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_user.cc
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_clnt.c
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_xdr.c
+
+vxi11.h: vxi11.x
+ rpcgen -M vxi11.x
+
+clean:
+ rm -f *.o vxi11_cmd vxi11.h vxi11_svc.c vxi11_xdr.c vxi11_clnt.c #TAGS
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11.h
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11.h (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11.h (revision 145)
@@ -0,0 +1,343 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#ifndef _VXI11_H_RPCGEN
+#define _VXI11_H_RPCGEN
+
+#include <rpc/rpc.h>
+
+#include <pthread.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+
+typedef long Device_Link;
+
+enum Device_AddrFamily {
+ DEVICE_TCP = 0,
+ DEVICE_UDP = 1,
+};
+typedef enum Device_AddrFamily Device_AddrFamily;
+
+typedef long Device_Flags;
+
+typedef long Device_ErrorCode;
+
+struct Device_Error {
+ Device_ErrorCode error;
+};
+typedef struct Device_Error Device_Error;
+
+struct Create_LinkParms {
+ long clientId;
+ bool_t lockDevice;
+ u_long lock_timeout;
+ char *device;
+};
+typedef struct Create_LinkParms Create_LinkParms;
+
+struct Create_LinkResp {
+ Device_ErrorCode error;
+ Device_Link lid;
+ u_short abortPort;
+ u_long maxRecvSize;
+};
+typedef struct Create_LinkResp Create_LinkResp;
+
+struct Device_WriteParms {
+ Device_Link lid;
+ u_long io_timeout;
+ u_long lock_timeout;
+ Device_Flags flags;
+ struct {
+ u_int data_len;
+ char *data_val;
+ } data;
+};
+typedef struct Device_WriteParms Device_WriteParms;
+
+struct Device_WriteResp {
+ Device_ErrorCode error;
+ u_long size;
+};
+typedef struct Device_WriteResp Device_WriteResp;
+
+struct Device_ReadParms {
+ Device_Link lid;
+ u_long requestSize;
+ u_long io_timeout;
+ u_long lock_timeout;
+ Device_Flags flags;
+ char termChar;
+};
+typedef struct Device_ReadParms Device_ReadParms;
+
+struct Device_ReadResp {
+ Device_ErrorCode error;
+ long reason;
+ struct {
+ u_int data_len;
+ char *data_val;
+ } data;
+};
+typedef struct Device_ReadResp Device_ReadResp;
+
+struct Device_ReadStbResp {
+ Device_ErrorCode error;
+ u_char stb;
+};
+typedef struct Device_ReadStbResp Device_ReadStbResp;
+
+struct Device_GenericParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long lock_timeout;
+ u_long io_timeout;
+};
+typedef struct Device_GenericParms Device_GenericParms;
+
+struct Device_RemoteFunc {
+ u_long hostAddr;
+ u_long hostPort;
+ u_long progNum;
+ u_long progVers;
+ Device_AddrFamily progFamily;
+};
+typedef struct Device_RemoteFunc Device_RemoteFunc;
+
+struct Device_EnableSrqParms {
+ Device_Link lid;
+ bool_t enable;
+ struct {
+ u_int handle_len;
+ char *handle_val;
+ } handle;
+};
+typedef struct Device_EnableSrqParms Device_EnableSrqParms;
+
+struct Device_LockParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long lock_timeout;
+};
+typedef struct Device_LockParms Device_LockParms;
+
+struct Device_DocmdParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long io_timeout;
+ u_long lock_timeout;
+ long cmd;
+ bool_t network_order;
+ long datasize;
+ struct {
+ u_int data_in_len;
+ char *data_in_val;
+ } data_in;
+};
+typedef struct Device_DocmdParms Device_DocmdParms;
+
+struct Device_DocmdResp {
+ Device_ErrorCode error;
+ struct {
+ u_int data_out_len;
+ char *data_out_val;
+ } data_out;
+};
+typedef struct Device_DocmdResp Device_DocmdResp;
+
+struct Device_SrqParms {
+ struct {
+ u_int handle_len;
+ char *handle_val;
+ } handle;
+};
+typedef struct Device_SrqParms Device_SrqParms;
+
+#define DEVICE_ASYNC 0x0607B0
+#define DEVICE_ASYNC_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define device_abort 1
+extern enum clnt_stat device_abort_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t device_abort_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+extern int device_async_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define device_abort 1
+extern enum clnt_stat device_abort_1();
+extern bool_t device_abort_1_svc();
+extern int device_async_1_freeresult ();
+#endif /* K&R C */
+
+#define DEVICE_CORE 0x0607AF
+#define DEVICE_CORE_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define create_link 10
+extern enum clnt_stat create_link_1(Create_LinkParms *, Create_LinkResp *, CLIENT *);
+extern bool_t create_link_1_svc(Create_LinkParms *, Create_LinkResp *, struct svc_req *);
+#define device_write 11
+extern enum clnt_stat device_write_1(Device_WriteParms *, Device_WriteResp *, CLIENT *);
+extern bool_t device_write_1_svc(Device_WriteParms *, Device_WriteResp *, struct svc_req *);
+#define device_read 12
+extern enum clnt_stat device_read_1(Device_ReadParms *, Device_ReadResp *, CLIENT *);
+extern bool_t device_read_1_svc(Device_ReadParms *, Device_ReadResp *, struct svc_req *);
+#define device_readstb 13
+extern enum clnt_stat device_readstb_1(Device_GenericParms *, Device_ReadStbResp *, CLIENT *);
+extern bool_t device_readstb_1_svc(Device_GenericParms *, Device_ReadStbResp *, struct svc_req *);
+#define device_trigger 14
+extern enum clnt_stat device_trigger_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_trigger_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_clear 15
+extern enum clnt_stat device_clear_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_clear_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_remote 16
+extern enum clnt_stat device_remote_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_remote_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_local 17
+extern enum clnt_stat device_local_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_local_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_lock 18
+extern enum clnt_stat device_lock_1(Device_LockParms *, Device_Error *, CLIENT *);
+extern bool_t device_lock_1_svc(Device_LockParms *, Device_Error *, struct svc_req *);
+#define device_unlock 19
+extern enum clnt_stat device_unlock_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t device_unlock_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+#define device_enable_srq 20
+extern enum clnt_stat device_enable_srq_1(Device_EnableSrqParms *, Device_Error *, CLIENT *);
+extern bool_t device_enable_srq_1_svc(Device_EnableSrqParms *, Device_Error *, struct svc_req *);
+#define device_docmd 22
+extern enum clnt_stat device_docmd_1(Device_DocmdParms *, Device_DocmdResp *, CLIENT *);
+extern bool_t device_docmd_1_svc(Device_DocmdParms *, Device_DocmdResp *, struct svc_req *);
+#define destroy_link 23
+extern enum clnt_stat destroy_link_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t destroy_link_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+#define create_intr_chan 25
+extern enum clnt_stat create_intr_chan_1(Device_RemoteFunc *, Device_Error *, CLIENT *);
+extern bool_t create_intr_chan_1_svc(Device_RemoteFunc *, Device_Error *, struct svc_req *);
+#define destroy_intr_chan 26
+extern enum clnt_stat destroy_intr_chan_1(void *, Device_Error *, CLIENT *);
+extern bool_t destroy_intr_chan_1_svc(void *, Device_Error *, struct svc_req *);
+extern int device_core_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define create_link 10
+extern enum clnt_stat create_link_1();
+extern bool_t create_link_1_svc();
+#define device_write 11
+extern enum clnt_stat device_write_1();
+extern bool_t device_write_1_svc();
+#define device_read 12
+extern enum clnt_stat device_read_1();
+extern bool_t device_read_1_svc();
+#define device_readstb 13
+extern enum clnt_stat device_readstb_1();
+extern bool_t device_readstb_1_svc();
+#define device_trigger 14
+extern enum clnt_stat device_trigger_1();
+extern bool_t device_trigger_1_svc();
+#define device_clear 15
+extern enum clnt_stat device_clear_1();
+extern bool_t device_clear_1_svc();
+#define device_remote 16
+extern enum clnt_stat device_remote_1();
+extern bool_t device_remote_1_svc();
+#define device_local 17
+extern enum clnt_stat device_local_1();
+extern bool_t device_local_1_svc();
+#define device_lock 18
+extern enum clnt_stat device_lock_1();
+extern bool_t device_lock_1_svc();
+#define device_unlock 19
+extern enum clnt_stat device_unlock_1();
+extern bool_t device_unlock_1_svc();
+#define device_enable_srq 20
+extern enum clnt_stat device_enable_srq_1();
+extern bool_t device_enable_srq_1_svc();
+#define device_docmd 22
+extern enum clnt_stat device_docmd_1();
+extern bool_t device_docmd_1_svc();
+#define destroy_link 23
+extern enum clnt_stat destroy_link_1();
+extern bool_t destroy_link_1_svc();
+#define create_intr_chan 25
+extern enum clnt_stat create_intr_chan_1();
+extern bool_t create_intr_chan_1_svc();
+#define destroy_intr_chan 26
+extern enum clnt_stat destroy_intr_chan_1();
+extern bool_t destroy_intr_chan_1_svc();
+extern int device_core_1_freeresult ();
+#endif /* K&R C */
+
+#define DEVICE_INTR 0x0607B1
+#define DEVICE_INTR_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define device_intr_srq 30
+extern enum clnt_stat device_intr_srq_1(Device_SrqParms *, void *, CLIENT *);
+extern bool_t device_intr_srq_1_svc(Device_SrqParms *, void *, struct svc_req *);
+extern int device_intr_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define device_intr_srq 30
+extern enum clnt_stat device_intr_srq_1();
+extern bool_t device_intr_srq_1_svc();
+extern int device_intr_1_freeresult ();
+#endif /* K&R C */
+
+/* the xdr functions */
+
+#if defined(__STDC__) || defined(__cplusplus)
+extern bool_t xdr_Device_Link (XDR *, Device_Link*);
+extern bool_t xdr_Device_AddrFamily (XDR *, Device_AddrFamily*);
+extern bool_t xdr_Device_Flags (XDR *, Device_Flags*);
+extern bool_t xdr_Device_ErrorCode (XDR *, Device_ErrorCode*);
+extern bool_t xdr_Device_Error (XDR *, Device_Error*);
+extern bool_t xdr_Create_LinkParms (XDR *, Create_LinkParms*);
+extern bool_t xdr_Create_LinkResp (XDR *, Create_LinkResp*);
+extern bool_t xdr_Device_WriteParms (XDR *, Device_WriteParms*);
+extern bool_t xdr_Device_WriteResp (XDR *, Device_WriteResp*);
+extern bool_t xdr_Device_ReadParms (XDR *, Device_ReadParms*);
+extern bool_t xdr_Device_ReadResp (XDR *, Device_ReadResp*);
+extern bool_t xdr_Device_ReadStbResp (XDR *, Device_ReadStbResp*);
+extern bool_t xdr_Device_GenericParms (XDR *, Device_GenericParms*);
+extern bool_t xdr_Device_RemoteFunc (XDR *, Device_RemoteFunc*);
+extern bool_t xdr_Device_EnableSrqParms (XDR *, Device_EnableSrqParms*);
+extern bool_t xdr_Device_LockParms (XDR *, Device_LockParms*);
+extern bool_t xdr_Device_DocmdParms (XDR *, Device_DocmdParms*);
+extern bool_t xdr_Device_DocmdResp (XDR *, Device_DocmdResp*);
+extern bool_t xdr_Device_SrqParms (XDR *, Device_SrqParms*);
+
+#else /* K&R C */
+extern bool_t xdr_Device_Link ();
+extern bool_t xdr_Device_AddrFamily ();
+extern bool_t xdr_Device_Flags ();
+extern bool_t xdr_Device_ErrorCode ();
+extern bool_t xdr_Device_Error ();
+extern bool_t xdr_Create_LinkParms ();
+extern bool_t xdr_Create_LinkResp ();
+extern bool_t xdr_Device_WriteParms ();
+extern bool_t xdr_Device_WriteResp ();
+extern bool_t xdr_Device_ReadParms ();
+extern bool_t xdr_Device_ReadResp ();
+extern bool_t xdr_Device_ReadStbResp ();
+extern bool_t xdr_Device_GenericParms ();
+extern bool_t xdr_Device_RemoteFunc ();
+extern bool_t xdr_Device_EnableSrqParms ();
+extern bool_t xdr_Device_LockParms ();
+extern bool_t xdr_Device_DocmdParms ();
+extern bool_t xdr_Device_DocmdResp ();
+extern bool_t xdr_Device_SrqParms ();
+
+#endif /* K&R C */
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* !_VXI11_H_RPCGEN */
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11.x
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11.x (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11.x (revision 145)
@@ -0,0 +1,317 @@
+/* This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
+ * which are part of the asynDriver (R4-5) EPICS module, which, at time of
+ * writing, is available from:
+ * http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
+ * More general information about EPICS is available from:
+ * http://www.aps.anl.gov/epics/
+ * This code is open source, and is covered under the copyright notice and
+ * software license agreement shown below, and also at:
+ * http://www.aps.anl.gov/epics/license/open.php
+ *
+ * In order to comply with section 4.3 of the software license agreement, here
+ * is a PROMINENT NOTICE OF CHNAGES TO THE SOFTWARE
+ * ===========================================
+ * (1) This file, vxi11.x, is the concatenation of the files vxi11core.rpcl and
+ * vxi11intr.rpcl
+ * (2) Tab spacing has been tidied up
+ *
+ * It is intended as a lightweight base for the vxi11 rpc protocol. If you
+ * run rpcgen on this file, it will generate C files and headers, from which
+ * it is relatively simple to write C programs to communicate with a range
+ * of ethernet-enabled instruments, such as oscilloscopes and function
+ * generated by manufacturers such as Agilent and Tektronix (amongst many
+ * others).
+ *
+ * For what it's worth, this concatenation was done by Steve Sharples at
+ * the University of Nottingham, UK, on 1 June 2006.
+ *
+ * Copyright notice and software license agreement follow, then the
+ * original comments from vxi11core.rpcl etc.
+ *
+ ******************************************************************************
+ * Copyright © 2006 <University of Chicago and other copyright holders>. All
+ * rights reserved.
+ ******************************************************************************
+ *
+ ******************************************************************************
+ * vxi11.x is distributed subject to the following license conditions:
+ * SOFTWARE LICENSE AGREEMENT
+ * Software: vxi11.x
+ *
+ * 1. The "Software", below, refers to vxi11.x (in either source code, or
+ * binary form and accompanying documentation). Each licensee is addressed
+ * as "you" or "Licensee."
+ *
+ * 2. The copyright holders shown above and their third-party licensors hereby
+ * grant Licensee a royalty-free nonexclusive license, subject to the
+ * limitations stated herein and U.S. Government license rights.
+ *
+ * 3. You may modify and make a copy or copies of the Software for use within
+ * your organization, if you meet the following conditions:
+ * 1. Copies in source code must include the copyright notice and this
+ * Software License Agreement.
+ * 2. Copies in binary form must include the copyright notice and this
+ * Software License Agreement in the documentation and/or other
+ * materials provided with the copy.
+ *
+ * 4. You may modify a copy or copies of the Software or any portion of it,
+ * thus forming a work based on the Software, and distribute copies of such
+ * work outside your organization, if you meet all of the following
+ * conditions:
+ * 1. Copies in source code must include the copyright notice and this
+ * Software License Agreement;
+ * 2. Copies in binary form must include the copyright notice and this
+ * Software License Agreement in the documentation and/or other
+ * materials provided with the copy;
+ * 3. Modified copies and works based on the Software must carry
+ * prominent notices stating that you changed specified portions of
+ * the Software.
+ *
+ * 5. Portions of the Software resulted from work developed under a U.S.
+ * Government contract and are subject to the following license: the
+ * Government is granted for itself and others acting on its behalf a
+ * paid-up, nonexclusive, irrevocable worldwide license in this computer
+ * software to reproduce, prepare derivative works, and perform publicly
+ * and display publicly.
+ *
+ * 6. WARRANTY DISCLAIMER. THE SOFTWARE IS SUPPLIED "AS IS" WITHOUT WARRANTY OF
+ * ANY KIND. THE COPYRIGHT HOLDERS, THEIR THIRD PARTY LICENSORS, THE UNITED
+ * STATES, THE UNITED STATES DEPARTMENT OF ENERGY, AND THEIR EMPLOYEES: (1)
+ * DISCLAIM ANY WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
+ * ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
+ * PURPOSE, TITLE OR NON-INFRINGEMENT, (2) DO NOT ASSUME ANY LEGAL LIABILITY
+ * OR RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF THE
+ * SOFTWARE, (3) DO NOT REPRESENT THAT USE OF THE SOFTWARE WOULD NOT INFRINGE
+ * PRIVATELY OWNED RIGHTS, (4) DO NOT WARRANT THAT THE SOFTWARE WILL FUNCTION
+ * UNINTERRUPTED, THAT IT IS ERROR-FREE OR THAT ANY ERRORS WILL BE CORRECTED.
+ *
+ * 7. LIMITATION OF LIABILITY. IN NO EVENT WILL THE COPYRIGHT HOLDERS, THEIR
+ * THIRD PARTY LICENSORS, THE UNITED STATES, THE UNITED STATES DEPARTMENT OF
+ * ENERGY, OR THEIR EMPLOYEES: BE LIABLE FOR ANY INDIRECT, INCIDENTAL,
+ * CONSEQUENTIAL, SPECIAL OR PUNITIVE DAMAGES OF ANY KIND OR NATURE,
+ * INCLUDING BUT NOT LIMITED TO LOSS OF PROFITS OR LOSS OF DATA, FOR ANY
+ * REASON WHATSOEVER, WHETHER SUCH LIABILITY IS ASSERTED ON THE BASIS OF
+ * CONTRACT, TORT (INCLUDING NEGLIGENCE OR STRICT LIABILITY), OR OTHERWISE,
+ * EVEN IF ANY OF SAID PARTIES HAS BEEN WARNED OF THE POSSIBILITY OF SUCH
+ * LOSS OR DAMAGES.
+ ******************************************************************************
+ */
+
+/******************************************************************************
+ *
+ * vxi11core.rpcl
+ *
+ * This file is best viewed with a tabwidth of 4
+ *
+ ******************************************************************************
+ *
+ * TODO:
+ *
+ ******************************************************************************
+ *
+ * Original Author: someone from VXIbus Consortium
+ * Current Author: Benjamin Franksen
+ * Date: 03-06-97
+ *
+ * RPCL description of the core- and abort-channel of the TCP/IP Instrument
+ * Protocol Specification.
+ *
+ *
+ * Modification Log:
+ * -----------------
+ * .00 03-06-97 bfr created this file
+ *
+ ******************************************************************************
+ *
+ * Notes:
+ *
+ * This stuff is literally from
+ *
+ * VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification
+ *
+ */
+
+typedef long Device_Link;
+
+enum Device_AddrFamily
+{
+ DEVICE_TCP,
+ DEVICE_UDP
+};
+
+typedef long Device_Flags;
+
+typedef long Device_ErrorCode;
+
+struct Device_Error
+{
+ Device_ErrorCode error;
+};
+
+struct Create_LinkParms
+{
+ long clientId; /* implementation specific value */
+ bool lockDevice; /* attempt to lock the device */
+ unsigned long lock_timeout; /* time to wait for lock */
+ string device<>; /* name of device */
+};
+struct Create_LinkResp
+{
+ Device_ErrorCode error;
+ Device_Link lid;
+ unsigned short abortPort; /* for the abort RPC */
+ unsigned long maxRecvSize; /* max # of bytes accepted on write */
+};
+struct Device_WriteParms
+{
+ Device_Link lid; /* link id from create_link */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ Device_Flags flags; /* flags with options */
+ opaque data<>; /* the data length and the data itself */
+};
+struct Device_WriteResp
+{
+ Device_ErrorCode error;
+ unsigned long size; /* # of bytes written */
+};
+struct Device_ReadParms
+{
+ Device_Link lid; /* link id from create_link */
+ unsigned long requestSize; /* # of bytes requested */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ Device_Flags flags; /* flags with options */
+ char termChar; /* valid if flags & termchrset */
+};
+struct Device_ReadResp
+{
+ Device_ErrorCode error;
+ long reason; /* why read completed */
+ opaque data<>; /* the data length and the data itself */
+};
+struct Device_ReadStbResp
+{
+ Device_ErrorCode error;
+ unsigned char stb; /* the returned status byte */
+};
+struct Device_GenericParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* flags with options */
+ unsigned long lock_timeout; /* time to wait for lock */
+ unsigned long io_timeout; /* time to wait for I/O */
+};
+struct Device_RemoteFunc
+{
+ unsigned long hostAddr; /* host servicing interrupt */
+ unsigned long hostPort; /* valid port # on client */
+ unsigned long progNum; /* DEVICE_INTR */
+ unsigned long progVers; /* DEVICE_INTR_VERSION */
+ Device_AddrFamily progFamily; /* DEVICE_UDP | DEVICE_TCP */
+};
+struct Device_EnableSrqParms
+{
+ Device_Link lid; /* link id from create_link */
+ bool enable; /* enable or disable intr's */
+ opaque handle<40>; /* host specific data */
+};
+struct Device_LockParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* contains the waitlock flag */
+ unsigned long lock_timeout; /* time to wait for lock */
+};
+struct Device_DocmdParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* flags with options */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ long cmd; /* which command to execute */
+ bool network_order; /* client's byte order */
+ long datasize; /* size of individual data elements */
+ opaque data_in<>; /* docmd data parameters */
+};
+struct Device_DocmdResp
+{
+ Device_ErrorCode error;
+ opaque data_out<>; /* returned data parameters */
+};
+
+program DEVICE_ASYNC
+{
+ version DEVICE_ASYNC_VERSION
+ {
+ Device_Error device_abort (Device_Link) = 1;
+ } = 1;
+} = 0x0607B0;
+
+program DEVICE_CORE
+{
+ version DEVICE_CORE_VERSION
+ {
+ Create_LinkResp create_link (Create_LinkParms) = 10;
+ Device_WriteResp device_write (Device_WriteParms) = 11;
+ Device_ReadResp device_read (Device_ReadParms) = 12;
+ Device_ReadStbResp device_readstb (Device_GenericParms) = 13;
+ Device_Error device_trigger (Device_GenericParms) = 14;
+ Device_Error device_clear (Device_GenericParms) = 15;
+ Device_Error device_remote (Device_GenericParms) = 16;
+ Device_Error device_local (Device_GenericParms) = 17;
+ Device_Error device_lock (Device_LockParms) = 18;
+ Device_Error device_unlock (Device_Link) = 19;
+ Device_Error device_enable_srq (Device_EnableSrqParms) = 20;
+ Device_DocmdResp device_docmd (Device_DocmdParms) = 22;
+ Device_Error destroy_link (Device_Link) = 23;
+ Device_Error create_intr_chan (Device_RemoteFunc) = 25;
+ Device_Error destroy_intr_chan (void) = 26;
+ } = 1;
+} = 0x0607AF;
+
+/******************************************************************************
+ *
+ * vxi11intr.rpcl
+ *
+ * This file is best viewed with a tabwidth of 4
+ *
+ ******************************************************************************
+ *
+ * TODO:
+ *
+ ******************************************************************************
+ *
+ * Original Author: someone from VXIbus Consortium
+ * Current Author: Benjamin Franksen
+ * Date: 03-06-97
+ *
+ * RPCL description of the intr-channel of the TCP/IP Instrument Protocol
+ * Specification.
+ *
+ *
+ * Modification Log:
+ * -----------------
+ * .00 03-06-97 bfr created this file
+ *
+ ******************************************************************************
+ *
+ * Notes:
+ *
+ * This stuff is literally from
+ *
+ * "VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification"
+ *
+ */
+
+struct Device_SrqParms
+{
+ opaque handle<>;
+};
+
+program DEVICE_INTR
+{
+ version DEVICE_INTR_VERSION
+ {
+ void device_intr_srq (Device_SrqParms) = 30;
+ } = 1;
+} = 0x0607B1;
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_clnt.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_clnt.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_clnt.c (revision 145)
@@ -0,0 +1,163 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include <memory.h> /* for memset */
+#include "vxi11.h"
+
+/* Default timeout can be changed using clnt_control() */
+static struct timeval TIMEOUT = { 25, 0 };
+
+enum clnt_stat
+device_abort_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_abort,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+create_link_1(Create_LinkParms *argp, Create_LinkResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, create_link,
+ (xdrproc_t) xdr_Create_LinkParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Create_LinkResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_write_1(Device_WriteParms *argp, Device_WriteResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_write,
+ (xdrproc_t) xdr_Device_WriteParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_WriteResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_read_1(Device_ReadParms *argp, Device_ReadResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_read,
+ (xdrproc_t) xdr_Device_ReadParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_ReadResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_readstb_1(Device_GenericParms *argp, Device_ReadStbResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_readstb,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_ReadStbResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_trigger_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_trigger,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_clear_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_clear,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_remote_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_remote,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_local_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_local,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_lock_1(Device_LockParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_lock,
+ (xdrproc_t) xdr_Device_LockParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_unlock_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_unlock,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_enable_srq_1(Device_EnableSrqParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_enable_srq,
+ (xdrproc_t) xdr_Device_EnableSrqParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_docmd_1(Device_DocmdParms *argp, Device_DocmdResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_docmd,
+ (xdrproc_t) xdr_Device_DocmdParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_DocmdResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+destroy_link_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, destroy_link,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+create_intr_chan_1(Device_RemoteFunc *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, create_intr_chan,
+ (xdrproc_t) xdr_Device_RemoteFunc, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+destroy_intr_chan_1(void *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, destroy_intr_chan,
+ (xdrproc_t) xdr_void, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_intr_srq_1(Device_SrqParms *argp, void *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_intr_srq,
+ (xdrproc_t) xdr_Device_SrqParms, (caddr_t) argp,
+ (xdrproc_t) xdr_void, (caddr_t) clnt_res,
+ TIMEOUT));
+}
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_cmd.cc
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_cmd.cc (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_cmd.cc (revision 145)
@@ -0,0 +1,237 @@
+/*Predelava vmesnika vxi11 za lastne potrebe IJS F9*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+#include "vxi11_user.h"
+#define BUF_LEN 100000
+
+CLINK *clink;
+FILE *test,*test1;
+
+int query(char *mycmd){
+char buf[BUF_LEN];
+
+memset(buf, 0, BUF_LEN);
+vxi11_send(clink, mycmd);
+int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+if (bytes_returned > 0) {
+ printf("%s\n",buf);
+} else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
+
+return 0;
+}
+
+int command(char *mycmd){
+char buf[BUF_LEN];
+
+memset(buf, 0, BUF_LEN);
+vxi11_send(clink, mycmd);
+
+return 0;
+}
+
+int queryrep(char *mycmd,char *mycmp,int i){
+char buf[BUF_LEN];
+
+memset(buf, 0, BUF_LEN);
+vxi11_send(clink, mycmd);
+int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+
+if(strcmp(buf,mycmp)!=0){
+ if (bytes_returned > 0) fprintf(test1,"%d %s",i,buf);
+ else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
+
+ }
+ strcpy(mycmp,buf);
+
+return 0;
+}
+
+/*float *fbuf;
+fbuf= (float *) buf;
+if (bytes_returned > 0){
+ for (int j=1;j<3;j++) printf("%f\n",fbuf[j]);
+ }
+*/
+
+int main(void) {
+
+static char *device_ip;
+static char *device_name;
+char cmd[256],ukaz[256],end[256];
+char buf[BUF_LEN],pr1[BUF_LEN],pr2[BUF_LEN];
+int ret;
+long bytes_returned;
+
+int i,m,vnos;
+
+clink = new CLINK;
+time_t t1,t2;
+
+/*
+ fread(buf,1,size,fp);
+ float *fbuf=(float *) buf;
+ fbuf[0]
+
+*/
+ memset(ukaz, 0, 256);
+ printf("\nIJS F9 - September 2010 - Pripravil: Jaka Mur - Beta verzija\n\nProgram za povezavo in nadzor Tektronix ali LeCroy osciloskopa.\nAvtomatsko se program poveze z IP naslovom 194.249.156.91.\nVnesi 'a' za nadaljevanje, 'q' za izhod ali IP za drugo napravo: ");
+
+ while(1){
+ scanf("%s",&ukaz);
+
+ if (strncasecmp(ukaz, "q",1) == 0) return 0;
+
+ else if (strncasecmp(ukaz, "a",1) != 0) ret=vxi11_open_device(ukaz,clink);
+ else ret=vxi11_open_device("194.249.156.91",clink); //privzeti IP naprave
+
+ printf("\nPovezan z ");
+
+ memset(buf, 0, BUF_LEN);
+ vxi11_send(clink, "*IDN?");
+ bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+ if (bytes_returned > 0) {
+ printf("%s",buf);
+ break;}
+ else if (bytes_returned == -15) {
+ printf("Error.");
+ if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
+ else ret=vxi11_close_device(ukaz,clink);
+ return 0;
+ }
+
+ }
+
+ printf("\nNekatere pomembnejse nastavitve:\n");
+ command("HEADER ON");
+ command("DATA:SOURCE CH1");
+ query("DAT?");
+
+ char odg[256];
+ printf("Zelite spreminjati nastavitve? y/n/q: ");
+ scanf("%s",&odg);
+ fgets(cmd,256,stdin);
+
+ if (strncasecmp(odg, "q",1) == 0) {
+ if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
+ else ret=vxi11_close_device(ukaz,clink);
+ return 0;
+ }
+ else if (strncasecmp(odg, "y",1) == 0){
+ printf("\nSpisek komand je v Programmer Manualu!\n");
+ while(1){
+ memset(cmd, 0, 256);
+ memset(buf, 0, BUF_LEN);
+
+ printf("Vnesi ukaz, vprasanje, 'q' za izhod ali 'x' za nadaljevanje: ");
+ fgets(cmd,256,stdin);
+ cmd[strlen(cmd)-1] = 0;
+ if (strncasecmp(cmd, "q",1) == 0) {
+ if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
+ else ret=vxi11_close_device(ukaz,clink);
+ return 0;
+ }
+ if (strncasecmp(cmd, "x",1) == 0) break;
+
+ if (vxi11_send(clink, cmd) < 0) break;
+ if (strstr(cmd, "?") != 0) {
+ bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+ if (bytes_returned > 0) {
+ printf("%s\n",buf);
+ }
+ else if (bytes_returned == -15) {
+ printf("*** [ NOTHING RECEIVED ] ***\n");
+ }
+ else break;
+ }
+ }
+ }
+
+ command("HEADER OFF");
+
+ printf("\nIzbor serije meritev\n1 = za zapis waveformov v binarnem formatu\n2 = MEASU:IMM test\n3 = Shenanigans\nVnesi #: ");
+ scanf("%d",&vnos);
+//prva opcija
+ if (vnos==1){
+
+ printf("\nTrenutno je nastavljeno zapisovanje celotnih waveformov iz CH1 v datoteko 'test.txt'. Vnesite zeljeno stevilo ponovitev: ");
+ scanf("%d",&m);
+
+ test=fopen("/media/disk/vxi11_1.08/test.txt","w");
+ command("DATA:SOURCE CH1");
+ command("DATA:START 1");
+ command("DATA:STOP 1000");
+ command("DATA:ENCDG RPBINARY");
+
+(void) time(&t1);
+ query("ACQUIRE:NUMFRAMESACQUIRED?");
+
+ for(i=1;i<m+1;i++) { //zajem binarnih podatkov
+
+ memset(buf, 0, BUF_LEN);
+ vxi11_send(clink, "CURVE?");
+ int bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+
+ if (bytes_returned > 0) fwrite(buf,1,bytes_returned,test);
+ if(strcmp(buf,pr1)!=0){
+ if (bytes_returned > 0) fwrite(buf,1,1000,test);
+ else if (bytes_returned == -15) printf("*** [ NOTHING RECEIVED ] ***\n");
+ }
+ strcpy(pr1,buf);
+ }
+
+ query("ACQUIRE:NUMFRAMESACQUIRED?");
+(void) time(&t2);
+
+ printf("Koncano!\n");
+ printf("Trajanje: %ld s\n",(int)t2-t1);
+ fclose(test);
+
+ }
+//druga opcija
+ else if (vnos==2){
+
+ test1=fopen("/media/disk/vxi11_1.08/test1.txt","w");
+
+ printf("Vnesi zeljeno stevilo meritev minimuma LeCroy: ");
+ scanf("%d",&m);
+
+ for (i=0;i<m;i++) queryrep("C1:PAVA? MIN",pr2,i);
+
+ fclose(test1);
+ }
+//tretja opcija
+ else if (vnos==3){
+
+ test1=fopen("/media/disk/vxi11_1.08/test1.txt","w");
+
+ printf("Vnesi zeljeno stevilo zajemov: ");
+ scanf("%d",&m);
+
+ command("DATA:SOURCE CH1, CH2");
+ command("DATA:START 1");
+ command("DATA:STOP 1000");
+ command("DATA:ENCDG ASCII");
+
+ query("ACQUIRE:NUMFRAMESACQUIRED?");
+
+ for (i=0;i<m;i++) queryrep("CURVE?",pr2,i);
+
+ query("ACQUIRE:NUMFRAMESACQUIRED?");
+
+ fclose(test1);
+ }
+
+ if (strncasecmp(ukaz, "a",1) == 0) ret=vxi11_close_device("194.249.156.91",clink);
+ else ret=vxi11_close_device(ukaz,clink);
+
+ printf("Meritve opravljene!\nZa zakljucek pritisni 'q'! ");
+ scanf("%s",&end);
+
+ if (strcmp(end,"q")==0);
+
+ return 0;
+}
+
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_svc.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_svc.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_svc.c (revision 145)
@@ -0,0 +1,319 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include "vxi11.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <rpc/pmap_clnt.h>
+#include <string.h>
+#include <memory.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+
+#ifndef SIG_PF
+#define SIG_PF void(*)(int)
+#endif
+
+static void
+device_async_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Device_Link device_abort_1_arg;
+ } argument;
+ union {
+ Device_Error device_abort_1_res;
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case device_abort:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_abort_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_async_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+static void
+device_core_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Create_LinkParms create_link_1_arg;
+ Device_WriteParms device_write_1_arg;
+ Device_ReadParms device_read_1_arg;
+ Device_GenericParms device_readstb_1_arg;
+ Device_GenericParms device_trigger_1_arg;
+ Device_GenericParms device_clear_1_arg;
+ Device_GenericParms device_remote_1_arg;
+ Device_GenericParms device_local_1_arg;
+ Device_LockParms device_lock_1_arg;
+ Device_Link device_unlock_1_arg;
+ Device_EnableSrqParms device_enable_srq_1_arg;
+ Device_DocmdParms device_docmd_1_arg;
+ Device_Link destroy_link_1_arg;
+ Device_RemoteFunc create_intr_chan_1_arg;
+ } argument;
+ union {
+ Create_LinkResp create_link_1_res;
+ Device_WriteResp device_write_1_res;
+ Device_ReadResp device_read_1_res;
+ Device_ReadStbResp device_readstb_1_res;
+ Device_Error device_trigger_1_res;
+ Device_Error device_clear_1_res;
+ Device_Error device_remote_1_res;
+ Device_Error device_local_1_res;
+ Device_Error device_lock_1_res;
+ Device_Error device_unlock_1_res;
+ Device_Error device_enable_srq_1_res;
+ Device_DocmdResp device_docmd_1_res;
+ Device_Error destroy_link_1_res;
+ Device_Error create_intr_chan_1_res;
+ Device_Error destroy_intr_chan_1_res;
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case create_link:
+ _xdr_argument = (xdrproc_t) xdr_Create_LinkParms;
+ _xdr_result = (xdrproc_t) xdr_Create_LinkResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))create_link_1_svc;
+ break;
+
+ case device_write:
+ _xdr_argument = (xdrproc_t) xdr_Device_WriteParms;
+ _xdr_result = (xdrproc_t) xdr_Device_WriteResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_write_1_svc;
+ break;
+
+ case device_read:
+ _xdr_argument = (xdrproc_t) xdr_Device_ReadParms;
+ _xdr_result = (xdrproc_t) xdr_Device_ReadResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_read_1_svc;
+ break;
+
+ case device_readstb:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_ReadStbResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_readstb_1_svc;
+ break;
+
+ case device_trigger:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_trigger_1_svc;
+ break;
+
+ case device_clear:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_clear_1_svc;
+ break;
+
+ case device_remote:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_remote_1_svc;
+ break;
+
+ case device_local:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_local_1_svc;
+ break;
+
+ case device_lock:
+ _xdr_argument = (xdrproc_t) xdr_Device_LockParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_lock_1_svc;
+ break;
+
+ case device_unlock:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_unlock_1_svc;
+ break;
+
+ case device_enable_srq:
+ _xdr_argument = (xdrproc_t) xdr_Device_EnableSrqParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_enable_srq_1_svc;
+ break;
+
+ case device_docmd:
+ _xdr_argument = (xdrproc_t) xdr_Device_DocmdParms;
+ _xdr_result = (xdrproc_t) xdr_Device_DocmdResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_docmd_1_svc;
+ break;
+
+ case destroy_link:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))destroy_link_1_svc;
+ break;
+
+ case create_intr_chan:
+ _xdr_argument = (xdrproc_t) xdr_Device_RemoteFunc;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))create_intr_chan_1_svc;
+ break;
+
+ case destroy_intr_chan:
+ _xdr_argument = (xdrproc_t) xdr_void;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))destroy_intr_chan_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_core_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+static void
+device_intr_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Device_SrqParms device_intr_srq_1_arg;
+ } argument;
+ union {
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case device_intr_srq:
+ _xdr_argument = (xdrproc_t) xdr_Device_SrqParms;
+ _xdr_result = (xdrproc_t) xdr_void;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_intr_srq_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_intr_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+int
+main (int argc, char **argv)
+{
+ register SVCXPRT *transp;
+
+ pmap_unset (DEVICE_ASYNC, DEVICE_ASYNC_VERSION);
+ pmap_unset (DEVICE_CORE, DEVICE_CORE_VERSION);
+ pmap_unset (DEVICE_INTR, DEVICE_INTR_VERSION);
+
+ transp = svcudp_create(RPC_ANYSOCK);
+ if (transp == NULL) {
+ fprintf (stderr, "%s", "cannot create udp service.");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_ASYNC, DEVICE_ASYNC_VERSION, device_async_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_ASYNC, DEVICE_ASYNC_VERSION, udp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_CORE, DEVICE_CORE_VERSION, device_core_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_CORE, DEVICE_CORE_VERSION, udp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_INTR, DEVICE_INTR_VERSION, device_intr_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_INTR, DEVICE_INTR_VERSION, udp).");
+ exit(1);
+ }
+
+ transp = svctcp_create(RPC_ANYSOCK, 0, 0);
+ if (transp == NULL) {
+ fprintf (stderr, "%s", "cannot create tcp service.");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_ASYNC, DEVICE_ASYNC_VERSION, device_async_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_ASYNC, DEVICE_ASYNC_VERSION, tcp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_CORE, DEVICE_CORE_VERSION, device_core_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_CORE, DEVICE_CORE_VERSION, tcp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_INTR, DEVICE_INTR_VERSION, device_intr_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_INTR, DEVICE_INTR_VERSION, tcp).");
+ exit(1);
+ }
+
+ svc_run ();
+ fprintf (stderr, "%s", "svc_run returned");
+ exit (1);
+ /* NOTREACHED */
+}
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.cc
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.cc (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.cc (revision 145)
@@ -0,0 +1,728 @@
+/* Revision history: */
+/* $Id: vxi11_user.cc,v 1.17 2008/10/20 07:59:54 sds Exp $ */
+/*
+ * $Log: vxi11_user.cc,v $
+ * Revision 1.17 2008/10/20 07:59:54 sds
+ * Removed Manfred's surname at his request from the comments/acknowledgments.
+ *
+ * Revision 1.16 2008/09/03 14:30:13 sds
+ * added sanity check for link->maxRecvSize to make sure it's >0.
+ * This got around a bug in some versions of the Agilent Infiniium
+ * scope software.
+ *
+ * Revision 1.15 2007/10/30 12:55:15 sds
+ * changed the erroneous strncpy() to memcpy() in vxi11_send,
+ * as we could be sending binary data (not just strings).
+ *
+ * Revision 1.14 2007/10/30 12:46:48 sds
+ * changed a lot of char *'s to const char *'s in an attempt to get
+ * rid of pedantic gcc compiler warnings.
+ *
+ * Revision 1.13 2007/10/09 08:42:57 sds
+ * Minor change to vxi11_receive_data_block(), this fn now
+ * copes with instruments that return just "#0" (for whatever
+ * reason). Suggestion by Jarek Sadowski.
+ *
+ * Revision 1.12 2007/08/31 10:32:39 sds
+ * Bug fix in vxi11_receive(), to ensure that no more than "len"
+ * bytes are ever received (and so avoiding a segmentation fault).
+ * This was a bug introduced in release 1.04 (RCS 1.10) whilst
+ * making some other changes to the vxi11_receive() fn. Many thanks
+ * to Rob Penny for spotting the bug and providing a patch.
+ *
+ * Revision 1.11 2007/07/10 13:49:18 sds
+ * Changed the vxi11_open_device() fn to accept a third argument, char *device.
+ * This gets passed to the core vxi11_open_device() fn (the one that deals with
+ * separate clients and links), and the core vxi11_open_link() fn; these two
+ * core functions have also had an extra parameter added accordingly. In order
+ * to not break the API, a wrapper function is provided in the form of the
+ * original vxi11_open_device() fn, that just takes 2 arguments
+ * (char *ip, CLINK *clink), this then passes "inst0" as the device argument.
+ * Backwards-compatible wrappers for the core functions have NOT been provided.
+ * These are generally not used from userland anyway. Hopefully this won't
+ * upset anyone!
+ *
+ * Revision 1.10 2007/07/10 11:12:12 sds
+ * Patches provided by Robert Larice. This basically solves the problem
+ * of having to recreate a link each time you change client. In the words
+ * of Robert:
+ *
+ * ---------
+ * In the source code there were some strange comments, suggesting
+ * you had trouble to get more than one link working.
+ *
+ * I think thats caused by some misuse of the rpcgen generated subroutines.
+ * 1) those rpcgen generated *_1 functions returned pointers to
+ * statically allocated temporary structs.
+ * those where meant to be instantly copied to the user's space,
+ * which wasn't done, thus instead of
+ * Device_ReadResp *read_resp;
+ * read_resp = device_read_1(...)
+ * one should have written someting like:
+ * Device_ReadResp *read_resp;
+ * read_resp = malloc(...)
+ * memcpy(read_resp, device_read_1(...), ...)
+ * 2) but a better fix is to use the rpcgen -M Flag
+ * which allows to pass the memory space as a third argument
+ * so one can write
+ * Device_ReadResp *read_resp;
+ * read_resp = malloc(...)
+ * device_read_1(..., read_resp, ...)
+ * furthermore this is now automatically thread save
+ * 3) the rpcgen function device_read_1
+ * expects a target buffer to be passed via read_resp
+ * which was not done.
+ * 4) the return value of vxi11_receive() was computed incorrectly
+ * 5) minor, Makefile typo's
+ * ---------
+ * So big thanks to Robert Larice for the patch! I've tested it
+ * (briefly) on more than one scope, and with multiple links per
+ * client, and it seems to work fine. I've thus removed all references
+ * to VXI11_ENABLE_MULTIPLE_CLIENTS, and deleted the vxi11_open_link()
+ * function that WASN'T passed an ip address (that was only called
+ * from the vxi11_send() fn, when there was more than one client).
+ *
+ * Revision 1.9 2006/12/08 12:06:58 ijc
+ * Basically the same changes as revision 1.8, except replace all
+ * references to "vxi11_receive" with "vxi11_send" and all references
+ * to "-VXI11_NULL_READ_RESP" with "-VXI11_NULL_WRITE_RESP".
+ *
+ * Revision 1.8 2006/12/07 12:22:20 sds
+ * Couple of changes, related.
+ * (1) added extra check in vxi11_receive() to see if read_resp==NULL.
+ * read_resp can apparently be NULL if (eg) you send an instrument a
+ * query, but the instrument is so busy with something else for so long
+ * that it forgets the original query. So this extra check is for that
+ * situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
+ * calling function.
+ * (2) vxi11_send_and_receive() is now aware of the possibility of
+ * being returned -VXI11_NULL_READ_RESP. If so, it re-sends the query,
+ * until either getting a "regular" read error (read_resp->error!=0) or
+ * a successful read.
+ *
+ * Revision 1.7 2006/12/06 16:27:47 sds
+ * removed call to ANSI free() fn in vxi11_receive, which according to
+ * Manfred S. "is not necessary and wrong (crashes)".
+ *
+ * Revision 1.6 2006/08/25 13:45:12 sds
+ * Major improvements to the vxi11_send function. Now takes
+ * link->maxRecvSize into account, and writes a chunk at a time
+ * until the entire message is sent. Important for sending large
+ * data sets, because the data you want to send may be larger than
+ * the instrument's "input buffer."
+ *
+ * Revision 1.5 2006/08/25 13:06:44 sds
+ * tidied up some of the return values, and made sure that if a
+ * sub-function returned an error value, this would also be
+ * returned by the calling function.
+ *
+ * Revision 1.4 2006/07/06 13:04:59 sds
+ * Lots of changes this revision.
+ * Found I was having problems talking to multiple links on the same
+ * client, if I created a different client for each one. So introduced
+ * a few global variables to keep track of all the ip addresses of
+ * clients that the library is asked to create, and only creating new
+ * clients if the ip address is different. This puts a limit of how
+ * many unique ip addresses (clients) a single process can connect to.
+ * Set this value at 256 (should hopefully be enough!).
+ * Next I found that talking to different clients on different ip
+ * addresses didn't work. It turns out that create_link_1() creates
+ * a static structure. This this link is associated with a given
+ * client (and hence a given IP address), then the only way I could
+ * think of making things work was to add a call to an
+ * vxi11_open_link() function before each send command (no idea what
+ * this adds to overheads and it's very messy!) - at least I was
+ * able to get this to only happen when we are using more than one
+ * client/ip address.
+ * Also, while I was at it, I re-ordered the functions a little -
+ * starts with core user functions, extra user functions, then core
+ * library functions at the end. Added a few more comments. Tidied
+ * up. Left some debugging info in, but commented out.
+ *
+ * Revision 1.3 2006/06/26 12:40:56 sds
+ * Introduced a new CLINK structure, to reduce the number of arguments
+ * passed to functions. Wrote wrappers for open(), close(), send()
+ * and receieve() functions, then adjusted all the other functions built
+ * on those to make use of the CLINK structure.
+ *
+ * Revision 1.2 2006/06/26 10:29:48 sds
+ * Added GNU GPL and copyright notices.
+ *
+ */
+
+/* vxi11_user.cc
+ * Copyright (C) 2006 Steve D. Sharples
+ *
+ * User library for opening, closing, sending to and receiving from
+ * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
+ * generated by rpcgen vxi11.x.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * The author's email address is steve.sharples@nottingham.ac.uk
+ */
+
+#include "vxi11_user.h"
+
+/*****************************************************************************
+ * GENERAL NOTES
+ *****************************************************************************
+ *
+ * There are four functions at the heart of this library:
+ *
+ * int vxi11_open_device(char *ip, CLIENT **client, VXI11_LINK **link)
+ * int vxi11_close_device(char *ip, CLIENT *client, VXI11_LINK *link)
+ * int vxi11_send(CLIENT *client, VXI11_LINK *link, char *cmd, unsigned long len)
+ * long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout)
+ *
+ * Note that all 4 of these use separate client and link structures. All the
+ * other functions are built on these four core functions, and the first layer
+ * of abstraction is to combine the CLIENT and VXI11_LINK structures into a
+ * single entity, which I've called a CLINK. For the send and receive
+ * functions, this is just a simple wrapper. For the open and close functions
+ * it's a bit more complicated, because we somehow have to keep track of
+ * whether we've already opened a device with the same IP address before (in
+ * which case we need to recycle a previously created client), or whether
+ * we've still got any other links to a given IP address left when we are
+ * asked to close a clink (in which case we can sever the link, but have to
+ * keep the client open). This is so the person using this library from
+ * userland does not have to keep track of whether they are talking to a
+ * different physical instrument or not each time they establish a connection.
+ *
+ * So the base functions that the user will probably want to use are:
+ *
+ * int vxi11_open_device(char *ip, CLINK *clink)
+ * int vxi11_close_device(char *ip, CLINK *clink)
+ * int vxi11_send(CLINK *clink, char *cmd, unsigned long len)
+ * --- or --- (if sending just text)
+ * int vxi11_send(CLINK *clink, char *cmd)
+ * long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
+ *
+ * There are then useful (to me, anyway) more specific functions built on top
+ * of these:
+ *
+ * int vxi11_send_data_block(CLINK *clink, char *cmd, char *buffer, unsigned long len)
+ * long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
+ * long vxi11_send_and_receive(CLINK *clink, char *cmd, char *buf, unsigned long buf_len, unsigned long timeout)
+ * long vxi11_obtain_long_value(CLINK *clink, char *cmd, unsigned long timeout)
+ * double vxi11_obtain_double_value(CLINK *clink, char *cmd, unsigned long timeout)
+ *
+ * (then there are some shorthand wrappers for the above without specifying
+ * the timeout due to sheer laziness---explore yourself)
+ */
+
+
+/* Global variables. Keep track of multiple links per client. We need this
+ * because:
+ * - we'd like the library to be able to cope with multiple links to a given
+ * client AND multiple links to multiple clients
+ * - we'd like to just refer to a client/link ("clink") as a single
+ * entity from user land, we don't want to worry about different
+ * initialisation procedures, depending on whether it's an instrument
+ * with the same IP address or not
+ */
+char VXI11_IP_ADDRESS[VXI11_MAX_CLIENTS][20];
+CLIENT *VXI11_CLIENT_ADDRESS[VXI11_MAX_CLIENTS];
+int VXI11_DEVICE_NO = 0;
+int VXI11_LINK_COUNT[VXI11_MAX_CLIENTS];
+
+/*****************************************************************************
+ * KEY USER FUNCTIONS - USE THESE FROM YOUR PROGRAMS OR INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* OPEN FUNCTIONS *
+ * ============== */
+
+/* Use this function from user land to open a device and create a link. Can be
+ * used multiple times for the same device (the library will keep track).*/
+int vxi11_open_device(const char *ip, CLINK *clink, char *device) {
+int ret;
+int l;
+int device_no=-1;
+
+// printf("before doing anything, clink->link = %ld\n", clink->link);
+ /* Have a look to see if we've already initialised an instrument with
+ * this IP address */
+ for (l=0; l<VXI11_MAX_CLIENTS; l++){
+ if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
+ device_no=l;
+// printf("Open function, search, found ip address %s, device no %d\n",ip,device_no);
+ }
+ }
+
+ /* Couldn't find a match, must be a new IP address */
+ if (device_no < 0) {
+ /* Uh-oh, we're out of storage space. Increase the #define
+ * for VXI11_MAX_CLIENTS in vxi11_user.h */
+ if (VXI11_DEVICE_NO >= VXI11_MAX_CLIENTS) {
+ printf("Error: maximum of %d clients allowed\n",VXI11_MAX_CLIENTS);
+ ret = -VXI11_MAX_CLIENTS;
+ }
+ /* Create a new client, keep a note of where the client pointer
+ * is, for this IP address. Because it's a new client, this
+ * must be link number 1. Keep track of how many devices we've
+ * opened so we don't run out of storage space. */
+ else {
+ ret = vxi11_open_device(ip, &(clink->client), &(clink->link), device);
+ strncpy(VXI11_IP_ADDRESS[VXI11_DEVICE_NO],ip,20);
+ VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO] = clink->client;
+ VXI11_LINK_COUNT[VXI11_DEVICE_NO]=1;
+// printf("Open function, could not find ip address %s.\n",ip);
+// printf("So now, VXI11_IP_ADDRESS[%d]=%s,\n",VXI11_DEVICE_NO,VXI11_IP_ADDRESS[VXI11_DEVICE_NO]);
+// printf("VXI11_CLIENT_ADDRESS[%d]=%ld,\n",VXI11_DEVICE_NO,VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO]);
+// printf(" clink->client=%ld,\n",clink->client);
+// printf("VXI11_LINK_COUNT[%d]=%d.\n",VXI11_DEVICE_NO,VXI11_LINK_COUNT[VXI11_DEVICE_NO]);
+ VXI11_DEVICE_NO++;
+ }
+ }
+ /* already got a client for this IP address */
+ else {
+ /* Copy the client pointer address. Just establish a new link
+ * (not a new client). Add one to the link count */
+ clink->client = VXI11_CLIENT_ADDRESS[device_no];
+ ret = vxi11_open_link(ip, &(clink->client), &(clink->link), device);
+// printf("Found an ip address, copying client from VXI11_CLIENT_ADDRESS[%d]\n",device_no);
+ VXI11_LINK_COUNT[device_no]++;
+// printf("Have just incremented VXI11_LINK_COUNT[%d], it's now %d\n",device_no,VXI11_LINK_COUNT[device_no]);
+ }
+// printf("after creating link, clink->link = %ld\n", clink->link);
+ return ret;
+ }
+
+/* This is a wrapper function, used for the situations where there is only one
+ * "device" per client. This is the case for most (if not all) VXI11
+ * instruments; however, it is _not_ the case for devices such as LAN to GPIB
+ * gateways. These are single clients that communicate to many instruments
+ * (devices). In order to differentiate between them, we need to pass a device
+ * name. This gets used in the vxi11_open_link() fn, as the link_parms.device
+ * value. */
+int vxi11_open_device(const char *ip, CLINK *clink) {
+ char device[6];
+ strncpy(device,"inst0",6);
+ return vxi11_open_device(ip, clink, device);
+ }
+
+
+
+/* CLOSE FUNCTION *
+ * ============== */
+
+/* Use this function from user land to close a device and/or sever a link. Can
+ * be used multiple times for the same device (the library will keep track).*/
+int vxi11_close_device(const char *ip, CLINK *clink) {
+int l,ret;
+int device_no = -1;
+
+ /* Which instrument are we referring to? */
+ for (l=0; l<VXI11_MAX_CLIENTS; l++){
+ if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
+ device_no=l;
+ }
+ }
+ /* Something's up if we can't find the IP address! */
+ if (device_no == -1) {
+ printf("vxi11_close_device: error: I have no record of you ever opening device\n");
+ printf(" with IP address %s\n",ip);
+ ret = -4;
+ }
+ else { /* Found the IP, there's more than one link to that instrument,
+ * so keep track and just close the link */
+ if (VXI11_LINK_COUNT[device_no] > 1 ) {
+ ret = vxi11_close_link(ip,clink->client, clink->link);
+ VXI11_LINK_COUNT[device_no]--;
+ }
+ /* Found the IP, it's the last link, so close the device (link
+ * AND client) */
+ else {
+ ret = vxi11_close_device(ip, clink->client, clink->link);
+ }
+ }
+ return ret;
+ }
+
+
+/* SEND FUNCTIONS *
+ * ============== */
+
+/* A _lot_ of the time we are sending text strings, and can safely rely on
+ * strlen(cmd). */
+int vxi11_send(CLINK *clink, const char *cmd) {
+ return vxi11_send(clink, cmd, strlen(cmd));
+ }
+
+/* We still need the version of the function where the length is set explicitly
+ * though, for when we are sending fixed length data blocks. */
+int vxi11_send(CLINK *clink, const char *cmd, unsigned long len) {
+ return vxi11_send(clink->client, clink->link, cmd, len);
+ }
+
+
+/* RECEIVE FUNCTIONS *
+ * ================= */
+
+/* Lazy wrapper for when I can't be bothered to specify a read timeout */
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len) {
+ return vxi11_receive(clink, buffer, len, VXI11_READ_TIMEOUT);
+ }
+
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
+ return vxi11_receive(clink->client, clink->link, buffer, len, timeout);
+ }
+
+
+
+/*****************************************************************************
+ * USEFUL ADDITIONAL HIGHER LEVER USER FUNCTIONS - USE THESE FROM YOUR *
+ * PROGRAMS OR INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* SEND FIXED LENGTH DATA BLOCK FUNCTION *
+ * ===================================== */
+int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len) {
+char *out_buffer;
+int cmd_len=strlen(cmd);
+int ret;
+
+ out_buffer=new char[cmd_len+10+len];
+ sprintf(out_buffer,"%s#8%08lu",cmd,len);
+ memcpy(out_buffer+cmd_len+10,buffer,(unsigned long) len);
+ ret = vxi11_send(clink, out_buffer, (unsigned long) (cmd_len+10+len));
+ delete[] out_buffer;
+ return ret;
+ }
+
+
+/* RECEIVE FIXED LENGTH DATA BLOCK FUNCTION *
+ * ======================================== */
+
+/* This function reads a response in the form of a definite-length block, such
+ * as when you ask for waveform data. The data is returned in the following
+ * format:
+ * #800001000<1000 bytes of data>
+ * ||\______/
+ * || |
+ * || \---- number of bytes of data
+ * |\--------- number of digits that follow (in this case 8, with leading 0's)
+ * \---------- always starts with #
+ */
+long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
+/* I'm not sure what the maximum length of this header is, I'll assume it's
+ * 11 (#9 + 9 digits) */
+unsigned long necessary_buffer_size;
+char *in_buffer;
+int ret;
+int ndigits;
+unsigned long returned_bytes;
+int l;
+char scan_cmd[20];
+ necessary_buffer_size=len+12;
+ in_buffer=new char[necessary_buffer_size];
+ ret=vxi11_receive(clink, in_buffer, necessary_buffer_size, timeout);
+ if (ret < 0) return ret;
+ if (in_buffer[0] != '#') {
+ printf("vxi11_user: data block error: data block does not begin with '#'\n");
+ printf("First 20 characters received were: '");
+ for(l=0;l<20;l++) {
+ printf("%c",in_buffer[l]);
+ }
+ printf("'\n");
+ return -3;
+ }
+
+ /* first find out how many digits */
+ sscanf(in_buffer,"#%1d",&ndigits);
+ /* some instruments, if there is a problem acquiring the data, return only "#0" */
+ if (ndigits > 0) {
+ /* now that we know, we can convert the next <ndigits> bytes into an unsigned long */
+ sprintf(scan_cmd,"#%%1d%%%dlu",ndigits);
+ sscanf(in_buffer,scan_cmd,&ndigits,&returned_bytes);
+ memcpy(buffer, in_buffer+(ndigits+2), returned_bytes);
+ delete[] in_buffer;
+ return (long) returned_bytes;
+ }
+ else return 0;
+ }
+
+
+/* SEND AND RECEIVE FUNCTION *
+ * ========================= */
+
+/* This is mainly a useful function for the overloaded vxi11_obtain_value()
+ * fn's, but is also handy and useful for user and library use */
+long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout) {
+int ret;
+long bytes_returned;
+ do {
+ ret = vxi11_send(clink, cmd);
+ if (ret != 0) {
+ if (ret != -VXI11_NULL_WRITE_RESP) {
+ printf("Error: vxi11_send_and_receive: could not send cmd.\n");
+ printf(" The function vxi11_send returned %d. ",ret);
+ return -1;
+ }
+ else printf("(Info: VXI11_NULL_WRITE_RESP in vxi11_send_and_receive, resending query)\n");
+ }
+
+ bytes_returned = vxi11_receive(clink, buf, buf_len, timeout);
+ if (bytes_returned <= 0) {
+ if (bytes_returned >-VXI11_NULL_READ_RESP) {
+ printf("Error: vxi11_send_and_receive: problem reading reply.\n");
+ printf(" The function vxi11_receive returned %ld. ",bytes_returned);
+ return -2;
+ }
+ else printf("(Info: VXI11_NULL_READ_RESP in vxi11_send_and_receive, resending query)\n");
+ }
+ } while (bytes_returned == -VXI11_NULL_READ_RESP || ret == -VXI11_NULL_WRITE_RESP);
+ return 0;
+ }
+
+
+/* FUNCTIONS TO RETURN A LONG INTEGER VALUE SENT AS RESPONSE TO A QUERY *
+ * ==================================================================== */
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout) {
+char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
+ memset(buf, 0, 50);
+ if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
+ printf("Returning 0\n");
+ return 0;
+ }
+ return strtol(buf, (char **)NULL, 10);
+ }
+
+/* Lazy wrapper function with default read timeout */
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd) {
+ return vxi11_obtain_long_value(clink, cmd, VXI11_READ_TIMEOUT);
+ }
+
+
+/* FUNCTIONS TO RETURN A DOUBLE FLOAT VALUE SENT AS RESPONSE TO A QUERY *
+ * ==================================================================== */
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout) {
+char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
+double val;
+ memset(buf, 0, 50);
+ if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
+ printf("Returning 0.0\n");
+ return 0.0;
+ }
+ val = strtod(buf, (char **)NULL);
+ return val;
+ }
+
+/* Lazy wrapper function with default read timeout */
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd) {
+ return vxi11_obtain_double_value(clink, cmd, VXI11_READ_TIMEOUT);
+ }
+
+
+/*****************************************************************************
+ * CORE FUNCTIONS - YOU SHOULDN'T NEED TO USE THESE FROM YOUR PROGRAMS OR *
+ * INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* OPEN FUNCTIONS *
+ * ============== */
+int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
+
+ *client = clnt_create(ip, DEVICE_CORE, DEVICE_CORE_VERSION, "tcp");
+
+ if (*client == NULL) {
+ clnt_pcreateerror(ip);
+ return -1;
+ }
+
+ return vxi11_open_link(ip, client, link, device);
+ }
+
+int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
+
+Create_LinkParms link_parms;
+
+ /* Set link parameters */
+ link_parms.clientId = (long) *client;
+ link_parms.lockDevice = 0;
+ link_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
+ link_parms.device = device;
+
+ *link = (Create_LinkResp *) calloc(1, sizeof(Create_LinkResp));
+
+ if (create_link_1(&link_parms, *link, *client) != RPC_SUCCESS) {
+ clnt_perror(*client, ip);
+ return -2;
+ }
+ return 0;
+ }
+
+
+/* CLOSE FUNCTIONS *
+ * =============== */
+int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link) {
+int ret;
+
+ ret = vxi11_close_link(ip, client, link);
+
+ clnt_destroy(client);
+
+ return ret;
+ }
+
+int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link) {
+Device_Error dev_error;
+ memset(&dev_error, 0, sizeof(dev_error));
+
+ if (destroy_link_1(&link->lid, &dev_error, client) != RPC_SUCCESS) {
+ clnt_perror(client,ip);
+ return -1;
+ }
+
+ return 0;
+ }
+
+
+/* SEND FUNCTIONS *
+ * ============== */
+
+/* A _lot_ of the time we are sending text strings, and can safely rely on
+ * strlen(cmd). */
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd) {
+ return vxi11_send(client, link, cmd, strlen(cmd));
+ }
+
+/* We still need the version of the function where the length is set explicitly
+ * though, for when we are sending fixed length data blocks. */
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len) {
+Device_WriteParms write_parms;
+int bytes_left = (int)len;
+char *send_cmd;
+
+ send_cmd = new char[len];
+ memcpy(send_cmd, cmd, len);
+
+ write_parms.lid = link->lid;
+ write_parms.io_timeout = VXI11_DEFAULT_TIMEOUT;
+ write_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
+
+/* We can only write (link->maxRecvSize) bytes at a time, so we sit in a loop,
+ * writing a chunk at a time, until we're done. */
+
+ do {
+ Device_WriteResp write_resp;
+ memset(&write_resp, 0, sizeof(write_resp));
+
+ if (bytes_left <= link->maxRecvSize) {
+ write_parms.flags = 8;
+ write_parms.data.data_len = bytes_left;
+ }
+ else {
+ write_parms.flags = 0;
+ /* We need to check that maxRecvSize is a sane value (ie >0). Believe it
+ * or not, on some versions of Agilent Infiniium scope firmware the scope
+ * returned "0", which breaks Rule B.6.3 of the VXI-11 protocol. Nevertheless
+ * we need to catch this, otherwise the program just hangs. */
+ if (link->maxRecvSize > 0) {
+ write_parms.data.data_len = link->maxRecvSize;
+ }
+ else {
+ write_parms.data.data_len = 4096; /* pretty much anything should be able to cope with 4kB */
+ }
+ }
+ write_parms.data.data_val = send_cmd + (len - bytes_left);
+
+ if(device_write_1(&write_parms, &write_resp, client) != RPC_SUCCESS) {
+ delete[] send_cmd;
+ return -VXI11_NULL_WRITE_RESP; /* The instrument did not acknowledge the write, just completely
+ dropped it. There was no vxi11 comms error as such, the
+ instrument is just being rude. Usually occurs when the instrument
+ is busy. If we don't check this first, then the following
+ line causes a seg fault */
+ }
+ if (write_resp . error != 0) {
+ printf("vxi11_user: write error: %d\n",write_resp . error);
+ delete[] send_cmd;
+ return -(write_resp . error);
+ }
+ bytes_left -= write_resp . size;
+ } while (bytes_left > 0);
+
+ delete[] send_cmd;
+ return 0;
+ }
+
+
+/* RECEIVE FUNCTIONS *
+ * ================= */
+
+// It appeared that this function wasn't correctly dealing with more data available than specified in len.
+// This patch attempts to fix this issue. RDP 2007/8/13
+
+/* wrapper, for default timeout */ long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len) { return vxi11_receive(client, link, buffer, len, VXI11_READ_TIMEOUT);
+ }
+
+#define RCV_END_BIT 0x04 // An end indicator has been read
+#define RCV_CHR_BIT 0x02 // A termchr is set in flags and a character which matches termChar is transferred
+#define RCV_REQCNT_BIT 0x01 // requestSize bytes have been transferred. This includes a request size of zero.
+
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout) {
+Device_ReadParms read_parms;
+Device_ReadResp read_resp;
+long curr_pos = 0;
+
+ read_parms.lid = link->lid;
+ read_parms.requestSize = len;
+ read_parms.io_timeout = timeout; /* in ms */
+ read_parms.lock_timeout = timeout; /* in ms */
+ read_parms.flags = 0;
+ read_parms.termChar = 0;
+
+ do {
+ memset(&read_resp, 0, sizeof(read_resp));
+
+ read_resp.data.data_val = buffer + curr_pos;
+ read_parms.requestSize = len - curr_pos; // Never request more total data than originally specified in len
+
+ if(device_read_1(&read_parms, &read_resp, client) != RPC_SUCCESS) {
+ return -VXI11_NULL_READ_RESP; /* there is nothing to read. Usually occurs after sending a query
+ which times out on the instrument. If we don't check this first,
+ then the following line causes a seg fault */
+ }
+ if (read_resp . error != 0) {
+ /* Read failed for reason specified in error code.
+ * 0 no error
+ * 4 invalid link identifier
+ * 11 device locked by another link
+ * 15 I/O timeout
+ * 17 I/O error
+ * 23 abort
+ */
+
+ printf("vxi11_user: read error: %d\n",read_resp . error);
+ return -(read_resp . error);
+ }
+
+ if((curr_pos + read_resp . data.data_len) <= len) {
+ curr_pos += read_resp . data.data_len;
+ }
+ if( (read_resp.reason & RCV_END_BIT) || (read_resp.reason & RCV_CHR_BIT) ) {
+ break;
+ }
+ else if( curr_pos == len ) {
+ printf("xvi11_user: read error: buffer too small. Read %d bytes without hitting terminator.\n", curr_pos );
+ return -100;
+ }
+ } while(1);
+ return (curr_pos); /*actual number of bytes received*/
+
+ }
+
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.h
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.h (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_user.h (revision 145)
@@ -0,0 +1,136 @@
+/* Revision history: */
+/* $Id: vxi11_user.h,v 1.10 2007/10/30 12:47:33 sds Exp $ */
+/*
+ * $Log: vxi11_user.h,v $
+ * Revision 1.10 2007/10/30 12:47:33 sds
+ * changed a lot of char *'s to const char *'s in an attempt to get
+ * rid of pedantic gcc compiler warnings.
+ *
+ * Revision 1.9 2007/07/11 14:20:56 sds
+ * removed #include <iostream> as not needed
+ * removed using namespace std
+ *
+ * Revision 1.8 2007/07/10 13:54:11 sds
+ * Added extra function:
+ * int vxi11_open_device(char *ip, CLINK *clink, char *device);
+ * This replaces the original vxi11_open_device fn, which did not pass
+ * a char *device. Wrapper fn used for backwards compatibility.
+ *
+ * Revision 1.7 2007/07/10 11:20:43 sds
+ * removed the following function:
+ * int vxi11_open_link(CLIENT **client, VXI11_LINK **link);
+ * ...since it was no longer needed, following the patch by
+ * Robert Larice.
+ *
+ * Revision 1.6 2006/12/08 11:47:14 ijc
+ * error on last ci, sorted.
+ *
+ * Revision 1.5 2006/12/08 11:45:29 ijc
+ * added #define VXI11_NULL_READ_RESP
+ *
+ * Revision 1.4 2006/12/07 12:26:17 sds
+ * added VXI11_NULL_READ_RESP #define
+ *
+ * Revision 1.3 2006/07/06 13:03:28 sds
+ * Surrounded the whole header with #ifndef __VXI11_USER__.
+ * Added a couple of vxi11_open_link() fns and a vxi11_close_link() fn, to
+ * separate the link stuff from the client stuff.
+ *
+ * Revision 1.2 2006/06/26 12:42:54 sds
+ * Introduced a new CLINK structure, to reduce the number of arguments
+ * passed to functions. Wrote wrappers for open(), close(), send()
+ * and receieve() functions, then adjusted all the other functions built
+ * on those to make use of the CLINK structure.
+ *
+ * Revision 1.1 2006/06/26 10:36:02 sds
+ * Initial revision
+ *
+ */
+
+/* vxi11_user.h
+ * Copyright (C) 2006 Steve D. Sharples
+ *
+ * User library for opening, closing, sending to and receiving from
+ * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
+ * generated by rpcgen vxi11.x.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * The author's email address is steve.sharples@nottingham.ac.uk
+ */
+
+#ifndef __VXI11_USER__
+#define __VXI11_USER__
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <rpc/rpc.h>
+#include "vxi11.h"
+
+#define VXI11_DEFAULT_TIMEOUT 10000 /* in ms */
+#define VXI11_READ_TIMEOUT 2000 /* in ms */
+#define VXI11_CLIENT CLIENT
+#define VXI11_LINK Create_LinkResp
+#define VXI11_MAX_CLIENTS 256 /* maximum no of unique IP addresses/clients */
+#define VXI11_NULL_READ_RESP 50 /* vxi11_receive() return value if a query
+ * times out ON THE INSTRUMENT (and so we have
+ * to resend the query again) */
+#define VXI11_NULL_WRITE_RESP 51 /* vxi11_send() return value if a sent command
+ * times out ON THE INSTURMENT. */
+
+struct CLINK {
+ VXI11_CLIENT *client;
+ VXI11_LINK *link;
+ } ;
+typedef struct CLINK CLINK;
+
+/* The four main functions: open, close, send, receieve (plus a couple of wrappers) */
+/* In fact all 6 of these are wrappers to the original functions listed at the
+ * bottom, that use separate CLIENT and VXI11_LINK structures. It was easier to
+ * write wrappers for these functions than to re-write the original functions
+ * themselves. These are the 4 (or 6 if you like) key user functions that you
+ * should probably be using. They all use the CLINK structure. */
+int vxi11_open_device(const char *ip, CLINK *clink);
+int vxi11_open_device(const char *ip, CLINK *clink, char *device);
+int vxi11_close_device(const char *ip, CLINK *clink);
+int vxi11_send(CLINK *clink, const char *cmd);
+int vxi11_send(CLINK *clink, const char *cmd, unsigned long len);
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len);
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
+int vxi11_queryxx(CLINK *clink, char *mycmd);
+/* Utility functions, that use send() and receive(). Use these too. */
+int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len);
+long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
+long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout);
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout);
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout);
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd);
+double vxi11_obtain_double_value(CLINK *link, const char *cmd);
+
+/* When I first wrote this library I used separate client and links. I've
+ * retained the original functions and just written clink wrappers for them
+ * (see above) as it's perhaps a little clearer this way. Probably not worth
+ * delving this deep in use, but it's where the real nitty gritty is. */
+int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
+int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
+int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link);
+int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link);
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd);
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len);
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len);
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout);
+
+#endif
Index: sipmscan/trunk_v0.9/vxi11_i686/vxi11_xdr.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_i686/vxi11_xdr.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_i686/vxi11_xdr.c (revision 145)
@@ -0,0 +1,462 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include "vxi11.h"
+
+bool_t
+xdr_Device_Link (XDR *xdrs, Device_Link *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_AddrFamily (XDR *xdrs, Device_AddrFamily *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_enum (xdrs, (enum_t *) objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_Flags (XDR *xdrs, Device_Flags *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ErrorCode (XDR *xdrs, Device_ErrorCode *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_Error (XDR *xdrs, Device_Error *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Create_LinkParms (XDR *xdrs, Create_LinkParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_LONG(buf, objp->clientId);
+ IXDR_PUT_BOOL(buf, objp->lockDevice);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ }
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ objp->clientId = IXDR_GET_LONG(buf);
+ objp->lockDevice = IXDR_GET_BOOL(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Create_LinkResp (XDR *xdrs, Create_LinkResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_short (xdrs, &objp->abortPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->maxRecvSize))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_WriteParms (XDR *xdrs, Device_WriteParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data.data_val, (u_int *) &objp->data.data_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_WriteResp (XDR *xdrs, Device_WriteResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->size))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadParms (XDR *xdrs, Device_ReadParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->requestSize);
+ IXDR_PUT_U_LONG(buf, objp->io_timeout);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ }
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ objp->requestSize = IXDR_GET_U_LONG(buf);
+ objp->io_timeout = IXDR_GET_U_LONG(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadResp (XDR *xdrs, Device_ReadResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->reason))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data.data_val, (u_int *) &objp->data.data_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadStbResp (XDR *xdrs, Device_ReadStbResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_u_char (xdrs, &objp->stb))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_GenericParms (XDR *xdrs, Device_GenericParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_RemoteFunc (XDR *xdrs, Device_RemoteFunc *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ buf = XDR_INLINE (xdrs, 4 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->hostAddr);
+ IXDR_PUT_U_LONG(buf, objp->hostPort);
+ IXDR_PUT_U_LONG(buf, objp->progNum);
+ IXDR_PUT_U_LONG(buf, objp->progVers);
+ }
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ buf = XDR_INLINE (xdrs, 4 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+
+ } else {
+ objp->hostAddr = IXDR_GET_U_LONG(buf);
+ objp->hostPort = IXDR_GET_U_LONG(buf);
+ objp->progNum = IXDR_GET_U_LONG(buf);
+ objp->progVers = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_EnableSrqParms (XDR *xdrs, Device_EnableSrqParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->enable))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->handle.handle_val, (u_int *) &objp->handle.handle_len, 40))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_LockParms (XDR *xdrs, Device_LockParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_DocmdParms (XDR *xdrs, Device_DocmdParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 5 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->io_timeout);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ IXDR_PUT_LONG(buf, objp->cmd);
+ IXDR_PUT_BOOL(buf, objp->network_order);
+ IXDR_PUT_LONG(buf, objp->datasize);
+ }
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 5 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+
+ } else {
+ objp->io_timeout = IXDR_GET_U_LONG(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ objp->cmd = IXDR_GET_LONG(buf);
+ objp->network_order = IXDR_GET_BOOL(buf);
+ objp->datasize = IXDR_GET_LONG(buf);
+ }
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_DocmdResp (XDR *xdrs, Device_DocmdResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data_out.data_out_val, (u_int *) &objp->data_out.data_out_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_SrqParms (XDR *xdrs, Device_SrqParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_bytes (xdrs, (char **)&objp->handle.handle_val, (u_int *) &objp->handle.handle_len, ~0))
+ return FALSE;
+ return TRUE;
+}
Index: sipmscan/trunk_v0.9/vxi11_x86_64/CHANGELOG.txt
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/CHANGELOG.txt (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/CHANGELOG.txt (revision 145)
@@ -0,0 +1,218 @@
+------------------------------------------------------------------------------
+vxi11_1.10 - 9/09/2010
+
+Bug fix (thanks to Stephan Mahr): in vxi11_close(), remove the IP address
+from the global array that keeps track of them so that if the same device
+is opened again, then a new client is created, rather than it attempting
+to use the old one (which was destroyed on the previous close).
+
+------------------------------------------------------------------------------
+vxi11_1.09 - 7/06/2010
+
+Moved over to bazaar VCS (from RCS).
+
+Makefile cleanups. Fixed signed/unsigned comparisons. Use consistent (and
+sane) struct separator spacing in code.
+
+Fix int casting on printf statements to fix new compiler warnings/errors
+(thanks to Shouri Chatterjee for pointing this out).
+
+------------------------------------------------------------------------------
+vxi11_1.08 - 3/09/2009
+
+Added a sanity check for link->maxRecvSize to make sure it's >0. This gets
+around a bug in some versions of the Agilent Infiniium scope software.
+
+Changed the erroneous strncpy() to memcpy() in vxi11_send, as we could be
+sending binary data (not just strings).
+
+Changed a lot of char *'s to const char *'s in an attempt to get rid of
+pedantic gcc compiler warnings.
+
+------------------------------------------------------------------------------
+vxi11_1.07 - 9/10/2007
+
+Minor change to vxi11_receive_data_block(), this fn now copes with instruments
+that return just "#0" (for whatever reason). Suggestion by Jarek Sadowski,
+gratefully received.
+
+------------------------------------------------------------------------------
+vxi11_1.06 - 31/08/2007
+
+Bug fix in vxi11_receive(), to ensure that no more than "len" bytes are ever
+received (and so avoiding a segmentation fault). This was a bug introduced in
+release 1.04 whilst making some other changes to the vxi11_receive() fn.
+
+Many thanks to Rob Penny for spotting the bug and providing a patch.
+
+------------------------------------------------------------------------------
+vxi11_1.05 - 11/07/2007
+
+Added the ability to specify a "device name" when calling vxi11_open_device().
+For regular VXI11-based instruments, such as scopes and AFGs, the device name
+is usually "hard wired" to be "inst0", and up to now this has been hard wired
+into the vxi11_user code. However, devices such as LAN to GPIB gateways need
+some way of distinguishing between different devices... they are a single
+client (one IP address), with multiple devices.
+
+The vxi11_user fn, vxi11_open_device(), now takes a third argument
+(char *device).
+This gets passed to the core vxi11_open_device() fn (the one that deals with
+separate clients and links), and the core vxi11_open_link() fn; these two
+core functions have also had an extra parameter added accordingly. In order
+to not break the API, a wrapper function is provided in the form of the
+original vxi11_open_device() fn, that just takes 2 arguments
+(char *ip, CLINK *clink), this then passes "inst0" as the device argument.
+Backwards-compatible wrappers for the core functions have NOT been provided.
+These are generally not used from userland anyway. Hopefully this won't
+upset anyone!
+
+vxi11_cmd, the simple test utility, has also been updated. You can now,
+optionally, pass the device_name as a second argument (after the ip
+address). The source has been renamed to vxi11_cmd.cc (from vxi11_cmd.c), as
+it is C++ code not C.
+
+Some minor tidying up in vxi11_user.h
+
+With thanks to Oliver Schulz for bringing LAN to GPIB gateways to my
+attention, for suggesting changes to the vxi11_user library to allow them to
+be accommodated, and for tidying some things up.
+
+------------------------------------------------------------------------------
+vxi11_1.04 - 10/07/2007
+
+Patch applied, which was kindly provided by Robert Larice. This sorts out
+the confusion (on my part) about the structures returned by the rpcgen
+generated *_1() functions... these are statically allocated temporary structs,
+apparently. In the words of Robert Larice:
+
+******
+Hello Dr. Sharples,
+
+ I'm sending some patches for your nice gem "vxi11_1.03"
+
+ In the source code there were some strange comments, concerning
+ a commented free() around ... Manfred S. ...
+ and some notes, suggesting you had trouble to get more than one link
+ working.
+
+ I think thats caused by some misuse of the rpcgen generated subroutines.
+ 1) those rpcgen generated *_1 functions returned pointers to
+ statically allocated temporary structs.
+ those where meant to be instantly copied to the user's space,
+ which wasn't done
+ thus instead of
+ Device_ReadResp *read_resp;
+ read_resp = device_read_1(...)
+ one should have written someting like:
+ Device_ReadResp *read_resp;
+ read_resp = malloc(...)
+ memcpy(read_resp, device_read_1(...), ...)
+ 2) but a better fix is to use the rpcgen -M Flag
+ which allows to pass the memory space as a third argument
+ so one can write
+ Device_ReadResp *read_resp;
+ read_resp = malloc(...)
+ device_read_1(..., read_resp, ...)
+ furthermore this is now automatically thread save
+ 3) the rpcgen function device_read_1
+ expects a target buffer to be passed via read_resp
+ which was not done.
+ 4) the return value of vxi11_receive() was computed incorrectly
+ 5) minor, Makefile typo's
+ CFLAGS versus
+ CLFAGS
+
+******
+
+Robert didn't have more than one device to try the patch with, but I've just
+tried it and everything seems fine. So I've removed all references to the
+VXI11_ENABLE_MULTIPLE_CLIENTS global variable, and removed the call to
+vxi11_open_link() from the vxi11_send() fn. There has been an associated
+tidying of functions, and removal of some comments.
+
+Thanks once again to Robert Larice for the patch and the explanation!
+
+------------------------------------------------------------------------------
+vxi11_1.03 - 29/01/2007
+
+Some bug-fixes (thanks to Manfred S.), and extra awareness of the
+possibility that instruments could time out after receiving a query WITHOUT
+causing an error condition. In some cases (prior to these changes) this
+could have resulted in a segmentation fault.
+
+Specifically:
+
+(1) removed call to ANSI free() fn in vxi11_receive, which according to
+ Manfred S. "is not necessary and wrong (crashes)".
+
+(2) added extra check in vxi11_receive() to see if read_resp==NULL.
+ read_resp can apparently be NULL if (eg) you send an instrument a
+ query, but the instrument is so busy with something else for so long
+ that it forgets the original query. So this extra check is for that
+ situation, and vxi11_receive returns -VXI11_NULL_READ_RESP to the
+ calling function.
+
+(3) vxi11_send_and_receive() is now aware of the possibility of being
+ returned -VXI11_NULL_READ_RESP. If so, it re-sends the query, until
+ either getting a "regular" read error (read_resp->error!=0) or a
+ successful read.
+
+(4) Similar to (2)... added extra check in vxi11_send() to see if
+ write_resp==NULL. If so, return -VXI11_NULL_WRITE_RESP. As with (3),
+ send_and_receive() is now aware of this possibility.
+
+------------------------------------------------------------------------------
+vxi11_1.02 - 25/08/2006
+
+Important changes to the core vxi11_send() function, which should be
+invisible to the user.
+
+For those interested, the function now takes note of the value of
+link->maxRecvSize, which is the maximum number of bytes that the vxi11
+intrument you're talking to can receive in one go. For many instruments
+this may be a few kB, which isn't a problem for sending short commands;
+however, sending large chunks of data (for example sending waveforms
+to instruments) may exceed this maxRecvSize. The core vxi11_send() function
+has been re-written to ensure that only a maximum of [maxRecvSize] bytes are
+written in one go... the function sits in a loop until all the message/
+data is written.
+
+Also tidied up some of the return values (specifically with regard to
+vxi11_send() and vxi11_send_data_block() ).
+
+------------------------------------------------------------------------------
+vxi11_1.01 - 06/07/2006
+
+Fair few changes since v1.00, all in vxi11_user.c and vxi11_user.h
+
+Found I was having problems talking to multiple links on the same
+client, if I created a different client for each one. So introduced
+a few global variables to keep track of all the ip addresses of
+clients that the library is asked to create, and only creating new
+clients if the ip address is different. This puts a limit of how
+many unique ip addresses (clients) a single process can connect to.
+Set this value at 256 (should hopefully be enough!).
+
+Next I found that talking to different clients on different ip
+addresses didn't work. It turns out that create_link_1() creates
+a static structure. This this link is associated with a given
+client (and hence a given IP address), then the only way I could
+think of making things work was to add a call to an
+vxi11_open_link() function before each send command (no idea what
+this adds to overheads and it's very messy!) - at least I was
+able to get this to only happen when we are using more than one
+client/ip address.
+
+Also, while I was at it, I re-ordered the functions a little -
+starts with core user functions, extra user functions, then core
+library functions at the end. Added a few more comments. Tidied
+up. Left some debugging info in, but commented out.
+
+------------------------------------------------------------------------------
+vxi11_1.00 - 23/06/2006
+
+Initial release.
+
+------------------------------------------------------------------------------
+
Index: sipmscan/trunk_v0.9/vxi11_x86_64/GNU_General_Public_License.txt
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/GNU_General_Public_License.txt (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/GNU_General_Public_License.txt (revision 145)
@@ -0,0 +1,340 @@
+ GNU GENERAL PUBLIC LICENSE
+ Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+ 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+ Preamble
+
+ The licenses for most software are designed to take away your
+freedom to share and change it. By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users. This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it. (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.) You can apply it to
+your programs, too.
+
+ When we speak of free software, we are referring to freedom, not
+price. Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+ To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+ For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have. You must make sure that they, too, receive or can get the
+source code. And you must show them these terms so they know their
+rights.
+
+ We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+ Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software. If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+ Finally, any free program is threatened constantly by software
+patents. We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary. To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+ The precise terms and conditions for copying, distribution and
+modification follow.
+
+ GNU GENERAL PUBLIC LICENSE
+ TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+ 0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License. The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language. (Hereinafter, translation is included without limitation in
+the term "modification".) Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope. The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+ 1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+ 2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+ a) You must cause the modified files to carry prominent notices
+ stating that you changed the files and the date of any change.
+
+ b) You must cause any work that you distribute or publish, that in
+ whole or in part contains or is derived from the Program or any
+ part thereof, to be licensed as a whole at no charge to all third
+ parties under the terms of this License.
+
+ c) If the modified program normally reads commands interactively
+ when run, you must cause it, when started running for such
+ interactive use in the most ordinary way, to print or display an
+ announcement including an appropriate copyright notice and a
+ notice that there is no warranty (or else, saying that you provide
+ a warranty) and that users may redistribute the program under
+ these conditions, and telling the user how to view a copy of this
+ License. (Exception: if the Program itself is interactive but
+ does not normally print such an announcement, your work based on
+ the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole. If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works. But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+ 3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+ a) Accompany it with the complete corresponding machine-readable
+ source code, which must be distributed under the terms of Sections
+ 1 and 2 above on a medium customarily used for software interchange; or,
+
+ b) Accompany it with a written offer, valid for at least three
+ years, to give any third party, for a charge no more than your
+ cost of physically performing source distribution, a complete
+ machine-readable copy of the corresponding source code, to be
+ distributed under the terms of Sections 1 and 2 above on a medium
+ customarily used for software interchange; or,
+
+ c) Accompany it with the information you received as to the offer
+ to distribute corresponding source code. (This alternative is
+ allowed only for noncommercial distribution and only if you
+ received the program in object code or executable form with such
+ an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it. For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable. However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+ 4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License. Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+ 5. You are not required to accept this License, since you have not
+signed it. However, nothing else grants you permission to modify or
+distribute the Program or its derivative works. These actions are
+prohibited by law if you do not accept this License. Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+ 6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions. You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+ 7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License. If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all. For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices. Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+ 8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded. In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+ 9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time. Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number. If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation. If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+ 10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission. For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this. Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+ NO WARRANTY
+
+ 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+ 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+ END OF TERMS AND CONDITIONS
+
+ How to Apply These Terms to Your New Programs
+
+ If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+ To do so, attach the following notices to the program. It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+ <one line to give the program's name and a brief idea of what it does.>
+ Copyright (C) <year> <name of author>
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+ Gnomovision version 69, Copyright (C) year name of author
+ Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+ This is free software, and you are welcome to redistribute it
+ under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License. Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary. Here is a sample; alter the names:
+
+ Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+ `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+ <signature of Ty Coon>, 1 April 1989
+ Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs. If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library. If this is what you want to do, use the GNU Library General
+Public License instead of this License.
Index: sipmscan/trunk_v0.9/vxi11_x86_64/Makefile
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/Makefile (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/Makefile (revision 145)
@@ -0,0 +1,18 @@
+VERSION=1.08
+
+#CFLAGS = -Wall -g
+CFLAGS = -g
+CXX = g++
+
+.PHONY: clean objs
+
+objs: vxi11.h
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_user.cc
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_clnt.c
+ $(CXX) -c -fPIC $(CFLAGS) vxi11_xdr.c
+
+vxi11.h: vxi11.x
+ rpcgen -M vxi11.x
+
+clean:
+ rm -f *.o vxi11_cmd vxi11.h vxi11_svc.c vxi11_xdr.c vxi11_clnt.c #TAGS
Index: sipmscan/trunk_v0.9/vxi11_x86_64/README.txt
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/README.txt (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/README.txt (revision 145)
@@ -0,0 +1,98 @@
+RPC PROTOCOL FOR COMMUNICATING WITH VXI11-ENABLED DEVICES OVER ETHERNET FROM LINUX
+==================================================================================
+(including instruments such as oscilloscopes, by manufacturers such as
+Agilent and Tektronix, amongst others).
+
+By Steve D. Sharples, June 2006.
+
+This is a collection of source code that will allow you to talk to ethernet-
+enabled instruments that use the VXI11 protocol, from Linux. This includes
+a wide range of instruments (including oscilloscopes, logic analysers,
+function generators etc) by a wide range of manufacturers (including
+Tektronix and Agilent to name just a couple). An interactive "send and
+receive" utility is included as an example.
+
+You may want to build on to this libraries for your specific instruments -
+I'm currently working on libraries for talking to Agilent Infiniium scopes,
+and will probably do the same for Tektronix scopes too. Basically if you've
+got a Programmer's Reference for your instrument, and this code, you should
+be able to cobble something together.
+
+This collection of code has been produced because I grew frustrated at how
+difficult it seemed to be to do a relatively simple task. None of the
+major manufacturers had any "out of the box" Linux solutions to talking to
+their instruments (although often I would talk to technical folks who would
+try their best to help). One of the solutions offered was to use something
+called NI VISA; parts of this are closed source, it was enormous, and I had
+worries about legacy issues with changing PC hardware.
+
+Via Guy McBride at Agilent, I obtained a copy of a vxi11.x RPC file similar
+to the one included here (although no-one at Agilent seemed to know or care
+where it came from). After lots of searching on the information superhighway
+I located what I believe is the original source (or something like it); see
+the section on vxi11.x below. This source seems to have literally been written
+from the published VXI11 protocol. I also received from Agilent a simple
+example program that showed you how to use the protocol; working from this
+and the (open) source that uses the vxi11.x that is included here, I wrote
+vxi11_cmd and the user libraries.
+
+This collection of source code consists of:
+
+(1) vxi11.x
+This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
+which are part of the asynDriver (R4-5) EPICS module, which, at time of
+writing, is available from:
+http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
+More general information about EPICS is available from:
+http://www.aps.anl.gov/epics/
+This code is open source, and is covered under the copyright notice and
+software license agreement shown below, and also at:
+http://www.aps.anl.gov/epics/license/open.php
+
+It is intended as a lightweight base for the vxi11 rpc protocol. If you
+run rpcgen on this file, it will generate C files and headers, from which
+it is relatively simple to write C programs to communicate with a range
+of ethernet-enabled instruments, such as oscilloscopes and function
+generators by manufacturers such as Agilent and Tektronix (amongst many
+others).
+
+(2) vxi11_user.cc (and vxi11_user.h)
+These are (fairly) friendly user libraries. At the core are 4 key functions:
+vxi11_open(), vxi11_close(), vxi11_send() and vxi11_receive(). These allow
+you to talk to your device. There are also some other functions that I
+considered to be generally useful (send_and_receive, functions for sending
+and receiving fixed length data blocks etc) that are all non-instrument-
+specific.
+
+(3) vxi11_cmd.c
+This is a fairly simple interactive utility that allows you to send
+commands and queries to your vxi11-enabled instrument, which you
+locate by way of IP address. I recommend you start with *IDN? It shows you
+how the vxi11_user library works
+
+(4) Makefile
+Type "make" to compile the source above. Type "make clean" to remove
+old object files and ./vxi11_cmd. Type "make install" to copy
+./vxi11_cmd to /usr/local/bin/
+
+(5) GNU_General_Public_License.txt
+Fairly obvious. All programs, source, readme files etc NOT covered by any
+other license (e.g. vxi11.x, which is covered by its own open source
+license) are covered by this license.
+
+These programs are free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+These programs are distributed in the hope that they will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+The author's email address is steve.no.spam.sharples@nottingham.ac.uk
+(you can work it out!)
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.h
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.h (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.h (revision 145)
@@ -0,0 +1,343 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#ifndef _VXI11_H_RPCGEN
+#define _VXI11_H_RPCGEN
+
+#include <rpc/rpc.h>
+
+#include <pthread.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+
+typedef long Device_Link;
+
+enum Device_AddrFamily {
+ DEVICE_TCP = 0,
+ DEVICE_UDP = 1,
+};
+typedef enum Device_AddrFamily Device_AddrFamily;
+
+typedef long Device_Flags;
+
+typedef long Device_ErrorCode;
+
+struct Device_Error {
+ Device_ErrorCode error;
+};
+typedef struct Device_Error Device_Error;
+
+struct Create_LinkParms {
+ long clientId;
+ bool_t lockDevice;
+ u_long lock_timeout;
+ char *device;
+};
+typedef struct Create_LinkParms Create_LinkParms;
+
+struct Create_LinkResp {
+ Device_ErrorCode error;
+ Device_Link lid;
+ u_short abortPort;
+ u_long maxRecvSize;
+};
+typedef struct Create_LinkResp Create_LinkResp;
+
+struct Device_WriteParms {
+ Device_Link lid;
+ u_long io_timeout;
+ u_long lock_timeout;
+ Device_Flags flags;
+ struct {
+ u_int data_len;
+ char *data_val;
+ } data;
+};
+typedef struct Device_WriteParms Device_WriteParms;
+
+struct Device_WriteResp {
+ Device_ErrorCode error;
+ u_long size;
+};
+typedef struct Device_WriteResp Device_WriteResp;
+
+struct Device_ReadParms {
+ Device_Link lid;
+ u_long requestSize;
+ u_long io_timeout;
+ u_long lock_timeout;
+ Device_Flags flags;
+ char termChar;
+};
+typedef struct Device_ReadParms Device_ReadParms;
+
+struct Device_ReadResp {
+ Device_ErrorCode error;
+ long reason;
+ struct {
+ u_int data_len;
+ char *data_val;
+ } data;
+};
+typedef struct Device_ReadResp Device_ReadResp;
+
+struct Device_ReadStbResp {
+ Device_ErrorCode error;
+ u_char stb;
+};
+typedef struct Device_ReadStbResp Device_ReadStbResp;
+
+struct Device_GenericParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long lock_timeout;
+ u_long io_timeout;
+};
+typedef struct Device_GenericParms Device_GenericParms;
+
+struct Device_RemoteFunc {
+ u_long hostAddr;
+ u_long hostPort;
+ u_long progNum;
+ u_long progVers;
+ Device_AddrFamily progFamily;
+};
+typedef struct Device_RemoteFunc Device_RemoteFunc;
+
+struct Device_EnableSrqParms {
+ Device_Link lid;
+ bool_t enable;
+ struct {
+ u_int handle_len;
+ char *handle_val;
+ } handle;
+};
+typedef struct Device_EnableSrqParms Device_EnableSrqParms;
+
+struct Device_LockParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long lock_timeout;
+};
+typedef struct Device_LockParms Device_LockParms;
+
+struct Device_DocmdParms {
+ Device_Link lid;
+ Device_Flags flags;
+ u_long io_timeout;
+ u_long lock_timeout;
+ long cmd;
+ bool_t network_order;
+ long datasize;
+ struct {
+ u_int data_in_len;
+ char *data_in_val;
+ } data_in;
+};
+typedef struct Device_DocmdParms Device_DocmdParms;
+
+struct Device_DocmdResp {
+ Device_ErrorCode error;
+ struct {
+ u_int data_out_len;
+ char *data_out_val;
+ } data_out;
+};
+typedef struct Device_DocmdResp Device_DocmdResp;
+
+struct Device_SrqParms {
+ struct {
+ u_int handle_len;
+ char *handle_val;
+ } handle;
+};
+typedef struct Device_SrqParms Device_SrqParms;
+
+#define DEVICE_ASYNC 0x0607B0
+#define DEVICE_ASYNC_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define device_abort 1
+extern enum clnt_stat device_abort_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t device_abort_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+extern int device_async_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define device_abort 1
+extern enum clnt_stat device_abort_1();
+extern bool_t device_abort_1_svc();
+extern int device_async_1_freeresult ();
+#endif /* K&R C */
+
+#define DEVICE_CORE 0x0607AF
+#define DEVICE_CORE_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define create_link 10
+extern enum clnt_stat create_link_1(Create_LinkParms *, Create_LinkResp *, CLIENT *);
+extern bool_t create_link_1_svc(Create_LinkParms *, Create_LinkResp *, struct svc_req *);
+#define device_write 11
+extern enum clnt_stat device_write_1(Device_WriteParms *, Device_WriteResp *, CLIENT *);
+extern bool_t device_write_1_svc(Device_WriteParms *, Device_WriteResp *, struct svc_req *);
+#define device_read 12
+extern enum clnt_stat device_read_1(Device_ReadParms *, Device_ReadResp *, CLIENT *);
+extern bool_t device_read_1_svc(Device_ReadParms *, Device_ReadResp *, struct svc_req *);
+#define device_readstb 13
+extern enum clnt_stat device_readstb_1(Device_GenericParms *, Device_ReadStbResp *, CLIENT *);
+extern bool_t device_readstb_1_svc(Device_GenericParms *, Device_ReadStbResp *, struct svc_req *);
+#define device_trigger 14
+extern enum clnt_stat device_trigger_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_trigger_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_clear 15
+extern enum clnt_stat device_clear_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_clear_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_remote 16
+extern enum clnt_stat device_remote_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_remote_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_local 17
+extern enum clnt_stat device_local_1(Device_GenericParms *, Device_Error *, CLIENT *);
+extern bool_t device_local_1_svc(Device_GenericParms *, Device_Error *, struct svc_req *);
+#define device_lock 18
+extern enum clnt_stat device_lock_1(Device_LockParms *, Device_Error *, CLIENT *);
+extern bool_t device_lock_1_svc(Device_LockParms *, Device_Error *, struct svc_req *);
+#define device_unlock 19
+extern enum clnt_stat device_unlock_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t device_unlock_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+#define device_enable_srq 20
+extern enum clnt_stat device_enable_srq_1(Device_EnableSrqParms *, Device_Error *, CLIENT *);
+extern bool_t device_enable_srq_1_svc(Device_EnableSrqParms *, Device_Error *, struct svc_req *);
+#define device_docmd 22
+extern enum clnt_stat device_docmd_1(Device_DocmdParms *, Device_DocmdResp *, CLIENT *);
+extern bool_t device_docmd_1_svc(Device_DocmdParms *, Device_DocmdResp *, struct svc_req *);
+#define destroy_link 23
+extern enum clnt_stat destroy_link_1(Device_Link *, Device_Error *, CLIENT *);
+extern bool_t destroy_link_1_svc(Device_Link *, Device_Error *, struct svc_req *);
+#define create_intr_chan 25
+extern enum clnt_stat create_intr_chan_1(Device_RemoteFunc *, Device_Error *, CLIENT *);
+extern bool_t create_intr_chan_1_svc(Device_RemoteFunc *, Device_Error *, struct svc_req *);
+#define destroy_intr_chan 26
+extern enum clnt_stat destroy_intr_chan_1(void *, Device_Error *, CLIENT *);
+extern bool_t destroy_intr_chan_1_svc(void *, Device_Error *, struct svc_req *);
+extern int device_core_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define create_link 10
+extern enum clnt_stat create_link_1();
+extern bool_t create_link_1_svc();
+#define device_write 11
+extern enum clnt_stat device_write_1();
+extern bool_t device_write_1_svc();
+#define device_read 12
+extern enum clnt_stat device_read_1();
+extern bool_t device_read_1_svc();
+#define device_readstb 13
+extern enum clnt_stat device_readstb_1();
+extern bool_t device_readstb_1_svc();
+#define device_trigger 14
+extern enum clnt_stat device_trigger_1();
+extern bool_t device_trigger_1_svc();
+#define device_clear 15
+extern enum clnt_stat device_clear_1();
+extern bool_t device_clear_1_svc();
+#define device_remote 16
+extern enum clnt_stat device_remote_1();
+extern bool_t device_remote_1_svc();
+#define device_local 17
+extern enum clnt_stat device_local_1();
+extern bool_t device_local_1_svc();
+#define device_lock 18
+extern enum clnt_stat device_lock_1();
+extern bool_t device_lock_1_svc();
+#define device_unlock 19
+extern enum clnt_stat device_unlock_1();
+extern bool_t device_unlock_1_svc();
+#define device_enable_srq 20
+extern enum clnt_stat device_enable_srq_1();
+extern bool_t device_enable_srq_1_svc();
+#define device_docmd 22
+extern enum clnt_stat device_docmd_1();
+extern bool_t device_docmd_1_svc();
+#define destroy_link 23
+extern enum clnt_stat destroy_link_1();
+extern bool_t destroy_link_1_svc();
+#define create_intr_chan 25
+extern enum clnt_stat create_intr_chan_1();
+extern bool_t create_intr_chan_1_svc();
+#define destroy_intr_chan 26
+extern enum clnt_stat destroy_intr_chan_1();
+extern bool_t destroy_intr_chan_1_svc();
+extern int device_core_1_freeresult ();
+#endif /* K&R C */
+
+#define DEVICE_INTR 0x0607B1
+#define DEVICE_INTR_VERSION 1
+
+#if defined(__STDC__) || defined(__cplusplus)
+#define device_intr_srq 30
+extern enum clnt_stat device_intr_srq_1(Device_SrqParms *, void *, CLIENT *);
+extern bool_t device_intr_srq_1_svc(Device_SrqParms *, void *, struct svc_req *);
+extern int device_intr_1_freeresult (SVCXPRT *, xdrproc_t, caddr_t);
+
+#else /* K&R C */
+#define device_intr_srq 30
+extern enum clnt_stat device_intr_srq_1();
+extern bool_t device_intr_srq_1_svc();
+extern int device_intr_1_freeresult ();
+#endif /* K&R C */
+
+/* the xdr functions */
+
+#if defined(__STDC__) || defined(__cplusplus)
+extern bool_t xdr_Device_Link (XDR *, Device_Link*);
+extern bool_t xdr_Device_AddrFamily (XDR *, Device_AddrFamily*);
+extern bool_t xdr_Device_Flags (XDR *, Device_Flags*);
+extern bool_t xdr_Device_ErrorCode (XDR *, Device_ErrorCode*);
+extern bool_t xdr_Device_Error (XDR *, Device_Error*);
+extern bool_t xdr_Create_LinkParms (XDR *, Create_LinkParms*);
+extern bool_t xdr_Create_LinkResp (XDR *, Create_LinkResp*);
+extern bool_t xdr_Device_WriteParms (XDR *, Device_WriteParms*);
+extern bool_t xdr_Device_WriteResp (XDR *, Device_WriteResp*);
+extern bool_t xdr_Device_ReadParms (XDR *, Device_ReadParms*);
+extern bool_t xdr_Device_ReadResp (XDR *, Device_ReadResp*);
+extern bool_t xdr_Device_ReadStbResp (XDR *, Device_ReadStbResp*);
+extern bool_t xdr_Device_GenericParms (XDR *, Device_GenericParms*);
+extern bool_t xdr_Device_RemoteFunc (XDR *, Device_RemoteFunc*);
+extern bool_t xdr_Device_EnableSrqParms (XDR *, Device_EnableSrqParms*);
+extern bool_t xdr_Device_LockParms (XDR *, Device_LockParms*);
+extern bool_t xdr_Device_DocmdParms (XDR *, Device_DocmdParms*);
+extern bool_t xdr_Device_DocmdResp (XDR *, Device_DocmdResp*);
+extern bool_t xdr_Device_SrqParms (XDR *, Device_SrqParms*);
+
+#else /* K&R C */
+extern bool_t xdr_Device_Link ();
+extern bool_t xdr_Device_AddrFamily ();
+extern bool_t xdr_Device_Flags ();
+extern bool_t xdr_Device_ErrorCode ();
+extern bool_t xdr_Device_Error ();
+extern bool_t xdr_Create_LinkParms ();
+extern bool_t xdr_Create_LinkResp ();
+extern bool_t xdr_Device_WriteParms ();
+extern bool_t xdr_Device_WriteResp ();
+extern bool_t xdr_Device_ReadParms ();
+extern bool_t xdr_Device_ReadResp ();
+extern bool_t xdr_Device_ReadStbResp ();
+extern bool_t xdr_Device_GenericParms ();
+extern bool_t xdr_Device_RemoteFunc ();
+extern bool_t xdr_Device_EnableSrqParms ();
+extern bool_t xdr_Device_LockParms ();
+extern bool_t xdr_Device_DocmdParms ();
+extern bool_t xdr_Device_DocmdResp ();
+extern bool_t xdr_Device_SrqParms ();
+
+#endif /* K&R C */
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* !_VXI11_H_RPCGEN */
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.x
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.x (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11.x (revision 145)
@@ -0,0 +1,317 @@
+/* This file, vxi11.x, is the amalgamation of vxi11core.rpcl and vxi11intr.rpcl
+ * which are part of the asynDriver (R4-5) EPICS module, which, at time of
+ * writing, is available from:
+ * http://www.aps.anl.gov/epics/modules/soft/asyn/index.html
+ * More general information about EPICS is available from:
+ * http://www.aps.anl.gov/epics/
+ * This code is open source, and is covered under the copyright notice and
+ * software license agreement shown below, and also at:
+ * http://www.aps.anl.gov/epics/license/open.php
+ *
+ * In order to comply with section 4.3 of the software license agreement, here
+ * is a PROMINENT NOTICE OF CHNAGES TO THE SOFTWARE
+ * ===========================================
+ * (1) This file, vxi11.x, is the concatenation of the files vxi11core.rpcl and
+ * vxi11intr.rpcl
+ * (2) Tab spacing has been tidied up
+ *
+ * It is intended as a lightweight base for the vxi11 rpc protocol. If you
+ * run rpcgen on this file, it will generate C files and headers, from which
+ * it is relatively simple to write C programs to communicate with a range
+ * of ethernet-enabled instruments, such as oscilloscopes and function
+ * generated by manufacturers such as Agilent and Tektronix (amongst many
+ * others).
+ *
+ * For what it's worth, this concatenation was done by Steve Sharples at
+ * the University of Nottingham, UK, on 1 June 2006.
+ *
+ * Copyright notice and software license agreement follow, then the
+ * original comments from vxi11core.rpcl etc.
+ *
+ ******************************************************************************
+ * Copyright © 2006 <University of Chicago and other copyright holders>. All
+ * rights reserved.
+ ******************************************************************************
+ *
+ ******************************************************************************
+ * vxi11.x is distributed subject to the following license conditions:
+ * SOFTWARE LICENSE AGREEMENT
+ * Software: vxi11.x
+ *
+ * 1. The "Software", below, refers to vxi11.x (in either source code, or
+ * binary form and accompanying documentation). Each licensee is addressed
+ * as "you" or "Licensee."
+ *
+ * 2. The copyright holders shown above and their third-party licensors hereby
+ * grant Licensee a royalty-free nonexclusive license, subject to the
+ * limitations stated herein and U.S. Government license rights.
+ *
+ * 3. You may modify and make a copy or copies of the Software for use within
+ * your organization, if you meet the following conditions:
+ * 1. Copies in source code must include the copyright notice and this
+ * Software License Agreement.
+ * 2. Copies in binary form must include the copyright notice and this
+ * Software License Agreement in the documentation and/or other
+ * materials provided with the copy.
+ *
+ * 4. You may modify a copy or copies of the Software or any portion of it,
+ * thus forming a work based on the Software, and distribute copies of such
+ * work outside your organization, if you meet all of the following
+ * conditions:
+ * 1. Copies in source code must include the copyright notice and this
+ * Software License Agreement;
+ * 2. Copies in binary form must include the copyright notice and this
+ * Software License Agreement in the documentation and/or other
+ * materials provided with the copy;
+ * 3. Modified copies and works based on the Software must carry
+ * prominent notices stating that you changed specified portions of
+ * the Software.
+ *
+ * 5. Portions of the Software resulted from work developed under a U.S.
+ * Government contract and are subject to the following license: the
+ * Government is granted for itself and others acting on its behalf a
+ * paid-up, nonexclusive, irrevocable worldwide license in this computer
+ * software to reproduce, prepare derivative works, and perform publicly
+ * and display publicly.
+ *
+ * 6. WARRANTY DISCLAIMER. THE SOFTWARE IS SUPPLIED "AS IS" WITHOUT WARRANTY OF
+ * ANY KIND. THE COPYRIGHT HOLDERS, THEIR THIRD PARTY LICENSORS, THE UNITED
+ * STATES, THE UNITED STATES DEPARTMENT OF ENERGY, AND THEIR EMPLOYEES: (1)
+ * DISCLAIM ANY WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
+ * ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
+ * PURPOSE, TITLE OR NON-INFRINGEMENT, (2) DO NOT ASSUME ANY LEGAL LIABILITY
+ * OR RESPONSIBILITY FOR THE ACCURACY, COMPLETENESS, OR USEFULNESS OF THE
+ * SOFTWARE, (3) DO NOT REPRESENT THAT USE OF THE SOFTWARE WOULD NOT INFRINGE
+ * PRIVATELY OWNED RIGHTS, (4) DO NOT WARRANT THAT THE SOFTWARE WILL FUNCTION
+ * UNINTERRUPTED, THAT IT IS ERROR-FREE OR THAT ANY ERRORS WILL BE CORRECTED.
+ *
+ * 7. LIMITATION OF LIABILITY. IN NO EVENT WILL THE COPYRIGHT HOLDERS, THEIR
+ * THIRD PARTY LICENSORS, THE UNITED STATES, THE UNITED STATES DEPARTMENT OF
+ * ENERGY, OR THEIR EMPLOYEES: BE LIABLE FOR ANY INDIRECT, INCIDENTAL,
+ * CONSEQUENTIAL, SPECIAL OR PUNITIVE DAMAGES OF ANY KIND OR NATURE,
+ * INCLUDING BUT NOT LIMITED TO LOSS OF PROFITS OR LOSS OF DATA, FOR ANY
+ * REASON WHATSOEVER, WHETHER SUCH LIABILITY IS ASSERTED ON THE BASIS OF
+ * CONTRACT, TORT (INCLUDING NEGLIGENCE OR STRICT LIABILITY), OR OTHERWISE,
+ * EVEN IF ANY OF SAID PARTIES HAS BEEN WARNED OF THE POSSIBILITY OF SUCH
+ * LOSS OR DAMAGES.
+ ******************************************************************************
+ */
+
+/******************************************************************************
+ *
+ * vxi11core.rpcl
+ *
+ * This file is best viewed with a tabwidth of 4
+ *
+ ******************************************************************************
+ *
+ * TODO:
+ *
+ ******************************************************************************
+ *
+ * Original Author: someone from VXIbus Consortium
+ * Current Author: Benjamin Franksen
+ * Date: 03-06-97
+ *
+ * RPCL description of the core- and abort-channel of the TCP/IP Instrument
+ * Protocol Specification.
+ *
+ *
+ * Modification Log:
+ * -----------------
+ * .00 03-06-97 bfr created this file
+ *
+ ******************************************************************************
+ *
+ * Notes:
+ *
+ * This stuff is literally from
+ *
+ * VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification
+ *
+ */
+
+typedef long Device_Link;
+
+enum Device_AddrFamily
+{
+ DEVICE_TCP,
+ DEVICE_UDP
+};
+
+typedef long Device_Flags;
+
+typedef long Device_ErrorCode;
+
+struct Device_Error
+{
+ Device_ErrorCode error;
+};
+
+struct Create_LinkParms
+{
+ long clientId; /* implementation specific value */
+ bool lockDevice; /* attempt to lock the device */
+ unsigned long lock_timeout; /* time to wait for lock */
+ string device<>; /* name of device */
+};
+struct Create_LinkResp
+{
+ Device_ErrorCode error;
+ Device_Link lid;
+ unsigned short abortPort; /* for the abort RPC */
+ unsigned long maxRecvSize; /* max # of bytes accepted on write */
+};
+struct Device_WriteParms
+{
+ Device_Link lid; /* link id from create_link */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ Device_Flags flags; /* flags with options */
+ opaque data<>; /* the data length and the data itself */
+};
+struct Device_WriteResp
+{
+ Device_ErrorCode error;
+ unsigned long size; /* # of bytes written */
+};
+struct Device_ReadParms
+{
+ Device_Link lid; /* link id from create_link */
+ unsigned long requestSize; /* # of bytes requested */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ Device_Flags flags; /* flags with options */
+ char termChar; /* valid if flags & termchrset */
+};
+struct Device_ReadResp
+{
+ Device_ErrorCode error;
+ long reason; /* why read completed */
+ opaque data<>; /* the data length and the data itself */
+};
+struct Device_ReadStbResp
+{
+ Device_ErrorCode error;
+ unsigned char stb; /* the returned status byte */
+};
+struct Device_GenericParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* flags with options */
+ unsigned long lock_timeout; /* time to wait for lock */
+ unsigned long io_timeout; /* time to wait for I/O */
+};
+struct Device_RemoteFunc
+{
+ unsigned long hostAddr; /* host servicing interrupt */
+ unsigned long hostPort; /* valid port # on client */
+ unsigned long progNum; /* DEVICE_INTR */
+ unsigned long progVers; /* DEVICE_INTR_VERSION */
+ Device_AddrFamily progFamily; /* DEVICE_UDP | DEVICE_TCP */
+};
+struct Device_EnableSrqParms
+{
+ Device_Link lid; /* link id from create_link */
+ bool enable; /* enable or disable intr's */
+ opaque handle<40>; /* host specific data */
+};
+struct Device_LockParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* contains the waitlock flag */
+ unsigned long lock_timeout; /* time to wait for lock */
+};
+struct Device_DocmdParms
+{
+ Device_Link lid; /* link id from create_link */
+ Device_Flags flags; /* flags with options */
+ unsigned long io_timeout; /* time to wait for I/O */
+ unsigned long lock_timeout; /* time to wait for lock */
+ long cmd; /* which command to execute */
+ bool network_order; /* client's byte order */
+ long datasize; /* size of individual data elements */
+ opaque data_in<>; /* docmd data parameters */
+};
+struct Device_DocmdResp
+{
+ Device_ErrorCode error;
+ opaque data_out<>; /* returned data parameters */
+};
+
+program DEVICE_ASYNC
+{
+ version DEVICE_ASYNC_VERSION
+ {
+ Device_Error device_abort (Device_Link) = 1;
+ } = 1;
+} = 0x0607B0;
+
+program DEVICE_CORE
+{
+ version DEVICE_CORE_VERSION
+ {
+ Create_LinkResp create_link (Create_LinkParms) = 10;
+ Device_WriteResp device_write (Device_WriteParms) = 11;
+ Device_ReadResp device_read (Device_ReadParms) = 12;
+ Device_ReadStbResp device_readstb (Device_GenericParms) = 13;
+ Device_Error device_trigger (Device_GenericParms) = 14;
+ Device_Error device_clear (Device_GenericParms) = 15;
+ Device_Error device_remote (Device_GenericParms) = 16;
+ Device_Error device_local (Device_GenericParms) = 17;
+ Device_Error device_lock (Device_LockParms) = 18;
+ Device_Error device_unlock (Device_Link) = 19;
+ Device_Error device_enable_srq (Device_EnableSrqParms) = 20;
+ Device_DocmdResp device_docmd (Device_DocmdParms) = 22;
+ Device_Error destroy_link (Device_Link) = 23;
+ Device_Error create_intr_chan (Device_RemoteFunc) = 25;
+ Device_Error destroy_intr_chan (void) = 26;
+ } = 1;
+} = 0x0607AF;
+
+/******************************************************************************
+ *
+ * vxi11intr.rpcl
+ *
+ * This file is best viewed with a tabwidth of 4
+ *
+ ******************************************************************************
+ *
+ * TODO:
+ *
+ ******************************************************************************
+ *
+ * Original Author: someone from VXIbus Consortium
+ * Current Author: Benjamin Franksen
+ * Date: 03-06-97
+ *
+ * RPCL description of the intr-channel of the TCP/IP Instrument Protocol
+ * Specification.
+ *
+ *
+ * Modification Log:
+ * -----------------
+ * .00 03-06-97 bfr created this file
+ *
+ ******************************************************************************
+ *
+ * Notes:
+ *
+ * This stuff is literally from
+ *
+ * "VXI-11, Ref 1.0 : TCP/IP Instrument Protocol Specification"
+ *
+ */
+
+struct Device_SrqParms
+{
+ opaque handle<>;
+};
+
+program DEVICE_INTR
+{
+ version DEVICE_INTR_VERSION
+ {
+ void device_intr_srq (Device_SrqParms) = 30;
+ } = 1;
+} = 0x0607B1;
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_clnt.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_clnt.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_clnt.c (revision 145)
@@ -0,0 +1,163 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include <memory.h> /* for memset */
+#include "vxi11.h"
+
+/* Default timeout can be changed using clnt_control() */
+static struct timeval TIMEOUT = { 25, 0 };
+
+enum clnt_stat
+device_abort_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_abort,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+create_link_1(Create_LinkParms *argp, Create_LinkResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, create_link,
+ (xdrproc_t) xdr_Create_LinkParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Create_LinkResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_write_1(Device_WriteParms *argp, Device_WriteResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_write,
+ (xdrproc_t) xdr_Device_WriteParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_WriteResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_read_1(Device_ReadParms *argp, Device_ReadResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_read,
+ (xdrproc_t) xdr_Device_ReadParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_ReadResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_readstb_1(Device_GenericParms *argp, Device_ReadStbResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_readstb,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_ReadStbResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_trigger_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_trigger,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_clear_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_clear,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_remote_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_remote,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_local_1(Device_GenericParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_local,
+ (xdrproc_t) xdr_Device_GenericParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_lock_1(Device_LockParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_lock,
+ (xdrproc_t) xdr_Device_LockParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_unlock_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_unlock,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_enable_srq_1(Device_EnableSrqParms *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_enable_srq,
+ (xdrproc_t) xdr_Device_EnableSrqParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_docmd_1(Device_DocmdParms *argp, Device_DocmdResp *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_docmd,
+ (xdrproc_t) xdr_Device_DocmdParms, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_DocmdResp, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+destroy_link_1(Device_Link *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, destroy_link,
+ (xdrproc_t) xdr_Device_Link, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+create_intr_chan_1(Device_RemoteFunc *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, create_intr_chan,
+ (xdrproc_t) xdr_Device_RemoteFunc, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+destroy_intr_chan_1(void *argp, Device_Error *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, destroy_intr_chan,
+ (xdrproc_t) xdr_void, (caddr_t) argp,
+ (xdrproc_t) xdr_Device_Error, (caddr_t) clnt_res,
+ TIMEOUT));
+}
+
+enum clnt_stat
+device_intr_srq_1(Device_SrqParms *argp, void *clnt_res, CLIENT *clnt)
+{
+ return (clnt_call(clnt, device_intr_srq,
+ (xdrproc_t) xdr_Device_SrqParms, (caddr_t) argp,
+ (xdrproc_t) xdr_void, (caddr_t) clnt_res,
+ TIMEOUT));
+}
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_cmd.cc
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_cmd.cc (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_cmd.cc (revision 145)
@@ -0,0 +1,83 @@
+/* vxi11_cmd.c
+ * Copyright (C) 2006 Steve D. Sharples
+ *
+ * A simple interactive utility that allows you to send commands and queries to
+ * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
+ * generated by rpcgen vxi11.x, and the vxi11_user.h user libraries.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * The author's email address is steve.sharples@nottingham.ac.uk
+ */
+
+#include "vxi11_user.h"
+#define BUF_LEN 100000
+
+int main(int argc, char *argv[]) {
+
+static char *device_ip;
+static char *device_name;
+char cmd[256];
+char buf[BUF_LEN];
+int ret;
+long bytes_returned;
+CLINK *clink;
+
+ clink = new CLINK;
+
+ if (argc < 2) {
+ printf("usage: %s your.inst.ip.addr [device_name]\n",argv[0]);
+ exit(1);
+ }
+
+ device_ip = argv[1];
+ if (argc > 2) {
+ device_name = argv[2];
+ ret=vxi11_open_device(device_ip,clink,device_name);
+ }
+ else {
+ ret=vxi11_open_device(device_ip,clink);
+ }
+
+ if (ret != 0) {
+ printf("Error: could not open device %s, quitting\n",device_ip);
+ exit(2);
+ }
+
+ while(1){
+ memset(cmd, 0, 256); // initialize command string
+ memset(buf, 0, BUF_LEN); // initialize buffer
+ printf("Input command or query ('q' to exit): ");
+ fgets(cmd,256,stdin);
+ cmd[strlen(cmd)-1] = 0; // just gets rid of the \n
+ if (strncasecmp(cmd, "q",1) == 0) break;
+
+ if (vxi11_send(clink, cmd) < 0) break;
+ if (strstr(cmd, "?") != 0) {
+ bytes_returned = vxi11_receive(clink, buf, BUF_LEN);
+ if (bytes_returned > 0) {
+ printf("%s\n",buf);
+ }
+ else if (bytes_returned == -15) {
+ printf("*** [ NOTHING RECEIVED ] ***\n");
+ }
+ else break;
+ }
+ }
+
+ ret=vxi11_close_device(device_ip,clink);
+ return 0;
+ }
+
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_svc.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_svc.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_svc.c (revision 145)
@@ -0,0 +1,319 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include "vxi11.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <rpc/pmap_clnt.h>
+#include <string.h>
+#include <memory.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+
+#ifndef SIG_PF
+#define SIG_PF void(*)(int)
+#endif
+
+static void
+device_async_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Device_Link device_abort_1_arg;
+ } argument;
+ union {
+ Device_Error device_abort_1_res;
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case device_abort:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_abort_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_async_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+static void
+device_core_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Create_LinkParms create_link_1_arg;
+ Device_WriteParms device_write_1_arg;
+ Device_ReadParms device_read_1_arg;
+ Device_GenericParms device_readstb_1_arg;
+ Device_GenericParms device_trigger_1_arg;
+ Device_GenericParms device_clear_1_arg;
+ Device_GenericParms device_remote_1_arg;
+ Device_GenericParms device_local_1_arg;
+ Device_LockParms device_lock_1_arg;
+ Device_Link device_unlock_1_arg;
+ Device_EnableSrqParms device_enable_srq_1_arg;
+ Device_DocmdParms device_docmd_1_arg;
+ Device_Link destroy_link_1_arg;
+ Device_RemoteFunc create_intr_chan_1_arg;
+ } argument;
+ union {
+ Create_LinkResp create_link_1_res;
+ Device_WriteResp device_write_1_res;
+ Device_ReadResp device_read_1_res;
+ Device_ReadStbResp device_readstb_1_res;
+ Device_Error device_trigger_1_res;
+ Device_Error device_clear_1_res;
+ Device_Error device_remote_1_res;
+ Device_Error device_local_1_res;
+ Device_Error device_lock_1_res;
+ Device_Error device_unlock_1_res;
+ Device_Error device_enable_srq_1_res;
+ Device_DocmdResp device_docmd_1_res;
+ Device_Error destroy_link_1_res;
+ Device_Error create_intr_chan_1_res;
+ Device_Error destroy_intr_chan_1_res;
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case create_link:
+ _xdr_argument = (xdrproc_t) xdr_Create_LinkParms;
+ _xdr_result = (xdrproc_t) xdr_Create_LinkResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))create_link_1_svc;
+ break;
+
+ case device_write:
+ _xdr_argument = (xdrproc_t) xdr_Device_WriteParms;
+ _xdr_result = (xdrproc_t) xdr_Device_WriteResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_write_1_svc;
+ break;
+
+ case device_read:
+ _xdr_argument = (xdrproc_t) xdr_Device_ReadParms;
+ _xdr_result = (xdrproc_t) xdr_Device_ReadResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_read_1_svc;
+ break;
+
+ case device_readstb:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_ReadStbResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_readstb_1_svc;
+ break;
+
+ case device_trigger:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_trigger_1_svc;
+ break;
+
+ case device_clear:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_clear_1_svc;
+ break;
+
+ case device_remote:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_remote_1_svc;
+ break;
+
+ case device_local:
+ _xdr_argument = (xdrproc_t) xdr_Device_GenericParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_local_1_svc;
+ break;
+
+ case device_lock:
+ _xdr_argument = (xdrproc_t) xdr_Device_LockParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_lock_1_svc;
+ break;
+
+ case device_unlock:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_unlock_1_svc;
+ break;
+
+ case device_enable_srq:
+ _xdr_argument = (xdrproc_t) xdr_Device_EnableSrqParms;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_enable_srq_1_svc;
+ break;
+
+ case device_docmd:
+ _xdr_argument = (xdrproc_t) xdr_Device_DocmdParms;
+ _xdr_result = (xdrproc_t) xdr_Device_DocmdResp;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_docmd_1_svc;
+ break;
+
+ case destroy_link:
+ _xdr_argument = (xdrproc_t) xdr_Device_Link;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))destroy_link_1_svc;
+ break;
+
+ case create_intr_chan:
+ _xdr_argument = (xdrproc_t) xdr_Device_RemoteFunc;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))create_intr_chan_1_svc;
+ break;
+
+ case destroy_intr_chan:
+ _xdr_argument = (xdrproc_t) xdr_void;
+ _xdr_result = (xdrproc_t) xdr_Device_Error;
+ local = (bool_t (*) (char *, void *, struct svc_req *))destroy_intr_chan_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_core_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+static void
+device_intr_1(struct svc_req *rqstp, register SVCXPRT *transp)
+{
+ union {
+ Device_SrqParms device_intr_srq_1_arg;
+ } argument;
+ union {
+ } result;
+ bool_t retval;
+ xdrproc_t _xdr_argument, _xdr_result;
+ bool_t (*local)(char *, void *, struct svc_req *);
+
+ switch (rqstp->rq_proc) {
+ case NULLPROC:
+ (void) svc_sendreply (transp, (xdrproc_t) xdr_void, (char *)NULL);
+ return;
+
+ case device_intr_srq:
+ _xdr_argument = (xdrproc_t) xdr_Device_SrqParms;
+ _xdr_result = (xdrproc_t) xdr_void;
+ local = (bool_t (*) (char *, void *, struct svc_req *))device_intr_srq_1_svc;
+ break;
+
+ default:
+ svcerr_noproc (transp);
+ return;
+ }
+ memset ((char *)&argument, 0, sizeof (argument));
+ if (!svc_getargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ svcerr_decode (transp);
+ return;
+ }
+ retval = (bool_t) (*local)((char *)&argument, (void *)&result, rqstp);
+ if (retval > 0 && !svc_sendreply(transp, (xdrproc_t) _xdr_result, (char *)&result)) {
+ svcerr_systemerr (transp);
+ }
+ if (!svc_freeargs (transp, (xdrproc_t) _xdr_argument, (caddr_t) &argument)) {
+ fprintf (stderr, "%s", "unable to free arguments");
+ exit (1);
+ }
+ if (!device_intr_1_freeresult (transp, _xdr_result, (caddr_t) &result))
+ fprintf (stderr, "%s", "unable to free results");
+
+ return;
+}
+
+int
+main (int argc, char **argv)
+{
+ register SVCXPRT *transp;
+
+ pmap_unset (DEVICE_ASYNC, DEVICE_ASYNC_VERSION);
+ pmap_unset (DEVICE_CORE, DEVICE_CORE_VERSION);
+ pmap_unset (DEVICE_INTR, DEVICE_INTR_VERSION);
+
+ transp = svcudp_create(RPC_ANYSOCK);
+ if (transp == NULL) {
+ fprintf (stderr, "%s", "cannot create udp service.");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_ASYNC, DEVICE_ASYNC_VERSION, device_async_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_ASYNC, DEVICE_ASYNC_VERSION, udp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_CORE, DEVICE_CORE_VERSION, device_core_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_CORE, DEVICE_CORE_VERSION, udp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_INTR, DEVICE_INTR_VERSION, device_intr_1, IPPROTO_UDP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_INTR, DEVICE_INTR_VERSION, udp).");
+ exit(1);
+ }
+
+ transp = svctcp_create(RPC_ANYSOCK, 0, 0);
+ if (transp == NULL) {
+ fprintf (stderr, "%s", "cannot create tcp service.");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_ASYNC, DEVICE_ASYNC_VERSION, device_async_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_ASYNC, DEVICE_ASYNC_VERSION, tcp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_CORE, DEVICE_CORE_VERSION, device_core_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_CORE, DEVICE_CORE_VERSION, tcp).");
+ exit(1);
+ }
+ if (!svc_register(transp, DEVICE_INTR, DEVICE_INTR_VERSION, device_intr_1, IPPROTO_TCP)) {
+ fprintf (stderr, "%s", "unable to register (DEVICE_INTR, DEVICE_INTR_VERSION, tcp).");
+ exit(1);
+ }
+
+ svc_run ();
+ fprintf (stderr, "%s", "svc_run returned");
+ exit (1);
+ /* NOTREACHED */
+}
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.cc
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.cc (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.cc (revision 145)
@@ -0,0 +1,589 @@
+/* vxi11_user.cc
+ * Copyright (C) 2006 Steve D. Sharples
+ *
+ * User library for opening, closing, sending to and receiving from
+ * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
+ * generated by rpcgen vxi11.x.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * The author's email address is steve.sharples@nottingham.ac.uk
+ */
+
+#include "vxi11_user.h"
+
+/*****************************************************************************
+ * GENERAL NOTES
+ *****************************************************************************
+ *
+ * There are four functions at the heart of this library:
+ *
+ * int vxi11_open_device(char *ip, CLIENT **client, VXI11_LINK **link)
+ * int vxi11_close_device(char *ip, CLIENT *client, VXI11_LINK *link)
+ * int vxi11_send(CLIENT *client, VXI11_LINK *link, char *cmd, unsigned long len)
+ * long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout)
+ *
+ * Note that all 4 of these use separate client and link structures. All the
+ * other functions are built on these four core functions, and the first layer
+ * of abstraction is to combine the CLIENT and VXI11_LINK structures into a
+ * single entity, which I've called a CLINK. For the send and receive
+ * functions, this is just a simple wrapper. For the open and close functions
+ * it's a bit more complicated, because we somehow have to keep track of
+ * whether we've already opened a device with the same IP address before (in
+ * which case we need to recycle a previously created client), or whether
+ * we've still got any other links to a given IP address left when we are
+ * asked to close a clink (in which case we can sever the link, but have to
+ * keep the client open). This is so the person using this library from
+ * userland does not have to keep track of whether they are talking to a
+ * different physical instrument or not each time they establish a connection.
+ *
+ * So the base functions that the user will probably want to use are:
+ *
+ * int vxi11_open_device(char *ip, CLINK *clink)
+ * int vxi11_close_device(char *ip, CLINK *clink)
+ * int vxi11_send(CLINK *clink, char *cmd, unsigned long len)
+ * --- or --- (if sending just text)
+ * int vxi11_send(CLINK *clink, char *cmd)
+ * long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
+ *
+ * There are then useful (to me, anyway) more specific functions built on top
+ * of these:
+ *
+ * int vxi11_send_data_block(CLINK *clink, char *cmd, char *buffer, unsigned long len)
+ * long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout)
+ * long vxi11_send_and_receive(CLINK *clink, char *cmd, char *buf, unsigned long buf_len, unsigned long timeout)
+ * long vxi11_obtain_long_value(CLINK *clink, char *cmd, unsigned long timeout)
+ * double vxi11_obtain_double_value(CLINK *clink, char *cmd, unsigned long timeout)
+ *
+ * (then there are some shorthand wrappers for the above without specifying
+ * the timeout due to sheer laziness---explore yourself)
+ */
+
+
+/* Global variables. Keep track of multiple links per client. We need this
+ * because:
+ * - we'd like the library to be able to cope with multiple links to a given
+ * client AND multiple links to multiple clients
+ * - we'd like to just refer to a client/link ("clink") as a single
+ * entity from user land, we don't want to worry about different
+ * initialisation procedures, depending on whether it's an instrument
+ * with the same IP address or not
+ */
+char VXI11_IP_ADDRESS[VXI11_MAX_CLIENTS][20];
+CLIENT *VXI11_CLIENT_ADDRESS[VXI11_MAX_CLIENTS];
+int VXI11_DEVICE_NO = 0;
+int VXI11_LINK_COUNT[VXI11_MAX_CLIENTS];
+
+/*****************************************************************************
+ * KEY USER FUNCTIONS - USE THESE FROM YOUR PROGRAMS OR INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* OPEN FUNCTIONS *
+ * ============== */
+
+/* Use this function from user land to open a device and create a link. Can be
+ * used multiple times for the same device (the library will keep track).*/
+int vxi11_open_device(const char *ip, CLINK *clink, char *device) {
+int ret;
+int l;
+int device_no=-1;
+
+// printf("before doing anything, clink->link = %ld\n", clink->link);
+ /* Have a look to see if we've already initialised an instrument with
+ * this IP address */
+ for (l=0; l<VXI11_MAX_CLIENTS; l++){
+ if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
+ device_no=l;
+// printf("Open function, search, found ip address %s, device no %d\n",ip,device_no);
+ }
+ }
+
+ /* Couldn't find a match, must be a new IP address */
+ if (device_no < 0) {
+ /* Uh-oh, we're out of storage space. Increase the #define
+ * for VXI11_MAX_CLIENTS in vxi11_user.h */
+ if (VXI11_DEVICE_NO >= VXI11_MAX_CLIENTS) {
+ printf("Error: maximum of %d clients allowed\n",VXI11_MAX_CLIENTS);
+ ret = -VXI11_MAX_CLIENTS;
+ }
+ /* Create a new client, keep a note of where the client pointer
+ * is, for this IP address. Because it's a new client, this
+ * must be link number 1. Keep track of how many devices we've
+ * opened so we don't run out of storage space. */
+ else {
+ ret = vxi11_open_device(ip, &(clink->client), &(clink->link), device);
+ strncpy(VXI11_IP_ADDRESS[VXI11_DEVICE_NO],ip,20);
+ VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO] = clink->client;
+ VXI11_LINK_COUNT[VXI11_DEVICE_NO]=1;
+// printf("Open function, could not find ip address %s.\n",ip);
+// printf("So now, VXI11_IP_ADDRESS[%d]=%s,\n",VXI11_DEVICE_NO,VXI11_IP_ADDRESS[VXI11_DEVICE_NO]);
+// printf("VXI11_CLIENT_ADDRESS[%d]=%ld,\n",VXI11_DEVICE_NO,VXI11_CLIENT_ADDRESS[VXI11_DEVICE_NO]);
+// printf(" clink->client=%ld,\n",clink->client);
+// printf("VXI11_LINK_COUNT[%d]=%d.\n",VXI11_DEVICE_NO,VXI11_LINK_COUNT[VXI11_DEVICE_NO]);
+ VXI11_DEVICE_NO++;
+ }
+ }
+ /* already got a client for this IP address */
+ else {
+ /* Copy the client pointer address. Just establish a new link
+ * (not a new client). Add one to the link count */
+ clink->client = VXI11_CLIENT_ADDRESS[device_no];
+ ret = vxi11_open_link(ip, &(clink->client), &(clink->link), device);
+// printf("Found an ip address, copying client from VXI11_CLIENT_ADDRESS[%d]\n",device_no);
+ VXI11_LINK_COUNT[device_no]++;
+// printf("Have just incremented VXI11_LINK_COUNT[%d], it's now %d\n",device_no,VXI11_LINK_COUNT[device_no]);
+ }
+// printf("after creating link, clink->link = %ld\n", clink->link);
+ return ret;
+ }
+
+/* This is a wrapper function, used for the situations where there is only one
+ * "device" per client. This is the case for most (if not all) VXI11
+ * instruments; however, it is _not_ the case for devices such as LAN to GPIB
+ * gateways. These are single clients that communicate to many instruments
+ * (devices). In order to differentiate between them, we need to pass a device
+ * name. This gets used in the vxi11_open_link() fn, as the link_parms.device
+ * value. */
+int vxi11_open_device(const char *ip, CLINK *clink) {
+ char device[6];
+ strncpy(device,"inst0",6);
+ return vxi11_open_device(ip, clink, device);
+ }
+
+
+
+/* CLOSE FUNCTION *
+ * ============== */
+
+/* Use this function from user land to close a device and/or sever a link. Can
+ * be used multiple times for the same device (the library will keep track).*/
+int vxi11_close_device(const char *ip, CLINK *clink) {
+int l,ret;
+int device_no = -1;
+
+ /* Which instrument are we referring to? */
+ for (l=0; l<VXI11_MAX_CLIENTS; l++){
+ if (strcmp(ip,VXI11_IP_ADDRESS[l]) == 0 ) {
+ device_no=l;
+ }
+ }
+ /* Something's up if we can't find the IP address! */
+ if (device_no == -1) {
+ printf("vxi11_close_device: error: I have no record of you ever opening device\n");
+ printf(" with IP address %s\n",ip);
+ ret = -4;
+ }
+ else { /* Found the IP, there's more than one link to that instrument,
+ * so keep track and just close the link */
+ if (VXI11_LINK_COUNT[device_no] > 1 ) {
+ ret = vxi11_close_link(ip,clink->client, clink->link);
+ VXI11_LINK_COUNT[device_no]--;
+ }
+ /* Found the IP, it's the last link, so close the device (link
+ * AND client) */
+ else {
+ ret = vxi11_close_device(ip, clink->client, clink->link);
+ /* Remove the IP address, so that if we re-open the same device
+ * we do it properly */
+ memset(VXI11_IP_ADDRESS[device_no], 0, 20);
+ }
+ }
+ return ret;
+ }
+
+
+/* SEND FUNCTIONS *
+ * ============== */
+
+/* A _lot_ of the time we are sending text strings, and can safely rely on
+ * strlen(cmd). */
+int vxi11_send(CLINK *clink, const char *cmd) {
+ return vxi11_send(clink, cmd, strlen(cmd));
+ }
+
+/* We still need the version of the function where the length is set explicitly
+ * though, for when we are sending fixed length data blocks. */
+int vxi11_send(CLINK *clink, const char *cmd, unsigned long len) {
+ return vxi11_send(clink->client, clink->link, cmd, len);
+ }
+
+
+/* RECEIVE FUNCTIONS *
+ * ================= */
+
+/* Lazy wrapper for when I can't be bothered to specify a read timeout */
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len) {
+ return vxi11_receive(clink, buffer, len, VXI11_READ_TIMEOUT);
+ }
+
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
+ return vxi11_receive(clink->client, clink->link, buffer, len, timeout);
+ }
+
+
+
+/*****************************************************************************
+ * USEFUL ADDITIONAL HIGHER LEVER USER FUNCTIONS - USE THESE FROM YOUR *
+ * PROGRAMS OR INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* SEND FIXED LENGTH DATA BLOCK FUNCTION *
+ * ===================================== */
+int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len) {
+char *out_buffer;
+int cmd_len=strlen(cmd);
+int ret;
+
+ out_buffer=new char[cmd_len+10+len];
+ sprintf(out_buffer,"%s#8%08lu",cmd,len);
+ memcpy(out_buffer+cmd_len+10,buffer,(unsigned long) len);
+ ret = vxi11_send(clink, out_buffer, (unsigned long) (cmd_len+10+len));
+ delete[] out_buffer;
+ return ret;
+ }
+
+
+/* RECEIVE FIXED LENGTH DATA BLOCK FUNCTION *
+ * ======================================== */
+
+/* This function reads a response in the form of a definite-length block, such
+ * as when you ask for waveform data. The data is returned in the following
+ * format:
+ * #800001000<1000 bytes of data>
+ * ||\______/
+ * || |
+ * || \---- number of bytes of data
+ * |\--------- number of digits that follow (in this case 8, with leading 0's)
+ * \---------- always starts with #
+ */
+long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout) {
+/* I'm not sure what the maximum length of this header is, I'll assume it's
+ * 11 (#9 + 9 digits) */
+unsigned long necessary_buffer_size;
+char *in_buffer;
+int ret;
+int ndigits;
+unsigned long returned_bytes;
+int l;
+char scan_cmd[20];
+ necessary_buffer_size=len+12;
+ in_buffer=new char[necessary_buffer_size];
+ ret=vxi11_receive(clink, in_buffer, necessary_buffer_size, timeout);
+ if (ret < 0) return ret;
+ if (in_buffer[0] != '#') {
+ printf("vxi11_user: data block error: data block does not begin with '#'\n");
+ printf("First 20 characters received were: '");
+ for(l=0;l<20;l++) {
+ printf("%c",in_buffer[l]);
+ }
+ printf("'\n");
+ return -3;
+ }
+
+ /* first find out how many digits */
+ sscanf(in_buffer,"#%1d",&ndigits);
+ /* some instruments, if there is a problem acquiring the data, return only "#0" */
+ if (ndigits > 0) {
+ /* now that we know, we can convert the next <ndigits> bytes into an unsigned long */
+ sprintf(scan_cmd,"#%%1d%%%dlu",ndigits);
+ sscanf(in_buffer,scan_cmd,&ndigits,&returned_bytes);
+ memcpy(buffer, in_buffer+(ndigits+2), returned_bytes);
+ delete[] in_buffer;
+ return (long) returned_bytes;
+ }
+ else return 0;
+ }
+
+
+/* SEND AND RECEIVE FUNCTION *
+ * ========================= */
+
+/* This is mainly a useful function for the overloaded vxi11_obtain_value()
+ * fn's, but is also handy and useful for user and library use */
+long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout) {
+int ret;
+long bytes_returned;
+ do {
+ ret = vxi11_send(clink, cmd);
+ if (ret != 0) {
+ if (ret != -VXI11_NULL_WRITE_RESP) {
+ printf("Error: vxi11_send_and_receive: could not send cmd.\n");
+ printf(" The function vxi11_send returned %d. ",ret);
+ return -1;
+ }
+ else printf("(Info: VXI11_NULL_WRITE_RESP in vxi11_send_and_receive, resending query)\n");
+ }
+
+ bytes_returned = vxi11_receive(clink, buf, buf_len, timeout);
+ if (bytes_returned <= 0) {
+ if (bytes_returned >-VXI11_NULL_READ_RESP) {
+ printf("Error: vxi11_send_and_receive: problem reading reply.\n");
+ printf(" The function vxi11_receive returned %ld. ",bytes_returned);
+ return -2;
+ }
+ else printf("(Info: VXI11_NULL_READ_RESP in vxi11_send_and_receive, resending query)\n");
+ }
+ } while (bytes_returned == -VXI11_NULL_READ_RESP || ret == -VXI11_NULL_WRITE_RESP);
+ return 0;
+ }
+
+
+/* FUNCTIONS TO RETURN A LONG INTEGER VALUE SENT AS RESPONSE TO A QUERY *
+ * ==================================================================== */
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout) {
+char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
+ memset(buf, 0, 50);
+ if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
+ printf("Returning 0\n");
+ return 0;
+ }
+ return strtol(buf, (char **)NULL, 10);
+ }
+
+/* Lazy wrapper function with default read timeout */
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd) {
+ return vxi11_obtain_long_value(clink, cmd, VXI11_READ_TIMEOUT);
+ }
+
+
+/* FUNCTIONS TO RETURN A DOUBLE FLOAT VALUE SENT AS RESPONSE TO A QUERY *
+ * ==================================================================== */
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout) {
+char buf[50]; /* 50=arbitrary length... more than enough for one number in ascii */
+double val;
+ memset(buf, 0, 50);
+ if (vxi11_send_and_receive(clink, cmd, buf, 50, timeout) != 0) {
+ printf("Returning 0.0\n");
+ return 0.0;
+ }
+ val = strtod(buf, (char **)NULL);
+ return val;
+ }
+
+/* Lazy wrapper function with default read timeout */
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd) {
+ return vxi11_obtain_double_value(clink, cmd, VXI11_READ_TIMEOUT);
+ }
+
+
+/*****************************************************************************
+ * CORE FUNCTIONS - YOU SHOULDN'T NEED TO USE THESE FROM YOUR PROGRAMS OR *
+ * INSTRUMENT LIBRARIES *
+ *****************************************************************************/
+
+/* OPEN FUNCTIONS *
+ * ============== */
+int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
+
+ *client = clnt_create(ip, DEVICE_CORE, DEVICE_CORE_VERSION, "tcp");
+
+ if (*client == NULL) {
+ clnt_pcreateerror(ip);
+ return -1;
+ }
+
+ return vxi11_open_link(ip, client, link, device);
+ }
+
+int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device) {
+
+Create_LinkParms link_parms;
+
+ /* Set link parameters */
+ link_parms.clientId = (long) *client;
+ link_parms.lockDevice = 0;
+ link_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
+ link_parms.device = device;
+
+ *link = (Create_LinkResp *) calloc(1, sizeof(Create_LinkResp));
+
+ if (create_link_1(&link_parms, *link, *client) != RPC_SUCCESS) {
+ clnt_perror(*client, ip);
+ return -2;
+ }
+ return 0;
+ }
+
+
+/* CLOSE FUNCTIONS *
+ * =============== */
+int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link) {
+int ret;
+
+ ret = vxi11_close_link(ip, client, link);
+
+ clnt_destroy(client);
+
+ return ret;
+ }
+
+int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link) {
+Device_Error dev_error;
+ memset(&dev_error, 0, sizeof(dev_error));
+
+ if (destroy_link_1(&link->lid, &dev_error, client) != RPC_SUCCESS) {
+ clnt_perror(client,ip);
+ return -1;
+ }
+
+ return 0;
+ }
+
+
+/* SEND FUNCTIONS *
+ * ============== */
+
+/* A _lot_ of the time we are sending text strings, and can safely rely on
+ * strlen(cmd). */
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd) {
+ return vxi11_send(client, link, cmd, strlen(cmd));
+ }
+
+/* We still need the version of the function where the length is set explicitly
+ * though, for when we are sending fixed length data blocks. */
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len) {
+Device_WriteParms write_parms;
+unsigned int bytes_left = len;
+char *send_cmd;
+
+ send_cmd = new char[len];
+ memcpy(send_cmd, cmd, len);
+
+ write_parms.lid = link->lid;
+ write_parms.io_timeout = VXI11_DEFAULT_TIMEOUT;
+ write_parms.lock_timeout = VXI11_DEFAULT_TIMEOUT;
+
+/* We can only write (link->maxRecvSize) bytes at a time, so we sit in a loop,
+ * writing a chunk at a time, until we're done. */
+
+ do {
+ Device_WriteResp write_resp;
+ memset(&write_resp, 0, sizeof(write_resp));
+
+ if (bytes_left <= link->maxRecvSize) {
+ write_parms.flags = 8;
+ write_parms.data.data_len = bytes_left;
+ }
+ else {
+ write_parms.flags = 0;
+ /* We need to check that maxRecvSize is a sane value (ie >0). Believe it
+ * or not, on some versions of Agilent Infiniium scope firmware the scope
+ * returned "0", which breaks Rule B.6.3 of the VXI-11 protocol. Nevertheless
+ * we need to catch this, otherwise the program just hangs. */
+ if (link->maxRecvSize > 0) {
+ write_parms.data.data_len = link->maxRecvSize;
+ }
+ else {
+ write_parms.data.data_len = 4096; /* pretty much anything should be able to cope with 4kB */
+ }
+ }
+ write_parms.data.data_val = send_cmd + (len - bytes_left);
+
+ if(device_write_1(&write_parms, &write_resp, client) != RPC_SUCCESS) {
+ delete[] send_cmd;
+ return -VXI11_NULL_WRITE_RESP; /* The instrument did not acknowledge the write, just completely
+ dropped it. There was no vxi11 comms error as such, the
+ instrument is just being rude. Usually occurs when the instrument
+ is busy. If we don't check this first, then the following
+ line causes a seg fault */
+ }
+ if (write_resp.error != 0) {
+ printf("vxi11_user: write error: %d\n", (int)write_resp.error);
+ delete[] send_cmd;
+ return -(write_resp.error);
+ }
+ bytes_left -= write_resp.size;
+ } while (bytes_left > 0);
+
+ delete[] send_cmd;
+ return 0;
+ }
+
+
+/* RECEIVE FUNCTIONS *
+ * ================= */
+
+// It appeared that this function wasn't correctly dealing with more data available than specified in len.
+// This patch attempts to fix this issue. RDP 2007/8/13
+
+/* wrapper, for default timeout */ long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len) { return vxi11_receive(client, link, buffer, len, VXI11_READ_TIMEOUT);
+ }
+
+#define RCV_END_BIT 0x04 // An end indicator has been read
+#define RCV_CHR_BIT 0x02 // A termchr is set in flags and a character which matches termChar is transferred
+#define RCV_REQCNT_BIT 0x01 // requestSize bytes have been transferred. This includes a request size of zero.
+
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout) {
+Device_ReadParms read_parms;
+Device_ReadResp read_resp;
+unsigned long curr_pos = 0;
+
+ read_parms.lid = link->lid;
+ read_parms.requestSize = len;
+ read_parms.io_timeout = timeout; /* in ms */
+ read_parms.lock_timeout = timeout; /* in ms */
+ read_parms.flags = 0;
+ read_parms.termChar = 0;
+
+ do {
+ memset(&read_resp, 0, sizeof(read_resp));
+
+ read_resp.data.data_val = buffer + curr_pos;
+ read_parms.requestSize = len - curr_pos; // Never request more total data than originally specified in len
+
+ if(device_read_1(&read_parms, &read_resp, client) != RPC_SUCCESS) {
+ return -VXI11_NULL_READ_RESP; /* there is nothing to read. Usually occurs after sending a query
+ which times out on the instrument. If we don't check this first,
+ then the following line causes a seg fault */
+ }
+ if (read_resp.error != 0) {
+ /* Read failed for reason specified in error code.
+ * (From published VXI-11 protocol, section B.5.2)
+ * 0 no error
+ * 1 syntax error
+ * 3 device not accessible
+ * 4 invalid link identifier
+ * 5 parameter error
+ * 6 channel not established
+ * 8 operation not supported
+ * 9 out of resources
+ * 11 device locked by another link
+ * 12 no lock held by this link
+ * 15 I/O timeout
+ * 17 I/O error
+ * 21 invalid address
+ * 23 abort
+ * 29 channel already established
+ */
+
+ printf("vxi11_user: read error: %d\n", (int)read_resp.error);
+ return -(read_resp.error);
+ }
+
+ if((curr_pos + read_resp.data.data_len) <= len) {
+ curr_pos += read_resp.data.data_len;
+ }
+ if( (read_resp.reason & RCV_END_BIT) || (read_resp.reason & RCV_CHR_BIT) ) {
+ break;
+ }
+ else if( curr_pos == len ) {
+ printf("xvi11_user: read error: buffer too small. Read %d bytes without hitting terminator.\n", (int)curr_pos );
+ return -100;
+ }
+ } while(1);
+ return (curr_pos); /*actual number of bytes received*/
+
+ }
+
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.h
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.h (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_user.h (revision 145)
@@ -0,0 +1,87 @@
+/* vxi11_user.h
+ * Copyright (C) 2006 Steve D. Sharples
+ *
+ * User library for opening, closing, sending to and receiving from
+ * a device enabled with the VXI11 RPC ethernet protocol. Uses the files
+ * generated by rpcgen vxi11.x.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * The author's email address is steve.sharples@nottingham.ac.uk
+ */
+
+#ifndef __VXI11_USER__
+#define __VXI11_USER__
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <rpc/rpc.h>
+#include "vxi11.h"
+
+#define VXI11_DEFAULT_TIMEOUT 10000 /* in ms */
+#define VXI11_READ_TIMEOUT 2000 /* in ms */
+#define VXI11_CLIENT CLIENT
+#define VXI11_LINK Create_LinkResp
+#define VXI11_MAX_CLIENTS 256 /* maximum no of unique IP addresses/clients */
+#define VXI11_NULL_READ_RESP 50 /* vxi11_receive() return value if a query
+ * times out ON THE INSTRUMENT (and so we have
+ * to resend the query again) */
+#define VXI11_NULL_WRITE_RESP 51 /* vxi11_send() return value if a sent command
+ * times out ON THE INSTURMENT. */
+
+struct CLINK {
+ VXI11_CLIENT *client;
+ VXI11_LINK *link;
+ } ;
+typedef struct CLINK CLINK;
+
+/* The four main functions: open, close, send, receieve (plus a couple of wrappers) */
+/* In fact all 6 of these are wrappers to the original functions listed at the
+ * bottom, that use separate CLIENT and VXI11_LINK structures. It was easier to
+ * write wrappers for these functions than to re-write the original functions
+ * themselves. These are the 4 (or 6 if you like) key user functions that you
+ * should probably be using. They all use the CLINK structure. */
+int vxi11_open_device(const char *ip, CLINK *clink);
+int vxi11_open_device(const char *ip, CLINK *clink, char *device);
+int vxi11_close_device(const char *ip, CLINK *clink);
+int vxi11_send(CLINK *clink, const char *cmd);
+int vxi11_send(CLINK *clink, const char *cmd, unsigned long len);
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len);
+long vxi11_receive(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
+
+/* Utility functions, that use send() and receive(). Use these too. */
+int vxi11_send_data_block(CLINK *clink, const char *cmd, char *buffer, unsigned long len);
+long vxi11_receive_data_block(CLINK *clink, char *buffer, unsigned long len, unsigned long timeout);
+long vxi11_send_and_receive(CLINK *clink, const char *cmd, char *buf, unsigned long buf_len, unsigned long timeout);
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd, unsigned long timeout);
+double vxi11_obtain_double_value(CLINK *clink, const char *cmd, unsigned long timeout);
+long vxi11_obtain_long_value(CLINK *clink, const char *cmd);
+double vxi11_obtain_double_value(CLINK *link, const char *cmd);
+
+/* When I first wrote this library I used separate client and links. I've
+ * retained the original functions and just written clink wrappers for them
+ * (see above) as it's perhaps a little clearer this way. Probably not worth
+ * delving this deep in use, but it's where the real nitty gritty is. */
+int vxi11_open_device(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
+int vxi11_open_link(const char *ip, CLIENT **client, VXI11_LINK **link, char *device);
+int vxi11_close_device(const char *ip, CLIENT *client, VXI11_LINK *link);
+int vxi11_close_link(const char *ip, CLIENT *client, VXI11_LINK *link);
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd);
+int vxi11_send(CLIENT *client, VXI11_LINK *link, const char *cmd, unsigned long len);
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len);
+long vxi11_receive(CLIENT *client, VXI11_LINK *link, char *buffer, unsigned long len, unsigned long timeout);
+
+#endif
Index: sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_xdr.c
===================================================================
--- sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_xdr.c (nonexistent)
+++ sipmscan/trunk_v0.9/vxi11_x86_64/vxi11_xdr.c (revision 145)
@@ -0,0 +1,462 @@
+/*
+ * Please do not edit this file.
+ * It was generated using rpcgen.
+ */
+
+#include "vxi11.h"
+
+bool_t
+xdr_Device_Link (XDR *xdrs, Device_Link *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_AddrFamily (XDR *xdrs, Device_AddrFamily *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_enum (xdrs, (enum_t *) objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_Flags (XDR *xdrs, Device_Flags *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ErrorCode (XDR *xdrs, Device_ErrorCode *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_long (xdrs, objp))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_Error (XDR *xdrs, Device_Error *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Create_LinkParms (XDR *xdrs, Create_LinkParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_LONG(buf, objp->clientId);
+ IXDR_PUT_BOOL(buf, objp->lockDevice);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ }
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ objp->clientId = IXDR_GET_LONG(buf);
+ objp->lockDevice = IXDR_GET_BOOL(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_long (xdrs, &objp->clientId))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->lockDevice))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_string (xdrs, &objp->device, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Create_LinkResp (XDR *xdrs, Create_LinkResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_short (xdrs, &objp->abortPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->maxRecvSize))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_WriteParms (XDR *xdrs, Device_WriteParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data.data_val, (u_int *) &objp->data.data_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_WriteResp (XDR *xdrs, Device_WriteResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->size))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadParms (XDR *xdrs, Device_ReadParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->requestSize);
+ IXDR_PUT_U_LONG(buf, objp->io_timeout);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ }
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 3 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+
+ } else {
+ objp->requestSize = IXDR_GET_U_LONG(buf);
+ objp->io_timeout = IXDR_GET_U_LONG(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->requestSize))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_char (xdrs, &objp->termChar))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadResp (XDR *xdrs, Device_ReadResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->reason))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data.data_val, (u_int *) &objp->data.data_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_ReadStbResp (XDR *xdrs, Device_ReadStbResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_u_char (xdrs, &objp->stb))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_GenericParms (XDR *xdrs, Device_GenericParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_RemoteFunc (XDR *xdrs, Device_RemoteFunc *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ buf = XDR_INLINE (xdrs, 4 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->hostAddr);
+ IXDR_PUT_U_LONG(buf, objp->hostPort);
+ IXDR_PUT_U_LONG(buf, objp->progNum);
+ IXDR_PUT_U_LONG(buf, objp->progVers);
+ }
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ buf = XDR_INLINE (xdrs, 4 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+
+ } else {
+ objp->hostAddr = IXDR_GET_U_LONG(buf);
+ objp->hostPort = IXDR_GET_U_LONG(buf);
+ objp->progNum = IXDR_GET_U_LONG(buf);
+ objp->progVers = IXDR_GET_U_LONG(buf);
+ }
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_u_long (xdrs, &objp->hostAddr))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->hostPort))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progNum))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->progVers))
+ return FALSE;
+ if (!xdr_Device_AddrFamily (xdrs, &objp->progFamily))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_EnableSrqParms (XDR *xdrs, Device_EnableSrqParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->enable))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->handle.handle_val, (u_int *) &objp->handle.handle_len, 40))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_LockParms (XDR *xdrs, Device_LockParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_DocmdParms (XDR *xdrs, Device_DocmdParms *objp)
+{
+ register int32_t *buf;
+
+
+ if (xdrs->x_op == XDR_ENCODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 5 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+
+ } else {
+ IXDR_PUT_U_LONG(buf, objp->io_timeout);
+ IXDR_PUT_U_LONG(buf, objp->lock_timeout);
+ IXDR_PUT_LONG(buf, objp->cmd);
+ IXDR_PUT_BOOL(buf, objp->network_order);
+ IXDR_PUT_LONG(buf, objp->datasize);
+ }
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+ } else if (xdrs->x_op == XDR_DECODE) {
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ buf = XDR_INLINE (xdrs, 5 * BYTES_PER_XDR_UNIT);
+ if (buf == NULL) {
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+
+ } else {
+ objp->io_timeout = IXDR_GET_U_LONG(buf);
+ objp->lock_timeout = IXDR_GET_U_LONG(buf);
+ objp->cmd = IXDR_GET_LONG(buf);
+ objp->network_order = IXDR_GET_BOOL(buf);
+ objp->datasize = IXDR_GET_LONG(buf);
+ }
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+ }
+
+ if (!xdr_Device_Link (xdrs, &objp->lid))
+ return FALSE;
+ if (!xdr_Device_Flags (xdrs, &objp->flags))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->io_timeout))
+ return FALSE;
+ if (!xdr_u_long (xdrs, &objp->lock_timeout))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->cmd))
+ return FALSE;
+ if (!xdr_bool (xdrs, &objp->network_order))
+ return FALSE;
+ if (!xdr_long (xdrs, &objp->datasize))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data_in.data_in_val, (u_int *) &objp->data_in.data_in_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_DocmdResp (XDR *xdrs, Device_DocmdResp *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_Device_ErrorCode (xdrs, &objp->error))
+ return FALSE;
+ if (!xdr_bytes (xdrs, (char **)&objp->data_out.data_out_val, (u_int *) &objp->data_out.data_out_len, ~0))
+ return FALSE;
+ return TRUE;
+}
+
+bool_t
+xdr_Device_SrqParms (XDR *xdrs, Device_SrqParms *objp)
+{
+ register int32_t *buf;
+
+ if (!xdr_bytes (xdrs, (char **)&objp->handle.handle_val, (u_int *) &objp->handle.handle_len, ~0))
+ return FALSE;
+ return TRUE;
+}
Index: sipmscan/trunk_v0.9/windowed_test.C
===================================================================
--- sipmscan/trunk_v0.9/windowed_test.C (nonexistent)
+++ sipmscan/trunk_v0.9/windowed_test.C (revision 145)
@@ -0,0 +1,5762 @@
+#include "workstation.h"
+#include "daq.h"
+#include "root_include.h"
+#include "windowed_test.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+
+#include "daqscope.h"
+
+//---------------------------------------------------------------
+// Subwindow layout class
+
+class TGMdiSubwindow
+{
+RQ_OBJECT("TGMdiSubwindow")
+
+protected:
+ TGMdiFrame *fMdiFrame;
+
+public:
+ TGMdiSubwindow(TGMdiMainFrame *main, int w, int h);
+
+ TGMdiFrame *GetMdiFrame() const { return fMdiFrame; }
+ virtual Bool_t CloseWindow();
+};
+
+//---------------------------------------------------------------
+// Main window class
+
+class TGAppMainFrame
+{
+RQ_OBJECT("TGAppMainFrame")
+
+protected:
+ TGMainFrame *fMain;
+ TGMdiMainFrame *fMainFrame;
+ TGMdiMenuBar *fMenuBar;
+ TGLayoutHints *fMenuBarItemLayout;
+ TGPopupMenu *fMenuFile, *fMenuAnalysis, *fMenuTools, *fMenuWindow, *fMenuHelp;
+ TGPopupMenu *fMenuHisttype;
+ TGMdiSubwindow *settingsPane, *mainSubwindow, *histogramPane, *histogramPaneFile, *histogramPaneCtr, *fieldpointPane, *headerPane;
+
+ void InitMenu();
+ void MeasurementLayout();
+ void OpenWindow(int winid);
+ void CloseWindow();
+ Bool_t About();
+public:
+ TGAppMainFrame(const TGWindow *p, int w, int h);
+
+ void HandleMenu(Int_t id);
+
+ void EnableVoltScan();
+ void EnableSurfScan();
+ void EnableZaxisScan();
+ void VoltageLimit();
+ void ChannelLimit();
+ void CleanPlotToggle();
+ void ConnectToScope();
+
+ void SetVoltOut();
+ void GetVoltOut();
+ void ResetVoltOut();
+ void SetPosition();
+ void GetPosition();
+ void HomePosition();
+
+ void InitializeScope();
+ void StartScopeAcq();
+ void CustomScopeCommand();
+ void SelectedMeasType(int mtype);
+
+ void SaveFile();
+ void StartAcq();
+
+ void SelectDirectory();
+ void ListMultiSelect();
+ void ListSelectAll();
+ void FileListNavigation(int pn);
+ void HeaderEdit();
+
+ void DisplayHistogram(char *histfile, int histtype);
+ void SetHistRange();
+ void ChangeHisttype(int type);
+ void ChangeChannel();
+ void HistogramExport();
+ void MakeSurfPlot(TList *files);
+ void MakeBreakdownPlot(int nrp, double *volt, double *volterr, double *psep1, double *pseperr1, double *psep2, double *pseperr2, double *psep3, double *pseperr3, char *plotfile, int separations);
+
+ void FitSpectrum(TList *files, int q);
+ void EdgeDetection(TGraph *pdf, TGraph *cdf, char *outname, TCanvas *g1dCanvas, double pdfmax, int direction);
+ void IntegSpectrum(TList *files, int direction);
+ void PhotonMu(TList *files);
+
+ void UpdateTempPlot();
+ void TempEndToggle();
+ void ExportTempPlot();
+ void GetTempFile(int set);
+
+ void EditTickToggle(int set);
+ void headerchange(char *histfile, bool *changetype);
+ void headeredit();
+
+ void RunMeas(void *ptr, int runCase, int zaxisscan, int &scanon);
+};
+
+const char *histExt = ".root";
+const char *histExtAll = "*.root";
+daq *gDaq;
+daqscope *gScopeDaq;
+//int debugSig = 0;
+int retTemp;
+int gStop=0;
+unsigned int gBuf[BSIZE];
+int logchange = 0;
+double tdctimeconversion = 45.0909;
+double lenconversion = 0.3595;
+int oscOn;
+const char *allMeasNames[11] = {"Amplitude","Area","Delay","Fall","Frequency","Maximum","Mean","Minimum","Peak-to-peak","Peak width","Rise"};
+
+// ROOT file variable structure -----------
+struct EventHeader {
+ int nrch;
+ int timestamp;
+ double biasvolt;
+ int xpos;
+ int ypos;
+ int zpos;
+ double temperature;
+ double angle;
+ char laserinfo[256];
+} evtheader;
+
+struct EventData {
+ int adcdata[8];
+ int tdcdata[8];
+} evtdata;
+
+struct EventMeas {
+ double measdata;
+} evtmeas;
+
+TFile *inroot;
+TFile *outroot;
+
+// Test graphs for scope measurements
+TCanvas *wCanvas;
+TGraph *testgraph;
+
+//---------------------------------------------------------------
+// Global variables
+
+TGCheckButton *voltscanOn;
+TGCheckButton *surfscanOn;
+TGCheckButton *zscanOn;
+TGTextEntry *oscIP;
+TGTextButton *oscConnect;
+TGCheckButton *histogramOn;
+TGNumberEntry *vHardlimit;
+TGNumberEntry *NCH;
+TGTextEntry *laserInfo;
+TGNumberEntry *chtemp;
+TGNumberEntry *incangle;
+TGCheckButton *cleanOn;
+
+TGTab *setTab;
+TGComboBox *vOutCh;
+TGNumberEntry *vOut;
+TGCheckButton *vOutOnOff;
+TGTextButton *vOutSet;
+TGTextButton *vOutGet;
+TGTextButton *vOutReset;
+TGNumberEntry *vOutStart;
+TGNumberEntry *vOutStop;
+TGNumberEntry *vOutStep;
+TGNumberEntry *xPos;
+TGNumberEntry *yPos;
+TGNumberEntry *zPos;
+TGTextButton *positionSet;
+TGTextButton *positionGet;
+TGTextButton *positionHome;
+TGNumberEntry *xPosMin;
+TGNumberEntry *xPosMax;
+TGNumberEntry *xPosStep;
+TGNumberEntry *yPosMin;
+TGNumberEntry *yPosMax;
+TGNumberEntry *yPosStep;
+TGNumberEntry *zPosMin;
+TGNumberEntry *zPosMax;
+TGNumberEntry *zPosStep;
+TGNumberEntry *evtNum;
+TGTextEntry *timeStamp;
+TGTextEntry *fileName;
+TGTextButton *saveFile;
+TGTextButton *measStart;
+TGLabel *busyLabel;
+TGHProgressBar *curProgress;
+
+TRootEmbeddedCanvas *histCanvas;
+
+TGTextButton *selectDir;
+TGListBox *fileList;
+TGCheckButton *multiSelect;
+TGCheckButton *multiSelectAll;
+TGTextButton *prevFile;
+TGTextButton *nextFile;
+TGTextButton *editHeader;
+
+TGTextEntry *disptime;
+TGNumberEntry *dispbias;
+TGTextEntry *disppos;
+TGNumberEntry *disptemp;
+TGNumberEntry *dispangle;
+TGTextEntry *displaser;
+
+TGNumberEntry *adcMinRange;
+TGNumberEntry *adcMaxRange;
+TGNumberEntry *tdcMinwindow;
+TGNumberEntry *tdcMaxwindow;
+TGNumberEntry *yMinRange;
+TGNumberEntry *yMaxRange;
+TGNumberEntry *selectCh;
+TGTextButton *changeADC;
+TGTextButton *changeTDC;
+TGTextButton *changeADCTDC;
+TGTextButton *change2Dsurf;
+TGCheckButton *logscale;
+TGTextButton *exportHist;
+TGNumberEntry *fitSigma;
+TGNumberEntry *fitTresh;
+TGNumberEntry *fitInter;
+TGNumberEntry *accError;
+TGNumberEntry *minPeak;
+TGNumberEntry *pedesLow;
+TGCheckButton *exfitplots;
+
+TGCheckButton *sCH[8];
+TGComboBox *sMeasType;
+TGCheckButton *sCamaclink;
+TGTextEntry *scopeCommand;
+TGTextEntry *scopeReturn;
+TGTextButton *sendScopeCustom;
+TGComboBox *sMeasgroup;
+TGTextButton *scopeInit;
+
+TRootEmbeddedCanvas *displayCanvas;
+TGComboBox *tempCh;
+TGComboBox *tempDay[2];
+TGComboBox *tempMonth[2];
+TGComboBox *tempYear[2];
+TGComboBox *tempHour[2];
+TGComboBox *tempMinute[2];
+TGComboBox *tempSecond[2];
+TGTextButton *tempFile[2];
+TGCheckButton *tempEndOn;
+TGTextButton *updateTemp;
+TGTextButton *exportTemp;
+//TGTextButton *closeTemp;
+
+TGCheckButton *biasedittick;
+TGNumberEntry *biasedit;
+TGCheckButton *posedittick;
+TGNumberEntry *posedit[3];
+TGCheckButton *tempedittick;
+TGNumberEntry *tempedit;
+TGCheckButton *angleedittick;
+TGNumberEntry *angleedit;
+TGCheckButton *laseredittick;
+TGTextEntry *laseredit;
+TGTextButton *editHead;
+
+Bool_t firstrun = kTRUE;
+Bool_t started;
+Bool_t cleanPlots = kTRUE;
+
+// Layout hints definitions
+TGLayoutHints *f0 = new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,2,2);
+TGLayoutHints *f0centerx = new TGLayoutHints(kLHintsCenterX,2,2,2,2);
+TGLayoutHints *f0centery = new TGLayoutHints(kLHintsLeft | kLHintsCenterY,2,2,2,2);
+TGLayoutHints *f0center2d = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY,2,2,2,2);
+TGLayoutHints *f0right = new TGLayoutHints(kLHintsRight | kLHintsTop,2,2,2,2);
+TGLayoutHints *f1 = new TGLayoutHints(kLHintsExpandX | kLHintsExpandY,2,2,2,2);
+TGLayoutHints *f2 = new TGLayoutHints(kLHintsExpandX,2,2,2,2);
+TGLayoutHints *f3 = new TGLayoutHints(kLHintsCenterY,2,2,20,2);
+TGLayoutHints *f3notop = new TGLayoutHints(kLHintsCenterY,4,4,2,30);
+
+// Separate functions -----------------------------------------
+void GetTime(int intime, char *outtime)
+{
+ time_t rawtime;
+ struct tm * timeinfo;
+ if(intime < 0)
+ time(&rawtime);
+ else
+ rawtime = (time_t)intime;
+ timeinfo = localtime(&rawtime);
+ sprintf(outtime, "%s", asctime(timeinfo));
+ int len = strlen(outtime);
+ if(len) outtime[len-1] = 0;
+}
+
+int MyTimer()
+{
+ char cmd[100];
+ GetTime(-1, cmd);
+ if (timeStamp) timeStamp->SetText(cmd);
+ return 0;
+}
+
+int GetChannel()
+{
+ int selectedOutput;
+ if(vOutCh->GetSelected() < 8) selectedOutput = (vOutCh->GetSelected())+1;
+ else if( (vOutCh->GetSelected() >= 8) && (vOutCh->GetSelected() < 16) ) selectedOutput = (vOutCh->GetSelected())+93;
+ else selectedOutput = 1;
+
+ return selectedOutput;
+}
+
+void remove_ext(char *inname, char *outname)
+{
+ char ctemp[256];
+ for(int i = 0; i < (int)strlen(inname); i++)
+ {
+ if( (inname[i] == '.') && (i > (int)(strlen(inname)-6)) )
+ {
+ ctemp[i] = '\0';
+ sprintf(outname, "%s", ctemp);
+ break;
+ }
+ else
+ ctemp[i] = inname[i];
+ }
+
+ if(debug)
+ printf("Outfile (remove_ext): %s\n", outname);
+}
+
+void remove_from_last(char *inname, char search, char *outname)
+{
+ char ctemp[256];
+ int searchpos = -1;
+ for(int i = (int)strlen(inname); i >= 0; i--)
+ {
+ if(inname[i] == search)
+ {
+ searchpos = i;
+ break;
+ }
+ }
+
+ for(int i = 0; i < searchpos; i++)
+ ctemp[i] = inname[i];
+
+ ctemp[searchpos] = '\0';
+ sprintf(outname, "%s", ctemp);
+
+ if(debug)
+ printf("Outfile (remove_from_last): %s\n", outname);
+}
+
+void SeqNumber(int innum, int maxnum, char *outstr)
+{
+ int zeronum = 5;
+
+ // Check how many zeroes we need to add to get sequential numbers
+ if( (maxnum > 0) && (maxnum < 1000) )
+ zeronum = 2;
+ else if( (maxnum >= 1000) && (maxnum < 10000) )
+ zeronum = 3;
+ else if( (maxnum >= 10000) && (maxnum < 100000) )
+ zeronum = 4;
+ else if( (maxnum >= 100000) && (maxnum < 1000000) )
+ zeronum = 5;
+
+ // Make the sequence number depending on the number of zeroes
+ if(zeronum == 2)
+ {
+ if(innum < 10)
+ sprintf(outstr, "00%d", innum);
+ else if( (innum >= 10) && (innum < 100) )
+ sprintf(outstr, "0%d", innum);
+ else if( (innum >= 100) && (innum < 1000) )
+ sprintf(outstr, "%d", innum);
+ }
+ else if(zeronum == 3)
+ {
+ if(innum < 10)
+ sprintf(outstr, "000%d", innum);
+ else if( (innum >= 10) && (innum < 100) )
+ sprintf(outstr, "00%d", innum);
+ else if( (innum >= 100) && (innum < 1000) )
+ sprintf(outstr, "0%d", innum);
+ else if( (innum >= 1000) && (innum < 10000) )
+ sprintf(outstr, "%d", innum);
+ }
+ else if(zeronum == 4)
+ {
+ if(innum < 10)
+ sprintf(outstr, "0000%d", innum);
+ else if( (innum >= 10) && (innum < 100) )
+ sprintf(outstr, "000%d", innum);
+ else if( (innum >= 100) && (innum < 1000) )
+ sprintf(outstr, "00%d", innum);
+ else if( (innum >= 1000) && (innum < 10000) )
+ sprintf(outstr, "0%d", innum);
+ else if( (innum >= 10000) && (innum < 100000) )
+ sprintf(outstr, "%d", innum);
+ }
+ else if(zeronum == 5)
+ {
+ if(innum < 10)
+ sprintf(outstr, "00000%d", innum);
+ else if( (innum >= 10) && (innum < 100) )
+ sprintf(outstr, "0000%d", innum);
+ else if( (innum >= 100) && (innum < 1000) )
+ sprintf(outstr, "000%d", innum);
+ else if( (innum >= 1000) && (innum < 10000) )
+ sprintf(outstr, "00%d", innum);
+ else if( (innum >= 10000) && (innum < 100000) )
+ sprintf(outstr, "0%d", innum);
+ else if( (innum >= 100000) && (innum < 1000000) )
+ sprintf(outstr, "%d", innum);
+ }
+}
+
+// Peak detection function
+int npeaks;
+double FindPeaks(double *x, double *par)
+{
+ double result = 0;
+ for(int i = 0; i < npeaks; i++)
+ {
+ double norm = par[3*i];
+ double mean = par[3*i+1];
+ double sigma = par[3*i+2];
+ result += norm*TMath::Gaus(x[0], mean, sigma);
+ }
+ return result;
+}
+
+// Temperature sensor functions -----------------------------
+const char* dbname = "mysql://f9lab08.ijs.si/f9phdet";
+const char* tblname = "fprtd122";
+const char* username = "f9daq";
+const char* userpass = "f9lab";
+
+// Get the temperature from MYSQL database
+double GetTemperature(int ch, const char *s)
+{
+ int bin=5+7*4-ch*4;
+ char hex[16];
+ strncpy(hex, (const char *) &s[bin], 4);
+ hex[4]=0;
+ int ix;
+ sscanf (hex,"%x",&ix);
+ //printf("0x%s\t",hex);
+ return (ix/65535.)*1050.-200.;
+}
+
+// Transform local time to timestamp
+int GetTimeStamp(int *intime)
+{
+ time_t rawtime;
+ struct tm * timeinfo;
+ time(&rawtime);
+ timeinfo = localtime(&rawtime);
+
+ printf("%d.%d.%d, %d:%d:%d\n", intime[0], intime[1], intime[2], intime[3], intime[4], intime[5]);
+
+ timeinfo->tm_mday = intime[0];
+ timeinfo->tm_mon = intime[1] - 1;
+ timeinfo->tm_year = intime[2] - 1900;
+ timeinfo->tm_hour = intime[3];
+ timeinfo->tm_min = intime[4];
+ timeinfo->tm_sec = intime[5];
+
+ return (int)mktime(timeinfo);
+}
+
+// Get data from MYSQL database
+void fieldpoint(int *timerange, int selch)
+{
+ char humantime[256];
+
+ // Display selected timestamps
+ GetTime(timerange[0], humantime);
+ printf("Minimum time set to: %s (%d)\n", humantime, timerange[0]);
+ if(timerange[1] != -1)
+ {
+ GetTime(timerange[1], humantime);
+ printf("Maximum time set to: %s (%d)\n", humantime, timerange[1]);
+ }
+ printf("Selected fieldpoint channel: %d\n", selch);
+ printf("\n");
+
+ // Database settings
+ TSQLServer *db = TSQLServer::Connect(dbname, username, userpass);
+ printf("Server info: %s\n", db->ServerInfo());
+ TSQLRow *row;
+ TSQLResult *res;
+
+ // list databases available on server
+ printf("\nList all databases on server %s\n", db->GetHost());
+ res = db->GetDataBases();
+ while ((row = res->Next())) {
+ printf("%s\n", row->GetField(0));
+ delete row;
+ }
+ delete res;
+
+ // list tables in database "test" (the permission tables)
+ printf("\nList all tables in database \"f9phdet\" on server %s\n", db->GetHost());
+ res = db->GetTables("f9phdet");
+ while ((row = res->Next())) {
+ printf("%s\n", row->GetField(0));
+ delete row;
+ }
+ delete res;
+
+ // list columns in table "runcatalog" in database "mysql"
+ printf("\nList all columns in table \"f9phdet\" in database \"f9rtd122\" on server %s\n", db->GetHost());
+ res = db->GetColumns("f9phdet", "fprtd122");
+ while ((row = res->Next())) {
+ printf("%s\n", row->GetField(0));
+ delete row;
+ }
+ delete res;
+
+ // query database and print results
+ char sql[1000] = "SELECT status,data,timestamp FROM fprtd122 WHERE status='A272727272727272748' AND substring(data,1,4)='A00C' ";
+ if(timerange[1] == -1)
+ sprintf(sql,"%s AND timestamp>='%d'", sql, timerange[0]);
+ else
+ sprintf(sql,"%s AND timestamp>='%d' AND timestamp<='%d'", sql, timerange[0], timerange[1]);
+ printf("%s\n",sql);
+
+ res = db->Query(sql);
+
+ int nrows = res->GetRowCount();
+ printf("\nGot %d rows in result\n", nrows);
+
+ // Printing and plotting
+ char timeval[256];
+ TGraph *gr;
+ gr = new TGraph(nrows);
+ gr->SetLineColor(kRed);
+ gr->SetLineWidth(1);
+ gr->SetMarkerColor(kRed);
+ gr->SetMarkerStyle(20);
+ gr->SetTitle("Temperature sensor;Time;Temperature (deg.)");
+
+ FILE *fp;
+ fp = fopen("./fieldpoint/dataout_fieldpoint.txt", "w");
+
+ if(debug)
+ printf("Time\tTemperature\n");
+ for (int i = 0; i < nrows; i++) {
+ row = res->Next();
+
+ GetTime((int)atof(row->GetField(2)), timeval);
+ double x = atof(row->GetField(2));
+ double y = GetTemperature(selch,row->GetField(1));
+ gr->SetPoint(i,x,y);
+
+ fprintf(fp, "%s\t%f\n",timeval,y);
+
+ if(debug)
+ printf("%s\t%f\n",timeval,y);
+
+ delete row;
+ }
+
+ fclose(fp);
+
+ delete res;
+ delete db;
+
+ TCanvas *gCanvas = displayCanvas->GetCanvas();
+ gCanvas->SetGrid();
+ gr->GetXaxis()->SetTimeDisplay(1);
+ gr->GetXaxis()->SetTimeFormat("%d.%m.%H:%M");
+ gr->GetXaxis()->SetLabelSize(0.027);
+ gr->GetXaxis()->SetTitleSize(0.038);
+ gr->GetYaxis()->SetLabelSize(0.027);
+ gr->GetYaxis()->SetTitleSize(0.038);
+ gr->GetXaxis()->SetNdivisions(515,kTRUE);
+ gr->Draw("AL");
+
+ gCanvas->Modified();
+ gCanvas->Update();
+}
+
+// Update the temperature plot
+void TGAppMainFrame::UpdateTempPlot()
+{
+ int stime[6];
+ int etime[6];
+
+ int timestamp[2];
+
+ time_t rtime;
+ int curyear;
+ time(&rtime);
+ curyear = (int)(localtime(&rtime))->tm_year+1900;
+
+ int leapy = 0;
+
+ // Getting the start time
+ stime[0] = (int)(tempDay[0]->GetSelected())+1;
+ stime[2] = curyear - (int)(tempYear[0]->GetSelected());
+ printf("%d, %d, %d\n", stime[2], curyear, (int)(tempYear[0]->GetSelected()));
+ stime[3] = (int)(tempHour[0]->GetSelected());
+ stime[4] = (int)(tempMinute[0]->GetSelected());
+ stime[5] = (int)(tempSecond[0]->GetSelected());
+
+ switch( tempMonth[0]->GetSelected() )
+ {
+ case 0:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 1:
+ if( stime[2]%4 == 0)
+ leapy = 1;
+
+ if( (leapy == 1) && (stime[0] > 29) )
+ {
+ stime[0] = 29;
+ tempDay[0]->Select(28);
+ }
+ else if( (leapy == 0) && (stime[0] > 28) )
+ {
+ stime[0] = 28;
+ tempDay[0]->Select(27);
+ }
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 2:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 3:
+ if(stime[0] > 30)
+ {
+ stime[0] = 30;
+ tempDay[0]->Select(29);
+ }
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 4:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 5:
+ if(stime[0] > 30)
+ {
+ stime[0] = 30;
+ tempDay[0]->Select(29);
+ }
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 6:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 7:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 8:
+ if(stime[0] > 30)
+ {
+ stime[0] = 30;
+ tempDay[0]->Select(29);
+ }
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 9:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 10:
+ if(stime[0] > 30)
+ {
+ stime[0] = 30;
+ tempDay[0]->Select(29);
+ }
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ case 11:
+ stime[1] = (int)(tempMonth[0]->GetSelected())+1;
+ break;
+ default:
+ break;
+ }
+
+ timestamp[0] = GetTimeStamp(stime);
+ printf("Start time: %d\n", timestamp[0]);
+
+ // Getting the end time
+ etime[0] = (int)(tempDay[1]->GetSelected())+1;
+ etime[2] = curyear - (int)(tempYear[1]->GetSelected());
+ etime[3] = (int)(tempHour[1]->GetSelected());
+ etime[4] = (int)(tempMinute[1]->GetSelected());
+ etime[5] = (int)(tempSecond[1]->GetSelected());
+
+ switch( tempMonth[1]->GetSelected() )
+ {
+ case 0:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 1:
+ if( etime[2]%4 == 0)
+ leapy = 1;
+
+ if( (leapy == 1) && (etime[0] > 29) )
+ {
+ etime[0] = 29;
+ tempDay[1]->Select(28);
+ }
+ else if( (leapy == 0) && (etime[0] > 28) )
+ {
+ etime[0] = 28;
+ tempDay[1]->Select(27);
+ }
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 2:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 3:
+ if(etime[0] > 30)
+ {
+ etime[0] = 30;
+ tempDay[1]->Select(29);
+ }
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 4:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 5:
+ if(etime[0] > 30)
+ {
+ etime[0] = 30;
+ tempDay[1]->Select(29);
+ }
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 6:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 7:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 8:
+ if(etime[0] > 30)
+ {
+ etime[0] = 30;
+ tempDay[1]->Select(29);
+ }
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 9:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 10:
+ if(etime[0] > 30)
+ {
+ etime[0] = 30;
+ tempDay[1]->Select(29);
+ }
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ case 11:
+ etime[1] = (int)(tempMonth[1]->GetSelected())+1;
+ break;
+ default:
+ break;
+ }
+
+ if( tempEndOn->IsDown() )
+ timestamp[1] = -1;
+ else
+ timestamp[1] = GetTimeStamp(etime);
+ printf("End time: %d\n", timestamp[1]);
+
+ fieldpoint(timestamp, tempCh->GetSelected());
+}
+
+// Export the temperature plot to pdf
+void TGAppMainFrame::ExportTempPlot()
+{
+ TCanvas *gCanvas = displayCanvas->GetCanvas();
+ gCanvas->Modified();
+ gCanvas->Update();
+ gCanvas->SaveAs("./fieldpoint/plotout_fieldpoint.pdf");
+}
+
+// Get time information from a saved file
+void TGAppMainFrame::GetTempFile(int set)
+{
+ TGFileInfo file_info;
+ const char *filetypes[] = {"Histograms",histExtAll,0,0};
+ file_info.fFileTypes = filetypes;
+ file_info.fIniDir = StrDup("./results");
+ file_info.fMultipleSelection = kFALSE;
+ new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDOpen, &file_info);
+ int i = 0;
+
+ TTree *header_data;
+ time_t rtime, ctime;
+ struct tm * timeinfo;
+
+ int curyear;
+ time(&ctime);
+ curyear = (int)(localtime(&ctime))->tm_year+1900;
+
+ TList *files = file_info.fFileNamesList;
+ TString fname;
+ // If multiple files were selected, only use the first one
+ if(files)
+ {
+ printf("Using only the first selected file.\n");
+
+ TSystemFile *file;
+ TIter next(files);
+ while(i == 0)
+ {
+ file=(TSystemFile*)next();
+ fname = file->GetName();
+ i++;
+ }
+ }
+ // If only one file was selected, use it
+ else
+ fname = file_info.fFilename;
+
+ if((int)fname.Length() > 0)
+ {
+ inroot = new TFile(fname, "READ");
+
+ inroot->GetObject("header_data", header_data);
+
+ // Reading the timestamp information
+ header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
+ header_data->GetEntry(0);
+
+ rtime = (time_t)evtheader.timestamp;
+ timeinfo = localtime(&rtime);
+// printf("Time: %d.%d.%d, %d:%d:%d\n", timeinfo->tm_mday, timeinfo->tm_mon+1, timeinfo->tm_year+1900, timeinfo->tm_hour, timeinfo->tm_min, timeinfo->tm_sec);
+
+ tempDay[set]->Select(timeinfo->tm_mday - 1);
+ tempMonth[set]->Select(timeinfo->tm_mon);
+ tempYear[set]->Select(curyear - (timeinfo->tm_year+1900));
+ tempHour[set]->Select(timeinfo->tm_hour);
+ tempMinute[set]->Select(timeinfo->tm_min);
+ tempSecond[set]->Select(timeinfo->tm_sec);
+
+ inroot->Close();
+ }
+ else
+ printf("No file selected.\n");
+
+ delete inroot;
+}
+
+// Toggle the endtime settings for temperature sensor
+void TGAppMainFrame::TempEndToggle()
+{
+ if( tempEndOn->IsDown() )
+ {
+ tempDay[1]->SetEnabled(kFALSE);
+ tempMonth[1]->SetEnabled(kFALSE);
+ tempYear[1]->SetEnabled(kFALSE);
+ tempHour[1]->SetEnabled(kFALSE);
+ tempMinute[1]->SetEnabled(kFALSE);
+ tempSecond[1]->SetEnabled(kFALSE);
+ tempFile[1]->SetEnabled(kFALSE);
+ }
+ else
+ {
+ tempDay[1]->SetEnabled(kTRUE);
+ tempMonth[1]->SetEnabled(kTRUE);
+ tempYear[1]->SetEnabled(kTRUE);
+ tempHour[1]->SetEnabled(kTRUE);
+ tempMinute[1]->SetEnabled(kTRUE);
+ tempSecond[1]->SetEnabled(kTRUE);
+ tempFile[1]->SetEnabled(kTRUE);
+ }
+}
+
+// --------------------------------------------------------------
+
+// Header editor functions --------------------------------------
+
+// Toggle the edit possibility for header entries
+void TGAppMainFrame::EditTickToggle(int set)
+{
+ if(set == 1)
+ {
+ if(biasedittick->IsDown()) biasedit->SetState(kTRUE);
+ else biasedit->SetState(kFALSE);
+ }
+ else if(set == 2)
+ {
+ if(posedittick->IsDown())
+ {
+ posedit[0]->SetState(kTRUE);
+ posedit[1]->SetState(kTRUE);
+ posedit[2]->SetState(kTRUE);
+ }
+ else
+ {
+ posedit[0]->SetState(kFALSE);
+ posedit[1]->SetState(kFALSE);
+ posedit[2]->SetState(kFALSE);
+ }
+ }
+ else if(set == 3)
+ {
+ if(tempedittick->IsDown()) tempedit->SetState(kTRUE);
+ else tempedit->SetState(kFALSE);
+ }
+ else if(set == 4)
+ {
+ if(angleedittick->IsDown()) angleedit->SetState(kTRUE);
+ else angleedit->SetState(kFALSE);
+ }
+ else if(set == 5)
+ {
+ if(laseredittick->IsDown()) laseredit->SetState(kTRUE);
+ else laseredit->SetState(kFALSE);
+ }
+}
+
+// Run the editing of file headers
+void TGAppMainFrame::headerchange(char *histfile, bool *changetype)
+{
+ if(debug)
+ printf("Selected file: %s\n", histfile);
+
+ // Preparing input file and the temporary output file
+ inroot = new TFile(histfile, "READ");
+
+ char outname[256];
+ sprintf(outname, "%s/results/temp.root", rootdir);
+ outroot = new TFile(outname, "RECREATE");
+
+ // Tree structure of input file
+ TTree *header_data, *meas_data, *scope_data;
+
+ inroot->GetObject("header_data", header_data);
+ inroot->GetObject("meas_data", meas_data);
+ inroot->GetObject("scope_data", scope_data);
+
+ // Tree structure of output file
+ TTree *new_meas_data = meas_data->CloneTree();
+ TTree *new_scope_data = scope_data->CloneTree();
+
+ // Save branches from the old header to temporary variables
+ header_data->SetBranchAddress("nrch", &evtheader.nrch);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("biasvolt", &evtheader.biasvolt);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("xpos", &evtheader.xpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("ypos", &evtheader.ypos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("zpos", &evtheader.zpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("temperature", &evtheader.temperature);
+ header_data->GetEntry(0);
+ if( header_data->FindBranch("angle") )
+ {
+ header_data->SetBranchAddress("angle", &evtheader.angle);
+ header_data->GetEntry(0);
+ }
+ header_data->SetBranchAddress("laserinfo", &evtheader.laserinfo);
+ header_data->GetEntry(0);
+
+ int itemp[5] = {0,0,0,0,0};
+ double dtemp[3] = {0.,0.,0.};
+ char ctemp[256];
+
+ itemp[0] = evtheader.nrch;
+ itemp[1] = evtheader.timestamp;
+ itemp[2] = evtheader.xpos;
+ itemp[3] = evtheader.ypos;
+ itemp[4] = evtheader.zpos;
+ dtemp[0] = evtheader.biasvolt;
+ dtemp[1] = evtheader.temperature;
+ if( header_data->FindBranch("angle") )
+ dtemp[2] = evtheader.angle;
+ else
+ dtemp[2] = 0.;
+ sprintf(ctemp, "%s", evtheader.laserinfo);
+
+ delete header_data;
+ delete meas_data;
+ delete scope_data;
+ inroot->Close();
+ delete inroot;
+
+ // Prepare branches for the new header
+ TTree *new_header_data = new TTree("header_data", "Header information for the measurement.");
+ new_header_data->Branch("nrch", &evtheader.nrch, "nrch/I");
+ new_header_data->Branch("timestamp", &evtheader.timestamp, "timestamp/I");
+ new_header_data->Branch("biasvolt", &evtheader.biasvolt, "biasvolt/D");
+ new_header_data->Branch("xpos", &evtheader.xpos, "xpos/I");
+ new_header_data->Branch("ypos", &evtheader.ypos, "ypos/I");
+ new_header_data->Branch("zpos", &evtheader.zpos, "zpos/I");
+ new_header_data->Branch("temperature", &evtheader.temperature, "temperature/D");
+ new_header_data->Branch("angle", &evtheader.angle, "temperature/D");
+ new_header_data->Branch("laserinfo", &evtheader.laserinfo, "laserinfo/C");
+
+ // Save new values (and old ones where we don't want to edit anything)
+ evtheader.nrch = itemp[0];
+ evtheader.timestamp = itemp[1];
+ if(changetype[0])
+ evtheader.biasvolt = (double)biasedit->GetNumber();
+ else
+ evtheader.biasvolt = dtemp[0];
+ if(changetype[1])
+ {
+ evtheader.xpos = (int)posedit[0]->GetNumber();
+ evtheader.ypos = (int)posedit[1]->GetNumber();
+ evtheader.zpos = (int)posedit[2]->GetNumber();
+ }
+ else
+ {
+ evtheader.xpos = itemp[2];
+ evtheader.ypos = itemp[3];
+ evtheader.zpos = itemp[4];
+ }
+ if(changetype[2])
+ evtheader.temperature = (double)tempedit->GetNumber();
+ else
+ evtheader.temperature = dtemp[1];
+ if(changetype[3])
+ evtheader.angle = (double)angleedit->GetNumber();
+ else
+ evtheader.angle = dtemp[2];
+ if(changetype[4])
+ sprintf(evtheader.laserinfo, "%s", laseredit->GetText());
+ else
+ sprintf(evtheader.laserinfo, "%s", ctemp);
+
+ new_header_data->Fill();
+
+ // Write down the temporary output file
+ new_header_data->Write();
+ new_meas_data->Write();
+ new_scope_data->Write();
+
+ delete new_header_data;
+ delete new_meas_data;
+ delete new_scope_data;
+ outroot->Close();
+ delete outroot;
+
+ // Replace the original file with temporary output file (and delete temporary file)
+ sprintf(outname, "cp -f %s/results/temp.root %s", rootdir, histfile);
+ retTemp = system(outname);
+ sprintf(outname, "rm -f %s/results/temp.root", rootdir);
+ retTemp = system(outname);
+
+ printf("Edited header in file: %s\n", histfile);
+}
+
+// Setup the editing of file headers
+void TGAppMainFrame::headeredit()
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ TList *files;
+ // Changelist: Bias, Position, Temperature, Angle, Laser info
+ bool changelist[] = { biasedittick->IsDown(), posedittick->IsDown(), tempedittick->IsDown(), angleedittick->IsDown(), laseredittick->IsDown() };
+
+ if( nrfiles > 0 )
+ {
+ // check the selected file/files and return its name/their names
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ if(debug)
+ printf("Filename: %s\n", files->At(i)->GetTitle());
+
+ headerchange( (char*)(files->At(i)->GetTitle()), changelist );
+ }
+ }
+ }
+ }
+}
+
+// --------------------------------------------------------------
+
+// Class related functions --------------------------------------
+
+// Apply the upper voltage limit from settings pane to main window
+void TGAppMainFrame::VoltageLimit()
+{
+ vOut->SetLimitValues(0, vHardlimit->GetNumber() );
+}
+
+// Apply the upper channel limit from settings pane to histogram settings
+void TGAppMainFrame::ChannelLimit()
+{
+ selectCh->SetLimitValues(0, (NCH->GetNumber()-1) );
+}
+
+// Enable or disable voltage scan controls
+void TGAppMainFrame::EnableVoltScan()
+{
+ if(voltscanOn->IsOn())
+ {
+ vOutStart->SetState(kTRUE);
+ vOutStop->SetState(kTRUE);
+ vOutStep->SetState(kTRUE);
+ }
+ else
+ {
+ vOutStart->SetState(kFALSE);
+ vOutStop->SetState(kFALSE);
+ vOutStep->SetState(kFALSE);
+ }
+}
+
+// Enable or disable surface scan controls
+void TGAppMainFrame::EnableSurfScan()
+{
+ if(surfscanOn->IsOn())
+ {
+ xPosMin->SetState(kTRUE);
+ xPosMax->SetState(kTRUE);
+ xPosStep->SetState(kTRUE);
+ yPosMin->SetState(kTRUE);
+ yPosMax->SetState(kTRUE);
+ yPosStep->SetState(kTRUE);
+ }
+ else
+ {
+ xPosMin->SetState(kFALSE);
+ xPosMax->SetState(kFALSE);
+ xPosStep->SetState(kFALSE);
+ yPosMin->SetState(kFALSE);
+ yPosMax->SetState(kFALSE);
+ yPosStep->SetState(kFALSE);
+ }
+}
+
+// Enable or disable Z axis scan controls
+void TGAppMainFrame::EnableZaxisScan()
+{
+ if(zscanOn->IsOn())
+ {
+ zPosMin->SetState(kTRUE);
+ zPosMax->SetState(kTRUE);
+ zPosStep->SetState(kTRUE);
+ }
+ else
+ {
+ zPosMin->SetState(kFALSE);
+ zPosMax->SetState(kFALSE);
+ zPosStep->SetState(kFALSE);
+ }
+}
+
+// Toggle clean plots on/off
+void TGAppMainFrame::CleanPlotToggle()
+{
+ cleanPlots = cleanOn->IsDown();
+}
+
+// Connect to oscilloscope
+void TGAppMainFrame::ConnectToScope()
+{
+ int scopeState = -1;
+ char *IPaddr = (char*)oscIP->GetText();
+ int IPcorr = 0;
+
+ if(oscOn == 0)
+ {
+ // Check if the IP address has the required three .
+ for(int i = 0; i < (int)strlen(IPaddr); i++)
+ if(IPaddr[i] == '.')
+ IPcorr++;
+
+ if( (IPaddr != NULL) && (IPcorr == 3) )
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ printf("Connecting to oscilloscope.\n");
+ retTemp = gScopeDaq->connect(IPaddr);
+ scopeState = 1; // For testing instead of making a real connection
+#else
+ scopeState = 1;
+ retTemp = 0;
+#endif
+ }
+ else
+ {
+ scopeState = -1;
+ printf("Please enter a valid scope IP address.\n");
+ }
+ }
+ else if(oscOn > 0)
+ {
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ printf("Disconnecting from oscilloscope.\n");
+ retTemp = gScopeDaq->disconnect(IPaddr);
+ scopeState = -1; // For testing instead of making a real disconnection
+#else
+ scopeState = -1;
+ retTemp = 0;
+#endif
+ }
+
+ if(retTemp == 0)
+ {
+ if(scopeState >= 0)
+ {
+ oscIP->SetEnabled(kFALSE);
+ oscConnect->SetText("Disconnect");
+ oscConnect->SetTextJustify(36);
+ oscConnect->SetWrapLength(-1);
+ oscConnect->Resize(60,22);
+
+ for(int i = 0; i < 8; i++)
+ {
+ sCH[i]->SetState(kButtonUp);
+ sCH[i]->SetEnabled(kFALSE);
+ }
+ sMeasType->SetEnabled(kTRUE);
+ sCamaclink->SetState(kButtonUp);
+ sCamaclink->SetEnabled(kFALSE);
+ scopeCommand->SetEnabled(kTRUE);
+ sendScopeCustom->SetEnabled(kTRUE);
+ sMeasgroup->SetEnabled(kFALSE);
+ scopeInit->SetEnabled(kFALSE);
+
+ oscOn = 1;
+ }
+ else
+ {
+ oscIP->SetEnabled(kTRUE);
+ oscConnect->SetText("Connect");
+ oscConnect->SetTextJustify(36);
+ oscConnect->SetWrapLength(-1);
+ oscConnect->Resize(60,22);
+
+ for(int i = 0; i < 8; i++)
+ {
+ sCH[i]->SetState(kButtonUp);
+ sCH[i]->SetEnabled(kFALSE);
+ }
+ sMeasType->Select(0);
+ sMeasType->SetEnabled(kFALSE);
+ sCamaclink->SetState(kButtonUp);
+ sCamaclink->SetEnabled(kFALSE);
+ scopeCommand->SetEnabled(kFALSE);
+ sendScopeCustom->SetEnabled(kFALSE);
+ sMeasgroup->SetEnabled(kFALSE);
+ scopeInit->SetEnabled(kFALSE);
+
+ oscOn = 0;
+ }
+ }
+ else
+ printf("Error! Connecting/disconnecting failed.\n");
+}
+
+// Set the output voltage
+void TGAppMainFrame::SetVoltOut()
+{
+ char cmd[256];
+ int outOn;
+ float outputVoltage;
+
+ outputVoltage = vOut->GetNumber();
+
+ if(vOutOnOff->IsOn()) outOn = 1;
+ else outOn = 0;
+
+ fflush(stdout);
+ sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s %d", rootdir, GetChannel(), outputVoltage, outOn);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+}
+
+// Get the output voltage
+void TGAppMainFrame::GetVoltOut()
+{
+ char cmd[256];
+
+ fflush(stdout);
+ sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -g > %s/curvolt.txt", rootdir, GetChannel(), rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+#if WORKSTAT == 'I'
+ FILE* fvolt;
+ double dtemp;
+ char ctemp[24];
+ sprintf(cmd, "%s/curvolt.txt", rootdir);
+ fvolt = fopen(cmd, "r");
+
+ if(fvolt != NULL)
+ {
+ sprintf(cmd, "WIENER-CRATE-MIB::outputVoltage.u%d = Opaque: Float: %s V\n", GetChannel()-1, "%lf" );
+ retTemp = fscanf(fvolt, cmd, &dtemp);
+ vOut->SetNumber(dtemp);
+ sprintf(cmd, "WIENER-CRATE-MIB::outputSwitch.u%d = INTEGER: %s\n", GetChannel()-1, "%s" );
+ retTemp = fscanf(fvolt, cmd, ctemp);
+ if( strcmp(ctemp, "On(1)") == 0 )
+ vOutOnOff->SetState(kButtonDown);
+ else if( strcmp(ctemp, "Off(0)") == 0 )
+ vOutOnOff->SetState(kButtonUp);
+ }
+
+ fclose(fvolt);
+#endif
+}
+
+// Reset the output voltage
+void TGAppMainFrame::ResetVoltOut()
+{
+ char cmd[256];
+
+ vOut->SetNumber(0.000);
+ vOutOnOff->SetState(kButtonUp);
+
+ fflush(stdout);
+ sprintf(cmd, "%s/mpod/mpod_voltage.sh -r %d", rootdir, GetChannel());
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+}
+
+// Get the current table position
+void TGAppMainFrame::GetPosition()
+{
+ char cmd[256];
+
+ fflush(stdout);
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -p > %s/curpos.txt", rootdir, rootdir); // X-axis
+ fflush(stdout);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -p >> %s/curpos.txt", rootdir, rootdir); // Y-axis
+ fflush(stdout);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -p >> %s/curpos.txt", rootdir, rootdir); // Z-axis
+ fflush(stdout);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+#if WORKSTAT == 'I'
+ FILE* fpos;
+ int itemp;
+ sprintf(cmd, "%s/curpos.txt", rootdir);
+ fpos = fopen(cmd, "r");
+
+ if(fpos != NULL)
+ {
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ xPos->SetNumber(itemp);
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ yPos->SetNumber(itemp);
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ zPos->SetNumber(itemp);
+ }
+
+ fclose(fpos);
+#endif
+}
+
+// Set the current table position
+void TGAppMainFrame::SetPosition()
+{
+ char cmd[256];
+ int positX, positY, positZ;
+
+ positX = xPos->GetNumber();
+ positY = yPos->GetNumber();
+ positZ = zPos->GetNumber();
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, positX, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, positY, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, positZ, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+}
+
+// Set the current table position to a predetermined HOME position
+void TGAppMainFrame::HomePosition()
+{
+ char cmd[256];
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -h", rootdir); // X-axis
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -h", rootdir); // Y-axis
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -h", rootdir); // Z-axis
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+}
+
+// Initialize the currently connected scope for measurements
+void TGAppMainFrame::InitializeScope()
+{
+ int iTemp;
+ int chTemp[8];
+ for(int i = 0; i < 8; i++) chTemp[i] = -1;
+ gScopeDaq->scopeUseType = sMeasType->GetSelected();
+
+ // Check what channels are selected
+ iTemp = 0;
+ for(int i = 0; i < 8; i++)
+ {
+ if(sCH[i]->IsDown())
+ {
+ chTemp[iTemp] = i;
+ iTemp++;
+ }
+ }
+ if(iTemp == 0)
+ {
+ // If no channel is selected, we select the first one
+ chTemp[0] = 0;
+ iTemp++;
+ sCH[0]->SetState(kButtonDown);
+ }
+ // If measurement is used, only use the first selected channel
+ if(gScopeDaq->scopeUseType == 2)
+ {
+ for(int i = 1; i < iTemp; i++)
+ sCH[chTemp[i]]->SetState(kButtonUp);
+ iTemp = 1;
+ }
+
+ gScopeDaq->scopeChanNr = iTemp;
+ for(int i = 0; i < 8; i++) gScopeDaq->scopeChans[i] = chTemp[i];
+
+ // Check which measurement is selected
+ gScopeDaq->scopeMeasSel = sMeasgroup->GetSelected();
+
+ gScopeDaq->init();
+}
+
+// Run a scope measurement
+void TGAppMainFrame::StartScopeAcq()
+{
+ // Lock the scope front panel
+ gScopeDaq->lockunlock(true);
+
+ retTemp = gScopeDaq->event();
+
+ if(gScopeDaq->scopeUseType == 1)
+ {
+ char len[16];
+ int sval;
+ short *spoints;
+
+ if(retTemp == 0)
+ {
+ // Read the number of y bytes at beginning of CURVE binary data
+ memcpy(len, &gScopeDaq->eventbuf[1],1);
+ len[1] = 0;
+ sval = atoi(len);
+// printf("Number of y bytes = %d\n", sval);
+
+ // Read the data
+ spoints = (short *)(&gScopeDaq->eventbuf[2+sval]);
+
+ // Read the number of data points
+ memcpy(len, &gScopeDaq->eventbuf[2],sval);
+ len[sval] = 0;
+ sval = atoi(len);
+// printf("Number of data points = %d\n", sval/2);
+
+ double *grafx, *grafy;
+ grafx = new double[sval/2];
+ grafy = new double[sval/2];
+ // Parse data and graph it
+ for(int i = 0; i < sval/2; i++)
+ {
+ grafx[i] = i*gScopeDaq->tektime*10./(sval/2.);
+ grafy[i] = ((double)spoints[i]*5.*gScopeDaq->tekvolt/32767.) - (gScopeDaq->choffset*gScopeDaq->tekvolt);
+ }
+
+ wCanvas->cd();
+ testgraph = new TGraph(sval/2, grafx, grafy);
+ testgraph->GetXaxis()->SetTitle("Time [s]");
+ testgraph->GetXaxis()->SetRangeUser(grafx[0], grafx[(sval/2)-1]);
+ testgraph->GetYaxis()->SetTitle("Voltage [V]");
+ testgraph->Draw("AL");
+ wCanvas->Modified();
+ wCanvas->Update();
+
+ delete[] grafx;
+ delete[] grafy;
+ }
+ }
+ else if(gScopeDaq->scopeUseType == 2)
+ {
+ if(retTemp == 0)
+ {
+ if(gScopeDaq->measubuf < 1.e-4)
+ printf("Measurement: %le\n", gScopeDaq->measubuf);
+ else
+ printf("Measurement: %lf\n", gScopeDaq->measubuf);
+ }
+ }
+
+ // Unlock the scope front panel
+ gScopeDaq->lockunlock(false);
+}
+
+// Send a custom command to the scope
+void TGAppMainFrame::CustomScopeCommand()
+{
+ char *cmd = (char*)scopeCommand->GetText();
+ char ret[100000];
+ if( strchr(cmd, '?') == NULL)
+ {
+ printf("Sending command: %s\n", cmd);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ gScopeDaq->customCommand(cmd, false, ret);
+#endif
+ }
+ else
+ {
+ printf("Sending query: %s\n", cmd);
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ gScopeDaq->customCommand(cmd, true, ret);
+#endif
+ }
+
+#if WORKSTAT == 'I' || WORKSTAT == 'S'
+ scopeReturn->SetText(ret);
+#endif
+
+#if WORKSTAT == 'O'
+ sprintf(ret, "Program running in offline mode. Use I or S when configuring...");
+ scopeReturn->SetText(ret);
+#endif
+}
+
+// When we select the measurement type, change other scope settings accordingly
+void TGAppMainFrame::SelectedMeasType(int mtype)
+{
+ // No waveform analysis
+ if(mtype == 0)
+ {
+ for(int i = 0; i < 8; i++)
+ {
+ sCH[i]->SetState(kButtonUp);
+ sCH[i]->SetEnabled(kFALSE);
+ }
+ sMeasType->SetEnabled(kTRUE);
+ sCamaclink->SetState(kButtonUp);
+ sCamaclink->SetEnabled(kFALSE);
+ scopeCommand->SetEnabled(kTRUE);
+ sendScopeCustom->SetEnabled(kTRUE);
+ sMeasgroup->SetEnabled(kFALSE);
+ scopeInit->SetEnabled(kFALSE);
+
+ oscOn = 1;
+ }
+ // Complete waveform acquisition
+ else if(mtype == 1)
+ {
+ for(int i = 0; i < 8; i++)
+ sCH[i]->SetEnabled(kTRUE);
+ sMeasType->SetEnabled(kTRUE);
+ sCamaclink->SetState(kButtonDown);
+ sCamaclink->SetEnabled(kTRUE);
+ scopeCommand->SetEnabled(kTRUE);
+ sendScopeCustom->SetEnabled(kTRUE);
+ sMeasgroup->SetEnabled(kFALSE);
+ scopeInit->SetEnabled(kTRUE);
+
+ oscOn = 2;
+ }
+ // Waveform measurements
+ else if(mtype == 2)
+ {
+ for(int i = 0; i < 8; i++)
+ sCH[i]->SetEnabled(kTRUE);
+ sMeasType->SetEnabled(kTRUE);
+ sCamaclink->SetState(kButtonUp);
+ sCamaclink->SetEnabled(kTRUE);
+ scopeCommand->SetEnabled(kTRUE);
+ sendScopeCustom->SetEnabled(kTRUE);
+ sMeasgroup->SetEnabled(kTRUE);
+ scopeInit->SetEnabled(kTRUE);
+
+ oscOn = 3;
+ }
+}
+
+// Make breakdown voltage plot
+void TGAppMainFrame::MakeBreakdownPlot(int nrp, double *volt, double *volterr, double *psep1, double *pseperr1, double *psep2, double *pseperr2, double *psep3, double *pseperr3, char *plotfile, int separations)
+{
+ double fparam[2], fparamerr[2], meanval;
+ TLatex *latex;
+ char ctemp[256];
+ int sortindex[nrp];
+
+ TCanvas *canvas;
+
+ if(separations == 1)
+ {
+ canvas = new TCanvas("canv","canv",900,400);
+ }
+ else if(separations == 2)
+ {
+ canvas = new TCanvas("canv","canv",900,800);
+ canvas->Divide(1,2);
+ }
+ else
+ {
+ canvas = new TCanvas("canv","canv",900,1200);
+ canvas->Divide(1,3);
+ }
+
+ // First graph is plotted always
+ TGraphErrors *gr1 = new TGraphErrors(nrp, volt, psep1, volterr, pseperr1);
+
+ if(!cleanPlots)
+ gr1->SetTitle("1st - 2nd peak separation");
+ else
+ gr1->SetTitle();
+ gr1->SetLineColor(kBlue);
+ gr1->SetMarkerColor(kBlue);
+ gr1->SetMarkerStyle(20);
+ gr1->SetMarkerSize(0.4);
+
+ // Plotting the first breakdown voltage plot
+ canvas->cd(1);
+ gPad->SetGridx(1);
+ gPad->SetGridy(1);
+
+ gr1->Draw("AP");
+ gr1->GetXaxis()->SetTitle("Bias voltage (V)");
+ gr1->GetYaxis()->SetTitle("Peak separation");
+ gr1->GetYaxis()->CenterTitle();
+ gr1->Fit("pol1","Q");
+
+ TF1 *fit1 = gr1->GetFunction("pol1");
+ fparam[0] = fit1->GetParameter(0);
+ fparamerr[0] = fit1->GetParError(0);
+ fparam[1] = fit1->GetParameter(1);
+ fparamerr[1] = fit1->GetParError(1);
+
+ TMath::Sort(nrp, psep1, sortindex, kFALSE);
+
+ meanval = -fparam[0]/fparam[1];
+ if(!cleanPlots)
+ {
+ sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+ latex = new TLatex();
+ latex->SetTextSize(0.039);
+ latex->DrawLatex(volt[0], 0.97*psep1[sortindex[nrp-1]], ctemp);
+ }
+ else
+ printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+
+ // Second graph
+ if(separations > 1)
+ {
+ TGraphErrors *gr2 = new TGraphErrors(nrp, volt, psep2, volterr, pseperr2);
+
+ if(!cleanPlots)
+ gr2->SetTitle("2nd - 3rd peak separation");
+ else
+ gr2->SetTitle();
+ gr2->SetLineColor(kMagenta);
+ gr2->SetMarkerColor(kMagenta);
+ gr2->SetMarkerStyle(21);
+ gr2->SetMarkerSize(0.4);
+
+ // Plotting the second breakdown voltage plot
+ canvas->cd(2);
+ gPad->SetGridx(1);
+ gPad->SetGridy(1);
+
+ gr2->Draw("AP");
+ gr2->GetXaxis()->SetTitle("Bias voltage (V)");
+ gr2->GetYaxis()->SetTitle("Peak separation");
+ gr2->GetYaxis()->CenterTitle();
+ gr2->Fit("pol1","Q");
+
+ TF1 *fit2 = gr2->GetFunction("pol1");
+ fparam[0] = fit2->GetParameter(0);
+ fparamerr[0] = fit2->GetParError(0);
+ fparam[1] = fit2->GetParameter(1);
+ fparamerr[1] = fit2->GetParError(1);
+
+ meanval = -fparam[0]/fparam[1];
+ if(!cleanPlots)
+ {
+ sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+ latex = new TLatex();
+ latex->SetTextSize(0.039);
+ latex->DrawLatex(volt[0], 0.97*psep2[sortindex[nrp-1]], ctemp);
+ }
+ else
+ printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+ }
+
+ // Third graph
+ if(separations > 2)
+ {
+ TGraphErrors *gr3 = new TGraphErrors(nrp, volt, psep3, volterr, pseperr3);
+
+ if(!cleanPlots)
+ gr3->SetTitle("3rd - 4th peak separation");
+ else
+ gr3->SetTitle();
+ gr3->SetLineColor(kGreen);
+ gr3->SetMarkerColor(kGreen);
+ gr3->SetMarkerStyle(22);
+ gr3->SetMarkerSize(0.4);
+
+ // Plotting the third breakdown voltage plot
+ canvas->cd(3);
+ gPad->SetGridx(1);
+ gPad->SetGridy(1);
+
+ gr3->Draw("AP");
+ gr3->GetXaxis()->SetTitle("Bias voltage (V)");
+ gr3->GetYaxis()->SetTitle("Peak separation");
+ gr3->GetYaxis()->CenterTitle();
+ gr3->Fit("pol1","Q");
+
+ TF1 *fit3 = gr3->GetFunction("pol1");
+ fparam[0] = fit3->GetParameter(0);
+ fparamerr[0] = fit3->GetParError(0);
+ fparam[1] = fit3->GetParameter(1);
+ fparamerr[1] = fit3->GetParError(1);
+
+ meanval = -fparam[0]/fparam[1];
+ if(!cleanPlots)
+ {
+ sprintf(ctemp, "#splitline{#Delta_{p}(U) = (%.2lf #pm %.2lf)#timesU + (%.2lf #pm %.3lf)}{U_{0} = %.2lf #pm %.3lf}", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+ latex = new TLatex();
+ latex->SetTextSize(0.039);
+ latex->DrawLatex(volt[0], 0.97*psep3[sortindex[nrp-1]], ctemp);
+ }
+ else
+ printf("#Delta_p(U) = (%.2lf #pm %.2lf)*U + (%.2lf #pm %.3lf)\nU_0 = %.2lf #pm %.3lf", fparam[0], fparamerr[0], fparam[1], fparamerr[1], meanval, meanval*(TMath::Abs(fparamerr[0]/fparam[0]) + TMath::Abs(fparamerr[1]/fparam[1])) );
+ }
+
+ // Saving the produced plot
+ canvas->SaveAs(plotfile);
+}
+
+// Fit the ADC spectrum peaks and make a breakdown voltage plot
+void TGAppMainFrame::FitSpectrum(TList *files, int q)
+{
+ TCanvas *gCanvas = histCanvas->GetCanvas();
+ gCanvas->cd();
+ TH1F *histtemp;
+ TSpectrum *spec;
+ TH1 *histback;
+ TH1F *h2;
+ float *xpeaks;
+ TF1 *fit;
+ TF1 *fittingfunc;
+ double *fparam;
+ double *fparamerr;
+ double meanparam[20], meanparamerr[20];
+ int sortindex[20];
+ char exportname[256];
+ char paramname[256];
+ char ctemp[256];
+
+ FILE *fp;
+ remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
+ sprintf(paramname, "%s_fitresult.txt", ctemp);
+ fp = fopen(paramname, "w");
+ fclose(fp);
+
+ int peaklimit = minPeak->GetNumber()+1; // +1 to account for the pedestal peak
+ printf("The minimum peak limit is set to: %d\n", peaklimit);
+ int p = 0;
+ double dtemp;
+ double volt[files->GetSize()], volterr[files->GetSize()], sep[3][files->GetSize()], seperr[3][files->GetSize()];
+ int first = 1;
+
+ // Initialize all values
+ for(int m = 0; m < files->GetSize(); m++)
+ {
+ volt[m] = 0; volterr[m] = 0;
+ for(int i = 0; i < 3; i++)
+ { sep[i][m] = 0; seperr[i][m] = 0; }
+ if(m < 20) { meanparam[m] = 0; meanparamerr[m] = 0; }
+ }
+
+ for(int m = 0; m < files->GetSize(); m++)
+ {
+ DisplayHistogram( (char*)(files->At(m)->GetTitle()), 0);
+ dtemp = evtheader.biasvolt;
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
+ npeaks = 20;
+ double par[3000];
+ spec = new TSpectrum(npeaks);
+ // Find spectrum background
+ histback = spec->Background(histtemp, (int)fitInter->GetNumber(), "same");
+ // Clone histogram and subtract background from it
+ h2 = (TH1F*)histtemp->Clone("h2");
+ h2->Add(histback, -1);
+ // Search for the peaks
+ int found = spec->Search(h2, fitSigma->GetNumber(), "goff", fitTresh->GetNumber() );
+ printf("Found %d candidates to fit.\n",found);
+ npeaks = found;
+
+ xpeaks = spec->GetPositionX();
+ for(int i = 0; i < found; i++)
+ {
+ float xp = xpeaks[i];
+ int bin = h2->GetXaxis()->FindBin(xp);
+ float yp = h2->GetBinContent(bin);
+ par[3*i] = yp;
+ par[3*i+1] = xp;
+ par[3*i+2] = (double)fitSigma->GetNumber();
+ }
+
+ // Fit the histogram
+ fit = new TF1("fit", FindPeaks, 0, 400, 3*npeaks);
+ TVirtualFitter::Fitter(histtemp, 3*npeaks);
+ fit->SetParameters(par);
+ fit->SetNpx(300);
+ h2->Fit("fit","Q"); // for quiet mode, add Q
+ fittingfunc = h2->GetFunction("fit");
+ fparam = fittingfunc->GetParameters();
+ fparamerr = fittingfunc->GetParErrors();
+
+ // Gather the parameters (mean peak value for now)
+ int j = 1;
+ int nrfit = 0;
+ bool errors = false;
+ while(1)
+ {
+ if( (fparam[j] < 1.E-30) || (fparamerr[j] < 1.E-10) )
+ break;
+ else
+ {
+ if(fparam[j] > pedesLow->GetNumber())
+ {
+ meanparam[nrfit] = fparam[j];
+ meanparamerr[nrfit] = fparamerr[j];
+ nrfit++;
+ }
+ }
+
+ j+=3;
+ }
+ printf("%d peaks fitted.\n",nrfit);
+
+ if(nrfit >= peaklimit)
+ {
+ TMath::Sort(nrfit, meanparam, sortindex, kFALSE);
+
+ // Write out parameters to a file
+// fp = fopen(paramname, "a");
+
+ // Only save the ones that do not have a too large error on peak separation for the first three peaks
+// if( ((TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]))/(meanparam[sortindex[2]] - meanparam[sortindex[1]]) < accError->GetNumber()) && ((TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]))/(meanparam[sortindex[3]] - meanparam[sortindex[2]]) < accError->GetNumber()) && ((TMath::Abs(meanparamerr[sortindex[4]]) + TMath::Abs(meanparamerr[sortindex[3]]))/(meanparam[sortindex[4]] - meanparam[sortindex[3]]) < accError->GetNumber()) )
+// if( (seperr[0][0]/sep[0][0] < accError->GetNumber()) && (seperr[1][0]/sep[1][0] < accError->GetNumber()) && (seperr[2][0]/sep[2][0] < accError->GetNumber()) )
+// {
+// fprintf(fp, "%le\t%d\t", dtemp, nrfit);
+
+// for(int i = 0; i < nrfit; i++)
+// {
+// if(debug)
+// printf("Peak %d (%lfV): %lf\t%lf\n", i+1, dtemp, meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
+// fprintf(fp, "%le\t%le\t", meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
+// }
+// printf("\n");
+// fprintf(fp, "\n");
+// }
+
+// fclose(fp);
+
+ h2->SetStats(0);
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ // Save each fitting plot
+ if(exfitplots->IsDown())
+ {
+ remove_ext((char*)files->At(m)->GetTitle(), ctemp);
+ sprintf(exportname, "%s_fit.pdf", ctemp);
+ gCanvas->SaveAs(exportname);
+ }
+
+ volt[p] = dtemp;
+ volterr[p] = 1.e-4;
+
+ if(nrfit == 3)
+ {
+ sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
+ seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
+
+ errors = (seperr[0][p]/sep[0][p] < accError->GetNumber());
+
+ if(debug)
+ printf("p=%d:\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p]);
+ }
+ else if(nrfit == 4)
+ {
+ sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
+ sep[1][p] = meanparam[sortindex[3]] - meanparam[sortindex[2]];
+ seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
+ seperr[1][p] = TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]);
+
+ errors = ((seperr[0][p]/sep[0][p] < accError->GetNumber()) && (seperr[1][p]/sep[1][p] < accError->GetNumber()));
+
+ if(debug)
+ printf("p=%d:\t%lf\t%lf\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p], sep[1][p], seperr[1][p]);
+ }
+ else if(nrfit > 4)
+ {
+ sep[0][p] = meanparam[sortindex[2]] - meanparam[sortindex[1]];
+ sep[1][p] = meanparam[sortindex[3]] - meanparam[sortindex[2]];
+ sep[2][p] = meanparam[sortindex[4]] - meanparam[sortindex[3]];
+ seperr[0][p] = TMath::Abs(meanparamerr[sortindex[2]]) + TMath::Abs(meanparamerr[sortindex[1]]);
+ seperr[1][p] = TMath::Abs(meanparamerr[sortindex[3]]) + TMath::Abs(meanparamerr[sortindex[2]]);
+ seperr[2][p] = TMath::Abs(meanparamerr[sortindex[4]]) + TMath::Abs(meanparamerr[sortindex[3]]);
+
+ errors = ((seperr[0][p]/sep[0][p] < accError->GetNumber()) && (seperr[1][p]/sep[1][p] < accError->GetNumber()) && (seperr[2][p]/sep[2][p] < accError->GetNumber()));
+
+ if(debug)
+ printf("p=%d:\t%lf\t%lf\t%lf\t%lf\t%lf\t%lf\t%lf\n", p, volt[p], sep[0][p], seperr[0][p], sep[1][p], seperr[1][p], sep[2][p], seperr[2][p]);
+ }
+
+ // Write out parameters to a file
+ fp = fopen(paramname, "a");
+
+ // Accept only the points with a small enough error
+ if( errors )
+ {
+ if(first == 1)
+ {
+ fprintf(fp, "%le\t%d\t", dtemp, nrfit);
+
+ for(int i = 0; i < nrfit; i++)
+ {
+ if(debug)
+ printf("Peak %d (%lfV): %lf\t%lf\n", i+1, dtemp, meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
+ fprintf(fp, "%le\t%le\t", meanparam[sortindex[i]], meanparamerr[sortindex[i]]);
+ }
+ printf("\n");
+ fprintf(fp, "\n");
+ first = 0;
+ }
+
+ p++;
+ }
+ else
+ {
+ if(nrfit == 3)
+ printf("Point (at %.2lfV) rejected due to too large errors: %lf\n", volt[p], seperr[0][p]/sep[0][p]);
+ else if(nrfit == 4)
+ printf("Point (at %.2lfV) rejected due to too large errors: %lf, %lf\n", volt[p], seperr[0][p]/sep[0][p], seperr[1][p]/sep[1][p]);
+ else if(nrfit > 4)
+ printf("Point (at %.2lfV) rejected due to too large errors: %lf, %lf, %lf\n", volt[p], seperr[0][p]/sep[0][p], seperr[1][p]/sep[1][p], seperr[2][p]/sep[2][p]);
+ }
+
+ fclose(fp);
+ }
+
+ if(q == 1) break;
+
+ first = 1;
+ }
+
+ // Plot & fit breakdown voltage plots
+ if(q > 1)
+ {
+ remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
+ sprintf(paramname, "%s_breakdown.pdf", ctemp);
+ MakeBreakdownPlot(p, volt, volterr, sep[0], seperr[0], sep[1], seperr[1], sep[2], seperr[2], paramname, peaklimit-2);
+ }
+}
+
+// Plotting of PDF and CDF functions for the edge (with the added fit)
+void TGAppMainFrame::EdgeDetection(TGraph *pdf, TGraph *cdf, char *outname, TCanvas *g1dCanvas, double pdfmax, int direction)
+{
+// double x, y;
+
+ pdf->Fit("gaus","Q");
+ pdf->GetFunction("gaus")->SetNpx(400);
+/*
+ for(int i = 0; i < nrpoints; i++)
+ {
+ pdf->GetPoint(i, x, y);
+ pdf->SetPoint(i, x, (y/pdfmax) );
+ }
+*/
+ gStyle->SetOptFit(1);
+
+ cdf->Draw("AL");
+ gPad->Update();
+ pdf->Draw("LP");
+
+ g1dCanvas->Modified();
+ g1dCanvas->Update();
+
+ TPaveStats *stats = (TPaveStats*)pdf->FindObject("stats");
+ if(!cleanPlots)
+ {
+// stats->SetX1NDC(0.14); stats->SetX2NDC(0.28);
+// stats->SetY1NDC(0.83); stats->SetY2NDC(0.96);
+ stats->SetX1NDC(0.86); stats->SetX2NDC(1.0);
+ stats->SetY1NDC(0.87); stats->SetY2NDC(1.0);
+ }
+ else
+ {
+ stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
+ stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
+ }
+
+ g1dCanvas->SetGridx(1);
+ g1dCanvas->SetGridy(1);
+ if(direction == 1)
+ cdf->GetXaxis()->SetTitle("X [#mum]");
+ else if(direction == 2)
+ cdf->GetXaxis()->SetTitle("Y [#mum]");
+ cdf->GetXaxis()->CenterTitle(kTRUE);
+ cdf->GetXaxis()->SetLabelSize(0.022);
+ cdf->GetYaxis()->SetTitle("Normalized ADC integral");
+// cdf->GetYaxis()->SetTitle("Normalized ADC integral (CDF)");
+// cdf->GetYaxis()->SetTitleColor(kBlue);
+ cdf->GetYaxis()->CenterTitle(kTRUE);
+ cdf->GetYaxis()->SetLabelSize(0.022);
+ cdf->GetYaxis()->SetRangeUser(0,1);
+ cdf->GetYaxis()->SetTitleSize(0.030);
+// cdf->GetYaxis()->SetLabelColor(kBlue);
+ if(!cleanPlots)
+ cdf->SetTitle("SiPM edge detection");
+ else
+ cdf->SetTitle();
+ cdf->SetLineColor(kBlue);
+ pdf->SetLineWidth(2);
+ cdf->SetLineWidth(2);
+
+/* TGaxis *axis = new TGaxis(gPad->GetUxmax(), 0, gPad->GetUxmax(), 1, 0, pdfmax, 510, "+L");
+ axis->Draw();
+ axis->SetTitle("Normalized ADC integral (PDF)");
+ axis->SetTitleSize(0.035);
+ axis->CenterTitle();
+ axis->SetTitleColor(kBlack);
+ axis->SetTitleFont(42);
+ axis->SetLabelSize(0.022);
+ axis->SetLabelColor(kBlack);*/
+
+ g1dCanvas->Modified();
+ g1dCanvas->Update();
+
+ g1dCanvas->SaveAs(outname);
+}
+
+// Integrate the spectrum
+void TGAppMainFrame::IntegSpectrum(TList *files, int direction)
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ char ctemp[256];
+ int j, k = 0, m = 0, n = 0;
+
+ TCanvas *gCanvas = new TCanvas("canv","canv",900,900);
+ TCanvas *g1dCanvas = new TCanvas("canv1d","canv1d",1200,900);
+ TTree *header_data, *meas_data;
+ double *integralCount, *integralAcc;
+ integralCount = new double[nrfiles];
+ integralAcc = new double[nrfiles];
+// double xsurfmin, ysurfmin, zsurfmin;
+ double *surfx, *surfy, *surfz;
+ surfx = new double[nrfiles];
+ surfy = new double[nrfiles];
+ surfz = new double[nrfiles];
+ for(int i = 0; i < (int)nrfiles; i++) {integralCount[i] = 0; integralAcc[i] = 0; }
+
+ TGraph *gScan[2]; // graphs for PDF and CDF functions
+ double pdfmax = -1;
+ TGraph2D *gScan2D;
+ gScan2D = new TGraph2D();
+ int nrentries;
+ double minInteg, maxInteg;
+
+ char exportname[256];
+
+ if(files->GetSize() > 0)
+ {
+ for(int i = 0; i < (int)files->GetSize(); i++)
+ {
+ n++;
+ if(files->At(i))
+ {
+ sprintf(ctemp, "%s", files->At(i)->GetTitle());
+ inroot = new TFile(ctemp, "READ");
+
+ inroot->GetObject("header_data", header_data);
+ inroot->GetObject("meas_data", meas_data);
+
+ // Reading the header
+ header_data->SetBranchAddress("xpos", &evtheader.xpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("ypos", &evtheader.ypos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("zpos", &evtheader.zpos);
+ header_data->GetEntry(0);
+
+ char rdc[256];
+ j = selectCh->GetNumber();
+ double rangetdc[2];
+ rangetdc[0] = tdcMinwindow->GetNumber();
+ rangetdc[1] = tdcMaxwindow->GetNumber();
+
+ k = 0;
+ m = 0;
+
+ // Reading the data
+ for(int e = 0; e < meas_data->GetEntries(); e++)
+ {
+ sprintf(rdc, "ADC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
+ meas_data->GetEntry(e);
+
+ sprintf(rdc, "TDC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
+ meas_data->GetEntry(e);
+
+ // If our data point is inside the TDC window
+ if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
+ {
+ k++;
+ m += evtdata.adcdata[j];
+ }
+ }
+
+/* if(n == 1) // these values can be used to set 0 value at first X, Y and Z positions
+ {
+ xsurfmin = evtheader.xpos;
+ ysurfmin = evtheader.ypos;
+ zsurfmin = evtheader.zpos;
+ }
+ surfx[i] = (double)(evtheader.xpos-xsurfmin)*lenconversion;
+ surfy[i] = (double)(evtheader.ypos-ysurfmin)*lenconversion;
+ surfz[i] = (double)(evtheader.zpos-zsurfmin)*lenconversion;*/
+ surfx[i] = (double)(evtheader.xpos*lenconversion);
+ surfy[i] = (double)(evtheader.ypos*lenconversion);
+ surfz[i] = (double)(evtheader.zpos*lenconversion);
+
+/* surfx[i] = evtheader.xpos;
+ surfy[i] = evtheader.ypos;
+ surfz[i] = evtheader.zpos;
+*/
+ integralCount[i] += ((double)m)/((double)k);
+
+ inroot->Close();
+ delete inroot;
+ }
+ }
+
+ nrentries = n;
+ printf("%d files were selected.\n", nrentries);
+
+ double curzval = surfz[0];
+ j = 0;
+ int acc = 0;
+ int zb;
+ for(int i = 0; i <= nrentries; i++)
+ {
+ if(acc == nrentries)
+ {
+ minInteg = TMath::MinElement(j, integralAcc);
+
+ for(int za = 0; za < j; za++)
+ integralAcc[za] = integralAcc[za] - minInteg;
+
+ maxInteg = TMath::MaxElement(j, integralAcc);
+
+ for(int za = 0; za < j; za++)
+ {
+ zb = i-j+za;
+ integralCount[zb] = integralAcc[za]/maxInteg;
+ if(debug)
+ printf("Integral check 2 (i=%d,j=%d,za=%d,z=%.2lf,zb=%d): %lf\t%lf\n", i, j, za, surfz[i-j], zb, integralCount[zb], integralAcc[za]/maxInteg);
+ }
+
+ // Plotting of PDF and CDF functions for the edge (with the added fit)
+ gScan[1] = new TGraph();
+ for(int za = 0; za < j; za++)
+ {
+ zb = i-j+za;
+ if(direction == 1)
+ gScan[1]->SetPoint(za, (double)surfx[zb], (double)integralAcc[za]/maxInteg);
+ else if(direction == 2)
+ gScan[1]->SetPoint(za, (double)surfy[zb], (double)integralAcc[za]/maxInteg);
+
+ if( ((integralAcc[za+1]-integralAcc[za])/maxInteg > pdfmax) && (za < j-1) )
+ pdfmax = (integralAcc[za+1]-integralAcc[za])/maxInteg;
+ }
+
+ pdfmax = (TMath::Ceil(pdfmax*10))/10.;
+
+ gScan[0] = new TGraph();
+ for(int za = j-1; za >= 0; za--)
+ {
+ zb = (i-1)-(j-1)+za;
+ if((integralAcc[za]-integralAcc[za-1])/(maxInteg) < 0)
+ {
+ if(direction == 1)
+ gScan[0]->SetPoint(za, (double)surfx[zb], 0);
+ else if(direction == 2)
+ gScan[0]->SetPoint(za, (double)surfy[zb], 0);
+ }
+ else
+ {
+ if(direction == 1)
+ gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
+ else if(direction == 2)
+ gScan[0]->SetPoint(za, (double)surfy[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
+// gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(pdfmax*maxInteg));
+ }
+ }
+
+ remove_from_last((char*)files->At(i-1)->GetTitle(), '_', ctemp);
+ sprintf(exportname, "%s_edge.pdf", ctemp);
+ EdgeDetection(gScan[0], gScan[1], exportname, g1dCanvas, pdfmax, direction);
+
+// delete gScan[0];
+// delete gScan[1];
+
+ i--;
+ pdfmax = 0;
+ break;
+ }
+ else
+ {
+ if(surfz[i] == curzval)
+ {
+ integralAcc[j] = integralCount[i];
+ if(debug)
+ printf("Integral check 1 (i=%d,j=%d,z=%.2lf): %lf\t%lf\n", i, j, surfz[i], integralCount[i], integralAcc[j]);
+ j++;
+ acc++;
+ }
+ else
+ {
+ minInteg = TMath::MinElement(j, integralAcc);
+
+ for(int za = 0; za < j; za++)
+ integralAcc[za] = integralAcc[za] - minInteg;
+
+ maxInteg = TMath::MaxElement(j, integralAcc);
+
+ for(int za = 0; za < j; za++)
+ {
+ zb = i-j+za;
+ integralCount[zb] = integralAcc[za]/maxInteg;
+ if(debug)
+ printf("Integral check 2 (i=%d,j=%d,za=%d,z=%.2lf,zb=%d): %lf\t%lf\n", i, j, za, surfz[i-j], zb, integralCount[zb], integralAcc[za]/maxInteg);
+ }
+
+ curzval = surfz[i];
+ i--;
+
+ // Plotting of PDF and CDF functions for the edge (with the added fit)
+ gScan[1] = new TGraph();
+ for(int za = 0; za < j; za++)
+ {
+ zb = i-(j-1)+za;
+ if(direction == 1)
+ gScan[1]->SetPoint(za, (double)surfx[zb], (double)integralAcc[za]/maxInteg);
+ else if(direction == 2)
+ gScan[1]->SetPoint(za, (double)surfy[zb], (double)integralAcc[za]/maxInteg);
+
+ if( ((integralAcc[za+1]-integralAcc[za])/maxInteg > pdfmax) && (za < j-1) )
+ pdfmax = (integralAcc[za+1]-integralAcc[za])/maxInteg;
+ }
+
+ pdfmax = (TMath::Ceil(pdfmax*10))/10.;
+
+ gScan[0] = new TGraph();
+ for(int za = j-1; za >= 0; za--)
+ {
+ zb = i-(j-1)+za;
+ if((integralAcc[za]-integralAcc[za-1])/(maxInteg) < 0)
+ {
+ if(direction == 1)
+ gScan[0]->SetPoint(za, (double)surfx[zb], 0);
+ else if(direction == 2)
+ gScan[0]->SetPoint(za, (double)surfy[zb], 0);
+ }
+ else
+ {
+ if(direction == 1)
+ gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
+ else if(direction == 2)
+ gScan[0]->SetPoint(za, (double)surfy[zb], (integralAcc[za]-integralAcc[za-1])/(maxInteg));
+// gScan[0]->SetPoint(za, (double)surfx[zb], (integralAcc[za]-integralAcc[za-1])/(pdfmax*maxInteg));
+ }
+ }
+
+ remove_from_last((char*)files->At(i)->GetTitle(), '_', ctemp);
+ sprintf(exportname, "%s_edge.pdf", ctemp);
+ EdgeDetection(gScan[0], gScan[1], exportname, g1dCanvas, pdfmax, direction);
+
+ delete gScan[0];
+ delete gScan[1];
+
+ j = 0;
+ pdfmax = 0;
+ }
+ }
+ }
+
+// delete g1dCanvas;
+
+ double range[4];
+ if(direction == 1)
+ {
+ range[0] = TMath::MinElement(nrentries, surfx);
+ range[1] = TMath::MaxElement(nrentries, surfx);
+ }
+ else if(direction == 2)
+ {
+ range[0] = TMath::MinElement(nrentries, surfy);
+ range[1] = TMath::MaxElement(nrentries, surfy);
+ }
+ else
+ {
+ range[0] = TMath::MinElement(nrentries, surfx);
+ range[1] = TMath::MaxElement(nrentries, surfx);
+ }
+ range[2] = TMath::MinElement(nrentries, surfz);
+ range[3] = TMath::MaxElement(nrentries, surfz);
+
+ // Plotting of 2D edge plot
+ for(int i = 0; i < nrentries; i++)
+ {
+ if(direction == 1)
+ {
+ if(debug)
+ printf("%.2lf\t%.2lf\t%lf\n", surfx[i], surfz[i], integralCount[i]);
+ gScan2D->SetPoint(i, surfx[i], surfz[i], integralCount[i]);
+ }
+ else if(direction == 2)
+ {
+ if(debug)
+ printf("%.2lf\t%.2lf\t%lf\n", surfy[i], surfz[i], integralCount[i]);
+ gScan2D->SetPoint(i, surfy[i], surfz[i], integralCount[i]);
+ }
+ }
+
+ gCanvas->cd();
+ gStyle->SetPalette(1);
+ gScan2D->Draw("COLZ");
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ if(direction == 1)
+ gScan2D->GetXaxis()->SetTitle("X [#mum]");
+ else if(direction == 2)
+ gScan2D->GetXaxis()->SetTitle("Y [#mum]");
+ gScan2D->GetXaxis()->CenterTitle(kTRUE);
+ gScan2D->GetXaxis()->SetLabelSize(0.022);
+ gScan2D->GetXaxis()->SetRangeUser(range[0], range[1]);
+ gScan2D->GetXaxis()->SetNoExponent();
+ gScan2D->GetYaxis()->SetTitle("Z [#mum]");
+ gScan2D->GetYaxis()->SetTitleOffset(1.3);
+ gScan2D->GetYaxis()->CenterTitle(kTRUE);
+ gScan2D->GetYaxis()->SetLabelSize(0.022);
+ gScan2D->GetYaxis()->SetRangeUser(range[2], range[3]);
+ TGaxis *yax = (TGaxis*)gScan2D->GetYaxis();
+ yax->SetMaxDigits(4);
+ if(!cleanPlots)
+ gScan2D->SetTitle("Laser focal point");
+ else
+ gScan2D->SetTitle();
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
+ sprintf(exportname, "%s", ctemp);
+ remove_from_last(exportname, '_', ctemp);
+ if(direction == 1)
+ sprintf(exportname, "%s_xdir_focalpoint.pdf", ctemp);
+ else if(direction == 2)
+ sprintf(exportname, "%s_ydir_focalpoint.pdf", ctemp);
+ gCanvas->SaveAs(exportname);
+ }
+}
+
+// Integrate the spectrum
+void TGAppMainFrame::PhotonMu(TList *files)
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ char ctemp[256];
+ int j, k = 0, m = 0, n = 0, k2 = 0, m2 = 0;
+
+ TCanvas *gCanvas;
+ TTree *header_data, *meas_data;
+ double *integralCount, *integralPedestal;
+ integralCount = new double[nrfiles];
+ integralPedestal = new double[nrfiles];
+ double *angle;
+ double *pdeval;
+ double *muval;
+ angle = new double[nrfiles];
+ pdeval = new double[nrfiles];
+ muval = new double[nrfiles];
+ for(int i = 0; i < (int)nrfiles; i++) {integralCount[i] = 0; integralPedestal[i] = 0; }
+
+// TGraph *gScan[2]; // graph for angle dependence
+ int nrentries;
+
+ TSpectrum *spec;
+ TH1F *histtemp;
+ TH1 *histback;
+ TH1F *h2;
+ float *xpeaks;
+ TF1 *fit;
+ TF1 *fittingfunc;
+ double *fparam;
+ double meanparam;
+ int adcpedestal[2];
+ double paramsigma = 0;
+
+ if(files->GetSize() > 0)
+ {
+ for(int i = 0; i < (int)files->GetSize(); i++)
+ {
+ n++;
+ if(files->At(i))
+ {
+ // Find the pedestal peak and the first minimum after pedestal ----------------
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
+ histCanvas->GetCanvas()->Modified();
+ histCanvas->GetCanvas()->Update();
+
+ histtemp = (TH1F*)histCanvas->GetCanvas()->GetPrimitive(histname);
+ npeaks = 1;
+ double par[300];
+ spec = new TSpectrum(npeaks);
+ // Find spectrum background
+ histback = spec->Background(histtemp, (int)fitInter->GetNumber(), "same");
+ // Clone histogram and subtract background from it
+ h2 = (TH1F*)histtemp->Clone("h2");
+ h2->Add(histback, -1);
+ // Search for the peaks
+ int found = spec->Search(h2, fitSigma->GetNumber(), "goff", fitTresh->GetNumber() );
+ printf("Found %d candidates to fit.\n",found);
+ npeaks = found;
+
+ xpeaks = spec->GetPositionX();
+ for(j = 0; j < found; j++)
+ {
+ float xp = xpeaks[j];
+ int bin = h2->GetXaxis()->FindBin(xp);
+ float yp = h2->GetBinContent(bin);
+ par[3*j] = yp;
+ par[3*j+1] = xp;
+ par[3*j+2] = (double)fitSigma->GetNumber();
+ }
+
+ // Fit the histogram
+ fit = new TF1("fit", FindPeaks, 0, 400, 3*npeaks);
+ TVirtualFitter::Fitter(histtemp, 3*npeaks);
+ fit->SetParameters(par);
+ fit->SetNpx(300);
+ h2->Fit("fit","Q"); // for quiet mode, add Q
+ fittingfunc = h2->GetFunction("fit");
+ fparam = fittingfunc->GetParameters();
+
+ // Gather the parameters (mean peak value for now)
+ j = 1;
+
+ meanparam = fparam[j];
+ paramsigma = fparam[j+1];
+
+/* while(1)
+ {
+ if( (fparam[j] < 1.E-30) || (fparamerr[j] < 1.E-10) )
+ break;
+ else
+ {
+ if(fparam[j] > 0)
+ {
+ meanparam = fparam[j];
+ meanparamerr = fparamerr[j];
+ paramsigma = fparam[j+1];
+ nrfit++;
+ }
+ }
+
+ j+=3;
+ }
+*/
+ histCanvas->GetCanvas()->Modified();
+ histCanvas->GetCanvas()->Update();
+
+ j = 0;
+ adcpedestal[0] = 0;
+ adcpedestal[1] = -1;
+ while(1)
+ {
+ int bin = histtemp->GetXaxis()->FindBin((int)(j+meanparam+paramsigma));
+
+ int yp = histtemp->GetBinContent(bin);
+ if(adcpedestal[1] == -1)
+ {
+ adcpedestal[0] = j+meanparam+paramsigma;
+ adcpedestal[1] = yp;
+ }
+ else
+ {
+ if(adcpedestal[1] >= yp)
+ {
+ adcpedestal[0] = j+meanparam+paramsigma;
+ adcpedestal[1] = yp;
+ }
+ else
+ break;
+ }
+
+ j++;
+ if(j > 50) break;
+ }
+
+ cout << "Pedestal ends with ADC value: " << adcpedestal[0] << endl;
+
+ // ----------------------------------------------------------------------------
+
+ sprintf(ctemp, "%s", files->At(i)->GetTitle());
+ inroot = new TFile(ctemp, "READ");
+
+ inroot->GetObject("header_data", header_data);
+ inroot->GetObject("meas_data", meas_data);
+
+ // Reading the header
+ if( header_data->FindBranch("angle") )
+ {
+ header_data->SetBranchAddress("angle", &evtheader.angle);
+ header_data->GetEntry(0);
+ }
+ else
+ {
+ printf("Error! Selected file has no angle header value. Please edit header to add the angle header value.\n");
+ break;
+ }
+
+ char rdc[256];
+ j = selectCh->GetNumber();
+ double rangetdc[2];
+ rangetdc[0] = tdcMinwindow->GetNumber();
+ rangetdc[1] = tdcMaxwindow->GetNumber();
+
+ k = 0;
+ k2 = 0;
+ m = 0;
+ m2 = 0;
+
+ // Reading the data
+ for(int e = 0; e < meas_data->GetEntries(); e++)
+ {
+ sprintf(rdc, "ADC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
+ meas_data->GetEntry(e);
+
+ sprintf(rdc, "TDC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
+ meas_data->GetEntry(e);
+
+ // If our data point is inside the TDC window
+ if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
+ {
+ // Gather only the integral of the pedestal
+ if((double)evtdata.adcdata[j] < (double)adcpedestal[0]+0.5 )
+ {
+ k2++;
+ m2 += evtdata.adcdata[j];
+ }
+
+ // Gather the complete integral
+ k++;
+ m += evtdata.adcdata[j];
+ }
+ }
+
+ angle[i] = (double)(evtheader.angle); // angle in radians
+
+// integralCount[i] += ((double)m)/((double)k);
+ integralCount[i] += (double)m;
+ cout << "Integral (" << k << " evts) = " << integralCount[i] << endl;
+
+ integralPedestal[i] += (double)m2;
+ cout << "Integral (" << k2 << " evts) = " << integralPedestal[i] << endl;
+
+ muval[i] = -TMath::Log((double)k2/(double)k);
+
+ pdeval[i] = muval[i]/(muval[0]*TMath::Cos(angle[i]*TMath::ACos(-1.)/180.));
+
+ inroot->Close();
+ delete inroot;
+ }
+ }
+
+ nrentries = n;
+ printf("%d files were selected.\n", nrentries);
+
+ cout << "angle\tmu\trelative PDE\n" << endl;
+ for(int i = 0; i < (int)files->GetSize(); i++)
+ {
+ // Relative PDE calculation
+ cout << angle[i] << "\t" << muval[i] << "\t" << pdeval[i] << endl;
+ }
+
+ // Plot mu and PDE angle dependance plots
+ gCanvas = new TCanvas("canv","canv",1200,900);
+ gCanvas->SetGrid();
+
+ TGraph *pde = new TGraph(nrentries, angle, pdeval);
+ pde->SetMarkerStyle(21);
+ pde->SetMarkerSize(1.0);
+ pde->SetMarkerColor(2);
+ pde->SetLineWidth(2);
+ pde->SetLineColor(2);
+ pde->GetXaxis()->SetLabelSize(0.030);
+ pde->GetXaxis()->CenterTitle();
+ pde->GetXaxis()->SetRange(-5,90);
+ pde->GetXaxis()->SetRangeUser(-5,90);
+ pde->GetYaxis()->SetTitleOffset(1.2);
+ pde->GetYaxis()->SetLabelSize(0.030);
+ pde->GetYaxis()->CenterTitle();
+ pde->GetYaxis()->SetRangeUser(0.3, 1.18);
+ pde->Draw("ALP");
+
+ pde->SetTitle(";Incidence angle (#circ);Relative PDE(#theta) / #mu(#theta)");
+
+ TGraph *mugr = new TGraph(nrentries, angle, muval);
+ mugr->SetMarkerStyle(20);
+ mugr->SetMarkerSize(1.0);
+ mugr->SetMarkerColor(4);
+ mugr->SetLineWidth(2);
+ mugr->SetLineColor(4);
+ mugr->Draw("SAME;LP");
+
+ gCanvas->Modified();
+ gCanvas->Update();
+ }
+}
+
+void TGAppMainFrame::RunMeas(void *ptr, int runCase, int zaxisscan, int &scanon)
+{
+ printf("Start of Run, run case %d\n", runCase);
+ float progVal;
+
+ char ctemp[256];
+ char ctemp2[256];
+ char fname[256];
+ int itemp = 0;
+
+ remove_ext((char*)fileName->GetText(), ctemp);
+// printf("Save name: %s\nNo extension: %s\n", fileName->GetText(), ctemp);
+
+ // Open file for writing
+/* if(runCase == 0)
+ {
+ sprintf(fname, "rm %s_%s", ctemp, histExtAll);
+ retTemp = system(fname);
+ }*/ // deleting might not be necesary due to RECREATE in root file open
+
+ if( voltscanOn->IsOn() || surfscanOn->IsOn() )
+ {
+ if(zaxisscan == 0)
+ {
+ if( (voltscanOn->IsOn()) && (vOutStep->GetNumber() > 0.) )
+ SeqNumber(runCase, (int)((vOutStop->GetNumber())-(vOutStart->GetNumber()))/(vOutStep->GetNumber()), ctemp2);
+ else if( surfscanOn->IsOn() )
+ {
+ if( xPosStep->GetNumber() == 0 )
+ itemp = 1;
+ else
+ itemp = (int)((xPosMax->GetNumber())-(xPosMin->GetNumber()))/(xPosStep->GetNumber());
+
+ if( yPosStep->GetNumber() == 0 )
+ itemp *= 1;
+ else
+ itemp *= (int)((yPosMax->GetNumber())-(yPosMin->GetNumber()))/(yPosStep->GetNumber());
+ SeqNumber(runCase, itemp, ctemp2);
+ }
+ sprintf(fname, "%s_%s%s", ctemp, ctemp2, histExt);
+ }
+ else if(zaxisscan == 1)
+ {
+ SeqNumber((int)zPos->GetNumber(), (int)zPosMax->GetNumber(), ctemp2);
+
+ if( (voltscanOn->IsOn()) && (vOutStep->GetNumber() > 0.) )
+ {
+ sprintf(fname, "%s_z%s_", ctemp, ctemp2);
+ SeqNumber(runCase, (int)((vOutStop->GetNumber())-(vOutStart->GetNumber()))/(vOutStep->GetNumber())+1, ctemp2);
+ strcat(fname, ctemp2);
+ strcat(fname, histExt);
+ }
+ else if( surfscanOn->IsOn() )
+ {
+ sprintf(fname, "%s_z%s_", ctemp, ctemp2);
+
+ if( xPosStep->GetNumber() == 0 )
+ itemp = 1;
+ else
+ itemp = (int)((xPosMax->GetNumber())-(xPosMin->GetNumber()))/(xPosStep->GetNumber())+1;
+
+ if( yPosStep->GetNumber() == 0 )
+ itemp *= 1;
+ else
+ itemp *= (int)((yPosMax->GetNumber())-(yPosMin->GetNumber()))/(yPosStep->GetNumber())+1;
+ SeqNumber(runCase, itemp, ctemp2);
+ strcat(fname, ctemp2);
+ strcat(fname, histExt);
+ }
+ else
+ sprintf(fname, "%s_z%s%s", ctemp, ctemp2, histExt);
+
+/* if(runCase < 10)
+ sprintf(fname, "%s_z%d_0000%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
+ else if( (runCase >= 10) && (runCase < 100) )
+ sprintf(fname, "%s_z%d_000%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
+ else if( (runCase >= 100) && (runCase < 1000) )
+ sprintf(fname, "%s_z%d_00%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
+ else if( (runCase >= 1000) && (runCase < 10000) )
+ sprintf(fname, "%s_z%d_0%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
+ else if( (runCase >= 10000) && (runCase < 100000) )
+ sprintf(fname, "%s_z%d_0%d%s", ctemp, (int)zPos->GetNumber(), runCase, histExt);
+*/ }
+ }
+ else if( !voltscanOn->IsOn() && !surfscanOn->IsOn() )
+ sprintf(fname, "%s%s", ctemp, histExt);
+// printf("Rootfile: %s\n", fname);
+
+ // Check if set voltage is below the hard limit
+ if( vOut->GetNumber() > vHardlimit->GetNumber() )
+ {
+ printf("Voltage hard limit triggered (%lf > %lf)!\n", vOut->GetNumber(), vHardlimit->GetNumber() );
+ vOut->SetNumber( vHardlimit->GetNumber() );
+ }
+
+ outroot = new TFile(fname, "RECREATE");
+
+ TTree *header_data = new TTree("header_data", "Header information for the measurement.");
+ TTree *meas_data = new TTree("meas_data", "Saved ADC and TDC measurement data.");
+ TTree *scope_data = new TTree("scope_data", "Saved scope measurement data.");
+
+ // Branches for the header
+ header_data->Branch("nrch", &evtheader.nrch, "nrch/I");
+ header_data->Branch("timestamp", &evtheader.timestamp, "timestamp/I");
+ header_data->Branch("biasvolt", &evtheader.biasvolt, "biasvolt/D");
+ header_data->Branch("xpos", &evtheader.xpos, "xpos/I");
+ header_data->Branch("ypos", &evtheader.ypos, "ypos/I");
+ header_data->Branch("zpos", &evtheader.zpos, "zpos/I");
+ header_data->Branch("temperature", &evtheader.temperature, "temperature/D");
+ header_data->Branch("laserinfo", &evtheader.laserinfo, "laserinfo/C");
+
+ evtheader.nrch = (int)NCH->GetNumber()*2;
+ evtheader.timestamp = (int)time(NULL);
+ evtheader.biasvolt = (double)vOut->GetNumber();
+ evtheader.xpos = (int)xPos->GetNumber();
+ evtheader.ypos = (int)yPos->GetNumber();
+ evtheader.zpos = (int)zPos->GetNumber();
+ evtheader.temperature = (double)chtemp->GetNumber();
+ evtheader.angle = (double)incangle->GetNumber();
+ sprintf(evtheader.laserinfo, "%s", laserInfo->GetText());
+
+ char histtime[256];
+ GetTime(evtheader.timestamp, histtime);
+
+ printf("Save file header information:\n");
+ printf("- Number of channels: %d\n", evtheader.nrch);
+ printf("- Timestamp: %d (%s)\n", evtheader.timestamp, histtime);
+ printf("- Bias voltage: %lf\n", evtheader.biasvolt);
+ printf("- Table position (X,Y,Z): %d, %d, %d\n", evtheader.xpos, evtheader.ypos, evtheader.zpos);
+ printf("- Temperature: %lf\n", evtheader.temperature);
+ printf("- Laser and filter settings: %s\n", evtheader.laserinfo);
+
+ header_data->Fill();
+
+ // Branches for ADC and TDC data
+ for(int i = 0; i < evtheader.nrch/2; i++)
+ {
+ sprintf(ctemp, "ADC%d", i);
+ sprintf(fname, "ADC%d/I", i);
+ meas_data->Branch(ctemp, &evtdata.adcdata[i], fname);
+
+ sprintf(ctemp, "TDC%d", i);
+ sprintf(fname, "TDC%d/I", i);
+ meas_data->Branch(ctemp, &evtdata.tdcdata[i], fname);
+ }
+
+ // Initialize the scope before measurement
+ if( sCamaclink->IsDown() )
+ InitializeScope();
+
+ // Branch for scope measurement data
+ if(gScopeDaq->scopeUseType == 2) // only if we select waveform measurement
+ {
+ if(gScopeDaq->scopeMeasSel == 0)
+ scope_data->Branch("amp", &evtmeas.measdata, "amp/D");
+ else if(gScopeDaq->scopeMeasSel == 1)
+ scope_data->Branch("area", &evtmeas.measdata, "area/D");
+ else if(gScopeDaq->scopeMeasSel == 2)
+ scope_data->Branch("delay", &evtmeas.measdata, "delay/D");
+ else if(gScopeDaq->scopeMeasSel == 3)
+ scope_data->Branch("fall", &evtmeas.measdata, "fall/D");
+ else if(gScopeDaq->scopeMeasSel == 4)
+ scope_data->Branch("freq", &evtmeas.measdata, "freq/D");
+ else if(gScopeDaq->scopeMeasSel == 5)
+ scope_data->Branch("max", &evtmeas.measdata, "max/D");
+ else if(gScopeDaq->scopeMeasSel == 6)
+ scope_data->Branch("mean", &evtmeas.measdata, "mean/D");
+ else if(gScopeDaq->scopeMeasSel == 7)
+ scope_data->Branch("min", &evtmeas.measdata, "min/D");
+ else if(gScopeDaq->scopeMeasSel == 8)
+ scope_data->Branch("pk2p", &evtmeas.measdata, "pk2p/D");
+ else if(gScopeDaq->scopeMeasSel == 9)
+ scope_data->Branch("pwidth", &evtmeas.measdata, "pwidth/D");
+ else if(gScopeDaq->scopeMeasSel == 10)
+ scope_data->Branch("rise", &evtmeas.measdata, "rise/D");
+ }
+
+ int neve = (int) evtNum->GetNumber();
+ int allEvt, zProg;
+ zProg = 1;
+
+#if WORKSTAT == 'I'
+#else
+// ONLY FOR TESTING!
+ TRandom *randNum = new TRandom();
+ randNum->SetSeed(0);
+// ONLY FOR TESTING!
+#endif
+
+ if (gDaq)
+ {
+ if(scanon == 0)
+ {
+ gDaq->init(evtheader.nrch);
+ scanon = 1;
+ }
+ gDaq->fStop=0;
+ // Start gathering
+ gDaq->start();
+
+ busyLabel->Enable();
+
+ for (int n=0;n<neve && !gDaq->fStop ;/*n++*/)
+ {
+ int nb = gDaq->event(gBuf,BSIZE);
+
+#if WORKSTAT == 'I'
+#else
+// ONLY FOR TESTING!
+ for(int i=0; i < evtheader.nrch; i++)
+ {
+ if(i == 1)
+ gBuf[i] = randNum->Gaus(1500,300);
+ else if(i == 0)
+ gBuf[i] = randNum->Poisson(2500);
+ }
+// ONLY FOR TESTING!
+#endif
+ if (nb<=0) n--;
+
+ int nc=0;
+
+ while ( (nb>0) && (n<neve) )
+ {
+ for(int i = 0; i < evtheader.nrch; i++)
+ {
+ unsigned short adc = gBuf[i+nc]&0xFFFF;
+ if(i % 2 == 0) // TDC
+ evtdata.tdcdata[i/2] = (int)adc;
+ else if(i % 2 == 1) // ADC
+ evtdata.adcdata[i/2] = (int)adc;
+
+ // Start plotting the scope waveform
+ if( (gScopeDaq->scopeUseType == 1) && (sCamaclink->IsDown()) )
+ StartScopeAcq();
+ }
+ meas_data->Fill();
+
+ // Start making a scope measurement
+ if( (gScopeDaq->scopeUseType == 2) && (sCamaclink->IsDown()) )
+ {
+ StartScopeAcq();
+ evtmeas.measdata = gScopeDaq->measubuf;
+ }
+ scope_data->Fill();
+
+ n++;
+ nc += evtheader.nrch;
+ nb -= evtheader.nrch;
+ }
+
+ MyTimer();
+ allEvt = n;
+ if (gSystem->ProcessEvents()) printf("Run Interrupted\n");
+
+ if( (started) && (n == (neve*zProg)/10) )
+ {
+ progVal = (float)zProg*10;
+ curProgress->SetPosition(progVal);
+ zProg++;
+ }
+ }
+
+ printf("Number of gathered events: %d\n", allEvt);
+ measStart->SetText("Start acquisition");
+ started = kFALSE;
+
+ gDaq->stop();
+ }
+
+ busyLabel->Disable();
+ printf("End of Run neve=%d\n",neve);
+
+ header_data->Write();
+ meas_data->Write();
+ scope_data->Write();
+ delete header_data;
+ delete meas_data;
+ delete scope_data;
+
+ outroot->Close();
+}
+
+// Start the acquisition
+void TGAppMainFrame::StartAcq()
+{
+ // Variable that will initialize camac only once (for scans)
+ int scanon = 0;
+
+ // Determine the type of measurement to perform
+ int vscan = 0, pscan = 0, zscan = 0;
+ if(voltscanOn->IsOn()) vscan = 1;
+ if(surfscanOn->IsOn()) pscan = 1;
+ if(zscanOn->IsOn()) zscan = 1;
+
+ char cmd[256];
+ int i, j, k;
+ float progVal;
+ FILE *pfin;
+
+ // Variables for voltage scan
+ float currentVoltage, minVoltage, maxVoltage, stepVoltage;
+ int repetition;
+
+ // Variables for surface scan
+ int minXpos, maxXpos, stepXpos;
+ int minYpos, maxYpos, stepYpos;
+ int minZpos, maxZpos, stepZpos;
+ int repetX, repetY, repetZ;
+
+ // Voltage scan
+ if( (vscan == 1) && (pscan == 0) )
+ {
+ if(started)
+ {
+ printf("Stopping current voltage scan...\n");
+ gROOT->SetInterrupt();
+ measStart->SetText("Start acquisition");
+ started = kFALSE;
+
+ pfin = fopen("finish_sig.txt","w");
+ fprintf(pfin, "%s: Voltage scan stopped.", timeStamp->GetText());
+ fclose(pfin);
+ }
+ else if(!started)
+ {
+ measStart->SetText("Stop acquisition");
+ started = kTRUE;
+
+ printf("Running a voltage scan...\n");
+
+ minVoltage = vOutStart->GetNumber();
+ maxVoltage = vOutStop->GetNumber();
+ stepVoltage = vOutStep->GetNumber();
+
+ if(stepVoltage == 0.)
+ repetition = 1;
+ else
+ repetition = ((maxVoltage - minVoltage)/stepVoltage)+1;
+
+ for(i=0; i < repetition; i++)
+ {
+ progVal = (float)(100.00/repetition)*i;
+ curProgress->SetPosition(progVal);
+
+ fflush(stdout);
+ currentVoltage = minVoltage + stepVoltage*i;
+ sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s 1", rootdir, GetChannel(), currentVoltage);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+ printf("Waiting for voltage change...\n");
+ sleep(3);
+ vOut->SetNumber(currentVoltage);
+ printf("Continuing...\n");
+
+ // Here comes function to start histogramming <<<<<<<<<<<<<<<<<<<<<<<<
+ RunMeas((void*)0, i, 0, scanon);
+ fflush(stdout);
+ }
+
+ // Set output back to off
+ fflush(stdout);
+ printf("Measurement finished, returning to starting voltage...\n");
+ sprintf(cmd, "%s/mpod/mpod_voltage.sh -o %d -v %f -s 1", rootdir, GetChannel(), minVoltage);
+ vOut->SetNumber(minVoltage);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+ progVal = 100.00;
+ curProgress->SetPosition(progVal);
+ printf("\n");
+
+ pfin = fopen("finish_sig.txt","w");
+ fprintf(pfin, "%s: Voltage scan finished.", timeStamp->GetText());
+ fclose(pfin);
+ }
+ }
+ // Surface scan
+ else if( (pscan == 1) && (vscan == 0) )
+ {
+ minXpos = xPosMin->GetNumber();
+ maxXpos = xPosMax->GetNumber();
+ stepXpos = xPosStep->GetNumber();
+ minYpos = yPosMin->GetNumber();
+ maxYpos = yPosMax->GetNumber();
+ stepYpos = yPosStep->GetNumber();
+ minZpos = zPosMin->GetNumber();
+ maxZpos = zPosMax->GetNumber();
+ stepZpos = zPosStep->GetNumber();
+
+ if(zscan == 1)
+ {
+ if(stepZpos == 0.) repetZ = 1;
+ else repetZ = ((maxZpos - minZpos)/stepZpos)+1;
+ }
+ else
+ {
+ minZpos = zPos->GetNumber();
+ repetZ = 1;
+ }
+
+ if(stepXpos == 0.) repetX = 1;
+ else repetX = ((maxXpos - minXpos)/stepXpos)+1;
+ if(stepYpos == 0.) repetY = 1;
+ else repetY = ((maxYpos - minYpos)/stepYpos)+1;
+
+ for(k=0; k < repetZ; k++)
+ {
+ fflush(stdout);
+ // Y-axis change
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, minZpos + stepZpos*k, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+ int iloop =0;
+ do {
+ usleep(50);
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -p > %s/curpos.txt", rootdir, rootdir);
+ retTemp = system(cmd);
+
+ FILE* fpos;
+ int itemp;
+ sprintf(cmd, "%s/curpos.txt", rootdir);
+ fpos = fopen(cmd, "r");
+
+ if(fpos != NULL)
+ {
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ }
+
+ fclose(fpos);
+ printf(">>>>>>> Cur Z Pos = %d\n", itemp);
+
+
+ if( abs(itemp - (minZpos + stepZpos*k)) < 3 ) break;
+
+ iloop++;
+ } while(iloop < 10000);
+
+ printf("Next Z position...\n");
+ zPos->SetNumber(minZpos + stepZpos*k);
+ fflush(stdout);
+
+ for(j=0; j < repetY; j++)
+ {
+ fflush(stdout);
+ // Y-axis change
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, minYpos + stepYpos*j, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+ printf("Waiting for position change...\n");
+ //sleep(4);
+
+ int iloop =0;
+ do {
+ usleep(50);
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -p > %s/curpos.txt", rootdir, rootdir);
+ retTemp = system(cmd);
+
+ FILE* fpos;
+ int itemp;
+ sprintf(cmd, "%s/curpos.txt", rootdir);
+ fpos = fopen(cmd, "r");
+
+ if(fpos != NULL)
+ {
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ }
+
+ fclose(fpos);
+ printf(">>>>>>> Cur Y Pos = %d\n", itemp);
+
+
+ if( abs(itemp - (minYpos + stepYpos*j)) < 3 ) break;
+
+ iloop++;
+ } while(iloop < 10000);
+
+ printf("Next Y position...\n");
+ yPos->SetNumber(minYpos + stepYpos*j);
+ fflush(stdout);
+
+ for(i=0; i < repetX; i++)
+ {
+ progVal = (float)(100.00/(repetX*repetY))*(j*repetX+i);
+ curProgress->SetPosition(progVal);
+
+ int jloop =0;
+ do {
+ usleep(100);
+
+ // X-axis change
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, minXpos + stepXpos*i, rootdir);
+ #if WORKSTAT == 'I'
+ retTemp = system(cmd);
+ #else
+ printf("Cmd: %s\n",cmd);
+ #endif
+ fflush(stdout);
+
+ printf("Next X position...\n");
+ fflush(stdout);
+
+ printf("Waiting for position change...\n");
+ // sleep(2);
+
+ int iloop =0;
+ do {
+ usleep(100);
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -p > %s/curpos.txt", rootdir, rootdir);
+ retTemp = system(cmd);
+
+ FILE* fpos;
+ int itemp;
+ sprintf(cmd, "%s/curpos.txt", rootdir);
+ fpos = fopen(cmd, "r");
+
+ if(fpos != NULL)
+ {
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ }
+
+ fclose(fpos);
+ printf(">>>>>>> Cur X Pos = %d\n", itemp);
+
+
+ if( abs(itemp - ( minXpos + stepXpos*i)) < 3 ) break;
+
+ iloop++;
+ } while(iloop < 100);
+
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -p > %s/curpos.txt", rootdir, rootdir);
+ retTemp = system(cmd);
+
+ FILE* fpos;
+ int itemp;
+ sprintf(cmd, "%s/curpos.txt", rootdir);
+ fpos = fopen(cmd, "r");
+
+ if(fpos != NULL)
+ {
+ retTemp = fscanf(fpos, "%d\n", &itemp);
+ }
+
+ fclose(fpos);
+
+ if( abs(itemp - ( minXpos + stepXpos*i)) < 3 ) break;
+
+ jloop++;
+ } while(jloop < 100);
+
+
+
+ xPos->SetNumber(minXpos + stepXpos*i);
+ printf("Continuing...\n");
+
+// for (k=0;k<(NTDCCH+NADCCH);k++) gHisto1D[k]->Reset();
+// for (k=0;k<(NTDCCH+NADCCH)/2;k++) gHisto2D[k]->Reset();
+
+ // Here comes function to start histogramming <<<<<<<<<<<<<<<<<<<<<<<<
+ RunMeas((void*)0, (j*repetX + i), zscan , scanon);
+
+ fflush(stdout);
+ }
+
+ printf("\n");
+ }
+ }
+
+ fflush(stdout);
+ printf("Measurement finished, returning to starting position...\n");
+ // X-axis return
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 1 -v %d -s la && %s/MIKRO/mikro_ctrl -n 1 -c m", rootdir, minXpos, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ fflush(stdout);
+
+ // Y-axis return
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 2 -v %d -s la && %s/MIKRO/mikro_ctrl -n 2 -c m", rootdir, minYpos, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+
+ // Z-axis return
+ sprintf(cmd, "sudo %s/MIKRO/mikro_ctrl -n 3 -v %d -s la && %s/MIKRO/mikro_ctrl -n 3 -c m", rootdir, minZpos, rootdir);
+#if WORKSTAT == 'I'
+ retTemp = system(cmd);
+#else
+ printf("Cmd: %s\n",cmd);
+#endif
+ xPos->SetNumber(minXpos);
+ yPos->SetNumber(minYpos);
+ zPos->SetNumber(minZpos);
+
+ progVal = 100.00;
+ curProgress->SetPosition(progVal);
+ printf("\n");
+
+ pfin = fopen("finish_sig.txt","w");
+ fprintf(pfin, "%s: Surface scan finished.", timeStamp->GetText());
+ fclose(pfin);
+ }
+ // Normal single measurement
+ else if( (vscan == 0) && (pscan == 0) )
+ {
+ // Set the start button to stop and enable stopping of measurement
+ if(started)
+ {
+ printf("Stopping current single scan...\n");
+ gROOT->SetInterrupt();
+// gDaq->fStop=1;
+ measStart->SetText("Start acquisition");
+ started = kFALSE;
+ }
+ else if(!started)
+ {
+ measStart->SetText("Stop acquisition");
+ started = kTRUE;
+
+ printf("Running a single scan...\n");
+ RunMeas((void*)0, 0, 0, scanon);
+ printf("Measurement finished...\n");
+ printf("\n");
+ }
+ }
+}
+
+// File browser for opening histograms
+void TGAppMainFrame::SelectDirectory()
+{
+ int i = fileList->GetNumberOfEntries();
+
+ TGFileInfo file_info;
+ const char *filetypes[] = {"Histograms",histExtAll,0,0};
+ file_info.fFileTypes = filetypes;
+ file_info.fIniDir = StrDup("./results");
+ file_info.fMultipleSelection = kTRUE;
+ new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDOpen, &file_info);
+
+ TList *files = file_info.fFileNamesList;
+ if(files)
+ {
+ TSystemFile *file;
+ TString fname;
+ TIter next(files);
+ while(file=(TSystemFile*)next())
+ {
+ fname = file->GetName();
+ fileList->AddEntry(fname.Data(), i);
+ i++;
+ }
+ }
+ fileList->Layout();
+}
+
+// File browser for selecting the save file
+void TGAppMainFrame::SaveFile()
+{
+ TGFileInfo file_info;
+ const char *filetypes[] = {"Histograms",histExtAll,0,0};
+ file_info.fFileTypes = filetypes;
+ file_info.fIniDir = StrDup("./results");
+ new TGFileDialog(gClient->GetDefaultRoot(), fMain, kFDSave, &file_info);
+
+ fileName->SetText(file_info.fFilename);
+}
+
+// Toggle multiple selection in filelist
+void TGAppMainFrame::ListMultiSelect()
+{
+ fileList->SetMultipleSelections((multiSelect->IsOn()));
+
+ if(multiSelectAll->IsDown())
+ multiSelectAll->SetState(kButtonUp);
+}
+
+// Select all entries in filelist
+void TGAppMainFrame::ListSelectAll()
+{
+ if(multiSelectAll->IsDown())
+ {
+ multiSelect->SetState(kButtonDown);
+ fileList->SetMultipleSelections((multiSelect->IsOn()));
+ for(int i = 0; i < fileList->GetNumberOfEntries(); i++)
+ fileList->Select(i,kTRUE);
+ }
+ else if(!multiSelectAll->IsDown())
+ {
+ multiSelect->SetState(kButtonUp);
+ fileList->SetMultipleSelections((multiSelect->IsOn()));
+ for(int i = 0; i < fileList->GetNumberOfEntries(); i++)
+ fileList->Select(i,kFALSE);
+ }
+}
+
+// Navigation buttons for the filelist (<<, >>) and double click
+void TGAppMainFrame::FileListNavigation(int pn)
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ int curSel;
+ TList *files;
+ if( nrfiles > 0 )
+ {
+ if(pn < -1)
+ {
+ if(multiSelect->IsOn())
+ {
+ // turn off multiple selection and select first file on list
+ fileList->SetMultipleSelections(kFALSE);
+ multiSelect->SetState(kButtonUp);
+ multiSelectAll->SetState(kButtonUp);
+
+ fileList->Select(0,kTRUE);
+ }
+ else
+ {
+ // if nothing is selected, curSel will be -1
+ curSel = fileList->GetSelected();
+ // go to next file on list
+ if(pn == -3)
+ {
+ if( (curSel == (int)(nrfiles-1)) || (curSel == -1) )
+ fileList->Select(0);
+ else
+ fileList->Select(curSel+1);
+ }
+ // go to previous file on list
+ else if(pn == -2)
+ {
+ if( (curSel == 0) || (curSel == -1) )
+ fileList->Select(nrfiles-1);
+ else
+ fileList->Select(curSel-1);
+ }
+ }
+ }
+
+ // check the newly selected file/files and return its name/their names
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ if(debug)
+ printf("Filename: %s\n", files->At(i)->GetTitle());
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
+ }
+ }
+ }
+
+ // Still need to include drawing of histograms we move to!!!
+ }
+}
+
+// Open the header edit window when pressing on editHeader button
+void TGAppMainFrame::HeaderEdit()
+{
+ OpenWindow(2);
+}
+
+// Display the currently selected histogram in file list
+void TGAppMainFrame::DisplayHistogram(char* histfile, int histtype)
+{
+ if(debug)
+ printf("Selected file: %s\n", histfile);
+
+ TCanvas *gCanvas = histCanvas->GetCanvas();
+
+ inroot = new TFile(histfile, "READ");
+
+ TTree *header_data, *meas_data;
+ inroot->GetObject("header_data", header_data);
+ inroot->GetObject("meas_data", meas_data);
+
+ // Reading the header
+ header_data->SetBranchAddress("nrch", &evtheader.nrch);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("timestamp", &evtheader.timestamp);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("biasvolt", &evtheader.biasvolt);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("xpos", &evtheader.xpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("ypos", &evtheader.ypos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("zpos", &evtheader.zpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("temperature", &evtheader.temperature);
+ header_data->GetEntry(0);
+ if( header_data->FindBranch("angle") )
+ {
+ header_data->SetBranchAddress("angle", &evtheader.angle);
+ header_data->GetEntry(0);
+ }
+ header_data->SetBranchAddress("laserinfo", &evtheader.laserinfo);
+ header_data->GetEntry(0);
+
+ char histtime[256];
+ GetTime(evtheader.timestamp, histtime);
+
+ // Displaying header information (debug and on the GUI)
+ if(debug)
+ {
+ printf("Opened file header information:\n");
+ printf("- Number of channels: %d\n", evtheader.nrch);
+ printf("- Timestamp: %d (%s)\n", evtheader.timestamp, histtime);
+ printf("- Bias voltage: %lf\n", evtheader.biasvolt);
+ printf("- Table position (X,Y,Z): %d, %d, %d\n", evtheader.xpos, evtheader.ypos, evtheader.zpos);
+ if(evtheader.temperature)
+ printf("- Temperature: %lf\n", evtheader.temperature);
+ if( header_data->FindBranch("angle") )
+ printf("- Incidence angle: %lf\n", evtheader.angle);
+ else
+ printf("- Incidence angle: No angle information!\n");
+ printf("- Laser and filter settings: %s\n", evtheader.laserinfo);
+ }
+
+ char ctemp[512];
+ disptime->SetText(histtime);
+ dispbias->SetNumber(evtheader.biasvolt);
+ sprintf(ctemp, "%d, %d, %d", evtheader.xpos, evtheader.ypos, evtheader.zpos);
+ disppos->SetText(ctemp);
+ if(evtheader.temperature)
+ disptemp->SetNumber(evtheader.temperature);
+ else
+ disptemp->SetNumber(0.0);
+ if( header_data->FindBranch("angle") )
+ dispangle->SetNumber(evtheader.angle);
+ else
+ dispangle->SetNumber(0.0);
+ displaser->SetText(evtheader.laserinfo);
+
+ int j;
+ char rdc[256];
+ char rdcsel[256];
+
+ j = selectCh->GetNumber();
+
+ printf("Found %d data points.\n", (int)meas_data->GetEntries());
+
+ gCanvas->cd();
+ double range[4];
+ range[0] = adcMinRange->GetNumber();
+ range[1] = adcMaxRange->GetNumber();
+ range[2] = tdcMinwindow->GetNumber();
+ range[3] = tdcMaxwindow->GetNumber();
+
+ if(histtype == 0)
+ {
+ if( range[0] == range[1] )
+ sprintf(rdc, "ADC%d>>%s", j, histname);
+ else
+ sprintf(rdc, "ADC%d>>%s(%d,%lf,%lf)", j, histname, (int)(range[1]-range[0]), range[0]-0.5, range[1]-0.5);
+
+ sprintf(rdcsel, "(TDC%d>%lf)&&(TDC%d<%lf)", j, range[2]*tdctimeconversion, j, range[3]*tdctimeconversion);
+ meas_data->Draw(rdc, rdcsel);
+
+ sprintf(rdc, "ADC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);ADC;", j, evtheader.biasvolt, range[2], range[3]);
+ TH1F *histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
+ if(!cleanPlots)
+ histtemp->SetTitle(rdc);
+ else
+ histtemp->SetTitle(";ADC;");
+ histtemp->GetXaxis()->SetLabelSize(0.025);
+ histtemp->GetXaxis()->CenterTitle(kTRUE);
+ histtemp->GetYaxis()->SetLabelSize(0.025);
+ if(cleanPlots)
+ {
+ TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
+ yax->SetMaxDigits(4);
+ }
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ if( yMinRange->GetNumber() != yMaxRange->GetNumber() )
+ {
+ if( (logscale->IsDown()) && (yMinRange->GetNumber() <= 0) )
+ {
+ histtemp->GetYaxis()->SetRangeUser(0.5, yMaxRange->GetNumber());
+ yMinRange->SetNumber(0.5);
+ logchange = 1;
+ }
+ else
+ {
+ gCanvas->SetLogy(kFALSE);
+ if(logchange == 1)
+ {
+ yMinRange->SetNumber(0.0);
+ logchange = 0;
+ }
+ histtemp->GetYaxis()->SetRangeUser(yMinRange->GetNumber(), yMaxRange->GetNumber());
+ }
+ }
+
+ TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
+ if(!cleanPlots)
+ {
+ stats->SetX1NDC(0.84); stats->SetX2NDC(0.97);
+ stats->SetY1NDC(0.87); stats->SetY2NDC(0.97);
+ }
+ else
+ {
+ stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
+ stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
+ }
+ }
+ else if(histtype == 1)
+ {
+ if( range[0] == range[1] )
+ sprintf(rdc, "(TDC%d/%lf)>>%s", j, tdctimeconversion, histname);
+ else
+ sprintf(rdc, "(TDC%d/%lf)>>%s(%d,%lf,%lf)", j, tdctimeconversion, histname, (int)((range[3]-range[2])*tdctimeconversion), range[2], range[3]);
+ sprintf(rdcsel, "(TDC%d>%lf)&&(TDC%d<%lf)", j, range[2]*tdctimeconversion, j, range[3]*tdctimeconversion);
+ meas_data->Draw(rdc, rdcsel);
+
+ sprintf(rdc, "TDC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);Time (TDC channel) [ns];", j, evtheader.biasvolt, range[2], range[3]);
+ TH1F *histtemp = (TH1F*)gCanvas->GetPrimitive(histname);
+ if(!cleanPlots)
+ histtemp->SetTitle(rdc);
+ else
+ histtemp->SetTitle(";Time (TDC channel) [ns];");
+ histtemp->GetXaxis()->SetLabelSize(0.025);
+ histtemp->GetXaxis()->CenterTitle(kTRUE);
+ histtemp->GetYaxis()->SetLabelSize(0.025);
+ if(cleanPlots)
+ {
+ TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
+ yax->SetMaxDigits(4);
+ }
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ if( yMinRange->GetNumber() != yMaxRange->GetNumber() )
+ {
+ if( (logscale->IsDown()) && (yMinRange->GetNumber() <= 0) )
+ {
+ histtemp->GetYaxis()->SetRangeUser(0.5, yMaxRange->GetNumber());
+ yMinRange->SetNumber(0.5);
+ logchange = 1;
+ }
+ else
+ {
+ gCanvas->SetLogy(kFALSE);
+ if(logchange == 1)
+ {
+ yMinRange->SetNumber(0.0);
+ logchange = 0;
+ }
+ histtemp->GetYaxis()->SetRangeUser(yMinRange->GetNumber(), yMaxRange->GetNumber());
+ }
+ }
+
+ TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
+ if(!cleanPlots)
+ {
+ stats->SetX1NDC(0.84); stats->SetX2NDC(0.97);
+ stats->SetY1NDC(0.87); stats->SetY2NDC(0.97);
+ }
+ else
+ {
+ stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
+ stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
+ }
+ }
+ else if(histtype == 2)
+ {
+ if( ((range[0] == range[1]) && (range[2] == range[3])) || (range[2] == range[3]) || (range[0] == range[1]) )
+ sprintf(rdc, "(TDC%d/%lf):ADC%d>>%s", j, tdctimeconversion, j, histname);
+ else
+ sprintf(rdc, "(TDC%d/%lf):ADC%d>>%s(%d,%lf,%lf,%d,%lf,%lf)", j, tdctimeconversion, j, histname, (int)(range[1]-range[0])/2, range[0]-0.5, range[1]-0.5, (int)((range[3]-range[2])*tdctimeconversion)/2, range[2], range[3]);
+ meas_data->Draw(rdc,"","COLZ");
+
+ sprintf(rdc, "ADC/TDC%d, Vbias=%.3lf, TDC=(%.2lf,%.2lf);ADC;TDC", j, evtheader.biasvolt, range[2], range[3]);
+ TH2F *histtemp = (TH2F*)gCanvas->GetPrimitive(histname);
+ if(!cleanPlots)
+ histtemp->SetTitle(rdc);
+ else
+ histtemp->SetTitle(";ADC;Time (TDC channel) [ns]");
+ histtemp->GetXaxis()->SetLabelSize(0.025);
+ histtemp->GetXaxis()->CenterTitle(kTRUE);
+ histtemp->GetYaxis()->SetLabelSize(0.025);
+ histtemp->GetYaxis()->CenterTitle(kTRUE);
+ histtemp->GetYaxis()->SetTitleOffset(1.35);
+ if(cleanPlots)
+ {
+ TGaxis *yax = (TGaxis*)histtemp->GetYaxis();
+ yax->SetMaxDigits(4);
+ }
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ TPaveStats *stats = (TPaveStats*)histtemp->FindObject("stats");
+// stats->SetOptStat(0);
+ stats->SetX1NDC(1.1); stats->SetX2NDC(1.3);
+ stats->SetY1NDC(1.1); stats->SetY2NDC(1.3);
+
+ TPaletteAxis *gpalette = (TPaletteAxis*)histtemp->GetListOfFunctions()->FindObject("palette");
+ gpalette->SetLabelSize(0.022);
+ }
+
+ if(histtype < 2)
+ {
+ if( logscale->IsDown() )
+ gCanvas->SetLogy(kTRUE);
+ else if( !logscale->IsDown() )
+ gCanvas->SetLogy(kFALSE);
+ }
+ else
+ gCanvas->SetLogy(kFALSE);
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ // If you close the opened file, the data can't be accessed by other functions
+}
+
+// Create a 2D surface plot and plot it
+void TGAppMainFrame::MakeSurfPlot(TList *files)
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ int j, k = 0, m = 0, n = 0;
+ char ctemp[256];
+ TCanvas *gCanvas = histCanvas->GetCanvas();
+ TTree *header_data, *meas_data;
+ double *integralCount;
+ double *surfx, *surfy;
+ double xsurfmin = 0, ysurfmin = 0;
+ integralCount = new double[nrfiles];
+ for(int i = 0; i < (int)nrfiles; i++) integralCount[i] = 0;
+ surfx = new double[nrfiles];
+ surfy = new double[nrfiles];
+ int nrentries;
+ TGraph2D *gScan2D;
+ gScan2D = new TGraph2D();
+
+/* int zProg = 0;
+ float progVal;
+ curProgress->SetPosition(zProg);*/
+
+ char exportname[256];
+
+ if(multiSelect->IsOn())
+ {
+ printf("Creating a surface plot. Please wait...\n");
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ busyLabel->Enable();
+
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ n++;
+// printf("Filename: %s\n", files->At(i)->GetTitle());
+
+ sprintf(ctemp, "%s", files->At(i)->GetTitle());
+ inroot = new TFile(ctemp, "READ");
+
+ inroot->GetObject("header_data", header_data);
+ inroot->GetObject("meas_data", meas_data);
+
+ // Reading the header
+ header_data->SetBranchAddress("xpos", &evtheader.xpos);
+ header_data->GetEntry(0);
+ header_data->SetBranchAddress("ypos", &evtheader.ypos);
+ header_data->GetEntry(0);
+
+ char rdc[256];
+ j = selectCh->GetNumber();
+ double rangetdc[2];
+ rangetdc[0] = tdcMinwindow->GetNumber();
+ rangetdc[1] = tdcMaxwindow->GetNumber();
+
+ k = 0;
+ m = 0;
+
+ // Reading the data
+ for(int i = 0; i < meas_data->GetEntries(); i++)
+ {
+ sprintf(rdc, "ADC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.adcdata[j]);
+ meas_data->GetEntry(i);
+
+ sprintf(rdc, "TDC%d", j);
+ meas_data->SetBranchAddress(rdc, &evtdata.tdcdata[j]);
+ meas_data->GetEntry(i);
+
+ // If our data point is inside the TDC window
+ if( ((double)evtdata.tdcdata[j]/tdctimeconversion >= rangetdc[0]) && ((double)evtdata.tdcdata[j]/tdctimeconversion <= rangetdc[1]) )
+ {
+ k++;
+ m += evtdata.adcdata[j];
+ }
+ }
+
+ integralCount[n-1] += ((double)m)/((double)k);
+ if(n == 1)
+ {
+ xsurfmin = evtheader.xpos;
+ ysurfmin = evtheader.ypos;
+ }
+ surfx[n-1] = (double)(evtheader.xpos-xsurfmin)*lenconversion;
+ surfy[n-1] = (double)(evtheader.ypos-ysurfmin)*lenconversion;
+
+/* if( n == (((files->GetSize())*zProg)/20)+1 ) // divide by 20 because files->GetSize() gives a double value of the files selected
+ {
+ progVal = (float)n;
+ curProgress->SetPosition(progVal);
+ zProg++;
+ printf("Progress = %lf\n", progVal);
+ }*/
+
+ inroot->Close();
+ delete inroot;
+ }
+ }
+
+ busyLabel->Disable();
+
+ nrentries = n;
+ printf("%d files were selected.\n", nrentries);
+
+ for(int i = 0; i < nrentries; i++)
+ {
+// printf("At position (%d,%d), the ADC integral is: %lf.\n", surfx[i], surfy[i], integralCount[i]);
+ gScan2D->SetPoint(i, surfx[i], surfy[i], integralCount[i]);
+ }
+ gCanvas->cd();
+ gScan2D->Draw("COLZ");
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ gScan2D->GetXaxis()->SetTitle("X [#mum]");
+ gScan2D->GetXaxis()->CenterTitle(kTRUE);
+ gScan2D->GetXaxis()->SetLabelSize(0.022);
+ gScan2D->GetXaxis()->SetRangeUser(surfx[0], surfx[nrentries-1]);
+// j = 500+(int)((surfx[nrentries-1]-surfx[0])/(surfx[1]-surfx[0]));
+// if(j > 510) j = 510;
+ gScan2D->GetXaxis()->SetNdivisions(510, kTRUE);
+ gScan2D->GetYaxis()->SetTitle("Y [#mum]");
+ gScan2D->GetYaxis()->SetTitleOffset(1.3);
+ gScan2D->GetYaxis()->CenterTitle(kTRUE);
+ gScan2D->GetYaxis()->SetLabelSize(0.022);
+ gScan2D->GetYaxis()->SetRangeUser(surfy[0], surfy[nrentries-1]);
+// j = 500+(int)((surfy[nrentries-1]-surfy[0])/(surfy[(int)((surfx[nrentries-1]-surfx[0])/(surfx[1]-surfx[0])+1)]-surfy[0]));
+// if(j > 510) j = 510;
+ gScan2D->GetYaxis()->SetNdivisions(510, kTRUE);
+
+ TGaxis *yax = (TGaxis*)gScan2D->GetYaxis();
+ yax->SetMaxDigits(4);
+
+ if(!cleanPlots)
+ gScan2D->SetTitle("Surface scan");
+ else
+ gScan2D->SetTitle();
+
+// TPaletteAxis *gpalette = (TPaletteAxis*)gScan2D->GetListOfFunctions()->FindObject("palette");
+// gpalette->SetLabelSize(0.022);
+
+ gCanvas->Modified();
+ gCanvas->Update();
+
+ remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
+ sprintf(exportname, "%s_surfscan.pdf", ctemp);
+ gCanvas->SaveAs(exportname);
+ }
+ }
+ else
+ {
+ printf("To make a 2D surface scan plot, select multiple root files.\n");
+ change2Dsurf->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
+ }
+
+ delete[] surfx;
+ delete[] surfy;
+ delete[] integralCount;
+}
+
+// Change histogram when changing the channel
+void TGAppMainFrame::ChangeChannel()
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ TList *files;
+
+ if( nrfiles > 0 )
+ {
+ // check the newly selected file/files and return its name/their names
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ if(debug)
+ printf("Filename: %s\n", files->At(i)->GetTitle());
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
+ }
+ }
+ }
+ }
+}
+
+// Setting a predetermined X range
+void TGAppMainFrame::SetHistRange()
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+
+ if(nrfiles > 0)
+ {
+ TList *files;
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ if(debug)
+ printf("Filename: %s\n", files->At(i)->GetTitle());
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
+ }
+ }
+ }
+ }
+}
+
+// Changing the histogram type to display
+void TGAppMainFrame::ChangeHisttype(int type)
+{
+ TGTextButton *pressedB = new TGTextButton();
+ int menuID = 0;
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+
+ // ADC histogram
+ if(type == 0)
+ {
+ pressedB = changeADC;
+ menuID = M_ANALYSIS_HISTTYPE_1DADC;
+
+ changeTDC->SetDown(kFALSE);
+ changeADCTDC->SetDown(kFALSE);
+ change2Dsurf->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
+ }
+ // TDC histogram
+ else if(type == 1)
+ {
+ pressedB = changeTDC;
+ menuID = M_ANALYSIS_HISTTYPE_1DTDC;
+
+ changeADC->SetDown(kFALSE);
+ changeADCTDC->SetDown(kFALSE);
+ change2Dsurf->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
+ }
+ // ADC vs. TDC histogram
+ else if(type == 2)
+ {
+ pressedB = changeADCTDC;
+ menuID = M_ANALYSIS_HISTTYPE_2D;
+
+ changeADC->SetDown(kFALSE);
+ changeTDC->SetDown(kFALSE);
+ change2Dsurf->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_SURF);
+ }
+ // Surface scan plot
+ else if(type == 3)
+ {
+ pressedB = change2Dsurf;
+ menuID = M_ANALYSIS_HISTTYPE_SURF;
+
+ changeADC->SetDown(kFALSE);
+ changeTDC->SetDown(kFALSE);
+ changeADCTDC->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_1DTDC);
+ fMenuHisttype->UnCheckEntry(M_ANALYSIS_HISTTYPE_2D);
+ }
+
+ if( fMenuHisttype->IsEntryChecked(menuID) )
+ {
+ pressedB->SetDown(kFALSE);
+ fMenuHisttype->UnCheckEntry(menuID);
+ }
+ else if( !fMenuHisttype->IsEntryChecked(menuID) )
+ {
+ pressedB->SetDown(kTRUE);
+ fMenuHisttype->CheckEntry(menuID);
+ }
+
+ if(nrfiles > 0)
+ {
+ // Still need to add the switch!!!
+ TList *files;
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ if(type < 3)
+ DisplayHistogram( (char*)(files->At(0)->GetTitle()), type);
+ else if(type == 3)
+ MakeSurfPlot( files );
+ }
+}
+
+// Changing the histogram type to display
+void TGAppMainFrame::HistogramExport()
+{
+ unsigned int nrfiles = fileList->GetNumberOfEntries();
+ TList *files;
+ TCanvas *gCanvas = histCanvas->GetCanvas();
+
+ char exportname[256];
+ char ctemp[256];
+
+ if(nrfiles > 0)
+ {
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+ if(files)
+ {
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_SURF) ) // for the surface scan, the plot from all selected files is already created
+ {
+ remove_from_last((char*)files->At(0)->GetTitle(), '_', ctemp);
+ sprintf(exportname, "%s_surfscan.pdf", ctemp);
+ gCanvas->SaveAs(exportname);
+ }
+ else
+ {
+ for(int i = 0; i < (int)nrfiles; i++)
+ {
+ if(files->At(i))
+ {
+ remove_ext((char*)files->At(i)->GetTitle(), ctemp);
+
+ if(debug)
+ printf("Filename: %s\n", files->At(i)->GetTitle());
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) )
+ {
+ sprintf(exportname, "%s_adc%d.pdf", ctemp, (int)selectCh->GetNumber());
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 0);
+ }
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DTDC) )
+ {
+ sprintf(exportname, "%s_tdc%d.pdf", ctemp, (int)selectCh->GetNumber());
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 1);
+ }
+ else if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_2D) )
+ {
+ sprintf(exportname, "%s_adctdc%d.pdf", ctemp, (int)selectCh->GetNumber());
+ DisplayHistogram( (char*)(files->At(i)->GetTitle()), 2);
+ }
+
+ gCanvas->SaveAs(exportname);
+ }
+ }
+ }
+ }
+ }
+}
+
+//---------------------------------------------------------------
+// Main window constructor definition (& layout)
+
+TGAppMainFrame::TGAppMainFrame(const TGWindow *p, int w, int h)
+{
+ gDaq = new daq();
+ gScopeDaq = new daqscope();
+
+ // Define the main window and menubar
+ fMain = new TGMainFrame(p, w, h, kVerticalFrame); // vertical frame split into menubar and main frame
+ fMenuBar = new TGMdiMenuBar(fMain, 10, 10); // just prepare menubar, draw it with InitMenu()
+ fMain->AddFrame(fMenuBar, new TGLayoutHints(kLHintsTop | kLHintsExpandX));
+
+ // Define the main frame where opened subwindows will appear
+ fMainFrame = new TGMdiMainFrame(fMain, fMenuBar, 300, 300);
+ fMain->AddFrame(fMainFrame, new TGLayoutHints(kLHintsExpandX | kLHintsExpandY));
+
+ // Initialize the menubar the initial measurement layout subwindows and display the main window
+ InitMenu();
+ MeasurementLayout();
+ fMain->SetWindowName(WINDOW_NAME);
+ fMain->MapSubwindows();
+ fMain->MapWindow();
+ fMain->Layout();
+ GetPosition();
+ GetVoltOut();
+}
+
+//---------------------------------------------------------------
+// Event handler for menubar actions
+
+void TGAppMainFrame::HandleMenu(Int_t id)
+{
+ TList *files;
+
+ switch (id) {
+ case M_FILE_NEW:
+ // Clear any values and histogram
+ break;
+
+ case M_FILE_EXIT:
+ CloseWindow();
+ break;
+
+ case M_ANALYSIS_HISTTYPE_1DADC:
+ // Toggles the ADC button
+ ChangeHisttype(0);
+ break;
+
+ case M_ANALYSIS_HISTTYPE_1DTDC:
+ ChangeHisttype(1);
+ break;
+
+ case M_ANALYSIS_HISTTYPE_2D:
+ ChangeHisttype(2);
+ break;
+
+ case M_ANALYSIS_HISTTYPE_SURF:
+ ChangeHisttype(3);
+ break;
+
+ case M_ANALYSIS_FIT:
+ // Fit spectrum
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ if( fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC) && (files->GetSize() > 0) )
+ FitSpectrum(files, 1);
+ break;
+
+ case M_ANALYSIS_FITSEL:
+ // Fit all spectra
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ if( (fMenuHisttype->IsEntryChecked(M_ANALYSIS_HISTTYPE_1DADC)) && (files->GetSize() > 1) )
+ FitSpectrum(files, files->GetSize());
+ break;
+
+ case M_ANALYSIS_INTEGX:
+ // Integrate the current spectra
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ IntegSpectrum(files, 1);
+ break;
+
+ case M_ANALYSIS_INTEGY:
+ // Integrate the current spectra
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ IntegSpectrum(files, 2);
+ break;
+
+ case M_ANALYSIS_PHOTMU:
+ // Integrate the current spectra and calculate mean of detected photons: mu = -log(Nped/Ntot)
+ files = new TList();
+ fileList->GetSelectedEntries(files);
+
+ PhotonMu(files);
+ break;
+
+ case M_TOOLS_FIELDPOINT:
+ OpenWindow(1);
+ break;
+
+ case M_WINDOW_HOR:
+ fMainFrame->TileHorizontal();
+ break;
+
+ case M_WINDOW_VERT:
+ fMainFrame->TileVertical();
+ break;
+
+ case M_HELP_ABOUT:
+ About();
+ break;
+
+ default:
+ fMainFrame->SetCurrent(id);
+ break;
+ }
+}
+
+//---------------------------------------------------------------
+// Initialize the main window menu
+
+void TGAppMainFrame::InitMenu()
+{
+ fMenuBarItemLayout = new TGLayoutHints(kLHintsTop | kLHintsLeft, 0, 4, 0, 0);
+
+ // Popup menu in menubar for File controls
+ fMenuFile = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
+ fMenuFile->AddEntry(new TGHotString("&New Measurement"), M_FILE_NEW);
+ fMenuFile->AddSeparator();
+ fMenuFile->AddEntry(new TGHotString("E&xit"), M_FILE_EXIT);
+
+ // Popup menu in menubar for Analysis controls
+ fMenuHisttype = new TGPopupMenu(gClient->GetRoot()); // adds a cascade menu that will be incorporated into analysis controls
+ fMenuHisttype->AddEntry(new TGHotString("1D &ADC histogram"), M_ANALYSIS_HISTTYPE_1DADC);
+ fMenuHisttype->AddEntry(new TGHotString("1D &TDC histogram"), M_ANALYSIS_HISTTYPE_1DTDC);
+ fMenuHisttype->AddEntry(new TGHotString("&2D ADC vs. TDC histogram"), M_ANALYSIS_HISTTYPE_2D);
+ fMenuHisttype->AddEntry(new TGHotString("2D &surface scan plot"), M_ANALYSIS_HISTTYPE_SURF);
+
+ fMenuAnalysis = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
+ fMenuAnalysis->AddPopup(new TGHotString("&Histogram type"), fMenuHisttype);
+
+ fMenuAnalysis->AddEntry(new TGHotString("&Fit spectrum"), M_ANALYSIS_FIT);
+ fMenuAnalysis->AddEntry(new TGHotString("Fit &all selected"), M_ANALYSIS_FITSEL);
+ fMenuAnalysis->AddEntry(new TGHotString("Integrate spectrum (&X direction)"), M_ANALYSIS_INTEGX);
+ fMenuAnalysis->AddEntry(new TGHotString("Integrate spectrum (&Y direction)"), M_ANALYSIS_INTEGY);
+ fMenuAnalysis->AddEntry(new TGHotString("Relative &PDE"), M_ANALYSIS_PHOTMU);
+
+ // Popup menu in menubar for External tools
+ fMenuTools = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
+ fMenuTools->AddEntry(new TGHotString("&Fieldpoint temperature sensor"), M_TOOLS_FIELDPOINT);
+
+ // Popup menu in menubar for Window controls
+ fMenuWindow = new TGPopupMenu(gClient->GetRoot()); // adds a new popup menu to the menubar
+ fMenuWindow->AddEntry(new TGHotString("Tile &Horizontally"), M_WINDOW_HOR);
+ fMenuWindow->AddEntry(new TGHotString("Tile &Vertically"), M_WINDOW_VERT);
+ fMenuWindow->AddPopup(new TGHotString("&Windows"), fMainFrame->GetWinListMenu());
+
+ // Popup menu in menubar for Help controls
+ fMenuHelp = new TGPopupMenu(gClient->GetRoot());
+ fMenuHelp->AddEntry(new TGHotString("&About"), M_HELP_ABOUT);
+
+ // Connect all menu items with actions - handled by HandleMenu()
+ fMenuFile->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
+ fMenuAnalysis->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
+ fMenuTools->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
+ fMenuWindow->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
+ fMenuHelp->Connect("Activated(Int_t)", "TGAppMainFrame", this, "HandleMenu(Int_t)");
+
+ // Draw the created popup menus on the menubar
+ fMenuBar->AddPopup(new TGHotString("&File"), fMenuFile, fMenuBarItemLayout);
+ fMenuBar->AddPopup(new TGHotString("&Analysis"),fMenuAnalysis,fMenuBarItemLayout);
+ fMenuBar->AddPopup(new TGHotString("&Tools"),fMenuTools,fMenuBarItemLayout);
+ fMenuBar->AddPopup(new TGHotString("&Windows"),fMenuWindow,fMenuBarItemLayout);
+ fMenuBar->AddPopup(new TGHotString("&Help"), fMenuHelp, fMenuBarItemLayout);
+
+ // Disable fieldpoint if we are not connected to the IJS network
+#if IJSNET == 0
+ fMenuTools->DisableEntry(M_TOOLS_FIELDPOINT);
+#endif
+}
+
+//---------------------------------------------------------------
+// Set the measurement subwindow layout
+
+void TGAppMainFrame::MeasurementLayout()
+{
+ TGMdiFrame *mdiFrame;
+
+ // Generic horizontal and vertical frames
+ TGHorizontalFrame *fH1, *fH2, *fH3;
+ TGVerticalFrame *fV1;
+ TGGroupFrame *fG1;
+ TGLabel *lab;
+ TGCompositeFrame *fT1;
+
+ // Sizes of internal group and subwindow structures
+ int subwin[2];
+ int subgroup[2];
+
+// Settings pane ---------------------------------------------------------------------------
+ subwin[0] = (winWidth/6)-5; subwin[1] = 3*((winHeight/5)-5)-10;
+ settingsPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = settingsPane->GetMdiFrame();
+
+ // Check button to toggle voltage scan
+ voltscanOn = new TGCheckButton(mdiFrame, "Voltage scan ON/OFF");
+ voltscanOn->Resize(50,22);
+ voltscanOn->SetState(kButtonUp);
+ mdiFrame->AddFrame(voltscanOn, f0centerx);
+
+ // Check button to toggle surface scan
+ surfscanOn = new TGCheckButton(mdiFrame, "Surface scan ON/OFF");
+ surfscanOn->Resize(50,22);
+ surfscanOn->SetState(kButtonUp);
+ mdiFrame->AddFrame(surfscanOn, f0centerx);
+
+ // Check button to toggle Z direction scan
+ zscanOn = new TGCheckButton(mdiFrame, "Z-axis scan ON/OFF");
+ zscanOn->Resize(50,22);
+ zscanOn->SetState(kButtonUp);
+ mdiFrame->AddFrame(zscanOn, f0centerx);
+
+ // Check button to toggle (open) the histogram window
+// histogramOn = new TGCheckButton(mdiFrame, "Histogram display ON/OFF");
+// histogramOn->Resize(50,22);
+// histogramOn->SetState(kButtonUp);
+// mdiFrame->AddFrame(histogramOn, f0centerx);
+
+ subgroup[0] = subwin[0]-10;
+ // Hard limit for maximum voltage we can set
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Voltage limit:");
+ fH1->AddFrame(lab, f0center2d);
+ vHardlimit = new TGNumberEntry(fH1, 70.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
+ vHardlimit->Resize(80,22);
+ fH1->AddFrame(vHardlimit, f0center2d);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Number of used channels
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Nr. of channels:");
+ fH1->AddFrame(lab, f0center2d);
+ NCH = new TGNumberEntry(fH1, 1, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 1, 8);
+ NCH->Resize(40,22);
+ fH1->AddFrame(NCH, f0center2d);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Check button to toggle plots with additional information or clean plots
+ cleanOn = new TGCheckButton(mdiFrame, "Clean plots ON/OFF");
+ cleanOn->Resize(50,22);
+ cleanOn->SetState(kButtonDown);
+ cleanPlots = 1;
+ mdiFrame->AddFrame(cleanOn, f0centerx);
+
+ // Button and textbox to enter the oscilloscope IP address
+ lab = new TGLabel(mdiFrame, "Scope IP:");
+ mdiFrame->AddFrame(lab, f0);
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ oscIP = new TGTextEntry(fH1, "178.172.43.157");
+ oscIP->Resize(110,22);
+ fH1->AddFrame(oscIP, f0);
+ oscConnect = new TGTextButton(fH1, "Connect");
+ oscConnect->SetTextJustify(36);
+ oscConnect->SetWrapLength(-1);
+ oscConnect->Resize(60,22);
+ fH1->AddFrame(oscConnect, f0);
+ oscOn = 0;
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Laser settings (freq., tune, ND filter)
+ lab = new TGLabel(mdiFrame, "Laser settings:");
+ mdiFrame->AddFrame(lab, f0);
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ laserInfo = new TGTextEntry(fH1, "kHz, tune, ND");
+ fH1->AddFrame(laserInfo, f2);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Chamber temperature (will only be manually set until we can get it directly from the chamber)
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Chamber temp.:");
+ fH1->AddFrame(lab, f0center2d);
+ chtemp = new TGNumberEntry(fH1, 25.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -70., 150.);
+ chtemp->Resize(60,22);
+ fH1->AddFrame(chtemp, f0center2d);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Incidence angle (will only be manually set until we can make it motorized)
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Incid. angle:");
+ fH1->AddFrame(lab, f0center2d);
+ incangle = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -180., 180.);
+ incangle->Resize(60,22);
+ fH1->AddFrame(incangle, f0center2d);
+ mdiFrame->AddFrame(fH1, f2);
+
+ mdiFrame->SetMdiHints(kMdiMinimize);
+ mdiFrame->SetWindowName("Settings pane");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(0,0);
+// Settings pane ---------------------------------------------------------------------------
+
+// Main window -----------------------------------------------------------------------------
+ subwin[0] = 3*((winWidth/6)-5); subwin[1] = 3*((winHeight/5)-5)-10;
+ mainSubwindow = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = mainSubwindow->GetMdiFrame();
+
+ // Voltage and position tab
+ subgroup[0] = 2*subwin[0]/5-12;
+ subgroup[1] = (subwin[1]+15)/2+5;
+ setTab = new TGTab(mdiFrame, subgroup[0], subgroup[1]);
+
+ fT1 = setTab->AddTab("Voltage + Position");
+
+ fH1 = new TGHorizontalFrame(fT1, subwin[0], subgroup[1], kFixedHeight);
+ // Left pane (Bias voltage controls)
+ fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1], kFixedWidth | kFixedHeight);
+ fG1 = new TGGroupFrame(fV1, "Bias voltage controls");
+
+ // Output voltage supply channel
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Output channel:");
+ fH2->AddFrame(lab, f0center2d);
+ vOutCh = new TGComboBox(fH2, 200);
+ vOutCh->AddEntry("1", 0);
+ vOutCh->AddEntry("2", 1);
+ vOutCh->AddEntry("3", 2);
+ vOutCh->AddEntry("4", 3);
+ vOutCh->AddEntry("5", 4);
+ vOutCh->AddEntry("6", 5);
+ vOutCh->AddEntry("7", 6);
+ vOutCh->AddEntry("8", 7);
+ vOutCh->AddEntry("101", 8);
+ vOutCh->AddEntry("102", 9);
+ vOutCh->AddEntry("103", 10);
+ vOutCh->AddEntry("104", 11);
+ vOutCh->AddEntry("105", 12);
+ vOutCh->AddEntry("106", 13);
+ vOutCh->AddEntry("107", 14);
+ vOutCh->AddEntry("108", 15);
+ vOutCh->Resize(50,22);
+ vOutCh->Select(0);
+ fH2->AddFrame(vOutCh, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ // Output voltage setting
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Output voltage:");
+ fH2->AddFrame(lab, f0center2d);
+ vOut = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, 0, vHardlimit->GetNumber());
+ vOut->Resize(80,22);
+ fH2->AddFrame(vOut, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ vOutOnOff = new TGCheckButton(fH2, "Output ON/OFF");
+ vOutOnOff->Resize(subgroup[0]-10,22);
+ vOutOnOff->SetState(kButtonUp);
+ fH2->AddFrame(vOutOnOff, f0centerx);
+ fG1->AddFrame(fH2, f2);
+
+ // Set, get and reset voltage buttons
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH3 = new TGHorizontalFrame(fH2, subgroup[0], 30);
+ vOutSet = new TGTextButton(fH3, "Set");
+ vOutSet->SetTextJustify(36);
+ vOutSet->SetWrapLength(-1);
+ vOutSet->Resize(60,22);
+ fH3->AddFrame(vOutSet, f0);
+ vOutGet = new TGTextButton(fH3, "Get");
+ vOutGet->SetTextJustify(36);
+ vOutGet->SetWrapLength(-1);
+ vOutGet->Resize(60,22);
+ fH3->AddFrame(vOutGet, f0);
+ vOutReset = new TGTextButton(fH3, "Reset");
+ vOutReset->SetTextJustify(36);
+ vOutReset->SetWrapLength(-1);
+ vOutReset->Resize(60,22);
+ fH3->AddFrame(vOutReset, f0);
+ fH2->AddFrame(fH3, f0centerx);
+ fG1->AddFrame(fH2, f2);
+
+ // Voltage scan controls
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "V (min):");
+ fH2->AddFrame(lab, f0center2d);
+ vOutStart = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
+ vOutStart->Resize(80,22);
+ fH2->AddFrame(vOutStart, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "V (max):");
+ fH2->AddFrame(lab, f0center2d);
+ vOutStop = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
+ vOutStop->Resize(80,22);
+ fH2->AddFrame(vOutStop, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "V (step):");
+ fH2->AddFrame(lab, f0center2d);
+ vOutStep = new TGNumberEntry(fH2, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
+ vOutStep->Resize(80,22);
+ fH2->AddFrame(vOutStep, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fV1->AddFrame(fG1, f1);
+ // Left pane (Bias voltage controls)
+ fH1->AddFrame(fV1, f0);
+
+ // Right pane (Table position controls)
+ subgroup[0] = 3*subwin[0]/5-12;
+ fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1], kFixedWidth | kFixedHeight);
+ fG1 = new TGGroupFrame(fV1, "Table position controls");
+
+ // X, Y and Z positions
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "X:");
+ fH2->AddFrame(lab, f0center2d);
+ xPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ xPos->Resize(80,22);
+ fH2->AddFrame(xPos, f0center2d);
+
+ lab = new TGLabel(fH2, "Z (min):");
+ fH2->AddFrame(lab, f0center2d);
+ zPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
+ zPosMin->Resize(80,22);
+ fH2->AddFrame(zPosMin, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Y:");
+ fH2->AddFrame(lab, f0center2d);
+ yPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ yPos->Resize(80,22);
+ fH2->AddFrame(yPos, f0center2d);
+
+ lab = new TGLabel(fH2, "Z (max):");
+ fH2->AddFrame(lab, f0center2d);
+ zPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
+ zPosMax->Resize(80,22);
+ fH2->AddFrame(zPosMax, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0] ,30);
+ lab = new TGLabel(fH2, "Z:");
+ fH2->AddFrame(lab, f0center2d);
+ zPos = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 375000);
+ zPos->Resize(80,22);
+ fH2->AddFrame(zPos, f0center2d);
+
+ lab = new TGLabel(fH2, "Z (step):");
+ fH2->AddFrame(lab, f0center2d);
+ zPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
+ zPosStep->Resize(80,22);
+ fH2->AddFrame(zPosStep, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ // Set, Get and Home the table position
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH3 = new TGHorizontalFrame(fH2, subgroup[0], 30);
+ positionSet = new TGTextButton(fH3, "Set");
+ positionSet->SetTextJustify(36);
+ positionSet->SetWrapLength(-1);
+ positionSet->Resize(60,22);
+ fH3->AddFrame(positionSet, f0);
+ positionGet = new TGTextButton(fH3, "Get");
+ positionGet->SetTextJustify(36);
+ positionGet->SetWrapLength(-1);
+ positionGet->Resize(60,22);
+ fH3->AddFrame(positionGet, f0);
+ positionHome = new TGTextButton(fH3, "Home");
+ positionHome->SetTextJustify(36);
+ positionHome->SetWrapLength(-1);
+ positionHome->Resize(60,22);
+ fH3->AddFrame(positionHome, f0);
+ fH2->AddFrame(fH3, f0centerx);
+ fG1->AddFrame(fH2, f2);
+
+ // Position scan controls
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "X (min):");
+ fH2->AddFrame(lab, f0center2d);
+ xPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ xPosMin->Resize(80,22);
+ fH2->AddFrame(xPosMin, f0center2d);
+
+ lab = new TGLabel(fH2, "Y (min):");
+ fH2->AddFrame(lab, f0center2d);
+ yPosMin = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ yPosMin->Resize(80,22);
+ fH2->AddFrame(yPosMin, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "X (max):");
+ fH2->AddFrame(lab, f0center2d);
+ xPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ xPosMax->Resize(80,22);
+ fH2->AddFrame(xPosMax, f0center2d);
+
+ lab = new TGLabel(fH2, "Y (max):");
+ fH2->AddFrame(lab, f0center2d);
+ yPosMax = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber, TGNumberFormat::kNELLimitMinMax, -100, 215000);
+ yPosMax->Resize(80,22);
+ fH2->AddFrame(yPosMax, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "X (step):");
+ fH2->AddFrame(lab, f0center2d);
+ xPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
+ xPosStep->Resize(80,22);
+ fH2->AddFrame(xPosStep, f0center2d);
+
+ lab = new TGLabel(fH2, "Y (step):");
+ fH2->AddFrame(lab, f0center2d);
+ yPosStep = new TGNumberEntry(fH2, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
+ yPosStep->Resize(80,22);
+ fH2->AddFrame(yPosStep, f0center2d);
+ fG1->AddFrame(fH2, f2);
+
+ fV1->AddFrame(fG1, f1);
+ // Right pane (Table position controls)
+ fH1->AddFrame(fV1, f0);
+ fT1->AddFrame(fH1, f1);
+
+ // Waveform tab
+ fT1 = setTab->AddTab("Waveform analysis");
+ fH1 = new TGHorizontalFrame(fT1, subwin[0], subgroup[1], kFixedHeight);
+ subgroup[0] = 1*subwin[0]/2-12;
+ fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1]/3, kFixedWidth);
+
+ fG1 = new TGGroupFrame(fV1, "Acquisition channel");
+
+ // Selection of channels
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 100);
+ sCH[0] = new TGCheckButton(fH2, "CH1");
+ sCH[0]->Resize(50,22);
+ sCH[0]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[0], f0centerx);
+ sCH[1] = new TGCheckButton(fH2, "CH2");
+ sCH[1]->Resize(50,22);
+ sCH[1]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[1], f0centerx);
+ sCH[2] = new TGCheckButton(fH2, "CH3");
+ sCH[2]->Resize(50,22);
+ sCH[2]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[2], f0centerx);
+ sCH[3] = new TGCheckButton(fH2, "CH4");
+ sCH[3]->Resize(50,22);
+ sCH[3]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[3], f0centerx);
+ fG1->AddFrame(fH2, f0centerx);
+
+ // Selection of MATH channels
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 100);
+ sCH[4] = new TGCheckButton(fH2, "MATH1");
+ sCH[4]->Resize(50,22);
+ sCH[4]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[4], f0centerx);
+ sCH[5] = new TGCheckButton(fH2, "MATH2");
+ sCH[5]->Resize(50,22);
+ sCH[5]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[5], f0centerx);
+ sCH[6] = new TGCheckButton(fH2, "MATH3");
+ sCH[6]->Resize(50,22);
+ sCH[6]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[6], f0centerx);
+ sCH[7] = new TGCheckButton(fH2, "MATH4");
+ sCH[7]->Resize(50,22);
+ sCH[7]->SetState(kButtonUp);
+ fH2->AddFrame(sCH[7], f0centerx);
+ fG1->AddFrame(fH2, f0centerx);
+
+ fV1->AddFrame(fG1, f2);
+
+ // Selection of measurement type
+ fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Scope use type:");
+ fH2->AddFrame(lab, f0center2d);
+ sMeasType = new TGComboBox(fH2, 200);
+ sMeasType->AddEntry("No waveform analysis", 0);
+ sMeasType->AddEntry("Waveform acquisition", 1);
+ sMeasType->AddEntry("Measurement", 2);
+ sMeasType->Resize(150,22);
+ sMeasType->Select(0);
+ fH2->AddFrame(sMeasType, f0center2d);
+ fV1->AddFrame(fH2, f2);
+
+ // Link waveform analysis to CAMAC acquisition
+ sCamaclink = new TGCheckButton(fV1, "Link waveform to CAMAC acquisition");
+ sCamaclink->Resize(200,22);
+ sCamaclink->SetState(kButtonUp);
+ fV1->AddFrame(sCamaclink, f0centerx);
+
+ // Custom command interface for the scope
+ lab = new TGLabel(fV1, "Custom scope command:");
+ fV1->AddFrame(lab, new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,10,2) );
+ fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
+ scopeCommand = new TGTextEntry(fH2, "");
+ scopeCommand->Resize(subgroup[0]-45,22);
+ fH2->AddFrame(scopeCommand, f2);
+ sendScopeCustom = new TGTextButton(fH2, "Send");
+ sendScopeCustom->SetTextJustify(36);
+ sendScopeCustom->SetWrapLength(-1);
+ sendScopeCustom->Resize(80,22);
+ fH2->AddFrame(sendScopeCustom, f0centery);
+ fV1->AddFrame(fH2, f0);
+
+ // Return value for custom scope command
+ lab = new TGLabel(fV1, "Return:");
+ fV1->AddFrame(lab, new TGLayoutHints(kLHintsLeft | kLHintsTop,2,2,10,2) );
+ scopeReturn = new TGTextEntry(fV1, "");
+ scopeReturn->Resize(subgroup[0],22);
+ fV1->AddFrame(scopeReturn, f2);
+
+ fH1->AddFrame(fV1, f0);
+
+ // Wave measurement type
+ fV1 = new TGVerticalFrame(fH1, subgroup[0], subgroup[1]/3, kFixedWidth);
+ fH2 = new TGHorizontalFrame(fV1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Meas. type:");
+ fH2->AddFrame(lab, f0center2d);
+ sMeasgroup = new TGComboBox(fH2, 200);
+ for(int i = 0; i < 11; i++)
+ sMeasgroup->AddEntry(allMeasNames[i], i);
+ sMeasgroup->Resize(150,22);
+ sMeasgroup->Select(4);
+ fH2->AddFrame(sMeasgroup, f0center2d);
+ fV1->AddFrame(fH2, f2);
+
+ // Initialize current acquisition settings
+ scopeInit = new TGTextButton(fV1, "Initialize scope");
+ scopeInit->SetTextJustify(36);
+ scopeInit->SetWrapLength(-1);
+ scopeInit->Resize(80,22);
+ fV1->AddFrame(scopeInit, f0centerx);
+
+ fH1->AddFrame(fV1, f0);
+ fT1->AddFrame(fH1, f1);
+
+ mdiFrame->AddFrame(setTab, f0);
+
+ // Bottom pane (File controls)
+ subgroup[0] = subwin[0]-20;
+ subgroup[1] = subwin[1]/3-30; //2*(3*((winWidth/6)-5))/5+10;
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], subgroup[1] /*1*(3*((winWidth/6)-5))/5+15*/ , kFixedWidth | kFixedHeight);
+ fG1 = new TGGroupFrame(fH1, "Event/Data file controls");
+
+ // Number of events
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Number of events:");
+ fH2->AddFrame(lab, f0centery);
+ evtNum = new TGNumberEntry(fH2, 10000, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
+ evtNum->Resize(80,22);
+ fH2->AddFrame(evtNum, f0centery);
+ fG1->AddFrame(fH2, f2);
+
+ // Time stamp display
+ fH2 = new TGHorizontalFrame(fG1,600,200);
+ lab = new TGLabel(fH2, "Time stamp:");
+ fH2->AddFrame(lab, f0centery);
+ timeStamp = new TGTextEntry(fH2, "");
+ timeStamp->Resize(440,22);
+ timeStamp->SetState(kFALSE); // time stamp is read-only
+ fH2->AddFrame(timeStamp, f0centery);
+ fG1->AddFrame(fH2, f2);
+
+ // Save to file
+ fH2 = new TGHorizontalFrame(fG1,600,200);
+ lab = new TGLabel(fH2, "Save to file:");
+ fH2->AddFrame(lab, f0centery);
+ char *cTemp;
+ cTemp = new char[256];
+ sprintf(cTemp, "./results/test%s", histExt);
+ fileName = new TGTextEntry(fH2, cTemp);
+ delete[] cTemp;
+ fileName->Resize(400,22);
+ fileName->SetState(kFALSE);
+ fH2->AddFrame(fileName, f0centery);
+ saveFile = new TGTextButton(fH2, "...");
+ saveFile->SetTextJustify(36);
+ saveFile->SetWrapLength(-1);
+ saveFile->Resize(80,22);
+ fH2->AddFrame(saveFile, f0centery);
+// mdiFrame->AddFrame(fH2, f0);
+ fG1->AddFrame(fH2, f2);
+ fH1->AddFrame(fG1, f1);
+ // Bottom pane (File controls)
+ mdiFrame->AddFrame(fH1, f0);
+
+ subgroup[0] = subwin[0]-70;
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ fH2 = new TGHorizontalFrame(fH1, 3*subgroup[0]/4, 30, kFixedWidth);
+ measStart = new TGTextButton(fH2, "Start acquisition");
+ measStart->SetTextJustify(36);
+ measStart->SetWrapLength(-1);
+ measStart->Resize(80,22);
+ fH2->AddFrame(measStart, f0center2d);
+
+ ULong_t fcolor;
+ gClient->GetColorByName("red", fcolor);
+
+ busyLabel = new TGLabel(fH2, "Busy"); //, fTextGC->GetGC(), labelfont, kChildFrame);
+ busyLabel->SetTextJustify(36);
+ busyLabel->Resize(80,22);
+ busyLabel->Disable();
+ busyLabel->SetTextColor(fcolor);
+ fH2->AddFrame(busyLabel, f0center2d);
+
+ curProgress = new TGHProgressBar(fH2, TGProgressBar::kStandard, 150);
+ curProgress->ShowPosition();
+ curProgress->SetRange(0,100);
+ curProgress->SetBarColor("green");
+ fH2->AddFrame(curProgress, f0center2d);
+ fH1->AddFrame(fH2, f0centerx);
+ mdiFrame->AddFrame(fH1, f2);
+
+ mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize);
+ mdiFrame->SetWindowName("Main measurement window");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move((winWidth/6),0);
+// Main window -----------------------------------------------------------------------------
+
+// Histogram pane --------------------------------------------------------------------------
+ subwin[0] = 2*((winWidth/6)-5); subwin[1] = (int)(2.5*((winHeight/5)-5))-5;
+ histogramPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = histogramPane->GetMdiFrame();
+
+ histCanvas = new TRootEmbeddedCanvas("histCanvas",mdiFrame,900,900);
+ mdiFrame->AddFrame(histCanvas, f1);
+ TCanvas *gCanvas = histCanvas->GetCanvas();
+ gCanvas->SetGridx();
+ gCanvas->SetGridy();
+
+ mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize);
+ mdiFrame->SetWindowName("Histogram");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(4*((winWidth/6)-5)+10,0);
+// Histogram pane --------------------------------------------------------------------------
+
+// Histogram file selection pane -----------------------------------------------------------
+ subwin[0] = 4*((winWidth/6)-5); subwin[1] = 2*((winHeight/5)-5)+15;
+ histogramPaneFile = new TGMdiSubwindow(fMainFrame, subwin[0]+5, subwin[1]);
+ mdiFrame = histogramPaneFile->GetMdiFrame();
+
+ // Open browser for file selection
+ subgroup[0] = subwin[0]-10;
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ lab = new TGLabel(fH1, "File selection:");
+ fH1->AddFrame(lab, f0centery);
+
+ selectDir = new TGTextButton(fH1, "...");
+ selectDir->SetTextJustify(36);
+ selectDir->SetWrapLength(-1);
+ selectDir->Resize(80,22);
+ fH1->AddFrame(selectDir, f0centery);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // List view of the opened files
+ fileList = new TGListBox(mdiFrame,1);
+ fileList->GetVScrollbar();
+ fileList->Resize(300, (3*subwin[1]/7)-10 );
+ mdiFrame->AddFrame(fileList, f2);
+
+ // Multiple file selection toggle, previous/next controls, clear list and edit header
+ fH1 = new TGHorizontalFrame(mdiFrame, subgroup[0], 30);
+ multiSelect = new TGCheckButton(fH1, "Multiple file select");
+ multiSelect->Resize(50,22);
+ multiSelect->SetState(kButtonUp);
+ fH1->AddFrame(multiSelect, f0);
+
+ multiSelectAll = new TGCheckButton(fH1, "Select all listed files");
+ multiSelectAll->Resize(50,22);
+ multiSelectAll->SetState(kButtonUp);
+ fH1->AddFrame(multiSelectAll, f0);
+
+ TGTextButton *clearList = new TGTextButton(fH1, "Clear list");
+ clearList->SetTextJustify(36);
+ clearList->SetWrapLength(-1);
+ clearList->Resize(80,22);
+ fH1->AddFrame(clearList, f0right);
+
+ TGTextButton *editHeader = new TGTextButton(fH1, "Edit header");
+ editHeader->SetTextJustify(36);
+ editHeader->SetWrapLength(-1);
+ editHeader->Resize(80,22);
+ fH1->AddFrame(editHeader, f0right);
+
+ nextFile = new TGTextButton(fH1, ">>");
+ nextFile->SetTextJustify(36);
+ nextFile->SetWrapLength(-1);
+ nextFile->Resize(80,22);
+ fH1->AddFrame(nextFile, f0right);
+
+ prevFile = new TGTextButton(fH1, "<<");
+ prevFile->SetTextJustify(36);
+ prevFile->SetWrapLength(-1);
+ prevFile->Resize(80,22);
+ fH1->AddFrame(prevFile, f0right);
+ mdiFrame->AddFrame(fH1, f2);
+
+ // Header information of opened file
+ fG1 = new TGGroupFrame(mdiFrame, "Opened file header information");
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Time:");
+ fH1->AddFrame(lab, f0centery);
+ disptime = new TGTextEntry(fH1, "");
+ disptime->Resize(440,22);
+ disptime->SetState(kFALSE);
+ fH1->AddFrame(disptime, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Bias voltage:");
+ fH1->AddFrame(lab, f0centery);
+ dispbias = new TGNumberEntry(fH1, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEAAnyNumber);
+ dispbias->Resize(80,22);
+ dispbias->SetState(kFALSE);
+ fH1->AddFrame(dispbias, f0centery);
+
+ lab = new TGLabel(fH1, "Position:");
+ fH1->AddFrame(lab, f0centery);
+ disppos = new TGTextEntry(fH1, "");
+ disppos->Resize(200,22);
+ disppos->SetState(kFALSE);
+ fH1->AddFrame(disppos, f0centery);
+
+ lab = new TGLabel(fH1, "Temperature:");
+ fH1->AddFrame(lab, f0centery);
+ disptemp = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ disptemp->Resize(80,22);
+ disptemp->SetState(kFALSE);
+ fH1->AddFrame(disptemp, f0centery);
+
+ lab = new TGLabel(fH1, "Angle:");
+ fH1->AddFrame(lab, f0centery);
+ dispangle = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ dispangle->Resize(80,22);
+ dispangle->SetState(kFALSE);
+ fH1->AddFrame(dispangle, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Laser settings:");
+ fH1->AddFrame(lab, f0centery);
+ displaser = new TGTextEntry(fH1, "");
+ displaser->Resize(440,22);
+ displaser->SetState(kFALSE);
+ fH1->AddFrame(displaser, f0centery);
+ fG1->AddFrame(fH1, f2);
+ mdiFrame->AddFrame(fG1, f2);
+
+ mdiFrame->SetMdiHints(kMdiMinimize);
+ mdiFrame->SetWindowName("Histogram file selection");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(0,3*((winHeight/5)-5)-5);
+// Histogram file selection pane -----------------------------------------------------------
+
+// Histogram controls pane -----------------------------------------------------------------
+ subwin[0] = 2*((winWidth/6)-5); subwin[1] = (int)(2.5*((winHeight/5)-5))+10;
+ histogramPaneCtr = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = histogramPaneCtr->GetMdiFrame();
+
+ // Control for histogram X range
+ subgroup[0] = subwin[0]-6;
+ fG1 = new TGGroupFrame(mdiFrame, "Histogram display");
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "ADC range (min, max):");
+ fH1->AddFrame(lab, f0centery);
+ adcMinRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
+ adcMinRange->Resize(80,22);
+ fH1->AddFrame(adcMinRange, f0centery);
+ adcMaxRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
+ adcMaxRange->Resize(80,22);
+ fH1->AddFrame(adcMaxRange, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ // TDC window for getting data
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "TDC range (min, max):");
+ fH1->AddFrame(lab, f0centery);
+ tdcMinwindow = new TGNumberEntry(fH1, 0.0, 6, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEAAnyNumber);
+ tdcMinwindow->Resize(80,22);
+ fH1->AddFrame(tdcMinwindow, f0centery);
+ tdcMaxwindow = new TGNumberEntry(fH1, 221.8, 6, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEAAnyNumber);
+ tdcMaxwindow->Resize(80,22);
+ fH1->AddFrame(tdcMaxwindow, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ // Y axis range settings
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Y range (min, max):");
+ fH1->AddFrame(lab, f0centery);
+ yMinRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ yMinRange->Resize(80,22);
+ fH1->AddFrame(yMinRange, f0centery);
+ yMaxRange = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ yMaxRange->Resize(80,22);
+ fH1->AddFrame(yMaxRange, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ // Select the channel to display
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Display channel:");
+ fH1->AddFrame(lab, f0centery);
+ selectCh = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 0, (NCH->GetNumber())-1);
+ selectCh->Resize(40,22);
+ fH1->AddFrame(selectCh, f0centery);
+
+ changeADC = new TGTextButton(fH1, "ADC");
+ changeADC->AllowStayDown(kTRUE);
+ changeADC->SetDown(kTRUE);
+ fMenuHisttype->CheckEntry(M_ANALYSIS_HISTTYPE_1DADC);
+ changeADC->SetTextJustify(36);
+ changeADC->SetWrapLength(-1);
+ changeADC->Resize(60,22);
+ fH1->AddFrame(changeADC, f0centery);
+
+ changeTDC = new TGTextButton(fH1, "TDC");
+ changeTDC->AllowStayDown(kTRUE);
+ changeTDC->SetTextJustify(36);
+ changeTDC->SetWrapLength(-1);
+ changeTDC->Resize(60,22);
+ fH1->AddFrame(changeTDC, f0centery);
+
+ changeADCTDC = new TGTextButton(fH1, "ADC/TDC");
+ changeADCTDC->AllowStayDown(kTRUE);
+ changeADCTDC->SetTextJustify(36);
+ changeADCTDC->SetWrapLength(-1);
+ changeADCTDC->Resize(60,22);
+ fH1->AddFrame(changeADCTDC, f0centery);
+
+ change2Dsurf = new TGTextButton(fH1, "Surf 2D");
+ change2Dsurf->AllowStayDown(kTRUE);
+ change2Dsurf->SetTextJustify(36);
+ change2Dsurf->SetWrapLength(-1);
+ change2Dsurf->Resize(60,22);
+ fH1->AddFrame(change2Dsurf, f0);
+ fG1->AddFrame(fH1, f2);
+
+ logscale = new TGCheckButton(fG1, "Logarithmic scale ON/OFF");
+ logscale->Resize(50,22);
+ logscale->SetState(kButtonUp);
+ fG1->AddFrame(logscale, f0centerx);
+
+ // Export the selected files
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 100);
+ fH2 = new TGHorizontalFrame(fH1, subgroup[0], 100);
+ lab = new TGLabel(fH2, "Export selected histograms:");
+ fH2->AddFrame(lab, f0centery);
+
+ exportHist = new TGTextButton(fH2, "Export");
+ exportHist->SetTextJustify(36);
+ exportHist->SetWrapLength(-1);
+ exportHist->Resize(80,22);
+ fH2->AddFrame(exportHist, f0centery);
+ fH1->AddFrame(fH2, f0centerx);
+ fG1->AddFrame(fH1, f2);
+ mdiFrame->AddFrame(fG1, f2);
+
+ // Fitting controls for ADC spectrum
+ fG1 = new TGGroupFrame(mdiFrame, "Fit Settings");
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Peak sigma:");
+ fH2->AddFrame(lab, f0centery);
+ fitSigma = new TGNumberEntry(fH2, 1.2, 3, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEANonNegative);
+ fitSigma->Resize(60,22);
+ fH2->AddFrame(fitSigma, f0centery);
+
+ lab = new TGLabel(fH2, " Signal/Noise treshold:");
+ fH2->AddFrame(lab, f0centery);
+ fitTresh = new TGNumberEntry(fH2, 5.0E-3, 3, 999, TGNumberFormat::kNESReal, TGNumberFormat::kNEANonNegative);
+ fitTresh->Resize(60,22);
+ fH2->AddFrame(fitTresh, f0centery);
+ fH1->AddFrame(fH2, f0centerx);
+ fG1->AddFrame(fH1, f2);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Background interpolation:");
+ fH2->AddFrame(lab, f0centery);
+ fitInter = new TGNumberEntry(fH2, 7, 3, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative);
+ fitInter->Resize(60,22);
+ fH2->AddFrame(fitInter, f0centery);
+ fH1->AddFrame(fH2, f0centerx);
+ fG1->AddFrame(fH1, f2);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Peak fit max. acceptable error:");
+ fH2->AddFrame(lab, f0centery);
+ accError = new TGNumberEntry(fH2, 0.15, 3, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEANonNegative);
+ accError->Resize(60,22);
+ fH2->AddFrame(accError, f0centery);
+ fH1->AddFrame(fH2, f0centerx);
+ fG1->AddFrame(fH1, f2);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH2 = new TGHorizontalFrame(fH1, subgroup[0], 30);
+ lab = new TGLabel(fH2, "Peak min. limit:");
+ fH2->AddFrame(lab, f0centery);
+ minPeak = new TGNumberEntry(fH2, 4, 3, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEANonNegative, TGNumberFormat::kNELLimitMinMax, 2, 20);
+ minPeak->Resize(50,22);
+ fH2->AddFrame(minPeak, f0centery);
+
+ lab = new TGLabel(fH2, " Pedestal lower limit:");
+ fH2->AddFrame(lab, f0centery);
+ pedesLow = new TGNumberEntry(fH2, 0.00, 3, 999, TGNumberFormat::kNESRealTwo, TGNumberFormat::kNEANonNegative);
+ pedesLow->Resize(60,22);
+ fH2->AddFrame(pedesLow, f0centery);
+ fH1->AddFrame(fH2, f0centerx);
+ fG1->AddFrame(fH1, f2);
+
+ exfitplots = new TGCheckButton(fG1, "Export fitting plots ON/OFF");
+ exfitplots->Resize(50,22);
+ exfitplots->SetState(kButtonUp);
+ fG1->AddFrame(exfitplots, f0centerx);
+ mdiFrame->AddFrame(fG1, f2);
+
+ mdiFrame->SetMdiHints(kMdiMinimize);
+ mdiFrame->SetWindowName("Histogram controls");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(4*((winWidth/6)-5)+10,(int)(2.5*((winHeight/5)-5)));
+// Histogram controls pane -----------------------------------------------------------------
+
+ // Action connections
+ voltscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableVoltScan()");
+ surfscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableSurfScan()");
+ zscanOn->Connect("Clicked()", "TGAppMainFrame", this, "EnableZaxisScan()");
+// histogramOn->Connect("Clicked()", "TGAppMainFrame", this, "HistogramToggle()");
+ vHardlimit->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "VoltageLimit()");
+ (vHardlimit->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "VoltageLimit()");
+ NCH->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "ChannelLimit()");
+ (NCH->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "ChannelLimit()");
+ cleanOn->Connect("Clicked()", "TGAppMainFrame", this, "CleanPlotToggle()");
+ oscConnect->Connect("Clicked()", "TGAppMainFrame", this, "ConnectToScope()");
+ vOutSet->Connect("Clicked()", "TGAppMainFrame", this, "SetVoltOut()");
+ vOutGet->Connect("Clicked()", "TGAppMainFrame", this, "GetVoltOut()");
+ vOutReset->Connect("Clicked()", "TGAppMainFrame", this, "ResetVoltOut()");
+ positionSet->Connect("Clicked()", "TGAppMainFrame", this, "SetPosition()");
+ positionGet->Connect("Clicked()", "TGAppMainFrame", this, "GetPosition()");
+ positionHome->Connect("Clicked()", "TGAppMainFrame", this, "HomePosition()");
+ saveFile->Connect("Clicked()", "TGAppMainFrame", this, "SaveFile()");
+ measStart->Connect("Clicked()", "TGAppMainFrame", this, "StartAcq()");
+ selectDir->Connect("Clicked()", "TGAppMainFrame", this, "SelectDirectory()");
+ multiSelect->Connect("Clicked()", "TGAppMainFrame", this, "ListMultiSelect()");
+ multiSelectAll->Connect("Clicked()", "TGAppMainFrame", this, "ListSelectAll()");
+ editHeader->Connect("Clicked()", "TGAppMainFrame", this, "HeaderEdit()");
+ prevFile->Connect("Clicked()", "TGAppMainFrame", this, "FileListNavigation(=-2)");
+ nextFile->Connect("Clicked()", "TGAppMainFrame", this, "FileListNavigation(=-3)");
+ fileList->Connect("DoubleClicked(Int_t)", "TGAppMainFrame", this, "FileListNavigation(Int_t)");
+ clearList->Connect("Clicked()", "TGListBox", fileList, "RemoveAll()");
+
+ adcMinRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (adcMinRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ adcMaxRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (adcMaxRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ yMinRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (yMinRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ yMaxRange->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (yMaxRange->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ tdcMinwindow->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (tdcMinwindow->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ tdcMaxwindow->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "SetHistRange()");
+ (tdcMaxwindow->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "SetHistRange()");
+ changeADC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=0)");
+ changeTDC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=1)");
+ changeADCTDC->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=2)");
+ change2Dsurf->Connect("Clicked()", "TGAppMainFrame", this, "ChangeHisttype(=3)");
+ selectCh->Connect("ValueSet(Long_t)", "TGAppMainFrame", this, "ChangeChannel()");
+ (selectCh->GetNumberEntry())->Connect("ReturnPressed()", "TGAppMainFrame", this, "ChangeChannel()");
+ logscale->Connect("Clicked()", "TGAppMainFrame", this, "SetHistRange()");
+ exportHist->Connect("Clicked()", "TGAppMainFrame", this, "HistogramExport()");
+
+ scopeInit->Connect("Clicked()", "TGAppMainFrame", this, "InitializeScope()");
+ sendScopeCustom->Connect("Clicked()", "TGAppMainFrame", this, "CustomScopeCommand()");
+ sMeasType->Connect("Selected(Int_t)", "TGAppMainFrame", this, "SelectedMeasType(Int_t)");
+
+ started = kFALSE;
+
+ for(int i = 0; i < 8; i++) sCH[i]->SetEnabled(kFALSE);
+ sMeasType->SetEnabled(kFALSE);
+ sCamaclink->SetEnabled(kFALSE);
+ scopeCommand->SetEnabled(kFALSE);
+ sendScopeCustom->SetEnabled(kFALSE);
+ sMeasgroup->SetEnabled(kFALSE);
+ scopeInit->SetEnabled(kFALSE);
+
+ EnableVoltScan();
+ EnableSurfScan();
+ EnableZaxisScan();
+
+ // Testing canvas for scope waveforms
+ wCanvas = new TCanvas("wCanvas", "Waveform canvas", 600, 300);
+}
+
+//---------------------------------------------------------------
+// Opening a new subwindow
+
+void TGAppMainFrame::OpenWindow(int winid)
+{
+ /* WinID:
+ * - 1 = fieldpoint temperature sensor
+ * - 2 = file header editor
+ */
+
+ TGMdiFrame *mdiFrame;
+
+ // Generic horizontal and vertical frames
+ TGHorizontalFrame *fH1, *fH2;
+ TGGroupFrame *fG1;
+ TGLabel *lab;
+
+ int subwin[2];
+ int subgroup[2];
+
+ char ctemp[256];
+
+// Fieldpoint pane -------------------------------------------------------------------------
+ if(winid == 1)
+ {
+ time_t rtime;
+ int yearrange[2];
+
+ subwin[0] = 3*((winWidth/4)-5); subwin[1] = (int)(2*((winHeight/3)-5))+10;
+ fieldpointPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = fieldpointPane->GetMdiFrame();
+
+ subgroup[0] = subwin[0]-10;
+ subgroup[1] = 7*subwin[1]/12;
+
+ // Display canvas for temperature sensor
+ displayCanvas = new TRootEmbeddedCanvas("displayCanvas",mdiFrame,subgroup[0],subgroup[1]);
+ mdiFrame->AddFrame(displayCanvas, f0centerx);
+ TCanvas *gCanvas = displayCanvas->GetCanvas();
+ gCanvas->SetGridx();
+ gCanvas->SetGridy();
+
+ fG1 = new TGGroupFrame(mdiFrame, "Temperature sensor settings");
+ // Channel selector
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ lab = new TGLabel(fH1, "Fieldpoint channel:");
+ fH1->AddFrame(lab, f0centery);
+ tempCh = new TGComboBox(fH1, 200);
+ tempCh->AddEntry("0", 0);
+ tempCh->AddEntry("1", 1);
+ tempCh->AddEntry("2", 2);
+ tempCh->AddEntry("3", 3);
+ tempCh->AddEntry("4", 4);
+ tempCh->AddEntry("5", 5);
+ tempCh->AddEntry("6", 6);
+ tempCh->AddEntry("7", 7);
+ tempCh->Resize(50,22);
+ tempCh->Select(1);
+ fH1->AddFrame(tempCh, f0centery);
+ fG1->AddFrame(fH1, f2);
+
+ // Start and stop time ------------------------
+ time(&rtime);
+
+ lab = new TGLabel(fG1, "Start time:");
+ fG1->AddFrame(lab, f0);
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ // Start day
+ lab = new TGLabel(fH1, "\tDay: ");
+ fH1->AddFrame(lab, f0centery);
+ tempDay[0] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 31; i++)
+ {
+ sprintf(ctemp, "%d", i+1);
+ tempDay[0]->AddEntry(ctemp, i);
+ }
+ tempDay[0]->Resize(50,22);
+ tempDay[0]->Select((int)(localtime(&rtime))->tm_mday-1);
+ fH1->AddFrame(tempDay[0], f0centery);
+
+ // Start month
+ lab = new TGLabel(fH1, " Month: ");
+ fH1->AddFrame(lab, f0centery);
+ tempMonth[0] = new TGComboBox(fH1, 200);
+ tempMonth[0]->AddEntry("January", 0);
+ tempMonth[0]->AddEntry("February", 1);
+ tempMonth[0]->AddEntry("March", 2);
+ tempMonth[0]->AddEntry("April", 3);
+ tempMonth[0]->AddEntry("May", 4);
+ tempMonth[0]->AddEntry("June", 5);
+ tempMonth[0]->AddEntry("July", 6);
+ tempMonth[0]->AddEntry("August", 7);
+ tempMonth[0]->AddEntry("September", 8);
+ tempMonth[0]->AddEntry("October", 9);
+ tempMonth[0]->AddEntry("November", 10);
+ tempMonth[0]->AddEntry("December", 11);
+ tempMonth[0]->Resize(80,22);
+ tempMonth[0]->Select((int)(localtime(&rtime))->tm_mon);
+ fH1->AddFrame(tempMonth[0], f0centery);
+
+ // Start year
+ yearrange[0] = 2010;
+ yearrange[1] = (int)(localtime(&rtime))->tm_year+1900;
+
+ lab = new TGLabel(fH1, " Year: ");
+ fH1->AddFrame(lab, f0centery);
+ tempYear[0] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < (yearrange[1]-yearrange[0])+1; i++)
+ {
+ sprintf(ctemp, "%d", yearrange[1]-i);
+ tempYear[0]->AddEntry(ctemp, i);
+ }
+ tempYear[0]->Resize(60,22);
+ tempYear[0]->Select(0);
+ fH1->AddFrame(tempYear[0], f0centery);
+
+ // Start hour
+ lab = new TGLabel(fH1, " Hour: ");
+ fH1->AddFrame(lab, f0centery);
+ tempHour[0] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 24; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempHour[0]->AddEntry(ctemp, i);
+ }
+ tempHour[0]->Resize(50,22);
+ tempHour[0]->Select(7);
+ fH1->AddFrame(tempHour[0], f0centery);
+
+ // Start minute
+ lab = new TGLabel(fH1, " Minute: ");
+ fH1->AddFrame(lab, f0centery);
+ tempMinute[0] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 60; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempMinute[0]->AddEntry(ctemp, i);
+ }
+ tempMinute[0]->Resize(50,22);
+ tempMinute[0]->Select(0);
+ fH1->AddFrame(tempMinute[0], f0centery);
+
+ // Start second
+ lab = new TGLabel(fH1, " Second: ");
+ fH1->AddFrame(lab, f0centery);
+ tempSecond[0] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 60; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempSecond[0]->AddEntry(ctemp, i);
+ }
+ tempSecond[0]->Resize(50,22);
+ tempSecond[0]->Select(0);
+ fH1->AddFrame(tempSecond[0], f0centery);
+
+ // Get start time from file
+ lab = new TGLabel(fH1, " ");
+ fH1->AddFrame(lab, f0centery);
+ tempFile[0] = new TGTextButton(fH1, "Get from file...");
+ tempFile[0]->SetTextJustify(36);
+ tempFile[0]->SetWrapLength(-1);
+ tempFile[0]->Resize(100,22);
+ fH1->AddFrame(tempFile[0], f0centery);
+
+ fG1->AddFrame(fH1, f2);
+
+ // Use the end time or not
+ tempEndOn = new TGCheckButton(fG1, "Draw to last time point (ON/OFF)");
+ tempEndOn->Resize(100,22);
+ tempEndOn->SetState(kButtonUp);
+ fG1->AddFrame(tempEndOn, f0);
+
+ lab = new TGLabel(fG1, "End time:");
+ fG1->AddFrame(lab, f0);
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ // End day
+ lab = new TGLabel(fH1, "\tDay: ");
+ fH1->AddFrame(lab, f0centery);
+ tempDay[1] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 31; i++)
+ {
+ sprintf(ctemp, "%d", i+1);
+ tempDay[1]->AddEntry(ctemp, i);
+ }
+ tempDay[1]->Resize(50,22);
+ tempDay[1]->Select((int)(localtime(&rtime))->tm_mday-1);
+ fH1->AddFrame(tempDay[1], f0centery);
+
+ // End month
+ lab = new TGLabel(fH1, " Month: ");
+ fH1->AddFrame(lab, f0centery);
+ tempMonth[1] = new TGComboBox(fH1, 200);
+ tempMonth[1]->AddEntry("January", 0);
+ tempMonth[1]->AddEntry("February", 1);
+ tempMonth[1]->AddEntry("March", 2);
+ tempMonth[1]->AddEntry("April", 3);
+ tempMonth[1]->AddEntry("May", 4);
+ tempMonth[1]->AddEntry("June", 5);
+ tempMonth[1]->AddEntry("July", 6);
+ tempMonth[1]->AddEntry("August", 7);
+ tempMonth[1]->AddEntry("September", 8);
+ tempMonth[1]->AddEntry("October", 9);
+ tempMonth[1]->AddEntry("November", 10);
+ tempMonth[1]->AddEntry("December", 11);
+ tempMonth[1]->Resize(80,22);
+ tempMonth[1]->Select((int)(localtime(&rtime))->tm_mon);
+ fH1->AddFrame(tempMonth[1], f0centery);
+
+ // End year
+ time(&rtime);
+ yearrange[0] = 2010;
+ yearrange[1] = (int)(localtime(&rtime))->tm_year+1900;
+
+ lab = new TGLabel(fH1, " Year: ");
+ fH1->AddFrame(lab, f0centery);
+ tempYear[1] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < (yearrange[1]-yearrange[0])+1; i++)
+ {
+ sprintf(ctemp, "%d", yearrange[1]-i);
+ tempYear[1]->AddEntry(ctemp, i);
+ }
+ tempYear[1]->Resize(60,22);
+ tempYear[1]->Select(0);
+ fH1->AddFrame(tempYear[1], f0centery);
+
+ // End hour
+ lab = new TGLabel(fH1, " Hour: ");
+ fH1->AddFrame(lab, f0centery);
+ tempHour[1] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 24; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempHour[1]->AddEntry(ctemp, i);
+ }
+ tempHour[1]->Resize(50,22);
+ tempHour[1]->Select(18);
+ fH1->AddFrame(tempHour[1], f0centery);
+
+ // End minute
+ lab = new TGLabel(fH1, " Minute: ");
+ fH1->AddFrame(lab, f0centery);
+ tempMinute[1] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 60; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempMinute[1]->AddEntry(ctemp, i);
+ }
+ tempMinute[1]->Resize(50,22);
+ tempMinute[1]->Select(0);
+ fH1->AddFrame(tempMinute[1], f0centery);
+
+ // End second
+ lab = new TGLabel(fH1, " Second: ");
+ fH1->AddFrame(lab, f0centery);
+ tempSecond[1] = new TGComboBox(fH1, 200);
+ for(int i = 0; i < 60; i++)
+ {
+ if(i < 10)
+ sprintf(ctemp, "0%d", i);
+ else
+ sprintf(ctemp, "%d", i);
+ tempSecond[1]->AddEntry(ctemp, i);
+ }
+ tempSecond[1]->Resize(50,22);
+ tempSecond[1]->Select(0);
+ fH1->AddFrame(tempSecond[1], f0centery);
+
+ // Get start time from file
+ lab = new TGLabel(fH1, " ");
+ fH1->AddFrame(lab, f0centery);
+ tempFile[1] = new TGTextButton(fH1, "Get from file...");
+ tempFile[1]->SetTextJustify(36);
+ tempFile[1]->SetWrapLength(-1);
+ tempFile[1]->Resize(100,22);
+ fH1->AddFrame(tempFile[1], f0centery);
+
+ fG1->AddFrame(fH1, f2);
+ // Start and stop time ------------------------
+
+ // Control buttons
+ fH2 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ fH1 = new TGHorizontalFrame(fH2, subgroup[0], 30);
+ updateTemp = new TGTextButton(fH1, "Update");
+ updateTemp->SetTextJustify(36);
+ updateTemp->SetWrapLength(-1);
+ updateTemp->Resize(80,22);
+ fH1->AddFrame(updateTemp, f0);
+
+ exportTemp = new TGTextButton(fH1, "Export");
+ exportTemp->SetTextJustify(36);
+ exportTemp->SetWrapLength(-1);
+ exportTemp->Resize(80,22);
+ fH1->AddFrame(exportTemp, f0);
+
+/* closeTemp = new TGTextButton(fH1, "Close");
+ closeTemp->SetTextJustify(36);
+ closeTemp->SetWrapLength(-1);
+ closeTemp->Resize(80,22);
+ fH1->AddFrame(closeTemp, f0);*/
+ fH2->AddFrame(fH1, f0centerx);
+
+ fG1->AddFrame(fH2, f2);
+
+ mdiFrame->AddFrame(fG1, f1);
+
+ mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize | kMdiClose);
+ mdiFrame->SetWindowName("Fieldpoint FP RTD 122 temperature sensor");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(1*((winWidth/12)-5)+10,(int)(1*((winHeight/12)-5)));
+
+ // Action connections
+ updateTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
+ tempEndOn->Connect("Clicked()", "TGAppMainFrame", this, "TempEndToggle()");
+ exportTemp->Connect("Clicked()", "TGAppMainFrame", this, "ExportTempPlot()");
+ tempFile[0]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=0)");
+ tempFile[1]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=1)");
+// closeTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
+ }
+// Fieldpoint pane -------------------------------------------------------------------------
+//
+// Header editor pane ----------------------------------------------------------------------
+ else if(winid == 2)
+ {
+ subwin[0] = 12*((winWidth/16)-5); subwin[1] = (int)(1*((winHeight/3)-10));
+ headerPane = new TGMdiSubwindow(fMainFrame, subwin[0], subwin[1]);
+ mdiFrame = headerPane->GetMdiFrame();
+
+ subgroup[0] = subwin[0]-10;
+ subgroup[1] = 7*subwin[1]/12;
+
+ // Changing header info (no timestamp change possible)
+ fG1 = new TGGroupFrame(mdiFrame, "Header edit information");
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ biasedittick = new TGCheckButton(fH1, "Bias voltage edit: ");
+ biasedittick->Resize(80,22);
+ biasedittick->SetState(kButtonUp);
+ fH1->AddFrame(biasedittick, f0centerx);
+ biasedit = new TGNumberEntry(fH1, 0.00, 4, 999, TGNumberFormat::kNESRealThree, TGNumberFormat::kNEANonNegative);
+ biasedit->Resize(80,22);
+ biasedit->SetState(kFALSE);
+ fH1->AddFrame(biasedit, f0centery);
+ fG1->AddFrame(fH1, f0);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ posedittick = new TGCheckButton(fH1, "Table position edit (X, Y, Z): ");
+ posedittick->Resize(80,22);
+ posedittick->SetState(kButtonUp);
+ fH1->AddFrame(posedittick, f0centerx);
+ for(int i = 0; i < 3; i++)
+ {
+ posedit[i] = new TGNumberEntry(fH1, 0, 6, 999, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAAnyNumber);
+ posedit[i]->Resize(80,22);
+ posedit[i]->SetState(kFALSE);
+ fH1->AddFrame(posedit[i], f0centery);
+ }
+ fG1->AddFrame(fH1, f0);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ tempedittick = new TGCheckButton(fH1, "Chamber temperature edit: ");
+ tempedittick->Resize(80,22);
+ tempedittick->SetState(kButtonUp);
+ fH1->AddFrame(tempedittick, f0centerx);
+ tempedit = new TGNumberEntry(fH1, 0.00, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ tempedit->Resize(80,22);
+ tempedit->SetState(kFALSE);
+ fH1->AddFrame(tempedit, f0centery);
+ fG1->AddFrame(fH1, f0);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ angleedittick = new TGCheckButton(fH1, "Incidence angle edit: ");
+ angleedittick->Resize(80,22);
+ angleedittick->SetState(kButtonUp);
+ fH1->AddFrame(angleedittick, f0centerx);
+ angleedit = new TGNumberEntry(fH1, 0.00, 6, 999, TGNumberFormat::kNESRealOne, TGNumberFormat::kNEAAnyNumber);
+ angleedit->Resize(80,22);
+ angleedit->SetState(kFALSE);
+ fH1->AddFrame(angleedit, f0centery);
+ fG1->AddFrame(fH1, f0);
+
+ fH1 = new TGHorizontalFrame(fG1, subgroup[0], 30);
+ laseredittick = new TGCheckButton(fH1, "Laser settings edit: ");
+ laseredittick->Resize(80,22);
+ laseredittick->SetState(kButtonUp);
+ fH1->AddFrame(laseredittick, f0centerx);
+ laseredit = new TGTextEntry(fH1, "");
+ laseredit->Resize(440,22);
+ laseredit->SetState(kFALSE);
+ fH1->AddFrame(laseredit, f0centery);
+ fG1->AddFrame(fH1, f0);
+
+ ULong_t fcolor;
+ gClient->GetColorByName("red", fcolor);
+
+ lab = new TGLabel(fG1, "Note: Tick checkbox in front of each header information you wish to change (for security, they are unticked by default).");
+ fG1->AddFrame(lab, f0centerx);
+ lab = new TGLabel(fG1, "Warning: Using button \"Edit header\" will edit headers in all files currently selected in the Histogram file selection window.");
+ lab->SetTextColor(fcolor);
+ fG1->AddFrame(lab, f0centerx);
+
+ mdiFrame->AddFrame(fG1, f2);
+
+ editHead = new TGTextButton(mdiFrame, "Edit header");
+ editHead->SetTextJustify(36);
+ editHead->SetWrapLength(-1);
+ editHead->Resize(80,22);
+ mdiFrame->AddFrame(editHead, f0centerx);
+
+ mdiFrame->SetMdiHints(kMdiMinimize | kMdiMaximize | kMdiClose);
+ mdiFrame->SetWindowName("Edit datafile header");
+ mdiFrame->MapSubwindows();
+ mdiFrame->Layout();
+ mdiFrame->Move(1*((winWidth/12)-5)-30,(int)(1*((winHeight/12)-5)));
+
+ // Action connections
+ biasedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=1)");
+ posedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=2)");
+ tempedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=3)");
+ angleedittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=4)");
+ laseredittick->Connect("Clicked()", "TGAppMainFrame", this, "EditTickToggle(=5)");
+ editHead->Connect("Clicked()", "TGAppMainFrame", this, "headeredit()");
+/* updateTemp->Connect("Clicked()", "TGAppMainFrame", this, "UpdateTempPlot()");
+ tempEndOn->Connect("Clicked()", "TGAppMainFrame", this, "TempEndToggle()");
+ exportTemp->Connect("Clicked()", "TGAppMainFrame", this, "ExportTempPlot()");
+ tempFile[0]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=0)");
+ tempFile[1]->Connect("Clicked()", "TGAppMainFrame", this, "GetTempFile(=1)");
+*/ }
+// Header editor pane ----------------------------------------------------------------------
+//
+ else
+ printf("Window not implemented yet.\n");
+}
+
+//---------------------------------------------------------------
+// Closing the main application window and checking the about information
+
+void TGAppMainFrame::CloseWindow()
+{
+ gApplication->Terminate(0);
+}
+
+Bool_t TGAppMainFrame::About()
+{
+ int ret = 0;
+
+ new TGMsgBox(gClient->GetRoot(), fMain,
+ fMain->GetWindowName(), "This is an application.",
+ kMBIconQuestion, kMBClose, &ret);
+
+ if(debug == 1)
+ if(ret == kMBClose)
+ printf("Closing the About window (%d).\n", ret);
+
+ return kFALSE;
+}
+
+//---------------------------------------------------------------
+// Subwindow constructor definition (& layout) and close subwindow action
+
+TGMdiSubwindow::TGMdiSubwindow(TGMdiMainFrame *main, int w, int h)
+{
+ // Create a new subwindow
+ fMdiFrame = new TGMdiFrame(main, w, h);
+ fMdiFrame->Connect("CloseWindow()", "TGMdiSubwindow", this, "CloseWindow()"); // setting here to =0 -> will always ask before closing window
+ fMdiFrame->DontCallClose(); // only let this window close if Yes is pressed when closing window
+
+}
+
+Bool_t TGMdiSubwindow::CloseWindow()
+{
+/* int ret = 0;
+
+ new TGMsgBox(gClient->GetRoot(), fMdiFrame,
+ fMdiFrame->GetWindowName(), "Really want to close the window?",
+ kMBIconExclamation, kMBYes | kMBNo, &ret);
+ if (ret == kMBYes) return fMdiFrame->CloseWindow();
+
+ return kFALSE;*/
+ return fMdiFrame->CloseWindow();
+}
+
+//---------------------------------------------------------------
+// Main function
+
+void windowed_test()
+{
+ new TGAppMainFrame(gClient->GetRoot(), winWidth, winHeight);
+}
+
+//#ifdef STANDALONE
+int main(int argc, char **argv)
+{
+ TApplication theApp("MdiTest", &argc, argv);
+
+ windowed_test();
+
+ theApp.Run();
+
+ return 0;
+}
+//#endif
Index: sipmscan/trunk_v0.9/windowed_test.h
===================================================================
--- sipmscan/trunk_v0.9/windowed_test.h (nonexistent)
+++ sipmscan/trunk_v0.9/windowed_test.h (revision 145)
@@ -0,0 +1,42 @@
+#ifndef _windowedtest_h_
+#define _windowedtest_h_
+
+#define debug 0
+#define winWidth 1240
+#define winHeight 900
+#define WINDOW_NAME "CAMAC/MPOD/4MM DAQ software"
+#define BSIZE 10000
+#define histname "hdata"
+
+#include <time.h>
+
+//int debugSig = 0;
+
+enum EMenuIds {
+ M_FILE_NEW,
+// M_FILE_CLOSE,
+ M_FILE_EXIT,
+
+ M_ANALYSIS_HISTTYPE,
+ M_ANALYSIS_HISTTYPE_1DADC,
+ M_ANALYSIS_HISTTYPE_1DTDC,
+ M_ANALYSIS_HISTTYPE_2D,
+ M_ANALYSIS_HISTTYPE_SURF,
+ M_ANALYSIS_FIT,
+ M_ANALYSIS_FITSEL,
+ M_ANALYSIS_INTEGX,
+ M_ANALYSIS_INTEGY,
+ M_ANALYSIS_PHOTMU,
+
+ M_TOOLS_FIELDPOINT,
+
+ M_WINDOW_HOR,
+ M_WINDOW_VERT,
+
+ M_HELP_ABOUT
+};
+
+// Function that transforms timestamp to local time
+void GetTime(int intime, char *outtime);
+
+#endif
Index: sipmscan/trunk_v0.9/wusbcc.h
===================================================================
--- sipmscan/trunk_v0.9/wusbcc.h (nonexistent)
+++ sipmscan/trunk_v0.9/wusbcc.h (revision 145)
@@ -0,0 +1,15 @@
+#ifndef _WUSBCC_H
+#define _WUSBCC_H
+
+#define NAF(N,A,F) 0x4000+(N)*0x200+(A)*0x20+(F)
+#define NAFS(N,A,F) (N)*0x200+(A)*0x20+(F)
+
+#define CSSA_RQX(N,A,F,DATA,Q,X) CAMAC_read(udev,(N),(A),(F),(DATA),(Q),(X))
+#define CSSA_WQX(N,A,F,DATA,Q,X) CAMAC_write(udev,(N),(A),(F),(DATA),(Q),(X))
+
+#define CCCZ CAMAC_Z(udev)
+#define CCCC CAMAC_C(udev)
+#define CSET_I CAMAC_I(udev,1)
+#define CREM_I CAMAC_I(udev,0)
+
+#endif
Index: sipmscan/trunk_v0.9/wusbxx_dll.c
===================================================================
--- sipmscan/trunk_v0.9/wusbxx_dll.c (nonexistent)
+++ sipmscan/trunk_v0.9/wusbxx_dll.c (revision 145)
@@ -0,0 +1,104 @@
+#include "wusbxx_dll.h"
+
+usb_dev_handle *udev;
+
+
+
+void _VI_FUNC WUSBXX_load (char* module_path)
+{
+
+ /*
+ if (module_path == NULL)
+ DLLHandle = LoadLibrary("libxxusb.dll");
+ else
+ DLLHandle = LoadLibrary(module_path);
+
+ if (!(xxusb_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_register_read"))) exit(1);
+ if (!(xxusb_stack_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_read"))) exit(1);
+ if (!(xxusb_stack_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_write"))) exit(1);
+ if (!(xxusb_stack_execute_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_stack_execute"))) exit(1);
+ if (!(xxusb_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_register_write"))) exit(1);
+ if (!(xxusb_usbfifo_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_usbfifo_read"))) exit(1);
+ if (!(xxusb_bulk_read_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_bulk_read"))) exit(1);
+ if (!(xxusb_bulk_write_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_bulk_write"))) exit(1);
+ if (!(xxusb_reset_toggle_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_reset_toggle"))) exit(1);
+
+ if (!(xxusb_devices_find_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_devices_find"))) exit(1);
+ if (!(xxusb_device_close_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_device_close"))) exit(1);
+ if (!(xxusb_device_open_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_device_open"))) exit(1);
+ if (!(xxusb_flash_program_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_flash_program"))) exit(1);
+ if (!(xxusb_flashblock_program_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_flashblock_program"))) exit(1);
+ if (!(xxusb_serial_open_Ptr = (void*) GetProcAddress(DLLHandle,"xxusb_serial_open"))) exit(1);
+
+ if (!(VME_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"VME_register_write"))) exit(1);
+ if (!(VME_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"VME_register_read"))) exit(1);
+ if (!(VME_LED_settings_Ptr = (void*) GetProcAddress(DLLHandle,"VME_LED_settings"))) exit(1);
+ if (!(VME_DGG_Ptr = (void*) GetProcAddress(DLLHandle,"VME_DGG"))) exit(1);
+ if (!(VME_Output_settings_Ptr = (void*) GetProcAddress(DLLHandle,"VME_Output_settings"))) exit(1);
+ if (!(VME_read_16_Ptr = (void*) GetProcAddress(DLLHandle,"VME_read_16"))) exit(1);
+ if (!(VME_read_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_read_32"))) exit(1);
+ if (!(VME_BLT_read_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_BLT_read_32"))) exit(1);
+ if (!(VME_write_16_Ptr = (void*) GetProcAddress(DLLHandle,"VME_write_16"))) exit(1);
+ if (!(VME_write_32_Ptr = (void*) GetProcAddress(DLLHandle,"VME_write_32"))) exit(1);
+
+ if (!(CAMAC_DGG_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_DGG"))) exit(1);
+ if (!(CAMAC_register_read_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_register_read"))) exit(1);
+ if (!(CAMAC_register_write_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_register_write"))) exit(1);
+ if (!(CAMAC_LED_settings_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_LED_settings"))) exit(1);
+ if (!(CAMAC_Output_settings_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_Output_settings"))) exit(1);
+ if (!(CAMAC_read_LAM_mask_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_read_LAM_mask"))) exit(1);
+ if (!(CAMAC_write_LAM_mask_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_write_LAM_mask"))) exit(1);
+ if (!(CAMAC_write_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_write"))) exit(1);
+ if (!(CAMAC_read_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_read"))) exit(1);
+ if (!(CAMAC_Z_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_Z"))) exit(1);
+ if (!(CAMAC_C_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_C"))) exit(1);
+ if (!(CAMAC_I_Ptr = (void*) GetProcAddress(DLLHandle,"CAMAC_I"))) exit(1);
+*/
+}
+
+void _VI_FUNC WUSBXX_open (char *serial)
+{
+ if (serial != NULL)
+ udev = xxusb_serial_open(serial);
+}
+
+void _VI_FUNC WUSBXX_close (void)
+{
+ if (udev) xxusb_device_close(udev);
+}
+
+int _VI_FUNC WUSBXX_CCread (int n, int a, int f, unsigned long *data)
+{
+ long intbuf[4];
+ int ret;
+ // CAMAC direct read function
+ intbuf[0]=1;
+ intbuf[1]=(long)(f+a*32+n*512 + 0x4000);
+ ret = xxusb_stack_execute(udev, intbuf);
+ if (f < 16)
+ {
+ *data=intbuf[0] + intbuf[1] * 0x10000; //24-bit word
+// *Q = ((intbuf[1] >> 8) & 1);
+// *X = ((intbuf[1] >> 9) & 1);
+ }
+ return ret;
+}
+
+int _VI_FUNC WUSBXX_CCwrite (int n, int a, int f, unsigned long data)
+{
+ long intbuf[4];
+ int ret;
+// CAMAC direct write function
+ intbuf[0]=1;
+ intbuf[1]=(long)(f+a*32+n*512 + 0x4000);
+ if ((f > 15) && (f < 24))
+ {
+ intbuf[0]=3;
+ intbuf[2]=(data & 0xffff);
+ intbuf[3]=((data >>16) & 255);
+ ret = xxusb_stack_execute(udev, intbuf);
+// *Q = (intbuf[0] & 1);
+// *X = ((intbuf[0] >> 1) & 1);
+ }
+ return ret;
+}
Index: sipmscan/trunk_v0.9/wusbxx_dll.h
===================================================================
--- sipmscan/trunk_v0.9/wusbxx_dll.h (nonexistent)
+++ sipmscan/trunk_v0.9/wusbxx_dll.h (revision 145)
@@ -0,0 +1,19 @@
+#ifndef _WUSBXX_DLL_H
+#define _WUSBXX_DLL_H
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "libxxusb.h"
+#include "wusbcc.h"
+#define _VI_FUNC
+extern usb_dev_handle *udev;
+
+void _VI_FUNC WUSBXX_load (char *module_path);
+void _VI_FUNC WUSBXX_open (char *serial);
+void _VI_FUNC WUSBXX_close (void);
+int _VI_FUNC WUSBXX_CCread (int n, int a, int f, unsigned long *data);
+int _VI_FUNC WUSBXX_CCwrite (int n, int a, int f, unsigned long data);
+
+#endif
+