// Copyright (c) 1991-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.

#ifndef _gp_Parab_HeaderFile
#define _gp_Parab_HeaderFile

#include "gp_Ax1.hxx"
#include "gp_Lin.hxx"
#include "gp_Pnt.hxx"
#include "Standard_ConstructionError.hxx"

//! Describes a parabola in 3D space.
//! A parabola is defined by its focal length (that is, the
//! distance between its focus and apex) and positioned in
//! space with a coordinate system (a gp_Ax2 object)
//! where:
//! -   the origin of the coordinate system is on the apex of
//! the parabola,
//! -   the "X Axis" of the coordinate system is the axis of
//! symmetry; the parabola is on the positive side of this axis, and
//! -   the origin, "X Direction" and "Y Direction" of the
//! coordinate system define the plane of the parabola.
//! The equation of the parabola in this coordinate system,
//! which is the "local coordinate system" of the parabola, is:
//! @code
//! Y**2 = (2*P) * X.
//! @endcode
//! where P, referred to as the parameter of the parabola, is
//! the distance between the focus and the directrix (P is
//! twice the focal length).
//! The "main Direction" of the local coordinate system gives
//! the normal vector to the plane of the parabola.
//! See Also
//! gce_MakeParab which provides functions for more
//! complex parabola constructions
//! Geom_Parabola which provides additional functions for
//! constructing parabolas and works, in particular, with the
//! parametric equations of parabolas
class gp_Parab
{
public:
  DEFINE_STANDARD_ALLOC

  //! Creates an indefinite Parabola.
  constexpr gp_Parab() noexcept
      : focalLength(RealLast())
  {
  }

  //! Creates a parabola with its local coordinate system "theA2"
  //! and it's focal length "Focal".
  //! The XDirection of theA2 defines the axis of symmetry of the
  //! parabola. The YDirection of theA2 is parallel to the directrix
  //! of the parabola. The Location point of theA2 is the vertex of
  //! the parabola
  //! Raises ConstructionError if theFocal < 0.0
  //! Raised if theFocal < 0.0
  constexpr gp_Parab(const gp_Ax2& theA2, const double theFocal)
      : pos(theA2),
        focalLength(theFocal)
  {
    Standard_ConstructionError_Raise_if(theFocal < 0.0, "gp_Parab() - focal length should be >= 0");
  }

  //! theD is the directrix of the parabola and theF the focus point.
  //! The symmetry axis (XAxis) of the parabola is normal to the
  //! directrix and pass through the focus point theF, but its
  //! location point is the vertex of the parabola.
  //! The YAxis of the parabola is parallel to theD and its location
  //! point is the vertex of the parabola. The normal to the plane
  //! of the parabola is the cross product between the XAxis and the
  //! YAxis.
  gp_Parab(const gp_Ax1& theD, const gp_Pnt& theF);

  //! Modifies this parabola by redefining its local coordinate system so that
  //! -   its origin and "main Direction" become those of the
  //! axis theA1 (the "X Direction" and "Y Direction" are then
  //! recomputed in the same way as for any gp_Ax2)
  //! Raises ConstructionError if the direction of theA1 is parallel to the previous
  //! XAxis of the parabola.
  void SetAxis(const gp_Ax1& theA1) { pos.SetAxis(theA1); }

  //! Changes the focal distance of the parabola.
  //! Raises ConstructionError if theFocal < 0.0
  void SetFocal(const double theFocal)
  {
    Standard_ConstructionError_Raise_if(theFocal < 0.0,
                                        "gp_Parab::SetFocal() - focal length should be >= 0");
    focalLength = theFocal;
  }

  //! Changes the location of the parabola. It is the vertex of
  //! the parabola.
  constexpr void SetLocation(const gp_Pnt& theP) noexcept { pos.SetLocation(theP); }

  //! Changes the local coordinate system of the parabola.
  constexpr void SetPosition(const gp_Ax2& theA2) noexcept { pos = theA2; }

