/[PAMELA software]/yoda/techmodel/VarDumpReader.cpp
ViewVC logotype

Diff of /yoda/techmodel/VarDumpReader.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by kusanagi, Tue Sep 21 20:24:33 2004 UTC revision 5.0 by kusanagi, Mon Aug 29 09:46:13 2005 UTC
# Line 1  Line 1 
1  /** @file  /** @file
2   * $Source: /home/cvsmanager/yoda/techmodel/VarDumpReader.cpp,v $   * $Source: /home/cvsmanager/yoda/techmodel/VarDumpReader.cpp,v $
3   * $Id: VarDumpReader.cpp,v 1.5 2004/08/26 08:21:31 kusanagi Exp $   * $Id: VarDumpReader.cpp,v 4.5 2005/08/29 09:29:03 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the VarDumpReader class.   * Implementation of the VarDumpReader class.
# Line 33  VarDumpReader::VarDumpReader(void): Line 33  VarDumpReader::VarDumpReader(void):
33   * Get a string with the version info of the algorithm.   * Get a string with the version info of the algorithm.
34   */   */
35  std::string VarDumpReader::GetVersionInfo(void) const {  std::string VarDumpReader::GetVersionInfo(void) const {
36    return     "$Header: /home/cvsmanager/yoda/techmodel/VarDumpReader.cpp,v 1.5 2004/08/26 08:21:31 kusanagi Exp $\n";    return     "$Header: /home/cvsmanager/yoda/techmodel/VarDumpReader.cpp,v 4.5 2005/08/29 09:29:03 kusanagi Exp $\n";
37  }  }
38    
39  /**  /**
# Line 41  std::string VarDumpReader::GetVersionInf Line 41  std::string VarDumpReader::GetVersionInf
41   * event reader routines for all packet types.   * event reader routines for all packet types.
42   */   */
43  void VarDumpReader::Init(PamelaRun *run) {  void VarDumpReader::Init(PamelaRun *run) {
44      logger->debug(_T("Initialize"));
45    SetInputStream(run);    SetInputStream(run);
46    run->WriteSubPacket(this, &VarDump, VarDump->Class());    run->WriteSubPacket(this, &VarDump, VarDump->Class());
47  }  }
# Line 48  void VarDumpReader::Init(PamelaRun *run) Line 49  void VarDumpReader::Init(PamelaRun *run)
49  /**  /**
50   * Unpack the VarDump event from an input file.   * Unpack the VarDump event from an input file.
51   */   */
52  void VarDumpReader::RunEvent(int EventNumber, long int length) {  void VarDumpReader::RunEvent(int EventNumber, long int length) throw (WrongCRCException){
53    
54    char     *subData;      char      subData[length];
55    char      eventCRC[2];      UINT16    subCRC;      //calculated CRC of the data
56    UINT16    subCRC;      //CRC of the data      UINT16    readCRC;     //CRC read from the end of the subpacket
57    UINT16    readCRC;     //CRC read from the end of the subpacket      long int  dataLength = length - 2; //the block of data
   long int  dataLength;  
   int vars;  
58        
59      //the 2 bytes subtracted belong to the final event CRC bytes      InputFile->read(subData, sizeof(subData));
60      dataLength = length - (long int)2;      subCRC  = CM_Compute_CRC16(0, (UINT8*)subData, dataLength);
61        readCRC = (((UINT16)(subData[length - 2]<<8))&0xFF00) + (((UINT16)subData[length - 1])&0x00FF);
62      subData = new char[dataLength];      
63      InputFile->read(subData, sizeof(unsigned char)*dataLength);      if (subCRC != readCRC) throw WrongCRCException(" Wrong CRC for VarDump Packet ");
64      subCRC = CM_Compute_CRC16(0, (BYTE*)subData, dataLength);      /*if (subCRC != readCRC) {
65            logger->error("WRONG CRC FOR VarDump PACKET. Processed anyway for CPU debugging");
66      //took the final CRC to compare it with the previous calculated CRC of the data      }*/
67      InputFile->read(eventCRC, sizeof(eventCRC));  
68      readCRC = (((UINT16)(eventCRC[0]<<8))&0xFF00) + (((UINT16)eventCRC[1])&0x00FF);      VarDumpRecord* rec;
69        VarDump->PARAMETER_STAMP = (((UINT32)subData[0]<<24)&0xFF000000) + (((UINT32)subData[1]<<16)&0x00FF0000) +  (((UINT32)subData[2]<<8)&0x0000FF00) + (((UINT32)subData[3])&0x000000FF);
70        VarDump->Records->Clear();
71        TClonesArray &recs = *(VarDump->Records);
72            
73      //finally check if the RecordCRC is correct and finally update the partialCRC      int offset = 4;
74      if (subCRC == readCRC){      int j = 0;
75          VarDumpRecord* rec;      while (offset < dataLength){
76          VarDump->Records->Clear();          rec             = new(recs[j++]) VarDumpRecord(); //add a new VarDump
77          TClonesArray &recs = *(VarDump->Records);          rec->VAR_ID     = subData[offset];
78          rec = new(recs[0]) VarDumpRecord(); //add a new TabDump          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);
79          vars = dataLength/4;          offset = offset + 5;
         //rec->Data = new UINT32[vars];  
         //memcpy(rec->Data, (UINT32*)subData, sizeof(UINT32)*vars);  
         rec->Data = new TArrayI(vars, (int*)subData);  
           
     } else {  
         logger->warn(_T("Wrong CRC in VarDump Packet."));  
80      }      }
81      delete [] subData;  }
   }  
82    

Legend:
Removed from v.1.6  
changed lines
  Added in v.5.0

  ViewVC Help
Powered by ViewVC 1.1.23