// $Id: its_raw.C 24929 2008-04-04 13:51:43Z mtadel $
// Main authors: Matevz Tadel & Alja Mrak-Tadel: 2006, 2007

/**************************************************************************
 * Copyright(c) 1998-2008, ALICE Experiment at CERN, all rights reserved. *
 * See http://aliceinfo.cern.ch/Offline/AliRoot/License.html for          *
 * full copyright notice.                                                 *
 **************************************************************************/

void its_common_foos()
{}

AliEveITSModule* its_make_module(Int_t i, TEveElement* parent,
                                 AliEveITSDigitsInfo*  di,
                                 AliEveDigitScaleInfo* si,
                                 Bool_t check_empty, Bool_t scaled_modules)
{
  AliEveITSModule* m = 0;

  Int_t det_id = 0;
  if (i > 239 && i < 500) det_id = 1;
  else if (i >= 500)      det_id = 2;

  if (!check_empty || (di->GetDigits(i, det_id) && di->GetDigits(i, det_id)->GetEntriesFast() > 0))
  {
    if (scaled_modules)
      m = new AliEveITSScaledModule(i, di, si);
    else
      m = new AliEveITSModule(i, di);
    if (parent)
      parent->AddElement(m);
  }

  return m;
}

void its_display_raw_digits(AliEveITSDigitsInfo* di, Int_t mode,
                            Bool_t check_empty    = kTRUE,
                            Bool_t scaled_modules = kFALSE)
{
  TString sSector;
  TString bsSector="Sector";
  TString sStave;
  TString bsStave="Stave";
  TString sLadder;
  TString bsLadder="Ladder";

  Int_t i=0;
  Int_t nsec, nstave, nlad, nMod;

  gEve->DisableRedraw();

  AliEveDigitScaleInfo* si = 0;
  if (scaled_modules)
    si = new AliEveDigitScaleInfo;

  if (mode & 1) {
    TEveElementList* l = new TEveElementList("SPD0");
    l->SetTitle("SPDs' first layer");
    l->SetMainColor(Color_t(kRed));
    gEve->AddElement(l);
    for (nsec=0; nsec<10; nsec++) {
      sSector  = bsSector;
      sSector += nsec;
      TEveElementList* relSector = new TEveElementList(sSector.Data());
      relSector->SetMainColor(Color_t(kRed));
      gEve->AddElement(relSector, l);
      for (nstave=0; nstave<2; nstave++){
	sStave  = bsStave;
	sStave += nstave;
	TEveElementList* relStave = new TEveElementList(sStave.Data());
	relStave->SetMainColor(Color_t(kRed));
	gEve->AddElement(relStave, relSector);
	for (nMod=0; nMod<4; ++nMod, ++i)
	{
          its_make_module(i, relStave, di, si, check_empty, scaled_modules);
	}
      }
    }
  } else {
    i += 10*2*4;
  }

  if (mode & 2) {
    TEveElementList* l = new TEveElementList("SPD1");
    l->SetTitle("SPDs' second layer");
    l->SetMainColor(Color_t(kRed));
    gEve->AddElement(l);

    for (nsec=0; nsec<10; nsec++) {
      sSector  = bsSector;
      sSector += nsec;
      TEveElementList* relSector = new TEveElementList(sSector.Data());
      relSector->SetMainColor(Color_t(kRed));
      gEve->AddElement(relSector, l);
      for (nstave=0; nstave<4; nstave++){
	sStave  = bsStave;
	sStave += nstave;
	TEveElementList* relStave = new TEveElementList(sStave.Data());
	relStave->SetMainColor(Color_t(kRed));
	gEve->AddElement(relStave, relSector);
	for (nMod=0; nMod<4;  ++nMod, ++i)
	{
          its_make_module(i, relStave, di, si, check_empty, scaled_modules);
	}
      }
    }
  } else {
    i += 10*4*4;
  }

  if (mode & 4) {
    TEveElementList* l = new TEveElementList("SDD2");
    l->SetTitle("SDDs' first layer");
    l->SetMainColor(Color_t(kBlue));
    gEve->AddElement(l);

    for (nlad=0; nlad<14; nlad++) {
      sLadder  = bsLadder;
      sLadder += nlad;
      TEveElementList* relLadder = new TEveElementList(sLadder.Data());
      relLadder->SetMainColor(Color_t(kBlue));
      gEve->AddElement(relLadder, l);
      for (nMod=0; nMod<6; ++nMod, ++i)
      {
        its_make_module(i, relLadder, di, si, check_empty, scaled_modules);
      }
    }
  } else {
    i += 14*6;
  }

  if (mode & 8) {
    TEveElementList* l = new TEveElementList("SDD3");
    l->SetTitle("SDDs' second layer");
    l->SetMainColor(Color_t(kBlue));
    gEve->AddElement(l);
    for (nlad=0; nlad<22; nlad++) {
      sLadder  = bsLadder;
      sLadder += nlad;
      TEveElementList* relLadder = new TEveElementList(sLadder.Data());
      relLadder->SetMainColor(Color_t(kBlue));
      gEve->AddElement(relLadder, l);
      for (nMod=0; nMod<8;  ++nMod, ++i)
      {
        its_make_module(i, relLadder, di, si, check_empty, scaled_modules);
      }
    }
  } else {
    i += 22*8;
  }

  if (mode & 16) {
    TEveElementList* l = new TEveElementList("SSD4");
    l->SetTitle("SSDs' first layer");
    l->SetMainColor(Color_t(kGreen));
    gEve->AddElement(l);
    for (nlad=0; nlad<34; nlad++) {
      sLadder  = bsLadder;
      sLadder += nlad;
      TEveElementList* relLadder = new TEveElementList(sLadder.Data());
      relLadder->SetMainColor(Color_t(kGreen));
      gEve->AddElement(relLadder, l);
      for (nMod=0; nMod<22; ++nMod, ++i)
      {
        its_make_module(i, relLadder, di, si, check_empty, scaled_modules);
      }
    }
  } else {
    i += 34*22;
  }

  if (mode & 32) {
    TEveElementList* l = new TEveElementList("SSD5");
    l->SetTitle("SSDs' second layer");
    l->SetMainColor(Color_t(kGreen));
    gEve->AddElement(l);
    for (nlad=0; nlad<38; nlad++) {
      sLadder  = bsLadder;
      sLadder += nlad;
      TEveElementList* relLadder = new TEveElementList(sLadder.Data());
      relLadder->SetMainColor(Color_t(kGreen));
      gEve->AddElement(relLadder, l);
      for (nMod=0; nMod<25; ++nMod, ++i)
      {
        its_make_module(i, relLadder, di, si, check_empty, scaled_modules);
      }
    }
  } else {
    i += 38*25;
  }

  gEve->EnableRedraw();
}