[u/mrichter/AliRoot.git] / PMD / AliPMDDDLRawData.cxx

/***************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

#include <Riostream.h>
#include <TClonesArray.h>
#include <TTree.h>
#include <TBranch.h>
#include <TMath.h>
#include <TString.h>
#include <TSystem.h>

#include "AliLog.h"
#include "AliRawDataHeader.h"
#include "AliBitPacking.h"
#include "AliPMDdigit.h"
#include "AliPMDBlockHeader.h"
#include "AliPMDDspHeader.h"
#include "AliPMDPatchBusHeader.h"
#include "AliPMDRawStream.h"
#include "AliPMDDDLRawData.h"
#include "AliDAQ.h"
#include "AliFstream.h"

ClassImp(AliPMDDDLRawData)

AliPMDDDLRawData::AliPMDDDLRawData():
  fDigits(new TClonesArray("AliPMDdigit", 1000))
{
  // Default Constructor
  //

}
//____________________________________________________________________________
AliPMDDDLRawData::AliPMDDDLRawData(const AliPMDDDLRawData& ddlraw):
  TObject(ddlraw),
  fDigits(ddlraw.fDigits)
{
  //Copy Constructor 
}
//____________________________________________________________________________
AliPMDDDLRawData & AliPMDDDLRawData::operator=(const AliPMDDDLRawData& ddlraw)
{
  //Assignment operator 
  if(this != &ddlraw)
    {
      fDigits = ddlraw.fDigits;
    }
  return *this;
}
//____________________________________________________________________________

AliPMDDDLRawData::~AliPMDDDLRawData()
{
  // Default Destructor
  //

}

//____________________________________________________________________________
void AliPMDDDLRawData::WritePMDRawData(TTree *treeD)
{
  // write digits into raw data format

  AliFstream *outfile;

  TBranch *branch = treeD->GetBranch("PMDDigit");
  if (!branch)
    {
      AliError("PMD Digit branch not found");
      return;
    }
  branch->SetAddress(&fDigits);  
  
  Int_t   nmodules = (Int_t) treeD->GetEntries();
  AliDebug(1,Form("Number of modules inside treeD = %d",nmodules));

  const Int_t kDDL          = AliDAQ::NumberOfDdls("PMD");
  Int_t modulePerDDL        = 0;


  AliRawDataHeader header;
  UInt_t sizeRawData = 0;
  
  const Int_t kSize = 1536;
  UInt_t buffer[kSize];

  UInt_t busPatch[50][1536];

  Int_t contentsBus[50];

  Char_t filename[80];


  Int_t mmodule = 0;
  for(Int_t iddl = 0; iddl < kDDL; iddl++)
    {
      strcpy(filename,AliDAQ::DdlFileName("PMD",iddl));
      
      outfile = new AliFstream(filename);
      
      if (iddl < 4)
	{
	  modulePerDDL = 6;
	  mmodule = 6*iddl;
	}
      else if (iddl == 4)
	{
	  modulePerDDL = 12;
	  mmodule = 24;
	}
      else if (iddl == 5)
	{
	  modulePerDDL = 12;
	  mmodule = 30;
	}


      // Write the Dummy Data Header into the file
      Int_t bHPosition = outfile->Tellp();
      outfile->WriteBuffer((char*)(&header),sizeof(header));

      for (Int_t ibus = 0; ibus < 50; ibus++)
	{
	  contentsBus[ibus] = 0;
	  for (Int_t ich = 0; ich < 1536; ich++)
	    {
	      busPatch[ibus][ich] = 0;
	    }
	}

      for(Int_t ium = 0; ium < modulePerDDL; ium++)
	{
	  if (iddl == 4 && ium == 6) mmodule = 42;

	  // Extract energy deposition per cell and pack it
	  // in a 32-bit word and returns all the total words
	  // per one unit-module
	  
	  GetUMDigitsData(treeD, mmodule, iddl, contentsBus, busPatch);
	  mmodule++;
	}

      
      Int_t ij = 0;
      Int_t dsp[10];
      Int_t dspBus[10];
      for (Int_t i = 0; i < 10; i++)
	{
	  dsp[i] = 0;
	  dspBus[i] = 0;
	  for (Int_t ibus=0; ibus < 5; ibus++)
	    {
	      if (contentsBus[ij] > 0)
		{
		  dsp[i] += contentsBus[ij];
		  dspBus[i]++;
		}
	      ij++;
	    }
	  // Add the patch Bus header to the DSP contents
	  dsp[i] += 4*dspBus[i];
	}

      Int_t dspBlockARDL    = 0;
      Int_t dspBlockBRDL    = 0;

      for (Int_t i = 0; i < 5; i++)
	{
	  Int_t ieven = 2*i;
	  Int_t iodd  = 2*i + 1;
	  if (dsp[ieven] > 0)
	    {
	      dspBlockARDL += dsp[ieven];
	      Int_t remainder = dsp[ieven]%2;
	      if (remainder == 1)
		{
		  dspBlockARDL++;
		}
	    }
	  if (dsp[iodd] > 0)
	    {
	      dspBlockBRDL += dsp[iodd];
	      Int_t remainder = dsp[ieven]%2;
	      if (remainder == 1)
		{
		  dspBlockARDL++;
		}
	    }
	}
      
      // Start writing the DDL file

      AliPMDBlockHeader blHeader;
      AliPMDDspHeader   dspHeader;
      AliPMDPatchBusHeader pbusHeader;

      const Int_t kblHLen   = blHeader.GetHeaderLength();
      const Int_t kdspHLen  = dspHeader.GetHeaderLength();
      const Int_t kpbusHLen = pbusHeader.GetHeaderLength();

      UInt_t dspRDL = 0;
      UInt_t dspBlockHeaderWord[8];
      UInt_t dspHeaderWord[10];
      UInt_t patchBusHeaderWord[4];
      Int_t iskip[5];


      for (Int_t iblock = 0; iblock < 2; iblock++)
	{
	  // DSP Block Header
	  
	  for (Int_t i=0; i<kblHLen; i++)
	    {
	      dspBlockHeaderWord[i] = 0;
	    }
	  if (iblock == 0)
	    {
	      dspBlockHeaderWord[1] = (UInt_t) (dspBlockARDL + kblHLen);
	      dspBlockHeaderWord[2] = (UInt_t) dspBlockARDL;
	    }
	  else if (iblock == 1)
	    {
	      dspBlockHeaderWord[1] = (UInt_t) (dspBlockBRDL + kblHLen);
	      dspBlockHeaderWord[2] = (UInt_t) dspBlockBRDL;
	    }

	  outfile->WriteBuffer((char*)dspBlockHeaderWord,kblHLen*sizeof(UInt_t));

	  if (iblock == 0)
	    {
	      iskip[0] = 0;
	      iskip[1] = 10;
	      iskip[2] = 20;
	      iskip[3] = 30;
	      iskip[4] = 40;
	    }
	  else if (iblock == 1)
	    {
	      iskip[0] = 5;
	      iskip[1] = 15;
	      iskip[2] = 25;
	      iskip[3] = 35;
	      iskip[4] = 45;
	    }

	  for (Int_t idsp = 0; idsp < 5; idsp++)
	    {
	      // DSP Header
	      Int_t dspno = 0;
	      if (iblock == 0)
		{
		  dspno = 2*idsp;
		  dspRDL = (UInt_t) dsp[dspno];
		}
	      else if (iblock == 1)
		{
		  dspno = 2*idsp + 1;
		  dspRDL = (UInt_t) dsp[dspno];
		}

	      for (Int_t i=0; i<kdspHLen; i++)
		{
		  dspHeaderWord[i] = 0;
		}
	      Int_t remainder = dspRDL%2;
	      if (remainder == 1) dspRDL++;

	      dspHeaderWord[1] = dspRDL + kdspHLen;
	      dspHeaderWord[2] = dspRDL;
	      dspHeaderWord[3] = dspno;
	      if (remainder == 1) dspHeaderWord[8] = 1; // setting the padding word
	      outfile->WriteBuffer((char*)dspHeaderWord,kdspHLen*sizeof(UInt_t));

	      for (Int_t ibus = 0; ibus < 5; ibus++)
		{
		  // Patch Bus Header
		  Int_t busno = iskip[idsp] + ibus;
		  Int_t patchbusRDL = contentsBus[busno];

		  if (patchbusRDL > 0)
		    {
		      patchBusHeaderWord[0] = 0;
		      patchBusHeaderWord[1] = (UInt_t) (patchbusRDL + kpbusHLen);
		      patchBusHeaderWord[2] = (UInt_t) patchbusRDL;
		      patchBusHeaderWord[3] = (UInt_t) busno;
		    }
		  else if (patchbusRDL == 0)
		    {
		      patchBusHeaderWord[0] = 0;
		      patchBusHeaderWord[1] = (UInt_t) kpbusHLen;
		      patchBusHeaderWord[2] = (UInt_t) 0;
		      patchBusHeaderWord[3] = (UInt_t) busno;
		    }


		  outfile->WriteBuffer((char*)patchBusHeaderWord,4*sizeof(UInt_t));


		  for (Int_t iword = 0; iword < patchbusRDL; iword++)
		    {
		      buffer[iword] = busPatch[busno][iword];
		    }
		  
		  outfile->WriteBuffer((char*)buffer,patchbusRDL*sizeof(UInt_t));

		} // End of patch bus loop


	      // Adding a padding word if the total words odd
	      if (remainder == 1)
		{
		  UInt_t paddingWord = dspHeader.GetDefaultPaddingWord();
		  outfile->WriteBuffer((char*)(&paddingWord),sizeof(UInt_t));
		}
	    }
	}

      // Write real data header
      // take the pointer to the beginning of the data header
      // write the total number of words per ddl and bring the
      // pointer to the current file position and close it
      UInt_t cFPosition = outfile->Tellp();
      sizeRawData = cFPosition - bHPosition - sizeof(header);

      header.fSize = cFPosition - bHPosition;
      header.SetAttribute(0);  // valid data
      outfile->Seekp(bHPosition);
      outfile->WriteBuffer((char*)(&header),sizeof(header));
      outfile->Seekp(cFPosition);

      delete outfile;
    } // DDL Loop over


}
//____________________________________________________________________________
void AliPMDDDLRawData::GetUMDigitsData(TTree *treeD, Int_t imodule,
				       Int_t ddlno, Int_t *contentsBus,
				       UInt_t busPatch[][1536])
{
  // Retrives digits data UnitModule by UnitModule

  UInt_t baseword;
  UInt_t mcmno, chno;
  UInt_t adc;
  Int_t  det, smn, irow, icol;
  Int_t  parity;
  
  const Int_t kMaxBus = 50;
  Int_t totPatchBus, bPatchBus, ePatchBus;
  Int_t ibus, totmcm, rows, cols, rowe, cole;
  Int_t moduleno;
  Int_t busno = 0;
  Int_t patchBusNo[kMaxBus], mcmperBus[kMaxBus];
  Int_t startRowBus[kMaxBus], startColBus[kMaxBus];
  Int_t endRowBus[kMaxBus], endColBus[kMaxBus];

  Int_t beginPatchBus = -1;
  Int_t endPatchBus   = -1;
  for(Int_t i = 0; i < kMaxBus; i++)
    {
      patchBusNo[i]  = -1;
      mcmperBus[i]   = -1;
      startRowBus[i] = -1;
      startColBus[i] = -1;
      endRowBus[i]   = -1;
      endColBus[i]   = -1;
    }
  Int_t modulePerDDL = 0;
  if (ddlno < 4)
    {
      modulePerDDL = 6;
    }
  else if (ddlno == 4 || ddlno == 5)
    {
      modulePerDDL = 12;
    }

  TString fileName(gSystem->Getenv("ALICE_ROOT"));

  if(ddlno == 0)
    {
      fileName += "/PMD/PMD_Mapping_ddl0.dat";
    }
  else if(ddlno == 1)
    {
      fileName += "/PMD/PMD_Mapping_ddl1.dat";
    }
  else if(ddlno == 2)
    {
      fileName += "/PMD/PMD_Mapping_ddl2.dat";
    }
  else if(ddlno == 3)
    {
      fileName += "/PMD/PMD_Mapping_ddl3.dat";
    }
  else if(ddlno == 4)
    {
      fileName += "/PMD/PMD_Mapping_ddl4.dat";
    }
  else if(ddlno == 5)
    {
      fileName += "/PMD/PMD_Mapping_ddl5.dat";
    }

  ifstream infile;
  infile.open(fileName.Data(), ios::in); // ascii file
  if(!infile)
    AliError(Form("Could not read the mapping file for DDL No = %d",ddlno));

  for (Int_t im = 0; im < modulePerDDL; im++)
    {
      infile >> moduleno;
      infile >> totPatchBus >> bPatchBus >> ePatchBus;

      if (moduleno == imodule)
	{
	  beginPatchBus = bPatchBus;
	  endPatchBus   = ePatchBus;
	}
      
      for(Int_t i=0; i<totPatchBus; i++)
	{
	  infile >> ibus >> totmcm >> rows >> rowe >> cols >> cole;

	  if (moduleno == imodule)
	    {
	      patchBusNo[ibus]   = ibus;
	      mcmperBus[ibus]    = totmcm;
	      startRowBus[ibus]  = rows;
	      startColBus[ibus]  = cols;
	      endRowBus[ibus]    = rowe;
	      endColBus[ibus]    = cole;
	    }
	}

    }

  infile.close();

  treeD->GetEntry(imodule); 
  Int_t nentries = fDigits->GetLast();
  Int_t totword = nentries+1;

  AliPMDdigit *pmddigit;

  for (Int_t ient = 0; ient < totword; ient++)
    {
      pmddigit = (AliPMDdigit*)fDigits->UncheckedAt(ient);
      
      det    = pmddigit->GetDetector();
      smn    = pmddigit->GetSMNumber();
      irow   = pmddigit->GetRow();
      icol   = pmddigit->GetColumn();
      adc    = (UInt_t) pmddigit->GetADC();

      TransformS2H(smn,irow,icol);

      GetMCMCh(ddlno, irow, icol, beginPatchBus, endPatchBus,
	       mcmperBus, startRowBus, startColBus,
	       endRowBus, endColBus, busno, mcmno, chno);

      baseword = 0;
      AliBitPacking::PackWord(adc,baseword,0,11);
      AliBitPacking::PackWord(chno,baseword,12,17);
      AliBitPacking::PackWord(mcmno,baseword,18,28);
      AliBitPacking::PackWord(0,baseword,29,30);
      parity = ComputeParity(baseword);      // generate the parity bit
      AliBitPacking::PackWord(parity,baseword,31,31);

      Int_t jj = contentsBus[busno];
      busPatch[busno][jj] = baseword;

      contentsBus[busno]++;
    }

}

//____________________________________________________________________________
void AliPMDDDLRawData::TransformS2H(Int_t smn, Int_t &irow, Int_t &icol)
{
  // Does the Software to Hardware coordinate transformation
  //

  Int_t  irownew = 0;
  Int_t  icolnew = 0;

  // First in digits we have all dimension 48x96
  // Transform into the realistic one, i.e, For SM 0&1 96(row)x48(col)
  // and for SM 2&3 48(row)x96(col)
  // 
  if(smn < 12)
    {
      irownew = icol;
      icolnew = irow;
    }
  else if( smn >= 12 && smn < 24)
    {
      irownew = irow;
      icolnew = icol;
    }

  irow = irownew;
  icol = icolnew;

}


//____________________________________________________________________________

void AliPMDDDLRawData::GetMCMCh(Int_t ddlno, Int_t row, Int_t col,
				Int_t beginPatchBus, Int_t endPatchBus,
				Int_t *mcmperBus,
				Int_t *startRowBus, Int_t *startColBus,
				Int_t *endRowBus, Int_t *endColBus,
				Int_t & busno, UInt_t &mcmno, UInt_t &chno)
{
  // This converts row col to hardware channel number
  // This is the final version of mapping supplied by Mriganka

  static const UInt_t kCh[16][4] = { {56, 58, 59, 57},
				     {54, 62, 61, 53},
				     {52, 60, 63, 51},
				     {48, 50, 55, 49},
				     {46, 40, 45, 47},
				     {44, 32, 35, 43},
				     {42, 34, 33, 41},
				     {38, 36, 37, 39},
				     {24, 26, 27, 25},
				     {22, 30, 29, 21},
				     {20, 28, 31, 19},
				     {16, 18, 23, 17},
				     {14, 8, 13, 15},
				     {12, 0, 3, 11},
				     {10, 2, 1, 9},
				     {6, 4, 5, 7} };
  
  Int_t irownew = row%16;
  Int_t icolnew = col%4;
  
  chno  = kCh[irownew][icolnew];
  
  
  for (Int_t ibus = beginPatchBus; ibus <= endPatchBus; ibus++)
    {
      Int_t srow = startRowBus[ibus];
      Int_t erow = endRowBus[ibus];
      Int_t scol = startColBus[ibus];
      Int_t ecol = endColBus[ibus];
      Int_t tmcm = mcmperBus[ibus];
      if ((row >= srow && row <= erow) && (col >= scol && col <= ecol))
	{
	  busno = ibus;
	  
	  // Find out the MCM Number
	  //
	  
	  if (ddlno == 0 || ddlno == 1)
	    {
	      // PRE plane, SU Mod = 0, 1
	      mcmno = (col-scol)/4;
	      
	    }
	  else if (ddlno == 2 || ddlno == 3)
	    {
	      // PRE plane,  SU Mod = 2, 3
	      Int_t icolnew = (col - scol)/4;
	      mcmno = tmcm - 1 - icolnew;
	    }
	  else if (ddlno == 4 )
	    {
	      // CPV plane,  SU Mod = 0, 3 : ddl = 4
	      
	      if(ibus <= 17)
		{
		  Int_t midrow = srow + 16;
		  if(row >= srow && row < midrow)
		    {
		      mcmno = 12 + (col-scol)/4;
		    }
		  else if(row >= midrow && row <= erow)
		  
		    {
		      mcmno = (col-scol)/4;
		    }
		}
	      
	      else if (ibus > 17)
		{
		  Int_t rowdiff = endRowBus[ibus] - startRowBus[ibus];
		  if(rowdiff > 16)
		    {
		      Int_t midrow = srow + 16;
		      if (row >= midrow && row <= erow)
			{
			  mcmno = 12 + (ecol -col)/4;
			}
		      else if (row >= srow && row < midrow)
			{
			  mcmno = (ecol - col)/4;
			}
		    }
		  else if (rowdiff < 16) 
		    {
		      mcmno = (ecol - col)/4;
		    } 
		}
	    }
	  else if ( ddlno == 5)
	    {
	      // CPV plane,  SU Mod = 0, 3 : ddl = 4
	      
	      if(ibus <= 17)
		{
		  Int_t midrow = srow + 16;
		  if(row >= srow && row < midrow)
		    {
		      mcmno = 12 + (col-scol)/4;
		    }
		  else if(row >= midrow && row <= erow)
		    {
		      mcmno = (col-scol)/4;
		    }
		}
	      
	      else if (ibus > 17)
		{
		  Int_t rowdiff = endRowBus[ibus] - startRowBus[ibus];
		  if(rowdiff > 16)
		    {
		      Int_t midrow = srow + 16;
		      if (row >= midrow && row <= erow)
			{
			  mcmno = 12 + (ecol -col)/4;
			}
		      else if (row >= srow && row < midrow)
			{
			  mcmno = (ecol - col)/4;
			}
		    }
		  else if (rowdiff < 16) 
		    {
		      mcmno = (ecol - col)/4;
		    } 
		}
	    }
	}
    }
} 

//____________________________________________________________________________

Int_t AliPMDDDLRawData::ComputeParity(UInt_t baseword)
{
  // Generate the parity bit

  Int_t count = 0;
  for(Int_t j=0; j<29; j++)
    {
      if (baseword & 0x01 ) count++;
      baseword >>= 1;
    }
  Int_t parity = count%2;
  return parity;
}

//____________________________________________________________________________
Commit	Line	Data
28328eeb	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	#include <Riostream.h>
	17	#include <TClonesArray.h>
	18	#include <TTree.h>
	19	#include <TBranch.h>
	20	#include <TMath.h>
95ec17e6	21	#include <TString.h>
95ec17e6	22	#include <TSystem.h>
28328eeb	23
ecee2a1a	24	#include "AliLog.h"
a4e4efaa	25	#include "AliRawDataHeader.h"
cff75ba7	26	#include "AliBitPacking.h"
28328eeb	27	#include "AliPMDdigit.h"
0a666212	28	#include "AliPMDBlockHeader.h"
	29	#include "AliPMDDspHeader.h"
	30	#include "AliPMDPatchBusHeader.h"
a4e4efaa	31	#include "AliPMDRawStream.h"
28328eeb	32	#include "AliPMDDDLRawData.h"
362c9d61	33	#include "AliDAQ.h"
08f92f14	34	#include "AliFstream.h"
28328eeb	35
	36	ClassImp(AliPMDDDLRawData)
	37
	38	AliPMDDDLRawData::AliPMDDDLRawData():
	39	fDigits(new TClonesArray("AliPMDdigit", 1000))
	40	{
	41	// Default Constructor
	42	//
a4e4efaa	43
28328eeb	44	}
a48edddd	45	//____________________________________________________________________________
	46	AliPMDDDLRawData::AliPMDDDLRawData(const AliPMDDDLRawData& ddlraw):
	47	TObject(ddlraw),
	48	fDigits(ddlraw.fDigits)
	49	{
	50	//Copy Constructor
	51	}
	52	//____________________________________________________________________________
	53	AliPMDDDLRawData & AliPMDDDLRawData::operator=(const AliPMDDDLRawData& ddlraw)
	54	{
	55	//Assignment operator
	56	if(this != &ddlraw)
	57	{
	58	fDigits = ddlraw.fDigits;
	59	}
	60	return *this;
	61	}
28328eeb	62	//____________________________________________________________________________
	63
	64	AliPMDDDLRawData::~AliPMDDDLRawData()
	65	{
	66	// Default Destructor
	67	//
	68
	69	}
	70
	71	//____________________________________________________________________________
a4e4efaa	72	void AliPMDDDLRawData::WritePMDRawData(TTree *treeD)
28328eeb	73	{
	74	// write digits into raw data format
	75
08f92f14	76	AliFstream *outfile;
28328eeb	77
28328eeb	78	TBranch *branch = treeD->GetBranch("PMDDigit");
ecee2a1a	79	if (!branch)
	80	{
	81	AliError("PMD Digit branch not found");
	82	return;
	83	}
28328eeb	84	branch->SetAddress(&fDigits);
28328eeb	85
ecee2a1a	86	Int_t nmodules = (Int_t) treeD->GetEntries();
ecee2a1a	87	AliDebug(1,Form("Number of modules inside treeD = %d",nmodules));
28328eeb	88
362c9d61	89	const Int_t kDDL = AliDAQ::NumberOfDdls("PMD");
28328eeb	90	Int_t modulePerDDL = 0;
	91
	92
a4e4efaa	93	AliRawDataHeader header;
28328eeb	94	UInt_t sizeRawData = 0;
95ec17e6	95
95ec17e6	96	const Int_t kSize = 1536;
28328eeb	97	UInt_t buffer[kSize];
28328eeb	98
95ec17e6	99	UInt_t busPatch[50][1536];
	100
	101	Int_t contentsBus[50];
	102
28328eeb	103	Char_t filename[80];
28328eeb	104
95ec17e6	105
28328eeb	106	Int_t mmodule = 0;
	107	for(Int_t iddl = 0; iddl < kDDL; iddl++)
	108	{
362c9d61	109	strcpy(filename,AliDAQ::DdlFileName("PMD",iddl));
08f92f14	110
08f92f14	111	outfile = new AliFstream(filename);
28328eeb	112
	113	if (iddl < 4)
	114	{
	115	modulePerDDL = 6;
	116	mmodule = 6*iddl;
28328eeb	117	}
	118	else if (iddl == 4)
	119	{
	120	modulePerDDL = 12;
	121	mmodule = 24;
28328eeb	122	}
	123	else if (iddl == 5)
	124	{
	125	modulePerDDL = 12;
a4e4efaa	126	mmodule = 30;
28328eeb	127	}
28328eeb	128
28328eeb	129
95ec17e6	130
a4e4efaa	131	// Write the Dummy Data Header into the file
08f92f14	132	Int_t bHPosition = outfile->Tellp();
08f92f14	133	outfile->WriteBuffer((char*)(&header),sizeof(header));
28328eeb	134
95ec17e6	135	for (Int_t ibus = 0; ibus < 50; ibus++)
	136	{
	137	contentsBus[ibus] = 0;
	138	for (Int_t ich = 0; ich < 1536; ich++)
	139	{
	140	busPatch[ibus][ich] = 0;
	141	}
	142	}
28328eeb	143
	144	for(Int_t ium = 0; ium < modulePerDDL; ium++)
	145	{
95ec17e6	146	if (iddl == 4 && ium == 6) mmodule = 42;
a4e4efaa	147
28328eeb	148	// Extract energy deposition per cell and pack it
	149	// in a 32-bit word and returns all the total words
	150	// per one unit-module
	151
95ec17e6	152	GetUMDigitsData(treeD, mmodule, iddl, contentsBus, busPatch);
28328eeb	153	mmodule++;
95ec17e6	154	}
28328eeb	155
95ec17e6	156
	157
	158	Int_t ij = 0;
	159	Int_t dsp[10];
	160	Int_t dspBus[10];
	161	for (Int_t i = 0; i < 10; i++)
	162	{
	163	dsp[i] = 0;
	164	dspBus[i] = 0;
	165	for (Int_t ibus=0; ibus < 5; ibus++)
	166	{
	167	if (contentsBus[ij] > 0)
	168	{
	169	dsp[i] += contentsBus[ij];
	170	dspBus[i]++;
	171	}
	172	ij++;
	173	}
	174	// Add the patch Bus header to the DSP contents
	175	dsp[i] += 4*dspBus[i];
	176	}
	177
0a666212	178	Int_t dspBlockARDL = 0;
	179	Int_t dspBlockBRDL = 0;
	180
95ec17e6	181	for (Int_t i = 0; i < 5; i++)
	182	{
	183	Int_t ieven = 2*i;
	184	Int_t iodd = 2*i + 1;
	185	if (dsp[ieven] > 0)
	186	{
	187	dspBlockARDL += dsp[ieven];
0a666212	188	Int_t remainder = dsp[ieven]%2;
	189	if (remainder == 1)
	190	{
	191	dspBlockARDL++;
	192	}
95ec17e6	193	}
	194	if (dsp[iodd] > 0)
	195	{
	196	dspBlockBRDL += dsp[iodd];
0a666212	197	Int_t remainder = dsp[ieven]%2;
	198	if (remainder == 1)
	199	{
	200	dspBlockARDL++;
	201	}
95ec17e6	202	}
28328eeb	203	}
95ec17e6	204
95ec17e6	205	// Start writing the DDL file
0a666212	206
	207	AliPMDBlockHeader blHeader;
	208	AliPMDDspHeader dspHeader;
	209	AliPMDPatchBusHeader pbusHeader;
	210
	211	const Int_t kblHLen = blHeader.GetHeaderLength();
	212	const Int_t kdspHLen = dspHeader.GetHeaderLength();
	213	const Int_t kpbusHLen = pbusHeader.GetHeaderLength();
	214
95ec17e6	215	UInt_t dspRDL = 0;
0a666212	216	UInt_t dspBlockHeaderWord[8];
	217	UInt_t dspHeaderWord[10];
	218	UInt_t patchBusHeaderWord[4];
95ec17e6	219	Int_t iskip[5];
95ec17e6	220
0a666212	221
95ec17e6	222	for (Int_t iblock = 0; iblock < 2; iblock++)
	223	{
	224	// DSP Block Header
	225
0a666212	226	for (Int_t i=0; i<kblHLen; i++)
95ec17e6	227	{
0a666212	228	dspBlockHeaderWord[i] = 0;
	229	}
	230	if (iblock == 0)
	231	{
	232	dspBlockHeaderWord[1] = (UInt_t) (dspBlockARDL + kblHLen);
	233	dspBlockHeaderWord[2] = (UInt_t) dspBlockARDL;
	234	}
	235	else if (iblock == 1)
	236	{
	237	dspBlockHeaderWord[1] = (UInt_t) (dspBlockBRDL + kblHLen);
	238	dspBlockHeaderWord[2] = (UInt_t) dspBlockBRDL;
95ec17e6	239	}
95ec17e6	240
08f92f14	241	outfile->WriteBuffer((char)dspBlockHeaderWord,kblHLensizeof(UInt_t));
95ec17e6	242
	243	if (iblock == 0)
	244	{
	245	iskip[0] = 0;
	246	iskip[1] = 10;
	247	iskip[2] = 20;
	248	iskip[3] = 30;
	249	iskip[4] = 40;
	250	}
	251	else if (iblock == 1)
	252	{
	253	iskip[0] = 5;
	254	iskip[1] = 15;
	255	iskip[2] = 25;
	256	iskip[3] = 35;
	257	iskip[4] = 45;
	258	}
28328eeb	259
95ec17e6	260	for (Int_t idsp = 0; idsp < 5; idsp++)
	261	{
	262	// DSP Header
	263	Int_t dspno = 0;
	264	if (iblock == 0)
	265	{
	266	dspno = 2*idsp;
	267	dspRDL = (UInt_t) dsp[dspno];
	268	}
	269	else if (iblock == 1)
	270	{
	271	dspno = 2*idsp + 1;
	272	dspRDL = (UInt_t) dsp[dspno];
	273	}
	274
0a666212	275	for (Int_t i=0; i<kdspHLen; i++)
95ec17e6	276	{
0a666212	277	dspHeaderWord[i] = 0;
95ec17e6	278	}
0a666212	279	Int_t remainder = dspRDL%2;
	280	if (remainder == 1) dspRDL++;
	281
	282	dspHeaderWord[1] = dspRDL + kdspHLen;
	283	dspHeaderWord[2] = dspRDL;
	284	dspHeaderWord[3] = dspno;
	285	if (remainder == 1) dspHeaderWord[8] = 1; // setting the padding word
08f92f14	286	outfile->WriteBuffer((char)dspHeaderWord,kdspHLensizeof(UInt_t));
0a666212	287
95ec17e6	288	for (Int_t ibus = 0; ibus < 5; ibus++)
	289	{
	290	// Patch Bus Header
	291	Int_t busno = iskip[idsp] + ibus;
	292	Int_t patchbusRDL = contentsBus[busno];
0a666212	293
0a666212	294	if (patchbusRDL > 0)
95ec17e6	295	{
0a666212	296	patchBusHeaderWord[0] = 0;
	297	patchBusHeaderWord[1] = (UInt_t) (patchbusRDL + kpbusHLen);
	298	patchBusHeaderWord[2] = (UInt_t) patchbusRDL;
	299	patchBusHeaderWord[3] = (UInt_t) busno;
95ec17e6	300	}
0a666212	301	else if (patchbusRDL == 0)
	302	{
	303	patchBusHeaderWord[0] = 0;
	304	patchBusHeaderWord[1] = (UInt_t) kpbusHLen;
	305	patchBusHeaderWord[2] = (UInt_t) 0;
	306	patchBusHeaderWord[3] = (UInt_t) busno;
	307	}
	308
	309
08f92f14	310	outfile->WriteBuffer((char)patchBusHeaderWord,4sizeof(UInt_t));
95ec17e6	311
95ec17e6	312
	313	for (Int_t iword = 0; iword < patchbusRDL; iword++)
	314	{
	315	buffer[iword] = busPatch[busno][iword];
	316	}
	317
08f92f14	318	outfile->WriteBuffer((char)buffer,patchbusRDLsizeof(UInt_t));
0a666212	319
	320	} // End of patch bus loop
	321
	322
	323	// Adding a padding word if the total words odd
	324	if (remainder == 1)
	325	{
	326	UInt_t paddingWord = dspHeader.GetDefaultPaddingWord();
08f92f14	327	outfile->WriteBuffer((char*)(&paddingWord),sizeof(UInt_t));
95ec17e6	328	}
	329	}
	330	}
0a666212	331
a4e4efaa	332	// Write real data header
a4e4efaa	333	// take the pointer to the beginning of the data header
28328eeb	334	// write the total number of words per ddl and bring the
28328eeb	335	// pointer to the current file position and close it
08f92f14	336	UInt_t cFPosition = outfile->Tellp();
a4e4efaa	337	sizeRawData = cFPosition - bHPosition - sizeof(header);
95ec17e6	338
a4e4efaa	339	header.fSize = cFPosition - bHPosition;
a4e4efaa	340	header.SetAttribute(0); // valid data
08f92f14	341	outfile->Seekp(bHPosition);
	342	outfile->WriteBuffer((char*)(&header),sizeof(header));
	343	outfile->Seekp(cFPosition);
28328eeb	344
08f92f14	345	delete outfile;
28328eeb	346	} // DDL Loop over
	347
	348
	349	}
	350	//____________________________________________________________________________
95ec17e6	351	void AliPMDDDLRawData::GetUMDigitsData(TTree *treeD, Int_t imodule,
	352	Int_t ddlno, Int_t *contentsBus,
	353	UInt_t busPatch[][1536])
28328eeb	354	{
e54787da	355	// Retrives digits data UnitModule by UnitModule
93622f4a	356
cff75ba7	357	UInt_t baseword;
28328eeb	358	UInt_t mcmno, chno;
28328eeb	359	UInt_t adc;
28328eeb	360	Int_t det, smn, irow, icol;
a98f9d26	361	Int_t parity;
a0a6a406	362
95ec17e6	363	const Int_t kMaxBus = 50;
	364	Int_t totPatchBus, bPatchBus, ePatchBus;
	365	Int_t ibus, totmcm, rows, cols, rowe, cole;
	366	Int_t moduleno;
	367	Int_t busno = 0;
	368	Int_t patchBusNo[kMaxBus], mcmperBus[kMaxBus];
	369	Int_t startRowBus[kMaxBus], startColBus[kMaxBus];
	370	Int_t endRowBus[kMaxBus], endColBus[kMaxBus];
	371
	372	Int_t beginPatchBus = -1;
	373	Int_t endPatchBus = -1;
	374	for(Int_t i = 0; i < kMaxBus; i++)
	375	{
	376	patchBusNo[i] = -1;
	377	mcmperBus[i] = -1;
	378	startRowBus[i] = -1;
	379	startColBus[i] = -1;
	380	endRowBus[i] = -1;
	381	endColBus[i] = -1;
	382	}
	383	Int_t modulePerDDL = 0;
	384	if (ddlno < 4)
	385	{
	386	modulePerDDL = 6;
	387	}
	388	else if (ddlno == 4 \|\| ddlno == 5)
	389	{
	390	modulePerDDL = 12;
	391	}
	392
95ec17e6	393	TString fileName(gSystem->Getenv("ALICE_ROOT"));
	394
	395	if(ddlno == 0)
	396	{
	397	fileName += "/PMD/PMD_Mapping_ddl0.dat";
	398	}
	399	else if(ddlno == 1)
	400	{
	401	fileName += "/PMD/PMD_Mapping_ddl1.dat";
	402	}
	403	else if(ddlno == 2)
	404	{
	405	fileName += "/PMD/PMD_Mapping_ddl2.dat";
	406	}
	407	else if(ddlno == 3)
	408	{
	409	fileName += "/PMD/PMD_Mapping_ddl3.dat";
	410	}
	411	else if(ddlno == 4)
	412	{
	413	fileName += "/PMD/PMD_Mapping_ddl4.dat";
	414	}
	415	else if(ddlno == 5)
	416	{
	417	fileName += "/PMD/PMD_Mapping_ddl5.dat";
	418	}
	419
	420	ifstream infile;
	421	infile.open(fileName.Data(), ios::in); // ascii file
	422	if(!infile)
	423	AliError(Form("Could not read the mapping file for DDL No = %d",ddlno));
	424
	425	for (Int_t im = 0; im < modulePerDDL; im++)
	426	{
	427	infile >> moduleno;
	428	infile >> totPatchBus >> bPatchBus >> ePatchBus;
	429
	430	if (moduleno == imodule)
	431	{
	432	beginPatchBus = bPatchBus;
	433	endPatchBus = ePatchBus;
	434	}
	435
	436	for(Int_t i=0; i<totPatchBus; i++)
	437	{
	438	infile >> ibus >> totmcm >> rows >> rowe >> cols >> cole;
	439
	440	if (moduleno == imodule)
	441	{
	442	patchBusNo[ibus] = ibus;
	443	mcmperBus[ibus] = totmcm;
	444	startRowBus[ibus] = rows;
	445	startColBus[ibus] = cols;
	446	endRowBus[ibus] = rowe;
	447	endColBus[ibus] = cole;
	448	}
	449	}
	450
	451	}
	452
	453	infile.close();
	454
28328eeb	455	treeD->GetEntry(imodule);
28328eeb	456	Int_t nentries = fDigits->GetLast();
95ec17e6	457	Int_t totword = nentries+1;
28328eeb	458
0a666212	459	AliPMDdigit *pmddigit;
a48edddd	460
28328eeb	461	for (Int_t ient = 0; ient < totword; ient++)
28328eeb	462	{
0a666212	463	pmddigit = (AliPMDdigit*)fDigits->UncheckedAt(ient);
28328eeb	464
0a666212	465	det = pmddigit->GetDetector();
	466	smn = pmddigit->GetSMNumber();
	467	irow = pmddigit->GetRow();
	468	icol = pmddigit->GetColumn();
	469	adc = (UInt_t) pmddigit->GetADC();
28328eeb	470
e54787da	471	TransformS2H(smn,irow,icol);
95ec17e6	472
	473	GetMCMCh(ddlno, irow, icol, beginPatchBus, endPatchBus,
	474	mcmperBus, startRowBus, startColBus,
	475	endRowBus, endColBus, busno, mcmno, chno);
28328eeb	476
28328eeb	477	baseword = 0;
cff75ba7	478	AliBitPacking::PackWord(adc,baseword,0,11);
	479	AliBitPacking::PackWord(chno,baseword,12,17);
	480	AliBitPacking::PackWord(mcmno,baseword,18,28);
	481	AliBitPacking::PackWord(0,baseword,29,30);
a98f9d26	482	parity = ComputeParity(baseword); // generate the parity bit
a98f9d26	483	AliBitPacking::PackWord(parity,baseword,31,31);
95ec17e6	484
	485	Int_t jj = contentsBus[busno];
	486	busPatch[busno][jj] = baseword;
	487
	488	contentsBus[busno]++;
28328eeb	489	}
28328eeb	490
e54787da	491	}
95ec17e6	492
e54787da	493	//____________________________________________________________________________
	494	void AliPMDDDLRawData::TransformS2H(Int_t smn, Int_t &irow, Int_t &icol)
	495	{
	496	// Does the Software to Hardware coordinate transformation
	497	//
95ec17e6	498
e54787da	499	Int_t irownew = 0;
e54787da	500	Int_t icolnew = 0;
e54787da	501
e54787da	502	// First in digits we have all dimension 48x96
95ec17e6	503	// Transform into the realistic one, i.e, For SM 0&1 96(row)x48(col)
95ec17e6	504	// and for SM 2&3 48(row)x96(col)
e54787da	505	//
	506	if(smn < 12)
	507	{
95ec17e6	508	irownew = icol;
95ec17e6	509	icolnew = irow;
e54787da	510	}
	511	else if( smn >= 12 && smn < 24)
	512	{
95ec17e6	513	irownew = irow;
95ec17e6	514	icolnew = icol;
e54787da	515	}
	516
	517	irow = irownew;
	518	icol = icolnew;
28328eeb	519
28328eeb	520	}
e54787da	521
e54787da	522
28328eeb	523	//____________________________________________________________________________
e54787da	524
95ec17e6	525	void AliPMDDDLRawData::GetMCMCh(Int_t ddlno, Int_t row, Int_t col,
	526	Int_t beginPatchBus, Int_t endPatchBus,
	527	Int_t *mcmperBus,
	528	Int_t startRowBus, Int_t startColBus,
	529	Int_t endRowBus, Int_t endColBus,
	530	Int_t & busno, UInt_t &mcmno, UInt_t &chno)
28328eeb	531	{
9ac124a2	532	// This converts row col to hardware channel number
	533	// This is the final version of mapping supplied by Mriganka
	534
	535	static const UInt_t kCh[16][4] = { {56, 58, 59, 57},
	536	{54, 62, 61, 53},
	537	{52, 60, 63, 51},
	538	{48, 50, 55, 49},
	539	{46, 40, 45, 47},
	540	{44, 32, 35, 43},
	541	{42, 34, 33, 41},
	542	{38, 36, 37, 39},
	543	{24, 26, 27, 25},
	544	{22, 30, 29, 21},
	545	{20, 28, 31, 19},
	546	{16, 18, 23, 17},
	547	{14, 8, 13, 15},
	548	{12, 0, 3, 11},
	549	{10, 2, 1, 9},
	550	{6, 4, 5, 7} };
28328eeb	551
95ec17e6	552	Int_t irownew = row%16;
	553	Int_t icolnew = col%4;
	554
	555	chno = kCh[irownew][icolnew];
a0a6a406	556
a0a6a406	557
95ec17e6	558	for (Int_t ibus = beginPatchBus; ibus <= endPatchBus; ibus++)
	559	{
	560	Int_t srow = startRowBus[ibus];
	561	Int_t erow = endRowBus[ibus];
	562	Int_t scol = startColBus[ibus];
	563	Int_t ecol = endColBus[ibus];
	564	Int_t tmcm = mcmperBus[ibus];
	565	if ((row >= srow && row <= erow) && (col >= scol && col <= ecol))
a4e4efaa	566	{
95ec17e6	567	busno = ibus;
a0a6a406	568
95ec17e6	569	// Find out the MCM Number
95ec17e6	570	//
a0a6a406	571
95ec17e6	572	if (ddlno == 0 \|\| ddlno == 1)
	573	{
	574	// PRE plane, SU Mod = 0, 1
a0a6a406	575	mcmno = (col-scol)/4;
a0a6a406	576
93622f4a	577	}
a0a6a406	578	else if (ddlno == 2 \|\| ddlno == 3)
95ec17e6	579	{
a0a6a406	580	// PRE plane, SU Mod = 2, 3
95ec17e6	581	Int_t icolnew = (col - scol)/4;
95ec17e6	582	mcmno = tmcm - 1 - icolnew;
93622f4a	583	}
93622f4a	584	else if (ddlno == 4 )
95ec17e6	585	{
	586	// CPV plane, SU Mod = 0, 3 : ddl = 4
	587
a0a6a406	588	if(ibus <= 17)
95ec17e6	589	{
a0a6a406	590	Int_t midrow = srow + 16;
a0a6a406	591	if(row >= srow && row < midrow)
95ec17e6	592	{
a0a6a406	593	mcmno = 12 + (col-scol)/4;
95ec17e6	594	}
93622f4a	595	else if(row >= midrow && row <= erow)
93622f4a	596
95ec17e6	597	{
	598	mcmno = (col-scol)/4;
	599	}
	600	}
95ec17e6	601
a0a6a406	602	else if (ibus > 17)
95ec17e6	603	{
	604	Int_t rowdiff = endRowBus[ibus] - startRowBus[ibus];
	605	if(rowdiff > 16)
	606	{
	607	Int_t midrow = srow + 16;
93622f4a	608	if (row >= midrow && row <= erow)
95ec17e6	609	{
93622f4a	610	mcmno = 12 + (ecol -col)/4;
95ec17e6	611	}
a0a6a406	612	else if (row >= srow && row < midrow)
95ec17e6	613	{
93622f4a	614	mcmno = (ecol - col)/4;
95ec17e6	615	}
95ec17e6	616	}
93622f4a	617	else if (rowdiff < 16)
95ec17e6	618	{
93622f4a	619	mcmno = (ecol - col)/4;
a0a6a406	620	}
95ec17e6	621	}
95ec17e6	622	}
93622f4a	623	else if ( ddlno == 5)
	624	{
	625	// CPV plane, SU Mod = 0, 3 : ddl = 4
	626
	627	if(ibus <= 17)
	628	{
	629	Int_t midrow = srow + 16;
	630	if(row >= srow && row < midrow)
	631	{
	632	mcmno = 12 + (col-scol)/4;
	633	}
	634	else if(row >= midrow && row <= erow)
	635	{
	636	mcmno = (col-scol)/4;
	637	}
	638	}
	639
	640	else if (ibus > 17)
	641	{
	642	Int_t rowdiff = endRowBus[ibus] - startRowBus[ibus];
	643	if(rowdiff > 16)
	644	{
	645	Int_t midrow = srow + 16;
	646	if (row >= midrow && row <= erow)
	647	{
	648	mcmno = 12 + (ecol -col)/4;
	649	}
	650	else if (row >= srow && row < midrow)
	651	{
	652	mcmno = (ecol - col)/4;
	653	}
	654	}
	655	else if (rowdiff < 16)
	656	{
	657	mcmno = (ecol - col)/4;
	658	}
	659	}
	660	}
	661	}
95ec17e6	662	}
a0a6a406	663	}
a0a6a406	664
28328eeb	665	//____________________________________________________________________________
28328eeb	666
a98f9d26	667	Int_t AliPMDDDLRawData::ComputeParity(UInt_t baseword)
	668	{
	669	// Generate the parity bit
	670
	671	Int_t count = 0;
	672	for(Int_t j=0; j<29; j++)
	673	{
	674	if (baseword & 0x01 ) count++;
	675	baseword >>= 1;
	676	}
	677	Int_t parity = count%2;
	678	return parity;
	679	}
	680
	681	//____________________________________________________________________________