| 1 |
/** @file |
| 2 |
* $Source: /afs/ba.infn.it/user/pamela/src/CVS/yoda/techmodel/VarDumpReader.cpp,v $ |
| 3 |
* $Id: VarDumpReader.cpp,v 6.2 2006/05/30 19:10:03 kusanagi Exp $ |
| 4 |
* $Author: kusanagi $ |
| 5 |
* |
| 6 |
* Implementation of the VarDumpReader class. |
| 7 |
*/ |
| 8 |
|
| 9 |
extern "C" { |
| 10 |
#include "CRC.h" |
| 11 |
} |
| 12 |
|
| 13 |
#include "ReaderAlgorithms.h" |
| 14 |
|
| 15 |
using namespace pamela::techmodel; |
| 16 |
|
| 17 |
static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.VarDumpReader")); |
| 18 |
|
| 19 |
/** |
| 20 |
* Constructor. |
| 21 |
*/ |
| 22 |
VarDumpReader::VarDumpReader(void): |
| 23 |
TechmodelAlgorithm(PacketType::VarDump, "TechmodelVarDump") { |
| 24 |
VarDump = new VarDumpEvent(); |
| 25 |
} |
| 26 |
|
| 27 |
/** |
| 28 |
* Get a string with the version info of the algorithm. |
| 29 |
*/ |
| 30 |
std::string VarDumpReader::GetVersionInfo(void) const { |
| 31 |
return "$Header: /afs/ba.infn.it/user/pamela/src/CVS/yoda/techmodel/VarDumpReader.cpp,v 6.2 2006/05/30 19:10:03 kusanagi Exp $\n"; |
| 32 |
} |
| 33 |
|
| 34 |
/** |
| 35 |
* Initialize the algorithm with a special run. This will initialize the |
| 36 |
* event reader routines for all packet types. |
| 37 |
*/ |
| 38 |
void VarDumpReader::Init(PamelaRun *run) { |
| 39 |
logger->debug(_T("Initialize")); |
| 40 |
SetInputStream(run); |
| 41 |
run->WriteSubPacket(this, &VarDump, VarDump->Class()); |
| 42 |
} |
| 43 |
|
| 44 |
/** |
| 45 |
* Unpack the VarDump event from an input file. |
| 46 |
*/ |
| 47 |
void VarDumpReader::RunEvent(int EventNumber, long int length) throw (WrongCRCException){ |
| 48 |
|
| 49 |
char subData[length]; |
| 50 |
UINT16 subCRC; //calculated CRC of the data |
| 51 |
UINT16 readCRC; //CRC read from the end of the subpacket |
| 52 |
long int dataLength = length - 2; //the block of data |
| 53 |
memset(subData, 0, length*sizeof(char)); |
| 54 |
InputFile->read(subData, sizeof(subData)); |
| 55 |
subCRC = CM_Compute_CRC16(0, (UINT8*)subData, dataLength); |
| 56 |
readCRC = (((UINT16)(subData[length - 2]<<8))&0xFF00) + (((UINT16)subData[length - 1])&0x00FF); |
| 57 |
|
| 58 |
if (subCRC != readCRC) throw WrongCRCException(" Wrong CRC for VarDump Packet "); |
| 59 |
/*if (subCRC != readCRC) { |
| 60 |
logger->error("WRONG CRC FOR VarDump PACKET. Processed anyway for CPU debugging"); |
| 61 |
}*/ |
| 62 |
|
| 63 |
VarDumpRecord* rec; |
| 64 |
VarDump->PARAMETER_STAMP = (((UINT32)subData[0]<<24)&0xFF000000) + (((UINT32)subData[1]<<16)&0x00FF0000) + (((UINT32)subData[2]<<8)&0x0000FF00) + (((UINT32)subData[3])&0x000000FF); |
| 65 |
VarDump->Records->Clear(); |
| 66 |
TClonesArray &recs = *(VarDump->Records); |
| 67 |
|
| 68 |
int offset = 4; |
| 69 |
int j = 0; |
| 70 |
while (offset < dataLength){ |
| 71 |
rec = new(recs[j++]) VarDumpRecord(); //add a new VarDump |
| 72 |
rec->VAR_ID = subData[offset]; |
| 73 |
rec->VAR_VALUE = (((UINT32)subData[1+offset]<<24)&0xFF000000) + (((UINT32)subData[2+offset]<<16)&0x00FF0000) + (((UINT32)subData[3+offset]<<8)&0x0000FF00) + (((UINT32)subData[4+offset])&0x000000FF); |
| 74 |
offset = offset + 5; |
| 75 |
} |
| 76 |
} |
| 77 |
|