/[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.0 by kusanagi, Tue Sep 21 20:51:22 2004 UTC revision 4.4 by kusanagi, Sat May 28 10:44:13 2005 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 1.5 2004/09/21 20:24:53 kusanagi Exp $   * $Id: CalorimeterReader.cpp,v 4.0 2005/03/06 04:33:02 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the CalorimeterReader class.   * Implementation of the CalorimeterReader class.
# Line 14  Line 14 
14    
15  extern "C" {  extern "C" {
16        
17    
18   extern struct {   extern struct {
19          int IEV2;          int     iev;
20          int stwerr;          int     stwerr[4];
21          int perror;          float   perror[4];
22          int dexy[2][22][96];          float   dexy[2][22][96];
23          int dexyc[2][22][96];          float   dexyc[2][22][96];
24          int base[2][22][96];          float   base[2][22][6];
25          int calselftrig[4][7];          float   calselftrig[4][7];
26          int calIItrig[4];          float   calIItrig[4];
27          int calstripshift[4];          float   calstriphit[4];
28          int calDSPtaberr[4];          float   calDSPtaberr[4];
29          int calevnum[4];          float   calevnum[4];
30      } evento_;      } evento_;
31    
32      void calunpack_(short[], long int*, int*);      void calunpack_(unsigned char[], long int*, int*);
33      //Struct per il passaggio di dati da e verso la chiamata fortran      //Struct per il passaggio di dati da e verso la chiamata fortran
34  }  }
35    
# Line 51  CalorimeterReader::CalorimeterReader(voi Line 52  CalorimeterReader::CalorimeterReader(voi
52   */   */
53  std::string CalorimeterReader::GetVersionInfo(void) const {  std::string CalorimeterReader::GetVersionInfo(void) const {
54    return    return
55      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 1.5 2004/09/21 20:24:53 kusanagi Exp $";      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 4.0 2005/03/06 04:33:02 kusanagi Exp $";
56  }  }
57    
58  /**  /**
# Line 80  void CalorimeterReader::RunEvent(int Eve Line 81  void CalorimeterReader::RunEvent(int Eve
81      memcpy(data, subData, length);      memcpy(data, subData, length);
82      int  ERROR = 0;      int  ERROR = 0;
83            
84      unsigned short convdata[length];      /*unsigned short convdata[length];
85      for (int i = 0; i<length; i++){      for (int i = 0; i<length; i++){
86          convdata[i] = (unsigned short)((unsigned char)subData[i]&0xFF);          convdata[i] = (unsigned short)((unsigned char)subData[i]&0xFF);
87      }      }*/
88                
89      //Call to the routine that unpack calorimeter events      //Call to the routine that unpack calorimeter events
90      calunpack_((short*)convdata, &length, &ERROR);      calunpack_((unsigned char*)data, &length, &ERROR);
91    
92        calorimeter->unpackError = ERROR;
93      if (ERROR != 0) {      if (ERROR != 0) {
94          char *errmsg;          char *errmsg;
95          switch (ERROR){          switch (ERROR){
96              case 1: errmsg = "CALORIMETER NOT FOUND";              case 1: errmsg = "CALORIMETER NOT FOUND";
97                break;
98                default: errmsg = "CALORIMETER ERRROR CODE UNIDENTIFIED";
99          }          }
100          oss.flush();          oss.str("");
101          oss << "Fortran77 function calunpack: " <<  errmsg;          oss << "Fortran77 function calunpack: " <<  errmsg;
102          logger->warn(oss.str().c_str());          logger->warn(oss.str().c_str());
103      } else {      }
104          calorimeter->IEV2   = evento_.IEV2;      //  In case of "ERROR != 0" the calunpack will take care to set all
105          calorimeter->stwerr = evento_.stwerr;      //  parameters to zero
106          calorimeter->perror = evento_.perror;      //} else {
107            calorimeter->iev   = evento_.iev;
108            memcpy(calorimeter->stwerr, evento_.stwerr, sizeof(calorimeter->stwerr));
109            memcpy(calorimeter->perror, evento_.perror, sizeof(calorimeter->perror));
110      //--------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
111          int tempDexy[96][22][2];          float tempDexy[96][22][2];
112          int tempDexyc[96][22][2];          float tempDexyc[96][22][2];
113          int tempBase[96][22][2];          float tempBase[6][22][2];
114          int tempCalselftrig[7][4];          float tempCalselftrig[7][4];
115          memcpy(tempDexy,           evento_.dexy,           sizeof(tempDexy));          memcpy(tempDexy,           evento_.dexy,           sizeof(tempDexy));
116          memcpy(tempDexyc,          evento_.dexyc,          sizeof(tempDexyc));          memcpy(tempDexyc,          evento_.dexyc,          sizeof(tempDexyc));
117          memcpy(tempBase,           evento_.base,           sizeof(tempBase));          memcpy(tempBase,           evento_.base,           sizeof(tempBase));
# Line 122  void CalorimeterReader::RunEvent(int Eve Line 128  void CalorimeterReader::RunEvent(int Eve
128                  for (int z = 0; z < 96; z++){                  for (int z = 0; z < 96; z++){
129                      calorimeter->dexy[i][j][z] = tempDexy[z][j][i];                      calorimeter->dexy[i][j][z] = tempDexy[z][j][i];
130                      calorimeter->dexyc[i][j][z] = tempDexyc[z][j][i];                      calorimeter->dexyc[i][j][z] = tempDexyc[z][j][i];
131                    }
132                    for (int z = 0; z < 6; z++){
133                      calorimeter->base[i][j][z] = tempBase[z][j][i];                      calorimeter->base[i][j][z] = tempBase[z][j][i];
134                  }                  }
135              }              }
136          }          }
137      //-----------------------------------------------------------------------------------------      //-----------------------------------------------------------------------------------------
   
138          memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));          memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));
139          memcpy(calorimeter->calstripshift,  evento_.calstripshift,  sizeof(calorimeter->calstripshift));          memcpy(calorimeter->calstriphit,    evento_.calstriphit,    sizeof(calorimeter->calstriphit));
140          memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));          memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));
141          memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));          memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));
142      }      //}
143      delete[] data;      delete [] data;
144  }  }

Legend:
Removed from v.2.0  
changed lines
  Added in v.4.4

  ViewVC Help
Powered by ViewVC 1.1.23