0031382: Data Exchange - BinXCAF should preserve length unit information

[occt.git] / src / StepData / StepData_GlobalFactors.cxx

diff --git a/src/StepData/StepData_GlobalFactors.cxx b/src/StepData/StepData_GlobalFactors.cxx
new file mode 100644 (file)
index 0000000..37cff58
--- /dev/null
+++ b/src/StepData/StepData_GlobalFactors.cxx
@@ -0,0 +1,113 @@
+// Copyright (c) 2021 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 <StepData_GlobalFactors.hxx>
+
+// ============================================================================
+// Method : Consturctor
+// Purpose:
+// ============================================================================
+StepData_GlobalFactors::StepData_GlobalFactors()
+  :myLengthFactor(1.), myPlaneAngleFactor(1.),
+   mySolidAngleFactor(1.), myFactRD(1.),
+   myFactDR(1.), myCascadeUnit(1.)
+{}
+
+// ============================================================================
+// Method : Intance
+// Purpose:
+// ============================================================================
+StepData_GlobalFactors& StepData_GlobalFactors::Intance()
+{
+  static StepData_GlobalFactors THE_FACTORS;
+  return THE_FACTORS;
+}
+
+// ============================================================================
+// Method : InitializeFactors
+// Purpose:
+// ============================================================================
+void StepData_GlobalFactors::InitializeFactors(
+  const Standard_Real theLengthFactor,
+  const Standard_Real thePlaneAngleFactor,
+  const Standard_Real theSolidAngleFactor)
+{
+  myLengthFactor = theLengthFactor;
+  myPlaneAngleFactor = thePlaneAngleFactor;
+  mySolidAngleFactor = theSolidAngleFactor;
+  myFactRD = 1. / thePlaneAngleFactor;
+  myFactDR = thePlaneAngleFactor;
+}
+
+// ============================================================================
+// Method : LengthFactor
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::LengthFactor()
+{
+  return myLengthFactor;
+}
+
+// ============================================================================
+// Method : PlaneAngleFactor
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::PlaneAngleFactor()
+{
+  return myPlaneAngleFactor;
+}
+
+// ============================================================================
+// Method : SolidAngleFactor
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::SolidAngleFactor()
+{
+  return mySolidAngleFactor;
+}
+
+// ============================================================================
+// Method : FactorRadianDegree
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::FactorRadianDegree()
+{
+  return myFactRD;
+}
+
+// ============================================================================
+// Method : FactorDegreeRadian
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::FactorDegreeRadian()
+{
+  return myFactDR;
+}
+
+// ============================================================================
+// Method : SetCascadeUnit
+// Purpose:
+// ============================================================================
+void StepData_GlobalFactors::SetCascadeUnit(const Standard_Real theUnit)
+{
+  myCascadeUnit = theUnit;
+}
+
+// ============================================================================
+// Method : CascadeUnit
+// Purpose:
+// ============================================================================
+Standard_Real StepData_GlobalFactors::CascadeUnit()
+{
+  return myCascadeUnit;
+}