// $Id$
// Category: graphics
//
// Class AliMpZonePainter
// ----------------------
// Class for drawing a zone into canvas
// Included in AliRoot: 2003/05/02
// Authors: David Guez, IPN Orsay
 
#include <TVirtualX.h>
#include <TPad.h>
#include <TError.h>

#include "AliMpZonePainter.h"
#include "AliMpGraphContext.h"
#include "AliMpZone.h"
#include "AliMpSubZone.h"
#include "AliMpVRowSegment.h"

ClassImp(AliMpZonePainter)

//_______________________________________________________________________
AliMpZonePainter::AliMpZonePainter()
  : AliMpVPainter(),
    fZone(0)
{
  // default dummy constructor
}

//_______________________________________________________________________
AliMpZonePainter::AliMpZonePainter(AliMpZone *zone)
  : AliMpVPainter(),
    fZone(zone)
{
  // normal constructor 

}

//_____________________________________________________________________________
AliMpZonePainter::AliMpZonePainter(const AliMpZonePainter& right) 
  : AliMpVPainter(right) 
{  
  // copy constructor (not implemented)

  Fatal("AliMpZonePainter", "Copy constructor not provided.");
}

//_______________________________________________________________________
AliMpZonePainter::~AliMpZonePainter()
{
  // destructor 

}

//_____________________________________________________________________________
AliMpZonePainter& 
AliMpZonePainter::operator=(const AliMpZonePainter& right)
{
  // assignement operator (not implemented)

  // check assignement to self
  if (this == &right) return *this;

  Fatal("operator =", "Assignement operator not provided.");
    
  return *this;  
}    

//_______________________________________________________________________
Int_t AliMpZonePainter::DistancetoPrimitive(Int_t x, Int_t y)
{
  // dist to the nearest segment center if (x,y) is inside the zone
  // 9999 otherwise
  if (fZone->GetNofSubZones()<1) return 9999;
  AliMpGraphContext *gr = AliMpGraphContext::Instance();

  gr->Push();
  InitGraphContext();
  
  TVector2 point = TVector2(gPad->AbsPixeltoX(x), gPad->AbsPixeltoY(y));

  Double_t res=9999.;
  for (Int_t isub=0;isub<fZone->GetNofSubZones();++isub){
    // for each sub-zones
    AliMpSubZone* sub = fZone->GetSubZone(isub);
    for (Int_t iseg=0;iseg<sub->GetNofRowSegments();++iseg){
      //for each row segments
      AliMpVRowSegment* seg = sub->GetRowSegment(iseg);

      TVector2 pos,dim;
      gr->RealToPad(seg->Position(),seg->Dimensions(),pos,dim);

      if ( IsInside(point,pos,dim) ){
	Double_t value = (point-pos).Mod();
	if (value<res) res=value;
      }
    }
  }
  gr->Pop();
  return (Int_t)res;
}

//_______________________________________________________________________
void AliMpZonePainter::DumpObject()
{
// Draw the owned object
  fZone->Dump();

}

//_______________________________________________________________________
TVector2 AliMpZonePainter::GetPosition() const
{
  // Get the owned object's position

  if (fZone->GetNofSubZones()<1) return TVector2(0.,0.);

  TVector2 bl(9999,9999),ur(-9999,-9999);

  for (Int_t isub=0;isub<fZone->GetNofSubZones();++isub){
    // for each sub-zones
    AliMpSubZone* sub = fZone->GetSubZone(isub);
    for (Int_t iseg=0;iseg<sub->GetNofRowSegments();++iseg){
      //for each row segments
      AliMpVRowSegment* seg = sub->GetRowSegment(iseg);

      // update the bottom-left corner
      if (bl.X()>seg->Position().X()-seg->Dimensions().X())
	bl.Set(seg->Position().X()-seg->Dimensions().X(),bl.Y());
      if (bl.Y()>seg->Position().Y()-seg->Dimensions().Y())
	bl.Set(bl.X(),seg->Position().Y()-seg->Dimensions().Y());
      // update the upper-right corner
      if (ur.X()<seg->Position().X()+seg->Dimensions().X())
	ur.Set(seg->Position().X()+seg->Dimensions().X(),ur.Y());
      if (ur.Y()<seg->Position().Y()+seg->Dimensions().Y())
	ur.Set(ur.X(),seg->Position().Y()+seg->Dimensions().Y());
    } //iseg
  } //isub
  return (ur+bl)/2.;
}

