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

Diff of /yoda/techmodel/CalibCalPedReader.cpp

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

revision 1.6 by kusanagi, Tue Aug 24 16:01:57 2004 UTC revision 6.1 by kusanagi, Tue May 30 19:10:01 2006 UTC
# Line 1  Line 1 
1    
 #define BYTE  unsigned char  
 #include <string>  
 #include <log4cpp/Category.hh>  
 #include <fstream>  
 #include "stdio.h"  
2  extern "C" {  extern "C" {
3  #include "CRC.h"    
4      //Struct per il passaggio di dati da e verso la chiamata fortran      //Struct per il passaggio di dati da e verso la chiamata fortran
5      extern struct {      extern struct {
6          int IEV2;          int   iev;
7          int calped[4][11][96];          int   cstwerr[4];
8          int calgood[4][11][96];          float cperror[4];
9          int calthr[4][11][6];          float calped[4][11][96];
10          int calrms[4][11][96];          float calgood[4][11][96];
11          int calbase[4][11][6];          float calthr[4][11][6];
12          int calvar[4][11][96];          float calrms[4][11][96];
13          int calpuls[4][11][96];          float calbase[4][11][6];
14            float calvar[4][11][6];
15            //float calpuls[4][11][96];
16      } calib_;      } calib_;
       
17      //external declaration of the Fortran function      //external declaration of the Fortran function
18      void calpedestal_(short[], long int*, int*);      void calpedestal_(char*, long int*, int*);
19  }  }
20    
21  #include "ReaderAlgorithms.h"  #include "ReaderAlgorithms.h"
   
 #include "event/CalibCalPedEvent.h"  
   
 using namespace pamela;  
