+// Copyright (C) 2007-2023 CEA/DEN, EDF R&D, OPEN CASCADE
+//
+// Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
+// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
+//
+// This library is free software; you can redistribute it and/or
+// modify it under the terms of the GNU Lesser General Public
+// License as published by the Free Software Foundation; either
+// version 2.1 of the License, or (at your option) any later version.
+//
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+// Lesser General Public License for more details.
+//
+// You should have received a copy of the GNU Lesser General Public
+// License along with this library; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+//
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
+//
-using namespace std;
#include "GEOM_SubShapeDriver.hxx"
+
#include "GEOM_ISubShape.hxx"
#include "GEOM_Function.hxx"
#include "GEOM_Object.hxx"
-#include <BRep_Tool.hxx>
#include <BRep_Builder.hxx>
-#include <BRepGProp.hxx>
-
-#include <TopAbs.hxx>
#include <TopExp.hxx>
-#include <TopoDS.hxx>
-#include <TopoDS_Shape.hxx>
-#include <TopoDS_Edge.hxx>
-#include <TopoDS_Wire.hxx>
-#include <TopoDS_Solid.hxx>
-#include <TopoDS_Compound.hxx>
-#include <TopoDS_Iterator.hxx>
-#include <TopExp_Explorer.hxx>
-#include <TopTools_MapOfShape.hxx>
-#include <TopTools_SequenceOfShape.hxx>
-#include <TopTools_Array1OfShape.hxx>
#include <TopTools_IndexedMapOfShape.hxx>
+#include <TopTools_MapOfShape.hxx>
+#include <TopoDS_Compound.hxx>
+#include <TopoDS_Shape.hxx>
+#include <TDataStd_Integer.hxx>
-#include <GProp_GProps.hxx>
-#include <gp_Pnt.hxx>
-#include <TColStd_Array1OfReal.hxx>
-
-#include <Precision.hxx>
#include <Standard_NullObject.hxx>
-#include <Standard_TypeMismatch.hxx>
-
//=======================================================================
//function : GEOM_SubShapeDriver
//function : Execute
//purpose :
//=======================================================================
-Standard_Integer GEOM_SubShapeDriver::Execute(TFunction_Logbook& log) const
+Standard_Integer GEOM_SubShapeDriver::Execute(Handle(TFunction_Logbook)& log) const
{
if (Label().IsNull()) return 0;
Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
TopoDS_Compound aCompound;
TopoDS_Shape aShape;
- if (anIndices->Length() == 1 && anIndices->Value(1) == -1) { //The empty subshape
+ if (anIndices->Length() == 1 && anIndices->Value(1) == -1) { //The empty sub-shape
B.MakeCompound(aCompound);
aShape = aCompound;
-
- } else {
-
+ }
+ else {
TopTools_IndexedMapOfShape aMapOfShapes;
TopExp::MapShapes(aMainShape, aMapOfShapes);
if (anIndices->Length() > 1) {
-
B.MakeCompound(aCompound);
- for (int i = anIndices->Lower(); i<= anIndices->Upper(); i++) {
- if (aMapOfShapes.Extent() < anIndices->Value(i))
- Standard_NullObject::Raise("GEOM_SubShapeDriver::Execute: Index is out of range");
- TopoDS_Shape aSubShape = aMapOfShapes.FindKey(anIndices->Value(i));
- if (aSubShape.IsNull()) continue;
- B.Add(aCompound,aSubShape);
+ for (int i = anIndices->Lower(); i <= anIndices->Upper(); i++) {
+ if (aMapOfShapes.Extent() < anIndices->Value(i))
+ Standard_NullObject::Raise("GEOM_SubShapeDriver::Execute: Index is out of range");
+ TopoDS_Shape aSubShape = aMapOfShapes.FindKey(anIndices->Value(i));
+ if (aSubShape.IsNull()) continue;
+ B.Add(aCompound,aSubShape);
}
aShape = aCompound;
-
- } else {
-
- if (aMapOfShapes.Extent() < anIndices->Value(1))
+ }
+ else {
+ int i = anIndices->Lower();
+ if (aMapOfShapes.Extent() < anIndices->Value(i))
Standard_NullObject::Raise("GEOM_SubShapeDriver::Execute: Index is out of range");
- aShape = aMapOfShapes.FindKey(anIndices->Value(1));
+ aShape = aMapOfShapes.FindKey(anIndices->Value(i));
}
}
if (aShape.IsNull()) return 0;
aFunction->SetValue(aShape);
-
- log.SetTouched(Label());
+ log->SetTouched(Label());
return 1;
}
+//================================================================================
+/*!
+ * \brief Returns a name of creation operation and names and values of creation parameters
+ */
+//================================================================================
-//=======================================================================
-//function : GEOM_SubShapeDriver_Type_
-//purpose :
-//=======================================================================
-Standard_EXPORT Handle_Standard_Type& GEOM_SubShapeDriver_Type_()
-{
-
- static Handle_Standard_Type aType1 = STANDARD_TYPE(TFunction_Driver);
- if ( aType1.IsNull()) aType1 = STANDARD_TYPE(TFunction_Driver);
- static Handle_Standard_Type aType2 = STANDARD_TYPE(MMgt_TShared);
- if ( aType2.IsNull()) aType2 = STANDARD_TYPE(MMgt_TShared);
- static Handle_Standard_Type aType3 = STANDARD_TYPE(Standard_Transient);
- if ( aType3.IsNull()) aType3 = STANDARD_TYPE(Standard_Transient);
-
-
- static Handle_Standard_Transient _Ancestors[]= {aType1,aType2,aType3,NULL};
- static Handle_Standard_Type _aType = new Standard_Type("GEOM_SubShapeDriver",
- sizeof(GEOM_SubShapeDriver),
- 1,
- (Standard_Address)_Ancestors,
- (Standard_Address)NULL);
-
- return _aType;
-}
-
-//=======================================================================
-//function : DownCast
-//purpose :
-//=======================================================================
-const Handle(GEOM_SubShapeDriver) Handle(GEOM_SubShapeDriver)::DownCast(const Handle(Standard_Transient)& AnObject)
+bool GEOM_SubShapeDriver::
+GetCreationInformation(std::string& theOperationName,
+ std::vector<GEOM_Param>& theParams)
{
- Handle(GEOM_SubShapeDriver) _anOtherObject;
-
- if (!AnObject.IsNull()) {
- if (AnObject->IsKind(STANDARD_TYPE(GEOM_SubShapeDriver))) {
- _anOtherObject = Handle(GEOM_SubShapeDriver)((Handle(GEOM_SubShapeDriver)&)AnObject);
- }
+ if (Label().IsNull()) return 0;
+ Handle(GEOM_Function) function = GEOM_Function::GetFunction(Label());
+ GEOM_ISubShape aCI( function );
+
+ enum { GEOM_SUBSHAPE = 28, GEOM_GROUP = 37 };
+
+ TDF_Label aLabel = function->GetOwnerEntry();
+ if (aLabel.IsRoot()) return false;
+ Handle(GEOM_Object) obj = GEOM_Object::GetObject( aLabel );
+ if ( obj.IsNull() ) return false;
+
+ switch ( obj->GetType() ) {
+ case GEOM_SUBSHAPE:
+ theOperationName = "EXPLODE";
+ AddParam( theParams, "Main Object", aCI.GetMainShape() );
+ AddParam( theParams, "Index", aCI.GetIndices() );
+ break;
+ case GEOM_GROUP:
+ {
+ theOperationName = "GROUP_CREATE";
+ TopAbs_ShapeEnum type = TopAbs_SHAPE;
+ {
+ TDF_Label aFreeLabel = obj->GetFreeLabel();
+ Handle(TDataStd_Integer) anAttrib;
+ if(aFreeLabel.FindAttribute(TDataStd_Integer::GetID(), anAttrib))
+ type = (TopAbs_ShapeEnum) anAttrib->Get();
+ }
+ AddParam( theParams, "Shape Type", type );
+ AddParam( theParams, "Main Shape", aCI.GetMainShape() );
+ AddParam( theParams, "Indices", aCI.GetIndices() );
+ break;
}
-
- return _anOtherObject ;
+ default:
+ return false;
+ }
+
+ return true;
}
+
+IMPLEMENT_STANDARD_RTTIEXT (GEOM_SubShapeDriver,GEOM_BaseDriver)