/[PAMELA software]/yoda/techmodel/physics/CalorimeterReader.cpp
ViewVC logotype

Diff of /yoda/techmodel/physics/CalorimeterReader.cpp

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

revision 2.3 by kusanagi, Mon Oct 18 14:28:03 2004 UTC revision 2.5 by kusanagi, Thu Dec 9 13:17:26 2004 UTC
# Line 1  Line 1 
1  /** @file  /** @file
2   * $Source: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v $   * $Source: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v $
3   * $Id: CalorimeterReader.cpp,v 2.2 2004/10/18 13:01:43 kusanagi Exp $   * $Id: CalorimeterReader.cpp,v 2.4 2004/12/03 22:08:12 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the CalorimeterReader class.   * Implementation of the CalorimeterReader class.
# Line 16  extern "C" { Line 16  extern "C" {
16        
17    
18   extern struct {   extern struct {
19          int     IEV2;          int     IEV;
20          int     stwerr[4];          int     stwerr[4];
21          float   perror[4];          float   perror[4];
22          float   dexy[2][22][96];          float   dexy[2][22][96];
# Line 24  extern "C" { Line 24  extern "C" {
24          float   base[2][22][6];          float   base[2][22][6];
25          float   calselftrig[4][7];          float   calselftrig[4][7];
26          float   calIItrig[4];          float   calIItrig[4];
27          float   calstripshift[4];          float   calstriphit[4];
28          float   calDSPtaberr[4];          float   calDSPtaberr[4];
29          float   calevnum[4];          float   calevnum[4];
30      } evento_;      } evento_;
31    
32      void calunpack_(unsigned char[], long int*, int*);      void calunpack_(unsigned char[], long int*, int*);
33        //void calunpack_(char[], long int*, int*);
34      //Struct per il passaggio di dati da e verso la chiamata fortran      //Struct per il passaggio di dati da e verso la chiamata fortran
35  }  }
36    
# Line 52  CalorimeterReader::CalorimeterReader(voi Line 53  CalorimeterReader::CalorimeterReader(voi
53   */   */
54  std::string CalorimeterReader::GetVersionInfo(void) const {  std::string CalorimeterReader::GetVersionInfo(void) const {
55    return    return
56      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 2.2 2004/10/18 13:01:43 kusanagi Exp $";      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 2.4 2004/12/03 22:08:12 kusanagi Exp $";
57  }  }
58    
59  /**  /**
# Line 85  void CalorimeterReader::RunEvent(int Eve Line 86  void CalorimeterReader::RunEvent(int Eve
86      for (int i = 0; i<length; i++){      for (int i = 0; i<length; i++){
87          convdata[i] = (unsigned short)((unsigned char)subData[i]&0xFF);          convdata[i] = (unsigned short)((unsigned char)subData[i]&0xFF);
88      }*/      }*/
   
89            
90      //Call to the routine that unpack calorimeter events      //Call to the routine that unpack calorimeter events
91      calunpack_((unsigned char*)data, &length, &ERROR);      calunpack_((unsigned char*)data, &length, &ERROR);
92        //calunpack_((char*)data, &length, &ERROR);
93    
94      if (ERROR != 0) {      if (ERROR != 0) {
95          char *errmsg;          char *errmsg;
96          switch (ERROR){          switch (ERROR){
97              case 1: errmsg = "CALORIMETER NOT FOUND";              case 1: errmsg = "CALORIMETER NOT FOUND";
98          }          }
99          oss.flush();          oss.str("");
100          oss << "Fortran77 function calunpack: " <<  errmsg;          oss << "Fortran77 function calunpack: " <<  errmsg;
101          logger->warn(oss.str().c_str());          logger->warn(oss.str().c_str());
102      }      }
103      //  In case of "ERROR != 0" the calunpack will take care to set all      //  In case of "ERROR != 0" the calunpack will take care to set all
104      //  parameters to zero      //  parameters to zero
105      //} else {      //} else {
106          calorimeter->IEV2   = evento_.IEV2;          calorimeter->IEV   = evento_.IEV;
107          memcpy(calorimeter->stwerr, evento_.stwerr, sizeof(calorimeter->stwerr));          memcpy(calorimeter->stwerr, evento_.stwerr, sizeof(calorimeter->stwerr));
108          memcpy(calorimeter->perror, evento_.perror, sizeof(calorimeter->perror));          memcpy(calorimeter->perror, evento_.perror, sizeof(calorimeter->perror));
109      //--------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
# Line 134  void CalorimeterReader::RunEvent(int Eve Line 135  void CalorimeterReader::RunEvent(int Eve
135          }          }
136      //-----------------------------------------------------------------------------------------      //-----------------------------------------------------------------------------------------
137          memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));          memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));
138          memcpy(calorimeter->calstripshift,  evento_.calstripshift,   sizeof(calorimeter->calstripshift));          memcpy(calorimeter->calstriphit,    evento_.calstriphit,    sizeof(calorimeter->calstriphit));
139          memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));          memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));
140          memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));          memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));
141      //}      //}
Legend:
Removed from v.2.3  
changed lines
  Added in v.2.5
  ViewVC Help
Powered by ViewVC 1.1.23