1 |
/** @file |
2 |
* $Source: /afs/ba.infn.it/user/pamela/src/CVS/chewbacca/PamOffLineSW/techmodel/McmdReader.cpp,v $ |
3 |
* $Id: McmdReader.cpp,v 1.2 2008-10-01 09:53:42 mocchiut Exp $ |
4 |
* $Author: mocchiut $ |
5 |
* |
6 |
* Implementation of the McmdReader class. |
7 |
*/ |
8 |
|
9 |
extern "C" { |
10 |
#include "CRC.h" |
11 |
} |
12 |
#include "ReaderAlgorithms.h" |
13 |
using namespace pamela::techmodel; |
14 |
|
15 |
/** |
16 |
* Constructor. |
17 |
*/ |
18 |
McmdReader::McmdReader(void) : |
19 |
TechmodelAlgorithm(PacketType::Mcmd, "Mcmd") { |
20 |
Mcmd = new McmdEvent(); |
21 |
} |
22 |
|
23 |
/** |
24 |
* Get a string with the version info of the algorithm. |
25 |
*/ |
26 |
std::string McmdReader::GetVersionInfo(void) const { |
27 |
return "$Header: /afs/ba.infn.it/user/pamela/src/CVS/chewbacca/PamOffLineSW/techmodel/McmdReader.cpp,v 1.2 2008-10-01 09:53:42 mocchiut Exp $\n"; |
28 |
} |
29 |
|
30 |
/** |
31 |
* Initialize the algorithm with a special run. This will initialize the |
32 |
* event reader routines for all packet types. |
33 |
*/ |
34 |
void McmdReader::Init(PamelaRun *run) { |
35 |
// logger->debug(_T("Initialize")); |
36 |
// SetInputStream(run); |
37 |
run->WriteSubPacket(this, &Mcmd, Mcmd->Class()); |
38 |
} |
39 |
|
40 |
/** |
41 |
* Unpack the Mcmd event |
42 |
* Each subpacket is prafaceded by 4 OBT bytes. |
43 |
* The elementar structure is a kind of |
44 |
* --------CPU - OBT--------------------------------- |
45 |
* OBT - 4 Bytes |
46 |
* --------Start Sub-Packet--------------------------------- |
47 |
* SeqID - 2 Bytes |
48 |
* T - 1 bit | spare - 7 bits | Mcmd-ID - 1 byte |
49 |
* Spare - 4 bits | Mcmd Lenght 12 bits |
50 |
* Time Tag - 4 Bytes |
51 |
* DATA - McmdLength * 2 Bytes |
52 |
* don't care - 1 Byte |
53 |
* END-ID - 1 Byte is the sum of subPacket Bytes module 256 |
54 |
* --------End Sub-Packet--------------------------------- |
55 |
* --------CPU CRC-16 on OBT + subPacket--------------------------------- |
56 |
* subCRC - 2 Bytes |
57 |
* this structure is repeated one or more times. |
58 |
* The last 2 Bytes are CRC16 computed by CPU on all previous (OBT + subpacket data + subCRC) repetitions |
59 |
|
60 |
* @Event Number |
61 |
* @length is the size in bytes of the event (or packet) |
62 |
*/ |
63 |
void McmdReader::PKT_RunEvent(char* mysubData, long int length) throw (WrongCRCException_PKTUsed) { |
64 |
stringstream oss; |
65 |
string msg; |
66 |
|
67 |
int i = 0; |
68 |
const int obt_len = 4; |
69 |
const int subHeader_len = 10; |
70 |
const int subTrailer_len = 2; |
71 |
const int subPckCRC_len = 2; |
72 |
long int dataLength = 0; |
73 |
|
74 |
char OBT[obt_len] = { 0 }; |
75 |
char subHeader[subHeader_len] = { 0 }; |
76 |
char subTrailer[subTrailer_len] = { 0 }; |
77 |
char subPckCRC[subPckCRC_len] = { 0 }; |
78 |
char* subData = NULL; |
79 |
|
80 |
UINT16 subCRC = 0; //CRC of the subpacket (updated as subPckt is read) |
81 |
UINT16 readCRC = 0; //CRC read from the subpacket |
82 |
UINT16 partialCRC = 0; //partial CRC updated as mcmd packet is read (to compare with CRC read in the total Mcmd header) |
83 |
McmdRecord *rec; |
84 |
|
85 |
Mcmd->Records->Clear(); |
86 |
TClonesArray &recs = *(Mcmd->Records); |
87 |
|
88 |
int start = 0; |
89 |
// while(start < (length)) { |
90 |
// printf(" %i => %X \n",start,(UINT8)mysubData[start]); |
91 |
// start++; |
92 |
// }; |
93 |
// start=0; |
94 |
|
95 |
while (start < (length - 2 - obt_len - subTrailer_len - subTrailer_len - subPckCRC_len)) |
96 |
// while(start < (length-2)) |
97 |
{ |
98 |
// printf(" 1data %X \n",(UINT8)mysubData[start]); |
99 |
//Read the OBT preceeding the subpacket then calculate a partial CRC for it |
100 |
//and update the partialCRC |
101 |
for (int m = start; m < start + obt_len; m++) { |
102 |
OBT[m - start] = mysubData[m]; |
103 |
} |
104 |
start += obt_len; |
105 |
|
106 |
// printf(" 2data %X \n",(UINT8)mysubData[start]); |
107 |
// printf(" 2data %X \n",(UINT8)mysubData[start]+1); |
108 |
subCRC = CM_Compute_CRC16(0, (BYTE*) &OBT, obt_len); |
109 |
partialCRC = CM_Compute_CRC16(partialCRC, (BYTE*) &OBT, obt_len); |
110 |
//Read the header for the subPacket and read mcmdLength |
111 |
//12 is the total lenght of subHeader + subTrailer |
112 |
for (int m = start; m < start + subHeader_len; m++) { |
113 |
subHeader[m - start] = mysubData[m]; |
114 |
} |
115 |
start += subHeader_len; |
116 |
|
117 |
// printf(" 3data %X \n",(UINT8)mysubData[start]); |
118 |
// printf(" 3data %X \n",(UINT8)mysubData[start+1]); |
119 |
subCRC = CM_Compute_CRC16(subCRC, (BYTE*) &subHeader, subHeader_len); |
120 |
partialCRC = CM_Compute_CRC16(partialCRC, (BYTE*) &subHeader, subHeader_len); |
121 |
dataLength = (((0x0fff) & ((UINT16)subHeader[4])) << 8 | ((UINT16)subHeader[5]) * 2) - subHeader_len |
122 |
- subTrailer_len; |
123 |
// printf(" datalenght = %i subh 4 %X subd 5 %X \n",dataLength,(UINT8)subHeader[4],(UINT8)subHeader[5]); |
124 |
//the line below is exactly how it was in the original version |
125 |
if (dataLength < 0) |
126 |
break; //it should throw an exception ***TBD*** |
127 |
//I add also this check |
128 |
if (dataLength + start > (length - 2 - subTrailer_len - subPckCRC_len)) { |
129 |
oss.str(""); |
130 |
oss << "MCMD: Error in the MCMD Packet lenght, it is not " << length; |
131 |
msg = oss.str(); |
132 |
PamOffLineSW::mainLogUtil->logWarning(msg); |
133 |
break; //it should throw an exception ***TBD*** |
134 |
} |
135 |
|
136 |
//read subpacket data according to data length then calculate partial CRC for data |
137 |
//and update the partialCRC |
138 |
|
139 |
subData = new char[dataLength]; |
140 |
for (int m = start; m < start + dataLength; m++) { |
141 |
subData[m - start] = mysubData[m]; |
142 |
} |
143 |
start += dataLength; |
144 |
|
145 |
// printf(" 4data %X \n",(UINT8)mysubData[start]); |
146 |
// printf(" 4data %X \n",(UINT8)mysubData[start+1]); |
147 |
for (int jj = 0; jj < dataLength; jj++) { |
148 |
subCRC = CM_Compute_CRC16(subCRC, (BYTE*) (subData + jj), 1); |
149 |
partialCRC = CM_Compute_CRC16(partialCRC, (BYTE*) (subData + jj), 1); |
150 |
} |
151 |
|
152 |
//Read the CRC inside of MCMD |
153 |
//To check sum of all sub packet data, module 256 ****TBD**** |
154 |
for (int m = start; m < start + subTrailer_len; m++) { |
155 |
subTrailer[m - start] = mysubData[m]; |
156 |
} |
157 |
start += subTrailer_len; |
158 |
// printf(" 5data %X \n",(UINT8)mysubData[start]); |
159 |
// printf(" 5data %X \n",(UINT8)mysubData[start+1]); |
160 |
|
161 |
subCRC = CM_Compute_CRC16(subCRC, (BYTE*) &subTrailer, 2); |
162 |
partialCRC = CM_Compute_CRC16(partialCRC, (BYTE*) &subTrailer, 2); |
163 |
//Read the CRC of subPacket |
164 |
for (int m = start; m < start + subPckCRC_len; m++) { |
165 |
subPckCRC[m - start] = mysubData[m]; |
166 |
} |
167 |
start += subPckCRC_len; |
168 |
|
169 |
partialCRC = CM_Compute_CRC16(partialCRC, (BYTE*) &subPckCRC, 2); |
170 |
readCRC = (((BYTE)subPckCRC[0]) << 8) + ((BYTE)subPckCRC[1]); |
171 |
|
172 |
//finally check if the RecordCRC is correct |
173 |
//and finally update the partialCRC |
174 |
//TO DO - if one CRC is wrong also the total one will be corrupted |
175 |
// printf(" subCRC %X readCRC %X \n",subCRC,readCRC); |
176 |
if (subCRC == readCRC) { |
177 |
rec = new (recs[i++]) McmdRecord(); //aggiungo un nuovo McmdRecord all'evento |
178 |
rec->MCMD_RECORD_OBT = (((UINT32)OBT[0] << 24) & 0xFF000000) + (((UINT32)OBT[1] << 16) & 0x00FF0000) |
179 |
+ (((UINT32)OBT[2] << 8) & 0x0000FF00) + (((UINT32)OBT[3]) & 0x000000FF); |
180 |
rec->SeqID = (((BYTE)subHeader[0] << 8) & 0xFF00) + (((BYTE)subHeader[1]) & 0x00FF); |
181 |
rec->Tbit = ((BYTE)((subHeader[2] & 0x80)) >> 7); |
182 |
rec->ID1 = (BYTE)subHeader[3]; |
183 |
rec->McmdLength = (0x0fff) & (((UINT16)(subHeader[4] << 8)) + ((UINT16)subHeader[5])); |
184 |
rec->TimeTag = (((UINT32)subHeader[6] << 24) & 0xFF000000) + (((UINT32)subHeader[7] << 16) & 0x00FF0000) + (((UINT32)subHeader[8] |
185 |
<< 8) & 0x0000FF00) + (((UINT32)subHeader[9]) & 0x000000FF); |
186 |
rec->endID = (BYTE)subTrailer[1]; |
187 |
|
188 |
rec->McmdData = new TArrayC(dataLength, subData); |
189 |
// delete [] subData; |
190 |
} |
191 |
else { |
192 |
oss.str(""); |
193 |
oss << "Wrong CRC on Subpacket internal to MCMD Packet "; |
194 |
msg = oss.str(); |
195 |
PamOffLineSW::mainLogUtil->logAll(msg); |
196 |
} |
197 |
|
198 |
delete[] subData; |
199 |
} |
200 |
|
201 |
if (start != length - 2) { |
202 |
oss.str(""); |
203 |
oss << "MCMD: Error in the MCMD Packet lenght (start!=length-2), it is not " << length; |
204 |
msg = oss.str(); |
205 |
PamOffLineSW::mainLogUtil->logWarning(msg); |
206 |
} |
207 |
|
208 |
//in the end compare the calculated partial CRC with the MCMD packet CRC |
209 |
readCRC = (((UINT16)(mysubData[length - 2] << 8)) & 0xFF00) + (((UINT16)mysubData[length - 1]) & 0x00FF); |
210 |
//readCRC = (((UINT16)(mysubData[length - 1]<<8))&0xFF00) + (((UINT16)mysubData[length])&0x00FF); |
211 |
// |
212 |
// printf(" CICCIOEND readCRC %X partialCRC %X \n",(UINT16)readCRC,(UINT16)partialCRC); |
213 |
// if(partialCRC != readCRC) throw WrongCRCException(" Wrong Global CRC for MCMD Packet "); |
214 |
if (partialCRC != readCRC) { |
215 |
oss.str(""); |
216 |
oss << "Wrong CRC for MCMD Packet: " << " CRC COMPUTED= " << partialCRC << " CRC READ= " << readCRC; |
217 |
msg = oss.str(); |
218 |
PamOffLineSW::mainLogUtil->logWarning(msg); |
219 |
throw WrongCRCException_PKTUsed(" Wrong CRC for MCMD Packet. "); |
220 |
}; |
221 |
} |
222 |
|