#include <cassert>
#include <ctime>

#include "EEfeeDataBlock.h"
#include "EEfeeRawEvent.h"

#include "EEfeeRawEvent.h"
ClassImp(EEfeeRawEvent)


//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

EEfeeRawEvent::EEfeeRawEvent() {
  ID=-1;
  block= new TClonesArray("EEfeeDataBlock",10);
  block->Clear();
  // printf("EEfeeRawEvent constructed, add=%pn",this);
}

//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

EEfeeRawEvent ::  ~EEfeeRawEvent() {
  delete block;

}

//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

void EEfeeRawEvent::clear(){
  ID=-1;
  block->Delete(); // preserve memory

}

//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

void EEfeeRawEvent::print(int flag) const{
  printf("nEEfeeRawEvent ID=%d with DataBlock entered=%d of %dn",
	 ID,block->GetEntries(),block->GetSize());
  
  int i;
  for(i=0;i<block->GetEntries();i++) {
    printf("%d-",i+1);
    ((EEfeeDataBlock *)(block->At(i)))->print(flag);
  }

}

//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

void EEfeeRawEvent::addFeeDataBlock(EEfeeDataBlock* b){
   // To avoid calling the very time consuming operator new for each track,
   // the standard but not well know C++ operator "new with placement"
   // is called. If tracks[i] is 0, a new Track object will be created
   // otherwise the previous Track[i] will be overwritten.

  assert(b);
  
  TClonesArray &Block=*block;
  int nB=Block.GetEntries();
  EEfeeDataBlock *bl1= new(Block[nB]) EEfeeDataBlock();
  bl1->set(b);
  //  bl1->print();
}


//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

 void EEfeeRawEvent::maskWrongCrates( long timeStamp, unsigned headToken) {

  /* check for:
     - token in every data block
     - crateID vs. positon in event
  */

  if(timeStamp< 1068744930) {// Thu Nov 13 12:35:30 2003
    printf(" maskWrongCrates() not implemented for time stamp   : %ld / %s",timeStamp,ctime((const time_t *)& timeStamp));
    assert(1==2);
  }

  // add more patterns below
  int listA[]={1,2,3,4,5,6};
  int listB[]={1,2,3,4,5,6,84,85,86};
  int listC[]={1,2,3,4,5,6,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,
 18,17,16,30,29,28,27,26,25,24,23,22,21,20,19,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15}; // etow+esmd+btow

  int *list, dim;
  if (timeStamp< 1068761131)  //Thu Nov 13 17:05:31 2003
    { list=listA; dim=sizeof(listA)/sizeof(int); }
  else  if (timeStamp< 1070474417 ) //  Wed Dec  3 13:00:17 2003
    { list=listB; dim=sizeof(listB)/sizeof(int); }
  else 
    { list=listC; dim=sizeof(listC)/sizeof(int); }

  int ic;
  int nOK=0;
  for(ic=0;ic<block->GetEntries();ic++) {
    EEfeeDataBlock *b=(EEfeeDataBlock *)block->At(ic);
    assert(ic<dim); // fix it, use DB for crIdSwitch
    if(ic>=22 ) { 
      /*  mark BTOW crate as not valid,, one would need
	  to come up with consistency test for BTOW and  
	  b->setCrateID(16+BTOWcrateID); to avoid collision with ETOW & ESMD
	  Jan Balewski, April 2004
      */
      b->maskCrate();
      continue;
    }

    // tmp, should be taken from DB as in StEEmcDataMaker.cxx
    int lenCount=0;
    int errFlag=0;
    if(ic<6) {// ETOW
      //lenCount=4+5*32; // real .daq content
      lenCount=5*32; //  old ezTree header
      errFlag=0;
    } else { // ESMD
      //lenCount=4+192;// real .daq content
      lenCount=192;//  old ezTree header
      errFlag=0x28;
    };
    int trigCommand=4; // physics, 9=laser/LED, 8=??

    // this is messy, contact Jan before you change between  ezTree header & .daq header
    
    // real .daq content
    //  int ok=b->isHeadValid(headToken,list[ic],lenCount,trigCommand,errFlag);

    // old ezTree header 
    int ok=b->isHeadValid(headToken,list[ic],errFlag,trigCommand,lenCount);
    //    printf("XXX b=%d crID=%d=%d  tok=%d=%d ok=%dn",ic, b->getCrateID() ,list[ic],b->getToken(), headToken,ok);

 
    if(ok) nOK++;
   
    if(!ok)  b->maskCrate();
  }
  // printf("nOK=%dn",nOK);
}

//--------------------------------------------------
//--------------------------------------------------
//--------------------------------------------------

 UShort_t  EEfeeRawEvent::getValue(int crateID, int channel) const {
  int i;
  for(i=0;i<block->GetEntries();i++) {
    EEfeeDataBlock *b=(EEfeeDataBlock *)block->At(i);
    if( crateID!=b->getCrateID()) continue;
    int nd=b->getValidDataLen();
    assert(channel>=0 );
    assert(channel<nd );
    UShort_t* data=b->getData();
    return data[channel];
  }
  return 0xffff; 
}


/*
 * $Log: EEfeeRawEvent.cxx,v $
 * Revision 1.14  2004/04/16 17:26:46  balewski
 * more header checking, some mess introduced
 *
 * Revision 1.13  2004/01/27 15:13:57  balewski
 * it is tricky with BTOW
 *
 * Revision 1.12  2004/01/13 16:32:28  balewski
 * fix bug for sector 8 mapmt
 *
 * Revision 1.11  2003/12/10 04:43:19  balewski
 * first QA
 *
 * Revision 1.10  2003/12/04 18:29:25  balewski
 * I forgot
 *
 * Revision 1.9  2003/12/02 17:22:08  balewski
 * fix after version mixup
 *
 * Revision 1.7  2003/11/24 18:26:47  balewski
 * *** empty log message ***
 *
 * Revision 1.6  2003/11/24 05:40:55  balewski
 * new stuff for miniDaq
 *
 * Revision 1.5  2003/11/20 22:59:40  balewski
 * *** empty log message ***
 *
 * Revision 1.4  2003/11/20 16:01:46  balewski
 * towars run 4
 *
 */