/[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.7 by kusanagi, Tue Sep 21 20:24:33 2004 UTC revision 2.5 by kusanagi, Wed Feb 9 22:20:48 2005 UTC
# Line 1  Line 1 
   
 #define BYTE  unsigned char  
 #include <string>  
1  #include <log4cxx/logger.h>  #include <log4cxx/logger.h>
2  #include <fstream>  #include <fstream>
3  #include "stdio.h"  
4  extern "C" {  extern "C" {
5  #include "CRC.h"    
6      //Struct per il passaggio di dati da e verso la chiamata fortran      //Struct per il passaggio di dati da e verso la chiamata fortran
7      extern struct {      extern struct {
8          int IEV2;          int   iev;
9          int calped[4][11][96];          int   cstwerr[4];
10          int calgood[4][11][96];          float cperror[4];
11          int calthr[4][11][6];          float calped[4][11][96];
12          int calrms[4][11][96];          float calgood[4][11][96];
13          int calbase[4][11][6];          float calthr[4][11][6];
14          int calvar[4][11][96];          float calrms[4][11][96];
15          int calpuls[4][11][96];          float calbase[4][11][6];
16            float calvar[4][11][6];
17            float calpuls[4][11][96];
18      } calib_;      } calib_;
       
19      //external declaration of the Fortran function      //external declaration of the Fortran function
20      void calpedestal_(short[], long int*, int*);      void calpedestal_(char*, long int*, int*);
21  }  }
22    
23  #include "ReaderAlgorithms.h"  #include "ReaderAlgorithms.h"
   
24  #include "event/CalibCalPedEvent.h"  #include "event/CalibCalPedEvent.h"
25    
26  using namespace pamela;  using namespace pamela;
# Line 45  CalibCalPedReader::CalibCalPedReader(voi Line 42  CalibCalPedReader::CalibCalPedReader(voi
42   */   */
43  std::string CalibCalPedReader::GetVersionInfo(void) const {  std::string CalibCalPedReader::GetVersionInfo(void) const {
44    return    return
45      "$Header: /home/cvsmanager/yoda/techmodel/CalibCalPedReader.cpp,v 1.6 2004/08/24 16:01:57 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibCalPedReader.cpp,v 2.4 2005/01/13 14:48:04 kusanagi Exp $\n";
46  }  }
47    
48  /**  /**
# Line 61  void CalibCalPedReader::Init(PamelaRun * Line 58  void CalibCalPedReader::Init(PamelaRun *
58  /**  /**
59   * Unpack the CalibCalPed event from an input file.   * Unpack the CalibCalPed event from an input file.
60   */   */
61  void CalibCalPedReader::RunEvent(int EventNumber, long int length) {  void CalibCalPedReader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
62      stringstream oss;            stringstream oss;      
     char        *packetData;  
     char        CRCevent[2];  
     UINT16      calculatedCRC    = 0;   //calculated CRC  
     UINT16      readCRC          = 0;   //read CRC  
     long int    dataLength;  
63      int         ERROR;      int         ERROR;
64        char packetData[dataLength];
     dataLength = length - 2;  
     packetData = new char[dataLength];  
65      InputFile->read(packetData, sizeof(packetData));      InputFile->read(packetData, sizeof(packetData));
     InputFile->read(CRCevent, sizeof(CRCevent));  
66    
67      calculatedCRC = CM_Compute_CRC16(0, (BYTE*)packetData, dataLength);      calpedestal_((char*)packetData, &dataLength, &ERROR);
68      readCRC = ((UINT16)(CRCevent[0]<<8)&0xFF00) + ((UINT16)(CRCevent[1])&0x00FF);  
69            calibCalPed->unpackError = ERROR;
70      if (calculatedCRC == readCRC) {      if (ERROR != 0) {
71          calpedestal_((short*)packetData, &dataLength, &ERROR);          char *errmsg;
72          if (ERROR != 0) {          switch (ERROR){
73              char *errmsg;              case 1: errmsg = "CALORIMETER NOT FOUND";
74              switch (ERROR){          }
75                  case 1: errmsg = "CALORIMETER NOT FOUND";          oss.str("");
76              }          oss << "Fortran77 function calpedestal error code = " << ERROR
77              oss.flush();              <<  " " << errmsg;
78              oss << "Fortran77 function calpulse error code = " << ERROR          logger->warn(oss.str().c_str());
79                  <<  errmsg;      } else {
80              logger->warn(oss.str().c_str());        //Store the unpacked data
81          } else {          calibCalPed->iev = calib_.iev;
82            //Store the unpacked data          memcpy(calibCalPed->cstwerr, calib_.cstwerr, sizeof(calibCalPed->cstwerr));
83              calibCalPed->IEV2 = calib_.IEV2;          memcpy(calibCalPed->cperror, calib_.cperror, sizeof(calibCalPed->cperror));
84          //--------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
85              int tempCalped[96][11][4];          float tempCalped[96][11][4];
86              int tempCalgood[96][11][4];          float tempCalgood[96][11][4];
87              int tempCalthr[6][11][4];          float tempCalthr[6][11][4];
88              int tempCalrms[96][11][4];          float tempCalrms[96][11][4];
89              int tempCalbase[6][11][4];          float tempCalbase[6][11][4];
90              int tempCalvar[6][11][4];          float tempCalvar[6][11][4];
91              int tempCalpuls[96][11][4];          float tempCalpuls[96][11][4];
92    
93              memcpy(tempCalped,  calib_.calped,  sizeof(tempCalped));          memcpy(tempCalped,  calib_.calped,  sizeof(tempCalped));
94              memcpy(tempCalgood, calib_.calgood, sizeof(tempCalgood));          memcpy(tempCalgood, calib_.calgood, sizeof(tempCalgood));
95              memcpy(tempCalthr,  calib_.calthr,  sizeof(tempCalthr));          memcpy(tempCalthr,  calib_.calthr,  sizeof(tempCalthr));
96              memcpy(tempCalrms,  calib_.calrms,  sizeof(tempCalrms));          memcpy(tempCalrms,  calib_.calrms,  sizeof(tempCalrms));
97              memcpy(tempCalbase, calib_.calbase, sizeof(tempCalbase));          memcpy(tempCalbase, calib_.calbase, sizeof(tempCalbase));
98              memcpy(tempCalvar,  calib_.calvar,  sizeof(tempCalvar));          memcpy(tempCalvar,  calib_.calvar,  sizeof(tempCalvar));
99              memcpy(tempCalpuls, calib_.calpuls, sizeof(tempCalpuls));          memcpy(tempCalpuls, calib_.calpuls, sizeof(tempCalpuls));
100    
101              for (int i = 0; i < 4; i++){          for (int i = 0; i < 4; i++){
102                  for (int j = 0; j <11; j++){              for (int j = 0; j <11; j++){
103                      for (int z = 0; z < 96; z++){                  for (int z = 0; z < 96; z++){
104                          calibCalPed->calped[i][j][z]    = tempCalped[z][j][i];                      calibCalPed->calped[i][j][z]    = tempCalped[z][j][i];
105                          calibCalPed->calgood[i][j][z]   = tempCalgood[z][j][i];                      calibCalPed->calgood[i][j][z]   = tempCalgood[z][j][i];
106                          calibCalPed->calrms[i][j][z]    = tempCalrms[z][j][i];                      calibCalPed->calrms[i][j][z]    = tempCalrms[z][j][i];
107                          calibCalPed->calpuls[i][j][z]    = tempCalpuls[z][j][i];                      calibCalPed->calpuls[i][j][z]   = tempCalpuls[z][j][i];
                     }  
108                  }                  }
109              }              }
110            }
111    
112              for (int i = 0; i < 4; i++){          for (int i = 0; i < 4; i++){
113                  for (int j = 0; j <11; j++){              for (int j = 0; j <11; j++){
114                      for (int z = 0; z < 6; z++){                  for (int z = 0; z < 6; z++){
115                          calibCalPed->calthr[i][j][z]    = tempCalthr[z][j][i];                      calibCalPed->calthr[i][j][z]    = tempCalthr[z][j][i];
116                          calibCalPed->calbase[i][j][z]   = tempCalbase[z][j][i];                      calibCalPed->calbase[i][j][z]   = tempCalbase[z][j][i];
117                          calibCalPed->calvar[i][j][z]    = tempCalvar[z][j][i];                      calibCalPed->calvar[i][j][z]    = tempCalvar[z][j][i];
                     }  
118                  }                  }
119              }              }
         //-----------------------------------------------------------------------------------------  
120          }          }
121      } else {      //-----------------------------------------------------------------------------------------
         logger->warn(_T("The test of calculated CRC with one wrote on file FAILED!!"));  
122      }      }
     delete [] packetData;  
123  }  }
124    
125    
Legend:
Removed from v.1.7  
changed lines
  Added in v.2.5
  ViewVC Help
Powered by ViewVC 1.1.23