1 // Copyright (C) 2007-2015 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 #include <Standard_Stream.hxx>
25 #include <GEOMImpl_GlueDriver.hxx>
26 #include <GEOMImpl_IGlue.hxx>
27 #include <GEOMImpl_Types.hxx>
29 #include <GEOM_Object.hxx>
30 #include <GEOM_Function.hxx>
32 #include "GEOMAlgo_Gluer2.hxx"
33 #include "GEOMAlgo_ListIteratorOfListOfCoupleOfShapes.hxx"
34 #include "GEOMAlgo_CoupleOfShapes.hxx"
35 #include "GEOMAlgo_ListOfCoupleOfShapes.hxx"
37 #include <Basics_OCCTVersion.hxx>
39 #include "utilities.h"
41 #include <BRep_Builder.hxx>
42 #include <ShapeFix_Shape.hxx>
43 #include <TDataStd_IntegerArray.hxx>
45 #include <TopTools_DataMapIteratorOfDataMapOfShapeListOfShape.hxx>
46 #include <TopTools_IndexedMapOfShape.hxx>
47 #include <TopTools_ListIteratorOfListOfShape.hxx>
48 #include <TopTools_ListOfShape.hxx>
49 #include <TopoDS_Shape.hxx>
51 #include <Standard_NullObject.hxx>
52 #include <Standard_Failure.hxx>
54 #define MSG_BAD_TOLERANCE "Tolerance is too big"
55 #define MSG_BAD_ARG_SHAPE "Argument shape is not a compound of hexahedral solids"
57 //=======================================================================
58 //function : GEOMImpl_GlueDriver
60 //=======================================================================
61 GEOMImpl_GlueDriver::GEOMImpl_GlueDriver()
65 //=======================================================================
68 //=======================================================================
69 const Standard_GUID& GEOMImpl_GlueDriver::GetID()
71 static Standard_GUID aGlueDriver("FF1BBB63-5D14-4df2-980B-3A668264EA16");
75 //=======================================================================
76 //function : GlueFacesWithWarnings
78 //=======================================================================
80 TopoDS_Shape GEOMImpl_GlueDriver::GlueFacesWithWarnings (const TopoDS_Shape& theShape,
81 const Standard_Real theTolerance,
82 const Standard_Boolean doKeepNonSolids,
83 TCollection_AsciiString& theWarning) const
85 Standard_Integer iErr, iWrn;
87 GEOMAlgo_Gluer aGluer;
89 aGluer.SetShape(theShape);
90 aGluer.SetTolerance(theTolerance);
91 aGluer.SetCheckGeometry(Standard_True);
92 aGluer.SetKeepNonSolids(doKeepNonSolids);
96 iErr = aGluer.ErrorStatus();
100 Standard_Failure::Raise("No vertices found in source shape");
104 Standard_Failure::Raise(MSG_BAD_TOLERANCE " or " MSG_BAD_ARG_SHAPE);
107 Standard_Failure::Raise("Source shape is Null");
110 Standard_Failure::Raise("Result shape is Null");
113 Standard_Failure::Raise(MSG_BAD_TOLERANCE);
117 Standard_Failure::Raise(MSG_BAD_ARG_SHAPE);
120 Standard_Failure::Raise("Error occured during check of geometric coincidence");
124 // description of all errors see in GEOMAlgo_Gluer.cxx
125 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer with code ");
126 aMsg += TCollection_AsciiString(iErr);
127 Standard_Failure::Raise(aMsg.ToCString());
134 iWrn = aGluer.WarningStatus();
139 Standard_Integer nbAlone = aGluer.AloneShapes();
140 theWarning = TCollection_AsciiString(nbAlone);
141 theWarning += " solid(s) can not be glued by faces";
145 // description of all warnings see in GEOMAlgo_Gluer.cxx
146 theWarning = "Warning in GEOMAlgo_Gluer with code ";
147 theWarning += TCollection_AsciiString(iWrn);
152 aRes = aGluer.Result();
154 // SKL 18.01.2010 - patch for 20662
155 Handle(ShapeFix_Shape) aSfs = new ShapeFix_Shape(aRes);
156 aSfs->SetPrecision(Precision::Confusion());
158 aRes = aSfs->Shape();
160 // Fill history to be used by GetInPlace functionality
161 TopTools_IndexedMapOfShape aResIndices;
162 TopExp::MapShapes(aRes, aResIndices);
164 Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
166 // history for all argument shapes
167 TDF_LabelSequence aLabelSeq;
168 aFunction->GetDependency(aLabelSeq);
169 Standard_Integer nbArg = aLabelSeq.Length();
171 for (Standard_Integer iarg = 1; iarg <= nbArg; iarg++) {
173 TDF_Label anArgumentRefLabel = aLabelSeq.Value(iarg);
175 Handle(GEOM_Object) anArgumentObject = GEOM_Object::GetReferencedObject(anArgumentRefLabel);
176 TopoDS_Shape anArgumentShape = anArgumentObject->GetValue();
178 TopTools_IndexedMapOfShape anArgumentIndices;
179 TopExp::MapShapes(anArgumentShape, anArgumentIndices);
180 Standard_Integer nbArgumentEntities = anArgumentIndices.Extent();
182 // Find corresponding label in history
183 TDF_Label anArgumentHistoryLabel =
184 aFunction->GetArgumentHistoryEntry(anArgumentRefLabel, Standard_True);
186 for (Standard_Integer ie = 1; ie <= nbArgumentEntities; ie++) {
187 TopoDS_Shape anEntity = anArgumentIndices.FindKey(ie);
188 const TopTools_ListOfShape& aModified = aGluer.Modified(anEntity);
189 Standard_Integer nbModified = aModified.Extent();
191 if (nbModified > 0) {
192 TDF_Label aWhatHistoryLabel = anArgumentHistoryLabel.FindChild(ie, Standard_True);
193 Handle(TDataStd_IntegerArray) anAttr =
194 TDataStd_IntegerArray::Set(aWhatHistoryLabel, 1, nbModified);
196 TopTools_ListIteratorOfListOfShape itM (aModified);
197 for (int im = 1; itM.More(); itM.Next(), ++im) {
198 int id = aResIndices.FindIndex(itM.Value());
199 anAttr->SetValue(im, id);
208 //=======================================================================
209 //function : GlueFaces
211 //=======================================================================
212 TopoDS_Shape GEOMImpl_GlueDriver::GlueFaces (const TopoDS_Shape& theShape,
213 const Standard_Real theTolerance,
214 const Standard_Boolean doKeepNonSolids)
217 GEOMAlgo_Gluer aGluer;
219 aGluer.SetShape(theShape);
220 aGluer.SetTolerance(theTolerance);
221 aGluer.SetCheckGeometry(Standard_True);
222 aGluer.SetKeepNonSolids(doKeepNonSolids);
226 Standard_Integer iErr = aGluer.ErrorStatus();
230 Standard_Failure::Raise("No vertices found in source shape");
233 Standard_Failure::Raise("Source shape is Null");
236 Standard_Failure::Raise("Result shape is Null");
239 Standard_Failure::Raise("Error occured during check of geometric coincidence");
243 // description of all errors see in GEOMAlgo_Gluer.cxx
244 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer with code ");
245 aMsg += TCollection_AsciiString(iErr);
246 Standard_Failure::Raise(aMsg.ToCString());
253 Standard_Integer iWrn = aGluer.WarningStatus();
257 MESSAGE("Some shapes can not be glued by faces");
260 // description of all warnings see in GEOMAlgo_Gluer.cxx
261 MESSAGE("Warning in GEOMAlgo_Gluer with code " << iWrn);
266 aRes = aGluer.Result();
271 //=======================================================================
272 //function : GlueFacesByList
274 //=======================================================================
275 TopoDS_Shape GEOMImpl_GlueDriver::GlueFacesByList (const TopoDS_Shape& theShape,
276 const Standard_Real theTolerance,
277 const Standard_Boolean doKeepNonSolids,
278 const TopTools_MapOfShape& aFaces)
282 GEOMAlgo_Gluer1 aGluer;
283 GEOMAlgo_ListIteratorOfListOfCoupleOfShapes aItCS;
284 GEOMAlgo_CoupleOfShapes aCS;
285 GEOMAlgo_ListOfCoupleOfShapes aLCS;
287 aGluer.SetShape(theShape);
288 aGluer.SetTolerance(theTolerance);
289 aGluer.SetKeepNonSolids(doKeepNonSolids);
291 Standard_Integer iErr = aGluer.ErrorStatus();
292 if (iErr) return aRes;
294 TopTools_ListOfShape listShape;
295 const GEOMAlgo_ListOfCoupleOfShapes& aLCSG = aGluer.GluedFaces();
297 aItCS.Initialize(aLCSG);
298 for (; aItCS.More(); aItCS.Next()) {
299 const GEOMAlgo_CoupleOfShapes& aCSG = aItCS.Value();
300 const TopoDS_Shape& aF1 = aCSG.Shape1();
301 const TopoDS_Shape& aF2 = aCSG.Shape2();
302 if (aFaces.Contains(aF1) || aFaces.Contains(aF2))
304 aCS.SetShapes(aF1,aF2);
308 //cout<<"aLCS.Extent() = "<<aLCS.Extent()<<endl;
309 if (aLCS.Extent()>0) {
310 aGluer.SetFacesToUnglue(aLCS);
311 aGluer.UnglueFaces();
312 iErr = aGluer.ErrorStatus();
313 if (iErr) return aRes;
316 aRes = aGluer.Result();
322 //=======================================================================
323 //function : GlueFaces
325 //=======================================================================
326 TopoDS_Shape GEOMImpl_GlueDriver::GlueFaces (const TopoDS_Shape& theShape,
327 const Standard_Real theTolerance,
328 const Standard_Boolean doKeepNonSolids)
335 aGA.SetArgument(theShape);
336 aGA.SetTolerance(theTolerance);
337 aGA.SetKeepNonSolids(doKeepNonSolids);
339 // 2. Detect interferred shapes
342 //Standard_Integer iWrnDetect = aGA.WarningStatus();
343 //if (iWrnDetect == 2) {
344 // Standard_Failure::Raise("GLUE_ERROR_STICKED_SHAPES");
347 Standard_Integer iErr = aGA.ErrorStatus();
351 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
355 Standard_Failure::Raise("PerformImagesToWork failed");
359 // description of all errors see in GEOMAlgo_Gluer2.cxx
360 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
361 aMsg += TCollection_AsciiString(iErr);
362 Standard_Failure::Raise(aMsg.ToCString());
369 // 3. Set shapes to glue. If the operator is absent, the whole gluing will be done
370 //aGA.SetShapesToGlue(aMSG);
374 iErr = aGA.ErrorStatus();
378 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
382 Standard_Failure::Raise("PerformImagesToWork failed");
386 // description of all errors see in GEOMAlgo_Gluer2.cxx
387 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
388 aMsg += TCollection_AsciiString(iErr);
389 Standard_Failure::Raise(aMsg.ToCString());
396 Standard_Integer iWrn = aGA.WarningStatus();
400 MESSAGE("No shapes to glue");
403 // description of all warnings see in GEOMAlgo_Gluer2.cxx
404 MESSAGE("Warning in GEOMAlgo_Gluer2 with code " << iWrn);
415 //=======================================================================
416 //function : GlueWithWarnings
418 //=======================================================================
419 TopoDS_Shape GEOMImpl_GlueDriver::GlueWithWarnings (const TopoDS_Shape& theShape,
420 const Standard_Real theTolerance,
421 const TopAbs_ShapeEnum theShapeType,
422 const Standard_Boolean doKeepNonSolids,
423 TCollection_AsciiString& theWarning) const
430 aGA.SetArgument(theShape);
431 aGA.SetTolerance(theTolerance);
432 aGA.SetKeepNonSolids(doKeepNonSolids);
434 // 2. Detect interferred shapes
437 //modified by NIZNHY-PKV Tue Mar 13 14:07:12 2012f
438 Standard_Integer iWrnDetect = aGA.WarningStatus();
439 if (iWrnDetect == 2) {
440 Standard_Failure::Raise("GLUE_ERROR_STICKED_SHAPES");
442 //modified by NIZNHY-PKV Tue Mar 13 14:07:14 2012t
444 Standard_Integer iErr = aGA.ErrorStatus();
448 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
452 Standard_Failure::Raise("PerformImagesToWork failed");
456 // description of all errors see in GEOMAlgo_Gluer2.cxx
457 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
458 aMsg += TCollection_AsciiString(iErr);
459 Standard_Failure::Raise(aMsg.ToCString());
466 if (theShapeType != TopAbs_FACE) {
467 // 3. Fill shapes to glue aMSG
468 TopTools_DataMapOfShapeListOfShape aMSG;
469 const TopTools_DataMapOfShapeListOfShape& aMSD = aGA.ShapesDetected();
470 TopTools_DataMapIteratorOfDataMapOfShapeListOfShape aItMSD;
471 aItMSD.Initialize(aMSD);
472 for (; aItMSD.More(); aItMSD.Next()) {
473 const TopoDS_Shape& aSx = aItMSD.Key();
474 const TopTools_ListOfShape& aLSD = aItMSD.Value();
475 if (aSx.ShapeType() == theShapeType) {
476 aMSG.Bind(aSx, aLSD);
480 // 4. Set shapes to glue. If the operator is absent, the whole gluing will be done
481 aGA.SetShapesToGlue(aMSG);
486 iErr = aGA.ErrorStatus();
490 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
494 Standard_Failure::Raise("PerformImagesToWork failed");
498 // description of all errors see in GEOMAlgo_Gluer2.cxx
499 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
500 aMsg += TCollection_AsciiString(iErr);
501 Standard_Failure::Raise(aMsg.ToCString());
508 Standard_Integer iWrn = aGA.WarningStatus();
512 theWarning = "No shapes to glue";
515 // description of all warnings see in GEOMAlgo_Gluer2.cxx
516 theWarning = "Warning in GEOMAlgo_Gluer2 with code ";
517 theWarning += TCollection_AsciiString(iWrn);
525 // 7. Fill history to be used by GetInPlace functionality
526 TopTools_IndexedMapOfShape aResIndices;
527 TopExp::MapShapes(aRes, aResIndices);
529 Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
531 // history for all argument shapes
532 TDF_LabelSequence aLabelSeq;
533 aFunction->GetDependency(aLabelSeq);
534 Standard_Integer nbArg = aLabelSeq.Length();
536 for (Standard_Integer iarg = 1; iarg <= nbArg; iarg++) {
538 TDF_Label anArgumentRefLabel = aLabelSeq.Value(iarg);
540 Handle(GEOM_Object) anArgumentObject = GEOM_Object::GetReferencedObject(anArgumentRefLabel);
541 TopoDS_Shape anArgumentShape = anArgumentObject->GetValue();
543 TopTools_IndexedMapOfShape anArgumentIndices;
544 TopExp::MapShapes(anArgumentShape, anArgumentIndices);
545 Standard_Integer nbArgumentEntities = anArgumentIndices.Extent();
547 // Find corresponding label in history
548 TDF_Label anArgumentHistoryLabel =
549 aFunction->GetArgumentHistoryEntry(anArgumentRefLabel, Standard_True);
551 for (Standard_Integer ie = 1; ie <= nbArgumentEntities; ie++) {
552 TopoDS_Shape anEntity = anArgumentIndices.FindKey(ie);
553 const TopTools_ListOfShape& aModified = aGA.Modified(anEntity);
554 Standard_Integer nbModified = aModified.Extent();
556 if (nbModified > 0) {
557 TDF_Label aWhatHistoryLabel = anArgumentHistoryLabel.FindChild(ie, Standard_True);
558 Handle(TDataStd_IntegerArray) anAttr =
559 TDataStd_IntegerArray::Set(aWhatHistoryLabel, 1, nbModified);
561 TopTools_ListIteratorOfListOfShape itM (aModified);
562 for (int im = 1; itM.More(); itM.Next(), ++im) {
563 int id = aResIndices.FindIndex(itM.Value());
564 anAttr->SetValue(im, id);
573 //=======================================================================
574 //function : GlueByList
576 //=======================================================================
577 TopoDS_Shape GEOMImpl_GlueDriver::GlueByList (const TopoDS_Shape& theShape,
578 const Standard_Real theTolerance,
579 const Standard_Boolean doKeepNonSolids,
580 const TopTools_MapOfShape& theShapesList,
581 const Standard_Boolean doGlueAllEdges)
588 aGA.SetArgument(theShape);
589 aGA.SetTolerance(theTolerance);
590 aGA.SetKeepNonSolids(doKeepNonSolids);
592 // 2. Detect interferred shapes
595 //modified by NIZNHY-PKV Tue Mar 13 14:07:12 2012f
596 Standard_Integer iWrnDetect = aGA.WarningStatus();
597 if (iWrnDetect == 2) {
599 TopTools_ListIteratorOfListOfShape aItLS;
601 // Sticked shapes are detected
602 const TopTools_IndexedDataMapOfShapeListOfShape& aIDMSS = pGluer2->StickedShapes();
604 Standard_Integer i, aNb = aIDMSS.Extent();
605 for (i = 1; i <= aNb; ++i) {
606 // ancestor aSa (edge, wire face,..)
607 const TopoDS_Shape& aSa = aIDMSS.FindKey(i);
609 // successors aSs (vertex, edge, ...)
610 // of the ancestor that are sticked
611 // for given value of the tolerance
612 const TopTools_ListOfShape& aLSS = aIDMSS.FindFromIndex(i);
613 aItLS.Initialize(aLSS);
614 for (; aItLS.More(); aItLS.Next()) {
615 const TopoDS_Shape& aSs = aItLS.Value();
619 Standard_Failure::Raise("GLUE_ERROR_STICKED_SHAPES");
621 //modified by NIZNHY-PKV Tue Mar 13 14:07:14 2012t
623 Standard_Integer iErr = aGA.ErrorStatus();
627 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
631 Standard_Failure::Raise("PerformImagesToWork failed");
635 // description of all errors see in GEOMAlgo_Gluer2.cxx
636 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
637 aMsg += TCollection_AsciiString(iErr);
638 Standard_Failure::Raise(aMsg.ToCString());
645 // 3. Fill shapes to glue aMSG
646 TopTools_DataMapOfShapeListOfShape aMSG;
647 const TopTools_DataMapOfShapeListOfShape& aMSD = aGA.ShapesDetected();
648 TopTools_DataMapIteratorOfDataMapOfShapeListOfShape aItMSD;
649 aItMSD.Initialize(aMSD);
650 for (; aItMSD.More(); aItMSD.Next()) {
651 const TopoDS_Shape& aSx = aItMSD.Key();
652 const TopTools_ListOfShape& aLSD = aItMSD.Value();
653 TopTools_ListIteratorOfListOfShape anItLSD (aLSD);
654 bool isToGlue = false;
655 if (doGlueAllEdges && aSx.ShapeType() == TopAbs_EDGE) {
659 for (; anItLSD.More() && !isToGlue; anItLSD.Next()) {
660 if (theShapesList.Contains(anItLSD.Value())) {
666 aMSG.Bind(aSx, aLSD);
670 // 4. Set shapes to glue. If the operator is absent, the whole gluing will be done
671 aGA.SetShapesToGlue(aMSG);
675 iErr = aGA.ErrorStatus();
679 Standard_Failure::Raise("GEOMAlgo_GlueDetector failed");
683 Standard_Failure::Raise("PerformImagesToWork failed");
687 // description of all errors see in GEOMAlgo_Gluer2.cxx
688 TCollection_AsciiString aMsg ("Error in GEOMAlgo_Gluer2 with code ");
689 aMsg += TCollection_AsciiString(iErr);
690 Standard_Failure::Raise(aMsg.ToCString());
697 Standard_Integer iWrn = aGA.WarningStatus();
701 MESSAGE("No shapes to glue");
704 // description of all warnings see in GEOMAlgo_Gluer2.cxx
705 MESSAGE("Warning in GEOMAlgo_Gluer2 with code " << iWrn);
716 //=======================================================================
719 //=======================================================================
720 Standard_Integer GEOMImpl_GlueDriver::Execute(TFunction_Logbook& log) const
722 if (Label().IsNull()) return 0;
723 Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
725 GEOMImpl_IGlue aCI (aFunction);
726 Standard_Integer aType = aFunction->GetType();
729 TCollection_AsciiString aWrn;
731 TopoDS_Shape aShapeBase;
732 Handle(TColStd_HSequenceOfTransient) aRefBases = aCI.GetBase();
733 if ( aRefBases && !aRefBases->IsEmpty() )
735 if ( aRefBases->Length() == 1 )
737 Handle(GEOM_Function) aRefShape = Handle(GEOM_Function)::DownCast(aRefBases->Value(1));
738 if ( !aRefShape.IsNull() )
739 aShapeBase = aRefShape->GetValue();
743 TopoDS_Compound compound;
744 BRep_Builder builder;
745 builder.MakeCompound( compound );
747 for ( ; ind <= aRefBases->Length(); ind++)
749 Handle(GEOM_Function) aRefShape = Handle(GEOM_Function)::DownCast(aRefBases->Value(ind));
750 if ( aRefShape.IsNull() ) break;
751 TopoDS_Shape aShape = aRefShape->GetValue();
752 if (aShape.IsNull()) break;
753 builder.Add( compound, aShape );
755 if ( ind > aRefBases->Length() )
756 aShapeBase = compound;
758 aShapeBase.Nullify();
761 if (aShapeBase.IsNull()) {
762 Standard_NullObject::Raise("Shape for gluing is null");
765 Standard_Real tol3d = aCI.GetTolerance();
767 Standard_Boolean aKeepNonSolids = aCI.GetKeepNonSolids();
769 if (aType == GLUE_FACES) {
770 //aShape = GlueFacesWithWarnings(aShapeBase, tol3d, aKeepNonSolids, aWrn);
771 aShape = GlueWithWarnings(aShapeBase, tol3d, TopAbs_FACE, aKeepNonSolids, aWrn);
773 else if (aType == GLUE_EDGES) {
774 aShape = GlueWithWarnings(aShapeBase, tol3d, TopAbs_EDGE, aKeepNonSolids, aWrn);
776 else if (aType == GLUE_FACES_BY_LIST || aType == GLUE_EDGES_BY_LIST) {
777 Handle(TColStd_HSequenceOfTransient) SF = aCI.GetFaces();
778 TopTools_MapOfShape aFaces;
780 for (; i <= SF->Length(); i++) {
781 Handle(Standard_Transient) anItem = SF->Value(i);
784 Handle(GEOM_Function) aRefSh = Handle(GEOM_Function)::DownCast(anItem);
787 TopoDS_Shape aFace = aRefSh->GetValue();
793 Standard_Boolean aGlueAllEdges = Standard_False;
794 if (aType == GLUE_FACES_BY_LIST)
795 aGlueAllEdges = aCI.GetGlueAllEdges();
797 //aShape = GlueFacesByList(aShapeBase, tol3d, aKeepNonSolids, aFaces);
798 aShape = GlueByList(aShapeBase, tol3d, aKeepNonSolids, aFaces, aGlueAllEdges);
801 if (aShape.IsNull()) return 0;
803 aFunction->SetValue(aShape);
805 log.SetTouched(Label());
807 if (!aWrn.IsEmpty()) {
808 Standard_Failure::Raise(aWrn.ToCString());
814 //================================================================================
816 * \brief Returns a name of creation operation and names and values of creation parameters
818 //================================================================================
820 bool GEOMImpl_GlueDriver::
821 GetCreationInformation(std::string& theOperationName,
822 std::vector<GEOM_Param>& theParams)
824 if (Label().IsNull()) return 0;
825 Handle(GEOM_Function) function = GEOM_Function::GetFunction(Label());
827 GEOMImpl_IGlue aCI( function );
828 Standard_Integer aType = function->GetType();
832 theOperationName = "GLUE_FACES";
833 AddParam( theParams, "Selected shapes", aCI.GetBase() );
834 AddParam( theParams, "Tolerance", aCI.GetTolerance() );
835 AddParam( theParams, "To keep non solids", aCI.GetKeepNonSolids() );
838 theOperationName = "GLUE_EDGES";
839 AddParam( theParams, "Selected shapes", aCI.GetBase() );
840 AddParam( theParams, "Tolerance", aCI.GetTolerance() );
842 case GLUE_FACES_BY_LIST:
843 theOperationName = "GLUE_FACES";
844 AddParam( theParams, "Selected shapes", aCI.GetBase() );
845 AddParam( theParams, "Tolerance", aCI.GetTolerance() );
846 AddParam( theParams, "Faces", aCI.GetFaces() );
847 AddParam( theParams, "To keep non solids", aCI.GetKeepNonSolids() );
848 AddParam( theParams, "To glue all edges", aCI.GetGlueAllEdges() );
850 case GLUE_EDGES_BY_LIST:
851 theOperationName = "GLUE_EDGES";
852 AddParam( theParams, "Selected shapes", aCI.GetBase() );
853 AddParam( theParams, "Tolerance", aCI.GetTolerance() );
854 AddParam( theParams, "Edges", aCI.GetFaces() );
863 IMPLEMENT_STANDARD_HANDLE (GEOMImpl_GlueDriver,GEOM_BaseDriver);
864 IMPLEMENT_STANDARD_RTTIEXT (GEOMImpl_GlueDriver,GEOM_BaseDriver);