  //! Returns the main axis of the parabola.
  //! It is the axis normal to the plane of the parabola passing
  //! through the vertex of the parabola.
  constexpr const gp_Ax1& Axis() const noexcept { return pos.Axis(); }

  //! Computes the directrix of this parabola.
  //! The directrix is:
  //! -   a line parallel to the "Y Direction" of the local
  //! coordinate system of this parabola, and
  //! -   located on the negative side of the axis of symmetry,
  //! at a distance from the apex which is equal to the focal
  //! length of this parabola.
  //! The directrix is returned as an axis (a gp_Ax1 object),
  //! the origin of which is situated on the "X Axis" of this parabola.
  gp_Ax1 Directrix() const;

  //! Returns the distance between the vertex and the focus
  //! of the parabola.
  constexpr double Focal() const noexcept { return focalLength; }

  //! -   Computes the focus of the parabola.
  gp_Pnt Focus() const;

  //! Returns the vertex of the parabola. It is the "Location"
  //! point of the coordinate system of the parabola.
  constexpr const gp_Pnt& Location() const noexcept { return pos.Location(); }

  //! Computes the parameter of the parabola.
  //! It is the distance between the focus and the directrix of
  //! the parabola. This distance is twice the focal length.
  constexpr double Parameter() const noexcept { return 2.0 * focalLength; }

  //! Returns the local coordinate system of the parabola.
  constexpr const gp_Ax2& Position() const noexcept { return pos; }

  //! Returns the symmetry axis of the parabola. The location point
  //! of the axis is the vertex of the parabola.
  constexpr gp_Ax1 XAxis() const noexcept { return gp_Ax1(pos.Location(), pos.XDirection()); }

  //! It is an axis parallel to the directrix of the parabola.
  //! The location point of this axis is the vertex of the parabola.
  constexpr gp_Ax1 YAxis() const noexcept { return gp_Ax1(pos.Location(), pos.YDirection()); }

  Standard_EXPORT void Mirror(const gp_Pnt& theP) noexcept;

  //! Performs the symmetrical transformation of a parabola
  //! with respect to the point theP which is the center of the
  //! symmetry.
  [[nodiscard]] Standard_EXPORT gp_Parab Mirrored(const gp_Pnt& theP) const noexcept;

  Standard_EXPORT void Mirror(const gp_Ax1& theA1);

  //! Performs the symmetrical transformation of a parabola
  //! with respect to an axis placement which is the axis of
  //! the symmetry.
  [[nodiscard]] Standard_EXPORT gp_Parab Mirrored(const gp_Ax1& theA1) const;

  Standard_EXPORT void Mirror(const gp_Ax2& theA2);

  //! Performs the symmetrical transformation of a parabola
  //! with respect to a plane. The axis placement theA2 locates
  //! the plane of the symmetry (Location, XDirection, YDirection).
  [[nodiscard]] Standard_EXPORT gp_Parab Mirrored(const gp_Ax2& theA2) const;

  void Rotate(const gp_Ax1& theA1, const double theAng) { pos.Rotate(theA1, theAng); }

  //! Rotates a parabola. theA1 is the axis of the rotation.
  //! Ang is the angular value of the rotation in radians.
  [[nodiscard]] gp_Parab Rotated(const gp_Ax1& theA1, const double theAng) const
  {
    gp_Parab aPrb = *this;
    aPrb.pos.Rotate(theA1, theAng);
    return aPrb;
  }

  void Scale(const gp_Pnt& theP, const double theS);

  //! Scales a parabola. theS is the scaling value.
  //! If theS is negative the direction of the symmetry axis
  //! XAxis is reversed and the direction of the YAxis too.
  [[nodiscard]] gp_Parab Scaled(const gp_Pnt& theP, const double theS) const;

  void Transform(const gp_Trsf& theT);

