/[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 5.0 by kusanagi, Mon Aug 29 09:46:13 2005 UTC revision 5.1 by kusanagi, Sat Feb 4 12:37:44 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 4.4 2005/05/28 10:44:11 kusanagi Exp $   * $Id: CalibTrk2Reader.cpp,v 5.0 2005/08/29 09:46:13 Maurizio Nagni Exp $
4   * $Author: kusanagi $   * $Author: Maurizio Nagni $
5   *   *
6   * Implementation of the LogReader class.   * Implementation of the LogReader class.
7  * ToBeDone:  * ToBeDone:
# Line 12  Line 12 
12  #define BYTE  unsigned char  #define BYTE  unsigned char
13  #include <string>  #include <string>
14  #include <log4cxx/logger.h>  #include <log4cxx/logger.h>
15    #include <fstream>
16    #include "stdio.h"
17    #include "ReaderAlgorithms.h"
18    #include "event/PamelaRun.h"
19    
20    #include "event/CalibTrk2Event.h"
21    
22  extern "C" {  extern "C" {
23      #include "CRC.h"      #include "CRC.h"
24      //Passo il path verso la il file temporaneo      extern void trkcalibpkt_(int*, unsigned char[], long int*, int*); //(*)
     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        float DSPped_par[6][3072];      int   cal_flag[6];
43        float DSPsig_par[6][3072];      float DSPped_par[3072][6];
44        int   DSPbad_par[6][3072];      float DSPsig_par[3072][6];
45      } trkcalib_;      int   DSPbad_par[3072][6];
46        int   crc_cal[3][6];
47        int   crc_hcal[6];
48        } trkcalib_;
49  #include <dirent.h>  #include <dirent.h>
50  }  }
51    
 #include <fstream>  
 #include "stdio.h"  
 #include "ReaderAlgorithms.h"  
   
 #include "event/CalibTrk2Event.h"  
   
