/[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.2 by kusanagi, Tue Jul 6 13:31:18 2004 UTC revision 2.0 by kusanagi, Tue Sep 21 20:50:54 2004 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.1 2004/07/06 12:31:55 kusanagi Exp $   * $Id: CalibTrk2Reader.cpp,v 1.6 2004/09/21 20:24:33 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  extern "C" {  extern "C" {
16        #include "CRC.h"
17      //Passo il path verso la il file temporaneo      //Passo il path verso la il file temporaneo
18      extern void trkcalibpkt_(int*, char*);      extern void trkcalibpkt_(int*, char*);
19    
# Line 50  extern "C" { Line 51  extern "C" {
51  using namespace pamela;  using namespace pamela;
52  using namespace pamela::techmodel;  using namespace pamela::techmodel;
53    
54  static log4cpp::Category& cat = log4cpp::Category::getInstance("pamela.techmodel.CalibTrk2Reader");    static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.CalibTrk2Reader"));
55    
56  /**  /**
57   * Constructor.   * Constructor.
58   */   */
59  CalibTrk2Reader::CalibTrk2Reader(void):  CalibTrk2Reader::CalibTrk2Reader(void):
60    TechmodelAlgorithm(PacketType::CalibTrk2, "TechmodelCalibTrk2Reader") {    TechmodelAlgorithm(PacketType::CalibTrk2, "TechmodelCalibTrk2Reader") {
61    cat <<  log4cpp::Priority::DEBUG    logger->debug(_T("Constructor"));
       <<  "Constructor "  
       <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
62    calibTrk2 = new CalibTrk2Event();    calibTrk2 = new CalibTrk2Event();
63  }  }
64    
# Line 68  CalibTrk2Reader::CalibTrk2Reader(void): Line 67  CalibTrk2Reader::CalibTrk2Reader(void):
67   */   */
68  std::string CalibTrk2Reader::GetVersionInfo(void) const {  std::string CalibTrk2Reader::GetVersionInfo(void) const {
69    return    return
70      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 1.1 2004/07/06 12:31:55 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 1.6 2004/09/21 20:24:33 kusanagi Exp $\n";
71  }  }
72    
73  /**  /**
# Line 76  std::string CalibTrk2Reader::GetVersionI Line 75  std::string CalibTrk2Reader::GetVersionI
75   * event reader routines for all packet types.   * event reader routines for all packet types.
76   */   */
77  void CalibTrk2Reader::Init(PamelaRun *run) {  void CalibTrk2Reader::Init(PamelaRun *run) {
78      logger->debug(_T("Initialize"));
79    SetInputStream(run);    SetInputStream(run);
80    run->WriteSubPacket(this, &calibTrk2, calibTrk2->Class());    run->WriteSubPacket(this, &calibTrk2, calibTrk2->Class());
81  }  }
# Line 84  void CalibTrk2Reader::Init(PamelaRun *ru Line 84  void CalibTrk2Reader::Init(PamelaRun *ru
84   * Unpack the CalibTrk2 event from an input file.   * Unpack the CalibTrk2 event from an input file.
85   */   */
86  void CalibTrk2Reader::RunEvent(int EventNumber, long int length) {  void CalibTrk2Reader::RunEvent(int EventNumber, long int length) {
87      int       ERROR;      std::stringstream oss;    
88            char     *subData;
89        char      eventCRC[2];
90        UINT16    subCRC;      //CRC of the data
91        UINT16    readCRC;     //CRC read from the end of the subpacket
92        long int  dataLength;
93    
94      //the 2 bytes subtracted belong to the final event CRC bytes      //the 2 bytes subtracted belong to the final event CRC bytes
95      long int dataLength = length;// - (long int)2;      dataLength = length - (long int)2;
96    
97      char *subData = new char[dataLength];      subData = new char[dataLength];
98      InputFile->read(subData, sizeof(unsigned char)*dataLength);      InputFile->read(subData, sizeof(unsigned char)*dataLength);
99        subCRC = CM_Compute_CRC16(0, (BYTE*)subData, dataLength);
100    
101      //Skip the last two crc bytes already checked in UnpackPscu      //took the final CRC to compare it with the previous calculated CRC of the data
102      //This part have to be refactored!!!! too bad......      InputFile->read(eventCRC, sizeof(eventCRC));
103      InputFile->seekg((long int)2, std::ios::cur);      readCRC = (((UINT16)(eventCRC[0]<<8))&0xFF00) + (((UINT16)eventCRC[1])&0x00FF);
104        
105      //Scrivo un file temporaneo per passarlo alla routine      if (subCRC == readCRC){
106      //Speriamo di cambiare la routine per passargli un buffer.....          int       ERROR;
     DIR *dirp;  
     std::string pathDir((char*)getenv("YODA_DATA"));  
     pathDir = pathDir + "/";  
     pathDir = pathDir + PamelaRun::GetRunName(EventNumber) + "/todatemp.dat";  
     FILE *pfile;  
     pfile = fopen((char*)pathDir.c_str(), "wb");  
     fwrite(subData, 1, dataLength, pfile);  
     fclose(pfile);  
   
     //Call to the FORTRAN routin that unpack tracker events  
     trkcalibpkt_(&ERROR, (char*)pathDir.c_str());  
   
     remove((char*)pathDir.c_str());  
   
     //Store the unpacked data  
     memcpy(calibTrk2->DAQmode,     trkcalib_.DAQmode,     sizeof(calibTrk2->DAQmode));  
     memcpy(calibTrk2->DSPnumber,   trkcalib_.DSPnumber,   sizeof(calibTrk2->DSPnumber));  
     memcpy(calibTrk2->calibnumber, trkcalib_.calibnumber, sizeof(calibTrk2->calibnumber));  
     memcpy(calibTrk2->DSPnumber, trkcalib_.ncalib_event,  sizeof(calibTrk2->ncalib_event));  
     memcpy(calibTrk2->ped_l1,    trkcalib_.ped_l1,     sizeof(calibTrk2->ped_l1));  
     memcpy(calibTrk2->ped_l2,    trkcalib_.ped_l2,     sizeof(calibTrk2->ped_l2));  
     memcpy(calibTrk2->ped_l3,    trkcalib_.ped_l3,     sizeof(calibTrk2->ped_l3));  
     memcpy(calibTrk2->sig_l1,    trkcalib_.sig_l1,     sizeof(calibTrk2->sig_l1));  
     memcpy(calibTrk2->sig_l2,    trkcalib_.sig_l2,     sizeof(calibTrk2->sig_l2));  
     memcpy(calibTrk2->sig_l3,    trkcalib_.sig_l3,     sizeof(calibTrk2->sig_l3));  
     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));        
     memcpy(calibTrk2->checksum,  trkcalib_.checksum,   sizeof(calibTrk2->checksum));        
     memcpy(calibTrk2->DSPbad_par,trkcalib_.DSPbad_par, sizeof(calibTrk2->DSPbad_par));        
     memcpy(calibTrk2->DSPped_par,trkcalib_.DSPped_par, sizeof(calibTrk2->DSPped_par));        
     memcpy(calibTrk2->DSPsig_par,trkcalib_.DSPsig_par, sizeof(calibTrk2->DSPsig_par));        
   
     cat <<  log4cpp::Priority::ERROR  
         <<  "Fortran77 function trkcalibpkt error code = " << ERROR  
         <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
     free(subData);      
107            
108            //Scrivo un file temporaneo per passarlo alla routine
109            //Speriamo di cambiare la routine per passargli un buffer.....
110            DIR *dirp;
111            std::string pathDir((char*)getenv("YODA_DATA"));
112            pathDir = pathDir + "/todatemp.dat";
113            FILE *pfile;
114            pfile = fopen((char*)pathDir.c_str(), "wb");
115            fwrite(subData, 1, dataLength, pfile);
116            fclose(pfile);
117    
118            //Call to the FORTRAN routin that unpack tracker events
119            trkcalibpkt_(&ERROR, (char*)pathDir.c_str());
120            
121            //delete the temporary file
122            remove((char*)pathDir.c_str());
123    
124            //Store the unpacked data
125            memcpy(calibTrk2->DAQmode,     trkcalib_.DAQmode,     sizeof(calibTrk2->DAQmode));
126            memcpy(calibTrk2->DSPnumber,   trkcalib_.DSPnumber,   sizeof(calibTrk2->DSPnumber));
127            memcpy(calibTrk2->calibnumber, trkcalib_.calibnumber, sizeof(calibTrk2->calibnumber));
128            memcpy(calibTrk2->DSPnumber, trkcalib_.ncalib_event,  sizeof(calibTrk2->ncalib_event));
129            memcpy(calibTrk2->ped_l1,    trkcalib_.ped_l1,     sizeof(calibTrk2->ped_l1));
130            memcpy(calibTrk2->ped_l2,    trkcalib_.ped_l2,     sizeof(calibTrk2->ped_l2));
131            memcpy(calibTrk2->ped_l3,    trkcalib_.ped_l3,     sizeof(calibTrk2->ped_l3));
132            memcpy(calibTrk2->sig_l1,    trkcalib_.sig_l1,     sizeof(calibTrk2->sig_l1));
133            memcpy(calibTrk2->sig_l2,    trkcalib_.sig_l2,     sizeof(calibTrk2->sig_l2));
134            memcpy(calibTrk2->sig_l3,    trkcalib_.sig_l3,     sizeof(calibTrk2->sig_l3));
135            memcpy(calibTrk2->nbad_l1,   trkcalib_.nbad_l1,    sizeof(calibTrk2->nbad_l1));
136            memcpy(calibTrk2->nbad_l2,   trkcalib_.nbad_l2,    sizeof(calibTrk2->nbad_l2));
137            memcpy(calibTrk2->nbad_l3,   trkcalib_.nbad_l3,    sizeof(calibTrk2->nbad_l3));
138            memcpy(calibTrk2->cal_flag,  trkcalib_.cal_flag,   sizeof(calibTrk2->cal_flag));      
139      
140    //--------have to invert array because of FORTRAN <-> C different management of the indexes
141            int tempBad_par[3072][6];
142            int tempPed_par[3072][6];
143            int tempSig_par[3072][6];
144            memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));      
145            memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));      
146            memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));      
147    
148            for (int i = 0; i < 6; i++){
149                for (int j = 0; j < 3072; j++){
150                    calibTrk2->DSPbad_par[i][j] = tempBad_par[j][i];
151                    calibTrk2->DSPped_par[i][j] = tempPed_par[j][i];
152                    calibTrk2->DSPsig_par[i][j] = tempSig_par[j][i];
153                }
154            }
155    //-----------------------------------------------------------------------------------------
156            oss.flush();
157            oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
158            logger->warn(oss.str().c_str());
159        } else {
160            logger->debug(_T("Wrong CRC for CalibTrk2 Packet "));
161        }
162        delete [] subData;
163  }  }
164    
Legend:
Removed from v.1.2  
changed lines
  Added in v.2.0
  ViewVC Help
Powered by ViewVC 1.1.23