src/Model/Model_BodyBuilder.cpp

   1 // Copyright (C) 2014-2017  CEA/DEN, EDF R&D
   2 //
   3 // This library is free software; you can redistribute it and/or
   4 // modify it under the terms of the GNU Lesser General Public
   5 // License as published by the Free Software Foundation; either
   6 // version 2.1 of the License, or (at your option) any later version.
   7 //
   8 // This library is distributed in the hope that it will be useful,
   9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11 // Lesser General Public License for more details.
  12 //
  13 // You should have received a copy of the GNU Lesser General Public
  14 // License along with this library; if not, write to the Free Software
  15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  16 //
  17 // See http://www.salome-platform.org/ or
  18 // email : webmaster.salome@opencascade.com<mailto:webmaster.salome@opencascade.com>
  19 //
  20
  21 #include <Model_BodyBuilder.h>
  22
  23 #include <Model_Data.h>
  24 #include <Model_Document.h>
  25 #include <TNaming_Builder.hxx>
  26 #include <TNaming_NamedShape.hxx>
  27 #include <TNaming_Iterator.hxx>
  28 #include <TNaming_Tool.hxx>
  29 #include <TDataStd_Name.hxx>
  30 #include <TDataStd_Integer.hxx>
  31 #include <TopoDS.hxx>
  32 #include <TopoDS_Face.hxx>
  33 #include <TDF_ChildIterator.hxx>
  34 #include <TDF_ChildIDIterator.hxx>
  35 #include <TDF_Reference.hxx>
  36 #include <TopTools_MapOfShape.hxx>
  37 #include <TopExp_Explorer.hxx>
  38 #include <TopTools_ListOfShape.hxx>
  39 #include <TopTools_ListIteratorOfListOfShape.hxx>
  40 #include <TopTools_DataMapOfShapeListOfShape.hxx>
  41 #include <TopTools_DataMapIteratorOfDataMapOfShapeListOfShape.hxx>
  42 #include <TopTools_DataMapIteratorOfDataMapOfShapeShape.hxx>
  43 #include <TopTools_MapIteratorOfMapOfShape.hxx>
  44 #include <TopTools_IndexedDataMapOfShapeListOfShape.hxx>
  45 #include <TopTools_IndexedMapOfShape.hxx>
  46 #include <TopTools_DataMapOfShapeShape.hxx>
  47 #include <TopExp.hxx>
  48 #include <BRepTools.hxx>
  49 #include <BRep_Tool.hxx>
  50 #include <GeomAPI_Shape.h>
  51 #include <GeomAlgoAPI_MakeShape.h>
  52 #include <GeomAlgoAPI_SortListOfShapes.h>
  53 #include <Config_PropManager.h>
  54 // DEB
  55 //#include <TCollection_AsciiString.hxx>
  56 //#include <TDF_Tool.hxx>
  57 //#define DEB_IMPORT 1
  58
  59 Model_BodyBuilder::Model_BodyBuilder(ModelAPI_Object* theOwner)
  60 : ModelAPI_BodyBuilder(theOwner)
  61 {
  62 }
  63
  64 // Converts evolution of naming shape to selection evelution and back to avoid
  65 // naming support on the disabled results. Deeply in the labels tree, recursively.
  66 static void evolutionToSelectionRec(TDF_Label theLab, const bool theFlag) {
  67   std::list<std::pair<TopoDS_Shape, TopoDS_Shape> > aShapePairs; // to store old and new shapes
  68   Handle(TNaming_NamedShape) aName;
  69   int anEvolution = -1;
  70   if (theLab.FindAttribute(TNaming_NamedShape::GetID(), aName)) {
  71     TNaming_Evolution aNSEvol = aName->Evolution();
  72     if ((aNSEvol == TNaming_SELECTED && theFlag) ||
  73         (aNSEvol != TNaming_SELECTED && !theFlag)) { // nothing to do, it is already correct
  74       return;
  75     }
  76     anEvolution = (int)(aNSEvol);
  77     if (!theFlag) {
  78       Handle(TDataStd_Integer) anAttrEvol;
  79       if (theLab.FindAttribute(TDataStd_Integer::GetID(), anAttrEvol)) {
  80         anEvolution = anAttrEvol->Get();
  81       }
  82     } else {
  83       TDataStd_Integer::Set(theLab, anEvolution);
  84     }
  85
  86     for(TNaming_Iterator anIter(aName); anIter.More(); anIter.Next()) {
  87       // iterator goes in reversed order relatively to the Builder, to, make the list reversed
  88       aShapePairs.push_front(std::pair<TopoDS_Shape, TopoDS_Shape>
  89         (anIter.OldShape(), anIter.NewShape()));
  90     }
  91
  92     // create new
  93     TNaming_Builder aBuilder(theLab);
  94     TNaming_Evolution anEvol = (TNaming_Evolution)(anEvolution);
  95     std::list<std::pair<TopoDS_Shape, TopoDS_Shape> >::iterator aPairsIter = aShapePairs.begin();
  96     for(; aPairsIter != aShapePairs.end(); aPairsIter++) {
  97       if (theFlag) { // disabled => make selection
  98         if (anEvolution == TNaming_DELETE) // issue 2274 : don't put too many same null shapes
  99           aBuilder.Select(aPairsIter->first, aPairsIter->first);
 100         else if (anEvolution == TNaming_PRIMITIVE)
 101           aBuilder.Select(aPairsIter->second, aPairsIter->second);
 102         else
 103           aBuilder.Select(aPairsIter->second, aPairsIter->first);
 104       } else if (anEvol == TNaming_GENERATED) {
 105         aBuilder.Generated(aPairsIter->first, aPairsIter->second);
 106       } else if (anEvol == TNaming_MODIFY) {
 107         aBuilder.Modify(aPairsIter->first, aPairsIter->second);
 108       } else if (anEvol == TNaming_DELETE) {
 109         aBuilder.Delete(aPairsIter->first);
 110       } else if (anEvol == TNaming_PRIMITIVE) {
 111         aBuilder.Generated(aPairsIter->second);
 112       } else if (anEvol == TNaming_SELECTED) {
 113         aBuilder.Select(aPairsIter->second, aPairsIter->first);
 114       }
 115     }
 116   }
 117   // recursive call for all sub-labels
 118   TDF_ChildIterator anIter(theLab, Standard_False);
 119   for(; anIter.More(); anIter.Next()) {
 120     evolutionToSelectionRec(anIter.Value(), theFlag);
 121   }
 122 }
 123
 124 void Model_BodyBuilder::evolutionToSelection(const bool theFlag)
 125 {
 126   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 127   if (!aData) // unknown case
 128     return;
 129   TDF_Label& aShapeLab = aData->shapeLab();
 130   evolutionToSelectionRec(aShapeLab, theFlag);
 131 }
 132
 133 void Model_BodyBuilder::store(const std::shared_ptr<GeomAPI_Shape>& theShape,
 134                               const bool theIsStoreSameShapes)
 135 {
 136   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 137   if (aData) {
 138     TDF_Label& aShapeLab = aData->shapeLab();
 139     // clean builders
 140     clean();
 141     // store the new shape as primitive
 142     TNaming_Builder aBuilder(aShapeLab);
 143     if (!theShape)
 144       return;  // bad shape
 145     TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 146     if (aShape.IsNull())
 147       return;  // null shape inside
 148
 149     if(!theIsStoreSameShapes) {
 150       Handle(TNaming_NamedShape) aNS = TNaming_Tool::NamedShape(aShape, aShapeLab);
 151       if(!aNS.IsNull() && !aNS->IsEmpty()) {
 152         // This shape is already in document, store reference instead of shape;
 153         const TDF_Label aFoundLabel = aNS->Label();
 154         TDF_Reference::Set(aShapeLab, aFoundLabel);
 155         aShapeLab.ForgetAttribute(TNaming_NamedShape::GetID());
 156         return;
 157       }
 158     }
 159
 160     aBuilder.Generated(aShape);
 161     // register name
 162     aShapeLab.ForgetAttribute(TDF_Reference::GetID());
 163     if(!aBuilder.NamedShape()->IsEmpty()) {
 164       Handle(TDataStd_Name) anAttr;
 165       if(aBuilder.NamedShape()->Label().FindAttribute(TDataStd_Name::GetID(),anAttr)) {
 166         std::string aName (TCollection_AsciiString(anAttr->Get()).ToCString());
 167         if(!aName.empty()) {
 168           std::shared_ptr<Model_Document> aDoc =
 169             std::dynamic_pointer_cast<Model_Document>(document());
 170           aDoc->addNamingName(aBuilder.NamedShape()->Label(), aName);
 171         }
 172       }
 173     }
 174   }
 175 }
 176
 177 void Model_BodyBuilder::storeGenerated(const std::shared_ptr<GeomAPI_Shape>& theFromShape,
 178   const std::shared_ptr<GeomAPI_Shape>& theToShape)
 179 {
 180   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 181   if (aData) {
 182     TDF_Label& aShapeLab = aData->shapeLab();
 183     // clean builders
 184     clean();
 185     // store the new shape as primitive
 186     TNaming_Builder aBuilder(aShapeLab);
 187     if (!theFromShape || !theToShape)
 188       return;  // bad shape
 189     TopoDS_Shape aShapeBasis = theFromShape->impl<TopoDS_Shape>();
 190     if (aShapeBasis.IsNull())
 191       return;  // null shape inside
 192     TopoDS_Shape aShapeNew = theToShape->impl<TopoDS_Shape>();
 193     if (aShapeNew.IsNull())
 194       return;  // null shape inside
 195     aBuilder.Generated(aShapeBasis, aShapeNew);
 196     // register name
 197     if(!aBuilder.NamedShape()->IsEmpty()) {
 198       Handle(TDataStd_Name) anAttr;
 199       if(aBuilder.NamedShape()->Label().FindAttribute(TDataStd_Name::GetID(),anAttr)) {
 200         std::string aName (TCollection_AsciiString(anAttr->Get()).ToCString());
 201         if(!aName.empty()) {
 202           std::shared_ptr<Model_Document> aDoc =
 203             std::dynamic_pointer_cast<Model_Document>(document());
 204           aDoc->addNamingName(aBuilder.NamedShape()->Label(), aName);
 205         }
 206       }
 207     }
 208   }
 209 }
 210
 211 void Model_BodyBuilder::storeModified(const std::shared_ptr<GeomAPI_Shape>& theOldShape,
 212   const std::shared_ptr<GeomAPI_Shape>& theNewShape, const int theDecomposeSolidsTag)
 213 {
 214   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 215   if (aData) {
 216     TDF_Label& aShapeLab = aData->shapeLab();
 217     // clean builders
 218     clean();
 219     // store the new shape as primitive
 220     TNaming_Builder aBuilder(aShapeLab);
 221     if (!theOldShape || !theNewShape)
 222       return;  // bad shape
 223     TopoDS_Shape aShapeOld = theOldShape->impl<TopoDS_Shape>();
 224     if (aShapeOld.IsNull())
 225       return;  // null shape inside
 226     TopoDS_Shape aShapeNew = theNewShape->impl<TopoDS_Shape>();
 227     if (aShapeNew.IsNull())
 228       return;  // null shape inside
 229     aBuilder.Modify(aShapeOld, aShapeNew);
 230     if(!aBuilder.NamedShape()->IsEmpty()) {
 231       Handle(TDataStd_Name) anAttr;
 232       if(aBuilder.NamedShape()->Label().FindAttribute(TDataStd_Name::GetID(),anAttr)) {
 233         std::string aName (TCollection_AsciiString(anAttr->Get()).ToCString());
 234         if(!aName.empty()) {
 235           std::shared_ptr<Model_Document> aDoc =
 236             std::dynamic_pointer_cast<Model_Document>(document());
 237           aDoc->addNamingName(aBuilder.NamedShape()->Label(), aName);
 238         }
 239       }
 240     }
 241   }
 242 }
 243
 244 void  Model_BodyBuilder::storeWithoutNaming(const std::shared_ptr<GeomAPI_Shape>& theShape)
 245 {
 246   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 247   if (aData) {
 248     clean();
 249     if (!theShape.get())
 250       return; // bad shape
 251     TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 252     if (aShape.IsNull())
 253       return;  // null shape inside
 254     TNaming_Builder aBuilder(aData->shapeLab());
 255     aBuilder.Select(aShape, aShape);
 256   }
 257 }
 258
 259 void Model_BodyBuilder::clean()
 260 {
 261   TDF_Label aLab = std::dynamic_pointer_cast<Model_Data>(data())->shapeLab();
 262   if (aLab.IsNull())
 263     return;
 264   std::map<int, TNaming_Builder*>::iterator aBuilder = myBuilders.begin();
 265   for(; aBuilder != myBuilders.end(); aBuilder++) {
 266     delete aBuilder->second;
 267     // clear also shapes on cleaned sub-labels (#2241)
 268     Handle(TNaming_NamedShape) aNS;
 269     if (aLab.FindChild(aBuilder->first).FindAttribute(TNaming_NamedShape::GetID(), aNS)) {
 270       aNS->Clear();
 271     }
 272   }
 273   myBuilders.clear();
 274   // remove the old reference (if any)
 275   aLab.ForgetAttribute(TDF_Reference::GetID());
 276 }
 277
 278 Model_BodyBuilder::~Model_BodyBuilder()
 279 {
 280   clean();
 281 }
 282
 283 TNaming_Builder* Model_BodyBuilder::builder(const int theTag)
 284 {
 285   std::map<int, TNaming_Builder*>::iterator aFind = myBuilders.find(theTag);
 286   if (aFind == myBuilders.end()) {
 287     std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 288     myBuilders[theTag] = new TNaming_Builder(
 289       theTag == 0 ? aData->shapeLab() : aData->shapeLab().FindChild(theTag));
 290     aFind = myBuilders.find(theTag);
 291   }
 292   return aFind->second;
 293 }
 294
 295 void Model_BodyBuilder::buildName(const int theTag, const std::string& theName)
 296 {
 297   std::shared_ptr<Model_Document> aDoc = std::dynamic_pointer_cast<Model_Document>(document());
 298   //aDoc->addNamingName(builder(theTag)->NamedShape()->Label(), theName);
 299   TDataStd_Name::Set(builder(theTag)->NamedShape()->Label(), theName.c_str());
 300 }
 301 void Model_BodyBuilder::generated(
 302   const std::shared_ptr<GeomAPI_Shape>& theNewShape, const std::string& theName, const int theTag)
 303 {
 304   TopoDS_Shape aShape = theNewShape->impl<TopoDS_Shape>();
 305   builder(theTag)->Generated(aShape);
 306   if(!theName.empty())
 307     buildName(theTag, theName);
 308 }
 309
 310 void Model_BodyBuilder::generated(const std::shared_ptr<GeomAPI_Shape>& theOldShape,
 311   const std::shared_ptr<GeomAPI_Shape>& theNewShape, const std::string& theName, const int theTag)
 312 {
 313   TopoDS_Shape anOldShape = theOldShape->impl<TopoDS_Shape>();
 314   TopoDS_Shape aNewShape = theNewShape->impl<TopoDS_Shape>();
 315   builder(theTag)->Generated(anOldShape, aNewShape);
 316   if(!theName.empty())
 317     buildName(theTag, theName);
 318   TopAbs_ShapeEnum aGenShapeType = aNewShape.ShapeType();
 319   if(aGenShapeType == TopAbs_WIRE || aGenShapeType == TopAbs_SHELL) {
 320     TopAbs_ShapeEnum anExplodeShapeType = aGenShapeType == TopAbs_WIRE ? TopAbs_EDGE : TopAbs_FACE;
 321     const TDF_Label aLabel = builder(theTag)->NamedShape()->Label();
 322     int aTag = 1;
 323     std::shared_ptr<Model_Document> aDoc = std::dynamic_pointer_cast<Model_Document>(document());
 324     for(TopExp_Explorer anExp(aNewShape, anExplodeShapeType); anExp.More(); anExp.Next()) {
 325       TDF_Label aChildLabel = aLabel.FindChild(aTag);
 326       TNaming_Builder aBuilder(aChildLabel);
 327       aBuilder.Generated(anOldShape, anExp.Current());
 328       TCollection_AsciiString aChildName = TCollection_AsciiString((theName + "_").c_str()) + aTag;
 329       //aDoc->addNamingName(aChildLabel, aChildName.ToCString());
 330       TDataStd_Name::Set(aChildLabel, aChildName.ToCString());
 331       aTag++;
 332     }
 333   }
 334 }
 335
 336
 337 void Model_BodyBuilder::modified(const std::shared_ptr<GeomAPI_Shape>& theOldShape,
 338   const std::shared_ptr<GeomAPI_Shape>& theNewShape, const std::string& theName, const int theTag)
 339 {
 340   TopoDS_Shape anOldShape = theOldShape->impl<TopoDS_Shape>();
 341   TopoDS_Shape aNewShape = theNewShape->impl<TopoDS_Shape>();
 342   builder(theTag)->Modify(anOldShape, aNewShape);
 343   if(!theName.empty())
 344     buildName(theTag, theName);
 345 }
 346
 347 void Model_BodyBuilder::deleted(const std::shared_ptr<GeomAPI_Shape>& theOldShape,
 348   const int theTag)
 349 {
 350   TopoDS_Shape aShape = theOldShape->impl<TopoDS_Shape>();
 351   builder(theTag)->Delete(aShape);
 352 }
 353
 354 void Model_BodyBuilder::loadDeletedShapes (GeomAlgoAPI_MakeShape* theMS,
 355   std::shared_ptr<GeomAPI_Shape>  theShapeIn,
 356   const int  theKindOfShape,
 357   const int  theTag)
 358 {
 359   TopoDS_Shape aShapeIn = theShapeIn->impl<TopoDS_Shape>();
 360   TopTools_MapOfShape aView;
 361   TopExp_Explorer ShapeExplorer (aShapeIn, (TopAbs_ShapeEnum)theKindOfShape);
 362   for (; ShapeExplorer.More(); ShapeExplorer.Next ()) {
 363     const TopoDS_Shape& aRoot = ShapeExplorer.Current ();
 364     if (!aView.Add(aRoot)) continue;
 365     std::shared_ptr<GeomAPI_Shape> aRShape(new GeomAPI_Shape());
 366     aRShape->setImpl((new TopoDS_Shape(aRoot)));
 367     if (theMS->isDeleted (aRShape)) {
 368       builder(theTag)->Delete(aRoot);
 369     }
 370   }
 371 }
 372
 373 // Keep only the shapes with minimal shape type
 374 static void keepTopLevelShapes(ListOfShape& theShapes, const TopoDS_Shape& theRoot,
 375   const GeomShapePtr& theResultShape = GeomShapePtr())
 376 {
 377   GeomAPI_Shape::ShapeType aKeepShapeType = GeomAPI_Shape::SHAPE;
 378   ListOfShape::iterator anIt = theShapes.begin();
 379   while (anIt != theShapes.end()) {
 380     TopoDS_Shape aNewShape = (*anIt)->impl<TopoDS_Shape>();
 381     if (theRoot.IsSame(aNewShape) || (theResultShape &&
 382         (!theResultShape->isSubShape(*anIt, false) || theResultShape->isSame(*anIt)))) {
 383       ListOfShape::iterator aRemoveIt = anIt++;
 384       theShapes.erase(aRemoveIt);
 385     } else {
 386       GeomAPI_Shape::ShapeType aType = (*anIt)->shapeType();
 387       if (aType < aKeepShapeType) {
 388         // found a shape with lesser shape type => remove all previous shapes
 389         aKeepShapeType = aType;
 390         theShapes.erase(theShapes.begin(), anIt);
 391         ++anIt;
 392       } else if (aType > aKeepShapeType) {
 393         // shapes with greater shape type should be removed from the list
 394         ListOfShape::iterator aRemoveIt = anIt++;
 395         theShapes.erase(aRemoveIt);
 396       } else
 397         ++anIt;
 398     }
 399   }
 400 }
 401
 402 void Model_BodyBuilder::loadAndOrientModifiedShapes (
 403   GeomAlgoAPI_MakeShape* theMS,
 404   std::shared_ptr<GeomAPI_Shape>  theShapeIn,
 405   const int  theKindOfShape,
 406   const int  theTag,
 407   const std::string& theName,
 408   GeomAPI_DataMapOfShapeShape& theSubShapes,
 409   const bool theIsStoreSeparate,
 410   const bool theIsStoreAsGenerated)
 411 {
 412   int anIndex = 1;
 413   int aTag = theTag;
 414   bool isBuilt = !theName.empty();
 415   std::string aName = theName;
 416   std::ostringstream aStream;
 417   GeomShapePtr aResultShape = shape();
 418   TopoDS_Shape aShapeIn = theShapeIn->impl<TopoDS_Shape>();
 419   TopTools_MapOfShape aView;
 420   TopExp_Explorer aShapeExplorer (aShapeIn, (TopAbs_ShapeEnum)theKindOfShape);
 421   for (; aShapeExplorer.More(); aShapeExplorer.Next ()) {
 422     const TopoDS_Shape& aRoot = aShapeExplorer.Current ();
 423     if (!aView.Add(aRoot)) continue;
 424     if (TNaming_Tool::NamedShape(aRoot, builder(theTag)->NamedShape()->Label()).IsNull())
 425       continue; // there is no sense to write history if old shape does not exist in the document
 426     ListOfShape aList;
 427     std::shared_ptr<GeomAPI_Shape> aRShape(new GeomAPI_Shape());
 428     aRShape->setImpl((new TopoDS_Shape(aRoot)));
 429     theMS->modified(aRShape, aList);
 430     if (!theIsStoreSeparate)
 431       keepTopLevelShapes(aList, aRoot, aResultShape);
 432     // sort the list of images before naming
 433     GeomAlgoAPI_SortListOfShapes::sort(aList);
 434
 435     // to trace situation where several objects are produced by one parent (#2317)
 436     int aSameParentShapes = -1;
 437     std::list<std::shared_ptr<GeomAPI_Shape> >::const_iterator
 438       anIt = aList.begin(), aLast = aList.end();
 439     for (; anIt != aLast; anIt++) {
 440       TopoDS_Shape aNewShape = (*anIt)->impl<TopoDS_Shape>();
 441       if (theSubShapes.isBound(*anIt)) {
 442         std::shared_ptr<GeomAPI_Shape> aMapShape(theSubShapes.find(*anIt));
 443         aNewShape.Orientation(aMapShape->impl<TopoDS_Shape>().Orientation());
 444       }
 445       GeomShapePtr aGeomNewShape(new GeomAPI_Shape());
 446       aGeomNewShape->setImpl(new TopoDS_Shape(aNewShape));
 447       if(!aRoot.IsSame(aNewShape) && aResultShape->isSubShape(aGeomNewShape, false) &&
 448          !aResultShape->isSame(*anIt)) { // to avoid put of same shape on main label and sub
 449         int aBuilderTag = aTag;
 450         if (!theIsStoreSeparate)
 451           aSameParentShapes++;
 452
 453         static const int THE_ANCHOR_TAG = 100000;
 454         int aCurShapeType = (int)((*anIt)->shapeType());
 455         bool needSuffix = false; // suffix for the name based on the shape type
 456         if (aSameParentShapes > 0) { // store in other label
 457           aBuilderTag = THE_ANCHOR_TAG - aSameParentShapes * 10 - aCurShapeType;
 458           needSuffix = true;
 459         } else if (aCurShapeType != theKindOfShape) {
 460           // modified shape has different type => set another tag
 461           // to avoid shapes of different types on the same label
 462           aBuilderTag = THE_ANCHOR_TAG - aCurShapeType;
 463           needSuffix = true;
 464         }
 465         std::string aSuffix;
 466         if (needSuffix) {
 467           switch (aCurShapeType) {
 468           case GeomAPI_Shape::VERTEX: aSuffix = "_v"; break;
 469           case GeomAPI_Shape::EDGE:   aSuffix = "_e"; break;
 470           case GeomAPI_Shape::FACE:   aSuffix = "_f"; break;
 471           default: break;
 472           }
 473         }
 474
 475         if(theIsStoreAsGenerated) {
 476           // Here we store shapes as generated, to avoid problem when one parent shape produce
 477           // several child shapes. In this case naming could not determine which shape to select.
 478           builder(aBuilderTag)->Generated(aRoot, aNewShape);
 479         } else {
 480           builder(aBuilderTag)->Modify(aRoot, aNewShape);
 481         }
 482         if(isBuilt) {
 483           aStream.str(std::string());
 484           aStream.clear();
 485           aStream << theName;
 486           if(theIsStoreSeparate)
 487              aStream << "_" << anIndex++;
 488
 489           if (aSameParentShapes > 0) {
 490             aStream.str(std::string());
 491             aStream.clear();
 492             aStream << aName << "_" << aSameParentShapes << "divided";
 493           }
 494
 495           aStream << aSuffix;
 496           buildName(aBuilderTag, aStream.str());
 497         }
 498         if(theIsStoreSeparate) {
 499           aTag++;
 500         }
 501       } else if (aResultShape->isSame(*anIt)) {
 502         // keep the modification evolution on the root level (2241 - history propagation issue)
 503         if(theIsStoreAsGenerated) {
 504           builder(0)->Generated(aRoot, aNewShape);
 505         } else {
 506           builder(0)->Modify(aRoot, aNewShape);
 507         }
 508       }
 509     }
 510   }
 511 }
 512
 513 void Model_BodyBuilder::loadAndOrientGeneratedShapes (
 514   GeomAlgoAPI_MakeShape* theMS,
 515   std::shared_ptr<GeomAPI_Shape>  theShapeIn,
 516   const int  theKindOfShape,
 517   const int  theTag,
 518   const std::string& theName,
 519   GeomAPI_DataMapOfShapeShape& theSubShapes)
 520 {
 521   TopoDS_Shape aShapeIn = theShapeIn->impl<TopoDS_Shape>();
 522   TopTools_MapOfShape aView;
 523   bool isBuilt = !theName.empty();
 524   TopExp_Explorer aShapeExplorer (aShapeIn, (TopAbs_ShapeEnum)theKindOfShape);
 525   for (; aShapeExplorer.More(); aShapeExplorer.Next ()) {
 526     const TopoDS_Shape& aRoot = aShapeExplorer.Current ();
 527     if (!aView.Add(aRoot)) continue;
 528     //if (TNaming_Tool::NamedShape(aRoot, builder(theTag)->NamedShape()->Label()).IsNull())
 529     //  continue; // there is no sense to write history if old shape does not exist in the document
 530     ListOfShape aList;
 531     std::shared_ptr<GeomAPI_Shape> aRShape(new GeomAPI_Shape());
 532     aRShape->setImpl((new TopoDS_Shape(aRoot)));
 533     theMS->generated(aRShape, aList);
 534     keepTopLevelShapes(aList, aRoot);
 535     std::list<std::shared_ptr<GeomAPI_Shape> >::const_iterator
 536       anIt = aList.begin(), aLast = aList.end();
 537     for (; anIt != aLast; anIt++) {
 538       TopoDS_Shape aNewShape = (*anIt)->impl<TopoDS_Shape>();
 539       if (theSubShapes.isBound(*anIt)) {
 540         std::shared_ptr<GeomAPI_Shape> aMapShape(theSubShapes.find(*anIt));
 541         aNewShape.Orientation(aMapShape->impl<TopoDS_Shape>().Orientation());
 542       }
 543       if (!aRoot.IsSame (aNewShape)) {
 544         builder(theTag)->Generated(aRoot,aNewShape);
 545         if(isBuilt)
 546           buildName(theTag, theName);
 547       }
 548       TopAbs_ShapeEnum aGenShapeType = aNewShape.ShapeType();
 549       if(aGenShapeType == TopAbs_WIRE || aGenShapeType == TopAbs_SHELL) {
 550         TopAbs_ShapeEnum anExplodeShapeType =
 551           aGenShapeType == TopAbs_WIRE ? TopAbs_EDGE : TopAbs_FACE;
 552         const TDF_Label aLabel = builder(theTag)->NamedShape()->Label();
 553         int aTag = 1;
 554         std::shared_ptr<Model_Document> aDoc =
 555           std::dynamic_pointer_cast<Model_Document>(document());
 556         for(TopExp_Explorer anExp(aNewShape, anExplodeShapeType); anExp.More(); anExp.Next()) {
 557           TDF_Label aChildLabel = aLabel.FindChild(aTag);
 558           TNaming_Builder aBuilder(aChildLabel);
 559           aBuilder.Generated(aRoot, anExp.Current());
 560           TCollection_AsciiString aChildName =
 561             TCollection_AsciiString((theName + "_").c_str()) + aTag;
 562           TDataStd_Name::Set(aChildLabel, aChildName.ToCString());
 563           aTag++;
 564         }
 565       }
 566     }
 567   }
 568 }
 569
 570 //=======================================================================
 571 int getDangleShapes(const TopoDS_Shape&           theShapeIn,
 572   const TopAbs_ShapeEnum        theGeneratedFrom,
 573   TopTools_DataMapOfShapeShape& theDangles)
 574 {
 575   theDangles.Clear();
 576   TopTools_IndexedDataMapOfShapeListOfShape subShapeAndAncestors;
 577   TopAbs_ShapeEnum GeneratedTo;
 578   if (theGeneratedFrom == TopAbs_FACE) GeneratedTo = TopAbs_EDGE;
 579   else if (theGeneratedFrom == TopAbs_EDGE) GeneratedTo = TopAbs_VERTEX;
 580   else return Standard_False;
 581   TopExp::MapShapesAndAncestors(theShapeIn, GeneratedTo, theGeneratedFrom, subShapeAndAncestors);
 582   for (Standard_Integer i = 1; i <= subShapeAndAncestors.Extent(); i++) {
 583     const TopoDS_Shape& mayBeDangle = subShapeAndAncestors.FindKey(i);
 584     const TopTools_ListOfShape& ancestors = subShapeAndAncestors.FindFromIndex(i);
 585     if (ancestors.Extent() == 1) theDangles.Bind(ancestors.First(), mayBeDangle);
 586   }
 587   return theDangles.Extent();
 588 }
 589
 590 //=======================================================================
 591 void loadGeneratedDangleShapes(
 592   const TopoDS_Shape&      theShapeIn,
 593   const TopAbs_ShapeEnum   theGeneratedFrom,
 594   TNaming_Builder *        theBuilder)
 595 {
 596   TopTools_DataMapOfShapeShape dangles;
 597   if (!getDangleShapes(theShapeIn, theGeneratedFrom, dangles)) return;
 598   TopTools_DataMapIteratorOfDataMapOfShapeShape itr(dangles);
 599   for (; itr.More(); itr.Next())
 600     theBuilder->Generated(itr.Key(), itr.Value());
 601 }
 602
 603 //=======================================================================
 604 void Model_BodyBuilder::loadNextLevels(std::shared_ptr<GeomAPI_Shape> theShape,
 605   const std::string& theName, int&  theTag)
 606 {
 607   if(theShape->isNull()) return;
 608   TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 609   std::string aName;
 610   if (aShape.ShapeType() == TopAbs_SOLID) {
 611     TopExp_Explorer expl(aShape, TopAbs_FACE);
 612     for (; expl.More(); expl.Next()) {
 613       builder(theTag)->Generated(expl.Current());
 614       TCollection_AsciiString aStr(theTag);
 615       aName = theName + aStr.ToCString();
 616       buildName(theTag, aName);
 617       theTag++;
 618     }
 619   }
 620   else if (aShape.ShapeType() == TopAbs_SHELL || aShape.ShapeType() == TopAbs_FACE) {
 621     // load faces and all the free edges
 622     TopTools_IndexedMapOfShape Faces;
 623     TopExp::MapShapes(aShape, TopAbs_FACE, Faces);
 624     if (Faces.Extent() > 1 || (aShape.ShapeType() == TopAbs_SHELL && Faces.Extent() == 1)) {
 625       TopExp_Explorer expl(aShape, TopAbs_FACE);
 626       for (; expl.More(); expl.Next()) {
 627         builder(theTag)->Generated(expl.Current());
 628         TCollection_AsciiString aStr(theTag);
 629         aName = theName + aStr.ToCString();
 630         buildName(theTag, aName);
 631         theTag++;
 632       }
 633     }
 634     TopTools_IndexedDataMapOfShapeListOfShape anEdgeAndNeighbourFaces;
 635     TopExp::MapShapesAndAncestors(aShape, TopAbs_EDGE, TopAbs_FACE, anEdgeAndNeighbourFaces);
 636     for (Standard_Integer i = 1; i <= anEdgeAndNeighbourFaces.Extent(); i++)
 637     {
 638       const TopTools_ListOfShape& aLL = anEdgeAndNeighbourFaces.FindFromIndex(i);
 639       if (aLL.Extent() < 2) {
 640         if (BRep_Tool::Degenerated(TopoDS::Edge(anEdgeAndNeighbourFaces.FindKey(i))))
 641           continue;
 642         builder(theTag)->Generated(anEdgeAndNeighbourFaces.FindKey(i));
 643         TCollection_AsciiString aStr(theTag);
 644         aName = theName + aStr.ToCString();
 645         buildName(theTag, aName);
 646         theTag++;
 647       } else {
 648         TopTools_ListIteratorOfListOfShape anIter(aLL);
 649         const TopoDS_Face& aFace = TopoDS::Face(anIter.Value());
 650         anIter.Next();
 651         if(aFace.IsEqual(anIter.Value())) {
 652           builder(theTag)->Generated(anEdgeAndNeighbourFaces.FindKey(i));
 653           TCollection_AsciiString aStr(theTag);
 654           aName = theName + aStr.ToCString();
 655           buildName(theTag, aName);
 656           theTag++;
 657         }
 658       }
 659     }
 660   } else if (aShape.ShapeType() == TopAbs_WIRE) {
 661     TopTools_IndexedMapOfShape Edges;
 662     BRepTools::Map3DEdges(aShape, Edges);
 663     if (Edges.Extent() == 1) {
 664       builder(theTag++)->Generated(Edges.FindKey(1));
 665       TopExp_Explorer expl(aShape, TopAbs_VERTEX);
 666       for (; expl.More(); expl.Next()) {
 667         builder(theTag)->Generated(expl.Current());
 668         TCollection_AsciiString aStr(theTag);
 669         aName = theName + aStr.ToCString();
 670         buildName(theTag, aName);
 671         theTag++;
 672       }
 673     } else {
 674       TopExp_Explorer expl(aShape, TopAbs_EDGE);
 675       for (; expl.More(); expl.Next()) {
 676         builder(theTag)->Generated(expl.Current());
 677         TCollection_AsciiString aStr(theTag);
 678         aName = theName + aStr.ToCString();
 679         buildName(theTag, aName);
 680         theTag++;
 681       }
 682       // and load generated vertices.
 683       TopTools_DataMapOfShapeShape generated;
 684       if (getDangleShapes(aShape, TopAbs_EDGE, generated))
 685       {
 686         TNaming_Builder* pBuilder = builder(theTag++);
 687         loadGeneratedDangleShapes(aShape, TopAbs_EDGE, pBuilder);
 688       }
 689     }
 690   } else if (aShape.ShapeType() == TopAbs_EDGE) {
 691     TopExp_Explorer expl(aShape, TopAbs_VERTEX);
 692     for (; expl.More(); expl.Next()) {
 693       builder(theTag)->Generated(expl.Current());
 694       TCollection_AsciiString aStr(theTag);
 695       aName = theName + aStr.ToCString();
 696       buildName(theTag, aName);
 697       theTag++;
 698     }
 699   }
 700 }
 701
 702 //=======================================================================
 703 int findAmbiguities(const TopoDS_Shape&           theShapeIn,
 704   TopTools_ListOfShape&   theList)
 705 {
 706   theList.Clear();
 707   // edges -> ancestor faces list
 708   TopTools_IndexedDataMapOfShapeListOfShape aSubShapeAndAncestors;
 709   TopExp::MapShapesAndAncestors(theShapeIn, TopAbs_EDGE, TopAbs_FACE, aSubShapeAndAncestors);
 710   // keeps the shapes which are already in the resulting list
 711   TopTools_MapOfShape alreadyThere;
 712   // map from faces identifier (combination of hash-codes) to list of edges produced such ID
 713   NCollection_DataMap<int, NCollection_List<TopoDS_Shape> > aFacesIDs;
 714
 715   TopTools_IndexedDataMapOfShapeListOfShape::Iterator anAncestorsIter(aSubShapeAndAncestors);
 716   for (; anAncestorsIter.More(); anAncestorsIter.Next()) {
 717     const TopTools_ListOfShape& ancestors = anAncestorsIter.Value();
 718     if (ancestors.Extent() < 2)
 719       continue;
 720     Standard_Integer anID = 0;
 721     for(TopTools_ListIteratorOfListOfShape aFaceIt(ancestors); aFaceIt.More(); aFaceIt.Next()) {
 722       anID ^= HashCode(aFaceIt.ChangeValue(), 1990657); // Pierpont prime
 723     }
 724     if (aFacesIDs.IsBound(anID)) { // there found same edge, check they really have same faces
 725       const NCollection_List<TopoDS_Shape>& aSameFaces1 =
 726         aSubShapeAndAncestors.FindFromKey(anAncestorsIter.Key());
 727       NCollection_List<TopoDS_Shape>::Iterator aSameEdge(aFacesIDs.ChangeFind(anID));
 728       for(; aSameEdge.More(); aSameEdge.Next()) {
 729         const NCollection_List<TopoDS_Shape>& aSameFaces2 =
 730           aSubShapeAndAncestors.FindFromKey(aSameEdge.Value());
 731         if (aSameFaces2.Extent() != aSameFaces1.Extent()) // the number of faces is different
 732           break;
 733
 734         NCollection_List<TopoDS_Shape>::Iterator aFaceIter1(aSameFaces1);
 735         for(; aFaceIter1.More(); aFaceIter1.Next()) {
 736           NCollection_List<TopoDS_Shape>::Iterator aFaceIter2(aSameFaces2);
 737           for(; aFaceIter2.More(); aFaceIter2.Next()) {
 738             if (aFaceIter1.Value().IsSame(aFaceIter2.Value()))
 739               break;
 740           }
 741           if (!aFaceIter2.More()) // aFaceIter1 contains a face, which is not in aFaceIter2
 742             break;
 743         }
 744         if (!aFaceIter1.More()) { // all the faces are same => put to the result
 745           if (alreadyThere.Add(aSameEdge.Value()))
 746             theList.Append(aSameEdge.Value());
 747           if (alreadyThere.Add(anAncestorsIter.Key()))
 748             theList.Append(anAncestorsIter.Key());
 749         }
 750       }
 751     } else { // ID is unique, just add this edge
 752       aFacesIDs.Bind(anID, NCollection_List<TopoDS_Shape>());
 753     }
 754     aFacesIDs.ChangeFind(anID).Append(anAncestorsIter.Key()); // add to the list anyway
 755   }
 756   return theList.Extent();
 757 }
 758
 759 //=======================================================================
 760 void Model_BodyBuilder::loadFirstLevel(
 761   std::shared_ptr<GeomAPI_Shape> theShape, const std::string& theName, int&  theTag)
 762 {
 763   if(theShape->isNull()) return;
 764   TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 765   std::string aName;
 766   if (aShape.ShapeType() == TopAbs_COMPOUND || aShape.ShapeType() == TopAbs_COMPSOLID) {
 767     TopoDS_Iterator itr(aShape);
 768     for (; itr.More(); itr.Next()) {
 769       builder(theTag)->Generated(itr.Value());
 770       TCollection_AsciiString aStr(theTag);
 771       aName = theName + aStr.ToCString();
 772       buildName(theTag, aName);
 773       if(!theName.empty()) buildName(theTag, aName);
 774       theTag++;
 775       if (itr.Value().ShapeType() == TopAbs_COMPOUND ||
 776         itr.Value().ShapeType() == TopAbs_COMPSOLID)
 777       {
 778         std::shared_ptr<GeomAPI_Shape> itrShape(new GeomAPI_Shape());
 779         itrShape->setImpl(new TopoDS_Shape(itr.Value()));
 780         loadFirstLevel(itrShape, theName, theTag);
 781       } else {
 782         std::shared_ptr<GeomAPI_Shape> itrShape(new GeomAPI_Shape());
 783         itrShape->setImpl(new TopoDS_Shape(itr.Value()));
 784         loadNextLevels(itrShape, theName, theTag);
 785       }
 786     }
 787   } else {
 788     std::shared_ptr<GeomAPI_Shape> itrShape(new GeomAPI_Shape());
 789     itrShape->setImpl(new TopoDS_Shape(aShape));
 790     loadNextLevels(itrShape, theName, theTag);
 791   }
 792   TopTools_ListOfShape   aList;
 793   if(findAmbiguities(aShape, aList)) {
 794     TopTools_ListIteratorOfListOfShape it(aList);
 795     for (; it.More(); it.Next(),theTag++) {
 796       builder(theTag)->Generated(it.Value());
 797       TCollection_AsciiString aStr(theTag);
 798       aName = theName + aStr.ToCString();
 799       buildName(theTag, aName);
 800     }
 801   }
 802 }
 803
 804 //=======================================================================
 805 void Model_BodyBuilder::loadDisconnectedEdges(
 806   std::shared_ptr<GeomAPI_Shape> theShape, const std::string& theName, int&  theTag)
 807 {
 808   if(theShape->isNull()) return;
 809   TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 810   TopTools_DataMapOfShapeListOfShape edgeNaborFaces;
 811   TopTools_ListOfShape empty;
 812   TopExp_Explorer explF(aShape, TopAbs_FACE);
 813   for (; explF.More(); explF.Next()) {
 814     const TopoDS_Shape& aFace = explF.Current();
 815     TopExp_Explorer explV(aFace, TopAbs_EDGE);
 816     for (; explV.More(); explV.Next()) {
 817       const TopoDS_Shape& anEdge = explV.Current();
 818       if (!edgeNaborFaces.IsBound(anEdge)) edgeNaborFaces.Bind(anEdge, empty);
 819       Standard_Boolean faceIsNew = Standard_True;
 820       TopTools_ListIteratorOfListOfShape itrF(edgeNaborFaces.Find(anEdge));
 821       for (; itrF.More(); itrF.Next()) {
 822         if (itrF.Value().IsSame(aFace)) {
 823           faceIsNew = Standard_False;
 824           break;
 825         }
 826       }
 827       if (faceIsNew)
 828         edgeNaborFaces.ChangeFind(anEdge).Append(aFace);
 829     }
 830   }
 831
 832   TopTools_MapOfShape anEdgesToDelete;
 833   TopExp_Explorer anEx(aShape,TopAbs_EDGE);
 834   std::string aName;
 835   for(;anEx.More();anEx.Next()) {
 836     Standard_Boolean aC0 = Standard_False;
 837     TopoDS_Shape anEdge1 = anEx.Current();
 838     if (edgeNaborFaces.IsBound(anEdge1)) {
 839       const TopTools_ListOfShape& aList1 = edgeNaborFaces.Find(anEdge1);
 840       if (aList1.Extent()<2) continue;
 841       TopTools_DataMapIteratorOfDataMapOfShapeListOfShape itr(edgeNaborFaces);
 842       for (; itr.More(); itr.Next()) {
 843         TopoDS_Shape anEdge2 = itr.Key();
 844         if(anEdgesToDelete.Contains(anEdge2)) continue;
 845         if (anEdge1.IsSame(anEdge2)) continue;
 846         const TopTools_ListOfShape& aList2 = itr.Value();
 847         // compare lists of the neighbour faces of edge1 and edge2
 848         if (aList1.Extent() == aList2.Extent()) {
 849           Standard_Integer aMatches = 0;
 850           for(TopTools_ListIteratorOfListOfShape aLIter1(aList1);aLIter1.More();aLIter1.Next())
 851             for(TopTools_ListIteratorOfListOfShape aLIter2(aList2);aLIter2.More();aLIter2.Next())
 852               if (aLIter1.Value().IsSame(aLIter2.Value())) aMatches++;
 853           if (aMatches == aList1.Extent()) {
 854             aC0=Standard_True;
 855             builder(theTag)->Generated(anEdge2);
 856             anEdgesToDelete.Add(anEdge2);
 857             TCollection_AsciiString aStr(theTag);
 858             aName = theName + aStr.ToCString();
 859             buildName(theTag, aName);
 860             theTag++;
 861           }
 862         }
 863       }
 864       TopTools_MapIteratorOfMapOfShape itDelete(anEdgesToDelete);
 865       for(;itDelete.More();itDelete.Next())
 866         edgeNaborFaces.UnBind(itDelete.Key());
 867       edgeNaborFaces.UnBind(anEdge1);
 868     }
 869     if (aC0) {
 870       builder(theTag)->Generated(anEdge1);
 871       TCollection_AsciiString aStr(theTag);
 872       aName = theName + aStr.ToCString();
 873       buildName(theTag, aName);
 874       theTag++;
 875     }
 876   }
 877 }
 878
 879 void Model_BodyBuilder::loadDisconnectedVertexes(std::shared_ptr<GeomAPI_Shape> theShape,
 880                                                  const std::string& theName, int&  theTag)
 881 {
 882   if(theShape->isNull()) return;
 883   TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 884   TopTools_DataMapOfShapeListOfShape vertexNaborEdges;
 885   TopTools_ListOfShape empty;
 886   TopExp_Explorer explF(aShape, TopAbs_EDGE);
 887   for (; explF.More(); explF.Next()) {
 888     const TopoDS_Shape& anEdge = explF.Current();
 889     TopExp_Explorer explV(anEdge, TopAbs_VERTEX);
 890     for (; explV.More(); explV.Next()) {
 891       const TopoDS_Shape& aVertex = explV.Current();
 892       if (!vertexNaborEdges.IsBound(aVertex)) vertexNaborEdges.Bind(aVertex, empty);
 893       Standard_Boolean faceIsNew = Standard_True;
 894       TopTools_ListIteratorOfListOfShape itrF(vertexNaborEdges.Find(aVertex));
 895       for (; itrF.More(); itrF.Next()) {
 896         if (itrF.Value().IsSame(anEdge)) {
 897           faceIsNew = Standard_False;
 898           break;
 899         }
 900       }
 901       if (faceIsNew) {
 902         vertexNaborEdges.ChangeFind(aVertex).Append(anEdge);
 903       }
 904     }
 905   }
 906   std::string aName;
 907   TopTools_DataMapIteratorOfDataMapOfShapeListOfShape itr(vertexNaborEdges);
 908   for (; itr.More(); itr.Next()) {
 909     const TopTools_ListOfShape& naborEdges = itr.Value();
 910     if (naborEdges.Extent() < 2) {
 911       builder(theTag)->Generated(itr.Key());
 912       TCollection_AsciiString aStr(theTag);
 913       aName = theName + aStr.ToCString();
 914       buildName(theTag, aName);
 915       theTag++;
 916     }
 917   }
 918 }
 919
 920 std::shared_ptr<GeomAPI_Shape> Model_BodyBuilder::shape()
 921 {
 922   std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 923   if (aData) {
 924     TDF_Label aShapeLab = aData->shapeLab();
 925     Handle(TDF_Reference) aRef;
 926     if (aShapeLab.FindAttribute(TDF_Reference::GetID(), aRef)) {
 927       aShapeLab = aRef->Get();
 928     }
 929     Handle(TNaming_NamedShape) aName;
 930     if (aShapeLab.FindAttribute(TNaming_NamedShape::GetID(), aName)) {
 931       TopoDS_Shape aShape = aName->Get();
 932       if (!aShape.IsNull()) {
 933         std::shared_ptr<GeomAPI_Shape> aRes(new GeomAPI_Shape);
 934         aRes->setImpl(new TopoDS_Shape(aShape));
 935         return aRes;
 936       }
 937     }
 938   }
 939   return std::shared_ptr<GeomAPI_Shape>();
 940 }
 941
 942 bool Model_BodyBuilder::isLatestEqual(const std::shared_ptr<GeomAPI_Shape>& theShape)
 943 {
 944   if (theShape.get()) {
 945     TopoDS_Shape aShape = theShape->impl<TopoDS_Shape>();
 946     std::shared_ptr<Model_Data> aData = std::dynamic_pointer_cast<Model_Data>(data());
 947     if (aData) {
 948       TDF_Label& aShapeLab = aData->shapeLab();
 949       Handle(TNaming_NamedShape) aName;
 950       if (aShapeLab.FindAttribute(TNaming_NamedShape::GetID(), aName)) {
 951         TopoDS_Shape aLatest = TNaming_Tool::CurrentShape(aName);
 952         if (aLatest.IsNull())
 953           return false;
 954         if (aLatest.IsEqual(aShape))
 955           return true;
 956         // check sub-shapes for comp-solids:
 957         for (TopExp_Explorer anExp(aShape, aLatest.ShapeType()); anExp.More(); anExp.Next()) {
 958           if (aLatest.IsEqual(anExp.Current()))
 959             return true;
 960         }
 961       }
 962     }
 963   }
 964   return false;
 965 }