src/GEOMImpl/GEOMImpl_BooleanDriver.cxx

   1 // Copyright (C) 2007-2016  CEA/DEN, EDF R&D, OPEN CASCADE
   2 //
   3 // Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   5 //
   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.
  10 //
  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.
  15 //
  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
  19 //
  20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  21 //
  22
  23 #include <GEOMImpl_BooleanDriver.hxx>
  24 #include <GEOMImpl_IBoolean.hxx>
  25 #include <GEOMImpl_Types.hxx>
  26 #include <GEOMImpl_GlueDriver.hxx>
  27 #include <GEOM_Function.hxx>
  28 #include <GEOMUtils.hxx>
  29 #include <BlockFix_BlockFixAPI.hxx>
  30 #include <ShHealOper_ShapeProcess.hxx>
  31
  32 #include <TNaming_CopyShape.hxx>
  33
  34 #include <BRep_Builder.hxx>
  35 #include <BRepAlgoAPI_Common.hxx>
  36 #include <BRepAlgoAPI_Cut.hxx>
  37 #include <BRepAlgoAPI_Fuse.hxx>
  38 #include <BRepAlgoAPI_Section.hxx>
  39 #include <BOPAlgo_CheckerSI.hxx>
  40 #include <BOPDS_DS.hxx>
  41 #include <BOPTools_AlgoTools.hxx>
  42
  43 #include <TopExp_Explorer.hxx>
  44 #include <TopoDS_Compound.hxx>
  45 #include <TopoDS_Iterator.hxx>
  46 #include <TopTools_MapOfShape.hxx>
  47 #include <TopTools_ListOfShape.hxx>
  48 #include <TopTools_ListIteratorOfListOfShape.hxx>
  49
  50 #include <TColStd_IndexedDataMapOfTransientTransient.hxx>
  51
  52 #include <Precision.hxx>
  53
  54 #include <Standard_ConstructionError.hxx>
  55 #include <StdFail_NotDone.hxx>
  56
  57 // Depth of self-intersection check (see BOPAlgo_CheckerSI::SetLevelOfCheck() for more details)
  58 // Default value for BOPAlgo_CheckerSI gives very long computation when checking face-to-face intersections;
  59 // here check level is decreased to more appropriate value to avoid problems with performance).
  60 #define BOP_SELF_INTERSECTIONS_LEVEL 4
  61
  62 /**
  63  * This function performs extra edges removal.
  64  *
  65  * \param theShape the shape to be processed.
  66  * \return the modified shape or null shape in case of failure.
  67  */
  68 static TopoDS_Shape RemoveExtraEdges(const TopoDS_Shape &theShape)
  69 {
  70   TopoDS_Shape aResult;
  71
  72   if (!theShape.IsNull()) {
  73     BlockFix_BlockFixAPI aTool;
  74
  75     aTool.OptimumNbFaces() = 0;
  76     aTool.SetShape(theShape);
  77     aTool.Perform();
  78     TopoDS_Shape aShape = aTool.Shape();
  79
  80     if (GEOMUtils::CheckShape(aShape)) {
  81       aResult = aShape;
  82     }
  83     else {
  84       TopoDS_Shape aFixed;
  85       ShHealOper_ShapeProcess aHealer;
  86       aHealer.Perform(aShape, aFixed);
  87       if (aHealer.isDone() && GEOMUtils::CheckShape(aFixed))
  88         aResult = aFixed;
  89     }
  90   }
  91
  92   return aResult;
  93 }
  94
  95 //=======================================================================
  96 //function : GetID
  97 //purpose  :
  98 //=======================================================================
  99 const Standard_GUID& GEOMImpl_BooleanDriver::GetID()
 100 {
 101   static Standard_GUID aBooleanDriver("FF1BBB21-5D14-4df2-980B-3A668264EA16");
 102   return aBooleanDriver;
 103 }
 104
 105 //=======================================================================
 106 //function : GEOMImpl_BooleanDriver
 107 //purpose  :
 108 //=======================================================================
 109 GEOMImpl_BooleanDriver::GEOMImpl_BooleanDriver()
 110 {
 111 }
 112
 113 //=======================================================================
 114 //function : Execute
 115 //purpose  :
 116 //=======================================================================
 117 Standard_Integer GEOMImpl_BooleanDriver::Execute(LOGBOOK& log) const
 118 {
 119   if (Label().IsNull()) return 0;
 120   Handle(GEOM_Function) aFunction = GEOM_Function::GetFunction(Label());
 121
 122   GEOMImpl_IBoolean aCI (aFunction);
 123   Standard_Integer aType = aFunction->GetType();
 124   const Standard_Boolean isCheckSelfInte = aCI.GetCheckSelfIntersection();
 125   const Standard_Boolean isRmExtraEdges  = aCI.GetRmExtraEdges();
 126
 127   TopoDS_Shape aShape;
 128
 129   switch (aType) {
 130   case BOOLEAN_COMMON:
 131   case BOOLEAN_CUT:
 132   case BOOLEAN_FUSE:
 133   case BOOLEAN_SECTION:
 134     {
 135       Handle(GEOM_Function) aRefShape1 = aCI.GetShape1();
 136       Handle(GEOM_Function) aRefShape2 = aCI.GetShape2();
 137       TopoDS_Shape aShape1 = aRefShape1->GetValue();
 138       TopoDS_Shape aShape2 = aRefShape2->GetValue();
 139
 140       if (!aShape1.IsNull() && !aShape2.IsNull()) {
 141         // check arguments for Mantis issue 0021019
 142         if (!GEOMUtils::CheckShape(aShape1, true) || !GEOMUtils::CheckShape(aShape2, true))
 143           StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is not valid");
 144
 145         if (isCheckSelfInte) {
 146           BOPAlgo_CheckerSI aCSI;  // checker of self-interferences
 147           aCSI.SetLevelOfCheck(BOP_SELF_INTERSECTIONS_LEVEL);
 148           BOPCol_ListOfShape aList1, aList2;
 149           aList1.Append(aShape1);
 150           aList2.Append(aShape2);
 151           aCSI.SetArguments(aList1);
 152           aCSI.Perform();
 153           if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0)
 154             StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 155           aCSI.SetArguments(aList2);
 156           aCSI.Perform();
 157           if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0)
 158             StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 159         }
 160
 161         // Make a copy to prevent the original shape changes.
 162         TopoDS_Shape aShapeCopy1;
 163         TopoDS_Shape aShapeCopy2;
 164         TColStd_IndexedDataMapOfTransientTransient aMapTShapes;
 165         TNaming_CopyShape::CopyTool(aShape1, aMapTShapes, aShapeCopy1);
 166         TNaming_CopyShape::CopyTool(aShape2, aMapTShapes, aShapeCopy2);
 167
 168         aShape = performOperation (aShapeCopy1, aShapeCopy2, aType);
 169
 170         if (isRmExtraEdges) {
 171           aShape = RemoveExtraEdges(aShape);
 172         }
 173
 174         if (aShape.IsNull()) {
 175           return 0;
 176         }
 177       }
 178     }
 179     break;
 180   case BOOLEAN_COMMON_LIST:
 181   case BOOLEAN_FUSE_LIST:
 182     {
 183       Handle(TColStd_HSequenceOfTransient) aShapes = aCI.GetShapes();
 184       const Standard_Integer nbShapes = aShapes->Length();
 185       Standard_Integer i;
 186       Handle(GEOM_Function) aRefShape;
 187       TopoDS_Shape aShape2;
 188       Standard_Integer aSimpleType =
 189         (aType == BOOLEAN_FUSE_LIST ? BOOLEAN_FUSE : BOOLEAN_COMMON);
 190
 191       if (nbShapes > 0) {
 192         aRefShape = Handle(GEOM_Function)::DownCast(aShapes->Value(1));
 193         aShape = aRefShape->GetValue();
 194
 195         if (!aShape.IsNull()) {
 196           // check arguments for Mantis issue 0021019
 197           if (!GEOMUtils::CheckShape(aShape, true))
 198             StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is not valid");
 199
 200           BOPAlgo_CheckerSI aCSI;  // checker of self-interferences
 201
 202           if (isCheckSelfInte) {
 203             aCSI.SetLevelOfCheck(BOP_SELF_INTERSECTIONS_LEVEL);
 204             BOPCol_ListOfShape aList1;
 205             aList1.Append(aShape);
 206             aCSI.SetArguments(aList1);
 207             aCSI.Perform();
 208             if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0) {
 209               StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 210             }
 211           }
 212
 213           // Copy shape
 214           TopoDS_Shape aShapeCopy;
 215           TColStd_IndexedDataMapOfTransientTransient aMapTShapes;
 216
 217           TNaming_CopyShape::CopyTool(aShape, aMapTShapes, aShapeCopy);
 218           aShape = aShapeCopy;
 219
 220           for (i = 2; i <= nbShapes; i++) {
 221             aRefShape = Handle(GEOM_Function)::DownCast(aShapes->Value(i));
 222             aShape2 = aRefShape->GetValue();
 223
 224             if (!GEOMUtils::CheckShape(aShape2, true))
 225               StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is not valid");
 226
 227             if (isCheckSelfInte) {
 228               BOPCol_ListOfShape aList2;
 229               aList2.Append(aShape2);
 230               aCSI.SetArguments(aList2);
 231               aCSI.Perform();
 232               if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0) {
 233                 StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 234               }
 235             }
 236
 237             // Copy shape
 238             aShapeCopy.Nullify();
 239             TNaming_CopyShape::CopyTool(aShape2, aMapTShapes, aShapeCopy);
 240             aShape = performOperation (aShape, aShapeCopy, aSimpleType);
 241
 242             if (isRmExtraEdges) {
 243               aShape = RemoveExtraEdges(aShape);
 244             }
 245
 246             if (aShape.IsNull()) {
 247               return 0;
 248             }
 249           }
 250         }
 251       }
 252     }
 253     break;
 254   case BOOLEAN_CUT_LIST:
 255     {
 256       Handle(GEOM_Function) aRefObject = aCI.GetShape1();
 257
 258       aShape = aRefObject->GetValue();
 259
 260       if (!aShape.IsNull()) {
 261         // check arguments for Mantis issue 0021019
 262         if (!GEOMUtils::CheckShape(aShape, true))
 263           StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is not valid");
 264
 265         BOPAlgo_CheckerSI aCSI;  // checker of self-interferences
 266
 267         if (isCheckSelfInte) {
 268           aCSI.SetLevelOfCheck(BOP_SELF_INTERSECTIONS_LEVEL);
 269           BOPCol_ListOfShape aList1;
 270           aList1.Append(aShape);
 271           aCSI.SetArguments(aList1);
 272           aCSI.Perform();
 273           if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0) {
 274             StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 275           }
 276         }
 277
 278         // Copy shape
 279         TopoDS_Shape aShapeCopy;
 280         TColStd_IndexedDataMapOfTransientTransient aMapTShapes;
 281
 282         TNaming_CopyShape::CopyTool(aShape, aMapTShapes, aShapeCopy);
 283         aShape = aShapeCopy;
 284
 285         Handle(TColStd_HSequenceOfTransient) aTools = aCI.GetShapes();
 286         const Standard_Integer nbShapes = aTools->Length();
 287         Standard_Integer i;
 288         Handle(GEOM_Function) aRefTool;
 289         TopoDS_Shape aTool;
 290
 291         for (i = 1; i <= nbShapes; i++) {
 292           aRefTool = Handle(GEOM_Function)::DownCast(aTools->Value(i));
 293           aTool = aRefTool->GetValue();
 294
 295           if (!GEOMUtils::CheckShape(aTool, true))
 296             StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is not valid");
 297
 298           if (isCheckSelfInte) {
 299             BOPCol_ListOfShape aList2;
 300             aList2.Append(aTool);
 301             aCSI.SetArguments(aList2);
 302             aCSI.Perform();
 303             if (aCSI.ErrorStatus() || aCSI.DS().Interferences().Extent() > 0) {
 304               StdFail_NotDone::Raise("Boolean operation will not be performed, because argument shape is self-intersected");
 305             }
 306           }
 307
 308           // Copy shape
 309           aShapeCopy.Nullify();
 310           TNaming_CopyShape::CopyTool(aTool, aMapTShapes, aShapeCopy);
 311           aShape = performOperation (aShape, aShapeCopy, BOOLEAN_CUT);
 312
 313           if (aShape.IsNull()) {
 314             return 0;
 315           }
 316         }
 317       }
 318     }
 319     break;
 320   default:
 321     break;
 322   }
 323
 324   aFunction->SetValue(aShape);
 325
 326 #if OCC_VERSION_MAJOR < 7
 327   log.SetTouched(Label());
 328 #else
 329   log->SetTouched(Label());
 330 #endif
 331
 332   return 1;
 333 }
 334
 335 //=======================================================================
 336 //function : makeCompoundShellFromFaces
 337 //purpose  :
 338 //=======================================================================
 339 TopoDS_Shape GEOMImpl_BooleanDriver::makeCompoundShellFromFaces
 340                                (const TopoDS_Shape theShape)const
 341 {
 342   if (theShape.ShapeType() != TopAbs_COMPOUND)
 343     return theShape;
 344
 345   BOPCol_ListOfShape aListShapes;
 346   BOPTools_AlgoTools::MakeConnexityBlocks(theShape, TopAbs_EDGE, TopAbs_FACE, aListShapes);
 347
 348   if (aListShapes.IsEmpty())
 349     return theShape;
 350
 351   TopoDS_Compound aResult;
 352   BRep_Builder B;
 353   B.MakeCompound(aResult);
 354   TopExp_Explorer aExp;
 355   BOPCol_ListIteratorOfListOfShape anIter(aListShapes);
 356
 357   for (; anIter.More(); anIter.Next()) {
 358     TopoDS_Shell aShell;
 359     B.MakeShell(aShell);
 360     TopoDS_Shape aShapeFromFaces = anIter.Value();
 361     aExp.Init(aShapeFromFaces, TopAbs_FACE);
 362     for (; aExp.More(); aExp.Next()) {
 363       const TopoDS_Shape& aFace = aExp.Current();
 364       B.Add(aShell, aFace);
 365     }
 366     if (!aShell.IsNull()) {
 367       BOPTools_AlgoTools::OrientFacesOnShell(aShell);
 368       B.Add(aResult, aShell);
 369     }
 370     else
 371       B.Add(aResult, aShapeFromFaces);
 372   }
 373
 374   return aResult;
 375 }
 376
 377 //=======================================================================
 378 //function : performOperation
 379 //purpose  :
 380 //=======================================================================
 381 TopoDS_Shape GEOMImpl_BooleanDriver::performOperation
 382                                (const TopoDS_Shape theShape1,
 383                                 const TopoDS_Shape theShape2,
 384                                 const Standard_Integer theType)const
 385 {
 386   TopoDS_Shape aShape;
 387
 388   // perform COMMON operation
 389   if (theType == BOOLEAN_COMMON) {
 390     BRep_Builder B;
 391     TopoDS_Compound C;
 392     B.MakeCompound(C);
 393
 394     TopTools_ListOfShape listShape1, listShape2;
 395     GEOMUtils::AddSimpleShapes(theShape1, listShape1);
 396     GEOMUtils::AddSimpleShapes(theShape2, listShape2);
 397
 398     Standard_Boolean isCompound =
 399       (listShape1.Extent() > 1 || listShape2.Extent() > 1);
 400
 401     TopTools_ListIteratorOfListOfShape itSub1 (listShape1);
 402     for (; itSub1.More(); itSub1.Next()) {
 403       TopoDS_Shape aValue1 = itSub1.Value();
 404       TopTools_ListIteratorOfListOfShape itSub2 (listShape2);
 405       for (; itSub2.More(); itSub2.Next()) {
 406         TopoDS_Shape aValue2 = itSub2.Value();
 407         BRepAlgoAPI_Common BO (aValue1, aValue2);
 408         if (!BO.IsDone()) {
 409           StdFail_NotDone::Raise("Common operation can not be performed on the given shapes");
 410         }
 411         if (isCompound) {
 412           TopoDS_Shape aStepResult = BO.Shape();
 413
 414           // check result of this step: if it is a compound (boolean operations
 415           // allways return a compound), we add all sub-shapes of it.
 416           // This allows to avoid adding empty compounds,
 417           // resulting from COMMON on two non-intersecting shapes.
 418           if (aStepResult.ShapeType() == TopAbs_COMPOUND) {
 419 #if OCC_VERSION_MAJOR >= 7
 420             if ((aValue1.ShapeType() == TopAbs_FACE || aValue1.ShapeType() == TopAbs_SHELL) &&
 421                 (aValue2.ShapeType() == TopAbs_FACE || aValue2.ShapeType() == TopAbs_SHELL)) {
 422               aStepResult = makeCompoundShellFromFaces(aStepResult);
 423             }
 424 #endif
 425             TopoDS_Iterator aCompIter (aStepResult);
 426             for (; aCompIter.More(); aCompIter.Next()) {
 427               // add shape in a result
 428               B.Add(C, aCompIter.Value());
 429             }
 430           }
 431           else {
 432             // add shape in a result
 433             B.Add(C, aStepResult);
 434           }
 435         }
 436         else
 437           aShape = BO.Shape();
 438       }
 439     }
 440
 441     if (isCompound) {
 442       // As GlueFaces has been improved to keep all kind of shapes
 443       TopExp_Explorer anExp (C, TopAbs_VERTEX);
 444       if (anExp.More())
 445         aShape = GEOMImpl_GlueDriver::GlueFaces(C, Precision::Confusion(), Standard_True);
 446       else
 447         aShape = C;
 448     }
 449   }
 450
 451   // perform CUT operation
 452   else if (theType == BOOLEAN_CUT) {
 453     BRep_Builder B;
 454     TopoDS_Compound C;
 455     B.MakeCompound(C);
 456
 457     TopTools_ListOfShape listShapes, listTools;
 458     GEOMUtils::AddSimpleShapes(theShape1, listShapes);
 459     GEOMUtils::AddSimpleShapes(theShape2, listTools);
 460
 461     Standard_Boolean isCompound = (listShapes.Extent() > 1);
 462
 463     TopTools_ListIteratorOfListOfShape itSub1 (listShapes);
 464     for (; itSub1.More(); itSub1.Next()) {
 465       TopoDS_Shape aCut = itSub1.Value();
 466       // tools
 467       TopTools_ListIteratorOfListOfShape itSub2 (listTools);
 468       for (; itSub2.More(); itSub2.Next()) {
 469         TopoDS_Shape aTool = itSub2.Value();
 470         BRepAlgoAPI_Cut BO (aCut, aTool);
 471         if (!BO.IsDone()) {
 472           StdFail_NotDone::Raise("Cut operation can not be performed on the given shapes");
 473         }
 474         aCut = BO.Shape();
 475       }
 476       if (isCompound) {
 477         // check result of this step: if it is a compound (boolean operations
 478         // allways return a compound), we add all sub-shapes of it.
 479         // This allows to avoid adding empty compounds,
 480         // resulting from CUT of parts
 481         if (aCut.ShapeType() == TopAbs_COMPOUND) {
 482 #if OCC_VERSION_MAJOR >= 7
 483           if (itSub1.Value().ShapeType() == TopAbs_FACE ||
 484               itSub1.Value().ShapeType() == TopAbs_SHELL) {
 485             aCut = makeCompoundShellFromFaces(aCut);
 486           }
 487 #endif
 488           TopoDS_Iterator aCompIter (aCut);
 489           for (; aCompIter.More(); aCompIter.Next()) {
 490             // add shape in a result
 491             B.Add(C, aCompIter.Value());
 492           }
 493         }
 494         else {
 495           // add shape in a result
 496           B.Add(C, aCut);
 497         }
 498       }
 499       else
 500         aShape = aCut;
 501     }
 502
 503     if (isCompound) {
 504       // As GlueFaces has been improved to keep all kind of shapes
 505       TopExp_Explorer anExp (C, TopAbs_VERTEX);
 506       if (anExp.More())
 507         aShape = GEOMImpl_GlueDriver::GlueFaces(C, Precision::Confusion(), Standard_True);
 508       else
 509         aShape = C;
 510     }
 511   }
 512
 513   // perform FUSE operation
 514   else if (theType == BOOLEAN_FUSE) {
 515 #if OCC_VERSION_MAJOR >= 7
 516     Standard_Boolean isFaces = Standard_False;
 517     TopTools_ListOfShape listShape1, listShape2;
 518     GEOMUtils::AddSimpleShapes(theShape1, listShape1);
 519     GEOMUtils::AddSimpleShapes(theShape2, listShape2);
 520
 521     TopTools_ListIteratorOfListOfShape itSub1 (listShape1);
 522     for (; itSub1.More(); itSub1.Next()) {
 523       TopoDS_Shape aValue1 = itSub1.Value();
 524       TopTools_ListIteratorOfListOfShape itSub2 (listShape2);
 525       for (; itSub2.More(); itSub2.Next()) {
 526         TopoDS_Shape aValue2 = itSub2.Value();
 527         if ((aValue1.ShapeType() == TopAbs_FACE || aValue1.ShapeType() == TopAbs_SHELL) &&
 528             (aValue2.ShapeType() == TopAbs_FACE || aValue2.ShapeType() == TopAbs_SHELL)) {
 529           isFaces = Standard_True;
 530         }
 531       }
 532     }
 533 #endif
 534
 535     // Perform
 536     BRepAlgoAPI_Fuse BO (theShape1, theShape2);
 537     if (!BO.IsDone()) {
 538       StdFail_NotDone::Raise("Fuse operation can not be performed on the given shapes");
 539     }
 540     aShape = BO.Shape();
 541 #if OCC_VERSION_MAJOR >= 7
 542     if (isFaces)
 543       aShape = makeCompoundShellFromFaces(aShape);
 544 #endif
 545   }
 546
 547   // perform SECTION operation
 548   else if (theType == BOOLEAN_SECTION) {
 549     BRep_Builder B;
 550     TopoDS_Compound C;
 551     B.MakeCompound(C);
 552
 553     TopTools_ListOfShape listShape1, listShape2;
 554     GEOMUtils::AddSimpleShapes(theShape1, listShape1);
 555     GEOMUtils::AddSimpleShapes(theShape2, listShape2);
 556
 557     Standard_Boolean isCompound =
 558       (listShape1.Extent() > 1 || listShape2.Extent() > 1);
 559
 560     TopTools_ListIteratorOfListOfShape itSub1 (listShape1);
 561     for (; itSub1.More(); itSub1.Next()) {
 562       TopoDS_Shape aValue1 = itSub1.Value();
 563       TopTools_ListIteratorOfListOfShape itSub2 (listShape2);
 564       for (; itSub2.More(); itSub2.Next()) {
 565         TopoDS_Shape aValue2 = itSub2.Value();
 566         BRepAlgoAPI_Section BO (aValue1, aValue2, Standard_False);
 567         // Set approximation to have an attached 3D BSpline geometry to each edge,
 568         // where analytic curve is not possible. Without this flag in some cases
 569         // we obtain BSpline curve of degree 1 (C0), which is slowly
 570         // processed by some algorithms (Partition for example).
 571         BO.Approximation(Standard_True);
 572         //modified by NIZNHY-PKV Tue Oct 18 14:34:16 2011f
 573         BO.ComputePCurveOn1(Standard_True);
 574         BO.ComputePCurveOn2(Standard_True);
 575         //modified by NIZNHY-PKV Tue Oct 18 14:34:18 2011t
 576
 577         BO.Build();
 578         if (!BO.IsDone()) {
 579           StdFail_NotDone::Raise("Section operation can not be performed on the given shapes");
 580         }
 581         if (isCompound) {
 582           TopoDS_Shape aStepResult = BO.Shape();
 583
 584           // check result of this step: if it is a compound (boolean operations
 585           // allways return a compound), we add all sub-shapes of it.
 586           // This allows to avoid adding empty compounds,
 587           // resulting from SECTION on two non-intersecting shapes.
 588           if (aStepResult.ShapeType() == TopAbs_COMPOUND) {
 589             TopoDS_Iterator aCompIter (aStepResult);
 590             for (; aCompIter.More(); aCompIter.Next()) {
 591               // add shape in a result
 592               B.Add(C, aCompIter.Value());
 593             }
 594           }
 595           else {
 596             // add shape in a result
 597             B.Add(C, aStepResult);
 598           }
 599         }
 600         else
 601           aShape = BO.Shape();
 602       }
 603     }
 604
 605     if (isCompound) {
 606       // As GlueFaces has been improved to keep all kind of shapes
 607       TopExp_Explorer anExp (C, TopAbs_VERTEX);
 608       if (anExp.More())
 609         aShape = GEOMImpl_GlueDriver::GlueFaces(C, Precision::Confusion(), Standard_True);
 610       else
 611         aShape = C;
 612     }
 613   }
 614
 615   // UNKNOWN operation
 616   else {
 617   }
 618
 619   if (aShape.IsNull()) return aShape;
 620
 621   // as boolean operations always produce compound, lets simplify it
 622   // for the case, if it contains only one sub-shape
 623   TopTools_ListOfShape listShapeRes;
 624   GEOMUtils::AddSimpleShapes(aShape, listShapeRes);
 625   if (listShapeRes.Extent() == 1) {
 626     aShape = listShapeRes.First();
 627     if (aShape.IsNull()) return aShape;
 628   }
 629
 630   // 08.07.2008 skl for bug 19761 from Mantis
 631   if ( !GEOMUtils::CheckShape(aShape, true) && !GEOMUtils::FixShapeTolerance(aShape) )
 632     Standard_ConstructionError::Raise("Boolean operation aborted : non valid shape result");
 633
 634   return aShape;
 635 }
 636
 637 //================================================================================
 638 /*!
 639  * \brief Returns a name of creation operation and names and values of creation parameters
 640  */
 641 //================================================================================
 642
 643 bool GEOMImpl_BooleanDriver::
 644 GetCreationInformation(std::string&             theOperationName,
 645                        std::vector<GEOM_Param>& theParams)
 646 {
 647   if (Label().IsNull()) return 0;
 648   Handle(GEOM_Function) function = GEOM_Function::GetFunction(Label());
 649
 650   GEOMImpl_IBoolean aCI (function);
 651   Standard_Integer aType = function->GetType();
 652   Standard_Boolean isCheckSelfInte = aCI.GetCheckSelfIntersection();
 653
 654   switch ( aType ) {
 655   case BOOLEAN_COMMON:
 656     theOperationName = "COMMON";
 657     AddParam( theParams, "Object 1", aCI.GetShape1() );
 658     AddParam( theParams, "Object 2", aCI.GetShape2() );
 659     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 660     break;
 661   case BOOLEAN_CUT:
 662     theOperationName = "CUT";
 663     AddParam( theParams, "Main Object", aCI.GetShape1() );
 664     AddParam( theParams, "Tool Object", aCI.GetShape2() );
 665     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 666     break;
 667   case BOOLEAN_FUSE:
 668     theOperationName = "FUSE";
 669     AddParam( theParams, "Object 1", aCI.GetShape1() );
 670     AddParam( theParams, "Object 2", aCI.GetShape2() );
 671     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 672     AddParam( theParams, "Remove extra edges", aCI.GetRmExtraEdges() );
 673     break;
 674   case BOOLEAN_SECTION:
 675     theOperationName = "SECTION";
 676     AddParam( theParams, "Object 1", aCI.GetShape1() );
 677     AddParam( theParams, "Object 2", aCI.GetShape2() );
 678     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 679     break;
 680   case BOOLEAN_COMMON_LIST:
 681     theOperationName = "COMMON";
 682     AddParam( theParams, "Selected objects", aCI.GetShapes() );
 683     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 684     break;
 685   case BOOLEAN_FUSE_LIST:
 686     theOperationName = "FUSE";
 687     AddParam( theParams, "Selected objects", aCI.GetShapes() );
 688     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 689     AddParam( theParams, "Remove extra edges", aCI.GetRmExtraEdges() );
 690     break;
 691   case BOOLEAN_CUT_LIST:
 692     theOperationName = "CUT";
 693     AddParam( theParams, "Main Object", aCI.GetShape1() );
 694     AddParam( theParams, "Tool Objects", aCI.GetShapes() );
 695     AddParam( theParams, "Check self-intersections", isCheckSelfInte );
 696     break;
 697   default:
 698     return false;
 699   }
 700
 701   return true;
 702 }
 703
 704 OCCT_IMPLEMENT_STANDARD_RTTIEXT (GEOMImpl_BooleanDriver,GEOM_BaseDriver);