#include "exlib.conf"
#include "daclib.conf"
#include "exlib.h"
#include "daclib.h"
#include "mass.h"
Data Structures | |
| union | SPCHDR |
Defines | |
| #define | CPNAME "MASS" |
| #define | CPTITL "Ion Mass Scan" |
| #define | CPDATE "(15Jan03/Hu)" |
| #define | CIDPRG "MASS " |
| #define | CVERSION "15mar01" |
| #define | MFILNA 70 |
| #define | useDATAROUT |
| #define | useCTRLROUT |
| #define | CLKRATE sysClkRateGet() |
| #define | BASEPRIO 40 |
| #define | MAXLEN 0xffff |
| #define | INISTACK 5000 |
| #define | INICHCK VX_FP_TASK |
| #define | INIOPT VX_FP_TASK |
| #define | MSTRTASK "tMassMstr" |
| #define | MSTRPRIO (BASEPRIO+1) |
| #define | MSTRSTACK 7000 |
| #define | MSTROPT VX_FP_TASK |
| #define | MSTROPT VX_FP_TASK |
| #define | RLTTASK "tMassRlt" |
| #define | RLTPRIO (BASEPRIO+0) |
| #define | RLTSTACK 5000 |
| #define | RLTOPT 0 |
| #define | DATATASK "tMassData" |
| #define | DATAPRIO (BASEPRIO+2) |
| #define | DATASTACK 5000 |
| #define | DATAOPT VX_FP_TASK |
| #define | DATATIME 9 |
| #define | DATAPAUSE 1 |
| #define | CTRLTASK "tMassCtrl" |
| #define | CTRLPRIO (BASEPRIO+2) |
| #define | CTRLSTACK 5000 |
| #define | CTRLOPT VX_FP_TASK |
| #define | CTRLPAUSE 1 |
| #define | CTRLECF ".ecf" |
| #define | BRKTASK "tMassBrk" |
| #define | BRKPRIO (BASEPRIO+1) |
| #define | BRKSTACK 5000 |
| #define | BRKOPT 0 |
| #define | SAVBGDATA |
| #define | CBGTASK "tMassBg" |
| #define | CBGPRIO 100 |
| #define | CBGFILE "~/ex_home/ex_prog/peakv.o" |
| #define | CBGSYM "_peak" |
| #define | CBGSTACK 11000 |
| #define | CBGOPT VX_FP_TASK |
| #define | CBGARG1 ",,\"peak_mass.vxw\",,'S'" |
| #define | BGARGS |
| #define | CBGCHECK FALSE |
| #define | CBGUNLD TRUE |
| #define | CIDPAR "STRZ-VXW" |
| #define | CPARNA "bootHost:/ex_home/ex_param/masspar.vxw" |
| #define | CDFNAM "data:/spectrum.mass" |
| #define | CHLPNA "bootHost:/ex_home/ex_help/masshlp.txt" |
| #define | CISERV "servix" |
| #define | CIUSER "vme-info" |
| #define | CIFILE "mass/mass.info" |
| #define | ffPARFILE parfile |
| #define | ffPARMTR parfile.parmtr |
| #define | ffROUTPAR parfile.routpar |
| #define | ffDACLIBPAR parfile.daclibpar |
| #define | ffEXLIBPAR parfile.exlibpar |
| #define | HEADER0 parfile.header0 |
| #define | ccCOMMON common |
| #define | ccPARMTR common.parmtr |
| #define | ccDACLIBCOM common.daclibcom |
| #define | ccEXLIBCOM common.exlibcom |
| #define | SP1NAM common.sp1nam |
| #define | HEADER1 common.header1 |
| #define | IDPAR ffPARMTR.idpar |
| #define | PIDPRG ffPARMTR.idprg |
| #define | PVERSION ffPARMTR.version |
| #define | DFLTPAR ffPARMTR.dflts |
| #define | PEXPMNT ffPARMTR.pexpmnt |
| #define | SP0NAM ffPARMTR.sp0nam |
| #define | ZZZZZZ ffPARMTR.zzzzzz |
| #define | ECOFAC ffPARMTR.ecofac |
| #define | ICOFAC ffPARMTR.icofac |
| #define | POSID ccPARMTR.posid |
| #define | LFTID ccPARMTR.lftid |
| #define | CT1ID ccPARMTR.ct1id |
| #define | CT2ID ccPARMTR.ct2id |
| #define | CT3ID ccPARMTR.ct3id |
| #define | CT4ID ccPARMTR.ct4id |
| #define | ADCID ccPARMTR.adcid |
| #define | BOVID ccPARMTR.bovid |
| #define | ECFTXT ccPARMTR.ecftxt |
| #define | DRMENU ffROUTPAR.drmenu |
| #define | DRTYPE ffROUTPAR.drtype |
| #define | DRBASE ffROUTPAR.drbase |
| #define | DROFFS ffROUTPAR.droffs |
| #define | STOPRT ffROUTPAR.stoprt |
| #define | RDSTAT ffROUTPAR.rdstat |
| #define | RDSTCL ffROUTPAR.rdstcl |
| #define | RDDATA ffROUTPAR.rddata |
| #define | RDDACL ffROUTPAR.rddacl |
| #define | RDIDNT ffROUTPAR.rdidnt |
| #define | CRMENU ffROUTPAR.crmenu |
| #define | CRMENU2 ffROUTPAR.crmenu2 |
| #define | CRTYPE ffROUTPAR.crtype |
| #define | CRBASE ffROUTPAR.crbase |
| #define | CROFFS ffROUTPAR.croffs |
| #define | CRCTRL ffROUTPAR.crctrl |
| #define | CRSTAT ffROUTPAR.crstat |
| #define | CRADDR ffROUTPAR.craddr |
| #define | CRDATA ffROUTPAR.crdata |
| #define | CRINTR ffROUTPAR.crintr |
| #define | CRIDNT ffROUTPAR.cridnt |
| #define | CRPRIO ffROUTPAR.crprio |
| #define | CHANADR 0x0013 |
| #define | TONADR 0x0014 |
| #define | TOFFADR 0x0015 |
| #define | NZTADR 0x0016 |
| #define | CRNGADR 0x0017 |
| #define | MPSport "/tyCo/2" |
| #define | CHDLEN "1" |
| #define | CEXPMNT "??????" |
| #define | CSPTYPE "MCA2" |
| #define | CROWS " 4" |
| #define | CBYTES "4" |
| #define | CLTXT " 80" |
| #define | CDFTXT "MASS Spectrum --- Strahlenzentrum Universitaet Giessen" |
| #define | CSLEN 512 |
| #define | INITSPCHDR |
| #define | SPSTAT XSPHDR->hdata.spcdat.status |
| #define | RLTCNT XSPHDR->hdata.spcdat.rltcnt |
| #define | LFTCNT XSPHDR->hdata.spcdat.lftcnt |
| #define | DATCNT XSPHDR->hdata.spcdat.datcnt |
| #define | OUTCNT XSPHDR->hdata.spcdat.outcnt |
| #define | CT2CNT XSPHDR->hdata.spcdat.ct2cnt |
| #define | CT4CNT XSPHDR->hdata.spcdat.ct4cnt |
| #define | ADCCNT XSPHDR->hdata.spcdat.adccnt |
| #define | SEQCNT XSPHDR->hdata.spcdat.seqcnt |
| #define | BOVCNT XSPHDR->hdata.spcdat.bovcnt |
| #define | REJCNT XSPHDR->hdata.spcdat.rejcnt |
| #define | ERRCNT XSPHDR->hdata.spcdat.errcnt |
| #define | FULCNT XSPHDR->hdata.spcdat.fulcnt |
| #define | HDATID XSPHDR->hdata.spcdat.hdatid |
| #define | STAPLO XSPHDR->hdata.spcdat.staplo |
| #define | SLEN XSPHDR->hdata.spcdat.slen |
| #define | EXPAR XSPHDR->hdata.spcdat.expar |
| #define | GASTYPE XSPHDR->hdata.spcdat.gastype |
| #define | RUNTIM XSPHDR->hdata.spcdat.runtim |
| #define | MAXSPECS 1 |
| #define | MAXHTYPS 1 |
| #define | USHMAX 4 |
| #define | HDSCR_MASS "208i1 1i2 13i4 2i2 13f4 12i1 1i2 3f4 1i4" |
| #define | INITHTYPES |
| #define | INITSPEPNTR |
| #define | SHOWHDR |
| #define | SHOWXHDR |
| #define | EXTPAR2ASCII |
| #define | INPUTPARS1 |
| #define | INPUTPARS2 |
| #define | INPUTPARS5 |
| #define | INPUTXPARS1 |
| #define | INPUTXPARS2 |
| #define | INPUTXPARS5 |
| #define | INITPARS |
| #define | SPECONFm |
| #define | SPECONFi |
| #define | SPECONFp |
| #define | DATAVARS |
| #define | KG2MPS (100000. / .842) |
| #define | ADC2GAUSS EXPAR[8] |
| #define | DATAMACRO |
Enumerations | |
| enum | headertypes { MTX_HEADER, MCA_HEADER, MCT_HEADER, MS2_HEADER, MSC_HEADER, PCM_HEADER, MCA_VAX_HEADER, MCA_VXW_HEADER, ALL_VAX_HEADER, ALL_VXW_HEADER, MCA_VAX_HEADER, MCA_VXW_HEADER, ALL_VAX_HEADER, ALL_VXW_HEADER, DRM_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_VAX_HEADER, ECF_0_HEADER, ECF_1_HEADER, ECF_1_HEADER, ESI_VAX_HEADER, ESW_VAX_HEADER, ESW_VXW_HEADER, ESS_VAX_HEADER, ESS_VXW_HEADER, ESS_HEADER, ECF_HEADER, ESW_HEADER, MASS_HEADER, ESW_VAX_HEADER, ESW_VXW_HEADER, ESS_VAX_HEADER, ESS_VXW_HEADER } |
modification history -------------------- 15oct08 kHu DOXYGEN comments added 28may03 kHu CIFILE geaendert 29apr03 kHu *.conf, *.h Files neu geordnet 16apr03 kHu Fit gemacht fuer -Wall GCC-Option 15apr03 kHu Help mit INFO auf Server 04apr03 kHu define CPDATE EMKSTR(SIGNAT) 15jan03 kHu dac10.c: stets File-Name abfragen 14jan03 kHu dac10/25.c: neu: Edit header of spectrum 16aug02 kHu BGARGS um (int)&HEADER0 erweitert 30apr02 kHu Init task -> Master task 28feb02 kHu Parameters for background program 18feb02 kHu Argumente beim Start: PNAME,PTITLE,PARNAM,HLPNAM 28aug01 kHu BGARGS/Z ...,(int)xCntrl,... 15mar01 kHu new from ESS
| #define ADC2GAUSS EXPAR[8] |
| #define ADCCNT XSPHDR->hdata.spcdat.adccnt |
| #define ADCID ccPARMTR.adcid |
| #define BASEPRIO 40 |
| #define BGARGS |
| #define BOVCNT XSPHDR->hdata.spcdat.bovcnt |
| #define BOVID ccPARMTR.bovid |
| #define BRKOPT 0 |
| #define BRKPRIO (BASEPRIO+1) |
| #define BRKSTACK 5000 |
| #define BRKTASK "tMassBrk" |
| #define CBGARG1 ",,\"peak_mass.vxw\",,'S'" |
| #define CBGCHECK FALSE |
| #define CBGFILE "~/ex_home/ex_prog/peakv.o" |
| #define CBGOPT VX_FP_TASK |
| #define CBGPRIO 100 |
| #define CBGSTACK 11000 |
| #define CBGSYM "_peak" |
| #define CBGTASK "tMassBg" |
| #define CBGUNLD TRUE |
| #define CBYTES "4" |
| #define ccCOMMON common |
| #define ccDACLIBCOM common.daclibcom |
| #define ccEXLIBCOM common.exlibcom |
| #define ccPARMTR common.parmtr |
| #define CDFNAM "data:/spectrum.mass" |
| #define CDFTXT "MASS Spectrum --- Strahlenzentrum Universitaet Giessen" |
| #define CEXPMNT "??????" |
| #define CHANADR 0x0013 |
| #define CHDLEN "1" |
| #define CHLPNA "bootHost:/ex_home/ex_help/masshlp.txt" |
| #define CIDPAR "STRZ-VXW" |
| #define CIDPRG "MASS " |
| #define CIFILE "mass/mass.info" |
| #define CISERV "servix" |
| #define CIUSER "vme-info" |
| #define CLKRATE sysClkRateGet() |
| #define CLTXT " 80" |
| #define CPARNA "bootHost:/ex_home/ex_param/masspar.vxw" |
| #define CPDATE "(15Jan03/Hu)" |
| #define CPNAME "MASS" |
| #define CPTITL "Ion Mass Scan" |
| #define CRADDR ffROUTPAR.craddr |
| #define CRBASE ffROUTPAR.crbase |
| #define CRCTRL ffROUTPAR.crctrl |
| #define CRDATA ffROUTPAR.crdata |
| #define CRIDNT ffROUTPAR.cridnt |
| #define CRINTR ffROUTPAR.crintr |
| #define CRMENU ffROUTPAR.crmenu |
| #define CRMENU2 ffROUTPAR.crmenu2 |
| #define CRNGADR 0x0017 |
| #define CROFFS ffROUTPAR.croffs |
| #define CROWS " 4" |
| #define CRPRIO ffROUTPAR.crprio |
| #define CRSTAT ffROUTPAR.crstat |
| #define CRTYPE ffROUTPAR.crtype |
| #define CSLEN 512 |
| #define CSPTYPE "MCA2" |
| #define CT1ID ccPARMTR.ct1id |
| #define CT2CNT XSPHDR->hdata.spcdat.ct2cnt |
| #define CT2ID ccPARMTR.ct2id |
| #define CT3ID ccPARMTR.ct3id |
| #define CT4CNT XSPHDR->hdata.spcdat.ct4cnt |
| #define CT4ID ccPARMTR.ct4id |
| #define CTRLECF ".ecf" |
| #define CTRLOPT VX_FP_TASK |
| #define CTRLPAUSE 1 |
| #define CTRLPRIO (BASEPRIO+2) |
| #define CTRLSTACK 5000 |
| #define CTRLTASK "tMassCtrl" |
| #define CVERSION "15mar01" |
| #define DATAMACRO |
| #define DATAOPT VX_FP_TASK |
| #define DATAPAUSE 1 |
| #define DATAPRIO (BASEPRIO+2) |
| #define DATASTACK 5000 |
| #define DATATASK "tMassData" |
| #define DATATIME 9 |
| #define DATAVARS |
| #define DATCNT XSPHDR->hdata.spcdat.datcnt |
| #define DFLTPAR ffPARMTR.dflts |
| #define DRBASE ffROUTPAR.drbase |
| #define DRMENU ffROUTPAR.drmenu |
| #define DROFFS ffROUTPAR.droffs |
| #define DRTYPE ffROUTPAR.drtype |
| #define ECFTXT ccPARMTR.ecftxt |
| #define ECOFAC ffPARMTR.ecofac |
| #define ERRCNT XSPHDR->hdata.spcdat.errcnt |
| #define EXPAR XSPHDR->hdata.spcdat.expar |
| #define ffDACLIBPAR parfile.daclibpar |
| #define ffEXLIBPAR parfile.exlibpar |
| #define ffPARFILE parfile |
| #define ffPARMTR parfile.parmtr |
| #define ffROUTPAR parfile.routpar |
| #define FULCNT XSPHDR->hdata.spcdat.fulcnt |
| #define GASTYPE XSPHDR->hdata.spcdat.gastype |
| #define HDATID XSPHDR->hdata.spcdat.hdatid |
| #define HDSCR_MASS "208i1 1i2 13i4 2i2 13f4 12i1 1i2 3f4 1i4" |
| #define HEADER0 parfile.header0 |
| #define HEADER1 common.header1 |
| #define ICOFAC ffPARMTR.icofac |
| #define IDPAR ffPARMTR.idpar |
| #define INICHCK VX_FP_TASK |
| #define INIOPT VX_FP_TASK |
| #define INISTACK 5000 |
| #define INITHTYPES |
Value:
/* MASS-type, spectrum 0 */ \ {{TRUE}, /* Type valid for spectrum 0 */ \ CIDHDRvxw, /* Required header ID in IDHDR */ \ "MASS", /* Required program ID in IDPRG */ \ HDSCR_MASS, /* Header descriptor string */ \ MASS_HEADER}, /* Header type */ \
| #define INITPARS |
| #define INITSPCHDR |
Value:
{0, \
0,0,0,0,0,0,0,0,0,0,0,0,0, \
0, \
CSLEN, /* Length of single spectrum */ \
{0.,0.,0.,0.,0.,0.,0.,0.,0.,0.,0.,0.,0.,0.}, \
"", \
0}
| #define INITSPEPNTR |
| #define INPUTPARS1 |
| #define INPUTPARS2 |
Value:
{ \
\
short shortpar; \
\
TEXT[lTEXT-1] = '\0'; /* Title of spectrum */ \
IHDLEN = 1; /* Blocks of header */ \
IBYTES = 4; /* Bytes per channel */ \
IROWS = atol(CROWS); /* Number of lines */ \
shortpar = HDATID >> 1; /* ID of data */ \
\
tMenu(NULL, 1, \
"%$-"lTEXTs"s\n\n" \
" Length of single spectrum = %6hu\n" \
" Data ident. of ESS Position interface = 0x%@2.2hx\n", \
TEXT, \
&SLEN, \
&shortpar, 0, 0x003f \
); \
\
/* ID of data */ \
POSID = HDATID = shortpar << 1; /* Position */ \
/* .... = (POSID +2); ESW Position */ \
CT1ID = (POSID +4) | 0x10; /* Counter 1 */ \
CT2ID = (POSID +6) | 0x10; /* Counter 2 */ \
CT3ID = (POSID +8) | 0x10; /* Counter 3 */ \
CT4ID = (POSID +10) | 0x10; /* Counter 4 */ \
ADCID = (POSID +14) | 0x00; /* ADC */ \
LFTID = (POSID +12) | 0x21; /* Lifetime */ \
BOVID = (POSID +12); /* Buffer overruns */ \
}
| #define INPUTPARS5 |
| #define INPUTXPARS2 |
| #define KG2MPS (100000. / .842) |
| #define LFTCNT XSPHDR->hdata.spcdat.lftcnt |
| #define LFTID ccPARMTR.lftid |
| #define MAXHTYPS 1 |
| #define MAXLEN 0xffff |
| #define MAXSPECS 1 |
| #define MFILNA 70 |
| #define MPSport "/tyCo/2" |
| #define MSTROPT VX_FP_TASK |
| #define MSTROPT VX_FP_TASK |
| #define MSTRPRIO (BASEPRIO+1) |
| #define MSTRSTACK 7000 |
| #define MSTRTASK "tMassMstr" |
| #define NZTADR 0x0016 |
| #define OUTCNT XSPHDR->hdata.spcdat.outcnt |
| #define PEXPMNT ffPARMTR.pexpmnt |
| #define PIDPRG ffPARMTR.idprg |
| #define POSID ccPARMTR.posid |
| #define PVERSION ffPARMTR.version |
| #define RDDACL ffROUTPAR.rddacl |
| #define RDDATA ffROUTPAR.rddata |
| #define RDIDNT ffROUTPAR.rdidnt |
| #define RDSTAT ffROUTPAR.rdstat |
| #define RDSTCL ffROUTPAR.rdstcl |
| #define REJCNT XSPHDR->hdata.spcdat.rejcnt |
| #define RLTCNT XSPHDR->hdata.spcdat.rltcnt |
| #define RLTOPT 0 |
| #define RLTPRIO (BASEPRIO+0) |
| #define RLTSTACK 5000 |
| #define RLTTASK "tMassRlt" |
| #define RUNTIM XSPHDR->hdata.spcdat.runtim |
| #define SAVBGDATA |
| #define SEQCNT XSPHDR->hdata.spcdat.seqcnt |
| #define SHOWHDR |
Value:
{ \
long datcnt, ct2cnt, ct4cnt, adccnt; \
\
/* Snapshot to avaid asynchronous counters */ \
/* on slow output (VT200) */ \
datcnt = DATCNT; \
ct2cnt = CT2CNT; \
ct4cnt = CT4CNT; \
adccnt = ADCCNT; \
\
printf("Length: %lu * %lu\n", IROWS, ICOLS); \
putchar('\n'); \
printf("%10lu Realtime\n", RLTCNT); \
printf("%10lu Lifetime\n", LFTCNT); \
printf("%10lu Positions received\n", datcnt); \
printf("%10lu Positions out of range\n", OUTCNT); \
printf("%10lu Counter 2 received\n", ct2cnt); \
printf("%10lu Counter 4 received\n", ct4cnt); \
printf("%10lu ADC data received\n", adccnt); \
printf("%10lu Data sequence errors\n", SEQCNT); \
printf("%10lu Buffer overruns\n", BOVCNT); \
printf("%10lu Rejected data\n", REJCNT); \
printf("%10lu Fifo overflows\n", FULCNT); \
printf("%10lu Data errors\n", ERRCNT); \
}
| #define SLEN XSPHDR->hdata.spcdat.slen |
| #define SP0NAM ffPARMTR.sp0nam |
| #define SP1NAM common.sp1nam |
| #define SPECONFi |
| #define SPECONFm |
Value:
/* Special configuration */ \ " %$m Ion current converter\n" \ " %$m ADC to kGauss conversion\n"
| #define SPECONFp |
| #define SPSTAT XSPHDR->hdata.spcdat.status |
| #define STAPLO XSPHDR->hdata.spcdat.staplo |
| #define STOPRT ffROUTPAR.stoprt |
| #define TOFFADR 0x0015 |
| #define TONADR 0x0014 |
| #define useCTRLROUT |
| #define useDATAROUT |
| #define USHMAX 4 |
| #define ZZZZZZ ffPARMTR.zzzzzz |
| enum headertypes |
1.5.6