/[PAMELA software]/yoda/techmodel/CalibTrk1Reader.cpp
ViewVC logotype

Contents of /yoda/techmodel/CalibTrk1Reader.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2.4 - (show annotations) (download)
Wed Dec 22 11:38:35 2004 UTC (19 years, 11 months ago) by kusanagi
Branch: MAIN
Changes since 2.3: +7 -8 lines
Fixed EventReader file scan bugs

1 /** @file
2 * $Source: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v $
3 * $Id: CalibTrk1Reader.cpp,v 2.3 2004/12/16 17:32:57 kusanagi Exp $
4 * $Author: kusanagi $
5 *
6 * Implementation of the LogReader class.
7 * ToBeDone:
8 * Control the CRC for the entire data Packet not just for single records
9 */
10
11 #define UINT unsigned int
12 #define BYTE unsigned char
13 #include <string>
14 #include <log4cxx/logger.h>
15 extern "C" {
16 #include "CRC.h"
17 //The int* return the error code
18 //The char* is the path to the temporary file
19 extern void trkcalibpkt_(int*, char*);
20
21 //Struct per il passaggio di dati da e verso la chiamata fortran
22 extern struct {
23 int DAQmode[6];
24 int DSPnumber[6];
25 int calibnumber[6];
26 int ncalib_event[6];
27 int ped_l1[6];
28 int ped_l2[6];
29 int ped_l3[6];
30 int sig_l1[6];
31 int sig_l2[6];
32 int sig_l3[6];
33 int nbad_l1[6];
34 int nbad_l2[6];
35 int nbad_l3[6];
36 int cal_flag[6];
37 int DSPped_par[6][3072];
38 float DSPsig_par[6][3072];
39 float DSPbad_par[6][3072];
40 } trkcalib_;
41 #include <dirent.h>
42 }
43
44 #include <fstream>
45 #include "stdio.h"
46 #include "ReaderAlgorithms.h"
47 #include "event/PamelaRun.h"
48
49 #include "event/CalibTrk1Event.h"
50
51 using namespace pamela;
52 using namespace pamela::techmodel;
53
54 static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.CalibTrk1Reader"));
55
56 /**
57 * Constructor.
58 */
59 CalibTrk1Reader::CalibTrk1Reader(void):
60 TechmodelAlgorithm(PacketType::CalibTrk1, "TechmodelCalibTrk1Reader") {
61 logger->debug(_T("Constructor"));
62 calibTrk1 = new CalibTrk1Event();
63 }
64
65 /**
66 * Get a string with the version info of the algorithm.
67 */
68 std::string CalibTrk1Reader::GetVersionInfo(void) const {
69 return
70 "$Header: /home/cvsmanager/yoda/techmodel/CalibTrk1Reader.cpp,v 2.3 2004/12/16 17:32:57 kusanagi Exp $\n";
71 }
72
73 /**
74 * Initialize the algorithm with a special run. This will initialize the
75 * event reader routines for all packet types.
76 */
77 void CalibTrk1Reader::Init(PamelaRun *run) {
78 logger->debug(_T("Initialize"));
79 SetInputStream(run);
80 run->WriteSubPacket(this, &calibTrk1, calibTrk1->Class());
81 }
82
83 /**
84 * Unpack the CalibTrk event from an input file.
85 */
86 //void CalibTrkReader::RunEvent(int EventNumber, long int length, char *subData) {
87 void CalibTrk1Reader::RunEvent(int EventNumber, long int dataLength) throw (Exception){
88 std::stringstream oss;
89 char subData[dataLength];
90 int ERROR;
91 InputFile->read(subData, sizeof(unsigned char)*dataLength);
92
93 //Scrivo un file temporaneo per passarlo alla routine
94 //Speriamo di cambiare la routine per passargli un buffer.....
95 oss.str("");
96 oss << getenv("YODA_DATA") << "/" << time(NULL) << "trc1.dat";
97 FILE *pfile;
98 pfile = fopen(oss.str().c_str(), "wb");
99 fwrite(subData, 1, dataLength, pfile);
100 fclose(pfile);
101
102 //Call to the FORTRAN routin that unpack tracker events
103 trkcalibpkt_(&ERROR, (char*)oss.str().c_str());
104
105 if (ERROR != 0) {
106 oss.str("");
107 oss << "Fortran77 function trkcalibpkt error code = " << ERROR;
108 logger->warn(oss.str().c_str());
109 }
110
111 remove((char*)oss.str().c_str());
112
113 //Store the unpacked data
114 memcpy(calibTrk1->DAQmode, trkcalib_.DAQmode, sizeof(calibTrk1->DAQmode));
115 memcpy(calibTrk1->DSPnumber, trkcalib_.DSPnumber, sizeof(calibTrk1->DSPnumber));
116 memcpy(calibTrk1->calibnumber, trkcalib_.calibnumber, sizeof(calibTrk1->calibnumber));
117 memcpy(calibTrk1->DSPnumber, trkcalib_.ncalib_event, sizeof(calibTrk1->ncalib_event));
118 memcpy(calibTrk1->ped_l1, trkcalib_.ped_l1, sizeof(calibTrk1->ped_l1));
119 memcpy(calibTrk1->ped_l2, trkcalib_.ped_l2, sizeof(calibTrk1->ped_l2));
120 memcpy(calibTrk1->ped_l3, trkcalib_.ped_l3, sizeof(calibTrk1->ped_l3));
121 memcpy(calibTrk1->sig_l1, trkcalib_.sig_l1, sizeof(calibTrk1->sig_l1));
122 memcpy(calibTrk1->sig_l2, trkcalib_.sig_l2, sizeof(calibTrk1->sig_l2));
123 memcpy(calibTrk1->sig_l3, trkcalib_.sig_l3, sizeof(calibTrk1->sig_l3));
124 memcpy(calibTrk1->nbad_l1, trkcalib_.nbad_l1, sizeof(calibTrk1->nbad_l1));
125 memcpy(calibTrk1->nbad_l2, trkcalib_.nbad_l2, sizeof(calibTrk1->nbad_l2));
126 memcpy(calibTrk1->nbad_l3, trkcalib_.nbad_l3, sizeof(calibTrk1->nbad_l3));
127 memcpy(calibTrk1->cal_flag, trkcalib_.cal_flag, sizeof(calibTrk1->cal_flag));
128 // memcpy(calibTrk1->DSPbad_par, trkcalib_.DSPbad_par, sizeof(calibTrk1->DSPbad_par));
129 // memcpy(calibTrk1->DSPped_par, trkcalib_.DSPped_par, sizeof(calibTrk1->DSPped_par));
130 // memcpy(calibTrk1->DSPsig_par, trkcalib_.DSPsig_par, sizeof(calibTrk1->DSPsig_par));
131 //--------have to invert array because of FORTRAN <-> C different management of the indexes
132 int tempBad_par[3072][6];
133 int tempPed_par[3072][6];
134 int tempSig_par[3072][6];
135 memcpy(calibTrk1->DSPbad_par,trkcalib_.DSPbad_par, sizeof(calibTrk1->DSPbad_par));
136 memcpy(calibTrk1->DSPped_par,trkcalib_.DSPped_par, sizeof(calibTrk1->DSPped_par));
137 memcpy(calibTrk1->DSPsig_par,trkcalib_.DSPsig_par, sizeof(calibTrk1->DSPsig_par));
138
139 for (int i = 0; i < 6; i++){
140 for (int j = 0; j < 3072; j++){
141 calibTrk1->DSPbad_par[i][j] = tempBad_par[j][i];
142 calibTrk1->DSPped_par[i][j] = tempPed_par[j][i];
143 calibTrk1->DSPsig_par[i][j] = tempSig_par[j][i];
144 }
145 }
146 //-----------------------------------------------------------------------------------------
147 //delete [] subData;
148 }
149
150

  ViewVC Help
Powered by ViewVC 1.1.23