0025092: COMPSOLIDs are not exported to STEP

Now COMPSOLID is translated like a set of SOLIDs.

Test cases for issue CR25092

diff --git a/src/STEPControl/STEPControl_ActorWrite.cxx b/src/STEPControl/STEPControl_ActorWrite.cxx
index 8ee57c7efbaeb3280fd00a07f591f02caee97d43..d7cd779b2ec099c89b9d7115276b7cff1ad2ab55 100644 (file)
--- a/src/STEPControl/STEPControl_ActorWrite.cxx
+++ b/src/STEPControl/STEPControl_ActorWrite.cxx
@@ -827,14 +827,23 @@ Handle(Transfer_Binder) STEPControl_ActorWrite::TransferShape (const Handle(Tran
   else if (theShape.ShapeType() == TopAbs_FACE) {
     RepItemSeq->Append(TopoDS::Face(theShape));
   }
+  else if (theShape.ShapeType() == TopAbs_COMPSOLID) {
+    FP->AddWarning(start,"NonManifold COMPSOLID was translated like a set of SOLIDs");
+    if ( GroupMode() > 0)
+      return TransferCompound(start, SDR0, FP);
+    else {
+      TopExp_Explorer SolidExp;
+      for (SolidExp.Init(theShape, TopAbs_SOLID);
+           SolidExp.More();SolidExp.Next()) {
+        RepItemSeq->Append(TopoDS::Solid(SolidExp.Current()));
+      }
+    }
+  }
+
   else if (mymode != STEPControl_GeometricCurveSet && mymode != STEPControl_AsIs) {
     FP->AddFail(start,"The Shape is not a SOLID, nor a SHELL, nor a FACE");
     return binder;
   }
-  else if (theShape.ShapeType() == TopAbs_COMPSOLID) {
-    FP->AddWarning(start, "COMPSOLID is not exported yet"); 
-    return binder;
-  }
   else RepItemSeq->Append (theShape);
 
   //    COMPUTING 3D TOLERANCE

diff --git a/tests/bugs/step/bug25092 b/tests/bugs/step/bug25092
new file mode 100755 (executable)
index 0000000..8130e1e
--- /dev/null
+++ b/tests/bugs/step/bug25092
@@ -0,0 +1,14 @@
+puts "============"
+puts "OCC25092"
+puts "============"
+puts ""
+#######################################################################
+# COMPSOLIDs are not exported to STEP
+#######################################################################
+
+restore [locate_data_file bug25092_compsolid.brep] b 
+
+set aFile ${imagedir}/bug25092.stp
+catch { file delete ${aFile} }
+
+stepwrite 0 b ${aFile}