/**************************************************************************
 * Copyright(c) 2007-2009, 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.                  *
 **************************************************************************/

/* $Id$*/

///////////////////////////////////////////////////////////////////////////////
///
/// This class provides access to ITS SDD digits in raw data.
///
///////////////////////////////////////////////////////////////////////////////

#include "AliITSRawStreamSDD.h"
#include "AliRawReader.h"
#include "AliLog.h"

ClassImp(AliITSRawStreamSDD)

const Int_t AliITSRawStreamSDD::fgkDDLModuleMap[kDDLsNumber][kModulesPerDDL] = {
 
  {240,241,242,246,247,248,252,253,254,258,259,260},
  {264,265,266,270,271,272,276,277,278,282,283,284},
  {288,289,290,294,295,296,300,301,302,306,307,308},
  {312,313,314,318,319,320,-1,-1,-1,-1,-1,-1},
  {243,244,245,249,250,251,255,256,257,261,262,263},
  {267,268,269,273,274,275,279,280,281,285,286,287},
  {291,292,293,297,298,299,303,304,305,309,310,311},
  {315,316,317,321,322,323,-1,-1,-1,-1,-1,-1},
  {324,325,326,327,332,333,334,335,340,341,342,343},
  {348,349,350,351,356,357,358,359,364,365,366,367},
  {372,373,374,375,380,381,382,383,388,389,390,391},
  {396,397,398,399,404,405,406,407,412,413,414,415},
  {420,421,422,423,428,429,430,431,436,437,438,439},
  {444,445,446,447,452,453,454,455,460,461,462,463},
  {468,469,470,471,476,477,478,479,484,485,486,487},
  {492,493,494,495,-1,-1,-1,-1,-1,-1,-1,-1},
  {328,329,330,331,336,337,338,339,344,345,346,347},
  {352,353,354,355,360,361,362,363,368,369,370,371},
  {376,377,378,379,384,385,386,387,392,393,394,395},
  {400,401,402,403,408,409,410,411,416,417,418,419},
  {424,425,426,427,432,433,434,435,440,441,442,443},
  {448,449,450,451,456,457,458,459,464,465,466,467},
  {472,473,474,475,480,481,482,483,488,489,490,491},
  {496,497,498,499,-1,-1,-1,-1,-1,-1,-1,-1}};
  
const UInt_t AliITSRawStreamSDD::fgkCodeLength[8] =  {8, 18, 2, 3, 4, 5, 6, 7};

AliITSRawStreamSDD::AliITSRawStreamSDD(AliRawReader* rawReader) :
  AliITSRawStream(rawReader),
fData(0),
fEventId(0),
fCarlosId(-1),
fChannel(0),
fJitter(0),
fNCarlos(kModulesPerDDL),
fDDL(0),
fEndWords(0),
fResetSkip(0)
{
// create an object to read ITS SDD raw digits

  Reset();
  for(Int_t i=0;i<kFifoWords;i++) fNfifo[i]=0;
  for(Int_t i=0;i<kDDLsNumber;i++) fSkip[i]=0;
  fRawReader->Reset();
  fRawReader->Select("ITSSDD");

  for(Short_t i=0; i<kCarlosWords; i++) fICarlosWord[i]=0x30000000 + i; // 805306368+i;
  for(Short_t i=0; i<kFifoWords; i++) fIFifoWord[i]=0x30000010 + i;  // 805306384+i;
}

UInt_t AliITSRawStreamSDD::ReadBits()
{
// read bits from the given channel
  UInt_t result = (fChannelData[fCarlosId][fChannel] & ((1<<fReadBits[fCarlosId][fChannel]) - 1));
  fChannelData[fCarlosId][fChannel] >>= fReadBits[fCarlosId][fChannel]; 
  fLastBit[fCarlosId][fChannel] -= fReadBits[fCarlosId][fChannel];
  return result;
}

Int_t AliITSRawStreamSDD::DecompAmbra(Int_t value) const
{
  // AMBRA decompression (from 8 to 10 bit)
  
  if ((value & 0x80) == 0) {
    return value & 0x7f;
  } else if ((value & 0x40) == 0) {
    return 0x081 + ((value & 0x3f) << 1);
  } else if ((value & 0x20) == 0) {
    return 0x104 + ((value & 0x1f) << 3);
  } else {
    return 0x208 + ((value & 0x1f) << 4);
  }
  
}

