1 | #include <string.h>
|
---|
2 |
|
---|
3 | #include "brpaqu.h"
|
---|
4 |
|
---|
5 | /* ----------------------------------------
|
---|
6 | Projet BAORadio --- LAL - 2008-2010
|
---|
7 | R. Ansari , M.Taurigna
|
---|
8 | ------------------------------------------- */
|
---|
9 |
|
---|
10 | /*!
|
---|
11 | \class BAORadioException
|
---|
12 | \ingroup TAcq
|
---|
13 |
|
---|
14 | \brief Base class for exceptions used in the BAORadio acquisition software.
|
---|
15 | */
|
---|
16 |
|
---|
17 |
|
---|
18 | /* --Methode-- */
|
---|
19 | BAORadioException::BAORadioException(const char * m) throw()
|
---|
20 | {
|
---|
21 | if (m!=NULL) {
|
---|
22 | strncpy(msg_, m, BREX_MAXMSGLEN-1);
|
---|
23 | msg_[BREX_MAXMSGLEN-1] = '\0';
|
---|
24 | }
|
---|
25 | else msg_[0] = '\0';
|
---|
26 | }
|
---|
27 | /* --Methode-- */
|
---|
28 | BAORadioException::BAORadioException(const string& m) throw()
|
---|
29 | {
|
---|
30 | strncpy(msg_, m.c_str(), BREX_MAXMSGLEN-1);
|
---|
31 | msg_[BREX_MAXMSGLEN-1] = '\0';
|
---|
32 | }
|
---|
33 |
|
---|
34 | /* --Methode-- */
|
---|
35 | BAORadioException::~BAORadioException() throw()
|
---|
36 | {
|
---|
37 | }
|
---|
38 |
|
---|
39 | /* --Methode-- */
|
---|
40 | const char* BAORadioException::what() const throw()
|
---|
41 | {
|
---|
42 | return msg_;
|
---|
43 | }
|
---|
44 |
|
---|
45 | /* --Methode-- */
|
---|
46 | string const BAORadioException::Msg() const
|
---|
47 | {
|
---|
48 | return (string(msg_));
|
---|
49 | }
|
---|
50 |
|
---|
51 | ////////////////////////////////////////////////////////////////
|
---|
52 | ////////////////////////////////////////////////////////////////
|
---|
53 |
|
---|
54 | static inline void bswap4(void* p)
|
---|
55 | {
|
---|
56 | UInt32 tmp = *(UInt32*)p;
|
---|
57 | *(UInt32*)p = ((tmp >> 24) & 0x000000FF) |
|
---|
58 | ((tmp >> 8) & 0x0000FF00) |
|
---|
59 | ((tmp & 0x0000FF00) << 8) |
|
---|
60 | ((tmp & 0x000000FF) << 24);
|
---|
61 | }
|
---|
62 |
|
---|
63 | /*!
|
---|
64 | \class BRPaquet
|
---|
65 | \ingroup TAcq
|
---|
66 |
|
---|
67 | \brief Class representing BAORadio data paquets, as received from ADC boards
|
---|
68 | */
|
---|
69 |
|
---|
70 | /* --Methode__ */
|
---|
71 | BRPaquet::BRPaquet(Byte* src, Byte* dst, int paqsz, BRDataFmtConv fgconv)
|
---|
72 | // swapall = true -> on swap tout le paquet, sinon swap entete seulement
|
---|
73 | {
|
---|
74 | dst_ = dst;
|
---|
75 | sz_ = paqsz;
|
---|
76 | /*
|
---|
77 | if ((dst == NULL) || (paqsz<=(BRHDRSIZE+BRTRLSIZE)) )
|
---|
78 | throw BAORadioException("BRPaquet::BRPaquet(src,dst...) NULL src or dst pointer OR paqsz<HDR+TRLSize");
|
---|
79 | */
|
---|
80 | if ((dst==NULL)||(src==NULL)) return;
|
---|
81 |
|
---|
82 | UInt32* src32 = (UInt32*)src;
|
---|
83 | UInt32* dst32 = (UInt32*)dst;
|
---|
84 |
|
---|
85 |
|
---|
86 | switch ( fgconv ) {
|
---|
87 | case BR_DoNothing : // rien a faire
|
---|
88 | break;
|
---|
89 | case BR_Copy : // copie directe
|
---|
90 | memcpy(dst_, src, sz_);
|
---|
91 | break;
|
---|
92 | case BR_Swap32 : // On swappe toutes les donnees du paquet
|
---|
93 | // les bytes sont dans l'ordre par paquet de 4 octets (Int32) , les deux Int32 de
|
---|
94 | // On copie la zone donnees en faisant un byte-swap correspondant a 8 octets (4->8 Reza/firmware SGDMA)
|
---|
95 | for(int ka=0; ka<sz_/4; ka+=2) {
|
---|
96 | dst32[ka] = src32[ka+1];
|
---|
97 | dst32[ka+1] = src32[ka];
|
---|
98 | }
|
---|
99 | break;
|
---|
100 | case BR_SwapAll:
|
---|
101 | // Byte swap complet sur 8 bytes
|
---|
102 | for(int ka=0; ka<sz_; ka+=8) {
|
---|
103 | for(int kb=0; kb<4; kb++) {
|
---|
104 | dst_[ka+kb] = src[ka+3-kb+4];
|
---|
105 | dst_[ka+kb+4] = src[ka+3-kb];
|
---|
106 | }
|
---|
107 | }
|
---|
108 | break;
|
---|
109 | case BR_CopyHDR:
|
---|
110 | for(int ka=0; ka<BRHDRSIZE/4; ka++) dst32[ka] = src32[ka];
|
---|
111 | for(int ka=(HeaderSize()+DataSize())/4;ka < sz_/4; ka++) dst32[ka] = src32[ka];
|
---|
112 | break;
|
---|
113 | case BR_SwapHDR :
|
---|
114 | // ByteSwap 8 (4->8 Reza/firmware SGDMA) de l'enete
|
---|
115 | for(int ka=0; ka<BRHDRSIZE; ka+=8) {
|
---|
116 | for(int kb=0; kb<4; kb++) {
|
---|
117 | dst_[ka+kb] = src[ka+3-kb+4];
|
---|
118 | dst_[ka+kb+4] = src[ka+3-kb];
|
---|
119 | }
|
---|
120 | }
|
---|
121 | // Byte swap (sur 8 octets) du trailer
|
---|
122 | for(int ka=HeaderSize()+DataSize(); ka<sz_; ka+=8) {
|
---|
123 | for(int kb=0; kb<4; kb++) {
|
---|
124 | dst_[ka+kb] = src[ka+3-kb+4];
|
---|
125 | dst_[ka+kb+4] = src[ka+3-kb];
|
---|
126 | }
|
---|
127 | }
|
---|
128 | break;
|
---|
129 |
|
---|
130 | // --------------------
|
---|
131 | // --- Copie/remise en ordre des donnees FFT
|
---|
132 | case BR_FFTOneChan :
|
---|
133 | case BR_FFTTwoChan :
|
---|
134 | // copie du header uniquement
|
---|
135 | for(int ka=0; ka<BRHDRSIZE/4; ka++) dst32[ka] = src32[ka];
|
---|
136 | // on reoordonne les coeff FFT (pas de swap)
|
---|
137 | if (fgconv == BR_FFTOneChan)
|
---|
138 | ReorderFFTData((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize());
|
---|
139 | else {
|
---|
140 | ReorderFFTData((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize()/2);
|
---|
141 | ReorderFFTData((SByte*)(src+HeaderSize()+DataSize()/2), (SByte*)(dst_+HeaderSize()+DataSize()/2), DataSize()/2);
|
---|
142 | }
|
---|
143 | // copie du trailler uniquement :
|
---|
144 | for(int ka=(HeaderSize()+DataSize())/4;ka < sz_/4; ka++) dst32[ka] = src32[ka];
|
---|
145 | break;
|
---|
146 |
|
---|
147 | case BR_FFTOneChanSwapAll :
|
---|
148 | case BR_FFTTwoChanSwapAll :
|
---|
149 | // Byte swap (sur 8 octets) de l'entete
|
---|
150 | // ByteSwap 8 (4->8 Reza/firmware SGDMA) de l'enete
|
---|
151 | for(int ka=0; ka<BRHDRSIZE; ka+=8) {
|
---|
152 | for(int kb=0; kb<4; kb++) {
|
---|
153 | dst_[ka+kb] = src[ka+3-kb+4];
|
---|
154 | dst_[ka+kb+4] = src[ka+3-kb];
|
---|
155 | }
|
---|
156 | }
|
---|
157 | // on reoordonne les coeff FFT et on swappe en mem temps (Byte-swap sur 8 octets)
|
---|
158 | if (fgconv == BR_FFTOneChanSwapAll)
|
---|
159 | ReorderFFTDataSwapAll((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize());
|
---|
160 | else {
|
---|
161 | ReorderFFTDataSwapAll((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize()/2);
|
---|
162 | ReorderFFTDataSwapAll((SByte*)(src+HeaderSize()+DataSize()/2), (SByte*)(dst_+HeaderSize()+DataSize()/2), DataSize()/2);
|
---|
163 | }
|
---|
164 | // Byte swap (sur 8 octets) du trailer
|
---|
165 | for(int ka=HeaderSize()+DataSize(); ka<sz_; ka+=8) {
|
---|
166 | for(int kb=0; kb<4; kb++) {
|
---|
167 | dst_[ka+kb] = src[ka+3-kb+4];
|
---|
168 | dst_[ka+kb+4] = src[ka+3-kb];
|
---|
169 | }
|
---|
170 | }
|
---|
171 | break;
|
---|
172 |
|
---|
173 | case BR_FFTOneChanSwap32 :
|
---|
174 | case BR_FFTTwoChanSwap32 :
|
---|
175 | // swap du header uniquement : Echange de deux mots de 4 octets
|
---|
176 | for(int ka=0; ka<BRHDRSIZE/4; ka+=2) {
|
---|
177 | dst32[ka] = src32[ka+1];
|
---|
178 | dst32[ka+1] = src32[ka];
|
---|
179 | }
|
---|
180 | // on reoordonne et on swappe en mem temps (Echange de deux mots de 4 octets)
|
---|
181 | if (fgconv == BR_FFTOneChanSwap32)
|
---|
182 | ReorderFFTDataSwap32((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize());
|
---|
183 | else {
|
---|
184 | ReorderFFTDataSwap32((SByte*)(src+HeaderSize()), (SByte*)(dst_+HeaderSize()), DataSize()/2);
|
---|
185 | ReorderFFTDataSwap32((SByte*)(src+HeaderSize()+DataSize()/2), (SByte*)(dst_+HeaderSize()+DataSize()/2), DataSize()/2);
|
---|
186 | }
|
---|
187 | // swap du trailler uniquement : Echange de deux mots de 4 octets
|
---|
188 | for(int ka=(HeaderSize()+DataSize())/4;ka < sz_/4; ka+=2) {
|
---|
189 | dst32[ka] = src32[ka+1];
|
---|
190 | dst32[ka+1] = src32[ka];
|
---|
191 | }
|
---|
192 | break;
|
---|
193 |
|
---|
194 | default:
|
---|
195 | // on ne fait rien
|
---|
196 | break;
|
---|
197 | } // Fin switch
|
---|
198 |
|
---|
199 | }
|
---|
200 |
|
---|
201 | /* --Methode__ */
|
---|
202 | BRPaquet::BRPaquet(Byte* srcdst, int paqsz)
|
---|
203 | {
|
---|
204 | /*
|
---|
205 | if ((srcdst==NULL)||(paqsz<=(BRHDRSIZE+BRTRLSIZE)))
|
---|
206 | throw BAORadioException("BRPaquet::BRPaquet(srcdst) NULL pointer OR paqsz<HDR+TRLSize");
|
---|
207 | */
|
---|
208 | dst_ = srcdst;
|
---|
209 | sz_ = paqsz;
|
---|
210 | }
|
---|
211 |
|
---|
212 | /* --Methode__ */
|
---|
213 | BRPaquet::BRPaquet(int paqsz)
|
---|
214 | {
|
---|
215 | /*
|
---|
216 | if (paqsz<=(BRHDRSIZE+BRTRLSIZE))
|
---|
217 | throw BAORadioException("BRPaquet::BRPaquet(paqsz) paqsz<HDR+TRLSize");
|
---|
218 | */
|
---|
219 | dst_ = NULL;
|
---|
220 | sz_ = paqsz;
|
---|
221 | }
|
---|
222 |
|
---|
223 | /* --Methode__ */
|
---|
224 | BRPaquet::BRPaquet(BRPaquet const& paq)
|
---|
225 | {
|
---|
226 | dst_ = paq.dst_;
|
---|
227 | sz_ = paq.sz_;
|
---|
228 | }
|
---|
229 |
|
---|
230 | /* --Methode__ */
|
---|
231 | void BRPaquet::CopyFrom(BRPaquet& pq, BRPaqReducAction ract, int offset)
|
---|
232 | {
|
---|
233 | if (ract==BR_CopyRA) {
|
---|
234 | if (PaquetSize()!=pq.PaquetSize()) {
|
---|
235 | throw BAORadioException("BRPaquet::CopyFrom(BR_CopyRA) - NOT equal paquet size");
|
---|
236 | }
|
---|
237 | memcpy(Begin(), pq.Begin(), PaquetSize());
|
---|
238 | return;
|
---|
239 | }
|
---|
240 | // Recopie de l'entete HDR et trailer TRL
|
---|
241 | memcpy(Header(), pq.Header(), HeaderSize());
|
---|
242 | memcpy(Trailer(), pq.Trailer(), TrailerSize());
|
---|
243 | // Recopie partielle des donnees
|
---|
244 | size_t szc, szcmx;
|
---|
245 | switch (ract) {
|
---|
246 | case BR_OneChanReduc:
|
---|
247 | case BR_OneChanReducK0:
|
---|
248 | szc = DataSize();
|
---|
249 | szcmx = pq.DataSize()-offset;
|
---|
250 | if (szcmx<szc) szc=szcmx;
|
---|
251 | memcpy(Data1(), pq.Data1()+offset, szc);
|
---|
252 | if (ract==BR_OneChanReducK0) *(Data1C()) = *(pq.Data1C()); // On garde le continu et le nyquist
|
---|
253 | SetPaqLen(szc/4);
|
---|
254 | break;
|
---|
255 | case BR_TwoChanReduc:
|
---|
256 | case BR_TwoChanReducK0:
|
---|
257 | szc = DataSize()/2;
|
---|
258 | szcmx = pq.DataSize()/2-offset;
|
---|
259 | if (szcmx<szc) szc=szcmx;
|
---|
260 | memcpy(Data1(), pq.Data1()+offset, szc);
|
---|
261 | memcpy(Data2(), pq.Data2()+offset, szc);
|
---|
262 | if (ract==BR_TwoChanReducK0) { // On garde le continu et le nyquist
|
---|
263 | *(Data1C()) = *(pq.Data1C());
|
---|
264 | *(Data2C()) = *(pq.Data2C());
|
---|
265 | }
|
---|
266 | SetPaqLen(szc/2);
|
---|
267 | break;
|
---|
268 | default:
|
---|
269 | break;
|
---|
270 | }
|
---|
271 | }
|
---|
272 |
|
---|
273 |
|
---|
274 | /* --Methode__ */
|
---|
275 | UInt16 BRPaquet::ChannelID()
|
---|
276 | {
|
---|
277 |
|
---|
278 | UInt16 ChnId=ChanId();
|
---|
279 | UInt16 ChpId=ChipId();
|
---|
280 |
|
---|
281 |
|
---|
282 | if (ChpId == 2)
|
---|
283 | {
|
---|
284 | if (ChnId == 1) ChnId = Ch3;
|
---|
285 | if (ChnId == 2) ChnId = Ch4;
|
---|
286 | if (ChnId == 3) ChnId = Ch3_4;
|
---|
287 | }
|
---|
288 | return(ChnId);
|
---|
289 | }
|
---|
290 |
|
---|
291 | /* --Methode__ */
|
---|
292 | UInt16 BRPaquet::ModeAcquisition()
|
---|
293 | {
|
---|
294 | UInt16 ModAq;
|
---|
295 | //DEL printf("Mod Acq %x \n",ModeAcq());
|
---|
296 | ModAq = ((ModeAcq() & 0x30)>> 4);
|
---|
297 | return(ModAq);
|
---|
298 | }
|
---|
299 |
|
---|
300 | /* --Methode__ */
|
---|
301 | void BRPaquet::SetHDRMarker64(UInt64 htag)
|
---|
302 | {
|
---|
303 | *((UInt64*)(dst_+OFFSET)) = htag;
|
---|
304 | return;
|
---|
305 | }
|
---|
306 |
|
---|
307 | /* --Methode__ */
|
---|
308 | void BRPaquet::SetTRLMarker64(UInt64 ttag)
|
---|
309 | {
|
---|
310 | *((UInt64*)(dst_+(sz_-BRTRLSIZE+OFFSET+1))) = 0;
|
---|
311 | *((UInt64*)(dst_+(sz_-BRTRLSIZE+OFFSET))) = ttag;
|
---|
312 | return;
|
---|
313 | }
|
---|
314 |
|
---|
315 | /* --Methode__ */
|
---|
316 | void BRPaquet::SetFrameCounter(UInt32 fc)
|
---|
317 | {
|
---|
318 | UInt32* wp = (UInt32*)(dst_+(BRFRCPTOFF+OFFSET));
|
---|
319 | *wp = (*wp & 0x0000FFFF) | ((fc<<16) & 0xFFFF0000);
|
---|
320 | return;
|
---|
321 | }
|
---|
322 |
|
---|
323 | /* --Methode__ */
|
---|
324 | void BRPaquet::SetTimeTag(UInt64 timtag)
|
---|
325 | {
|
---|
326 | UInt32* wp = (UInt32*)(dst_+(BRFRCPTOFF+OFFSET));
|
---|
327 | UInt32 fc = *wp;
|
---|
328 | *((UInt64*)(dst_+(BRTMTAGOFF+OFFSET))) = timtag;
|
---|
329 | *wp = (*wp & 0x0000FFFF) | (fc & 0xFFFF0000);
|
---|
330 | return;
|
---|
331 | }
|
---|
332 |
|
---|
333 | /* --Methode__ */
|
---|
334 | ostream& BRPaquet::Print(ostream & os, int nelt, bool prht)
|
---|
335 | {
|
---|
336 | os << endl << "BRPaquet::Print() PaqSz=" << PaquetSize() << " DataSize=" << DataSize()
|
---|
337 | << " dst_pointer=(hex)" << hex << (unsigned long)dst_ << dec << endl;
|
---|
338 | if (dst_ == NULL) {
|
---|
339 | os << " ...NULL paquet " << endl;
|
---|
340 | return os;
|
---|
341 | }
|
---|
342 | os << " BR AcqMode: " << ModeAcquisition() << " Channel: " << ChannelID()
|
---|
343 | << " FrameCounter=" << FrameCounter() << " FrameDataLen=" << PaqLen() << endl;
|
---|
344 | if (TrailerSize() > 0)
|
---|
345 | os << " ...HDRMarker(hex)=" << hex << HDRMarker() << " TRLMarker=" << TRLMarker() << dec << endl;
|
---|
346 | else
|
---|
347 | os << " ...HDRMarker(hex)=" << hex << HDRMarker() << " NO TRLMarker=" << dec << endl;
|
---|
348 | UInt32 tt1, tt2;
|
---|
349 | tt2 = TimeTag1();
|
---|
350 | tt1 = TimeTag2();
|
---|
351 | os << " ...TimeTag (hex)=" << hex << " TT1= " << tt1 << " TT2=" << tt2
|
---|
352 | << dec << " ->TimeTag()=" << TimeTag() << endl;
|
---|
353 | // os << " ...Position Chariot (hex)= " << hex << PositionChariot() << endl;
|
---|
354 | if (nelt > DataSize()/2) nelt = DataSize()/2;
|
---|
355 | os << " ...Data[1.." << nelt << "]= ";
|
---|
356 |
|
---|
357 | for(int k=0; k<nelt; k++) os << (int)(*(Data1()+k)) << " , ";
|
---|
358 | os << endl;
|
---|
359 | os << " ...Data[" << DataSize()-nelt << ".." << DataSize()-1 << "]= ";
|
---|
360 | for(int k=DataSize()-nelt; k<DataSize(); k++) os << (int)(*(Data1()+k)) << " , ";
|
---|
361 | os << endl;
|
---|
362 | if (prht) { // Impression header / trailer
|
---|
363 | UInt32* hdr = (UInt32*)Header();
|
---|
364 | os << " ...Header (hex):" << hex ;
|
---|
365 | for(int k=0; k<HeaderSize()/sizeof(UInt32); k++)
|
---|
366 | os << hdr[k] << " , " ;
|
---|
367 | os << dec << endl;
|
---|
368 | if (TrailerSize() > 0) {
|
---|
369 | UInt32* trl = (UInt32*)Trailer();
|
---|
370 | os << " ...Trailer (hex):" << hex ;
|
---|
371 | for(int k=0; k<TrailerSize()/sizeof(UInt32); k++)
|
---|
372 | os << trl[k] << " , " ;
|
---|
373 | os << dec << endl;
|
---|
374 | }
|
---|
375 | }
|
---|
376 | return os;
|
---|
377 | }
|
---|
378 |
|
---|
379 |
|
---|
380 | // ---------------------------------------------------------
|
---|
381 | // **** REMARQUE N/2+1 complexes -> N/2 complexes *****
|
---|
382 | // N = Nb d'echantillon en temps -> N/2 paires (real, imag)
|
---|
383 | // Il y a le continu, et N/2 frequences ---> N/2+1 nombres complexes,
|
---|
384 | // mais avec la contrainte Z(0).imag = 0 Z(N/2).imag = 0
|
---|
385 | // f(i) i=0...N-1 ===> Z(k) ( Z complexe , k=0...N/2 )
|
---|
386 | // mais avec la contrainte Z(0).imag = 0 Z(N/2).imag = 0
|
---|
387 | // On peut donc tout mettre ds N/2 complexes en choisissant
|
---|
388 | // de mettre ds Z(0).imag Z(N/2).real
|
---|
389 | // ----------------------------------------------------------
|
---|
390 |
|
---|
391 | // Fonction magique qui donne le pointeur permettant de tenir compte du byte-swp sur 8 octets
|
---|
392 | static inline int IndexByteSwap8(int idx)
|
---|
393 | {
|
---|
394 | return ( (idx-(idx%8))+(7-idx%8) ) ;
|
---|
395 | }
|
---|
396 |
|
---|
397 | /* --Methode__ */
|
---|
398 | void BRPaquet::ReorderFFTDataSwapAll(SByte* src, SByte* dst, int N)
|
---|
399 | {
|
---|
400 | // Remise en ordre des donnees avec swap complet sur 8 bytes
|
---|
401 | // Code recopie depuis /Dev/DisplayData/HistoWindow.cc
|
---|
402 | // fonction TraceWind::DisplayBaoDatasFFT() et adapte aux structures BRPaquet et Cie
|
---|
403 | // Modif par rapport au code de Bruno : N/2 elements complexes au lieu de N/2+1 - Remarque ci-dessus
|
---|
404 |
|
---|
405 | int nCoef = N / 2; // to change
|
---|
406 | int debutIndex = N / 4 + 1;
|
---|
407 | int fifoSize = N / 4 - 1;
|
---|
408 | int i;
|
---|
409 |
|
---|
410 | TwoByteComplex* dstcmplx = (TwoByteComplex*)dst;
|
---|
411 |
|
---|
412 | // cout << " Display BAO Datas FFT (" << N << ")" << " : from 0 to "<< nCoef << endl;
|
---|
413 | // cout << " Variables : debutIndex, fifoSize " << debutIndex << ", " << fifoSize << endl;
|
---|
414 |
|
---|
415 |
|
---|
416 | // Sortie 1
|
---|
417 | for (i = 0; i < fifoSize ; i++)
|
---|
418 | {
|
---|
419 | dstcmplx[debutIndex + i].realB() = src[IndexByteSwap8(2*i)];
|
---|
420 | dstcmplx[debutIndex + i].imagB() = src[IndexByteSwap8(2*i + 1)];
|
---|
421 | }
|
---|
422 |
|
---|
423 | // element au milieu
|
---|
424 | dstcmplx[N / 4].realB() = src[IndexByteSwap8(2*fifoSize)];
|
---|
425 | dstcmplx[N / 4].imagB() = src[IndexByteSwap8(2*fifoSize + 1)];
|
---|
426 |
|
---|
427 | // Sortie 2
|
---|
428 | for (i = 0; i < fifoSize ; i++)
|
---|
429 | {
|
---|
430 | dstcmplx[fifoSize - i].realB() = src[IndexByteSwap8(nCoef + 2*i)];
|
---|
431 | dstcmplx[fifoSize - i].imagB() = src[IndexByteSwap8(nCoef + 2*i + 1)];
|
---|
432 | }
|
---|
433 |
|
---|
434 | // k = 0 et k = N/2
|
---|
435 | dstcmplx[0].realB() = src[IndexByteSwap8(N - 2)];
|
---|
436 | // Voir Remarque ci-dessus Z(N/2).real -> Z(0).image
|
---|
437 | dstcmplx[0].imagB() = src[IndexByteSwap8(N - 1)]; // Attention, on met ici la real(fmax)
|
---|
438 |
|
---|
439 | return ;
|
---|
440 | }
|
---|
441 |
|
---|
442 | static inline int IndexByteSwap8_32(int idx)
|
---|
443 | {
|
---|
444 | return ( (idx-(idx%8))+((4+idx%8)%8) ) ;
|
---|
445 | }
|
---|
446 |
|
---|
447 | /* --Methode__ */
|
---|
448 | void BRPaquet::ReorderFFTDataSwap32(SByte* src, SByte* dst, int N)
|
---|
449 | {
|
---|
450 | // Remise en ordre avec echange (swap) des mots de 32 bits
|
---|
451 | // Code recopie depuis /Dev/DisplayData/HistoWindow.cc
|
---|
452 | // fonction TraceWind::DisplayBaoDatasFFT() et adapte aux structures BRPaquet et Cie
|
---|
453 | // Modif par rapport au code de Bruno : N/2 elements complexes au lieu de N/2+1 - Remarque ci-dessus
|
---|
454 |
|
---|
455 | int nCoef = N / 2; // to change
|
---|
456 | int debutIndex = N / 4 + 1;
|
---|
457 | int fifoSize = N / 4 - 1;
|
---|
458 | int i;
|
---|
459 |
|
---|
460 | TwoByteComplex* dstcmplx = (TwoByteComplex*)dst;
|
---|
461 |
|
---|
462 | // cout << " Display BAO Datas FFT (" << N << ")" << " : from 0 to "<< nCoef << endl;
|
---|
463 | // cout << " Variables : debutIndex, fifoSize " << debutIndex << ", " << fifoSize << endl;
|
---|
464 |
|
---|
465 |
|
---|
466 | // Sortie 1
|
---|
467 | for (i = 0; i < fifoSize ; i++)
|
---|
468 | {
|
---|
469 | dstcmplx[debutIndex + i].realB() = src[IndexByteSwap8_32(2*i)];
|
---|
470 | dstcmplx[debutIndex + i].imagB() = src[IndexByteSwap8_32(2*i + 1)];
|
---|
471 | }
|
---|
472 |
|
---|
473 | // element au milieu
|
---|
474 | dstcmplx[N / 4].realB() = src[IndexByteSwap8_32(2*fifoSize)];
|
---|
475 | dstcmplx[N / 4].imagB() = src[IndexByteSwap8_32(2*fifoSize + 1)];
|
---|
476 |
|
---|
477 | // Sortie 2
|
---|
478 | for (i = 0; i < fifoSize ; i++)
|
---|
479 | {
|
---|
480 | dstcmplx[fifoSize - i].realB() = src[IndexByteSwap8_32(nCoef + 2*i)];
|
---|
481 | dstcmplx[fifoSize - i].imagB() = src[IndexByteSwap8_32(nCoef + 2*i + 1)];
|
---|
482 | }
|
---|
483 |
|
---|
484 | // k = 0 et k = N/2
|
---|
485 | dstcmplx[0].realB() = src[IndexByteSwap8_32(N - 2)];
|
---|
486 | // Voir Remarque ci-dessus Z(N/2).real -> Z(0).image
|
---|
487 | dstcmplx[0].imagB() = src[IndexByteSwap8_32(N - 1)]; // Attention, on met ici la real(fmax)
|
---|
488 |
|
---|
489 | return ;
|
---|
490 | }
|
---|
491 |
|
---|
492 | /* --Methode__ */
|
---|
493 | void BRPaquet::ReorderFFTData(SByte* src, SByte* dst, int N)
|
---|
494 | {
|
---|
495 | // Remise en ordre des donnees FFT (sans swap)
|
---|
496 | // Code recopie depuis /Dev/DisplayData/HistoWindow.cc
|
---|
497 | // fonction TraceWind::DisplayBaoDatasFFT() et adapte aux structures BRPaquet et Cie
|
---|
498 | // Modif par rapport au code de Bruno : N/2 elements complexes au lieu de N/2+1 - Remarque ci-dessus
|
---|
499 |
|
---|
500 | int nCoef = N / 2; // to change
|
---|
501 | int debutIndex = N / 4 + 1;
|
---|
502 | int fifoSize = N / 4 - 1;
|
---|
503 | int i;
|
---|
504 |
|
---|
505 | TwoByteComplex* dstcmplx = (TwoByteComplex*)dst;
|
---|
506 |
|
---|
507 | // cout << " Display BAO Datas FFT (" << N << ")" << " : from 0 to "<< nCoef << endl;
|
---|
508 | // cout << " Variables : debutIndex, fifoSize " << debutIndex << ", " << fifoSize << endl;
|
---|
509 |
|
---|
510 |
|
---|
511 | // Sortie 1
|
---|
512 | for (i = 0; i < fifoSize ; i++)
|
---|
513 | {
|
---|
514 | dstcmplx[debutIndex + i].realB() = src[(2*i)];
|
---|
515 | dstcmplx[debutIndex + i].imagB() = src[(2*i + 1)];
|
---|
516 | }
|
---|
517 |
|
---|
518 | // element au milieu
|
---|
519 | dstcmplx[N / 4].realB() = src[(2*fifoSize)];
|
---|
520 | dstcmplx[N / 4].imagB() = src[(2*fifoSize + 1)];
|
---|
521 |
|
---|
522 | // Sortie 2
|
---|
523 | for (i = 0; i < fifoSize ; i++)
|
---|
524 | {
|
---|
525 | dstcmplx[fifoSize - i].realB() = src[(nCoef + 2*i)];
|
---|
526 | dstcmplx[fifoSize - i].imagB() = src[(nCoef + 2*i + 1)];
|
---|
527 | }
|
---|
528 |
|
---|
529 | // k = 0 et k = N/2
|
---|
530 | dstcmplx[0].realB() = src[(N - 2)];
|
---|
531 | // Voir Remarque ci-dessus Z(N/2).real -> Z(0).image
|
---|
532 | dstcmplx[0].imagB() = src[(N - 1)]; // Attention, on met ici la real(fmax)
|
---|
533 |
|
---|
534 | return ;
|
---|
535 | }
|
---|
536 |
|
---|
537 | /* --Methode__ */
|
---|
538 | const char* BRPaquet::FmtConvToString(BRDataFmtConv fgconv)
|
---|
539 | {
|
---|
540 | const char * rs="";
|
---|
541 | switch ( fgconv ) {
|
---|
542 | case BR_DoNothing :
|
---|
543 | rs = "BR_DoNothing";
|
---|
544 | break;
|
---|
545 | case BR_Copy :
|
---|
546 | rs = "BR_Copy";
|
---|
547 | break;
|
---|
548 | case BR_SwapAll :
|
---|
549 | rs = "BR_SwapAll";
|
---|
550 | break;
|
---|
551 | case BR_Swap32 :
|
---|
552 | rs = "BR_Swap32";
|
---|
553 | break;
|
---|
554 | case BR_CopyHDR :
|
---|
555 | rs = "BR_CopyHDR";
|
---|
556 | break;
|
---|
557 | case BR_SwapHDR :
|
---|
558 | rs = "BR_SwapHDR";
|
---|
559 | break;
|
---|
560 | case BR_FFTOneChan :
|
---|
561 | rs = "BR_FFTOneChan";
|
---|
562 | break;
|
---|
563 | case BR_FFTTwoChan :
|
---|
564 | rs = "BR_FFTTwoChan";
|
---|
565 | break;
|
---|
566 | case BR_FFTOneChanSwapAll :
|
---|
567 | rs = "BR_FFTOneChanSwapAll";
|
---|
568 | break;
|
---|
569 | case BR_FFTTwoChanSwapAll :
|
---|
570 | rs = "BR_FFTTwoChanSwapAll";
|
---|
571 | break;
|
---|
572 | case BR_FFTOneChanSwap32 :
|
---|
573 | rs = "BR_FFTOneChanSwap32";
|
---|
574 | break;
|
---|
575 | case BR_FFTTwoChanSwap32 :
|
---|
576 | rs = "BR_FFTTwoChanSwap32";
|
---|
577 | break;
|
---|
578 | default:
|
---|
579 | rs = "?????";
|
---|
580 | break;
|
---|
581 | } // Fin switch
|
---|
582 | return rs;
|
---|
583 | }
|
---|
584 |
|
---|
585 | /* --Methode__ */
|
---|
586 | const char* BRPaquet::ReducActionToString(BRPaqReducAction rac)
|
---|
587 | {
|
---|
588 | const char * rs="";
|
---|
589 | switch ( rac ) {
|
---|
590 | case BR_CopyRA :
|
---|
591 | rs = "BR_CopyRA";
|
---|
592 | break;
|
---|
593 | case BR_OneChanReduc :
|
---|
594 | rs = "BR_OneChanReduc";
|
---|
595 | break;
|
---|
596 | case BR_TwoChanReduc :
|
---|
597 | rs = "BR_TwoChanReduc";
|
---|
598 | break;
|
---|
599 | case BR_OneChanReducK0 :
|
---|
600 | rs = "BR_OneChanReducK0";
|
---|
601 | break;
|
---|
602 | case BR_TwoChanReducK0 :
|
---|
603 | rs = "BR_TwoChanReducK0";
|
---|
604 | break;
|
---|
605 | default:
|
---|
606 | rs = "?????";
|
---|
607 | break;
|
---|
608 | } // Fin switch
|
---|
609 | return rs;
|
---|
610 | }
|
---|
611 |
|
---|
612 | // --------------------------------------------------------------------------
|
---|
613 | // Classe pour effectuer des verifications d'integrite sur les paquets/frames
|
---|
614 | // --------------------------------------------------------------------------
|
---|
615 |
|
---|
616 | /*!
|
---|
617 | \class BRPaqChecker
|
---|
618 | \ingroup TAcq
|
---|
619 |
|
---|
620 | \brief Data packets (BRPaquet) objet integrity checker
|
---|
621 | */
|
---|
622 |
|
---|
623 | /* --Methode__ */
|
---|
624 | BRPaqChecker::BRPaqChecker(bool cktrl, int maxprt)
|
---|
625 | {
|
---|
626 | cktrl_ = cktrl;
|
---|
627 | totnframes = 0;
|
---|
628 | nframeok = 0;
|
---|
629 | lostframes = 0;
|
---|
630 | frclst = 0;
|
---|
631 | lastframenum = 0;
|
---|
632 | cnt_saut = 0;
|
---|
633 | maxprt_ = maxprt;
|
---|
634 | DefineHDRTag();
|
---|
635 | DefineTRLTag();
|
---|
636 | }
|
---|
637 |
|
---|
638 | /* --Methode__ */
|
---|
639 | BRPaqChecker::BRPaqChecker(BRPaqChecker const& pck)
|
---|
640 | {
|
---|
641 | totnframes=pck.totnframes;
|
---|
642 | nframeok=pck.nframeok;
|
---|
643 | lostframes=pck.lostframes;
|
---|
644 | frclst=pck.frclst;
|
---|
645 | lastframenum=pck.lastframenum;
|
---|
646 | cktrl_=pck.cktrl_;
|
---|
647 | cnt_saut=pck.cnt_saut;
|
---|
648 | maxprt_=pck.maxprt_;
|
---|
649 | hdrtag_=pck.hdrtag_;
|
---|
650 | trltag_=pck.trltag_;
|
---|
651 | }
|
---|
652 |
|
---|
653 | /* --Methode__ */
|
---|
654 | BRPaqChecker::~BRPaqChecker()
|
---|
655 | {
|
---|
656 | }
|
---|
657 |
|
---|
658 | UInt64 BRPaqChecker::DefineHDRTag(UInt32 hdr1, UInt32 hdr2)
|
---|
659 | {
|
---|
660 | hdrtag_ = (UInt64)hdr1 + ((UInt64)hdr2 << 32);
|
---|
661 | return hdrtag_;
|
---|
662 | }
|
---|
663 |
|
---|
664 | /* --Methode__ */
|
---|
665 | UInt64 BRPaqChecker::DefineTRLTag(UInt32 trl1, UInt32 trl2)
|
---|
666 | {
|
---|
667 | trltag_ = (UInt64)trl1 + ((UInt64)trl2 << 32);
|
---|
668 | return trltag_;
|
---|
669 | }
|
---|
670 |
|
---|
671 | /* --Methode__ */
|
---|
672 | bool BRPaqChecker::Check(BRPaquet& paq, UInt64& numframe)
|
---|
673 | {
|
---|
674 | totnframes++;
|
---|
675 | numframe=0;
|
---|
676 | if (paq.HDRMarker64() != HDRTag()) return false;
|
---|
677 | if (cktrl_&&(paq.TRLMarker64() != TRLTag())) return false;
|
---|
678 | /* DBG
|
---|
679 | if (paq.TRLMarker64() != TRLTag()) {
|
---|
680 | cnt_pb++;
|
---|
681 | if (cnt_pb < 5) paq.Print();
|
---|
682 | return false;
|
---|
683 | }
|
---|
684 | */
|
---|
685 | unsigned int curfc = paq.FrameCounter();
|
---|
686 | unsigned int delfc = 0;
|
---|
687 | if (nframeok > 0) {
|
---|
688 | if (curfc>frclst) delfc = (curfc-frclst);
|
---|
689 | else delfc = (65536-frclst+curfc);
|
---|
690 | lostframes += (unsigned long long)delfc - 1;
|
---|
691 | if (delfc != 1) {
|
---|
692 | cnt_saut++;
|
---|
693 | if (cnt_saut < maxprt_) {
|
---|
694 | cout << "BRPaqChecker::Check([NumFrameOK=" << nframeok
|
---|
695 | << ")/Debug FrameCounter Cur=" << curfc
|
---|
696 | << " Last=" << frclst << " -> delta=" << delfc << endl;
|
---|
697 | paq.Print();
|
---|
698 | }
|
---|
699 | }
|
---|
700 | }
|
---|
701 | nframeok++; frclst=curfc;
|
---|
702 | lastframenum+=(unsigned long long)delfc; // numero de frame sans repliement a 65535
|
---|
703 | numframe=lastframenum;
|
---|
704 | //DBG if (cnt_pb<5) { cnt_pb++; paq.Print(); }
|
---|
705 | return true;
|
---|
706 | }
|
---|
707 |
|
---|
708 | /* --Methode__ */
|
---|
709 | ostream& BRPaqChecker::Print(ostream& os) const
|
---|
710 | {
|
---|
711 | // os << "BRPaqChecker: HDRTag=" << hex << HDRTag() << " TRLTag=" << TRLTag() << dec << "\n"
|
---|
712 | // << " ... Tot.Nb.Frames.Proc=" << totnframes << " NbFrame HDR/TRL OK=" << nframeok
|
---|
713 | os << "BRPaqChecker: Tot.Nb.Frames.Proc=" << totnframes << " Nb.HDR/TRL OK=" << nframeok;
|
---|
714 | if (cktrl_) os << " (Check Header AND Trailer)" << endl;
|
---|
715 | else os << " (Header Check only)" << endl;
|
---|
716 | float meangap = (cnt_saut>0)?((float)lostframes/(float)cnt_saut):0.;
|
---|
717 | os << " ... LostFrames=" << lostframes
|
---|
718 | << " LossRate=" << (double)lostframes*100./(double)totnframes << " %"
|
---|
719 | << " NbGaps=" << cnt_saut << " MeanGap=" << meangap << endl;
|
---|
720 | return os;
|
---|
721 | }
|
---|
722 |
|
---|
723 | /* --Methode__ */
|
---|
724 | string BRPaqChecker::Summary(bool detail) const
|
---|
725 | {
|
---|
726 | double meangap = (cnt_saut>0)?((double)lostframes/(double)cnt_saut):0.;
|
---|
727 | double lossrate= (double)lostframes*100./(double)totnframes;
|
---|
728 | char buff[256];
|
---|
729 | if (detail)
|
---|
730 | sprintf(buff, " TotNPaq= %ld HDR/TRL OK= %ld LostFrames= %ld LossRate= %lg NbGaps= %ld MeanGap= %lg",
|
---|
731 | (long)totnframes, (long)nframeok, (long)lostframes, lossrate, (long)cnt_saut, meangap);
|
---|
732 | else
|
---|
733 | sprintf(buff, "TotNPaq=%ld N_Ok=%ld LossRate=%lg", (long)totnframes, (long)nframeok, lossrate);
|
---|
734 | return buff;
|
---|
735 | }
|
---|
736 |
|
---|