/[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 1.2 by kusanagi, Thu Aug 19 15:24:58 2004 UTC revision 1.4 by kusanagi, Tue Aug 24 08:00:12 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 1.1 2004/07/17 20:03:48 kusanagi Exp $   * $Id: CalorimeterReader.cpp,v 1.3 2004/08/20 15:01:50 kusanagi Exp $
4   * $Author: kusanagi $   * $Author: kusanagi $
5   *   *
6   * Implementation of the CalorimeterReader class.   * Implementation of the CalorimeterReader class.
# Line 49  CalorimeterReader::CalorimeterReader(voi Line 49  CalorimeterReader::CalorimeterReader(voi
49   */   */
50  std::string CalorimeterReader::GetVersionInfo(void) const {  std::string CalorimeterReader::GetVersionInfo(void) const {
51    return    return
52      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 1.1 2004/07/17 20:03:48 kusanagi Exp $";      "$Header: /home/cvsmanager/yoda/techmodel/physics/CalorimeterReader.cpp,v 1.3 2004/08/20 15:01:50 kusanagi Exp $";
53  }  }
54    
55  /**  /**
# Line 83  void CalorimeterReader::RunEvent(int Eve Line 83  void CalorimeterReader::RunEvent(int Eve
83                    
84      //Call to the routine that unpack calorimeter events      //Call to the routine that unpack calorimeter events
85      calunpack_((short*)convdata, &length, &ERROR);      calunpack_((short*)convdata, &length, &ERROR);
86        
87      /*switch (ERROR){      if (ERROR != 0) {
88          case:          char *errmsg;
89      }*/          switch (ERROR){
90                        case 1: errmsg = "CALORIMETER NOT FOUND";
91      calorimeter->IEV2   = evento_.IEV2;          }
92      calorimeter->stwerr = evento_.stwerr;          cat <<  log4cpp::Priority::ERROR
93      calorimeter->perror = evento_.perror;              <<  "Fortran77 function calunpack: " <<  errmsg
94                <<  "\n " << log4cpp::CategoryStream::ENDLINE;
95  //--------have to invert array because of FORTRAN <-> C different management of the indexes      } else {
96      int tempDexy[96][22][2];          calorimeter->IEV2   = evento_.IEV2;
97      int tempDexyc[96][22][2];          calorimeter->stwerr = evento_.stwerr;
98      int tempBase[96][22][2];          calorimeter->perror = evento_.perror;
99      int tempCalselftrig[7][4];  
100      memcpy(tempDexy,           evento_.dexy,           sizeof(tempDexy));      //--------have to invert array because of FORTRAN <-> C different management of the indexes
101      memcpy(tempDexyc,          evento_.dexyc,          sizeof(tempDexyc));          int tempDexy[96][22][2];
102      memcpy(tempBase,           evento_.base,           sizeof(tempBase));          int tempDexyc[96][22][2];
103      memcpy(tempCalselftrig,    evento_.calselftrig,    sizeof(tempCalselftrig));          int tempBase[96][22][2];
104            int tempCalselftrig[7][4];
105      for (int i = 0; i < 4; i++){          memcpy(tempDexy,           evento_.dexy,           sizeof(tempDexy));
106          for (int j = 0; j < 7; j++){          memcpy(tempDexyc,          evento_.dexyc,          sizeof(tempDexyc));
107              calorimeter->calselftrig[i][j] = tempCalselftrig[j][i];          memcpy(tempBase,           evento_.base,           sizeof(tempBase));
108            memcpy(tempCalselftrig,    evento_.calselftrig,    sizeof(tempCalselftrig));
109    
110            for (int i = 0; i < 4; i++){
111                for (int j = 0; j < 7; j++){
112                    calorimeter->calselftrig[i][j] = tempCalselftrig[j][i];
113                }
114          }          }
     }  
115    
116      for (int i = 0; i < 2; i++){          for (int i = 0; i < 2; i++){
117          for (int j = 0; j < 22; j++){              for (int j = 0; j < 22; j++){
118              for (int z = 0; z < 96; z++){                  for (int z = 0; z < 96; z++){
119                  calorimeter->dexy[i][j][z] = tempDexy[z][j][i];                      calorimeter->dexy[i][j][z] = tempDexy[z][j][i];
120                  calorimeter->dexyc[i][j][z] = tempDexyc[z][j][i];                      calorimeter->dexyc[i][j][z] = tempDexyc[z][j][i];
121                  calorimeter->base[i][j][z] = tempBase[z][j][i];                      calorimeter->base[i][j][z] = tempBase[z][j][i];
122                    }
123              }              }
124          }          }
125      }      //-----------------------------------------------------------------------------------------
 //-----------------------------------------------------------------------------------------  
126    
127                memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));
128      memcpy(calorimeter->calIItrig,      evento_.calIItrig,      sizeof(calorimeter->calIItrig));          memcpy(calorimeter->calstripshift,  evento_.calstripshift,  sizeof(calorimeter->calstripshift));
129      memcpy(calorimeter->calstripshift,  evento_.calstripshift,  sizeof(calorimeter->calstripshift));          memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));
130      memcpy(calorimeter->calDSPtaberr,   evento_.calDSPtaberr,   sizeof(calorimeter->calDSPtaberr));          memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));
131      memcpy(calorimeter->calevnum,       evento_.calevnum,       sizeof(calorimeter->calevnum));      }
   
     cat <<  log4cpp::Priority::ERROR  
         <<  "Fortran77 function calunpack error code = " << ERROR  
         <<  "\n " << log4cpp::CategoryStream::ENDLINE;  
132  }  }
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.23