1 // Copyright (C) 2007-2010 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
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.
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.
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
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 #include <Standard_Stream.hxx>
25 #include <GEOMImpl_IMeasureOperations.hxx>
27 #include <GEOMImpl_Types.hxx>
28 #include <GEOMImpl_MeasureDriver.hxx>
29 #include <GEOMImpl_IMeasure.hxx>
31 #include <GEOMAlgo_ShapeInfo.hxx>
32 #include <GEOMAlgo_ShapeInfoFiller.hxx>
34 #include <GEOM_Function.hxx>
35 #include <GEOM_PythonDump.hxx>
37 #include <utilities.h>
39 #include <Utils_ExceptHandlers.hxx>
42 #include <TFunction_DriverTable.hxx>
43 #include <TFunction_Driver.hxx>
44 #include <TFunction_Logbook.hxx>
45 #include <TDF_Tool.hxx>
47 #include <BRep_Tool.hxx>
48 #include <BRepAdaptor_Surface.hxx>
49 #include <BRepBndLib.hxx>
50 #include <BRepCheck.hxx>
51 #include <BRepCheck_Result.hxx>
52 #include <BRepCheck_ListIteratorOfListOfStatus.hxx>
53 #include <BRepExtrema_DistShapeShape.hxx>
54 #include <BRepGProp.hxx>
55 #include <BRepTools.hxx>
57 #include <Bnd_Box.hxx>
59 #include <GProp_GProps.hxx>
60 #include <GProp_PrincipalProps.hxx>
64 #include <TopoDS_Edge.hxx>
65 #include <TopoDS_Face.hxx>
66 #include <TopoDS_Shape.hxx>
67 #include <TopoDS_Vertex.hxx>
68 #include <TopoDS_Iterator.hxx>
69 #include <TopExp_Explorer.hxx>
70 #include <TopTools_MapOfShape.hxx>
71 #include <TopTools_ListOfShape.hxx>
72 #include <TopTools_ListIteratorOfListOfShape.hxx>
74 #include <GeomAbs_SurfaceType.hxx>
75 #include <Geom_Surface.hxx>
76 #include <Geom_Plane.hxx>
77 #include <Geom_SphericalSurface.hxx>
78 #include <Geom_CylindricalSurface.hxx>
79 #include <Geom_ToroidalSurface.hxx>
80 #include <Geom_ConicalSurface.hxx>
81 #include <Geom_SurfaceOfLinearExtrusion.hxx>
82 #include <Geom_SurfaceOfRevolution.hxx>
83 #include <Geom_BezierSurface.hxx>
84 #include <Geom_BSplineSurface.hxx>
85 #include <Geom_RectangularTrimmedSurface.hxx>
86 #include <Geom_OffsetSurface.hxx>
87 #include <Geom_Line.hxx>
92 #include <GeomAPI_ProjectPointOnCurve.hxx>
93 #include <GeomLProp_CLProps.hxx>
94 #include <GeomLProp_SLProps.hxx>
95 #include <ShapeAnalysis.hxx>
96 #include <ShapeAnalysis_Surface.hxx>
98 #include <Standard_Failure.hxx>
99 #include <Standard_ErrorHandler.hxx> // CAREFUL ! position of this file is critic : see Lucien PIGNOLONI / OCC
101 #include <BRepClass3d_SolidClassifier.hxx>
102 #include <BRep_Builder.hxx>
103 #include <GeomAPI_IntSS.hxx>
104 #include <Geom_Circle.hxx>
105 #include <Geom_SphericalSurface.hxx>
106 #include <Geom_ToroidalSurface.hxx>
107 #include <ShapeFix_Shape.hxx>
108 #include <TopoDS_Compound.hxx>
111 //=============================================================================
115 //=============================================================================
116 GEOMImpl_IMeasureOperations::GEOMImpl_IMeasureOperations (GEOM_Engine* theEngine, int theDocID)
117 : GEOM_IOperations(theEngine, theDocID)
119 MESSAGE("GEOMImpl_IMeasureOperations::GEOMImpl_IMeasureOperations");
122 //=============================================================================
126 //=============================================================================
127 GEOMImpl_IMeasureOperations::~GEOMImpl_IMeasureOperations()
129 MESSAGE("GEOMImpl_IMeasureOperations::~GEOMImpl_IMeasureOperations");
132 //=============================================================================
133 /*! Get kind and parameters of the given shape.
135 //=============================================================================
136 GEOMImpl_IMeasureOperations::ShapeKind GEOMImpl_IMeasureOperations::KindOfShape
137 (Handle(GEOM_Object) theShape,
138 Handle(TColStd_HSequenceOfInteger)& theIntegers,
139 Handle(TColStd_HSequenceOfReal)& theDoubles)
142 ShapeKind aKind = SK_NO_SHAPE;
144 if (theIntegers.IsNull()) theIntegers = new TColStd_HSequenceOfInteger;
145 else theIntegers->Clear();
147 if (theDoubles.IsNull()) theDoubles = new TColStd_HSequenceOfReal;
148 else theDoubles->Clear();
150 if (theShape.IsNull())
153 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
154 if (aRefShape.IsNull()) return aKind;
156 TopoDS_Shape aShape = aRefShape->GetValue();
157 if (aShape.IsNull()) return aKind;
159 int geom_type = theShape->GetType();
161 // check if it's advanced shape
162 if ( geom_type > ADVANCED_BASE ) {
168 GEOMAlgo_ShapeInfoFiller aSF;
169 aSF.SetShape(aShape);
171 Standard_Integer iErr = aSF.ErrorStatus();
173 SetErrorCode("Error in GEOMAlgo_ShapeInfoFiller");
176 const GEOMAlgo_ShapeInfo& anInfo = aSF.Info();
178 // Interprete results
179 TopAbs_ShapeEnum aType = anInfo.Type();
182 case TopAbs_COMPOUND:
183 case TopAbs_COMPSOLID:
185 // (+) geompy.kind.COMPOUND nb_solids nb_faces nb_edges nb_vertices
186 // (+) geompy.kind.COMPSOLID nb_solids nb_faces nb_edges nb_vertices
187 // ??? "nb_faces" - all faces or only 'standalone' faces?
188 if (aType == TopAbs_COMPOUND)
191 aKind = SK_COMPSOLID;
193 //theIntegers->Append(anInfo.NbSubShapes(TopAbs_COMPOUND));
194 //theIntegers->Append(anInfo.NbSubShapes(TopAbs_COMPSOLID));
195 theIntegers->Append(anInfo.NbSubShapes(TopAbs_SOLID));
196 theIntegers->Append(anInfo.NbSubShapes(TopAbs_FACE));
197 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
198 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
204 // (+) geompy.kind.SHELL geompy.info.closed nb_faces nb_edges nb_vertices
205 // (+) geompy.kind.SHELL geompy.info.unclosed nb_faces nb_edges nb_vertices
208 theIntegers->Append((int)anInfo.KindOfClosed());
210 theIntegers->Append(anInfo.NbSubShapes(TopAbs_FACE));
211 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
212 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
218 // (+) geompy.kind.WIRE geompy.info.closed nb_edges nb_vertices
219 // (+) geompy.kind.WIRE geompy.info.unclosed nb_edges nb_vertices
222 theIntegers->Append((int)anInfo.KindOfClosed());
224 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
225 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
233 GEOMAlgo_KindOfName aKN = anInfo.KindOfName();
236 case GEOMAlgo_KN_SPHERE:
237 // (+) geompy.kind.SPHERE xc yc zc R
241 gp_Pnt aC = anInfo.Location();
242 theDoubles->Append(aC.X());
243 theDoubles->Append(aC.Y());
244 theDoubles->Append(aC.Z());
246 theDoubles->Append(anInfo.Radius1());
249 case GEOMAlgo_KN_CYLINDER:
250 // (+) geompy.kind.CYLINDER xb yb zb dx dy dz R H
254 gp_Pnt aC = anInfo.Location();
255 theDoubles->Append(aC.X());
256 theDoubles->Append(aC.Y());
257 theDoubles->Append(aC.Z());
259 gp_Ax3 anAx3 = anInfo.Position();
260 gp_Dir aD = anAx3.Direction();
261 theDoubles->Append(aD.X());
262 theDoubles->Append(aD.Y());
263 theDoubles->Append(aD.Z());
265 theDoubles->Append(anInfo.Radius1());
266 theDoubles->Append(anInfo.Height());
269 case GEOMAlgo_KN_BOX:
270 // (+) geompy.kind.BOX xc yc zc ax ay az
274 gp_Pnt aC = anInfo.Location();
275 theDoubles->Append(aC.X());
276 theDoubles->Append(aC.Y());
277 theDoubles->Append(aC.Z());
279 gp_Ax3 anAx3 = anInfo.Position();
280 gp_Dir aD = anAx3.Direction();
281 gp_Dir aX = anAx3.XDirection();
284 if (aD.IsParallel(gp::DZ(), Precision::Angular()) &&
285 aX.IsParallel(gp::DX(), Precision::Angular())) {
286 theDoubles->Append(anInfo.Length()); // ax'
287 theDoubles->Append(anInfo.Width()); // ay'
288 theDoubles->Append(anInfo.Height()); // az'
290 else if (aD.IsParallel(gp::DZ(), Precision::Angular()) &&
291 aX.IsParallel(gp::DY(), Precision::Angular())) {
292 theDoubles->Append(anInfo.Width()); // ay'
293 theDoubles->Append(anInfo.Length()); // ax'
294 theDoubles->Append(anInfo.Height()); // az'
296 else if (aD.IsParallel(gp::DX(), Precision::Angular()) &&
297 aX.IsParallel(gp::DZ(), Precision::Angular())) {
298 theDoubles->Append(anInfo.Height()); // az'
299 theDoubles->Append(anInfo.Width()); // ay'
300 theDoubles->Append(anInfo.Length()); // ax'
302 else if (aD.IsParallel(gp::DX(), Precision::Angular()) &&
303 aX.IsParallel(gp::DY(), Precision::Angular())) {
304 theDoubles->Append(anInfo.Height()); // az'
305 theDoubles->Append(anInfo.Length()); // ax'
306 theDoubles->Append(anInfo.Width()); // ay'
308 else if (aD.IsParallel(gp::DY(), Precision::Angular()) &&
309 aX.IsParallel(gp::DZ(), Precision::Angular())) {
310 theDoubles->Append(anInfo.Width()); // ay'
311 theDoubles->Append(anInfo.Height()); // az'
312 theDoubles->Append(anInfo.Length()); // ax'
314 else if (aD.IsParallel(gp::DY(), Precision::Angular()) &&
315 aX.IsParallel(gp::DX(), Precision::Angular())) {
316 theDoubles->Append(anInfo.Length()); // ax'
317 theDoubles->Append(anInfo.Height()); // az'
318 theDoubles->Append(anInfo.Width()); // ay'
321 // (+) geompy.kind.ROTATED_BOX xo yo zo zx zy zz xx xy xz ax ay az
322 aKind = SK_ROTATED_BOX;
324 // Direction and XDirection
325 theDoubles->Append(aD.X());
326 theDoubles->Append(aD.Y());
327 theDoubles->Append(aD.Z());
329 theDoubles->Append(aX.X());
330 theDoubles->Append(aX.Y());
331 theDoubles->Append(aX.Z());
334 theDoubles->Append(anInfo.Length());
335 theDoubles->Append(anInfo.Width());
336 theDoubles->Append(anInfo.Height());
340 case GEOMAlgo_KN_TORUS:
341 // (+) geompy.kind.TORUS xc yc zc dx dy dz R_1 R_2
345 gp_Pnt aO = anInfo.Location();
346 theDoubles->Append(aO.X());
347 theDoubles->Append(aO.Y());
348 theDoubles->Append(aO.Z());
350 gp_Ax3 anAx3 = anInfo.Position();
351 gp_Dir aD = anAx3.Direction();
352 theDoubles->Append(aD.X());
353 theDoubles->Append(aD.Y());
354 theDoubles->Append(aD.Z());
356 theDoubles->Append(anInfo.Radius1());
357 theDoubles->Append(anInfo.Radius2());
360 case GEOMAlgo_KN_CONE:
361 // (+) geompy.kind.CONE xb yb zb dx dy dz R_1 R_2 H
365 gp_Pnt aO = anInfo.Location();
366 theDoubles->Append(aO.X());
367 theDoubles->Append(aO.Y());
368 theDoubles->Append(aO.Z());
370 gp_Ax3 anAx3 = anInfo.Position();
371 gp_Dir aD = anAx3.Direction();
372 theDoubles->Append(aD.X());
373 theDoubles->Append(aD.Y());
374 theDoubles->Append(aD.Z());
376 theDoubles->Append(anInfo.Radius1());
377 theDoubles->Append(anInfo.Radius2());
378 theDoubles->Append(anInfo.Height());
381 case GEOMAlgo_KN_POLYHEDRON:
382 // (+) geompy.kind.POLYHEDRON nb_faces nb_edges nb_vertices
384 aKind = SK_POLYHEDRON;
386 theIntegers->Append(anInfo.NbSubShapes(TopAbs_FACE));
387 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
388 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
392 // (+) geompy.kind.SOLID nb_faces nb_edges nb_vertices
394 theIntegers->Append(anInfo.NbSubShapes(TopAbs_FACE));
395 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
396 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
406 GEOMAlgo_KindOfName aKN = anInfo.KindOfName();
408 case GEOMAlgo_KN_SPHERE:
409 // (+) geompy.kind.SPHERE2D xc yc zc R
413 gp_Pnt aC = anInfo.Location();
414 theDoubles->Append(aC.X());
415 theDoubles->Append(aC.Y());
416 theDoubles->Append(aC.Z());
418 theDoubles->Append(anInfo.Radius1());
421 case GEOMAlgo_KN_CYLINDER:
422 // (+) geompy.kind.CYLINDER2D xb yb zb dx dy dz R H
424 aKind = SK_CYLINDER2D;
426 gp_Pnt aO = anInfo.Location();
427 theDoubles->Append(aO.X());
428 theDoubles->Append(aO.Y());
429 theDoubles->Append(aO.Z());
431 gp_Ax3 anAx3 = anInfo.Position();
432 gp_Dir aD = anAx3.Direction();
433 theDoubles->Append(aD.X());
434 theDoubles->Append(aD.Y());
435 theDoubles->Append(aD.Z());
437 theDoubles->Append(anInfo.Radius1());
438 theDoubles->Append(anInfo.Height());
441 case GEOMAlgo_KN_TORUS:
442 // (+) geompy.kind.TORUS2D xc yc zc dx dy dz R_1 R_2
446 gp_Pnt aO = anInfo.Location();
447 theDoubles->Append(aO.X());
448 theDoubles->Append(aO.Y());
449 theDoubles->Append(aO.Z());
451 gp_Ax3 anAx3 = anInfo.Position();
452 gp_Dir aD = anAx3.Direction();
453 theDoubles->Append(aD.X());
454 theDoubles->Append(aD.Y());
455 theDoubles->Append(aD.Z());
457 theDoubles->Append(anInfo.Radius1());
458 theDoubles->Append(anInfo.Radius2());
461 case GEOMAlgo_KN_CONE:
462 // (+) geompy.kind.CONE2D xc yc zc dx dy dz R_1 R_2 H
466 gp_Pnt aO = anInfo.Location();
467 theDoubles->Append(aO.X());
468 theDoubles->Append(aO.Y());
469 theDoubles->Append(aO.Z());
471 gp_Ax3 anAx3 = anInfo.Position();
472 gp_Dir aD = anAx3.Direction();
473 theDoubles->Append(aD.X());
474 theDoubles->Append(aD.Y());
475 theDoubles->Append(aD.Z());
477 theDoubles->Append(anInfo.Radius1());
478 theDoubles->Append(anInfo.Radius2());
479 theDoubles->Append(anInfo.Height());
482 case GEOMAlgo_KN_DISKCIRCLE:
483 // (+) geompy.kind.DISK_CIRCLE xc yc zc dx dy dz R
485 aKind = SK_DISK_CIRCLE;
487 gp_Pnt aC = anInfo.Location();
488 theDoubles->Append(aC.X());
489 theDoubles->Append(aC.Y());
490 theDoubles->Append(aC.Z());
492 gp_Ax3 anAx3 = anInfo.Position();
493 gp_Dir aD = anAx3.Direction();
494 theDoubles->Append(aD.X());
495 theDoubles->Append(aD.Y());
496 theDoubles->Append(aD.Z());
498 theDoubles->Append(anInfo.Radius1());
501 case GEOMAlgo_KN_DISKELLIPSE:
502 // (+) geompy.kind.DISK_ELLIPSE xc yc zc dx dy dz R_1 R_2
504 aKind = SK_DISK_ELLIPSE;
506 gp_Pnt aC = anInfo.Location();
507 theDoubles->Append(aC.X());
508 theDoubles->Append(aC.Y());
509 theDoubles->Append(aC.Z());
511 gp_Ax3 anAx3 = anInfo.Position();
512 gp_Dir aD = anAx3.Direction();
513 theDoubles->Append(aD.X());
514 theDoubles->Append(aD.Y());
515 theDoubles->Append(aD.Z());
517 theDoubles->Append(anInfo.Radius1());
518 theDoubles->Append(anInfo.Radius2());
521 case GEOMAlgo_KN_RECTANGLE:
522 case GEOMAlgo_KN_TRIANGLE:
523 case GEOMAlgo_KN_QUADRANGLE:
524 case GEOMAlgo_KN_POLYGON:
525 // (+) geompy.kind.POLYGON xo yo zo dx dy dz nb_edges nb_vertices
529 gp_Pnt aO = anInfo.Location();
530 theDoubles->Append(aO.X());
531 theDoubles->Append(aO.Y());
532 theDoubles->Append(aO.Z());
534 gp_Ax3 anAx3 = anInfo.Position();
535 gp_Dir aD = anAx3.Direction();
536 theDoubles->Append(aD.X());
537 theDoubles->Append(aD.Y());
538 theDoubles->Append(aD.Z());
540 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
541 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
544 case GEOMAlgo_KN_PLANE: // infinite
545 // (+) geompy.kind.PLANE xo yo zo dx dy dz
549 gp_Pnt aC = anInfo.Location();
550 theDoubles->Append(aC.X());
551 theDoubles->Append(aC.Y());
552 theDoubles->Append(aC.Z());
554 gp_Ax3 anAx3 = anInfo.Position();
555 gp_Dir aD = anAx3.Direction();
556 theDoubles->Append(aD.X());
557 theDoubles->Append(aD.Y());
558 theDoubles->Append(aD.Z());
562 if (anInfo.KindOfShape() == GEOMAlgo_KS_PLANE) {
563 // (+) geompy.kind.PLANAR xo yo zo dx dy dz nb_edges nb_vertices
567 gp_Pnt aC = anInfo.Location();
568 theDoubles->Append(aC.X());
569 theDoubles->Append(aC.Y());
570 theDoubles->Append(aC.Z());
572 gp_Ax3 anAx3 = anInfo.Position();
573 gp_Dir aD = anAx3.Direction();
574 theDoubles->Append(aD.X());
575 theDoubles->Append(aD.Y());
576 theDoubles->Append(aD.Z());
578 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
579 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
582 // ??? geompy.kind.FACE nb_edges nb_vertices _surface_type_id_
583 // (+) geompy.kind.FACE nb_edges nb_vertices
585 theIntegers->Append(anInfo.NbSubShapes(TopAbs_EDGE));
586 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
596 GEOMAlgo_KindOfName aKN = anInfo.KindOfName();
598 case GEOMAlgo_KN_CIRCLE:
600 // (+) geompy.kind.CIRCLE xc yc zc dx dy dz R
603 gp_Pnt aC = anInfo.Location();
604 theDoubles->Append(aC.X());
605 theDoubles->Append(aC.Y());
606 theDoubles->Append(aC.Z());
608 gp_Ax3 anAx3 = anInfo.Position();
609 gp_Dir aD = anAx3.Direction();
610 theDoubles->Append(aD.X());
611 theDoubles->Append(aD.Y());
612 theDoubles->Append(aD.Z());
614 theDoubles->Append(anInfo.Radius1());
617 case GEOMAlgo_KN_ARCCIRCLE:
619 // (+) geompy.kind.ARC_CIRCLE xc yc zc dx dy dz R x1 y1 z1 x2 y2 z2
620 aKind = SK_ARC_CIRCLE;
622 gp_Pnt aC = anInfo.Location();
623 theDoubles->Append(aC.X());
624 theDoubles->Append(aC.Y());
625 theDoubles->Append(aC.Z());
627 gp_Ax3 anAx3 = anInfo.Position();
628 gp_Dir aD = anAx3.Direction();
629 theDoubles->Append(aD.X());
630 theDoubles->Append(aD.Y());
631 theDoubles->Append(aD.Z());
633 theDoubles->Append(anInfo.Radius1());
635 gp_Pnt aP1 = anInfo.Pnt1();
636 theDoubles->Append(aP1.X());
637 theDoubles->Append(aP1.Y());
638 theDoubles->Append(aP1.Z());
640 gp_Pnt aP2 = anInfo.Pnt2();
641 theDoubles->Append(aP2.X());
642 theDoubles->Append(aP2.Y());
643 theDoubles->Append(aP2.Z());
646 case GEOMAlgo_KN_ELLIPSE:
648 // (+) geompy.kind.ELLIPSE xc yc zc dx dy dz R_1 R_2
651 gp_Pnt aC = anInfo.Location();
652 theDoubles->Append(aC.X());
653 theDoubles->Append(aC.Y());
654 theDoubles->Append(aC.Z());
656 gp_Ax3 anAx3 = anInfo.Position();
657 gp_Dir aD = anAx3.Direction();
658 theDoubles->Append(aD.X());
659 theDoubles->Append(aD.Y());
660 theDoubles->Append(aD.Z());
662 theDoubles->Append(anInfo.Radius1());
663 theDoubles->Append(anInfo.Radius2());
666 case GEOMAlgo_KN_ARCELLIPSE:
668 // (+) geompy.kind.ARC_ELLIPSE xc yc zc dx dy dz R_1 R_2 x1 y1 z1 x2 y2 z2
669 aKind = SK_ARC_ELLIPSE;
671 gp_Pnt aC = anInfo.Location();
672 theDoubles->Append(aC.X());
673 theDoubles->Append(aC.Y());
674 theDoubles->Append(aC.Z());
676 gp_Ax3 anAx3 = anInfo.Position();
677 gp_Dir aD = anAx3.Direction();
678 theDoubles->Append(aD.X());
679 theDoubles->Append(aD.Y());
680 theDoubles->Append(aD.Z());
682 theDoubles->Append(anInfo.Radius1());
683 theDoubles->Append(anInfo.Radius2());
685 gp_Pnt aP1 = anInfo.Pnt1();
686 theDoubles->Append(aP1.X());
687 theDoubles->Append(aP1.Y());
688 theDoubles->Append(aP1.Z());
690 gp_Pnt aP2 = anInfo.Pnt2();
691 theDoubles->Append(aP2.X());
692 theDoubles->Append(aP2.Y());
693 theDoubles->Append(aP2.Z());
696 case GEOMAlgo_KN_LINE:
698 // ??? geompy.kind.LINE x1 y1 z1 x2 y2 z2
699 // (+) geompy.kind.LINE x1 y1 z1 dx dy dz
702 gp_Pnt aO = anInfo.Location();
703 theDoubles->Append(aO.X());
704 theDoubles->Append(aO.Y());
705 theDoubles->Append(aO.Z());
707 gp_Dir aD = anInfo.Direction();
708 theDoubles->Append(aD.X());
709 theDoubles->Append(aD.Y());
710 theDoubles->Append(aD.Z());
713 case GEOMAlgo_KN_SEGMENT:
715 // (+) geompy.kind.SEGMENT x1 y1 z1 x2 y2 z2
718 gp_Pnt aP1 = anInfo.Pnt1();
719 theDoubles->Append(aP1.X());
720 theDoubles->Append(aP1.Y());
721 theDoubles->Append(aP1.Z());
723 gp_Pnt aP2 = anInfo.Pnt2();
724 theDoubles->Append(aP2.X());
725 theDoubles->Append(aP2.Y());
726 theDoubles->Append(aP2.Z());
730 // ??? geompy.kind.EDGE nb_vertices _curve_type_id_
731 // (+) geompy.kind.EDGE nb_vertices
732 theIntegers->Append(anInfo.NbSubShapes(TopAbs_VERTEX));
739 // (+) geompy.kind.VERTEX x y z
742 gp_Pnt aP = anInfo.Location();
743 theDoubles->Append(aP.X());
744 theDoubles->Append(aP.Y());
745 theDoubles->Append(aP.Z());
754 //=============================================================================
755 /*! Get LCS, corresponding to the given shape.
756 * Origin of the LCS is situated at the shape's center of mass.
757 * Axes of the LCS are obtained from shape's location or,
758 * if the shape is a planar face, from position of its plane.
760 //=============================================================================
761 gp_Ax3 GEOMImpl_IMeasureOperations::GetPosition (const TopoDS_Shape& theShape)
765 if (theShape.IsNull())
769 aResult.Transform(theShape.Location().Transformation());
770 if (theShape.ShapeType() == TopAbs_FACE) {
771 Handle(Geom_Surface) aGS = BRep_Tool::Surface(TopoDS::Face(theShape));
772 if (!aGS.IsNull() && aGS->IsKind(STANDARD_TYPE(Geom_Plane))) {
773 Handle(Geom_Plane) aGPlane = Handle(Geom_Plane)::DownCast(aGS);
774 gp_Pln aPln = aGPlane->Pln();
775 aResult = aPln.Position();
781 if (theShape.ShapeType() == TopAbs_VERTEX) {
782 aPnt = BRep_Tool::Pnt(TopoDS::Vertex(theShape));
785 GProp_GProps aSystem;
786 if (theShape.ShapeType() == TopAbs_EDGE || theShape.ShapeType() == TopAbs_WIRE)
787 BRepGProp::LinearProperties(theShape, aSystem);
788 else if (theShape.ShapeType() == TopAbs_FACE || theShape.ShapeType() == TopAbs_SHELL)
789 BRepGProp::SurfaceProperties(theShape, aSystem);
791 BRepGProp::VolumeProperties(theShape, aSystem);
793 aPnt = aSystem.CentreOfMass();
796 aResult.SetLocation(aPnt);
801 //=============================================================================
805 //=============================================================================
806 void GEOMImpl_IMeasureOperations::GetPosition
807 (Handle(GEOM_Object) theShape,
808 Standard_Real& Ox, Standard_Real& Oy, Standard_Real& Oz,
809 Standard_Real& Zx, Standard_Real& Zy, Standard_Real& Zz,
810 Standard_Real& Xx, Standard_Real& Xy, Standard_Real& Xz)
814 //Set default values: global CS
815 Ox = Oy = Oz = Zx = Zy = Xy = Xz = 0.;
818 if (theShape.IsNull()) return;
820 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
821 if (aRefShape.IsNull()) return;
823 TopoDS_Shape aShape = aRefShape->GetValue();
824 if (aShape.IsNull()) {
825 SetErrorCode("The Objects has NULL Shape");
830 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
834 gp_Ax3 anAx3 = GetPosition(aShape);
836 gp_Pnt anOri = anAx3.Location();
837 gp_Dir aDirZ = anAx3.Direction();
838 gp_Dir aDirX = anAx3.XDirection();
841 anOri.Coord(Ox, Oy, Oz);
842 aDirZ.Coord(Zx, Zy, Zz);
843 aDirX.Coord(Xx, Xy, Xz);
845 catch (Standard_Failure) {
846 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
847 SetErrorCode(aFail->GetMessageString());
854 //=============================================================================
858 //=============================================================================
859 Handle(GEOM_Object) GEOMImpl_IMeasureOperations::GetCentreOfMass
860 (Handle(GEOM_Object) theShape)
864 if (theShape.IsNull()) return NULL;
866 //Add a new CentreOfMass object
867 Handle(GEOM_Object) aCDG = GetEngine()->AddObject(GetDocID(), GEOM_CDG);
869 //Add a new CentreOfMass function
870 Handle(GEOM_Function) aFunction =
871 aCDG->AddFunction(GEOMImpl_MeasureDriver::GetID(), CDG_MEASURE);
872 if (aFunction.IsNull()) return NULL;
874 //Check if the function is set correctly
875 if (aFunction->GetDriverGUID() != GEOMImpl_MeasureDriver::GetID()) return NULL;
877 GEOMImpl_IMeasure aCI (aFunction);
879 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
880 if (aRefShape.IsNull()) return NULL;
882 aCI.SetBase(aRefShape);
884 //Compute the CentreOfMass value
886 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
889 if (!GetSolver()->ComputeFunction(aFunction)) {
890 SetErrorCode("Measure driver failed to compute centre of mass");
894 catch (Standard_Failure) {
895 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
896 SetErrorCode(aFail->GetMessageString());
900 //Make a Python command
901 GEOM::TPythonDump(aFunction) << aCDG << " = geompy.MakeCDG(" << theShape << ")";
907 //=============================================================================
911 //=============================================================================
912 Handle(GEOM_Object) GEOMImpl_IMeasureOperations::GetVertexByIndex
913 (Handle(GEOM_Object) theShape,
914 Standard_Integer theIndex)
918 if (theShape.IsNull()) return NULL;
920 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
921 if (aRefShape.IsNull()) return NULL;
923 //Add a new Vertex object
924 Handle(GEOM_Object) aVertex = GetEngine()->AddObject(GetDocID(), GEOM_POINT);
927 Handle(GEOM_Function) aFunction =
928 aVertex->AddFunction(GEOMImpl_MeasureDriver::GetID(), VERTEX_BY_INDEX);
929 if (aFunction.IsNull()) return NULL;
931 //Check if the function is set correctly
932 if (aFunction->GetDriverGUID() != GEOMImpl_MeasureDriver::GetID()) return NULL;
934 GEOMImpl_IMeasure aCI (aFunction);
935 aCI.SetBase(aRefShape);
936 aCI.SetIndex(theIndex);
940 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
943 if (!GetSolver()->ComputeFunction(aFunction)) {
944 SetErrorCode("Vertex by index driver failed.");
948 catch (Standard_Failure) {
949 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
950 SetErrorCode(aFail->GetMessageString());
954 //Make a Python command
955 GEOM::TPythonDump(aFunction) << aVertex << " = geompy.GetVertexByIndex(" << theShape << ", " << theIndex << ")";
961 //=============================================================================
965 //=============================================================================
966 Handle(GEOM_Object) GEOMImpl_IMeasureOperations::GetNormal
967 (Handle(GEOM_Object) theFace,
968 Handle(GEOM_Object) theOptionalPoint)
972 if (theFace.IsNull()) return NULL;
974 //Add a new Normale object
975 Handle(GEOM_Object) aNorm = GetEngine()->AddObject(GetDocID(), GEOM_VECTOR);
977 //Add a new Normale function
978 Handle(GEOM_Function) aFunction =
979 aNorm->AddFunction(GEOMImpl_MeasureDriver::GetID(), VECTOR_FACE_NORMALE);
980 if (aFunction.IsNull()) return NULL;
982 //Check if the function is set correctly
983 if (aFunction->GetDriverGUID() != GEOMImpl_MeasureDriver::GetID()) return NULL;
985 GEOMImpl_IMeasure aCI (aFunction);
987 Handle(GEOM_Function) aFace = theFace->GetLastFunction();
988 if (aFace.IsNull()) return NULL;
992 if (!theOptionalPoint.IsNull()) {
993 Handle(GEOM_Function) anOptPnt = theOptionalPoint->GetLastFunction();
994 aCI.SetPoint(anOptPnt);
997 //Compute the Normale value
999 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1002 if (!GetSolver()->ComputeFunction(aFunction)) {
1003 SetErrorCode("Measure driver failed to compute normake of face");
1007 catch (Standard_Failure) {
1008 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1009 SetErrorCode(aFail->GetMessageString());
1013 //Make a Python command
1014 GEOM::TPythonDump pd (aFunction);
1015 pd << aNorm << " = geompy.GetNormal(" << theFace;
1016 if (!theOptionalPoint.IsNull()) {
1017 pd << ", " << theOptionalPoint;
1025 //=============================================================================
1027 * GetBasicProperties
1029 //=============================================================================
1030 void GEOMImpl_IMeasureOperations::GetBasicProperties (Handle(GEOM_Object) theShape,
1031 Standard_Real& theLength,
1032 Standard_Real& theSurfArea,
1033 Standard_Real& theVolume)
1037 if (theShape.IsNull()) return;
1039 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1040 if (aRefShape.IsNull()) return;
1042 TopoDS_Shape aShape = aRefShape->GetValue();
1043 if (aShape.IsNull()) {
1044 SetErrorCode("The Objects has NULL Shape");
1048 //Compute the parameters
1049 GProp_GProps LProps, SProps;
1051 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1054 BRepGProp::LinearProperties(aShape, LProps);
1055 theLength = LProps.Mass();
1057 BRepGProp::SurfaceProperties(aShape, SProps);
1058 theSurfArea = SProps.Mass();
1061 if (aShape.ShapeType() < TopAbs_SHELL) {
1062 for (TopExp_Explorer Exp (aShape, TopAbs_SOLID); Exp.More(); Exp.Next()) {
1063 GProp_GProps VProps;
1064 BRepGProp::VolumeProperties(Exp.Current(), VProps);
1065 theVolume += VProps.Mass();
1069 catch (Standard_Failure) {
1070 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1071 SetErrorCode(aFail->GetMessageString());
1078 //=============================================================================
1082 //=============================================================================
1083 void GEOMImpl_IMeasureOperations::GetInertia
1084 (Handle(GEOM_Object) theShape,
1085 Standard_Real& I11, Standard_Real& I12, Standard_Real& I13,
1086 Standard_Real& I21, Standard_Real& I22, Standard_Real& I23,
1087 Standard_Real& I31, Standard_Real& I32, Standard_Real& I33,
1088 Standard_Real& Ix , Standard_Real& Iy , Standard_Real& Iz)
1092 if (theShape.IsNull()) return;
1094 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1095 if (aRefShape.IsNull()) return;
1097 TopoDS_Shape aShape = aRefShape->GetValue();
1098 if (aShape.IsNull()) {
1099 SetErrorCode("The Objects has NULL Shape");
1103 //Compute the parameters
1104 GProp_GProps System;
1107 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1110 if (aShape.ShapeType() == TopAbs_VERTEX ||
1111 aShape.ShapeType() == TopAbs_EDGE ||
1112 aShape.ShapeType() == TopAbs_WIRE) {
1113 BRepGProp::LinearProperties(aShape, System);
1114 } else if (aShape.ShapeType() == TopAbs_FACE ||
1115 aShape.ShapeType() == TopAbs_SHELL) {
1116 BRepGProp::SurfaceProperties(aShape, System);
1118 BRepGProp::VolumeProperties(aShape, System);
1120 gp_Mat I = System.MatrixOfInertia();
1134 GProp_PrincipalProps Pr = System.PrincipalProperties();
1135 Pr.Moments(Ix,Iy,Iz);
1137 catch (Standard_Failure) {
1138 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1139 SetErrorCode(aFail->GetMessageString());
1146 //=============================================================================
1150 //=============================================================================
1151 void GEOMImpl_IMeasureOperations::GetBoundingBox
1152 (Handle(GEOM_Object) theShape,
1153 Standard_Real& Xmin, Standard_Real& Xmax,
1154 Standard_Real& Ymin, Standard_Real& Ymax,
1155 Standard_Real& Zmin, Standard_Real& Zmax)
1159 if (theShape.IsNull()) return;
1161 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1162 if (aRefShape.IsNull()) return;
1164 TopoDS_Shape aShape = aRefShape->GetValue();
1165 if (aShape.IsNull()) {
1166 SetErrorCode("The Objects has NULL Shape");
1170 //Compute the parameters
1174 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1177 BRepBndLib::Add(aShape, B);
1178 B.Get(Xmin, Ymin, Zmin, Xmax, Ymax, Zmax);
1180 catch (Standard_Failure) {
1181 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1182 SetErrorCode(aFail->GetMessageString());
1189 //=============================================================================
1193 //=============================================================================
1194 void GEOMImpl_IMeasureOperations::GetTolerance
1195 (Handle(GEOM_Object) theShape,
1196 Standard_Real& FaceMin, Standard_Real& FaceMax,
1197 Standard_Real& EdgeMin, Standard_Real& EdgeMax,
1198 Standard_Real& VertMin, Standard_Real& VertMax)
1202 if (theShape.IsNull()) return;
1204 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1205 if (aRefShape.IsNull()) return;
1207 TopoDS_Shape aShape = aRefShape->GetValue();
1208 if (aShape.IsNull()) {
1209 SetErrorCode("The Objects has NULL Shape");
1213 //Compute the parameters
1215 FaceMin = EdgeMin = VertMin = RealLast();
1216 FaceMax = EdgeMax = VertMax = -RealLast();
1219 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1222 for (TopExp_Explorer ExF (aShape, TopAbs_FACE); ExF.More(); ExF.Next()) {
1223 TopoDS_Face Face = TopoDS::Face(ExF.Current());
1224 T = BRep_Tool::Tolerance(Face);
1230 for (TopExp_Explorer ExE (aShape, TopAbs_EDGE); ExE.More(); ExE.Next()) {
1231 TopoDS_Edge Edge = TopoDS::Edge(ExE.Current());
1232 T = BRep_Tool::Tolerance(Edge);
1238 for (TopExp_Explorer ExV (aShape, TopAbs_VERTEX); ExV.More(); ExV.Next()) {
1239 TopoDS_Vertex Vertex = TopoDS::Vertex(ExV.Current());
1240 T = BRep_Tool::Tolerance(Vertex);
1247 catch (Standard_Failure) {
1248 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1249 SetErrorCode(aFail->GetMessageString());
1256 //=============================================================================
1260 //=============================================================================
1261 bool GEOMImpl_IMeasureOperations::CheckShape (Handle(GEOM_Object) theShape,
1262 const Standard_Boolean theIsCheckGeom,
1263 TCollection_AsciiString& theDump)
1267 if (theShape.IsNull()) return false;
1269 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1270 if (aRefShape.IsNull()) return false;
1272 TopoDS_Shape aShape = aRefShape->GetValue();
1273 if (aShape.IsNull()) {
1274 SetErrorCode("The Objects has NULL Shape");
1278 //Compute the parameters
1279 bool isValid = false;
1281 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1284 BRepCheck_Analyzer ana (aShape, theIsCheckGeom);
1285 if (ana.IsValid()) {
1289 StructuralDump(ana, aShape, theDump);
1292 catch (Standard_Failure) {
1293 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1294 SetErrorCode(aFail->GetMessageString());
1302 //=============================================================================
1306 //=============================================================================
1307 TCollection_AsciiString GEOMImpl_IMeasureOperations::WhatIs (Handle(GEOM_Object) theShape)
1311 TCollection_AsciiString Astr;
1313 if (theShape.IsNull()) return Astr;
1315 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1316 if (aRefShape.IsNull()) return Astr;
1318 TopoDS_Shape aShape = aRefShape->GetValue();
1319 if (aShape.IsNull()) {
1320 SetErrorCode("The Objects has NULL Shape");
1324 //Compute the parameters
1325 if (aShape.ShapeType() == TopAbs_EDGE) {
1326 if (BRep_Tool::Degenerated(TopoDS::Edge(aShape))) {
1327 Astr = Astr + " It is a degenerated edge \n";
1331 Astr = Astr + " Number of sub-shapes : \n";
1334 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1337 int iType, nbTypes [TopAbs_SHAPE];
1338 for (iType = 0; iType < TopAbs_SHAPE; ++iType)
1340 nbTypes[aShape.ShapeType()]++;
1342 TopTools_MapOfShape aMapOfShape;
1343 aMapOfShape.Add(aShape);
1344 TopTools_ListOfShape aListOfShape;
1345 aListOfShape.Append(aShape);
1347 TopTools_ListIteratorOfListOfShape itL (aListOfShape);
1348 for (; itL.More(); itL.Next()) {
1349 TopoDS_Iterator it (itL.Value());
1350 for (; it.More(); it.Next()) {
1351 TopoDS_Shape s = it.Value();
1352 if (aMapOfShape.Add(s)) {
1353 aListOfShape.Append(s);
1354 nbTypes[s.ShapeType()]++;
1359 Astr = Astr + " VERTEX : " + TCollection_AsciiString(nbTypes[TopAbs_VERTEX]) + "\n";
1360 Astr = Astr + " EDGE : " + TCollection_AsciiString(nbTypes[TopAbs_EDGE]) + "\n";
1361 Astr = Astr + " WIRE : " + TCollection_AsciiString(nbTypes[TopAbs_WIRE]) + "\n";
1362 Astr = Astr + " FACE : " + TCollection_AsciiString(nbTypes[TopAbs_FACE]) + "\n";
1363 Astr = Astr + " SHELL : " + TCollection_AsciiString(nbTypes[TopAbs_SHELL]) + "\n";
1364 Astr = Astr + " SOLID : " + TCollection_AsciiString(nbTypes[TopAbs_SOLID]) + "\n";
1365 Astr = Astr + " COMPSOLID : " + TCollection_AsciiString(nbTypes[TopAbs_COMPSOLID]) + "\n";
1366 Astr = Astr + " COMPOUND : " + TCollection_AsciiString(nbTypes[TopAbs_COMPOUND]) + "\n";
1367 Astr = Astr + " SHAPE : " + TCollection_AsciiString(aMapOfShape.Extent());
1369 catch (Standard_Failure) {
1370 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1371 SetErrorCode(aFail->GetMessageString());
1380 //=======================================================================
1381 //function : CheckSingularCase
1382 //purpose : auxilary for GetMinDistance()
1383 // workaround for bugs 19899, 19908 and 19910 from Mantis
1384 //=======================================================================
1385 static double CheckSingularCase(const TopoDS_Shape& aSh1,
1386 const TopoDS_Shape& aSh2,
1387 gp_Pnt& Ptmp1, gp_Pnt& Ptmp2)
1389 bool IsChange1 = false;
1390 double AddDist1 = 0.0;
1391 TopExp_Explorer anExp;
1392 TopoDS_Shape tmpSh1, tmpSh2;
1394 for ( anExp.Init( aSh1, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1396 tmpSh1 = anExp.Current();
1399 TopoDS_Shape sh = aSh1;
1400 while(sh.ShapeType()==TopAbs_COMPOUND) {
1401 TopoDS_Iterator it(sh);
1404 Handle(Geom_Surface) S = BRep_Tool::Surface(TopoDS::Face(tmpSh1));
1405 if( S->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ||
1406 S->IsKind(STANDARD_TYPE(Geom_ToroidalSurface)) ) {
1407 if( sh.ShapeType()==TopAbs_SHELL || sh.ShapeType()==TopAbs_FACE ) {
1410 // changes for 0020677: EDF 1219 GEOM: MinDistance gives 0 instead of 20.88
1411 //S->Bounds(U1,U2,V1,V2); changed by
1412 ShapeAnalysis::GetFaceUVBounds(TopoDS::Face(tmpSh1),U1,U2,V1,V2);
1413 // end of changes for 020677 (dmv)
1414 Handle(Geom_RectangularTrimmedSurface) TrS1 =
1415 new Geom_RectangularTrimmedSurface(S,U1,(U1+U2)/2.,V1,V2);
1416 Handle(Geom_RectangularTrimmedSurface) TrS2 =
1417 new Geom_RectangularTrimmedSurface(S,(U1+U2)/2.,U2,V1,V2);
1420 TopoDS_Compound Comp;
1421 B.MakeCompound(Comp);
1422 B.MakeFace(F1,TrS1,1.e-7);
1424 B.MakeFace(F2,TrS2,1.e-7);
1426 Handle(ShapeFix_Shape) sfs = new ShapeFix_Shape;
1428 sfs->SetPrecision(1.e-6);
1429 sfs->SetMaxTolerance(1.0);
1431 tmpSh1 = sfs->Shape();
1435 if( S->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ) {
1436 Handle(Geom_SphericalSurface) SS = Handle(Geom_SphericalSurface)::DownCast(S);
1437 gp_Pnt PC = SS->Location();
1440 B.MakeVertex(V,PC,1.e-7);
1442 AddDist1 = SS->Radius();
1446 Handle(Geom_ToroidalSurface) TS = Handle(Geom_ToroidalSurface)::DownCast(S);
1447 gp_Ax3 ax3 = TS->Position();
1448 Handle(Geom_Circle) C = new Geom_Circle(ax3.Ax2(),TS->MajorRadius());
1451 B.MakeEdge(E,C,1.e-7);
1453 AddDist1 = TS->MinorRadius();
1463 bool IsChange2 = false;
1464 double AddDist2 = 0.0;
1466 for ( anExp.Init( aSh2, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1468 tmpSh2 = anExp.Current();
1471 TopoDS_Shape sh = aSh2;
1472 while(sh.ShapeType()==TopAbs_COMPOUND) {
1473 TopoDS_Iterator it(sh);
1476 Handle(Geom_Surface) S = BRep_Tool::Surface(TopoDS::Face(tmpSh2));
1477 if( S->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ||
1478 S->IsKind(STANDARD_TYPE(Geom_ToroidalSurface)) ) {
1479 if( sh.ShapeType()==TopAbs_SHELL || sh.ShapeType()==TopAbs_FACE ) {
1482 //S->Bounds(U1,U2,V1,V2);
1483 ShapeAnalysis::GetFaceUVBounds(TopoDS::Face(tmpSh2),U1,U2,V1,V2);
1484 Handle(Geom_RectangularTrimmedSurface) TrS1 =
1485 new Geom_RectangularTrimmedSurface(S,U1,(U1+U2)/2.,V1,V2);
1486 Handle(Geom_RectangularTrimmedSurface) TrS2 =
1487 new Geom_RectangularTrimmedSurface(S,(U1+U2)/2.,U2,V1,V2);
1490 TopoDS_Compound Comp;
1491 B.MakeCompound(Comp);
1492 B.MakeFace(F1,TrS1,1.e-7);
1494 B.MakeFace(F2,TrS2,1.e-7);
1496 Handle(ShapeFix_Shape) sfs = new ShapeFix_Shape;
1498 sfs->SetPrecision(1.e-6);
1499 sfs->SetMaxTolerance(1.0);
1501 tmpSh2 = sfs->Shape();
1505 if( S->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ) {
1506 Handle(Geom_SphericalSurface) SS = Handle(Geom_SphericalSurface)::DownCast(S);
1507 gp_Pnt PC = SS->Location();
1510 B.MakeVertex(V,PC,1.e-7);
1512 AddDist2 = SS->Radius();
1515 else if( S->IsKind(STANDARD_TYPE(Geom_ToroidalSurface)) ) {
1516 Handle(Geom_ToroidalSurface) TS = Handle(Geom_ToroidalSurface)::DownCast(S);
1517 gp_Ax3 ax3 = TS->Position();
1518 Handle(Geom_Circle) C = new Geom_Circle(ax3.Ax2(),TS->MajorRadius());
1521 B.MakeEdge(E,C,1.e-7);
1523 AddDist2 = TS->MinorRadius();
1534 if( !IsChange1 && !IsChange2 )
1537 BRepExtrema_DistShapeShape dst(tmpSh1,tmpSh2);
1539 double MinDist = 1.e9;
1540 gp_Pnt PMin1, PMin2, P1, P2;
1541 for (int i = 1; i <= dst.NbSolution(); i++) {
1542 P1 = dst.PointOnShape1(i);
1543 P2 = dst.PointOnShape2(i);
1544 Standard_Real Dist = P1.Distance(P2);
1545 if (MinDist > Dist) {
1556 gp_Dir aDir(gp_Vec(PMin1,PMin2));
1557 if( MinDist > (AddDist1+AddDist2) ) {
1558 Ptmp1 = gp_Pnt( PMin1.X() + aDir.X()*AddDist1,
1559 PMin1.Y() + aDir.Y()*AddDist1,
1560 PMin1.Z() + aDir.Z()*AddDist1 );
1561 Ptmp2 = gp_Pnt( PMin2.X() - aDir.X()*AddDist2,
1562 PMin2.Y() - aDir.Y()*AddDist2,
1563 PMin2.Z() - aDir.Z()*AddDist2 );
1564 return (MinDist - AddDist1 - AddDist2);
1567 if( AddDist1 > 0 ) {
1568 Ptmp1 = gp_Pnt( PMin1.X() + aDir.X()*AddDist1,
1569 PMin1.Y() + aDir.Y()*AddDist1,
1570 PMin1.Z() + aDir.Z()*AddDist1 );
1574 Ptmp2 = gp_Pnt( PMin2.X() - aDir.X()*AddDist2,
1575 PMin2.Y() - aDir.Y()*AddDist2,
1576 PMin2.Z() - aDir.Z()*AddDist2 );
1581 double res = MinDist - AddDist1 - AddDist2;
1582 if(res<0.) res = 0.0;
1588 static bool CheckSingularCase(const TopoDS_Shape& aSh1,
1589 const TopoDS_Shape& aSh2,
1592 TopExp_Explorer anExp;
1593 TopoDS_Shape tmpSh1, tmpSh2;
1595 for ( anExp.Init( aSh1, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1597 tmpSh1 = anExp.Current();
1600 Handle(Geom_Surface) S1 = BRep_Tool::Surface(TopoDS::Face(tmpSh1));
1601 if( S1->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ||
1602 S1->IsKind(STANDARD_TYPE(Geom_ToroidalSurface)) ) {
1604 for ( anExp.Init( aSh2, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1606 tmpSh2 = anExp.Current();
1607 Handle(Geom_Surface) S2 = BRep_Tool::Surface(TopoDS::Face(tmpSh2));
1608 GeomAPI_IntSS ISS(S1,S2,1.e-7);
1610 for(int i=1; i<=ISS.NbLines(); i++) {
1611 Handle(Geom_Curve) C3d = ISS.Line(i);
1614 B.MakeEdge(E,C3d,1.e-7);
1615 BRepExtrema_DistShapeShape dst(tmpSh2,E);
1617 gp_Pnt PMin1, PMin2, P1, P2;
1618 double MinDist = 1.e9;
1619 for (int i = 1; i <= dst.NbSolution(); i++) {
1620 P1 = dst.PointOnShape1(i);
1621 P2 = dst.PointOnShape2(i);
1622 Standard_Real Dist = P1.Distance(P2);
1623 if (MinDist > Dist) {
1637 for ( anExp.Init( aSh2, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1639 tmpSh1 = anExp.Current();
1642 Handle(Geom_Surface) S1 = BRep_Tool::Surface(TopoDS::Face(tmpSh1));
1643 if( S1->IsKind(STANDARD_TYPE(Geom_SphericalSurface)) ||
1644 S1->IsKind(STANDARD_TYPE(Geom_ToroidalSurface)) ) {
1646 for ( anExp.Init( aSh1, TopAbs_FACE ); anExp.More(); anExp.Next() ) {
1648 tmpSh2 = anExp.Current();
1649 Handle(Geom_Surface) S2 = BRep_Tool::Surface(TopoDS::Face(tmpSh2));
1650 GeomAPI_IntSS ISS(S1,S2,1.e-7);
1652 for(int i=1; i<=ISS.NbLines(); i++) {
1653 Handle(Geom_Curve) C3d = ISS.Line(i);
1656 B.MakeEdge(E,C3d,1.e-7);
1657 BRepExtrema_DistShapeShape dst(tmpSh2,E);
1660 double MinDist = 1.e9;
1661 for (int i = 1; i <= dst.NbSolution(); i++) {
1662 P1 = dst.PointOnShape1(i);
1663 P2 = dst.PointOnShape2(i);
1664 Standard_Real Dist = P1.Distance(P2);
1665 if (MinDist > Dist) {
1683 //=============================================================================
1687 //=============================================================================
1688 std::vector<bool> GEOMImpl_IMeasureOperations::AreCoordsInside(Handle(GEOM_Object) theShape,
1689 const std::vector<double>& coords,
1692 std::vector<bool> res;
1693 if (!theShape.IsNull()) {
1694 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1695 if (!aRefShape.IsNull()) {
1696 TopoDS_Shape aShape = aRefShape->GetValue();
1697 if (!aShape.IsNull()) {
1698 BRepClass3d_SolidClassifier SC(aShape);
1699 unsigned int nb_points = coords.size()/3;
1700 for (int i = 0; i < nb_points; i++) {
1701 double x = coords[3*i];
1702 double y = coords[3*i+1];
1703 double z = coords[3*i+2];
1704 gp_Pnt aPnt(x, y, z);
1705 SC.Perform(aPnt, tolerance);
1706 res.push_back( ( SC.State() == TopAbs_IN ) || ( SC.State() == TopAbs_ON ) );
1714 //=============================================================================
1718 //=============================================================================
1719 Standard_Real GEOMImpl_IMeasureOperations::GetMinDistance
1720 (Handle(GEOM_Object) theShape1, Handle(GEOM_Object) theShape2,
1721 Standard_Real& X1, Standard_Real& Y1, Standard_Real& Z1,
1722 Standard_Real& X2, Standard_Real& Y2, Standard_Real& Z2)
1725 Standard_Real MinDist = 1.e9;
1727 if (theShape1.IsNull() || theShape2.IsNull()) return MinDist;
1729 Handle(GEOM_Function) aRefShape1 = theShape1->GetLastFunction();
1730 Handle(GEOM_Function) aRefShape2 = theShape2->GetLastFunction();
1731 if (aRefShape1.IsNull() || aRefShape2.IsNull()) return MinDist;
1733 TopoDS_Shape aShape1 = aRefShape1->GetValue();
1734 TopoDS_Shape aShape2 = aRefShape2->GetValue();
1735 if (aShape1.IsNull() || aShape2.IsNull()) {
1736 SetErrorCode("One of Objects has NULL Shape");
1740 //Compute the parameters
1742 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1746 // Issue 0020231: A min distance bug with torus and vertex.
1747 // Make GetMinDistance() return zero if a sole VERTEX is inside any of SOLIDs
1749 // which of shapes consists of only one vertex?
1750 TopExp_Explorer exp1(aShape1,TopAbs_VERTEX), exp2(aShape2,TopAbs_VERTEX);
1751 TopoDS_Shape V1 = exp1.More() ? exp1.Current() : TopoDS_Shape();
1752 TopoDS_Shape V2 = exp2.More() ? exp2.Current() : TopoDS_Shape();
1753 exp1.Next(); exp2.Next();
1754 if ( exp1.More() ) V1.Nullify();
1755 if ( exp2.More() ) V2.Nullify();
1756 // vertex and container of solids
1757 TopoDS_Shape V = V1.IsNull() ? V2 : V1;
1758 TopoDS_Shape S = V1.IsNull() ? aShape1 : aShape2;
1759 if ( !V.IsNull() ) {
1760 // classify vertex against solids
1761 gp_Pnt p = BRep_Tool::Pnt( TopoDS::Vertex( V ) );
1762 for ( exp1.Init( S, TopAbs_SOLID ); exp1.More(); exp1.Next() ) {
1763 BRepClass3d_SolidClassifier classifier( exp1.Current(), p, 1e-6);
1764 if ( classifier.State() == TopAbs_IN ) {
1765 p.Coord(X1, Y1, Z1);
1766 p.Coord(X2, Y2, Z2);
1772 // End Issue 0020231
1775 // additional workaround for bugs 19899, 19908 and 19910 from Mantis
1776 gp_Pnt Ptmp1, Ptmp2;
1777 double dist = CheckSingularCase(aShape1, aShape2, Ptmp1, Ptmp2);
1779 Ptmp1.Coord(X1, Y1, Z1);
1780 Ptmp2.Coord(X2, Y2, Z2);
1785 BRepExtrema_DistShapeShape dst (aShape1, aShape2);
1787 gp_Pnt PMin1, PMin2, P1, P2;
1789 for (int i = 1; i <= dst.NbSolution(); i++) {
1790 P1 = dst.PointOnShape1(i);
1791 P2 = dst.PointOnShape2(i);
1793 Standard_Real Dist = P1.Distance(P2);
1794 if (MinDist > Dist) {
1801 PMin1.Coord(X1, Y1, Z1);
1802 PMin2.Coord(X2, Y2, Z2);
1805 catch (Standard_Failure) {
1806 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1807 SetErrorCode(aFail->GetMessageString());
1815 //=======================================================================
1817 * Get coordinates of point
1819 //=======================================================================
1820 void GEOMImpl_IMeasureOperations::PointCoordinates (Handle(GEOM_Object) theShape,
1821 Standard_Real& theX, Standard_Real& theY, Standard_Real& theZ)
1825 if (theShape.IsNull())
1828 Handle(GEOM_Function) aRefShape = theShape->GetLastFunction();
1829 if (aRefShape.IsNull())
1832 TopoDS_Shape aShape = aRefShape->GetValue();
1833 if (aShape.IsNull() || aShape.ShapeType() != TopAbs_VERTEX)
1835 SetErrorCode( "Shape must be a vertex" );
1840 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1843 gp_Pnt aPnt = BRep_Tool::Pnt( TopoDS::Vertex( aShape ) );
1850 catch (Standard_Failure)
1852 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1853 SetErrorCode( aFail->GetMessageString() );
1857 //=======================================================================
1859 * Compute angle (in degrees) between two lines
1861 //=======================================================================
1862 Standard_Real GEOMImpl_IMeasureOperations::GetAngle (Handle(GEOM_Object) theLine1,
1863 Handle(GEOM_Object) theLine2)
1867 Standard_Real anAngle = -1.0;
1869 if (theLine1.IsNull() || theLine2.IsNull())
1872 Handle(GEOM_Function) aRefLine1 = theLine1->GetLastFunction();
1873 Handle(GEOM_Function) aRefLine2 = theLine2->GetLastFunction();
1874 if (aRefLine1.IsNull() || aRefLine2.IsNull())
1877 TopoDS_Shape aLine1 = aRefLine1->GetValue();
1878 TopoDS_Shape aLine2 = aRefLine2->GetValue();
1879 if (aLine1.IsNull() || aLine2.IsNull() ||
1880 aLine1.ShapeType() != TopAbs_EDGE ||
1881 aLine2.ShapeType() != TopAbs_EDGE)
1883 SetErrorCode("Two edges must be given");
1888 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1891 TopoDS_Edge E1 = TopoDS::Edge(aLine1);
1892 TopoDS_Edge E2 = TopoDS::Edge(aLine2);
1895 Handle(Geom_Curve) C1 = BRep_Tool::Curve(E1,fp,lp);
1896 Handle(Geom_Curve) C2 = BRep_Tool::Curve(E2,fp,lp);
1898 if ( C1.IsNull() || C2.IsNull() ||
1899 !C1->IsKind(STANDARD_TYPE(Geom_Line)) ||
1900 !C2->IsKind(STANDARD_TYPE(Geom_Line)))
1902 SetErrorCode("The edges must be linear");
1906 Handle(Geom_Line) L1 = Handle(Geom_Line)::DownCast(C1);
1907 Handle(Geom_Line) L2 = Handle(Geom_Line)::DownCast(C2);
1909 gp_Lin aLin1 = L1->Lin();
1910 gp_Lin aLin2 = L2->Lin();
1912 anAngle = aLin1.Angle(aLin2);
1913 anAngle /= PI180; // convert radians into degrees
1917 catch (Standard_Failure)
1919 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1920 SetErrorCode(aFail->GetMessageString());
1927 //=============================================================================
1929 * CurveCurvatureByParam
1931 //=============================================================================
1932 Standard_Real GEOMImpl_IMeasureOperations::CurveCurvatureByParam
1933 (Handle(GEOM_Object) theCurve, Standard_Real& theParam)
1936 Standard_Real aRes = -1.0;
1938 if(theCurve.IsNull()) return aRes;
1940 Handle(GEOM_Function) aRefShape = theCurve->GetLastFunction();
1941 if(aRefShape.IsNull()) return aRes;
1943 TopoDS_Shape aShape = aRefShape->GetValue();
1944 if(aShape.IsNull()) {
1945 SetErrorCode("One of Objects has NULL Shape");
1949 Standard_Real aFP, aLP, aP;
1950 Handle(Geom_Curve) aCurve = BRep_Tool::Curve(TopoDS::Edge(aShape), aFP, aLP);
1951 aP = aFP + (aLP - aFP) * theParam;
1953 if(aCurve.IsNull()) return aRes;
1957 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
1960 GeomLProp_CLProps Prop = GeomLProp_CLProps
1961 (aCurve, aP, 2, Precision::Confusion());
1962 aRes = fabs(Prop.Curvature());
1965 catch (Standard_Failure) {
1966 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
1967 SetErrorCode(aFail->GetMessageString());
1971 if( aRes > Precision::Confusion() )
1980 //=============================================================================
1982 * CurveCurvatureByPoint
1984 //=============================================================================
1985 Standard_Real GEOMImpl_IMeasureOperations::CurveCurvatureByPoint
1986 (Handle(GEOM_Object) theCurve, Handle(GEOM_Object) thePoint)
1989 Standard_Real aRes = -1.0;
1991 if( theCurve.IsNull() || thePoint.IsNull() ) return aRes;
1993 Handle(GEOM_Function) aRefCurve = theCurve->GetLastFunction();
1994 Handle(GEOM_Function) aRefPoint = thePoint->GetLastFunction();
1995 if( aRefCurve.IsNull() || aRefPoint.IsNull() ) return aRes;
1997 TopoDS_Edge anEdge = TopoDS::Edge(aRefCurve->GetValue());
1998 TopoDS_Vertex aPnt = TopoDS::Vertex(aRefPoint->GetValue());
1999 if( anEdge.IsNull() || aPnt.IsNull() ) {
2000 SetErrorCode("One of Objects has NULL Shape");
2004 Standard_Real aFP, aLP;
2005 Handle(Geom_Curve) aCurve = BRep_Tool::Curve(anEdge, aFP, aLP);
2006 if(aCurve.IsNull()) return aRes;
2007 gp_Pnt aPoint = BRep_Tool::Pnt(aPnt);
2011 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
2014 GeomAPI_ProjectPointOnCurve PPC(aPoint, aCurve, aFP, aLP);
2015 if(PPC.NbPoints()>0) {
2016 GeomLProp_CLProps Prop = GeomLProp_CLProps
2017 (aCurve, PPC.LowerDistanceParameter(), 2, Precision::Confusion());
2018 aRes = fabs(Prop.Curvature());
2022 catch (Standard_Failure) {
2023 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
2024 SetErrorCode(aFail->GetMessageString());
2028 if( aRes > Precision::Confusion() )
2037 //=============================================================================
2039 * getSurfaceCurvatures
2041 //=============================================================================
2042 Standard_Real GEOMImpl_IMeasureOperations::getSurfaceCurvatures
2043 (const Handle(Geom_Surface)& aSurf,
2044 Standard_Real theUParam,
2045 Standard_Real theVParam,
2046 Standard_Boolean theNeedMaxCurv)
2049 Standard_Real aRes = 1.0;
2051 if (aSurf.IsNull()) return aRes;
2054 #if (OCC_VERSION_MAJOR << 16 | OCC_VERSION_MINOR << 8 | OCC_VERSION_MAINTENANCE) > 0x060100
2057 GeomLProp_SLProps Prop = GeomLProp_SLProps
2058 (aSurf, theUParam, theVParam, 2, Precision::Confusion());
2059 if(Prop.IsCurvatureDefined()) {
2060 if(Prop.IsUmbilic()) {
2061 //cout<<"is umbilic"<<endl;
2062 aRes = fabs(Prop.MeanCurvature());
2065 //cout<<"is not umbilic"<<endl;
2066 double c1 = fabs(Prop.MaxCurvature());
2067 double c2 = fabs(Prop.MinCurvature());
2076 catch (Standard_Failure) {
2077 Handle(Standard_Failure) aFail = Standard_Failure::Caught();
2078 SetErrorCode(aFail->GetMessageString());
2082 if( fabs(aRes) > Precision::Confusion() )
2091 //=============================================================================
2093 * MaxSurfaceCurvatureByParam
2095 //=============================================================================
2096 Standard_Real GEOMImpl_IMeasureOperations::MaxSurfaceCurvatureByParam
2097 (Handle(GEOM_Object) theSurf,
2098 Standard_Real& theUParam,
2099 Standard_Real& theVParam)
2102 Standard_Real aRes = -1.0;
2104 if (theSurf.IsNull()) return aRes;
2106 Handle(GEOM_Function) aRefShape = theSurf->GetLastFunction();
2107 if(aRefShape.IsNull()) return aRes;
2109 TopoDS_Shape aShape = aRefShape->GetValue();
2110 if(aShape.IsNull()) {
2111 SetErrorCode("One of Objects has NULL Shape");
2115 TopoDS_Face F = TopoDS::Face(aShape);
2116 Handle(Geom_Surface) aSurf = BRep_Tool::Surface(F);
2118 //Compute the parameters
2119 Standard_Real U1,U2,V1,V2;
2120 ShapeAnalysis::GetFaceUVBounds(F,U1,U2,V1,V2);
2121 Standard_Real U = U1 + (U2-U1)*theUParam;
2122 Standard_Real V = V1 + (V2-V1)*theVParam;
2124 return getSurfaceCurvatures(aSurf, U, V, true);
2128 //=============================================================================
2130 * MaxSurfaceCurvatureByPoint
2132 //=============================================================================
2133 Standard_Real GEOMImpl_IMeasureOperations::MaxSurfaceCurvatureByPoint
2134 (Handle(GEOM_Object) theSurf, Handle(GEOM_Object) thePoint)
2137 Standard_Real aRes = -1.0;
2139 if( theSurf.IsNull() || thePoint.IsNull() ) return aRes;
2141 Handle(GEOM_Function) aRefShape = theSurf->GetLastFunction();
2142 Handle(GEOM_Function) aRefPoint = thePoint->GetLastFunction();
2143 if( aRefShape.IsNull() || aRefPoint.IsNull() ) return aRes;
2145 TopoDS_Face aFace = TopoDS::Face(aRefShape->GetValue());
2146 TopoDS_Vertex aPnt = TopoDS::Vertex(aRefPoint->GetValue());
2147 if( aFace.IsNull() || aPnt.IsNull() ) {
2148 SetErrorCode("One of Objects has NULL Shape");
2152 Handle(Geom_Surface) aSurf = BRep_Tool::Surface(aFace);
2153 if(aSurf.IsNull()) return aRes;
2154 gp_Pnt aPoint = BRep_Tool::Pnt(aPnt);
2156 //Compute the parameters
2157 ShapeAnalysis_Surface sas(aSurf);
2158 gp_Pnt2d UV = sas.ValueOfUV(aPoint,Precision::Confusion());
2160 return getSurfaceCurvatures(aSurf, UV.X(), UV.Y(), true);
2164 //=============================================================================
2166 * MinSurfaceCurvatureByParam
2168 //=============================================================================
2169 Standard_Real GEOMImpl_IMeasureOperations::MinSurfaceCurvatureByParam
2170 (Handle(GEOM_Object) theSurf,
2171 Standard_Real& theUParam,
2172 Standard_Real& theVParam)
2175 Standard_Real aRes = -1.0;
2177 if (theSurf.IsNull()) return aRes;
2179 Handle(GEOM_Function) aRefShape = theSurf->GetLastFunction();
2180 if(aRefShape.IsNull()) return aRes;
2182 TopoDS_Shape aShape = aRefShape->GetValue();
2183 if(aShape.IsNull()) {
2184 SetErrorCode("One of Objects has NULL Shape");
2188 TopoDS_Face F = TopoDS::Face(aShape);
2189 Handle(Geom_Surface) aSurf = BRep_Tool::Surface(F);
2191 //Compute the parameters
2192 Standard_Real U1,U2,V1,V2;
2193 ShapeAnalysis::GetFaceUVBounds(F,U1,U2,V1,V2);
2194 Standard_Real U = U1 + (U2-U1)*theUParam;
2195 Standard_Real V = V1 + (V2-V1)*theVParam;
2197 return getSurfaceCurvatures(aSurf, U, V, false);
2201 //=============================================================================
2203 * MinSurfaceCurvatureByPoint
2205 //=============================================================================
2206 Standard_Real GEOMImpl_IMeasureOperations::MinSurfaceCurvatureByPoint
2207 (Handle(GEOM_Object) theSurf, Handle(GEOM_Object) thePoint)
2210 Standard_Real aRes = -1.0;
2212 if( theSurf.IsNull() || thePoint.IsNull() ) return aRes;
2214 Handle(GEOM_Function) aRefShape = theSurf->GetLastFunction();
2215 Handle(GEOM_Function) aRefPoint = thePoint->GetLastFunction();
2216 if( aRefShape.IsNull() || aRefPoint.IsNull() ) return aRes;
2218 TopoDS_Face aFace = TopoDS::Face(aRefShape->GetValue());
2219 TopoDS_Vertex aPnt = TopoDS::Vertex(aRefPoint->GetValue());
2220 if( aFace.IsNull() || aPnt.IsNull() ) {
2221 SetErrorCode("One of Objects has NULL Shape");
2225 Handle(Geom_Surface) aSurf = BRep_Tool::Surface(aFace);
2226 if(aSurf.IsNull()) return aRes;
2227 gp_Pnt aPoint = BRep_Tool::Pnt(aPnt);
2229 //Compute the parameters
2230 ShapeAnalysis_Surface sas(aSurf);
2231 gp_Pnt2d UV = sas.ValueOfUV(aPoint,Precision::Confusion());
2233 return getSurfaceCurvatures(aSurf, UV.X(), UV.Y(), false);
2237 //=======================================================================
2238 //function : StructuralDump
2239 //purpose : Structural (data exchange) style of output.
2240 //=======================================================================
2241 void GEOMImpl_IMeasureOperations::StructuralDump (const BRepCheck_Analyzer& theAna,
2242 const TopoDS_Shape& theShape,
2243 TCollection_AsciiString& theDump)
2247 theDump += " -- The Shape has problems :\n";
2248 theDump += " Check Count\n";
2249 theDump += " ------------------------------------------------\n";
2251 Standard_Integer last_stat = (Standard_Integer)BRepCheck_CheckFail;
2252 Handle(TColStd_HArray1OfInteger) NbProblems =
2253 new TColStd_HArray1OfInteger(1, last_stat);
2254 for (i = 1; i <= last_stat; i++)
2255 NbProblems->SetValue(i,0);
2257 Handle(TopTools_HSequenceOfShape) sl;
2258 sl = new TopTools_HSequenceOfShape();
2259 TopTools_DataMapOfShapeListOfShape theMap;
2261 GetProblemShapes(theAna, theShape, sl, NbProblems, theMap);
2264 Standard_Integer count = 0;
2265 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidPointOnCurve);
2267 theDump += " Invalid Point on Curve ................... ";
2268 theDump += TCollection_AsciiString(count) + "\n";
2270 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidPointOnCurveOnSurface);
2272 theDump += " Invalid Point on CurveOnSurface .......... ";
2273 theDump += TCollection_AsciiString(count) + "\n";
2275 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidPointOnSurface);
2277 theDump += " Invalid Point on Surface ................. ";
2278 theDump += TCollection_AsciiString(count) + "\n";
2280 count = NbProblems->Value((Standard_Integer)BRepCheck_No3DCurve);
2282 theDump += " No 3D Curve .............................. ";
2283 theDump += TCollection_AsciiString(count) + "\n";
2285 count = NbProblems->Value((Standard_Integer)BRepCheck_Multiple3DCurve);
2287 theDump += " Multiple 3D Curve ........................ ";
2288 theDump += TCollection_AsciiString(count) + "\n";
2290 count = NbProblems->Value((Standard_Integer)BRepCheck_Invalid3DCurve);
2292 theDump += " Invalid 3D Curve ......................... ";
2293 theDump += TCollection_AsciiString(count) + "\n";
2295 count = NbProblems->Value((Standard_Integer)BRepCheck_NoCurveOnSurface);
2297 theDump += " No Curve on Surface ...................... ";
2298 theDump += TCollection_AsciiString(count) + "\n";
2300 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidCurveOnSurface);
2302 theDump += " Invalid Curve on Surface ................. ";
2303 theDump += TCollection_AsciiString(count) + "\n";
2305 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidCurveOnClosedSurface);
2307 theDump += " Invalid Curve on closed Surface .......... ";
2308 theDump += TCollection_AsciiString(count) + "\n";
2310 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidSameRangeFlag);
2312 theDump += " Invalid SameRange Flag ................... ";
2313 theDump += TCollection_AsciiString(count) + "\n";
2315 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidSameParameterFlag);
2317 theDump += " Invalid SameParameter Flag ............... ";
2318 theDump += TCollection_AsciiString(count) + "\n";
2320 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidDegeneratedFlag);
2322 theDump += " Invalid Degenerated Flag ................. ";
2323 theDump += TCollection_AsciiString(count) + "\n";
2325 count = NbProblems->Value((Standard_Integer)BRepCheck_FreeEdge);
2327 theDump += " Free Edge ................................ ";
2328 theDump += TCollection_AsciiString(count) + "\n";
2330 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidMultiConnexity);
2332 theDump += " Invalid MultiConnexity ................... ";
2333 theDump += TCollection_AsciiString(count) + "\n";
2335 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidRange);
2337 theDump += " Invalid Range ............................ ";
2338 theDump += TCollection_AsciiString(count) + "\n";
2340 count = NbProblems->Value((Standard_Integer)BRepCheck_EmptyWire);
2342 theDump += " Empty Wire ............................... ";
2343 theDump += TCollection_AsciiString(count) + "\n";
2345 count = NbProblems->Value((Standard_Integer)BRepCheck_RedundantEdge);
2347 theDump += " Redundant Edge ........................... ";
2348 theDump += TCollection_AsciiString(count) + "\n";
2350 count = NbProblems->Value((Standard_Integer)BRepCheck_SelfIntersectingWire);
2352 theDump += " Self Intersecting Wire ................... ";
2353 theDump += TCollection_AsciiString(count) + "\n";
2355 count = NbProblems->Value((Standard_Integer)BRepCheck_NoSurface);
2357 theDump += " No Surface ............................... ";
2358 theDump += TCollection_AsciiString(count) + "\n";
2360 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidWire);
2362 theDump += " Invalid Wire ............................. ";
2363 theDump += TCollection_AsciiString(count) + "\n";
2365 count = NbProblems->Value((Standard_Integer)BRepCheck_RedundantWire);
2367 theDump += " Redundant Wire ........................... ";
2368 theDump += TCollection_AsciiString(count) + "\n";
2370 count = NbProblems->Value((Standard_Integer)BRepCheck_IntersectingWires);
2372 theDump += " Intersecting Wires ....................... ";
2373 theDump += TCollection_AsciiString(count) + "\n";
2375 count = NbProblems->Value((Standard_Integer)BRepCheck_InvalidImbricationOfWires);
2377 theDump += " Invalid Imbrication of Wires ............. ";
2378 theDump += TCollection_AsciiString(count) + "\n";
2380 count = NbProblems->Value((Standard_Integer)BRepCheck_EmptyShell);
2382 theDump += " Empty Shell .............................. ";
2383 theDump += TCollection_AsciiString(count) + "\n";
2385 count = NbProblems->Value((Standard_Integer)BRepCheck_RedundantFace);
2387 theDump += " Redundant Face ........................... ";
2388 theDump += TCollection_AsciiString(count) + "\n";
2390 count = NbProblems->Value((Standard_Integer)BRepCheck_UnorientableShape);
2392 theDump += " Unorientable Shape ....................... ";
2393 theDump += TCollection_AsciiString(count) + "\n";
2395 count = NbProblems->Value((Standard_Integer)BRepCheck_NotClosed);
2397 theDump += " Not Closed ............................... ";
2398 theDump += TCollection_AsciiString(count) + "\n";
2400 count = NbProblems->Value((Standard_Integer)BRepCheck_NotConnected);
2402 theDump += " Not Connected ............................ ";
2403 theDump += TCollection_AsciiString(count) + "\n";
2405 count = NbProblems->Value((Standard_Integer)BRepCheck_SubshapeNotInShape);
2407 theDump += " Subshape not in Shape .................... ";
2408 theDump += TCollection_AsciiString(count) + "\n";
2410 count = NbProblems->Value((Standard_Integer)BRepCheck_BadOrientation);
2412 theDump += " Bad Orientation .......................... ";
2413 theDump += TCollection_AsciiString(count) + "\n";
2415 count = NbProblems->Value((Standard_Integer)BRepCheck_BadOrientationOfSubshape);
2417 theDump += " Bad Orientation of Subshape .............. ";
2418 theDump += TCollection_AsciiString(count) + "\n";
2420 count = NbProblems->Value((Standard_Integer)BRepCheck_CheckFail);
2422 theDump += " checkshape failure ....................... ";
2423 theDump += TCollection_AsciiString(count) + "\n";
2426 theDump += " ------------------------------------------------\n";
2427 theDump += "*** Shapes with problems : ";
2428 theDump += TCollection_AsciiString(sl->Length()) + "\n";
2430 Standard_Integer nbv, nbe, nbw, nbf, nbs, nbo;
2431 nbv = nbe = nbw = nbf = nbs = nbo = 0;
2433 for (i = 1; i <= sl->Length(); i++) {
2434 TopoDS_Shape shi = sl->Value(i);
2435 TopAbs_ShapeEnum sti = shi.ShapeType();
2437 case TopAbs_VERTEX : nbv++; break;
2438 case TopAbs_EDGE : nbe++; break;
2439 case TopAbs_WIRE : nbw++; break;
2440 case TopAbs_FACE : nbf++; break;
2441 case TopAbs_SHELL : nbs++; break;
2442 case TopAbs_SOLID : nbo++; break;
2448 theDump += "VERTEX : ";
2449 if (nbv < 10) theDump += " ";
2450 theDump += TCollection_AsciiString(nbv) + "\n";
2453 theDump += "EDGE : ";
2454 if (nbe < 10) theDump += " ";
2455 theDump += TCollection_AsciiString(nbe) + "\n";
2458 theDump += "WIRE : ";
2459 if (nbw < 10) theDump += " ";
2460 theDump += TCollection_AsciiString(nbw) + "\n";
2463 theDump += "FACE : ";
2464 if (nbf < 10) theDump += " ";
2465 theDump += TCollection_AsciiString(nbf) + "\n";
2468 theDump += "SHELL : ";
2469 if (nbs < 10) theDump += " ";
2470 theDump += TCollection_AsciiString(nbs) + "\n";
2473 theDump += "SOLID : ";
2474 if (nbo < 10) theDump += " ";
2475 theDump += TCollection_AsciiString(nbo) + "\n";
2480 //=======================================================================
2481 //function : GetProblemShapes
2482 // purpose : for StructuralDump
2483 //=======================================================================
2484 void GEOMImpl_IMeasureOperations::GetProblemShapes (const BRepCheck_Analyzer& theAna,
2485 const TopoDS_Shape& theShape,
2486 Handle(TopTools_HSequenceOfShape)& sl,
2487 Handle(TColStd_HArray1OfInteger)& NbProblems,
2488 TopTools_DataMapOfShapeListOfShape& theMap)
2490 for (TopoDS_Iterator iter(theShape); iter.More(); iter.Next()) {
2491 GetProblemShapes(theAna, iter.Value(), sl, NbProblems, theMap);
2493 TopAbs_ShapeEnum styp = theShape.ShapeType();
2494 BRepCheck_ListIteratorOfListOfStatus itl;
2495 TopTools_ListOfShape empty;
2496 if (!theMap.IsBound(theShape)) {
2497 theMap.Bind(theShape,empty);
2499 if (!theAna.Result(theShape).IsNull()) {
2500 itl.Initialize(theAna.Result(theShape)->Status());
2501 // !!! May be, we have to print all the problems, not only the first one ?
2502 if (itl.Value() != BRepCheck_NoError) {
2503 sl->Append(theShape);
2504 BRepCheck_Status stat = itl.Value();
2505 NbProblems->SetValue((Standard_Integer)stat,
2506 NbProblems->Value((Standard_Integer)stat) + 1);
2513 GetProblemSub(theAna, theShape, sl, NbProblems, TopAbs_VERTEX, theMap);
2516 GetProblemSub(theAna, theShape, sl, NbProblems, TopAbs_WIRE, theMap);
2517 GetProblemSub(theAna, theShape, sl, NbProblems, TopAbs_EDGE, theMap);
2518 GetProblemSub(theAna, theShape, sl, NbProblems, TopAbs_VERTEX, theMap);
2523 GetProblemSub(theAna, theShape, sl, NbProblems, TopAbs_SHELL, theMap);
2530 //=======================================================================
2531 //function : Contains
2532 //=======================================================================
2533 static Standard_Boolean Contains (const TopTools_ListOfShape& L,
2534 const TopoDS_Shape& S)
2536 TopTools_ListIteratorOfListOfShape it;
2537 for (it.Initialize(L); it.More(); it.Next()) {
2538 if (it.Value().IsSame(S)) {
2539 return Standard_True;
2542 return Standard_False;
2545 //=======================================================================
2546 //function : GetProblemSub
2547 // purpose : for StructuralDump
2548 //=======================================================================
2549 void GEOMImpl_IMeasureOperations::GetProblemSub (const BRepCheck_Analyzer& theAna,
2550 const TopoDS_Shape& theShape,
2551 Handle(TopTools_HSequenceOfShape)& sl,
2552 Handle(TColStd_HArray1OfInteger)& NbProblems,
2553 const TopAbs_ShapeEnum Subtype,
2554 TopTools_DataMapOfShapeListOfShape& theMap)
2556 BRepCheck_ListIteratorOfListOfStatus itl;
2557 TopExp_Explorer exp;
2558 for (exp.Init(theShape, Subtype); exp.More(); exp.Next()) {
2559 const TopoDS_Shape& sub = exp.Current();
2561 const Handle(BRepCheck_Result)& res = theAna.Result(sub);
2562 for (res->InitContextIterator();
2563 res->MoreShapeInContext();
2564 res->NextShapeInContext()) {
2565 if (res->ContextualShape().IsSame(theShape) && !Contains(theMap(sub), theShape)) {
2566 theMap(sub).Append(theShape);
2567 itl.Initialize(res->StatusOnShape());
2569 if (itl.Value() != BRepCheck_NoError) {
2570 Standard_Integer ii = 0;
2572 for (ii = 1; ii <= sl->Length(); ii++)
2573 if (sl->Value(ii).IsSame(sub)) break;
2575 if (ii > sl->Length()) {
2577 BRepCheck_Status stat = itl.Value();
2578 NbProblems->SetValue((Standard_Integer)stat,
2579 NbProblems->Value((Standard_Integer)stat) + 1);
2581 for (ii = 1; ii <= sl->Length(); ii++)
2582 if (sl->Value(ii).IsSame(theShape)) break;
2583 if (ii > sl->Length()) {
2584 sl->Append(theShape);
2585 BRepCheck_Status stat = itl.Value();
2586 NbProblems->SetValue((Standard_Integer)stat,
2587 NbProblems->Value((Standard_Integer)stat) + 1);