/[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.2 by kusanagi, Tue Jul 6 13:31:18 2004 UTC revision 2.4 by kusanagi, Wed Dec 22 11:38:35 2004 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.1 2004/07/06 12:31:55 kusanagi Exp $   * $Id: CalibTrk1Reader.cpp,v 2.3 2004/12/16 17:32:57 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      //The int* return the error code      //The int* return the error code
18      //The char* is the path to the temporary file      //The char* is the path to the temporary file
19      extern void trkcalibpkt_(int*, char*);      extern void trkcalibpkt_(int*, char*);
# Line 33  extern "C" { Line 34  extern "C" {
34        int   nbad_l2[6];        int   nbad_l2[6];
35        int   nbad_l3[6];        int   nbad_l3[6];
36        int   cal_flag[6];        int   cal_flag[6];
37        int   checksum[6];        int   DSPped_par[6][3072];
       int   DSPbad_par[6][3072];  
       float DSPped_par[6][3072];  
38        float DSPsig_par[6][3072];        float DSPsig_par[6][3072];
39          float DSPbad_par[6][3072];
40      } trkcalib_;      } trkcalib_;
   
41  #include <dirent.h>  #include <dirent.h>
42  }  }
43    
# Line 52  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.CalibTrk1Reader");    static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.CalibTrk1Reader"));
55    
56  /**  /**
57   * Constructor.   * Constructor.
58   */   */
59  CalibTrk1Reader::CalibTrk1Reader(void):  CalibTrk1Reader::CalibTrk1Reader(void):
60    TechmodelAlgorithm(PacketType::CalibTrk1, "TechmodelCalibTrk1Reader") {    TechmodelAlgorithm(PacketType::CalibTrk1, "TechmodelCalibTrk1Reader") {
61    cat <<  log4cpp::Priority::DEBUG    logger->debug(_T("Constructor"));
       <<  "Constructor "  
       <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
62    calibTrk1 = new CalibTrk1Event();    calibTrk1 = new CalibTrk1Event();
63  }  }
64    
# Line 70  CalibTrk1Reader::CalibTrk1Reader(void): Line 67  CalibTrk1Reader::CalibTrk1Reader(void):
67   */   */
68  std::string CalibTrk1Reader::GetVersionInfo(void) const {  std::string CalibTrk1Reader::GetVersionInfo(void) const {
69    return    return
70      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v 1.1 2004/07/06 12:31:55 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v 2.3 2004/12/16 17:32:57 kusanagi Exp $\n";
71  }  }
72    
73  /**  /**
# Line 78  std::string CalibTrk1Reader::GetVersionI Line 75  std::string CalibTrk1Reader::GetVersionI
75   * event reader routines for all packet types.   * event reader routines for all packet types.
76   */   */
77  void CalibTrk1Reader::Init(PamelaRun *run) {  void CalibTrk1Reader::Init(PamelaRun *run) {
78      logger->debug(_T("Initialize"));
79    SetInputStream(run);    SetInputStream(run);
80    run->WriteSubPacket(this, &calibTrk1, calibTrk1->Class());    run->WriteSubPacket(this, &calibTrk1, calibTrk1->Class());
81  }  }
# Line 86  void CalibTrk1Reader::Init(PamelaRun *ru Line 84  void CalibTrk1Reader::Init(PamelaRun *ru
84   * Unpack the CalibTrk event from an input file.   * Unpack the CalibTrk event from an input file.
85   */   */
86  //void CalibTrkReader::RunEvent(int EventNumber, long int length, char *subData) {  //void CalibTrkReader::RunEvent(int EventNumber, long int length, char *subData) {
87  void CalibTrk1Reader::RunEvent(int EventNumber, long int length) {  void CalibTrk1Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
88        std::stringstream oss;    
89        char     subData[dataLength];
90      int       ERROR;      int       ERROR;
       
     //the 2 bytes subtracted belong to the final event CRC bytes  
     long int dataLength = length;// - (long int)2;  
   
     char *subData = new char[dataLength];  
91      InputFile->read(subData, sizeof(unsigned char)*dataLength);      InputFile->read(subData, sizeof(unsigned char)*dataLength);
92      
     //Skip the last two crc bytes already checked in UnpackPscu  
     //This part have to be refactored!!!! too bad......  
     InputFile->seekg((long int)2, std::ios::cur);  
   
93      //Scrivo un file temporaneo per passarlo alla routine      //Scrivo un file temporaneo per passarlo alla routine
94      //Speriamo di cambiare la routine per passargli un buffer.....      //Speriamo di cambiare la routine per passargli un buffer.....
95      DIR *dirp;      oss.str("");
96      std::string pathDir((char*)getenv("YODA_DATA"));      oss << getenv("YODA_DATA") << "/" << time(NULL) << "trc1.dat";
     pathDir = pathDir + "/";  
     pathDir = pathDir + PamelaRun::GetRunName(EventNumber) + "/todatemp.dat";  
97      FILE *pfile;      FILE *pfile;
98      pfile = fopen((char*)pathDir.c_str(), "wb");      pfile = fopen(oss.str().c_str(), "wb");
99      fwrite(subData, 1, dataLength, pfile);      fwrite(subData, 1, dataLength, pfile);
100      fclose(pfile);      fclose(pfile);
101    
102      //Call to the FORTRAN routin that unpack tracker events      //Call to the FORTRAN routin that unpack tracker events
103      trkcalibpkt_(&ERROR, (char*)pathDir.c_str());      trkcalibpkt_(&ERROR, (char*)oss.str().c_str());
104        
105      remove((char*)pathDir.c_str());      if (ERROR != 0) {
106                oss.str("");
107            oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
108            logger->warn(oss.str().c_str());
109        }
110    
111        remove((char*)oss.str().c_str());
112    
113      //Store the unpacked data      //Store the unpacked data
114      memcpy(calibTrk1->DAQmode,     trkcalib_.DAQmode,     sizeof(calibTrk1->DAQmode));      memcpy(calibTrk1->DAQmode,      trkcalib_.DAQmode,      sizeof(calibTrk1->DAQmode));
115      memcpy(calibTrk1->DSPnumber,   trkcalib_.DSPnumber,   sizeof(calibTrk1->DSPnumber));      memcpy(calibTrk1->DSPnumber,    trkcalib_.DSPnumber,    sizeof(calibTrk1->DSPnumber));
116      memcpy(calibTrk1->calibnumber, trkcalib_.calibnumber, sizeof(calibTrk1->calibnumber));      memcpy(calibTrk1->calibnumber,  trkcalib_.calibnumber,  sizeof(calibTrk1->calibnumber));
117      memcpy(calibTrk1->DSPnumber, trkcalib_.ncalib_event,  sizeof(calibTrk1->ncalib_event));      memcpy(calibTrk1->DSPnumber,    trkcalib_.ncalib_event, sizeof(calibTrk1->ncalib_event));
118      memcpy(calibTrk1->ped_l1,    trkcalib_.ped_l1,     sizeof(calibTrk1->ped_l1));      memcpy(calibTrk1->ped_l1,       trkcalib_.ped_l1,       sizeof(calibTrk1->ped_l1));
119      memcpy(calibTrk1->ped_l2,    trkcalib_.ped_l2,     sizeof(calibTrk1->ped_l2));      memcpy(calibTrk1->ped_l2,       trkcalib_.ped_l2,       sizeof(calibTrk1->ped_l2));
120      memcpy(calibTrk1->ped_l3,    trkcalib_.ped_l3,     sizeof(calibTrk1->ped_l3));      memcpy(calibTrk1->ped_l3,       trkcalib_.ped_l3,       sizeof(calibTrk1->ped_l3));
121      memcpy(calibTrk1->sig_l1,    trkcalib_.sig_l1,     sizeof(calibTrk1->sig_l1));      memcpy(calibTrk1->sig_l1,       trkcalib_.sig_l1,       sizeof(calibTrk1->sig_l1));
122      memcpy(calibTrk1->sig_l2,    trkcalib_.sig_l2,     sizeof(calibTrk1->sig_l2));      memcpy(calibTrk1->sig_l2,       trkcalib_.sig_l2,       sizeof(calibTrk1->sig_l2));
123      memcpy(calibTrk1->sig_l3,    trkcalib_.sig_l3,     sizeof(calibTrk1->sig_l3));      memcpy(calibTrk1->sig_l3,       trkcalib_.sig_l3,       sizeof(calibTrk1->sig_l3));
124      memcpy(calibTrk1->nbad_l1,   trkcalib_.nbad_l1,    sizeof(calibTrk1->nbad_l1));      memcpy(calibTrk1->nbad_l1,      trkcalib_.nbad_l1,      sizeof(calibTrk1->nbad_l1));
125      memcpy(calibTrk1->nbad_l2,   trkcalib_.nbad_l2,    sizeof(calibTrk1->nbad_l2));      memcpy(calibTrk1->nbad_l2,      trkcalib_.nbad_l2,      sizeof(calibTrk1->nbad_l2));
126      memcpy(calibTrk1->nbad_l3,   trkcalib_.nbad_l3,    sizeof(calibTrk1->nbad_l3));      memcpy(calibTrk1->nbad_l3,      trkcalib_.nbad_l3,      sizeof(calibTrk1->nbad_l3));
127      memcpy(calibTrk1->cal_flag,  trkcalib_.cal_flag,   sizeof(calibTrk1->cal_flag));            memcpy(calibTrk1->cal_flag,     trkcalib_.cal_flag,     sizeof(calibTrk1->cal_flag));      
128      memcpy(calibTrk1->checksum,  trkcalib_.checksum,   sizeof(calibTrk1->checksum));        //        memcpy(calibTrk1->DSPbad_par,   trkcalib_.DSPbad_par,   sizeof(calibTrk1->DSPbad_par));      
129    //        memcpy(calibTrk1->DSPped_par,   trkcalib_.DSPped_par,   sizeof(calibTrk1->DSPped_par));      
130    //        memcpy(calibTrk1->DSPsig_par,   trkcalib_.DSPsig_par,   sizeof(calibTrk1->DSPsig_par));      
131    //--------have to invert array because of FORTRAN <-> C different management of the indexes
132        int tempBad_par[3072][6];
133        int tempPed_par[3072][6];
134        int tempSig_par[3072][6];
135      memcpy(calibTrk1->DSPbad_par,trkcalib_.DSPbad_par, sizeof(calibTrk1->DSPbad_par));            memcpy(calibTrk1->DSPbad_par,trkcalib_.DSPbad_par, sizeof(calibTrk1->DSPbad_par));      
136      memcpy(calibTrk1->DSPped_par,trkcalib_.DSPped_par, sizeof(calibTrk1->DSPped_par));            memcpy(calibTrk1->DSPped_par,trkcalib_.DSPped_par, sizeof(calibTrk1->DSPped_par));      
137      memcpy(calibTrk1->DSPsig_par,trkcalib_.DSPsig_par, sizeof(calibTrk1->DSPsig_par));            memcpy(calibTrk1->DSPsig_par,trkcalib_.DSPsig_par, sizeof(calibTrk1->DSPsig_par));      
138    
139          cat <<  log4cpp::Priority::ERROR      for (int i = 0; i < 6; i++){
140          <<  "Fortran77 function trkcalibpkt error code = " << ERROR          for (int j = 0; j < 3072; j++){
141          <<  "\n " << log4cpp::CategoryStream::ENDLINE;              calibTrk1->DSPbad_par[i][j] = tempBad_par[j][i];
142      free(subData);                  calibTrk1->DSPped_par[i][j] = tempPed_par[j][i];
143                calibTrk1->DSPsig_par[i][j] = tempSig_par[j][i];
144            }
145        }
146    //-----------------------------------------------------------------------------------------
147        //delete [] subData;
148  }  }
149    
150    
Legend:
Removed from v.1.2  
changed lines
  Added in v.2.4
  ViewVC Help
Powered by ViewVC 1.1.23