ForkMaster/geom
1
0
Fork 0
mirror of https://git.salome-platform.org/gitpub/modules/geom.git synced 2025-05-11 00:50:48 +05:00
Code Issues Packages Projects Releases Wiki Activity

PAL7508: Complete implementation of GetShapesOn*() methods

Browse Source
This commit is contained in:
jfa 2004-12-28 13:57:11 +00:00
parent e009c0a60d
commit e4a1315bdd
1 changed files with 98 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

107
src/GEOMImpl/GEOMImpl_IShapesOperations.cxx
View File

@ -27,8 +27,12 @@ using namespace std;
#include <TDataStd_Integer.hxx>
#include <TDF_Tool.hxx>
#include <BRepExtrema_ExtCF.hxx>
#include <BRep_Tool.hxx>
#include <BRepGProp.hxx>
#include <BRepAdaptor_Curve.hxx>
#include <BRepBuilderAPI_MakeFace.hxx>
#include <TopAbs.hxx>
#include <TopExp.hxx>
@ -39,6 +43,7 @@ using namespace std;
#include <TopoDS_Vertex.hxx>
#include <TopoDS_Iterator.hxx>
#include <TopExp_Explorer.hxx>
#include <TopLoc_Location.hxx>
#include <TopTools_MapOfShape.hxx>
#include <TopTools_Array1OfShape.hxx>
#include <TopTools_ListIteratorOfListOfShape.hxx>
@ -48,6 +53,9 @@ using namespace std;
#include <Geom_Plane.hxx>
#include <Geom_SphericalSurface.hxx>
#include <Geom_CylindricalSurface.hxx>
#include <GeomAdaptor_Surface.hxx>
#include <Geom2d_Curve.hxx>
#include <GProp_GProps.hxx>
#include <gp_Pnt.hxx>
@ -1061,13 +1069,32 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnPlane
break;
case TopAbs_EDGE:
{
TopoDS_Edge anE = TopoDS::Edge(aSS);
Standard_Real pf, pl;
Handle(Geom_Curve) cur_curve = BRep_Tool::Curve(anE, pf, pl);
if (true) {
TopoDS_Edge anEdge = TopoDS::Edge(aSS);
Standard_Real f, l;
Handle(Geom2d_Curve) PC;
Handle(Geom_Surface) cur_surf;
TopLoc_Location L;
Standard_Integer i = 0;
// iterate on the surfaces of the edge
while (Standard_True) {
i++;
BRep_Tool::CurveOnSurface(anEdge, PC , cur_surf, L, f, l, i);
if (cur_surf.IsNull()) break;
Handle(Geom_Plane) cur_pln = Handle(Geom_Plane)::DownCast(cur_surf);
if (!cur_pln.IsNull()) {
const gp_Ax3 cur_pos = cur_pln->Position();
const gp_Pnt cur_loc = cur_pos.Location();
const gp_Dir cur_dir = cur_pos.Direction();
gp_Vec vecToLoc (cur_loc, loc);
if (vecToLoc.IsNormal(dir, Precision::Angular()) &&
cur_dir.IsParallel(dir, Precision::Angular())) {
listSS.Append(aSS);
}
}
}
}
break;
case TopAbs_FACE:
{
@ -1092,6 +1119,11 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnPlane
}
}
if (listSS.Extent() < 1) {
SetErrorCode("Not a single sub-shape of the requested type found on the given plane");
return NULL;
}
//Fill array of indices
TopTools_IndexedMapOfShape anIndices;
TopExp::MapShapes(aShape, anIndices);
@ -1195,13 +1227,35 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnCylinder
break;
case TopAbs_EDGE:
{
TopoDS_Edge anE = TopoDS::Edge(aSS);
Standard_Real pf, pl;
Handle(Geom_Curve) cur_curve = BRep_Tool::Curve(anE, pf, pl);
if (true) {
TopoDS_Edge anEdge = TopoDS::Edge(aSS);
Standard_Real f, l;
Handle(Geom2d_Curve) PC;
Handle(Geom_Surface) cur_surf;
TopLoc_Location L;
Standard_Integer i = 0;
// iterate on the surfaces of the edge
while (Standard_True) {
i++;
BRep_Tool::CurveOnSurface(anEdge, PC , cur_surf, L, f, l, i);
if (cur_surf.IsNull()) break;
Handle(Geom_CylindricalSurface) cur_cyl =
Handle(Geom_CylindricalSurface)::DownCast(cur_surf);
if (!cur_cyl.IsNull()) {
const gp_Ax3 cur_pos = cur_cyl->Position();
const gp_Pnt cur_loc = cur_pos.Location();
const gp_Dir cur_dir = cur_pos.Direction();
const Standard_Real cur_rad = cur_cyl->Radius();
gp_Vec vecToLoc (cur_loc, loc);
if (vecToLoc.IsParallel(dir, Precision::Angular()) &&
cur_dir.IsParallel(dir, Precision::Angular()) &&
Abs(cur_rad - theRadius) < Precision::Confusion()) {
listSS.Append(aSS);
}
}
}
}
break;
case TopAbs_FACE:
{
@ -1229,6 +1283,11 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnCylinder
}
}
if (listSS.Extent() < 1) {
SetErrorCode("Not a single sub-shape of the requested type found on the given cylinder");
return NULL;
}
//Fill array of indices
TopTools_IndexedMapOfShape anIndices;
TopExp::MapShapes(aShape, anIndices);
@ -1319,13 +1378,32 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnSphere
break;
case TopAbs_EDGE:
{
TopoDS_Edge anE = TopoDS::Edge(aSS);
Standard_Real pf, pl;
Handle(Geom_Curve) cur_curve = BRep_Tool::Curve(anE, pf, pl);
if (true) {
TopoDS_Edge anEdge = TopoDS::Edge(aSS);
Standard_Real f, l;
Handle(Geom2d_Curve) PC;
Handle(Geom_Surface) cur_surf;
TopLoc_Location L;
Standard_Integer i = 0;
// iterate on the surfaces of the edge
while (Standard_True) {
i++;
BRep_Tool::CurveOnSurface(anEdge, PC , cur_surf, L, f, l, i);
if (cur_surf.IsNull()) break;
Handle(Geom_SphericalSurface) cur_sph =
Handle(Geom_SphericalSurface)::DownCast(cur_surf);
if (!cur_sph.IsNull()) {
const gp_Ax3 cur_pos = cur_sph->Position();
const gp_Pnt cur_loc = cur_pos.Location();
const Standard_Real cur_rad = cur_sph->Radius();
if (cur_loc.Distance(aC) < Precision::Confusion() &&
Abs(cur_rad - theRadius) < Precision::Confusion()) {
listSS.Append(aSS);
}
}
}
}
break;
case TopAbs_FACE:
{
@ -1350,6 +1428,11 @@ Handle(GEOM_Object) GEOMImpl_IShapesOperations::GetShapesOnSphere
}
}
if (listSS.Extent() < 1) {
SetErrorCode("Not a single sub-shape of the requested type found on the given sphere");
return NULL;
}
//Fill array of indices
TopTools_IndexedMapOfShape anIndices;
TopExp::MapShapes(aShape, anIndices);