TPadStock.cxx

Go to the documentation of this file.

// lots of call to DistancetoPrimitive
//#undef DEBUG

#include <TList.h>
#include <TFrame.h>
#include <TROOT.h>

#include "TPadStock.h"

#include "EditorObjStock.h"
#include "THStock.h"
#include "ObjectLine.h"

//ROOT dictionary, not needed even if slots received !
// because derive from TPad ??

// maybe needed for GetClassName ??
//ClassImp(TPadStock);

TPadStock::TPadStock( const char* name, const char* title, Double_t x1, Double_t y1, Double_t x2, Double_t y2, Color_t color, Short_t bordersize, Short_t bordermode) : 
TPad ( name, title, x1, y1, x2, y2, color, bordersize, bordermode )
{
#ifdef DEBUG_OBJSTOCK
  std::cout << "Constructor TPadStock" << std::endl;
  std::cout << "this " << this << std::endl;
#endif
}

THStock * TPadStock::GetTHStock() const
{
#ifdef DEBUG_OBJSTOCK
  std::cout << "TPadStock::GetTHStock" << std::endl;
#endif

  //THStock *ths = 0;
  TObject *obj;

  TIter next( GetListOfPrimitives() );
  while ( (obj = next()) ) {
      if ( obj->InheritsFrom("THStock") ) {
          //std::cout << "Found THStock " << std::endl;
          return dynamic_cast<THStock*>(obj);
      }
  }
  std::cout << "\t\nTPadStock::GetTHStock NOT FOUND !\n" << std::endl;
  return nullptr;
}

void TPadStock::AddToTHStock ( ObjectLine * obj_stock )
{
#ifdef DEBUG_OBJSTOCK
  std::cout << "TPadStock AddToTHStock" << std::endl;
#endif
  THStock *ths = GetTHStock();

  if ( !ths ) {
      std::cout << "\nERROR TH1 not found in TPadStock::AddToTHStock\n" << std::endl;
  }
  ths->Add( obj_stock );
}

Int_t TPadStock::DistancetoPrimitive(Int_t px, Int_t py)
{
//#ifdef DEBUG_OBJSTOCK DEBUG_PAD??
//      std::cout << "\nEntry TPadStock::DistancetoPrimitive" << std::endl;
//      std::cout << "this " << this << std::endl;
//#endif
    // The distance is computed in pixels units.
   Int_t pxl, pyl, pxt, pyt;
   Int_t px1 = gPad->XtoAbsPixel(fX1);
   Int_t py1 = gPad->YtoAbsPixel(fY1);
   Int_t px2 = gPad->XtoAbsPixel(fX2);
   Int_t py2 = gPad->YtoAbsPixel(fY2);
   if (px1 < px2) {pxl = px1; pxt = px2;}
   else           {pxl = px2; pxt = px1;}
   if (py1 < py2) {pyl = py1; pyt = py2;}
   else           {pyl = py2; pyt = py1;}

   // commented, allows to select the object in THStock
   // Are we inside the box?
   // ======================
   /*
   if ( (px > pxl && px < pxt) && (py > pyl && py < pyt) ) {
      std::cout << "TPadStock::DistancetoPrimitive return 0 " << std::endl;
      if (GetFillStyle()) return 0;  // if pad is filled
   }
   */

   // Are we on the edges?
   // ====================
   Int_t dxl = TMath::Abs(px - pxl);
   if (py < pyl) dxl += pyl - py; if (py > pyt) dxl += py - pyt;
   Int_t dxt = TMath::Abs(px - pxt);
   if (py < pyl) dxt += pyl - py; if (py > pyt) dxt += py - pyt;
   Int_t dyl = TMath::Abs(py - pyl);
   if (px < pxl) dyl += pxl - px; if (px > pxt) dyl += px - pxt;
   Int_t dyt = TMath::Abs(py - pyt);
   if (px < pxl) dyt += pxl - px; if (px > pxt) dyt += px - pxt;

   Int_t distance = dxl;
   if (dxt < distance) distance = dxt;
   if (dyl < distance) distance = dyl;
   if (dyt < distance) distance = dyt;

#ifdef DEBUG_OBJSTOCK
   std::cout << "TPadStock::DistancetoPrimitive will return " << distance - Int_t(0.5*fLineWidth) << std::endl;
#endif
   return distance - Int_t(0.5*fLineWidth);
}

