]> SALOME platform Git repositories - modules/shaper.git/commitdiff
Salome HOME
Salome's 7.5.0 import BREP/STEP methods extraction
authorsbh <sergey.belash@opencascade.com>
Wed, 24 Dec 2014 09:23:17 +0000 (12:23 +0300)
committersbh <sergey.belash@opencascade.com>
Wed, 24 Dec 2014 09:23:39 +0000 (12:23 +0300)
src/ExchangePlugin/CMakeLists.txt
src/ExchangePlugin/ExchangePlugin_BREPImport.cpp [new file with mode: 0644]
src/ExchangePlugin/ExchangePlugin_BREPImport.h [new file with mode: 0644]
src/ExchangePlugin/ExchangePlugin_ImportFeature.cpp
src/ExchangePlugin/ExchangePlugin_ImportFeature.h
src/ExchangePlugin/ExchangePlugin_STEPImport.cpp [new file with mode: 0644]
src/ExchangePlugin/ExchangePlugin_STEPImport.h [new file with mode: 0644]

index ef96dbd6cb778633c06ab3072791713882e1309f..be417a4083bc30e805fef5a60790e075f70e1984 100644 (file)
@@ -15,12 +15,16 @@ SET(PROJECT_HEADERS
     ExchangePlugin_Plugin.h
     ExchangePlugin_ImportFeature.h
     ExchangePlugin_Validators.h
+    ExchangePlugin_BREPImport.h
+    ExchangePlugin_STEPImport.h
 )
  
 SET(PROJECT_SOURCES
     ExchangePlugin_Plugin.cpp
     ExchangePlugin_ImportFeature.cpp
     ExchangePlugin_Validators.cpp
+    ExchangePlugin_BREPImport.cpp
+    ExchangePlugin_STEPImport.cpp
 )
 
 SET(XML_RESOURCES
@@ -32,6 +36,12 @@ SET(PROJECT_LIBRARIES
     ModelAPI
     Config
     GeomAPI
+    ${CAS_TKBRep}
+    ${CAS_TKSTEP}
+    ${CAS_TKSTEPBase}
+    ${CAS_TKXSBase}
+    ${CAS_TKCAF}
+    ${CAS_TKLCAF}
     ${CAS_OCAF}
     ${CAS_TKCAF}
     ${CAS_SHAPE}
diff --git a/src/ExchangePlugin/ExchangePlugin_BREPImport.cpp b/src/ExchangePlugin/ExchangePlugin_BREPImport.cpp
new file mode 100644 (file)
index 0000000..8c4c593
--- /dev/null
@@ -0,0 +1,32 @@
+// Copyright (C) 2014-20xx CEA/DEN, EDF R&D
+
+#include <ExchangePlugin_BREPImport.h>
+
+#include <BRepTools.hxx>
+#include <BRep_Builder.hxx>
+
+//=============================================================================
+/*!
+ *
+ */
+//=============================================================================
+//extern "C" {
+namespace BREPImport {
+TopoDS_Shape Import(const TCollection_AsciiString& theFileName,
+                    const TCollection_AsciiString&,
+                    TCollection_AsciiString& theError, const TDF_Label&)
+{
+  #ifdef _DEBUG
+  std::cout << "Import BREP from file " << theFileName << std::endl;
+  #endif
+  TopoDS_Shape aShape;
+  BRep_Builder aBuilder;
+  BRepTools::Read(aShape, theFileName.ToCString(), aBuilder);
+  if (aShape.IsNull()) {
+    theError = "BREP Import failed";
+  }
+  return aShape;
+}
+
+}
+//}
diff --git a/src/ExchangePlugin/ExchangePlugin_BREPImport.h b/src/ExchangePlugin/ExchangePlugin_BREPImport.h
new file mode 100644 (file)
index 0000000..875add9
--- /dev/null
@@ -0,0 +1,28 @@
+// Copyright (C) 2014-20xx CEA/DEN, EDF R&D
+
+/*
+ * ExchangePlugin_BREPImport.h
+ *
+ *  Created on: Dec 24, 2014
+ *      Author: sbh
+ */
+
+#ifndef EXCHANGEPLUGIN_BREPIMPORT_H_
+#define EXCHANGEPLUGIN_BREPIMPORT_H_
+
+#include <ExchangePlugin.h>
+
+#include <TCollection_AsciiString.hxx>
+#include <TopoDS_Shape.hxx>
+#include <TDF_Label.hxx>
+
+namespace BREPImport {
+
+EXCHANGEPLUGIN_EXPORT
+TopoDS_Shape Import(const TCollection_AsciiString& theFileName,
+                    const TCollection_AsciiString& theFormatName,
+                    TCollection_AsciiString& theError, const TDF_Label&);
+
+}
+
+#endif /* EXCHANGEPLUGIN_BREPIMPORT_H_ */
index 74d4aac01e225cc82b28f069ecc5722a6dd28248..85cdffe56b199ae0329a5d6f2ff60ddc0e6eb871 100644 (file)
@@ -8,6 +8,8 @@
  */
 
 #include <ExchangePlugin_ImportFeature.h>
+#include <ExchangePlugin_BREPImport.h>
+#include <ExchangePlugin_STEPImport.h>
 
 #include <GeomAPI_Shape.h>
 #include <Config_Common.h>
 #include <ostream>
 #endif
 
-#ifdef WIN32
-# define _separator_ '\\'
-#else
-# define _separator_ '/'
-#endif
-
-typedef TopoDS_Shape (*importFunctionPointer)(const TCollection_AsciiString&,
-                                              const TCollection_AsciiString&,
-                                              TCollection_AsciiString&,
-                                              const TDF_Label&);
-
 ExchangePlugin_ImportFeature::ExchangePlugin_ImportFeature()
 {
 }
@@ -83,43 +74,41 @@ bool ExchangePlugin_ImportFeature::importFile(const std::string& theFileName)
   TCollection_AsciiString aFileName (theFileName.c_str());
   OSD_Path aPath(aFileName);
   TCollection_AsciiString aFormatName = aPath.Extension();
-  // ".brep" -> "BREP". TCollection_AsciiString are numbered from 1
+  // ".brep" -> "BREP", TCollection_AsciiString are numbered from 1
   aFormatName = aFormatName.SubString(2, aFormatName.Length());
   aFormatName.UpperCase();
 
-  // Load plugin library and get the "Import" method
-  LibHandle anImportLib = loadImportPlugin(std::string(aFormatName.ToCString()));
-  if(!anImportLib)
-    return false;
-  importFunctionPointer fp = (importFunctionPointer) GetProc(anImportLib, "Import");
-   // Perform the import
-   TCollection_AsciiString anError;
-   TDF_Label anUnknownLabel = TDF_Label();
-   TopoDS_Shape aShape = fp(aFileName,
-                            aFormatName,
-                            anError,
-                            anUnknownLabel);
+  // Perform the import
+  TCollection_AsciiString anError;
+  TDF_Label anUnknownLabel = TDF_Label();
+
+  TopoDS_Shape aShape;
+  if (aFormatName == "BREP") {
+    aShape = BREPImport::Import(aFileName, aFormatName, anError, anUnknownLabel);
+  } else if (aFormatName == "STEP") {
+    aShape = STEPImport::Import(aFileName, aFormatName, anError, anUnknownLabel);
+  }
    // Check if shape is valid
-   if ( aShape.IsNull() ) {
+  if ( aShape.IsNull() ) {
      const static std::string aShapeError = 
        "An error occurred while importing " + theFileName + ": " + anError.ToCString();
      setError(aShapeError);
      return false;
    }
-  //
-   // Pass the results into the model
-   std::string anObjectName = aPath.Name().ToCString();
-   data()->setName(anObjectName);
-   std::shared_ptr<ModelAPI_ResultBody> aResultBody = document()->createBody(data());
-   std::shared_ptr<GeomAPI_Shape> aGeomShape(new GeomAPI_Shape);
-   aGeomShape->setImpl(new TopoDS_Shape(aShape));
 
-   //LoadNamingDS of the imported shape
-   loadNamingDS(aGeomShape, aResultBody);
+  // Pass the results into the model
+  std::string anObjectName = aPath.Name().ToCString();
+  data()->setName(anObjectName);
+  std::shared_ptr<ModelAPI_ResultBody> aResultBody = document()->createBody(data());
+  std::shared_ptr<GeomAPI_Shape> aGeomShape(new GeomAPI_Shape);
+  aGeomShape->setImpl(new TopoDS_Shape(aShape));
+
+  //LoadNamingDS of the imported shape
+  loadNamingDS(aGeomShape, aResultBody);
 
-   setResult(aResultBody);
+  setResult(aResultBody);
 
-   return true;
+  return true;
 }
 
 //============================================================================
@@ -138,35 +127,3 @@ void ExchangePlugin_ImportFeature::loadNamingDS(
   std::string aNameDV = "DiscVertexes";
   theResultBody->loadDisconnectedVertexes(theGeomShape, aNameDV, aTag); 
 }
-
-LibHandle ExchangePlugin_ImportFeature::loadImportPlugin(const std::string& theFormatName)
-{
-  std::string aLibName = library(theFormatName + ID());
-  LibHandle anImportLib = LoadLib(aLibName.c_str());
-  std::string anImportError = "Failed to load " + aLibName + ": ";
-  if(!anImportLib) {
-#ifdef WIN32
-    LPVOID lpMsgBuf;
-    ::FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |
-                    FORMAT_MESSAGE_FROM_SYSTEM |
-                    FORMAT_MESSAGE_IGNORE_INSERTS,
-                    0, ::GetLastError(), 0, (LPTSTR) &lpMsgBuf, 0, 0);
-    anImportError = anImportError + std::string((char*) lpMsgBuf);
-    ::LocalFree(lpMsgBuf);
-#else
-    anImportError = anImportError + std::string(dlerror());
-#endif
-    setError(anImportError);
-    return false;
-  }
-  // Test loaded plugin for existence of valid "Import" function:
-  importFunctionPointer fp = (importFunctionPointer) GetProc(anImportLib, "Import");
-  if (!fp) {
-    const static std::string aFunctionError = 
-      "No valid \"Import\" function was found in the " + aLibName;
-    setError(aFunctionError);
-    UnLoadLib(anImportLib)
-    return NULL;
-  }
-  return anImportLib;
-}
index be327ecd592a9d514365dd352f6029db208c9252..f62fee937663c61eb31e5f33a126e04d93f2b726 100644 (file)
@@ -1,12 +1,5 @@
 // Copyright (C) 2014-20xx CEA/DEN, EDF R&D
 
-/*
- * ExchangePlugin_ImportFeature.h
- *
- *  Created on: Aug 28, 2014
- *      Author: sbh
- */
-
 #ifndef EXCHANGEPLUGIN_IMPORTFEATURE_H_
 #define EXCHANGEPLUGIN_IMPORTFEATURE_H_
 
@@ -15,20 +8,6 @@
 
 #include <map>
 
-#ifdef WIN32
-#include <windows.h>
-#define LibHandle HMODULE
-#define LoadLib( name ) LoadLibrary( name )
-#define GetProc GetProcAddress
-#define UnLoadLib( handle ) FreeLibrary( handle );
-#else
-#include <dlfcn.h>
-#define LibHandle void*
-#define LoadLib( name ) dlopen( name, RTLD_LAZY | RTLD_GLOBAL)
-#define GetProc dlsym
-#define UnLoadLib( handle ) dlclose( handle );
-#endif
-
 class ExchangePlugin_ImportFeature : public ModelAPI_Feature
 {
  public:
@@ -64,7 +43,6 @@ class ExchangePlugin_ImportFeature : public ModelAPI_Feature
 
  protected:
   EXCHANGEPLUGIN_EXPORT bool importFile(const std::string& theFileName);
-  EXCHANGEPLUGIN_EXPORT LibHandle loadImportPlugin(const std::string& theFormatName);
 
 private:
   /// Loads Naming data structure to the document
diff --git a/src/ExchangePlugin/ExchangePlugin_STEPImport.cpp b/src/ExchangePlugin/ExchangePlugin_STEPImport.cpp
new file mode 100644 (file)
index 0000000..b2b1c6c
--- /dev/null
@@ -0,0 +1,539 @@
+// Copyright (C) 2014-20xx CEA/DEN, EDF R&D
+
+#include <ExchangePlugin_STEPImport.h>
+
+#include <TDF_ChildIDIterator.hxx>
+#include <TDF_Label.hxx>
+#include <TDataStd_Name.hxx>
+#include <TDataStd_Comment.hxx>
+#include <TNaming_Builder.hxx>
+#include <TNaming_NamedShape.hxx>
+
+#include <IFSelect_ReturnStatus.hxx>
+#include <Interface_EntityIterator.hxx>
+#include <Interface_Graph.hxx>
+#include <Interface_InterfaceModel.hxx>
+#include <Interface_Static.hxx>
+#include <STEPControl_Reader.hxx>
+#include <StepBasic_Product.hxx>
+#include <StepBasic_ProductDefinition.hxx>
+#include <StepBasic_ProductDefinitionFormation.hxx>
+#include <StepGeom_GeometricRepresentationItem.hxx>
+#include <StepShape_TopologicalRepresentationItem.hxx>
+#include <StepRepr_DescriptiveRepresentationItem.hxx>
+#include <StepRepr_ProductDefinitionShape.hxx>
+#include <StepRepr_PropertyDefinitionRepresentation.hxx>
+#include <StepRepr_Representation.hxx>
+#include <TransferBRep.hxx>
+#include <Transfer_Binder.hxx>
+#include <Transfer_TransientProcess.hxx>
+#include <XSControl_TransferReader.hxx>
+#include <XSControl_WorkSession.hxx>
+
+#include <BRep_Builder.hxx>
+
+#include <TopExp.hxx>
+#include <TopExp_Explorer.hxx>
+#include <TopTools_IndexedMapOfShape.hxx>
+#include <TopoDS_Compound.hxx>
+#include <TopoDS_Iterator.hxx>
+
+#include <TColStd_SequenceOfAsciiString.hxx>
+
+#include <Standard_Failure.hxx>
+#include <Standard_ErrorHandler.hxx> // CAREFUL ! position of this file is critic : see Lucien PIGNOLONI / OCC
+
+namespace STEPImport {
+//=============================================================================
+/*!
+ *  GetShape()
+ */
+//=============================================================================
+
+static TopoDS_Shape GetShape(const Handle(Standard_Transient)        &theEnti,
+                             const Handle(Transfer_TransientProcess) &theTP)
+{
+  TopoDS_Shape            aResult;
+  Handle(Transfer_Binder) aBinder = theTP->Find(theEnti);
+
+  if (aBinder.IsNull()) {
+    return aResult;
+  }
+
+  aResult = TransferBRep::ShapeResult(aBinder);
+
+  return aResult;
+}
+
+//=============================================================================
+/*!
+ *  GetLabel()
+ */
+//=============================================================================
+
+static TDF_Label GetLabel(const Handle(Standard_Transient) &theEnti,
+                          const TDF_Label                  &theShapeLabel,
+                          const TopoDS_Shape               &aShape)
+{
+  TDF_Label aResult;
+
+  if (theEnti->IsKind
+            (STANDARD_TYPE(StepGeom_GeometricRepresentationItem))) {
+    // check all named shapes using iterator
+    TDF_ChildIDIterator anIt
+      (theShapeLabel, TDataStd_Name::GetID(), Standard_True);
+
+    for (; anIt.More(); anIt.Next()) {
+      Handle(TDataStd_Name) nameAttr =
+        Handle(TDataStd_Name)::DownCast(anIt.Value());
+
+      if (nameAttr.IsNull()) {
+        continue;
+      }
+
+      TDF_Label aLab = nameAttr->Label();
+      Handle(TNaming_NamedShape) shAttr; 
+
+      if (aLab.FindAttribute(TNaming_NamedShape::GetID(), shAttr) &&
+          shAttr->Get().IsEqual(aShape)) {
+        aResult = aLab;
+      }
+    }
+  }
+
+  // create label and set shape
+  if (aResult.IsNull()) {
+    TDF_TagSource aTag;
+
+    aResult = aTag.NewChild(theShapeLabel);
+
+    TNaming_Builder tnBuild (aResult);
+
+    tnBuild.Generated(aShape);
+  }
+
+  return aResult;
+}
+
+//=============================================================================
+/*!
+ *  StoreName()
+ */
+//=============================================================================
+
+static void StoreName(const Handle(Standard_Transient)        &theEnti,
+                      const TopTools_IndexedMapOfShape        &theIndices,
+                      const Handle(Transfer_TransientProcess) &theTP,
+                      const TDF_Label                         &theShapeLabel)
+{
+  Handle(TCollection_HAsciiString) aName;
+
+  if (theEnti->IsKind(STANDARD_TYPE(StepShape_TopologicalRepresentationItem)) ||
+      theEnti->IsKind(STANDARD_TYPE(StepGeom_GeometricRepresentationItem))) {
+    aName = Handle(StepRepr_RepresentationItem)::DownCast(theEnti)->Name();
+  } else {
+    Handle(StepBasic_ProductDefinition) PD =
+      Handle(StepBasic_ProductDefinition)::DownCast(theEnti);
+
+    if (PD.IsNull() == Standard_False) {
+      Handle(StepBasic_Product) Prod = PD->Formation()->OfProduct();
+      aName = Prod->Name();
+    }
+  }
+
+  bool isValidName = false;
+
+  if (aName.IsNull() == Standard_False) {
+    isValidName = true;
+
+    if (aName->UsefullLength() < 1) {
+      isValidName = false;
+    } else if (aName->UsefullLength() == 4 &&
+               toupper (aName->Value(1)) == 'N' &&
+               toupper (aName->Value(2)) == 'O' &&
+               toupper (aName->Value(3)) == 'N' &&
+               toupper (aName->Value(4)) == 'E') {
+      // skip 'N0NE' name
+      isValidName = false;
+    } else {
+      // special check to pass names like "Open CASCADE STEP translator 6.3 1"
+      TCollection_AsciiString aSkipName ("Open CASCADE STEP translator");
+
+      if (aName->Length() >= aSkipName.Length()) {
+        if (aName->String().SubString
+                            (1, aSkipName.Length()).IsEqual(aSkipName)) {
+          isValidName = false;
+        }
+      }
+    }
+  }
+
+  if (isValidName) {
+    TCollection_ExtendedString aNameExt (aName->ToCString());
+
+    // find target shape
+    TopoDS_Shape S = GetShape(theEnti, theTP);
+
+    if (S.IsNull()) {
+      return;
+    }
+
+    // as PRODUCT can be included in the main shape
+    // several times, we look here for all iclusions.
+    Standard_Integer isub, nbSubs = theIndices.Extent();
+
+    for (isub = 1; isub <= nbSubs; isub++) {
+      TopoDS_Shape aSub = theIndices.FindKey(isub);
+
+      if (aSub.IsPartner(S)) {
+        TDF_Label L = GetLabel(theEnti, theShapeLabel, aSub);
+
+        // set a name
+        TDataStd_Name::Set(L, aNameExt);
+      }
+    }
+  }
+}
+
+//=============================================================================
+/*!
+ *  StoreMaterial()
+ */
+//=============================================================================
+
+static void StoreMaterial
+                    (const Handle(Standard_Transient)        &theEnti,
+                     const TopTools_IndexedMapOfShape        &theIndices,
+                     const Handle(Transfer_TransientProcess) &theTP,
+                     const TDF_Label                         &theShapeLabel)
+{
+  // Treat Product Definition Shape only.
+  Handle(StepRepr_ProductDefinitionShape) aPDS =
+      Handle(StepRepr_ProductDefinitionShape)::DownCast(theEnti);
+  Handle(StepBasic_ProductDefinition)     aProdDef;
+
+  if(aPDS.IsNull() == Standard_False) {
+    // Product Definition Shape ==> Product Definition
+    aProdDef = aPDS->Definition().ProductDefinition();
+  }
+
+  if (aProdDef.IsNull() == Standard_False) {
+    // Product Definition ==> Property Definition
+    const Interface_Graph    &aGraph = theTP->Graph();
+    Interface_EntityIterator  aSubs  = aGraph.Sharings(aProdDef);
+    TopoDS_Shape              aShape;
+
+    for(aSubs.Start(); aSubs.More(); aSubs.Next()) {
+      Handle(StepRepr_PropertyDefinition) aPropD =
+        Handle(StepRepr_PropertyDefinition)::DownCast(aSubs.Value());
+
+      if(aPropD.IsNull() == Standard_False) {
+        // Property Definition ==> Representation.
+        Interface_EntityIterator aSubs1 = aGraph.Sharings(aPropD);
+
+        for(aSubs1.Start(); aSubs1.More(); aSubs1.Next()) {
+          Handle(StepRepr_PropertyDefinitionRepresentation) aPDR =
+            Handle(StepRepr_PropertyDefinitionRepresentation)::
+              DownCast(aSubs1.Value());
+
+          if(aPDR.IsNull() == Standard_False) {
+            // Property Definition ==> Material Name.
+            Handle(StepRepr_Representation) aRepr = aPDR->UsedRepresentation();
+
+            if(aRepr.IsNull() == Standard_False) {
+              Standard_Integer ir;
+
+              for(ir = 1; ir <= aRepr->NbItems(); ir++) {
+                Handle(StepRepr_RepresentationItem) aRI = aRepr->ItemsValue(ir);
+                Handle(StepRepr_DescriptiveRepresentationItem) aDRI =
+                  Handle(StepRepr_DescriptiveRepresentationItem)::DownCast(aRI);
+
+                if(aDRI.IsNull() == Standard_False) {
+                  // Get shape from Product Definition
+                  Handle(TCollection_HAsciiString) aMatName = aDRI->Name();
+
+                  if(aMatName.IsNull() == Standard_False) {
+                    TCollection_ExtendedString
+                                 aMatNameExt (aMatName->ToCString());
+
+                    if (aShape.IsNull()) {
+                      // Get the shape.
+                      aShape = GetShape(aProdDef, theTP);
+
+                      if (aShape.IsNull()) {
+                        return;
+                      }
+                    }
+
+                    // as PRODUCT can be included in the main shape
+                    // several times, we look here for all iclusions.
+                    Standard_Integer isub, nbSubs = theIndices.Extent();
+
+                    for (isub = 1; isub <= nbSubs; isub++) {
+                      TopoDS_Shape aSub = theIndices.FindKey(isub);
+
+                      if (aSub.IsPartner(aShape)) {
+                        TDF_Label aLabel =
+                          GetLabel(aProdDef, theShapeLabel, aSub);
+
+                        // set a name
+                        TDataStd_Comment::Set(aLabel, aMatNameExt);
+                      }
+                    }
+                  }
+                }
+              }
+            }
+          }
+        }
+      }
+    }
+  }
+}
+
+//=============================================================================
+/*!
+ *  Import()
+ */
+//=============================================================================
+
+Handle(TCollection_HAsciiString) GetValue (const TCollection_AsciiString& theFileName,
+                                           const TCollection_AsciiString& theParameterName,
+                                           TCollection_AsciiString&       theError)
+{
+  Handle(TCollection_HAsciiString) aValue;
+
+  if (theParameterName != "LEN_UNITS") {
+    theError = theParameterName + " parameter reading is not supported by STEP plugin";
+    return aValue;
+  }
+
+  // Set "C" numeric locale to save numbers correctly
+  // Kernel_Utils::Localizer loc;
+
+  STEPControl_Reader aReader;
+
+  Interface_Static::SetCVal("xstep.cascade.unit","M");
+  Interface_Static::SetIVal("read.step.ideas", 1);
+  Interface_Static::SetIVal("read.step.nonmanifold", 1);
+
+  try {
+#if OCC_VERSION_LARGE > 0x06010000
+    OCC_CATCH_SIGNALS;
+#endif
+    IFSelect_ReturnStatus status = aReader.ReadFile(theFileName.ToCString());
+    if (status == IFSelect_RetDone) {
+      TColStd_SequenceOfAsciiString anUnitLengthNames;
+      TColStd_SequenceOfAsciiString anUnitAngleNames;
+      TColStd_SequenceOfAsciiString anUnitSolidAngleNames;
+      aReader.FileUnits(anUnitLengthNames, anUnitAngleNames, anUnitSolidAngleNames);
+      if (anUnitLengthNames.Length() > 0) {
+        aValue = new TCollection_HAsciiString( anUnitLengthNames.First() );
+        /*
+        TCollection_AsciiString aLenUnits = anUnitLengthNames.First();
+        if (aLenUnits == "millimetre")
+          aValue = new TCollection_HAsciiString ("MM");
+        else if (aLenUnits == "centimetre")
+          aValue = new TCollection_HAsciiString ("CM");
+        else if (aLenUnits == "metre")
+          aValue = new TCollection_HAsciiString ("M");
+        else if (aLenUnits == "INCH")
+          aValue = new TCollection_HAsciiString ("INCH");
+        // TODO (for other units than mm, cm, m or inch)
+        //else if (aLenUnits == "")
+        //  aValue = new TCollection_HAsciiString ("");
+
+        // tmp begin
+        //std::cout << "$$$ --- " << anUnitLengthNames.First();
+        //for (int ii = 2; ii <= anUnitLengthNames.Length(); ii++)
+        //  std::cout << ", " << anUnitLengthNames.Value(ii);
+        //std::cout << std::endl;
+        // tmp end
+        */
+      }
+    }
+    else {
+      theError = theFileName + " reading failed";
+    }
+  }
+  catch (Standard_Failure) {
+    Handle(Standard_Failure) aFail = Standard_Failure::Caught();
+    theError = aFail->GetMessageString();
+  }
+
+  return aValue;
+}
+
+TopoDS_Shape Import (const TCollection_AsciiString& theFileName,
+                     const TCollection_AsciiString& theFormatName,
+                     TCollection_AsciiString&       theError,
+                     const TDF_Label&               theShapeLabel)
+{
+  TopoDS_Shape aResShape;
+
+  // Set "C" numeric locale to save numbers correctly
+  // Kernel_Utils::Localizer loc;
+
+  STEPControl_Reader aReader;
+
+  //VSR: 16/09/09: Convert to METERS
+  Interface_Static::SetCVal("xstep.cascade.unit","M");
+  Interface_Static::SetIVal("read.step.ideas", 1);
+  Interface_Static::SetIVal("read.step.nonmanifold", 1);
+
+  BRep_Builder B;
+  TopoDS_Compound compound;
+  B.MakeCompound(compound);
+
+  try {
+    OCC_CATCH_SIGNALS;
+
+    IFSelect_ReturnStatus status = aReader.ReadFile(theFileName.ToCString());
+
+    if (status == IFSelect_RetDone) {
+
+      // Regard or not the model units
+      if (theFormatName == "STEP_SCALE") {
+        // set UnitFlag to units from file
+        TColStd_SequenceOfAsciiString anUnitLengthNames;
+        TColStd_SequenceOfAsciiString anUnitAngleNames;
+        TColStd_SequenceOfAsciiString anUnitSolidAngleNames;
+        aReader.FileUnits(anUnitLengthNames, anUnitAngleNames, anUnitSolidAngleNames);
+        if (anUnitLengthNames.Length() > 0) {
+          TCollection_AsciiString aLenUnits = anUnitLengthNames.First();
+          if (aLenUnits == "millimetre")
+            Interface_Static::SetCVal("xstep.cascade.unit", "MM");
+          else if (aLenUnits == "centimetre")
+            Interface_Static::SetCVal("xstep.cascade.unit", "CM");
+          else if (aLenUnits == "metre" || aLenUnits.IsEmpty())
+            Interface_Static::SetCVal("xstep.cascade.unit", "M");
+          else if (aLenUnits == "INCH")
+            Interface_Static::SetCVal("xstep.cascade.unit", "INCH");
+          else {
+            theError = "The file contains not supported units.";
+            return aResShape;
+          }
+          // TODO (for other units than mm, cm, m or inch)
+          //else if (aLenUnits == "")
+          //  Interface_Static::SetCVal("xstep.cascade.unit", "???");
+        }
+      }
+      else {
+        //cout<<"need re-scale a model"<<endl;
+        // set UnitFlag to 'meter'
+        Interface_Static::SetCVal("xstep.cascade.unit","M");
+      }
+
+      Standard_Boolean failsonly = Standard_False;
+      aReader.PrintCheckLoad(failsonly, IFSelect_ItemsByEntity);
+
+      /* Root transfers */
+      Standard_Integer nbr = aReader.NbRootsForTransfer();
+      aReader.PrintCheckTransfer(failsonly, IFSelect_ItemsByEntity);
+
+      for (Standard_Integer n = 1; n <= nbr; n++) {
+        Standard_Boolean ok = aReader.TransferRoot(n);
+        /* Collecting resulting entities */
+        Standard_Integer nbs = aReader.NbShapes();
+        if (!ok || nbs == 0)
+        {
+          // THROW_SALOME_CORBA_EXCEPTION("Exception catched in GEOM_Gen_i::ImportStep", SALOME::BAD_PARAM);
+          continue; // skip empty root
+        }
+        /* For a single entity */
+        else if (nbr == 1 && nbs == 1) {
+          aResShape = aReader.Shape(1);
+          // ATTENTION: this is a workaround for mantis issue 0020442 remark 0010776
+          // It should be removed after patching OCCT for bug OCC22436
+          // (fix for OCCT is expected in service pack next to OCCT6.3sp12)
+          if (aResShape.ShapeType() == TopAbs_COMPOUND) {
+            int nbSub1 = 0;
+            TopoDS_Shape currShape;
+            TopoDS_Iterator It (aResShape, Standard_True, Standard_True);
+            for (; It.More(); It.Next()) {
+              nbSub1++;
+              currShape = It.Value();
+            }
+            if (nbSub1 == 1)
+              aResShape = currShape;
+          }
+          // END workaround
+          break;
+        }
+
+        for (Standard_Integer i = 1; i <= nbs; i++) {
+          TopoDS_Shape aShape = aReader.Shape(i);
+          if (aShape.IsNull()) {
+            // THROW_SALOME_CORBA_EXCEPTION("Null shape in GEOM_Gen_i::ImportStep", SALOME::BAD_PARAM) ;
+            //return aResShape;
+            continue;
+          }
+          else {
+            B.Add(compound, aShape);
+          }
+        }
+      }
+      if (aResShape.IsNull())
+        aResShape = compound;
+
+      // Check if any BRep entity has been read, there must be at least a vertex
+      if ( !TopExp_Explorer( aResShape, TopAbs_VERTEX ).More() )
+      {
+        theError = "No geometrical data in the imported file.";
+        return TopoDS_Shape();
+      }
+
+      // BEGIN: Store names and materials of sub-shapes from file
+      TopTools_IndexedMapOfShape anIndices;
+      TopExp::MapShapes(aResShape, anIndices);
+
+      Handle(Interface_InterfaceModel) Model = aReader.WS()->Model();
+      Handle(XSControl_TransferReader) TR = aReader.WS()->TransferReader();
+      if (!TR.IsNull()) {
+        Handle(Transfer_TransientProcess) TP = TR->TransientProcess();
+
+        Standard_Integer nb = Model->NbEntities();
+
+        for (Standard_Integer ie = 1; ie <= nb; ie++) {
+          Handle(Standard_Transient) enti = Model->Value(ie);
+
+          // Store names.
+          StoreName(enti, anIndices, TP, theShapeLabel);
+
+          // Store materials.
+          StoreMaterial(enti, anIndices, TP, theShapeLabel);
+        }
+      }
+      // END: Store names and materials
+    }
+    else {
+//        switch (status) {
+//        case IFSelect_RetVoid:
+//          theError = "Nothing created or No data to process";
+//          break;
+//        case IFSelect_RetError:
+//          theError = "Error in command or input data";
+//          break;
+//        case IFSelect_RetFail:
+//          theError = "Execution was run, but has failed";
+//          break;
+//        case IFSelect_RetStop:
+//          theError = "Execution has been stopped. Quite possible, an exception was raised";
+//          break;
+//        default:
+//          break;
+//        }
+      theError = "Wrong format of the imported file. Can't import file.";
+      aResShape.Nullify();
+    }
+  }
+  catch (Standard_Failure) {
+    Handle(Standard_Failure) aFail = Standard_Failure::Caught();
+    theError = aFail->GetMessageString();
+    aResShape.Nullify();
+  }
+  // Return previous locale
+  return aResShape;
+}
+
+} // namespace STEPImport
diff --git a/src/ExchangePlugin/ExchangePlugin_STEPImport.h b/src/ExchangePlugin/ExchangePlugin_STEPImport.h
new file mode 100644 (file)
index 0000000..784e665
--- /dev/null
@@ -0,0 +1,27 @@
+// Copyright (C) 2014-20xx CEA/DEN, EDF R&D
+
+/*
+ * ExchangePlugin_STEPImport.h
+ *
+ *  Created on: Dec 24, 2014
+ *      Author: sbh
+ */
+
+#include <ExchangePlugin.h>
+
+#include <TCollection_AsciiString.hxx>
+#include <TCollection_HAsciiString.hxx>
+#include <TopoDS_Shape.hxx>
+#include <TDF_Label.hxx>
+
+namespace STEPImport {
+
+EXCHANGEPLUGIN_EXPORT
+Handle(TCollection_HAsciiString) GetValue(const TCollection_AsciiString& theFileName,
+                                          const TCollection_AsciiString& theParameterName,
+                                          TCollection_AsciiString& theError);
+EXCHANGEPLUGIN_EXPORT
+TopoDS_Shape Import(const TCollection_AsciiString& theFileName,
+                    const TCollection_AsciiString& theFormatName, TCollection_AsciiString& theError,
+                    const TDF_Label& theShapeLabel);
+}