22  using namespace pamela::techmodel;  using namespace pamela::techmodel;
23    
24  static log4cpp::Category& cat = log4cpp::Category::getInstance("pamela.techmodel.CalibCalPedReader");    static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.CalibCalPedReader"));
25    
26  /**  /**
27   * Constructor.   * Constructor.
28   */   */
29  CalibCalPedReader::CalibCalPedReader(void):  CalibCalPedReader::CalibCalPedReader(void):
30    TechmodelAlgorithm(PacketType::Log, "TechmodelCalibCalPedReader") {    TechmodelAlgorithm(PacketType::Log, "TechmodelCalibCalPedReader") {
31    cat <<  log4cpp::Priority::DEBUG    logger->debug(_T("Constructor"));
       <<  "Constructor "  
       <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
32    calibCalPed = new CalibCalPedEvent();    calibCalPed = new CalibCalPedEvent();
33  }  }
34    
# Line 47  CalibCalPedReader::CalibCalPedReader(voi Line 37  CalibCalPedReader::CalibCalPedReader(voi
37   */   */
38  std::string CalibCalPedReader::GetVersionInfo(void) const {  std::string CalibCalPedReader::GetVersionInfo(void) const {
39    return    return
40      "$Header: /home/cvsmanager/yoda/techmodel/CalibCalPedReader.cpp,v 1.5 2004/08/20 15:01:41 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibCalPedReader.cpp,v 6.0 2006/02/07 17:11:09 kusanagi Exp $\n";
41  }  }
42    
43  /**  /**
# Line 55  std::string CalibCalPedReader::GetVersio Line 45  std::string CalibCalPedReader::GetVersio
45   * event reader routines for all packet types.   * event reader routines for all packet types.
46   */   */
47  void CalibCalPedReader::Init(PamelaRun *run) {  void CalibCalPedReader::Init(PamelaRun *run) {
48      logger->debug(_T("Initialize"));
49    SetInputStream(run);    SetInputStream(run);
50    run->WriteSubPacket(this, &calibCalPed, calibCalPed->Class());    run->WriteSubPacket(this, &calibCalPed, calibCalPed->Class());
51  }  }
# Line 62  void CalibCalPedReader::Init(PamelaRun * Line 53  void CalibCalPedReader::Init(PamelaRun *
53  /**  /**
54   * Unpack the CalibCalPed event from an input file.   * Unpack the CalibCalPed event from an input file.
55   */   */
56  void CalibCalPedReader::RunEvent(int EventNumber, long int length) {  void CalibCalPedReader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
57        stringstream oss;      
     char        *packetData;  
     char        CRCevent[2];  
     UINT16      calculatedCRC    = 0;   //calculated CRC  
     UINT16      readCRC          = 0;   //read CRC  
     long int    dataLength;  
58      int         ERROR;      int         ERROR;
59        char packetData[dataLength];
     dataLength = length - 2;  
     packetData = new char[dataLength];  
60      InputFile->read(packetData, sizeof(packetData));      InputFile->read(packetData, sizeof(packetData));
     InputFile->read(CRCevent, sizeof(CRCevent));  
61    
62      calculatedCRC = CM_Compute_CRC16(0, (BYTE*)packetData, dataLength);      calpedestal_((char*)packetData, &dataLength, &ERROR);
63      readCRC = ((UINT16)(CRCevent[0]<<8)&0xFF00) + ((UINT16)(CRCevent[1])&0x00FF);  
64            calibCalPed->unpackError = ERROR;
65      if (calculatedCRC == readCRC) {      if (ERROR != 0) {
66          calpedestal_((short*)packetData, &dataLength, &ERROR);          char *errmsg;
67          if (ERROR != 0) {          switch (ERROR){
68              char *errmsg;              case 1: errmsg = "CALORIMETER NOT FOUND";
69              switch (ERROR){          }
70                  case 1: errmsg = "CALORIMETER NOT FOUND";          oss.str("");
71              }          oss << "Fortran77 function calpedestal error code = " << ERROR
72              cat <<  log4cpp::Priority::ERROR              <<  " " << errmsg;
73                  <<  "Fortran77 function calpedestal error code = " << ERROR          logger->warn(oss.str().c_str());
74                  <<  errmsg       } //else {
75                  <<  "\n " << log4cpp::CategoryStream::ENDLINE;        //Store the unpacked data
76          } else {          calibCalPed->iev = calib_.iev;
77            //Store the unpacked data          memcpy(calibCalPed->cstwerr, calib_.cstwerr, sizeof(calibCalPed->cstwerr));
78              calibCalPed->IEV2 = calib_.IEV2;          memcpy(calibCalPed->cperror, calib_.cperror, sizeof(calibCalPed->cperror));
79          //--------have to invert array because of FORTRAN <-> C different management of the indexes      //--------have to invert array because of FORTRAN <-> C different management of the indexes
80              int tempCalped[96][11][4];          float tempCalped[96][11][4];
81              int tempCalgood[96][11][4];          float tempCalgood[96][11][4];
82              int tempCalthr[6][11][4];          float tempCalthr[6][11][4];
83              int tempCalrms[96][11][4];          float tempCalrms[96][11][4];
84              int tempCalbase[6][11][4];          float tempCalbase[6][11][4];
85              int tempCalvar[6][11][4];          float tempCalvar[6][11][4];
86              int tempCalpuls[96][11][4];          //float tempCalpuls[96][11][4];
87    
88              memcpy(tempCalped,  calib_.calped,  sizeof(tempCalped));          memcpy(tempCalped,  calib_.calped,  sizeof(tempCalped));
89              memcpy(tempCalgood, calib_.calgood, sizeof(tempCalgood));          memcpy(tempCalgood, calib_.calgood, sizeof(tempCalgood));
90              memcpy(tempCalthr,  calib_.calthr,  sizeof(tempCalthr));          memcpy(tempCalthr,  calib_.calthr,  sizeof(tempCalthr));
91              memcpy(tempCalrms,  calib_.calrms,  sizeof(tempCalrms));          memcpy(tempCalrms,  calib_.calrms,  sizeof(tempCalrms));
92              memcpy(tempCalbase, calib_.calbase, sizeof(tempCalbase));          memcpy(tempCalbase, calib_.calbase, sizeof(tempCalbase));
93              memcpy(tempCalvar,  calib_.calvar,  sizeof(tempCalvar));          memcpy(tempCalvar,  calib_.calvar,  sizeof(tempCalvar));
94              memcpy(tempCalpuls, calib_.calpuls, sizeof(tempCalpuls));          //memcpy(tempCalpuls, calib_.calpuls, sizeof(tempCalpuls));
95    
96              for (int i = 0; i < 4; i++){          for (int i = 0; i < 4; i++){
97                  for (int j = 0; j <11; j++){              for (int j = 0; j <11; j++){
98                      for (int z = 0; z < 96; z++){                  for (int z = 0; z < 96; z++){
99                          calibCalPed->calped[i][j][z]    = tempCalped[z][j][i];                      calibCalPed->calped[i][j][z]    = tempCalped[z][j][i];
100                          calibCalPed->calgood[i][j][z]   = tempCalgood[z][j][i];                      calibCalPed->calgood[i][j][z]   = tempCalgood[z][j][i];
101                          calibCalPed->calrms[i][j][z]    = tempCalrms[z][j][i];                      calibCalPed->calrms[i][j][z]    = tempCalrms[z][j][i];
102                          calibCalPed->calpuls[i][j][z]    = tempCalpuls[z][j][i];                      //calibCalPed->calpuls[i][j][z]   = tempCalpuls[z][j][i];
                     }  
103                  }                  }
104              }              }
105            }
106    
107              for (int i = 0; i < 4; i++){          for (int i = 0; i < 4; i++){
108                  for (int j = 0; j <11; j++){              for (int j = 0; j <11; j++){
109                      for (int z = 0; z < 6; z++){                  for (int z = 0; z < 6; z++){
110                          calibCalPed->calthr[i][j][z]    = tempCalthr[z][j][i];                      calibCalPed->calthr[i][j][z]    = tempCalthr[z][j][i];
111                          calibCalPed->calbase[i][j][z]   = tempCalbase[z][j][i];                      calibCalPed->calbase[i][j][z]   = tempCalbase[z][j][i];
112                          calibCalPed->calvar[i][j][z]    = tempCalvar[z][j][i];                      calibCalPed->calvar[i][j][z]    = tempCalvar[z][j][i];
                     }  
113                  }                  }
114              }              }
         //-----------------------------------------------------------------------------------------  
115          }          }
116      } else {      //-----------------------------------------------------------------------------------------
117              cat <<  log4cpp::Priority::ERROR      //}
             <<  "The test of calculated CRC with one wrote on file FAILED!!"  
             <<  "\n " << log4cpp::CategoryStream::ENDLINE;      
     }  
     delete [] packetData;  
118  }  }
119    
120    
Legend:
Removed from v.1.6  
changed lines
  Added in v.6.1
  ViewVC Help
Powered by ViewVC 1.1.23