using namespace std;
#include "hrpctrb3lookup.h"
#include "hpario.h"
#include "hdetpario.h"
#include <iostream>
#include <iomanip>
#include <ctype.h>
#include <stdlib.h>
ClassImp(HRpcTrb3LookupChan)
ClassImp(HRpcTrb3LookupBoard)
ClassImp(HRpcTrb3Lookup)
HRpcTrb3LookupBoard::HRpcTrb3LookupBoard() {
array = new TObjArray(65);
for(Int_t i=0;i<65;i++) array->AddAt(new HRpcTrb3LookupChan(),i);
}
HRpcTrb3LookupBoard::~HRpcTrb3LookupBoard() {
array->Delete();
delete array;
}
void HRpcTrb3LookupBoard::clear() {
for(Int_t i=0;i<65;i++) (*this)[i].clear();
}
HRpcTrb3Lookup::HRpcTrb3Lookup(const Char_t* name,
const Char_t* title,
const Char_t* context,
Int_t minTrbnetAddress,
Int_t maxTrbnetAddress)
: HParSet(name,title,context) {
arrayOffset=minTrbnetAddress;
array = new TObjArray(maxTrbnetAddress-minTrbnetAddress+1);
}
HRpcTrb3Lookup::~HRpcTrb3Lookup() {
array->Delete();
delete array;
}
Bool_t HRpcTrb3Lookup::init(HParIo* inp,Int_t* set) {
HDetParIo* input=inp->getDetParIo("HRpcParIo");
if (input) return (input->init(this,set));
return kFALSE;
}
Int_t HRpcTrb3Lookup::write(HParIo* output) {
HDetParIo* out=output->getDetParIo("HRpcParIo");
if (out) return out->write(this);
return -1;
}
void HRpcTrb3Lookup::clear() {
array->Delete();
status=kFALSE;
resetInputVersions();
}
void HRpcTrb3Lookup::printParam() {
printf("Lookup table for the TRB2 unpacker of the RPC detector\n");
printf("trbnet-address channel sector column cell side front-end address geomname\n");
printf("side: l-left, r-right\n");
for(Int_t i=0;i<=array->GetLast();i++) {
HRpcTrb3LookupBoard* b=(*this)[i];
if (b) {
for(Int_t j=0;j<b->getSize();j++) {
HRpcTrb3LookupChan& chan=(*b)[j];
Int_t sector=chan.getSector();
if (sector>=0) {
TString n = chan.getGeomName();
printf("0x%x %4i %3i%4i%4i %c %i %s\n",
arrayOffset+i,j,sector,
chan.getColumn(),chan.getCell(),chan.getSide(),chan.getFeAddress(),n.Data());
}
}
}
}
}
Bool_t HRpcTrb3Lookup::fill(Int_t id,Int_t chan,
Int_t sec,Int_t mod,Int_t cell,Char_t side,Int_t fea, TString& n) {
Bool_t rc=kFALSE;
HRpcTrb3LookupBoard* p=getBoard(id);
if (!p) {
p=new HRpcTrb3LookupBoard();
array->AddAt(p,id-arrayOffset);
}
HRpcTrb3LookupChan* c=p->getChannel(chan);
if (c) {
c->fill(sec,mod,cell,side,fea,n);
rc=kTRUE;
} else {
Error("fill","Invalid channel number %i",chan);
}
return rc;
}
Bool_t HRpcTrb3Lookup::readline(const Char_t *buf) {
Bool_t rc=kFALSE;
Int_t id, chan, sec, mod, cell, feAddress;
Char_t side='\0';
Char_t gn[100];
Int_t n=sscanf(buf," 0x%x %i %i %i %i %c %i %s",&id,&chan,&sec,&mod,&cell,&side,&feAddress,gn);
if (8==n) {
TString gN=gn;
rc=fill(id,chan,sec,mod,cell,side,feAddress,gN);
} else {
if (n<8) Error("readline","Not enough values in line %s\n",buf);
else Error("readline","Too many values in line %s\n",buf);
}
return rc;
}
void HRpcTrb3Lookup::putAsciiHeader(TString& header) {
header=
"# Lookup table for the TRB2 unpacker of the RPC detector\n"
"# Format:\n"
"# trbnet-address channel sector column cell side front-end-address geomname\n";
}
void HRpcTrb3Lookup::write(fstream& fout) {
for(Int_t i=0;i<=array->GetLast();i++) {
HRpcTrb3LookupBoard* b=(*this)[i];
if (b) {
for(Int_t j=0;j<b->getSize();j++) {
HRpcTrb3LookupChan& chan=(*b)[j];
Int_t sector=chan.getSector();
if (sector>=0) {
fout<<"0x"<<hex<<(arrayOffset+i)<<dec<<setw(5)<<j
<<" "<<sector<<" "<<chan.getColumn()
<<setw(5)<<chan.getCell()<<" "<<chan.getSide()
<<setw(9)<<chan.getFeAddress()
<<setw(9)<<chan.getGeomName()
<<'\n';
}
}
}
}
}