//_______________________________________________________________________
TVector2 AliMpZonePainter::GetDimensions() const
{
  // Get the owned object's dimensions

  if (fZone->GetNofSubZones()<1) return TVector2(0.,0.);

  TVector2 bl(9999,9999),ur(-9999,-9999);

  for (Int_t isub=0;isub<fZone->GetNofSubZones();++isub){
    // for each sub-zones
    AliMpSubZone* sub = fZone->GetSubZone(isub);
    for (Int_t iseg=0;iseg<sub->GetNofRowSegments();++iseg){
      //for each row segments
      AliMpVRowSegment* seg = sub->GetRowSegment(iseg);

      // update the bottom-left corner
      if (bl.X()>seg->Position().X()-seg->Dimensions().X())
	bl.Set(seg->Position().X()-seg->Dimensions().X(),bl.Y());
      if (bl.Y()>seg->Position().Y()-seg->Dimensions().Y())
	bl.Set(bl.X(),seg->Position().Y()-seg->Dimensions().Y());
      // update the upper-right corner
      if (ur.X()<seg->Position().X()+seg->Dimensions().X())
	ur.Set(seg->Position().X()+seg->Dimensions().X(),ur.Y());
      if (ur.Y()<seg->Position().Y()+seg->Dimensions().Y())
	ur.Set(ur.X(),seg->Position().Y()+seg->Dimensions().Y());
    } //iseg
  } //isub
  return (ur-bl)/2.;
}

//_______________________________________________________________________
void AliMpZonePainter::Draw(Option_t *option)
{
// Draw the sector on the current pad
// The first letter of <option> is treated as follows:
// case "S" : each sub zones are drawn separately
// case ""  : the whole zone is drawn at once
// in both cases, the rest of the option is passed
// as argument to the Draw function of respectively
// zone or row objects.
// ---

  AliMpGraphContext *gr = AliMpGraphContext::Instance();
  if (!fZone) return;

  gr->Push();
  InitGraphContext();
  switch (option[0]){
  case 'S':
    {
      for (Int_t iSubZone=0;iSubZone<fZone->GetNofSubZones();++iSubZone){
	AliMpSubZone *subZone = fZone->GetSubZone(iSubZone);
	gr->Push();

	Double_t blx=  9999,  bly=  9999;
	Double_t urx= -9999,  ury= -9999;

	  for (Int_t iRowSeg=0;iRowSeg<subZone->GetNofRowSegments();++iRowSeg){
	    AliMpVRowSegment *rowSegment = subZone->GetRowSegment(iRowSeg);

	    TVector2 bl = rowSegment->Position();
	    bl-=rowSegment->Dimensions();
	    TVector2 ur = rowSegment->Position();
	    ur+=rowSegment->Dimensions();
	    
	    if (bl.X()<blx) blx=bl.X();
	    if (bl.Y()<bly) bly=bl.Y();
	    if (ur.X()>urx) urx=ur.X();
	    if (ur.Y()>ury) ury=ur.Y();
	  }
	  TVector2 position ( (urx+blx)/2.,(ury+bly)/2. );
	  TVector2 dimensions( (urx-blx)/2.,(ury-bly)/2. );
      
	  gr->SetPadPosForReal(position,dimensions);
	  gr->SetColor((fZone->GetID()-1)*5+iSubZone+2);
	  DrawObject(subZone,option+1);
      
	  gr->Pop();
      }
    }
    break;
  default: AppendPad(option);
  }
  gr->Pop();
}

//_______________________________________________________________________
void AliMpZonePainter::Paint(Option_t *option)
{
// Paint the object
  AliMpGraphContext *gr = AliMpGraphContext::Instance();
  if (!fZone) return;
  if (fZone->GetNofSubZones()<1) return;
  gr->Push();
  gPad->Range(0.,0.,1.,1.);

  Int_t col=gVirtualX->GetFillColor();
  InitGraphContext();
  
  gVirtualX->SetFillColor(GetColor());
  Float_t textSize =   gVirtualX->GetTextSize();
  for (Int_t iSubZone=0;iSubZone<fZone->GetNofSubZones();++iSubZone){
    AliMpSubZone *subZone = fZone->GetSubZone(iSubZone);
    for (Int_t iRowSeg=0;iRowSeg<subZone->GetNofRowSegments();++iRowSeg){
      AliMpVRowSegment *rowSegment = subZone->GetRowSegment(iRowSeg);
      TVector2 pos,dim;
      gr->RealToPad(rowSegment->Position(),rowSegment->Dimensions(),
		    pos,dim);
      gPad->PaintBox(pos.X()-dim.X(),pos.Y()-dim.Y(),
		     pos.X()+dim.X(),pos.Y()+dim.Y());
      if (option[0]=='T'){
	gVirtualX->SetTextSize(15);
	gPad->PaintText(pos.X()-0.01,pos.Y()-0.01,
			Form("%d",fZone->GetID()));
      }
    }
  }
  gVirtualX->SetTextSize(textSize);
  gVirtualX->SetFillColor(col);
  gr->Pop();
}