MUON/AliMUONRawWriter.cxx

   1 /**************************************************************************
   2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
   3  *                                                                        *
   4  * Author: The ALICE Off-line Project.                                    *
   5  * Contributors are mentioned in the code where appropriate.              *
   6  *                                                                        *
   7  * Permission to use, copy, modify and distribute this software and its   *
   8  * documentation strictly for non-commercial purposes is hereby granted   *
   9  * without fee, provided that the above copyright notice appears in all   *
  10  * copies and that both the copyright notice and this permission notice   *
  11  * appear in the supporting documentation. The authors make no claims     *
  12  * about the suitability of this software for any purpose. It is          *
  13  * provided "as is" without express or implied warranty.                  *
  14  **************************************************************************/
  15
  16 /* $Id$ */
  17
  18 /// \class AliMUONRawWriter
  19 /// MUON Raw Data generaton in ALICE-MUON
  20 /// This class version 3 (further details could be found in Alice-note)
  21 ///
  22 /// Implemented non-constant buspatch numbers for tracking
  23 /// with correct DDL id (first guess)
  24 /// (Ch. Finck, dec 2005)
  25 ///
  26 /// Digits2Raw:
  27 /// Generates raw data for MUON tracker and finally for trigger
  28 /// Using real mapping (inverse) for tracker
  29 /// For trigger there is no mapping (mapping could be found in AliMUONTriggerCircuit)
  30 /// Ch. Finck, July 04
  31 /// Use memcpy instead of assignment elt by elt
  32 /// Introducing variable DSP numbers, real manu numbers per buspatch for st12
  33 /// Implemented scaler event for Trigger
  34 /// Ch. Finck, Jan. 06
  35 /// Using bus itr in DDL instead of simple incrementation
  36 /// treat correctly the DDL & buspatch for station 3.
  37 /// Using informations from AliMUONTriggerCrateStore for
  38 /// empty slots and non-notified cards in trigger crates.
  39 /// Ch. Finck, August 06.
  40
  41 #include "AliMUONRawWriter.h"
  42
  43 #include "AliMUONBlockHeader.h"
  44 #include "AliMUONBusStruct.h"
  45 #include "AliMUONConstants.h"
  46 #include "AliMUONDarcHeader.h"
  47 #include "AliMUONData.h"
  48 #include "AliMUONDigit.h"
  49 #include "AliMUONDspHeader.h"
  50 #include "AliMUONGlobalTrigger.h"
  51 #include "AliMUONLocalStruct.h"
  52 #include "AliMUONLocalTrigger.h"
  53 #include "AliMUONLocalTriggerBoard.h"
  54 #include "AliMUONRegHeader.h"
  55 #include "AliMUONTriggerCrate.h"
  56 #include "AliMUONTriggerCrateStore.h"
  57
  58 #include "AliMpBusPatch.h"
  59 #include "AliMpDEManager.h"
  60 #include "AliMpExMap.h"
  61 #include "AliMpConstants.h"
  62 #include "AliMpPlaneType.h"
  63 #include "AliMpSegmentation.h"
  64 #include "AliMpStationType.h"
  65 #include "AliMpVSegmentation.h"
  66
  67 #include "AliRawReader.h"
  68 #include "AliBitPacking.h"
  69 #include "AliDAQ.h"
  70 #include "AliLog.h"
  71
  72 #include "TList.h"
  73 #include "TObjArray.h"
  74 #include "TStopwatch.h"
  75
  76 /// \cond CLASSIMP
  77 ClassImp(AliMUONRawWriter) // Class implementation in ROOT context
  78 /// \endcond
  79
  80 Int_t AliMUONRawWriter::fgManuPerBusSwp1B[12]  = {1, 27, 53, 79, 105, 131, 157, 183, 201, 214, 224, 232};
  81 Int_t AliMUONRawWriter::fgManuPerBusSwp1NB[12] = {1, 27, 53, 79, 105, 131, 157, 183, 201, 214, 225, 233};
  82
  83 Int_t AliMUONRawWriter::fgManuPerBusSwp2B[12]  = {1, 27, 53, 79, 105, 131, 157, 183, 201, 214, 226, 246};
  84 Int_t AliMUONRawWriter::fgManuPerBusSwp2NB[12] = {1, 27, 53, 79, 105, 131, 157, 183, 201, 214, 227, 245};
  85
  86 namespace
  87 {
  88   enum ETimer { kWriteTracker, kWriteTrigger, kDigitLoop, kGetBusPatch, kTest, kLast };
  89 }
  90
  91 //__________________________________________________________________________
  92 AliMUONRawWriter::AliMUONRawWriter(AliMUONData* data)
  93   : TObject(),
  94     fMUONData(data),
  95     fBlockHeader(new AliMUONBlockHeader()),
  96     fDspHeader(new AliMUONDspHeader()),
  97     fDarcHeader(new AliMUONDarcHeader()),
  98     fRegHeader(new AliMUONRegHeader()),
  99     fLocalStruct(new AliMUONLocalStruct()),
 100     fBusPatchManager(new AliMpBusPatch()),
 101     fCrateManager(new AliMUONTriggerCrateStore()),
 102     fScalerEvent(kFALSE),
 103     fHeader(),
 104     fTimers(new TStopwatch[kLast])
 105
 106 {
 107   /// Standard Constructor
 108
 109   AliDebug(1,"Standard ctor");
 110   fFile[0] = fFile[1] = 0x0;
 111   fFile[2] = fFile[3] = 0x0;
 112
 113   // setting data key to default value (only for writting)
 114   fBlockHeader->SetDataKey(fBlockHeader->GetDefaultDataKey());
 115   fDspHeader->SetDataKey(fDspHeader->GetDefaultDataKey());
 116
 117   // bus patch managers
 118   fBusPatchManager->ReadBusPatchFile();
 119
 120   // Crate manager
 121   fCrateManager->ReadFromFile();
 122
 123   // timers
 124   for ( Int_t i = 0; i < kLast; ++i )
 125   {
 126     fTimers[i].Start(kTRUE);
 127     fTimers[i].Stop();
 128   }
 129
 130 }
 131
 132 //__________________________________________________________________________
 133 AliMUONRawWriter::AliMUONRawWriter()
 134   : TObject(),
 135     fMUONData(0),
 136     fBlockHeader(0),
 137     fDspHeader(0),
 138     fDarcHeader(0),
 139     fRegHeader(0),
 140     fLocalStruct(0),
 141     fBusPatchManager(0),
 142     fCrateManager(0x0),
 143     fScalerEvent(kFALSE),
 144     fHeader(),
 145     fTimers(0)
 146 {
 147   /// Default Constructor
 148
 149   AliDebug(1,"Default ctor");
 150   fFile[0] = fFile[1] = 0x0;
 151   fFile[2] = fFile[3] = 0x0;
 152
 153 }
 154
 155 //__________________________________________________________________________
 156 AliMUONRawWriter::~AliMUONRawWriter(void)
 157 {
 158   /// Destructor
 159
 160   AliDebug(1,"dtor");
 161
 162   delete fBlockHeader;
 163   delete fDspHeader;
 164   delete fDarcHeader;
 165   delete fRegHeader;
 166   delete fLocalStruct;
 167
 168   delete fBusPatchManager;
 169   delete fCrateManager;
 170
 171   for ( Int_t i = 0; i < kLast; ++i )
 172   {
 173     AliDebug(1, Form("Execution time (timer %d) : R:%7.2fs C:%7.2fs",i,
 174                  fTimers[i].RealTime(),fTimers[i].CpuTime()));
 175   }
 176
 177   delete[] fTimers;
 178 }
 179
 180 //______________________________________________________________________________
 181 //void
 182 //AliMUONRawWriter::CheckDigits()
 183 //{
 184 //  std::map<int,std::map<int,int> > m;
 185 //
 186 //  for (Int_t iSt = 0; iSt < AliMUONConstants::NTrackingCh()/2; ++iSt)
 187 //  {
 188 //    for (Int_t iCh = iSt*2; iCh <= iSt*2 + 1; ++iCh)
 189 //    {
 190 //      TClonesArray* muonDigits = fMUONData->Digits(iCh);
 191 //      for (Int_t idig = 0; idig < muonDigits->GetEntriesFast(); idig++)
 192 //      {
 193 //        AliMUONDigit* digit = (AliMUONDigit*) muonDigits->UncheckedAt(idig);
 194 //        Int_t busPatchId = GetBusPatch(*digit);
 195 //        m[busPatchId][digit->ManuId()]++;
 196 //      }
 197 //    }
 198 //  }
 199 //
 200 //  std::map<int,std::map<int,int> >::const_iterator it;
 201 //
 202 //  Int_t nManuMax(0);
 203 //
 204 //  for ( it = m.begin(); it != m.end(); ++it )
 205 //  {
 206 //    AliDebug(1,Form("BusPatch %3d has %3d manus",it->first,it->second.size()));
 207 //    nManuMax = std::max((Int_t)it->second.size(),nManuMax);
 208 //    std::map<int,int>::const_iterator it2;
 209 //    for ( it2 = it->second.begin(); it2 != it->second.end(); ++it2 )
 210 //    {
 211 //      AliDebug(1,Form("        BusPatch %3d Manu %4d Nch %3d",it->first,it2->first,it2->second));
 212 //    }
 213 //  }
 214 //  AliDebug(1,Form("Max manus per busPatch : %3d",nManuMax));
 215 //}
 216
 217 //____________________________________________________________________
 218 Int_t AliMUONRawWriter::Digits2Raw()
 219 {
 220   /// convert digits of the current event to raw data
 221
 222   Int_t idDDL;
 223   Char_t name[255];
 224
 225   fMUONData->GetLoader()->LoadDigits("READ");
 226
 227   fMUONData->SetTreeAddress("D,GLT");
 228
 229   fMUONData->ResetDigits();
 230   fMUONData->ResetTrigger();
 231
 232   // This will get both tracker and trigger digits.
 233   fMUONData->GetDigits();
 234
 235 //  CheckDigits();
 236
 237   // tracking chambers
 238
 239   for (Int_t iSt = 0; iSt < AliMUONConstants::NTrackingCh()/2; ++iSt) {
 240
 241     // open files for one station
 242     // cos station 3, 1/4 of DE's from 2 chambers has same DDL number
 243     idDDL = iSt * 4;
 244     strcpy(name,AliDAQ::DdlFileName("MUONTRK",idDDL));
 245     fFile[0] = fopen(name,"w");
 246
 247     idDDL = (iSt * 4) + 1;
 248     strcpy(name,AliDAQ::DdlFileName("MUONTRK",idDDL));
 249     fFile[1] = fopen(name,"w");
 250
 251     idDDL =  (iSt * 4) + 2;;
 252     strcpy(name,AliDAQ::DdlFileName("MUONTRK",idDDL));
 253     fFile[2] = fopen(name,"w");
 254
 255     idDDL =  (iSt * 4) + 3;
 256     strcpy(name,AliDAQ::DdlFileName("MUONTRK",idDDL));
 257     fFile[3] = fopen(name,"w");
 258
 259     WriteTrackerDDL(iSt);
 260
 261     // reset and close when station has been processed
 262     fclose(fFile[0]);
 263     fclose(fFile[1]);
 264     fclose(fFile[2]);
 265     fclose(fFile[3]);
 266
 267   }
 268
 269   AliDebug(1,"Tracker written");
 270
 271   // trigger chambers
 272
 273   // open files
 274   idDDL = 0;// MUTR
 275   strcpy(name,AliDAQ::DdlFileName("MUONTRG",idDDL));
 276   fFile[0] = fopen(name,"w");
 277
 278   idDDL = 1;// MUTR
 279   strcpy(name,AliDAQ::DdlFileName("MUONTRG",idDDL));
 280   fFile[1] = fopen(name,"w");
 281
 282   WriteTriggerDDL();
 283
 284   // reset and close
 285   fclose(fFile[0]);
 286   fclose(fFile[1]);
 287
 288   AliDebug(1,"Trigger written");
 289
 290   fMUONData->ResetDigits();
 291   fMUONData->ResetTrigger();
 292   fMUONData->GetLoader()->UnloadDigits();
 293
 294   AliDebug(1,"muondata reset");
 295
 296   return kTRUE;
 297 }
 298
 299 //____________________________________________________________________
 300 Int_t AliMUONRawWriter::WriteTrackerDDL(Int_t iSt)
 301 {
 302   /// writing DDL for tracker
 303   /// used inverse mapping
 304
 305   fTimers[kWriteTracker].Start(kFALSE);
 306
 307   static const Int_t kMAXADC = (1<<12)-1; // We code the charge on a 12 bits ADC.
 308
 309   // resets
 310   TClonesArray* muonDigits = 0;
 311
 312   // DDL header
 313   Int_t headerSize = sizeof(fHeader)/4;
 314
 315   // DDL event one per half chamber
 316
 317   // raw data
 318   Char_t parity = 0x4;
 319   UShort_t manuId = 0;
 320   UChar_t channelId = 0;
 321   UShort_t charge = 0;
 322   Int_t busPatchId = 0;
 323   UInt_t word;
 324
 325
 326   // Dsp length
 327   Int_t totalDspLength;
 328   Int_t dspLength;
 329
 330   // block length
 331   Int_t totalBlkLength;
 332   Int_t blkLength;
 333
 334   // total DDL length
 335   Int_t totalDDLLength;
 336
 337   // indexes
 338   Int_t index;
 339   Int_t indexDsp;
 340   Int_t indexBlk;
 341
 342   // buffer size (max'ed out)
 343   // (((43 manus max per bus patch *64 channels + 4 bus patch words) * 5 bus patch
 344   //   + 10 dsp words)*5 dsps + 8 block words)*2 blocks
 345   static const Int_t kBufferSize = (((43*64 + 4)*5 + 10)*5 + 8)*2;
 346
 347   Int_t nDigits;
 348
 349   AliMpExMap busPatchMap(kTRUE);
 350
 351   fTimers[kDigitLoop].Start(kFALSE);
 352
 353   for (Int_t iCh = iSt*2; iCh <= iSt*2 + 1; ++iCh) {
 354
 355     muonDigits = fMUONData->Digits(iCh);
 356
 357     nDigits = muonDigits->GetEntriesFast();
 358
 359     // loop over digit
 360     for (Int_t idig = 0; idig < nDigits; ++idig) {
 361
 362       AliMUONDigit* digit = static_cast<AliMUONDigit*>(muonDigits->UncheckedAt(idig));
 363
 364       charge = digit->ADC();
 365       if ( charge > kMAXADC )
 366       {
 367         // This is most probably an error in the digitizer (which should insure
 368         // the adc is below kMAXADC), so make it a (non-fatal) error indeed.
 369         AliError(Form("adc value %d above %x for ch %d . Setting to %x. Digit is:",iCh,
 370                       charge,kMAXADC,kMAXADC));
 371         StdoutToAliError(digit->Print());
 372         charge = kMAXADC;
 373       }
 374
 375       // inverse mapping
 376       fTimers[kGetBusPatch].Start(kFALSE);
 377       busPatchId = GetBusPatch(*digit);
 378       fTimers[kGetBusPatch].Stop();
 379       if (busPatchId<0) continue;
 380
 381       fTimers[kTest].Start(kFALSE);
 382       busPatchId = GetBusPatch(*digit);
 383       fTimers[kTest].Stop();
 384
 385       if ( digit->ManuId() > 0x7FF || digit->ManuId() < 0 ||
 386            digit->ManuChannel() > 0x3F || digit->ManuChannel() < 0 )
 387       {
 388         StdoutToAliError(digit->Print(););
 389         AliFatal("ManuId,ManuChannel are invalid for the digit above.");
 390       }
 391
 392       manuId = ( digit->ManuId() & 0x7FF ); // 11 bits
 393       channelId = ( digit->ManuChannel() & 0x3F ); // 6 bits
 394
 395       //packing word
 396       word = 0;
 397       AliBitPacking::PackWord((UInt_t)manuId,word,18,28);
 398       AliBitPacking::PackWord((UInt_t)channelId,word,12,17);
 399       AliBitPacking::PackWord((UInt_t)charge,word,0,11);
 400
 401       // parity word
 402       parity = word & 0x1;
 403       for (Int_t i = 1; i <= 30; ++i)
 404         parity ^=  ((word >> i) & 0x1);
 405       AliBitPacking::PackWord((UInt_t)parity,word,31,31);
 406
 407       AliMUONBusStruct* busStruct =
 408         static_cast<AliMUONBusStruct*>(busPatchMap.GetValue(busPatchId));
 409
 410       if (!busStruct)
 411       {
 412         busStruct = new AliMUONBusStruct;
 413         busStruct->SetDataKey(busStruct->GetDefaultDataKey());
 414         busStruct->SetBusPatchId(busPatchId);
 415         busStruct->SetLength(0);
 416         busPatchMap.Add(busPatchId,busStruct);
 417       }
 418
 419       // set sub Event
 420       busStruct->AddData(word);
 421
 422     } // idig
 423   } // loop over chamber in station
 424
 425   fTimers[kDigitLoop].Stop();
 426
 427   // getting info for the number of buspatches
 428   Int_t iBusPatch;
 429   Int_t length;
 430   Int_t iBusPerDSP[5];//number of bus patches per DSP
 431   Int_t iDspMax; //number max of DSP per block
 432   Int_t iFile = 0;
 433
 434   AliMUONBusStruct* busStructPtr(0x0);
 435
 436   // open DDL files, 4 per station
 437   for (Int_t iDDL = iSt*4; iDDL < 4 + iSt*4; ++iDDL) {
 438
 439     fBusPatchManager->ResetBusItr(iDDL);
 440     fBusPatchManager->GetDspInfo(iDDL, iDspMax, iBusPerDSP);
 441
 442     Int_t buffer[kBufferSize];
 443
 444     totalDDLLength = 0;
 445
 446     indexBlk = 0;
 447     indexDsp = 0;
 448     index = 0;
 449
 450     // two blocks A and B per DDL
 451     for (Int_t iBlock = 0; iBlock < 2; ++iBlock) {
 452
 453       // block header
 454       length = fBlockHeader->GetHeaderLength();
 455       memcpy(&buffer[index],fBlockHeader->GetHeader(),length*4);
 456       indexBlk = index;
 457       index += length;
 458
 459       // 5 DSP's max per block
 460       for (Int_t iDsp = 0; iDsp < iDspMax; ++iDsp) {
 461
 462         // DSP header
 463         length = fDspHeader->GetHeaderLength();
 464         memcpy(&buffer[index],fDspHeader->GetHeader(),length*4);
 465         indexDsp = index;
 466         index += length;
 467
 468         // 5 buspatches max per DSP
 469         for (Int_t i = 0; i < iBusPerDSP[iDsp]; i++) {
 470
 471           iBusPatch = fBusPatchManager->NextBusInDDL(iDDL);
 472
 473           // iteration over bus patch in DDL
 474           if (iBusPatch == -1) {
 475             AliWarning(Form("Error in bus itr in DDL %d\n", iDDL));
 476             continue;
 477           }
 478
 479           // 4 DDL's per station, condition needed for station 3
 480           iFile = iDDL - iSt*4; // works only if DDL begins at zero (as it should be) !!!
 481
 482           busStructPtr = static_cast<AliMUONBusStruct*>(busPatchMap.GetValue(iBusPatch));
 483
 484           // check if buspatchid has digit
 485           if (busStructPtr) {
 486             // add bus patch structure header
 487             length = busStructPtr->GetHeaderLength();
 488             memcpy(&buffer[index],busStructPtr->GetHeader(),length*4);
 489             index += length;
 490
 491             // add bus patch data
 492             length = busStructPtr->GetLength();
 493             memcpy(&buffer[index],busStructPtr->GetData(),length*4);
 494             index += length;
 495
 496             if (AliLog::GetGlobalDebugLevel() == 3) {
 497               for (Int_t j = 0; j < busStructPtr->GetLength(); j++) {
 498                 printf("busPatchId %d, manuId %d channelId %d\n", busStructPtr->GetBusPatchId(),
 499                        busStructPtr->GetManuId(j), busStructPtr->GetChannelId(j));
 500               }
 501             }
 502           } else {
 503             // writting anyhow buspatch structure (empty ones)
 504             buffer[index++] = busStructPtr->GetDefaultDataKey(); // fill it also for empty data size
 505             buffer[index++] = busStructPtr->GetHeaderLength(); // header length
 506             buffer[index++] = 0; // raw data length
 507             buffer[index++] = iBusPatch; // bus patch
 508           }
 509         } // bus patch
 510
 511         // check if totalLength even
 512         // set padding word in case
 513         // Add one word 0xBEEFFACE at the end of DSP structure
 514         totalDspLength  = index - indexDsp;
 515         if ((totalDspLength % 2) == 1) {
 516           buffer[indexDsp + fDspHeader->GetHeaderLength() - 2] = 1;
 517           buffer[index++] = fDspHeader->GetDefaultPaddingWord();
 518           totalDspLength++;
 519         }
 520
 521         dspLength          = totalDspLength - fDspHeader->GetHeaderLength();
 522
 523         buffer[indexDsp+1] = totalDspLength; // dsp total length
 524         buffer[indexDsp+2] = dspLength; // data length
 525
 526       } // dsp
 527
 528       totalBlkLength  = index - indexBlk;
 529       blkLength       = totalBlkLength - fBlockHeader->GetHeaderLength();
 530       totalDDLLength += totalBlkLength;
 531
 532       buffer[indexBlk+1] = totalBlkLength; // total block length
 533       buffer[indexBlk+2] = blkLength;
 534
 535     } // block
 536
 537     //writting onto disk
 538     // write DDL 1 - 4
 539     // total length in bytes
 540     fHeader.fSize = (totalDDLLength + headerSize) * 4;
 541
 542     fwrite((char*)(&fHeader),headerSize*4,1,fFile[iFile]);
 543     fwrite(buffer,sizeof(int),index,fFile[iFile]);
 544   }
 545
 546   fTimers[kWriteTracker].Stop();
 547   return kTRUE;
 548 }
 549
 550 //____________________________________________________________________
 551 Int_t AliMUONRawWriter::GetBusPatch(Int_t detElemId, Int_t manuId) const
 552 {
 553   /// Determine the BusPatch this digit belongs to.
 554
 555   Int_t* ptr = 0;
 556
 557   AliMpPlaneType plane =
 558     (manuId & AliMpConstants::ManuMask(kNonBendingPlane)) ?
 559     kNonBendingPlane : kBendingPlane;
 560
 561   AliMpStationType stationType = AliMpDEManager::GetStationType(detElemId);
 562
 563   if ( stationType == kStation1 || stationType == kStation2 )
 564   {
 565     if (plane == kBendingPlane)
 566     {
 567       ptr = &fgManuPerBusSwp1B[0];
 568     }
 569     else
 570     {
 571       ptr = &fgManuPerBusSwp1NB[0];
 572     }
 573   }
 574   else
 575   {
 576     if (plane == kBendingPlane)
 577     {
 578       ptr = &fgManuPerBusSwp2B[0];
 579     }
 580     else
 581     {
 582       ptr = &fgManuPerBusSwp2NB[0];
 583     }
 584   }
 585
 586   // Getting buspatch id
 587   TArrayI* vec = fBusPatchManager->GetBusfromDE(detElemId);
 588   Int_t pos = 0;
 589
 590   Int_t m = ( manuId & 0x3FF ); // remove bit 10
 591                                         //FIXME : how can we remove that condition
 592                                         // on the 10-th bit ? All the rest need not any knowledge about it,
 593                                         // can't we find a way to get manu<->buspatch transparent to this too ?
 594
 595   if ( stationType == kStation1 || stationType == kStation2 )
 596   {
 597     for (pos = 11; pos >=0 ; --pos)
 598     {
 599       if (m >= ptr[pos]) break;
 600     }
 601   }
 602   else
 603   {
 604     // offset of 100 in manuId for following bus patch
 605     pos = m/100;
 606   }
 607
 608
 609   if (pos >(Int_t) vec->GetSize())
 610   {
 611     AliError(Form("pos greater %d than size %d manuId %d detElemId %d \n",
 612                   pos, (Int_t)vec->GetSize(), manuId, detElemId));
 613     AliError(Form("Chamber %s Plane %s manuId %d m %d",
 614                   StationTypeName(stationType).Data(),
 615                   PlaneTypeName(plane).Data(),
 616                   manuId,
 617                   m));
 618     return -1;
 619   }
 620
 621   Int_t busPatchId = vec->At(pos);
 622
 623   if ( ( stationType == kStation1 || stationType == kStation2 ) &&
 624        ( plane == kNonBendingPlane ) )
 625   {
 626     busPatchId += 12;
 627   }
 628
 629   return busPatchId;
 630 }
 631
 632 //____________________________________________________________________
 633 Int_t AliMUONRawWriter::GetBusPatch(const AliMUONDigit& digit) const
 634 {
 635   /// Determine the BusPatch this digit belongs to.
 636
 637   return GetBusPatch(digit.DetElemId(),digit.ManuId());
 638 }
 639
 640 //____________________________________________________________________
 641 Int_t AliMUONRawWriter::WriteTriggerDDL()
 642 {
 643   /// Write trigger DDL
 644
 645   fTimers[kWriteTrigger].Start(kFALSE);
 646
 647  // DDL event one per half chamber
 648
 649   // stored local id number
 650   TArrayI isFired(256);
 651   isFired.Reset();
 652
 653
 654  // DDL header size
 655   Int_t headerSize = sizeof(AliRawDataHeader)/4;
 656
 657   TClonesArray* localTrigger;
 658   TClonesArray* globalTrigger;
 659   AliMUONGlobalTrigger* gloTrg;
 660   AliMUONLocalTrigger* locTrg = 0x0;
 661
 662   // global trigger for trigger pattern
 663   globalTrigger = fMUONData->GlobalTrigger();
 664   gloTrg = (AliMUONGlobalTrigger*)globalTrigger->UncheckedAt(0);
 665   if (!gloTrg)
 666   {
 667     fTimers[kWriteTrigger].Stop();
 668     return 0;
 669   }
 670
 671   Int_t gloTrigResp = gloTrg->GetGlobalResponse();
 672
 673   // local trigger
 674   localTrigger = fMUONData->LocalTrigger();
 675
 676   UInt_t word;
 677   Int_t* buffer = 0;
 678   Int_t index;
 679   Int_t iEntries = 0;
 680   Int_t iLocCard, locCard;
 681   Char_t locDec, trigY, posY, posX, regOut;
 682   UInt_t regInpLpt;
 683   UInt_t regInpHpt;
 684
 685   Int_t devX;
 686   Int_t version = 1; // software version
 687   Int_t eventPhys = 1; // trigger type: 1 for physics, 0 for software
 688   Int_t serialNb = 0xF; // serial nb of card: all bits on for the moment
 689   Int_t globalFlag = 0; // set to 1 if global info present in DDL else set to 0
 690
 691   // size of headers
 692   static const Int_t kDarcHeaderLength   = fDarcHeader->GetDarcHeaderLength();
 693   static const Int_t kGlobalHeaderLength = fDarcHeader->GetGlobalHeaderLength();
 694   static const Int_t kDarcScalerLength   = fDarcHeader->GetDarcScalerLength();
 695   static const Int_t kGlobalScalerLength = fDarcHeader->GetGlobalScalerLength();
 696   static const Int_t kRegHeaderLength    = fRegHeader->GetHeaderLength();
 697   static const Int_t kRegScalerLength    = fRegHeader->GetScalerLength();
 698   static const Int_t kLocHeaderLength    = fLocalStruct->GetLength();
 699   static const Int_t kLocScalerLength    = fLocalStruct->GetScalerLength();
 700
 701   // [16(local)*6 words + 6 words]*8(reg) + 8 words = 824
 702   static const Int_t kBufferSize = (16 * (kLocHeaderLength+1) +  (kRegHeaderLength+1))* 8
 703       +  kDarcHeaderLength + kGlobalHeaderLength + 2;
 704
 705   // [16(local)*51 words + 16 words]*8(reg) + 8 + 10 + 8 words scaler event 6682 words
 706   static const Int_t kScalerBufferSize = (16 * (kLocHeaderLength +  kLocScalerLength +1) +
 707                                          (kRegHeaderLength + kRegScalerLength +1))* 8 +
 708                                          (kDarcHeaderLength + kDarcScalerLength +
 709                                           kGlobalHeaderLength + kGlobalScalerLength + 2);
 710   if(fScalerEvent)
 711     eventPhys = 0; //set to generate scaler events
 712
 713   Int_t nEntries = (Int_t) (localTrigger->GetEntries());// 234 local cards
 714   // stored the local card id that's fired
 715   for (Int_t i = 0; i <  nEntries; i++) {
 716     locTrg = (AliMUONLocalTrigger*)localTrigger->At(i);
 717     isFired[locTrg->LoCircuit()] = 1; // storing local boards with informations
 718   }
 719
 720   if (!nEntries)
 721     AliDebug(1, "No Trigger information available");
 722
 723   if(fScalerEvent)
 724     buffer = new Int_t [kScalerBufferSize];
 725   else
 726     buffer = new Int_t [kBufferSize];
 727
 728   // reset crate
 729
 730   // open DDL file, on per 1/2 chamber
 731   for (Int_t iDDL = 0; iDDL < 2; iDDL++) {
 732
 733     index = 0;
 734
 735     if (iDDL == 0) // suppose global info in DDL one
 736       globalFlag = 1;
 737     else
 738       globalFlag = 0;
 739
 740     word = 0;
 741     // set darc status word
 742     // see AliMUONDarcHeader.h for details
 743     AliBitPacking::PackWord((UInt_t)eventPhys,word,30,30);
 744     AliBitPacking::PackWord((UInt_t)serialNb,word,20,23);
 745     AliBitPacking::PackWord((UInt_t)globalFlag,word,10,10);
 746     AliBitPacking::PackWord((UInt_t)version,word,12,19);
 747     fDarcHeader->SetWord(word);
 748
 749     memcpy(&buffer[index], fDarcHeader->GetHeader(), (kDarcHeaderLength)*4);
 750     index += kDarcHeaderLength;
 751
 752     // no global input for the moment....
 753     if (iDDL == 0)
 754      fDarcHeader->SetGlobalOutput(gloTrigResp);
 755     else
 756      fDarcHeader->SetGlobalOutput(0);
 757
 758     if (fScalerEvent) {
 759       // 6 DARC scaler words
 760       memcpy(&buffer[index], fDarcHeader->GetDarcScalers(),kDarcScalerLength*4);
 761       index += kDarcScalerLength;
 762     }
 763     // end of darc word
 764     buffer[index++] = fDarcHeader->GetEndOfDarc();
 765
 766     // 4 words of global board input + Global board output
 767     memcpy(&buffer[index], fDarcHeader->GetGlobalInput(), (kGlobalHeaderLength)*4);
 768     index += kGlobalHeaderLength;
 769
 770     if (fScalerEvent) {
 771       // 10 Global scaler words
 772       memcpy(fDarcHeader->GetGlobalScalers(), &buffer[index], kGlobalScalerLength*4);
 773       index += kGlobalScalerLength;
 774     }
 775
 776     // end of global word
 777     buffer[index++] = fDarcHeader->GetEndOfGlobal();
 778
 779     // 8 regional cards per DDL
 780     for (Int_t iReg = 0; iReg < 8; iReg++) {
 781
 782       // crate info
 783       AliMUONTriggerCrate* crate = fCrateManager->Crate(iDDL, iReg);
 784
 785       if (!crate)
 786         AliWarning(Form("Missing crate number %d in DDL %d\n", iReg, iDDL));
 787
 788       // Regional card header
 789       word = 0;
 790
 791       // set darc status word
 792       fRegHeader->SetDarcWord(word);
 793
 794       regOut    = 0;
 795       regInpHpt = regInpLpt = 0;
 796       // fill darc word, not darc status for the moment (empty)
 797       //see  AliMUONRegHeader.h for details
 798       AliBitPacking::PackWord((UInt_t)eventPhys,word,31,31);
 799       AliBitPacking::PackWord((UInt_t)serialNb,word,19,24);
 800       AliBitPacking::PackWord((UInt_t)version,word,16,23);
 801       AliBitPacking::PackWord((UInt_t)iReg,word,15,18);
 802       AliBitPacking::PackWord((UInt_t)regOut,word,0,7); // waiting realistic output of AliMUONGlobalTrigger (oct 06 ?)
 803       fRegHeader->SetWord(word);
 804
 805
 806       // fill header later, need local response
 807       Int_t indexReg = index;
 808       index += kRegHeaderLength;
 809
 810       // 11 regional scaler word
 811       if (fScalerEvent) {
 812         memcpy(&buffer[index], fRegHeader->GetScalers(), kRegScalerLength*4);
 813         index += kRegScalerLength;
 814       }
 815
 816       // end of regional word
 817       buffer[index++] = fRegHeader->GetEndOfReg();
 818
 819       TObjArray *boards = crate->Boards();
 820
 821
 822       // 16 local card per regional board
 823       UShort_t localMask = 0x0;
 824
 825       for (Int_t iLoc = 0; iLoc < 16; iLoc++) {
 826
 827         // slot zero for Regional card
 828         AliMUONLocalTriggerBoard* localBoard = (AliMUONLocalTriggerBoard*)boards->At(iLoc+1);
 829
 830         if (localBoard) { // if not empty slot
 831
 832           if ((iLocCard = localBoard->GetNumber()) != 0) {// if notified board
 833
 834             localMask |= (0x1 << iLoc); // local mask
 835             if (isFired[iLocCard]) { // if card has triggered
 836               locTrg  = (AliMUONLocalTrigger*)localTrigger->At(iEntries);
 837               locCard = locTrg->LoCircuit();
 838               locDec  = locTrg->GetLoDecision();
 839               trigY = 0;
 840               posY  = locTrg->LoStripY();
 841               posX  = locTrg->LoStripX();
 842               devX  = locTrg->LoDev();
 843
 844               AliDebug(4,Form("loctrg %d, posX %d, posY %d, devX %d\n",
 845                               locTrg->LoCircuit(),locTrg->LoStripX(),locTrg->LoStripY(),locTrg->LoDev()));
 846             } else { //no trigger (see PRR chpt 3.4)
 847               locDec = 0;
 848               trigY = 1;
 849               posY = 15;
 850               posX = 0;
 851               devX = 0x8;
 852               // set local card id to -1
 853               locCard = -1;
 854             }
 855             // calculate regional input High and low Pt
 856             UInt_t tmp1 = (locDec >> 2) & 0x3;
 857             UInt_t tmp2 =  locDec & 0x3;
 858
 859             regInpHpt |= tmp1 << (30 - iLoc*2);
 860             regInpLpt |= tmp2 << (30 - iLoc*2);
 861
 862             //packing word
 863             word = 0;
 864             AliBitPacking::PackWord((UInt_t)iLoc,word,19,22); //card id number in crate
 865             AliBitPacking::PackWord((UInt_t)locDec,word,15,18);
 866             AliBitPacking::PackWord((UInt_t)trigY,word,14,14);
 867             AliBitPacking::PackWord((UInt_t)posY,word,10,13);
 868             AliBitPacking::PackWord((UInt_t)devX,word,5,9);
 869             AliBitPacking::PackWord((UInt_t)posX,word,0,4);
 870
 871             if (locCard == iLocCard) {
 872               // add local cards structure
 873               buffer[index++] = (locTrg->GetX1Pattern() | (locTrg->GetX2Pattern() << 16));
 874               buffer[index++] = (locTrg->GetX3Pattern() | (locTrg->GetX4Pattern() << 16));
 875               buffer[index++] = (locTrg->GetY1Pattern() | (locTrg->GetY2Pattern() << 16));
 876               buffer[index++] = (locTrg->GetY3Pattern() | (locTrg->GetY4Pattern() << 16));
 877               buffer[index++] = (Int_t)word; // data word
 878               if (iEntries < nEntries-1)
 879                 iEntries++;
 880             } else {
 881               buffer[index++] = 0; // 4 words for x1, x2, y1, y2
 882               buffer[index++] = 0;
 883               buffer[index++] = 0;
 884               buffer[index++] = 0;
 885               buffer[index++] = (Int_t)word; // data word
 886
 887             }
 888           } else {// number!=0
 889           // fill with 10CDEAD word for 'non-notified' slots
 890           for (Int_t i = 0; i < fLocalStruct->GetLength(); i++)
 891             buffer[index++] = fLocalStruct->GetDisableWord();
 892           }
 893         } else {
 894           // fill with 10CDEAD word for empty slots
 895           for (Int_t i = 0; i < fLocalStruct->GetLength(); i++)
 896             buffer[index++] = fLocalStruct->GetDisableWord();
 897         }// condition localBoard
 898
 899         // 45 regional scaler word
 900         if (fScalerEvent) {
 901           memcpy(&buffer[index], fLocalStruct->GetScalers(), kLocScalerLength*4);
 902           index += kLocScalerLength;
 903         }
 904
 905         // end of local structure words
 906         buffer[index++] = fLocalStruct->GetEndOfLocal();
 907
 908       } // local card
 909       // fill regional header with local output
 910       fRegHeader->SetInput(regInpLpt, 0);
 911       fRegHeader->SetInput(regInpHpt, 1);
 912       fRegHeader->SetMask(localMask);
 913       memcpy(&buffer[indexReg],fRegHeader->GetHeader(),kRegHeaderLength*4);
 914
 915     } // Regional card
 916
 917
 918     // writting onto disk
 919     // write DDL's
 920     fHeader.fSize = (index + headerSize) * 4;// total length in bytes
 921     fwrite((char*)(&fHeader),headerSize*4,1,fFile[iDDL]);
 922     fwrite(buffer,sizeof(int),index,fFile[iDDL]);
 923
 924   }
 925   delete[] buffer;
 926
 927   fTimers[kWriteTrigger].Stop();
 928
 929   return kTRUE;
 930 }
 931 //____________________________________________________________________
 932 void AliMUONRawWriter::SetScalersNumbers()
 933 {
 934   /// set numbers for scaler events for trigger headers
 935   /// since this is provided by the experiment
 936   /// put dummy numbers to check the monitoring
 937
 938   fDarcHeader->SetScalersNumbers();
 939   fRegHeader->SetScalersNumbers();
 940   fLocalStruct->SetScalersNumbers();
 941
 942   fScalerEvent = kTRUE;
 943 }
 944