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