// Created on: 1996-12-05
// Created by: Flore Lantheaume/Odile Olivier
// Copyright (c) 1996-1999 Matra Datavision
// Copyright (c) 1999-2014 OPEN CASCADE SAS
//
// This file is part of Open CASCADE Technology software library.
//
// This library is free software; you can redistribute it and/or modify it under
// the terms of the GNU Lesser General Public License version 2.1 as published
// by the Free Software Foundation, with special exception defined in the file
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
// distribution for complete text of the license and disclaimer of any warranty.
//
// Alternatively, this file may be used under the terms of Open CASCADE
// commercial license or contractual agreement.

#include <PrsDim_Chamf2dDimension.hxx>

#include <PrsDim.hxx>
#include <BRepAdaptor_Surface.hxx>
#include <DsgPrs_Chamf2dPresentation.hxx>
#include <ElCLib.hxx>
#include <Geom_Line.hxx>
#include <Geom_Plane.hxx>
#include <gp_Dir.hxx>
#include <gp_Pln.hxx>
#include <gp_Pnt.hxx>
#include <gp_Vec.hxx>
#include <ProjLib.hxx>
#include <Prs3d_DimensionAspect.hxx>
#include <Prs3d_Drawer.hxx>
#include <Prs3d_Presentation.hxx>
#include <Select3D_SensitiveBox.hxx>
#include <Select3D_SensitiveSegment.hxx>
#include <SelectMgr_EntityOwner.hxx>
#include <SelectMgr_Selection.hxx>
#include <Standard_Type.hxx>
#include <TCollection_ExtendedString.hxx>
#include <TopoDS.hxx>
#include <TopoDS_Shape.hxx>

IMPLEMENT_STANDARD_RTTIEXT(PrsDim_Chamf2dDimension, PrsDim_Relation)

//=================================================================================================

PrsDim_Chamf2dDimension::PrsDim_Chamf2dDimension(const TopoDS_Shape&               aFShape,
                                                 const occ::handle<Geom_Plane>&    aPlane,
                                                 const double                      aVal,
                                                 const TCollection_ExtendedString& aText)

{
  myFShape            = aFShape;
  myPlane             = aPlane;
  myVal               = aVal;
  myText              = aText;
  mySymbolPrs         = DsgPrs_AS_LASTAR;
  myAutomaticPosition = true;

  myArrowSize = myVal / 100.;
}

//=================================================================================================

PrsDim_Chamf2dDimension::PrsDim_Chamf2dDimension(const TopoDS_Shape&               aFShape,
                                                 const occ::handle<Geom_Plane>&    aPlane,
                                                 const double                      aVal,
                                                 const TCollection_ExtendedString& aText,
                                                 const gp_Pnt&                     aPosition,
                                                 const DsgPrs_ArrowSide            aSymbolPrs,
                                                 const double                      anArrowSize)

{
  myFShape    = aFShape;
  myPlane     = aPlane;
  myVal       = aVal;
  myText      = aText;
  myPosition  = aPosition;
  mySymbolPrs = aSymbolPrs;
  SetArrowSize(anArrowSize);
  myAutomaticPosition = false;
}

//=================================================================================================

