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

Diff of /yoda/techmodel/CalibTrk2Reader.cpp

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

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