52  using namespace pamela;  using namespace pamela;
53  using namespace pamela::techmodel;  using namespace pamela::techmodel;
54    
# Line 65  CalibTrk2Reader::CalibTrk2Reader(void): Line 68  CalibTrk2Reader::CalibTrk2Reader(void):
68   */   */
69  std::string CalibTrk2Reader::GetVersionInfo(void) const {  std::string CalibTrk2Reader::GetVersionInfo(void) const {
70    return    return
71      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 4.4 2005/05/28 10:44:11 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 5.0 2005/08/29 09:46:13 Maurizio Nagni Exp $\n";
72  }  }
73    
74  /**  /**
# Line 79  void CalibTrk2Reader::Init(PamelaRun *ru Line 82  void CalibTrk2Reader::Init(PamelaRun *ru
82  }  }
83    
84  /**  /**
85   * Unpack the CalibTrk2 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) {
88  void CalibTrk2Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){  void CalibTrk2Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
89      std::stringstream oss;          std::stringstream oss;    
90      char      subData[dataLength];      char     subData[dataLength];
91      int       ERROR;          int       ERROR;
   
92      InputFile->read(subData, sizeof(unsigned char)*dataLength);      InputFile->read(subData, sizeof(unsigned char)*dataLength);
93            char *data = new char[dataLength];                          
94      //Scrivo un file temporaneo per passarlo alla routine      memcpy(data, subData, dataLength);                          
95      //Speriamo di cambiare la routine per passargli un buffer.....      int curpos=1;                                              
     oss.str("");  
     oss << getenv("YODA_DATA") << "/" << time(NULL) << "trc2.dat";  
     FILE *pfile;  
     pfile = fopen(oss.str().c_str(), "wb");  
     fwrite(subData, 1, dataLength, pfile);  
     fclose(pfile);  
96    
97      //Call to the FORTRAN routin that unpack tracker events      //Call to the FORTRAN routin that unpack tracker events
98      trkcalibpkt_(&ERROR, (char*)oss.str().c_str());      trkcalibpkt_( &ERROR,(unsigned char*)data, &dataLength, &curpos);
99    
100      calibTrk2->unpackError = ERROR;      calibTrk2->unpackError = ERROR;
     remove(oss.str().c_str());  
101      if (ERROR != 0) {      if (ERROR != 0) {
102          oss.str("");          oss.str("");
103          oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;          oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
104          logger->warn(oss.str().c_str());          logger->warn(oss.str().c_str());
105      }      }
     //delete the temporary file  
     remove((char*)oss.str().c_str());  
106    
107      //Store the unpacked data      //Store the unpacked data
108      memcpy(calibTrk2->DAQmode,      trkcalib_.DAQmode,     sizeof(calibTrk2->DAQmode));      calibTrk2->good0 = trkcalib_.good0;
109      memcpy(calibTrk2->DSPnumber,    trkcalib_.DSPnumber,   sizeof(calibTrk2->DSPnumber));      memcpy(calibTrk2->DAQmode,      trkcalib_.DAQmode,      sizeof(calibTrk2->DAQmode));
110      memcpy(calibTrk2->calibnumber,  trkcalib_.calibnumber, sizeof(calibTrk2->calibnumber));      memcpy(calibTrk2->DSPnumber,    trkcalib_.DSPnumber,    sizeof(calibTrk2->DSPnumber));
111      memcpy(calibTrk2->DSPnumber,    trkcalib_.ncalib_event,  sizeof(calibTrk2->ncalib_event));      memcpy(calibTrk2->calibnumber,  trkcalib_.calibnumber,  sizeof(calibTrk2->calibnumber));
112      memcpy(calibTrk2->ped_l1,       trkcalib_.ped_l1,     sizeof(calibTrk2->ped_l1));      memcpy(calibTrk2->ncalib_event, trkcalib_.ncalib_event, sizeof(calibTrk2->ncalib_event));
113      memcpy(calibTrk2->ped_l2,       trkcalib_.ped_l2,     sizeof(calibTrk2->ped_l2));      memcpy(calibTrk2->ped_l1,       trkcalib_.ped_l1,       sizeof(calibTrk2->ped_l1));
114      memcpy(calibTrk2->ped_l3,       trkcalib_.ped_l3,     sizeof(calibTrk2->ped_l3));      memcpy(calibTrk2->ped_l2,       trkcalib_.ped_l2,       sizeof(calibTrk2->ped_l2));
115      memcpy(calibTrk2->sig_l1,       trkcalib_.sig_l1,     sizeof(calibTrk2->sig_l1));      memcpy(calibTrk2->ped_l3,       trkcalib_.ped_l3,       sizeof(calibTrk2->ped_l3));
116      memcpy(calibTrk2->sig_l2,       trkcalib_.sig_l2,     sizeof(calibTrk2->sig_l2));      memcpy(calibTrk2->sig_l1,       trkcalib_.sig_l1,       sizeof(calibTrk2->sig_l1));
117      memcpy(calibTrk2->sig_l3,       trkcalib_.sig_l3,     sizeof(calibTrk2->sig_l3));      memcpy(calibTrk2->sig_l2,       trkcalib_.sig_l2,       sizeof(calibTrk2->sig_l2));
118      memcpy(calibTrk2->nbad_l1,      trkcalib_.nbad_l1,    sizeof(calibTrk2->nbad_l1));      memcpy(calibTrk2->sig_l3,       trkcalib_.sig_l3,       sizeof(calibTrk2->sig_l3));
119      memcpy(calibTrk2->nbad_l2,      trkcalib_.nbad_l2,    sizeof(calibTrk2->nbad_l2));      memcpy(calibTrk2->nbad_l1,      trkcalib_.nbad_l1,      sizeof(calibTrk2->nbad_l1));
120      memcpy(calibTrk2->nbad_l3,      trkcalib_.nbad_l3,    sizeof(calibTrk2->nbad_l3));      memcpy(calibTrk2->nbad_l2,      trkcalib_.nbad_l2,      sizeof(calibTrk2->nbad_l2));
121      memcpy(calibTrk2->cal_flag,     trkcalib_.cal_flag,   sizeof(calibTrk2->cal_flag));            memcpy(calibTrk2->nbad_l3,      trkcalib_.nbad_l3,      sizeof(calibTrk2->nbad_l3));
122  //        memcpy(calibTrk2->DSPbad_par,   trkcalib_.DSPbad_par, sizeof(calibTrk2->DSPbad_par));            memcpy(calibTrk2->cal_flag,     trkcalib_.cal_flag,     sizeof(calibTrk2->cal_flag));      
123  //        memcpy(calibTrk2->DSPped_par,   trkcalib_.DSPped_par, sizeof(calibTrk2->DSPped_par));        
 //        memcpy(calibTrk2->DSPsig_par,   trkcalib_.DSPsig_par, sizeof(calibTrk2->DSPsig_par));        
 //--------have to invert array because of FORTRAN <-> C different management of the indexes  
124      int     tempBad_par[3072][6];      int     tempBad_par[3072][6];
125      float   tempPed_par[3072][6];      float   tempPed_par[3072][6];
126      float   tempSig_par[3072][6];      float   tempSig_par[3072][6];
127        int     tempCrc_cal[3][6];
128      memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));            memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));      
129      memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));            memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));      
130      memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));      memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));      
131        memcpy(tempCrc_cal,trkcalib_.crc_cal,    sizeof(tempCrc_cal));      
132    
133      for (int i = 0; i < 6; i++){      for (int i = 0; i < 6; i++){
134          for (int j = 0; j < 3072; j++){          for (int j = 0; j < 3072; j++){
# Line 142  void CalibTrk2Reader::RunEvent(int Event Line 136  void CalibTrk2Reader::RunEvent(int Event
136              calibTrk2->DSPped_par[i][j] = tempPed_par[j][i];              calibTrk2->DSPped_par[i][j] = tempPed_par[j][i];
137              calibTrk2->DSPsig_par[i][j] = tempSig_par[j][i];              calibTrk2->DSPsig_par[i][j] = tempSig_par[j][i];
138          }          }
139            for (int k = 0; k < 3; k++){
140                calibTrk2->crc_cal[i][k] = tempCrc_cal[k][i];
141            }
142      }      }
143  //-----------------------------------------------------------------------------------------  //-----------------------------------------------------------------------------------------
     oss.str("");  
     oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;  
     logger->warn(oss.str().c_str());  
144  }  }
145    
146    
Legend:
Removed from v.5.0  
changed lines
  Added in v.5.1
  ViewVC Help
Powered by ViewVC 1.1.23