/[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 2.1 by kusanagi, Sun Oct 17 12:28:38 2004 UTC revision 4.2 by kusanagi, Wed Mar 16 22:51:36 2005 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 2.0 2004/09/21 20:50:54 kusanagi Exp $   * $Id: CalibTrk2Reader.cpp,v 4.1 2005/03/09 19:44:19 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the LogReader class.   * Implementation of the LogReader class.
# Line 33  extern "C" { Line 33  extern "C" {
33        int   nbad_l2[6];        int   nbad_l2[6];
34        int   nbad_l3[6];        int   nbad_l3[6];
35        int   cal_flag[6];        int   cal_flag[6];
       int   checksum[6];  
       int   DSPbad_par[6][3072];  
36        float DSPped_par[6][3072];        float DSPped_par[6][3072];
37        float DSPsig_par[6][3072];        float DSPsig_par[6][3072];
38          int   DSPbad_par[6][3072];
39      } trkcalib_;      } trkcalib_;
40  #include <dirent.h>  #include <dirent.h>
41  }  }
# Line 66  CalibTrk2Reader::CalibTrk2Reader(void): Line 65  CalibTrk2Reader::CalibTrk2Reader(void):
65   */   */
66  std::string CalibTrk2Reader::GetVersionInfo(void) const {  std::string CalibTrk2Reader::GetVersionInfo(void) const {
67    return    return
68      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 2.0 2004/09/21 20:50:54 kusanagi Exp $\n";      "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk2Reader.cpp,v 4.1 2005/03/09 19:44:19 kusanagi Exp $\n";
69  }  }
70    
71  /**  /**
# Line 82  void CalibTrk2Reader::Init(PamelaRun *ru Line 81  void CalibTrk2Reader::Init(PamelaRun *ru
81  /**  /**
82   * Unpack the CalibTrk2 event from an input file.   * Unpack the CalibTrk2 event from an input file.
83   */   */
84  void CalibTrk2Reader::RunEvent(int EventNumber, long int length) {  void CalibTrk2Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
85      std::stringstream oss;          std::stringstream oss;    
86      char     *subData;      char      subData[dataLength];
87      char      eventCRC[2];      int       ERROR;    
     UINT16    subCRC;      //CRC of the data  
     UINT16    readCRC;     //CRC read from the end of the subpacket  
     long int  dataLength;  
88    
     //the 2 bytes subtracted belong to the final event CRC bytes  
     dataLength = length - (long int)2;  
   
     subData = new char[dataLength];  
89      InputFile->read(subData, sizeof(unsigned char)*dataLength);      InputFile->read(subData, sizeof(unsigned char)*dataLength);
     subCRC = CM_Compute_CRC16(0, (BYTE*)subData, dataLength);  
   
     //took the final CRC to compare it with the previous calculated CRC of the data  
     InputFile->read(eventCRC, sizeof(eventCRC));  
     readCRC = (((UINT16)(eventCRC[0]<<8))&0xFF00) + (((UINT16)eventCRC[1])&0x00FF);  
90            
91      if (subCRC == readCRC){      //Scrivo un file temporaneo per passarlo alla routine
92          int       ERROR;      //Speriamo di cambiare la routine per passargli un buffer.....
93            oss.str("");
94          //Scrivo un file temporaneo per passarlo alla routine      oss << getenv("YODA_DATA") << "/" << time(NULL) << "trc2.dat";
95          //Speriamo di cambiare la routine per passargli un buffer.....      FILE *pfile;
96          DIR *dirp;      pfile = fopen(oss.str().c_str(), "wb");
97          std::string pathDir((char*)getenv("YODA_DATA"));      fwrite(subData, 1, dataLength, pfile);
98          pathDir = pathDir + "/todatemp.dat";      fclose(pfile);
99          FILE *pfile;  
100          pfile = fopen((char*)pathDir.c_str(), "wb");      //Call to the FORTRAN routin that unpack tracker events
101          fwrite(subData, 1, dataLength, pfile);      trkcalibpkt_(&ERROR, (char*)oss.str().c_str());
102          fclose(pfile);  
103        calibTrk2->unpackError = ERROR;
104          //Call to the FORTRAN routin that unpack tracker events      remove(oss.str().c_str());
105          trkcalibpkt_(&ERROR, (char*)pathDir.c_str());      if (ERROR != 0) {
106                    oss.str("");
107          //delete the temporary file          oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
108          remove((char*)pathDir.c_str());          logger->warn(oss.str().c_str());
109        }
110          //Store the unpacked data      //delete the temporary file
111          memcpy(calibTrk2->DAQmode,      trkcalib_.DAQmode,     sizeof(calibTrk2->DAQmode));      remove((char*)oss.str().c_str());
112          memcpy(calibTrk2->DSPnumber,    trkcalib_.DSPnumber,   sizeof(calibTrk2->DSPnumber));  
113          memcpy(calibTrk2->calibnumber,  trkcalib_.calibnumber, sizeof(calibTrk2->calibnumber));      //Store the unpacked data
114          memcpy(calibTrk2->DSPnumber,    trkcalib_.ncalib_event,  sizeof(calibTrk2->ncalib_event));      memcpy(calibTrk2->DAQmode,      trkcalib_.DAQmode,     sizeof(calibTrk2->DAQmode));
115          memcpy(calibTrk2->ped_l1,       trkcalib_.ped_l1,     sizeof(calibTrk2->ped_l1));      memcpy(calibTrk2->DSPnumber,    trkcalib_.DSPnumber,   sizeof(calibTrk2->DSPnumber));
116          memcpy(calibTrk2->ped_l2,       trkcalib_.ped_l2,     sizeof(calibTrk2->ped_l2));      memcpy(calibTrk2->calibnumber,  trkcalib_.calibnumber, sizeof(calibTrk2->calibnumber));
117          memcpy(calibTrk2->ped_l3,       trkcalib_.ped_l3,     sizeof(calibTrk2->ped_l3));      memcpy(calibTrk2->DSPnumber,    trkcalib_.ncalib_event,  sizeof(calibTrk2->ncalib_event));
118          memcpy(calibTrk2->sig_l1,       trkcalib_.sig_l1,     sizeof(calibTrk2->sig_l1));      memcpy(calibTrk2->ped_l1,       trkcalib_.ped_l1,     sizeof(calibTrk2->ped_l1));
119          memcpy(calibTrk2->sig_l2,       trkcalib_.sig_l2,     sizeof(calibTrk2->sig_l2));      memcpy(calibTrk2->ped_l2,       trkcalib_.ped_l2,     sizeof(calibTrk2->ped_l2));
120          memcpy(calibTrk2->sig_l3,       trkcalib_.sig_l3,     sizeof(calibTrk2->sig_l3));      memcpy(calibTrk2->ped_l3,       trkcalib_.ped_l3,     sizeof(calibTrk2->ped_l3));
121          memcpy(calibTrk2->nbad_l1,      trkcalib_.nbad_l1,    sizeof(calibTrk2->nbad_l1));      memcpy(calibTrk2->sig_l1,       trkcalib_.sig_l1,     sizeof(calibTrk2->sig_l1));
122          memcpy(calibTrk2->nbad_l2,      trkcalib_.nbad_l2,    sizeof(calibTrk2->nbad_l2));      memcpy(calibTrk2->sig_l2,       trkcalib_.sig_l2,     sizeof(calibTrk2->sig_l2));
123          memcpy(calibTrk2->nbad_l3,      trkcalib_.nbad_l3,    sizeof(calibTrk2->nbad_l3));      memcpy(calibTrk2->sig_l3,       trkcalib_.sig_l3,     sizeof(calibTrk2->sig_l3));
124          memcpy(calibTrk2->cal_flag,     trkcalib_.cal_flag,   sizeof(calibTrk2->cal_flag));            memcpy(calibTrk2->nbad_l1,      trkcalib_.nbad_l1,    sizeof(calibTrk2->nbad_l1));
125        memcpy(calibTrk2->nbad_l2,      trkcalib_.nbad_l2,    sizeof(calibTrk2->nbad_l2));
126        memcpy(calibTrk2->nbad_l3,      trkcalib_.nbad_l3,    sizeof(calibTrk2->nbad_l3));
127        memcpy(calibTrk2->cal_flag,     trkcalib_.cal_flag,   sizeof(calibTrk2->cal_flag));      
128  //        memcpy(calibTrk2->DSPbad_par,   trkcalib_.DSPbad_par, sizeof(calibTrk2->DSPbad_par));        //        memcpy(calibTrk2->DSPbad_par,   trkcalib_.DSPbad_par, sizeof(calibTrk2->DSPbad_par));      
129  //        memcpy(calibTrk2->DSPped_par,   trkcalib_.DSPped_par, sizeof(calibTrk2->DSPped_par));        //        memcpy(calibTrk2->DSPped_par,   trkcalib_.DSPped_par, sizeof(calibTrk2->DSPped_par));      
130  //        memcpy(calibTrk2->DSPsig_par,   trkcalib_.DSPsig_par, sizeof(calibTrk2->DSPsig_par));        //        memcpy(calibTrk2->DSPsig_par,   trkcalib_.DSPsig_par, sizeof(calibTrk2->DSPsig_par));      
131  //--------have to invert array because of FORTRAN <-> C different management of the indexes  //--------have to invert array because of FORTRAN <-> C different management of the indexes
132          int tempBad_par[3072][6];      int     tempBad_par[3072][6];
133          int tempPed_par[3072][6];      float   tempPed_par[3072][6];
134          int tempSig_par[3072][6];      float   tempSig_par[3072][6];
135          memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));            memcpy(tempBad_par,trkcalib_.DSPbad_par, sizeof(tempBad_par));      
136          memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));            memcpy(tempPed_par,trkcalib_.DSPped_par, sizeof(tempPed_par));      
137          memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));            memcpy(tempSig_par,trkcalib_.DSPsig_par, sizeof(tempSig_par));      
138    
139          for (int i = 0; i < 6; i++){      for (int i = 0; i < 6; i++){
140              for (int j = 0; j < 3072; j++){          for (int j = 0; j < 3072; j++){
141                  calibTrk2->DSPbad_par[i][j] = tempBad_par[j][i];              calibTrk2->DSPbad_par[i][j] = tempBad_par[j][i];
142                  calibTrk2->DSPped_par[i][j] = tempPed_par[j][i];              calibTrk2->DSPped_par[i][j] = tempPed_par[j][i];
143                  calibTrk2->DSPsig_par[i][j] = tempSig_par[j][i];              calibTrk2->DSPsig_par[i][j] = tempSig_par[j][i];
             }  
144          }          }
 //-----------------------------------------------------------------------------------------  
         oss.flush();  
         oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;  
         logger->warn(oss.str().c_str());  
     } else {  
         logger->debug(_T("Wrong CRC for CalibTrk2 Packet "));  
145      }      }
146      delete [] subData;  //-----------------------------------------------------------------------------------------
147        oss.str("");
148        oss <<  "Fortran77 function trkcalibpkt error code = " << ERROR;
149        logger->warn(oss.str().c_str());
150  }  }
151    
Legend:
Removed from v.2.1  
changed lines
  Added in v.4.2
  ViewVC Help
Powered by ViewVC 1.1.23