// really needed ?? need to comment AddFirst, works ?? or find better way....
// called by THistPainterStock
// only when created, now when slider as well
// called for sure, really needed ?? to test
// called when a line is moved ( gPad->Modified is set )
void TPadStock::PaintPadFrameStock(Double_t xmin, Double_t ymin, Double_t xmax, Double_t ymax)
{
#ifdef DEBUG_OBJSTOCK
        std::cout << "Entry TPadStock::PaintPadFrameStock" << std::endl;
        // called for sure !! by THistPainterStock
        //std::cout << "Never called !" << std::endl;
        // should check, print the list of object contained here
#endif
   // Paint histogram/graph frame.

   if (!fPrimitives) fPrimitives = new TList;
   TList *glist  = GetListOfPrimitives();
   TFrame *frame = GetFrame();
   frame->SetX1(xmin);
   frame->SetX2(xmax);
   frame->SetY1(ymin);
   frame->SetY2(ymax);
   if (!glist->FindObject(fFrame)) {
      // if not added, will not pick it! and still painted
      //glist->AddFirst(frame);
#ifdef DEBUG_OBJSTOCK
      std::cout << "TPadStock::PaintPadFrameStock fFrame not found set kMustCleanup ?" << std::endl;
#endif
      fFrame->SetBit(kMustCleanup);
   }
#ifdef DEBUG_OBJSTOCK
   else {
      std::cout << "TPadStock::PaintPadFrameStock fFrame found " << std::endl;
   }
#endif

   if (gROOT->GetForceStyle()) frame->UseCurrentStyle();
   frame->Paint();
}

void TPadStock::ExecuteEvent( Int_t event, Int_t px, Int_t py ) 
{
    // not called when a Line is selected by mouse,
    // only called when cursor closer to the pad
#ifdef DEBUG_OBJSTOCK
        std::cout << "Entry TPadStock::ExecuteEvent px, py " << px << " " << py << std::endl;
#endif

  // certainly not necessary, just convenient
  if ( EditorObjStock::GetMode() == TypeLine::kNone_line ) {
#ifdef DEBUG_OBJSTOCK
      std::cout << "return directly EditorObjStock is None " << std::endl;
#endif
      return;
  }

 // else we are drawing an object
#ifdef DEBUG_OBJSTOCK
  std::cout << "MakePrimitve ObjectStock" << std::endl;
#endif

  ObjectLine * obj;

  // logic to get the event from her.
  // if too complexe need intermediate, but already not bad with ObjctLine
  switch (event) {

      case kButton1Down:
#ifdef DEBUG_OBJSTOCK
        std::cout << "kButtonDown " << std::endl;
#endif
        // parameter GetMode() only needed here, the other use the created line
        // could reset to off after
        obj = FactoryObjectStock::CreateDrawableObjectLine( FactoryObjectStock::kBeginDraw,
                        gPad->AbsPixeltoX( px ), gPad->AbsPixeltoY( py ), EditorObjStock::GetMode() );

        // set the parent here, as soon as created
        // helps for ObjectLine::FinaliseDrawableLine()
        obj->SetParent ( GetTHStock() );
        std::cout << "After SetParent " << obj->GetParent()->GetName() << std::endl;

        if ( EditorObjStock::GetAnchor() ) {
            std::cout << "CreateObjectLine with anchor" << std::endl;
            // call anchoring function
            GetTHStock()->AnchorToIndicator( px, py, obj, FactoryObjectStock::kBeginDraw );
        }
        break;

      case kButton1Motion:
          FactoryObjectStock::CreateDrawableObjectLine( FactoryObjectStock::kMoveDraw,
                          gPad->AbsPixeltoX( px ), gPad->AbsPixeltoY (py ), EditorObjStock::GetMode() );
          break;

     // finalize drawing, can receive the final Object, goal of contructor !!
     case kButton1Up:
         // last stage, call directly ObjectLine::Finalise Object, anchoring done inside
         obj = FactoryObjectStock::CreateDrawableObjectLine( FactoryObjectStock::kEndDraw ,
                 gPad->AbsPixeltoX( px ),gPad->AbsPixeltoY ( py ), EditorObjStock::GetMode() );
        //std::cout << "receive a new objectline adress " << obj << std::endl;

         // better anchoring here ? explicit
         if ( EditorObjStock::GetAnchor() ) {
             std::cout << "GetAnchor for final stage " << std::endl;
             //fParentTHStock->AnchorToIndicator( px, py, this, FactoryObjectStock::kEnd );
             GetTHStock()->AnchorToIndicator( px, py, obj, FactoryObjectStock::kEndDraw );
         }
         // need in base
         //obj->FinaliseDrawableLine( GetTHStock()->GetCommonXAxis() );
         ((ObjectLineTendance *)obj)->FinaliseDrawableLine( GetTHStock()->GetCommonXAxis() );
         // and call finalize here ?? why not ??
         // test Anchor in one function, better !!

         // add the object to the THStock
         AddToTHStock ( obj );
         // will update all THStocks, maybe can do better ??
         // a simple draw of obj, set and Paint
         gPad->Modified();
         break;

      // button left to cancel, not so easy
     default : //badly formatted ??
#ifdef DEBUG_OBJSTOCK
        std::cout << " event not deal by TPadExecuteEvent " << std::endl;
#endif
        break;
  }

    // try to force the draw, certainly not best
    // it redraws all, and all the times ! Modified is important for update to act
    //Modified(); Update();
}