void PrsDim_Chamf2dDimension::Compute(const occ::handle<PrsMgr_PresentationManager>&,
                                      const occ::handle<Prs3d_Presentation>& aPresentation,
                                      const int)
{
  occ::handle<Geom_Curve> gcurv;
  gp_Pnt                  pfirst, plast;
  const TopoDS_Edge&      thechamfedge = TopoDS::Edge(myFShape);
  if (!PrsDim::ComputeGeometry(thechamfedge, gcurv, pfirst, plast))
    return;

  occ::handle<Geom_Line> glin = occ::down_cast<Geom_Line>(gcurv);
  gp_Dir                 dir1(glin->Position().Direction());
  gp_Dir                 norm1 = myPlane->Pln().Axis().Direction();
  myDir                        = norm1.Crossed(dir1);

  //-------------------------------------------------
  // compute a direction orthogonal to the chamfer edge
  // and directed towards the exterior of the contour
  //-------------------------------------------------

  // retrieve an edge adjacent to the chamfer edge
  /*TopoDS_Edge nextedge = TopoDS::Edge(mySShape);

  gp_Pnt pfirstnext,plastnext;
  occ::handle<Geom_Line> glinnext;
  if (!PrsDim::ComputeGeometry(nextedge,glinnext,pfirstnext,plastnext) )
    return;

  gp_Vec v1(pfirst,plast);
  gp_Vec v2;
  if (pfirst.IsEqual(plastnext, Precision::Confusion()))
    v2.SetXYZ(pfirstnext.XYZ() - pfirst.XYZ());
  else
    v2.SetXYZ(plastnext.XYZ() - pfirst.XYZ());
  gp_Vec crossvec = v1.Crossed(v2);

  myDir = dimserv.GetDirection().Crossed(glin->Position().Direction());
  if (crossvec.Dot(dimserv.GetDirection()) > 0 )
    myDir.Reverse();*/     //       myDir   => donne a la creation

  //--------------------------------------------
  // Calcul du point de positionnement du texte
  //--------------------------------------------
  gp_Pnt curpos;
  if (myAutomaticPosition)
  {
    myPntAttach.SetXYZ((pfirst.XYZ() + plast.XYZ()) / 2);
    gp_Vec transVec(myDir);
    transVec *= myVal;
    curpos = myPntAttach.Translated(transVec);

    if (myIsSetBndBox)
      curpos = PrsDim::TranslatePointToBound(curpos, myDir, myBndBox);

    myPosition = curpos;
  }
  else
  {

    myPntAttach.SetXYZ((pfirst.XYZ() + plast.XYZ()) / 2);
    occ::handle<Geom_Line> dimLin    = new Geom_Line(myPntAttach, myDir);
    double                 parcurpos = ElCLib::Parameter(dimLin->Lin(), myPosition);
    curpos                           = ElCLib::Value(parcurpos, dimLin->Lin());
    // static double minlength = 0.005;
    // taille minimale de la dimension

    if (curpos.Distance(myPntAttach) < 5.)
    {
      gp_Vec transVec(myDir);
      transVec *= 5.;
      curpos = myPntAttach.Translated(transVec);
    }
    myPosition = curpos;
  }

  occ::handle<Prs3d_DimensionAspect> la  = myDrawer->DimensionAspect();
  occ::handle<Prs3d_ArrowAspect>     arr = la->ArrowAspect();

  //-------------------------------------------------
  // Calcul de la boite englobante du component pour
  // determiner la taille de la fleche
  //-------------------------------------------------

  if (!myArrowSizeIsDefined)
  {
    double arrsize = myArrowSize;
    if ((myVal / 4) < arrsize)
      arrsize = myVal / 4;
    if (arrsize > 30.)
      arrsize = 30.;
    else if (arrsize < 8.)
      arrsize = 8.;
    myArrowSize = arrsize;
  }
  arr->SetLength(myArrowSize);

  // Calcul de la presentation
  DsgPrs_Chamf2dPresentation::Add(aPresentation,
                                  myDrawer,
                                  myPntAttach,
                                  curpos,
                                  myText,
                                  mySymbolPrs);
}

//=================================================================================================

void PrsDim_Chamf2dDimension::ComputeSelection(const occ::handle<SelectMgr_Selection>& aSelection,
                                               const int)
{
  occ::handle<SelectMgr_EntityOwner>     own = new SelectMgr_EntityOwner(this, 7);
  occ::handle<Select3D_SensitiveSegment> seg =
    new Select3D_SensitiveSegment(own, myPntAttach, myPosition);
  aSelection->Add(seg);

  // Text
  double                             size(std::min(myVal / 100. + 1.e-6, myArrowSize + 1.e-6));
  occ::handle<Select3D_SensitiveBox> box = new Select3D_SensitiveBox(own,
                                                                     myPosition.X(),
                                                                     myPosition.Y(),
                                                                     myPosition.Z(),
                                                                     myPosition.X() + size,
                                                                     myPosition.Y() + size,
                                                                     myPosition.Z() + size);
  aSelection->Add(box);
}
