// Created by: CKY / Contract Toubro-Larsen
// Copyright (c) 1993-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 <gp_GTrsf.hxx>
#include <gp_Pnt.hxx>
#include <gp_XYZ.hxx>
#include <IGESDraw_RectArraySubfigure.hxx>
#include <Standard_DimensionMismatch.hxx>
#include <Standard_Type.hxx>

IMPLEMENT_STANDARD_RTTIEXT(IGESDraw_RectArraySubfigure, IGESData_IGESEntity)

IGESDraw_RectArraySubfigure::IGESDraw_RectArraySubfigure() = default;

void IGESDraw_RectArraySubfigure::Init(const occ::handle<IGESData_IGESEntity>&      aBase,
                                       const double                                 aScale,
                                       const gp_XYZ&                                aCorner,
                                       const int                                    nbCols,
                                       const int                                    nbRows,
                                       const double                                 hDisp,
                                       const double                                 vtDisp,
                                       const double                                 rotationAngle,
                                       const int                                    doDont,
                                       const occ::handle<NCollection_HArray1<int>>& allNumPos)
{
  if (!allNumPos.IsNull())
    if (allNumPos->Lower() != 1)
      throw Standard_DimensionMismatch("IGESDraw_RectArraySubfigure : Init");
  theBaseEntity       = aBase;
  theScaleFactor      = aScale;
  theLowerLeftCorner  = aCorner;
  theNbColumns        = nbCols;
  theNbRows           = nbRows;
  theColumnSeparation = hDisp;
  theRowSeparation    = vtDisp;
  theRotationAngle    = rotationAngle;
  theDoDontFlag       = doDont != 0;
  thePositions        = allNumPos;
  InitTypeAndForm(412, 0);
}

occ::handle<IGESData_IGESEntity> IGESDraw_RectArraySubfigure::BaseEntity() const
{
  return theBaseEntity;
}

double IGESDraw_RectArraySubfigure::ScaleFactor() const
{
  return theScaleFactor;
}

gp_Pnt IGESDraw_RectArraySubfigure::LowerLeftCorner() const
{
  gp_Pnt tempLowerLeftCorner(theLowerLeftCorner);
  return tempLowerLeftCorner;
}

gp_Pnt IGESDraw_RectArraySubfigure::TransformedLowerLeftCorner() const
{
  gp_XYZ tempLowerLeftCorner = theLowerLeftCorner;
  if (HasTransf())
    Location().Transforms(tempLowerLeftCorner);
  gp_Pnt tempRes(tempLowerLeftCorner);

  return (tempRes);
}

int IGESDraw_RectArraySubfigure::NbColumns() const
{
  return theNbColumns;
}

int IGESDraw_RectArraySubfigure::NbRows() const
{
  return theNbRows;
}

double IGESDraw_RectArraySubfigure::ColumnSeparation() const
{
  return theColumnSeparation;
}

double IGESDraw_RectArraySubfigure::RowSeparation() const
{
  return theRowSeparation;
}

double IGESDraw_RectArraySubfigure::RotationAngle() const
{
  return theRotationAngle;
}

bool IGESDraw_RectArraySubfigure::DisplayFlag() const
{
  return (thePositions.IsNull());
}

int IGESDraw_RectArraySubfigure::ListCount() const
{
  return (thePositions.IsNull() ? 0 : thePositions->Length());
  // Return 0 if HArray1 thePositions is NULL Handle
}

bool IGESDraw_RectArraySubfigure::DoDontFlag() const
{
  return (theDoDontFlag);
}

bool IGESDraw_RectArraySubfigure::PositionNum(const int Index) const
{
  // Method : If thePositions array length is Zero return theDoDontFlag;
  //          else Search Index in to the Array. If 'Index' found in the
  //          array return theDoDontFlag else return !theDoDontFlag.

  if (thePositions.IsNull())
    return theDoDontFlag;

  int I;
  int up = thePositions->Upper();
  for (I = 1; I <= up; I++)
  {
    if (thePositions->Value(I) == Index)
      return theDoDontFlag;
  }
  return (!theDoDontFlag);
}

int IGESDraw_RectArraySubfigure::ListPosition(const int Index) const
{
  return thePositions->Value(Index);
  // raise OutOfRange from Standard if Index is out-of-bound
  // Exception NoSuchObject will be raised if thePositions == Null Handle
}