Bool_t AliITSRawStreamSDD::Next()
{
// read the next raw digit
// returns kFALSE if there is no digit left
// returns kTRUE and fCompletedModule=kFALSE when a digit is found
// returns kTRUE and fCompletedModule=kTRUE  when a module is completed (=3x3FFFFFFF footer words)

  fPrevModuleID = fModuleID;
  fDDL=fRawReader->GetDDLID();
  Int_t ddln = fRawReader->GetDDLID();
  if(ddln <0) ddln=0;
  fCompletedModule=kFALSE;

  while (kTRUE) {
    if(fResetSkip==0){
      Bool_t kSkip = ResetSkip(ddln);
      fResetSkip=1;
      if(!kSkip) return kSkip;
    }
  
    if ((fChannel < 0) || (fCarlosId < 0) || (fChannel >= 2) || (fCarlosId >= kModulesPerDDL) || (fLastBit[fCarlosId][fChannel] < fReadBits[fCarlosId][fChannel]) ) {
      if (!fRawReader->ReadNextInt(fData)) return kFALSE;  // read next word
      ddln = fRawReader->GetDDLID();
      if(ddln!=fDDL) { 
	Reset();
	fDDL=fRawReader->GetDDLID();
      }
      if(ddln < 0 || ddln > (kDDLsNumber-1)) ddln  = 0;

      fChannel = -1;
      if((fData >> 16) == 0x7F00 ||(fData >> 4) == 0xFF00000){ // modif!!!!!
	for(Int_t i=0;i<kDDLsNumber;i++){fSkip[i]=0;}
	fResetSkip=0;
	fEndWords=0;
	continue;
      }

      UInt_t nData28= fData >> 28;
      UInt_t nData30= fData >> 30;


      if (nData28== 0x02) {           // header
	fEventId = (fData >> 3) & 0x07FF; 
      } else if (nData28== 0x03) {    // Carlos and FIFO words or Footers
	if(fData>=fICarlosWord[0]&&fData<=fICarlosWord[11]) { // Carlos Word
	  if(fEndWords==12) continue; // out of event
	  fCarlosId = fData-fICarlosWord[0];
	  Int_t iFifoIdx = fCarlosId/3;
	  if(fNCarlos == 8) iFifoIdx=fCarlosId/2;
	  fNfifo[iFifoIdx] = fCarlosId;
	} else if (fData>=fIFifoWord[0]&&fData<=fIFifoWord[3]){ // FIFO word
	  if(fEndWords==12) continue; // out of event
	  fCarlosId = fNfifo[fData-fIFifoWord[0]];	    
	} else if(fData==0x3FFFFFFF){ // Carlos footer
	  if(fCarlosId>=0 && fCarlosId<kModulesPerDDL){
	    fICountFoot[fCarlosId]++; // stop before the last word (last word=jitter)
	    if(fICountFoot[fCarlosId]==3){
	      fCompletedModule=kTRUE;
	      //	      printf("Completed module %d DDL %d\n",fCarlosId,ddln);
	      return kTRUE;
	    }
	  }
	} else if(fData==0x3F1F1F1F){ // CarlosRX footer
	  fEndWords++;
	  if(fEndWords<=12) continue;
	}else{
	  fRawReader->AddMajorErrorLog(kDataError,"Too many footers");
	  AliWarning(Form("invalid data: too many footers\n", fData));
	  return kFALSE;	    
	}
      } else if (nData30 == 0x02 || nData30 == 0x03) {
	fChannel = nData30-2;
	if(fCarlosId>=0 && fChannel>=0 && fCarlosId <kModulesPerDDL && fChannel<2){
	  fChannelData[fCarlosId][fChannel] += 
	    (ULong64_t(fData & 0x3FFFFFFF) << fLastBit[fCarlosId][fChannel]);
	  fLastBit[fCarlosId][fChannel] += 30;
	}
      } else {                               // unknown data format
	fRawReader->AddMajorErrorLog(kDataFormatErr,Form("Invalid data %8.8x",fData));
	AliWarning(Form("invalid data: %8.8x\n", fData));
	return kFALSE;
      }
      
      if (fNCarlos == 8 && fCarlosId >= 8) continue;  // old data, fNCarlos = 8;
      if(fCarlosId>=0 && fCarlosId <kModulesPerDDL){
	 fModuleID = fgkDDLModuleMap[ddln][fCarlosId];
      }
    } else {  // decode data
      if (fReadCode[fCarlosId][fChannel]) {// read the next code word
	fChannelCode[fCarlosId][fChannel] = ReadBits();
	fReadCode[fCarlosId][fChannel] = kFALSE;
	fReadBits[fCarlosId][fChannel] = fgkCodeLength[fChannelCode[fCarlosId][fChannel]];
      } else {                      // read the next data word
	UInt_t data = ReadBits();
	fReadCode[fCarlosId][fChannel] = kTRUE;
	fReadBits[fCarlosId][fChannel] = 3;
	if (fChannelCode[fCarlosId][fChannel] == 0) {         // set the time bin	  
	  fTimeBin[fCarlosId][fChannel] = data;
	} else if (fChannelCode[fCarlosId][fChannel] == 1) {  // next anode
	  fTimeBin[fCarlosId][fChannel] = 0;
	  fAnode[fCarlosId][fChannel]++;
	} else {                                   // ADC signal data
	  fSignal = DecompAmbra(data + (1 << fChannelCode[fCarlosId][fChannel]) + fLowThreshold[fChannel]);
	  fCoord1 = fAnode[fCarlosId][fChannel];
	  fCoord2 = fTimeBin[fCarlosId][fChannel];
	  fTimeBin[fCarlosId][fChannel]++;
	  //printf("Data read, Module=%d , Anode=%d , Time=%d , Charge=%d\n",fModuleID,fCoord1,fCoord2,fSignal);
	  return kTRUE;
	}
      }
    }
  }
  return kFALSE;
}

void AliITSRawStreamSDD::Reset(){

  //reset data member for a new ddl
  for(Int_t i=0;i<2;i++){
    for(Int_t ic=0;ic<kModulesPerDDL;ic++){
      fChannelData[ic][i]=0;
      fLastBit[ic][i]=0;
      fChannelCode[ic][i]=0;
      fReadCode[ic][i]=kTRUE;
      fReadBits[ic][i]=3;
      fTimeBin[ic][i]=0;
      fAnode[ic][i]=0;     
    }
    fLowThreshold[i]=0;
  }
  for(Int_t i=0;i<kModulesPerDDL;i++) fICountFoot[i]=0;
}

Bool_t AliITSRawStreamSDD::ResetSkip(Int_t ddln){
  // skip the 1 DDL header word = 0xffffffff
  Bool_t startCount=kFALSE;
  while (fSkip[ddln] < 1) {
    if (!fRawReader->ReadNextInt(fData)) { 
      return kFALSE;
    }
    if(fData==0xFFFFFFFF) startCount=kTRUE;
    //printf("%x\n",fData);
    if ((fData >> 30) == 0x01) continue;  // JTAG word
    if(startCount) fSkip[ddln]++;
  }
  return kTRUE;
}