  //! Transforms a parabola with the transformation theT from class Trsf.
  [[nodiscard]] gp_Parab Transformed(const gp_Trsf& theT) const;

  constexpr void Translate(const gp_Vec& theV) noexcept { pos.Translate(theV); }

  //! Translates a parabola in the direction of the vector theV.
  //! The magnitude of the translation is the vector's magnitude.
  [[nodiscard]] constexpr gp_Parab Translated(const gp_Vec& theV) const noexcept
  {
    gp_Parab aPrb = *this;
    aPrb.pos.Translate(theV);
    return aPrb;
  }

  constexpr void Translate(const gp_Pnt& theP1, const gp_Pnt& theP2) noexcept
  {
    pos.Translate(theP1, theP2);
  }

  //! Translates a parabola from the point theP1 to the point theP2.
  [[nodiscard]] constexpr gp_Parab Translated(const gp_Pnt& theP1,
                                              const gp_Pnt& theP2) const noexcept
  {
    gp_Parab aPrb = *this;
    aPrb.pos.Translate(theP1, theP2);
    return aPrb;
  }

private:
  gp_Ax2 pos;
  double focalLength;
};

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

inline gp_Parab::gp_Parab(const gp_Ax1& theD, const gp_Pnt& theF)
{
  gp_Lin aDroite(theD);
  focalLength        = aDroite.Distance(theF) / 2.;
  gp_Ax1        anAx = aDroite.Normal(theF).Position();
  gp_Ax1        anAy = aDroite.Position();
  const gp_Dir& aDD  = anAx.Direction();
  pos                = gp_Ax2(gp_Pnt(theF.X() - focalLength * aDD.X(),
                      theF.Y() - focalLength * aDD.Y(),
                      theF.Z() - focalLength * aDD.Z()),
               anAx.Direction().Crossed(anAy.Direction()),
               anAx.Direction());
}

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

inline gp_Ax1 gp_Parab::Directrix() const
{
  const gp_Pnt& aPP = pos.Location();
  const gp_Dir& aDD = pos.XDirection();
  gp_Pnt        aP(aPP.X() - focalLength * aDD.X(),
            aPP.Y() - focalLength * aDD.Y(),
            aPP.Z() - focalLength * aDD.Z());
  return gp_Ax1(aP, pos.YDirection());
}

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

inline gp_Pnt gp_Parab::Focus() const
{
  const gp_Pnt& aPP = pos.Location();
  const gp_Dir& aDD = pos.XDirection();
  return gp_Pnt(aPP.X() + focalLength * aDD.X(),
                aPP.Y() + focalLength * aDD.Y(),
                aPP.Z() + focalLength * aDD.Z());
}

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

inline void gp_Parab::Scale(const gp_Pnt& theP, const double theS)
{
  focalLength *= theS;
  if (focalLength < 0)
  {
    focalLength = -focalLength;
  }
  pos.Scale(theP, theS);
}

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

inline gp_Parab gp_Parab::Scaled(const gp_Pnt& theP, const double theS) const
{
  gp_Parab aPrb = *this;
  aPrb.focalLength *= theS;
  if (aPrb.focalLength < 0)
  {
    aPrb.focalLength = -aPrb.focalLength;
  }
  aPrb.pos.Scale(theP, theS);
  return aPrb;
}

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

inline void gp_Parab::Transform(const gp_Trsf& theT)
{
  focalLength *= theT.ScaleFactor();
  if (focalLength < 0)
  {
    focalLength = -focalLength;
  }
  pos.Transform(theT);
}

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

inline gp_Parab gp_Parab::Transformed(const gp_Trsf& theT) const
{
  gp_Parab aPrb = *this;
  aPrb.focalLength *= theT.ScaleFactor();
  if (aPrb.focalLength < 0)
  {
    aPrb.focalLength = -aPrb.focalLength;
  }
  aPrb.pos.Transform(theT);
  return aPrb;
}

#endif // _gp_Parab_HeaderFile