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

Diff of /yoda/techmodel/CalibTrk1Reader.cpp

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

revision 1.4 by kusanagi, Thu Aug 19 15:24:46 2004 UTC revision 6.0 by kusanagi, Tue Feb 7 17:11:09 2006 UTC
# Line 1  Line 1 
1  /** @file  /** @file
2   * $Source: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v $   * $Source: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v $
3   * $Id: CalibTrk1Reader.cpp,v 1.3 2004/07/17 20:03:38 kusanagi Exp $   * $Id: CalibTrk1Reader.cpp,v 5.1 2006/02/04 12:37:44 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the LogReader class.   * Implementation of the LogReader class.
# Line 11  Line 11 
11  #define UINT unsigned int  #define UINT unsigned int
12  #define BYTE  unsigned char  #define BYTE  unsigned char
13  #include <string>  #include <string>
14  #include <log4cpp/Category.hh>  #include <log4cxx/logger.h>
15    #include <fstream>
16    #include "stdio.h"
17    #include "ReaderAlgorithms.h"
18    #include "event/PamelaRun.h"
19    
20    #include "event/CalibTrk1Event.h"
21    
22  extern "C" {  extern "C" {
23      #include "CRC.h"      #include "CRC.h"
24      //The int* return the error code      extern void trkcalibpkt_(int*, unsigned char[], long int*, int*); //(*)
     //The char* is the path to the temporary file  
     extern void trkcalibpkt_(int*, char*);  
25    
26      //Struct per il passaggio di dati da e verso la chiamata fortran      //Struct per il passaggio di dati da e verso la chiamata fortran
27      extern struct {      extern struct {
28        int   DAQmode[6];      int   good0;
29        int   DSPnumber[6];      int   DAQmode[6];
30        int   calibnumber[6];      int   DSPnumber[6];
31        int   ncalib_event[6];      int   calibnumber[6];
32        int   ped_l1[6];      int   ncalib_event[6];
33        int   ped_l2[6];      int   ped_l1[6];
34        int   ped_l3[6];      int   ped_l2[6];
35        int   sig_l1[6];      int   ped_l3[6];
36        int   sig_l2[6];      int   sig_l1[6];
37        int   sig_l3[6];      int   sig_l2[6];
38        int   nbad_l1[6];      int   sig_l3[6];
39        int   nbad_l2[6];      int   nbad_l1[6];
40        int   nbad_l3[6];      int   nbad_l2[6];
41        int   cal_flag[6];      int   nbad_l3[6];
42        int   DSPped_par[6][3072];      int   cal_flag[6];
43        float DSPsig_par[6][3072];      float DSPped_par[3072][6];
44        float DSPbad_par[6][3072];      float DSPsig_par[3072][6];
45        int   DSPbad_par[3072][6];
46        int   crc_cal[3][6];
47        int   crc_hcal[6];
48      } trkcalib_;      } trkcalib_;
   
49  #include <dirent.h>  #include <dirent.h>
50  }  }
51    
 #include <fstream>  
 #include "stdio.h"  
 #include "ReaderAlgorithms.h"  
 #include "event/PamelaRun.h"  
   
 #include "event/CalibTrk1Event.h"  
   
52  using namespace pamela;  using namespace pamela;
53  using namespace pamela::techmodel;  using namespace pamela::techmodel;
54    
55  static log4cpp::Category& cat = log4cpp::Category::getInstance("pamela.techmodel.CalibTrk1Reader");    static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.CalibTrk1Reader"));
56    
57  /**  /**
58   * Constructor.   * Constructor.
59   */   */
60  CalibTrk1Reader::CalibTrk1Reader(void):  CalibTrk1Reader::CalibTrk1Reader(void):
61    TechmodelAlgorithm(PacketType::CalibTrk1, "TechmodelCalibTrk1Reader") {    TechmodelAlgorithm(PacketType::CalibTrk1, "TechmodelCalibTrk1Reader") {
62    cat <<  log4cpp::Priority::DEBUG    logger->debug(_T("Constructor"));
       <<  "Constructor "  
       <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
63    calibTrk1 = new CalibTrk1Event();    calibTrk1 = new CalibTrk1Event();
64  }  }
65    
# Line 70  CalibTrk1Reader::CalibTrk1Reader(void): Line 68  CalibTrk1Reader::CalibTrk1Reader(void):
68   */   */
69  std::string CalibTrk1Reader::GetVersionInfo(void) const {  std::string CalibTrk1Reader::GetVersionInfo(void) const {
70    return    return
71      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v 1.3 2004/07/17 20:03:38 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v 5.1 2006/02/04 12:37:44 kusanagi Exp $\n";
72  }  }
73    
74  /**  /**
# Line 78  std::string CalibTrk1Reader::GetVersionI Line 76  std::string CalibTrk1Reader::GetVersionI
76   * event reader routines for all packet types.   * event reader routines for all packet types.
77   */   */
78  void CalibTrk1Reader::Init(PamelaRun *run) {  void CalibTrk1Reader::Init(PamelaRun *run) {
79      logger->debug(_T("Initialize"));
80    SetInputStream(run);    SetInputStream(run);
81    run->WriteSubPacket(this, &calibTrk1, calibTrk1->Class());    run->WriteSubPacket(this, &calibTrk1, calibTrk1->Class());
82  }  }
# Line 86  void CalibTrk1Reader::Init(PamelaRun *ru Line 85  void CalibTrk1Reader::Init(PamelaRun *ru
85   * Unpack the CalibTrk event from an input file.   * Unpack the CalibTrk event from an input file.
86   */   */
87  //void CalibTrkReader::RunEvent(int EventNumber, long int length, char *subData) {  //void CalibTrkReader::RunEvent(int EventNumber, long int length, char *subData) {
88  void CalibTrk1Reader::RunEvent(int EventNumber, long int length) {  void CalibTrk1Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
89        std::stringstream oss;    
90      char     *subData;      char     subData[dataLength];
91      char      eventCRC[2];      int       ERROR;
     UINT16    subCRC;      //CRC of the data  
     UINT16    readCRC;     //CRC read from the end of the subpacket  
     long int  dataLength;  
   
     //the 2 bytes subtracted belong to the final event CRC bytes  
     dataLength = length - (long int)2;  
   
     subData = new char[dataLength];  
92      InputFile->read(subData, sizeof(unsigned char)*dataLength);      InputFile->read(subData, sizeof(unsigned char)*dataLength);
     subCRC = CM_Compute_CRC16(0, (BYTE*)subData, dataLength);  
93    
94      //took the final CRC to compare it with the previous calculated CRC of the data      char *data = new char[dataLength];
95      InputFile->read(eventCRC, sizeof(eventCRC));      memcpy(data, subData, dataLength);
96      readCRC = (((UINT16)(eventCRC[0]<<8))&0xFF00) + (((UINT16)eventCRC[1])&0x00FF);      int curpos=1;
97            
98      if (subCRC == readCRC){      //Call to the FORTRAN routin that unpack tracker events
99          int       ERROR;      trkcalibpkt_( &ERROR,(unsigned char*)data, &dataLength, &curpos);
         //Scrivo un file temporaneo per passarlo alla routine  
         //Speriamo di cambiare la routine per passargli un buffer.....  
         DIR *dirp;  
         std::string pathDir((char*)getenv("YODA_DATA"));  
         pathDir = pathDir + "/todatemp.dat";;  
         FILE *pfile;  
         pfile = fopen((char*)pathDir.c_str(), "wb");  
         fwrite(subData, 1, dataLength, pfile);  
         fclose(pfile);  
100    
101          //Call to the FORTRAN routin that unpack tracker events      calibTrk1->unpackError = ERROR;
102          trkcalibpkt_(&ERROR, (char*)pathDir.c_str());      if (ERROR != 0) {
103                oss.str("");
104          remove((char*)pathDir.c_str());          oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
105                logger->warn(oss.str().c_str());
106          //Store the unpacked data      }
107          memcpy(calibTrk1->DAQmode,     trkcalib_.DAQmode,     sizeof(calibTrk1->DAQmode));  
108          memcpy(calibTrk1->DSPnumber,   trkcalib_.DSPnumber,   sizeof(calibTrk1->DSPnumber));      //Store the unpacked data
109          memcpy(calibTrk1->calibnumber, trkcalib_.calibnumber, sizeof(calibTrk1->calibnumber));      calibTrk1->good0 = trkcalib_.good0;
110          memcpy(calibTrk1->DSPnumber, trkcalib_.ncalib_event,  sizeof(calibTrk1->ncalib_event));      memcpy(calibTrk1->DAQmode,      trkcalib_.DAQmode,      sizeof(calibTrk1->DAQmode));
111          memcpy(calibTrk1->ped_l1,    trkcalib_.ped_l1,     sizeof(calibTrk1->ped_l1));      memcpy(calibTrk1->DSPnumber,    trkcalib_.DSPnumber,    sizeof(calibTrk1->DSPnumber));
112          memcpy(calibTrk1->ped_l2,    trkcalib_.ped_l2,     sizeof(calibTrk1->ped_l2));      memcpy(calibTrk1->calibnumber,  trkcalib_.calibnumber,  sizeof(calibTrk1->calibnumber));
113          memcpy(calibTrk1->ped_l3,    trkcalib_.ped_l3,     sizeof(calibTrk1->ped_l3));      memcpy(calibTrk1->ncalib_event, trkcalib_.ncalib_event, sizeof(calibTrk1->ncalib_event));
114          memcpy(calibTrk1->sig_l1,    trkcalib_.sig_l1,     sizeof(calibTrk1->sig_l1));      memcpy(calibTrk1->ped_l1,       trkcalib_.ped_l1,       sizeof(calibTrk1->ped_l1));
115          memcpy(calibTrk1->sig_l2,    trkcalib_.sig_l2,     sizeof(calibTrk1->sig_l2));      memcpy(calibTrk1->ped_l2,       trkcalib_.ped_l2,       sizeof(calibTrk1->ped_l2));
116          memcpy(calibTrk1->sig_l3,    trkcalib_.sig_l3,     sizeof(calibTrk1->sig_l3));      memcpy(calibTrk1->ped_l3,       trkcalib_.ped_l3,       sizeof(calibTrk1->ped_l3));
117          memcpy(calibTrk1->nbad_l1,   trkcalib_.nbad_l1,    sizeof(calibTrk1->nbad_l1));      memcpy(calibTrk1->sig_l1,       trkcalib_.sig_l1,       sizeof(calibTrk1->sig_l1));
118          memcpy(calibTrk1->nbad_l2,   trkcalib_.nbad_l2,    sizeof(calibTrk1->nbad_l2));      memcpy(calibTrk1->sig_l2,       trkcalib_.sig_l2,       sizeof(calibTrk1->sig_l2));
119          memcpy(calibTrk1->nbad_l3,   trkcalib_.nbad_l3,    sizeof(calibTrk1->nbad_l3));      memcpy(calibTrk1->sig_l3,       trkcalib_.sig_l3,       sizeof(calibTrk1->sig_l3));
120          memcpy(calibTrk1->cal_flag,  trkcalib_.cal_flag,   sizeof(calibTrk1->cal_flag));            memcpy(calibTrk1->nbad_l1,      trkcalib_.nbad_l1,      sizeof(calibTrk1->nbad_l1));
121        memcpy(calibTrk1->nbad_l2,      trkcalib_.nbad_l2,      sizeof(calibTrk1->nbad_l2));
122  //--------have to invert array because of FORTRAN <-> C different management of the indexes      memcpy(calibTrk1->nbad_l3,      trkcalib_.nbad_l3,      sizeof(calibTrk1->nbad_l3));
123          int tempBad_par[3072][6];      memcpy(calibTrk1->cal_flag,     trkcalib_.cal_flag,     sizeof(calibTrk1->cal_flag));      
124          int tempPed_par[3072][6];  
125          int tempSig_par[3072][6];      int     tempBad_par[3072][6];
126          memcpy(calibTrk1->DSPbad_par,trkcalib_.DSPbad_par, sizeof(calibTrk1->DSPbad_par));            float   tempPed_par[3072][6];
127          memcpy(calibTrk1->DSPped_par,trkcalib_.DSPped_par, sizeof(calibTrk1->DSPped_par));            float   tempSig_par[3072][6];
128          memcpy(calibTrk1->DSPsig_par,trkcalib_.DSPsig_par, sizeof(calibTrk1->DSPsig_par));            int     tempCrc_cal[3][6];
129        memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));      
130          for (int i = 0; i < 6; i++){      memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));      
131              for (int j = 0; j < 3072; j++){      memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));      
132                  calibTrk1->DSPbad_par[i][j] = tempBad_par[j][i];      memcpy(tempCrc_cal,trkcalib_.crc_cal,    sizeof(tempCrc_cal));      
133                  calibTrk1->DSPped_par[i][j] = tempPed_par[j][i];  
134                  calibTrk1->DSPsig_par[i][j] = tempSig_par[j][i];      for (int i = 0; i < 6; i++){
135              }          for (int j = 0; j < 3072; j++){
136                calibTrk1->DSPbad_par[i][j] = tempBad_par[j][i];
137                calibTrk1->DSPped_par[i][j] = tempPed_par[j][i];
138                calibTrk1->DSPsig_par[i][j] = tempSig_par[j][i];
139            }
140            for (int k = 0; k < 3; k++){
141                calibTrk1->crc_cal[i][k] = tempCrc_cal[k][i];
142          }          }
143        }
144  //-----------------------------------------------------------------------------------------  //-----------------------------------------------------------------------------------------
           
145    
         cat <<  log4cpp::Priority::ERROR  
         <<  "Fortran77 function trkcalibpkt error code = " << ERROR  
         <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
         free(subData);      
     } else {  
         cat <<  log4cpp::Priority::ERROR  
             <<  "Wrong CRC for CalibTrk1 Packet "  
             <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
     }  
146  }  }
147    
148    
Legend:
Removed from v.1.4  
changed lines
  Added in v.6.0
  ViewVC Help
Powered by ViewVC 1.1.23