1 // Created on: 1994-06-07
2 // Created by: Bruno DUMORTIER
3 // Copyright (c) 1994-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
6 // This file is part of Open CASCADE Technology software library.
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
17 #include <BRepFill_Pipe.ixx>
19 #include <Standard_ErrorHandler.hxx>
21 #include <BRep_Tool.hxx>
22 #include <BRep_Builder.hxx>
23 #include <BRepClass3d_SolidClassifier.hxx>
24 #include <BRepLib_MakeVertex.hxx>
25 #include <BRepTools_Substitution.hxx>
27 #include <GeomFill_CorrectedFrenet.hxx>
28 #include <GeomFill_Frenet.hxx>
29 #include <GeomFill_DiscreteTrihedron.hxx>
30 #include <GeomFill_CurveAndTrihedron.hxx>
32 #include <BRepFill_SectionPlacement.hxx>
33 #include <BRepFill_ShapeLaw.hxx>
34 #include <BRepFill_Edge3DLaw.hxx>
35 #include <BRepFill_Sweep.hxx>
37 #include <GeomAbs_Shape.hxx>
39 #include <TopAbs_ShapeEnum.hxx>
41 #include <TopoDS_Shell.hxx>
42 #include <TopoDS_Solid.hxx>
43 #include <TopoDS_Compound.hxx>
44 #include <TopoDS_Iterator.hxx>
45 #include <TopTools_DataMapOfShapeInteger.hxx>
46 #include <TColStd_DataMapOfIntegerInteger.hxx>
47 #include <TColStd_DataMapIteratorOfDataMapOfIntegerInteger.hxx>
49 #include <Precision.hxx>
50 #include <Standard_NotImplemented.hxx>
52 #include <Geom_TrimmedCurve.hxx>
53 #include <Geom_OffsetCurve.hxx>
54 #include <Geom_BSplineCurve.hxx>
55 #include <BRepBuilderAPI_Transform.hxx>
56 #include <BRepBuilderAPI_Copy.hxx>
57 #include <TopTools_SequenceOfShape.hxx>
58 #include <TopTools_ListIteratorOfListOfShape.hxx>
59 #include <BRepLib.hxx>
61 #include <Geom2dAdaptor_HCurve.hxx>
62 #include <GeomAdaptor_HSurface.hxx>
63 #include <Adaptor3d_CurveOnSurface.hxx>
65 #include <ShapeUpgrade_RemoveLocations.hxx>
69 static Standard_Boolean Affich = 0;
72 static void ReverseModifiedEdges(TopoDS_Shape& aShape,
73 TopTools_MapOfShape& Emap)
75 TopExp_Explorer Explo(aShape, TopAbs_FACE);
78 for (; Explo.More(); Explo.Next())
80 TopoDS_Shape aFace = Explo.Current();
81 TopoDS_Iterator itf(aFace);
82 for (; itf.More(); itf.Next())
84 TopoDS_Shape aWire = itf.Value();
85 TopTools_ListOfShape Ledges;
86 TopoDS_Iterator itw(aWire);
87 for (; itw.More(); itw.Next())
88 Ledges.Append(itw.Value());
90 aWire.Free(Standard_True);
91 TopTools_ListIteratorOfListOfShape itl(Ledges);
92 for (; itl.More(); itl.Next())
93 BB.Remove(aWire, itl.Value());
95 for (itl.Initialize(Ledges); itl.More(); itl.Next())
97 TopoDS_Shape anEdge = itl.Value();
98 if (Emap.Contains(anEdge))
100 BB.Add(aWire, anEdge);
106 static void UpdateTolFromTopOrBottomPCurve(const TopoDS_Face& aFace,
109 Standard_Real fpar, lpar;
110 Handle(Geom2d_Curve) aPCurve = BRep_Tool::CurveOnSurface(anEdge, aFace, fpar, lpar);
111 if (aPCurve.IsNull())
114 Handle(Geom_Curve) aCurve = BRep_Tool::Curve(anEdge, fpar, lpar);
118 Handle(Geom2dAdaptor_HCurve) GAHC2d = new Geom2dAdaptor_HCurve(aPCurve, fpar, lpar);
119 Handle(Geom_Surface) aSurf = BRep_Tool::Surface(aFace);
120 Handle(GeomAdaptor_HSurface) GAHS = new GeomAdaptor_HSurface(aSurf);
121 Adaptor3d_CurveOnSurface ConS(GAHC2d, GAHS);
123 Standard_Real Tol = BRep_Tool::Tolerance(anEdge);
124 Standard_Real InitTol = Tol;
125 Standard_Real TolTol = Tol*Tol;
126 const Standard_Integer NCONTROL = 22;
127 Standard_Real delta = (lpar - fpar)/NCONTROL;
128 for (Standard_Integer i = 0; i <= NCONTROL; i++)
130 Standard_Real par = fpar + i*delta;
131 gp_Pnt pnt = aCurve->Value(par);
132 gp_Pnt prj = ConS.Value(par);
133 Standard_Real sqdist = pnt.SquareDistance(prj);
137 Tol = 1.00005 * Sqrt(TolTol);
141 BB.UpdateEdge(anEdge, Tol);
142 TopoDS_Iterator itv(anEdge);
143 for (; itv.More(); itv.Next())
145 TopoDS_Vertex aVertex = TopoDS::Vertex(itv.Value());
146 BB.UpdateVertex(aVertex, Tol);
151 //=======================================================================
152 //function : BRepFill_Pipe
154 //=======================================================================
156 BRepFill_Pipe::BRepFill_Pipe()
160 myContinuity = GeomAbs_C2;
161 myMode = GeomFill_IsCorrectedFrenet;
162 myForceApproxC1 = Standard_False;
164 myCurIndexOfSectionEdge = 1;
168 //=======================================================================
169 //function : BRepFill_Pipe
171 //=======================================================================
173 BRepFill_Pipe::BRepFill_Pipe(const TopoDS_Wire& Spine,
174 const TopoDS_Shape& Profile,
175 const GeomFill_Trihedron aMode,
176 const Standard_Boolean ForceApproxC1,
177 const Standard_Boolean KPart)
183 myMode = GeomFill_IsCorrectedFrenet;
184 if (aMode == GeomFill_IsFrenet ||
185 aMode == GeomFill_IsCorrectedFrenet ||
186 aMode == GeomFill_IsDiscreteTrihedron)
189 myContinuity = GeomAbs_C2;
190 if (myMode == GeomFill_IsDiscreteTrihedron)
191 myContinuity = GeomAbs_C0;
193 myForceApproxC1 = ForceApproxC1;
195 myCurIndexOfSectionEdge = 1;
197 Perform(Spine, Profile, KPart);
201 //=======================================================================
204 //=======================================================================
206 void BRepFill_Pipe::Perform(const TopoDS_Wire& Spine,
207 const TopoDS_Shape& Profile,
208 const Standard_Boolean /*KPart*/)
211 mySections.Nullify();
220 BRepTools_WireExplorer wexp;
221 TopoDS_Shape TheProf;
223 Handle(GeomFill_TrihedronLaw) TLaw;
226 case GeomFill_IsFrenet:
227 TLaw = new GeomFill_Frenet();
229 case GeomFill_IsCorrectedFrenet:
230 TLaw = new GeomFill_CorrectedFrenet();
232 case GeomFill_IsDiscreteTrihedron:
233 TLaw = new GeomFill_DiscreteTrihedron();
238 Handle(GeomFill_CurveAndTrihedron) Loc =
239 new (GeomFill_CurveAndTrihedron) (TLaw);
240 myLoc = new (BRepFill_Edge3DLaw) (mySpine, Loc);
241 if (myLoc->NbLaw() == 0) {
242 return; // Degenerated case
244 myLoc->TransformInG0Law(); // Set into continuity
246 BRepFill_SectionPlacement Place(myLoc, Profile);
247 myTrsf = Place.Transformation();
249 TopLoc_Location Loc2(myTrsf), Loc1;
250 Loc1 = Profile.Location();
253 TheProf.Location(Loc2.Multiplied(Loc1));
255 // Construct First && Last Shape
256 Handle(GeomFill_LocationLaw) law;
261 Standard_Real first, last;
262 myLoc->Law(1)->GetDomain(first, last);
263 myLoc->Law(1)->D0(first, M, V);
264 fila.SetValues(M(1,1), M(1,2), M(1,3), V.X(),
265 M(2,1), M(2,2), M(2,3), V.Y(),
266 M(3,1), M(3,2), M(3,3), V.Z(),
269 fila.Multiply(myTrsf);
270 TopLoc_Location LocFirst(fila);
272 if ( ! LocFirst.IsIdentity()) {
273 //myFirst.Location( LocFirst.Multiplied(myProfile.Location()) );
274 myFirst = BRepBuilderAPI_Transform(myProfile, fila, Standard_True); //copy
277 ShapeUpgrade_RemoveLocations RemLoc;
278 RemLoc.Remove(myFirst);
279 myFirst = RemLoc.GetResult();
280 TopLoc_Location theLoc = myFirst.Location();
281 if (!theLoc.IsIdentity())
283 TopoDS_Shape NewMyFirst = BRepBuilderAPI_Copy(myFirst);
284 RemLoc.Remove(NewMyFirst);
285 NewMyFirst = RemLoc.GetResult();
286 TopLoc_Location theIdentity;
287 NewMyFirst.Location(theIdentity);
288 myFirst = BRepBuilderAPI_Transform(NewMyFirst, theLoc.Transformation(), Standard_True);
291 myLoc->Law(myLoc->NbLaw())->GetDomain(first, last);
292 myLoc->Law(myLoc->NbLaw())->D0(last,M, V);
293 // try { // Not good, but there are no other means to test SetValues
294 fila.SetValues(M(1,1), M(1,2), M(1,3), V.X(),
295 M(2,1), M(2,2), M(2,3), V.Y(),
296 M(3,1), M(3,2), M(3,3), V.Z(),
298 fila.Multiply(myTrsf);
299 TopLoc_Location LocLast(fila);
300 if (! myLoc->IsClosed() || LocFirst != LocLast) {
302 if ( ! LocLast.IsIdentity()) {
303 //myLast.Location(LocLast.Multiplied(myProfile.Location()) );
304 myLast = BRepBuilderAPI_Transform(myProfile, fila, Standard_True); //copy
311 RemLoc.Remove(myLast);
312 myLast = RemLoc.GetResult();
313 theLoc = myLast.Location();
314 if (!theLoc.IsIdentity())
316 TopoDS_Shape NewMyLast = BRepBuilderAPI_Copy(myLast);
317 RemLoc.Remove(NewMyLast);
318 NewMyLast = RemLoc.GetResult();
319 TopLoc_Location theIdentity;
320 NewMyLast.Location(theIdentity);
321 myLast = BRepBuilderAPI_Transform(NewMyLast, theLoc.Transformation(), Standard_True);
326 DBRep::Set("theprof", TheProf);
327 DBRep::Set("thefirst", myFirst);
328 DBRep::Set("thelast" , myLast);
332 myShape = MakeShape(TheProf, myFirst, myLast);
336 //=======================================================================
339 //=======================================================================
341 const TopoDS_Shape& BRepFill_Pipe::Spine() const
346 //=======================================================================
349 //=======================================================================
351 const TopoDS_Shape& BRepFill_Pipe::Profile() const
356 //=======================================================================
359 //=======================================================================
361 const TopoDS_Shape& BRepFill_Pipe::Shape() const
366 //=======================================================================
367 //function : ErrorOnSurface
369 //=======================================================================
371 Standard_Real BRepFill_Pipe::ErrorOnSurface() const
373 return myErrorOnSurf;
377 //=======================================================================
378 //function : FirstShape
380 //=======================================================================
382 const TopoDS_Shape& BRepFill_Pipe::FirstShape() const
388 //=======================================================================
389 //function : LastShape
391 //=======================================================================
393 const TopoDS_Shape& BRepFill_Pipe::LastShape() const
399 //=======================================================================
402 //=======================================================================
404 TopoDS_Face BRepFill_Pipe::Face(const TopoDS_Edge& ESpine,
405 const TopoDS_Edge& EProfile)
409 if ( BRep_Tool::Degenerated(EProfile))
412 Standard_Integer ii, ispin = 0, iprof = 0, count = 0;
414 // *************************************************
415 // Search if EProfile is an edge of myProfile
416 // *************************************************
417 iprof = FindEdge(myProfile, EProfile, count);
419 if (!iprof) Standard_DomainError::Raise(
420 "BRepFill_Pipe::Face : Edge not in the Profile");
423 // *************************************************
424 // Search if ESpine is an edge of mySpine and find
425 // the index of the corresponding Filler
426 // *************************************************
427 for (ii=1; ii<=myLoc->NbLaw() && (!ispin); ii++)
428 if (ESpine.IsSame(myLoc->Edge(ii))) ispin = ii;
430 if (!ispin) Standard_DomainError::Raise(
431 "BRepFill_Pipe::Edge : Edge not in the Spine");
433 theFace = TopoDS::Face(myFaces->Value(iprof, ispin));
438 //=======================================================================
441 //=======================================================================
442 TopoDS_Edge BRepFill_Pipe::Edge(const TopoDS_Edge& ESpine,
443 const TopoDS_Vertex& VProfile)
445 Standard_Integer ii, ispin = 0, iprof = 0, count = 0;;
447 // *************************************************
448 // Search if VProfile is a Vertex of myProfile
449 // *************************************************
450 iprof = FindVertex(myProfile, VProfile, count);
451 if (!iprof) Standard_DomainError::Raise(
452 "BRepFill_Pipe::Edge : Vertex not in the Profile");
455 // *************************************************
456 // Search if ESpine is an edge of mySpine and find
457 // the index of the corresponding Filler
458 // *************************************************
460 for (ii=1; ii<=myLoc->NbLaw() && (!ispin); ii++)
461 if (ESpine.IsSame(myLoc->Edge(ii))) ispin = ii;
463 if (!ispin) Standard_DomainError::Raise(
464 "BRepFill_Pipe::Edge : Edge not in the Spine");
467 // *************************************************
468 // Generate the corresponding Shape
469 // *************************************************
471 theEdge = TopoDS::Edge(myEdges->Value(iprof, ispin));
478 //=======================================================================
481 //=======================================================================
483 TopoDS_Shape BRepFill_Pipe::Section(const TopoDS_Vertex& VSpine) const
485 TopoDS_Iterator it, itv;
487 Standard_Integer ii, ispin = 0;
489 TopoDS_Shape curSect = myProfile;
491 // *************************************************
492 // Search if ESpine is an edge of mySpine and find
493 // the index of the corresponding Filler
494 // *************************************************
496 // iterate on all the edges of mySpine
497 for (ii=1; ii<=myLoc->NbLaw()+1 && (!ispin); ii++)
498 if (VSpine.IsSame(myLoc->Vertex(ii))) ispin = ii;
500 if (!ispin) Standard_DomainError::Raise(
501 "BRepFill_Pipe::Section : Vertex not in the Spine");
504 TopoDS_Compound Comp;
505 B.MakeCompound(Comp);
506 for (ii=1; ii<=mySections->ColLength(); ii++)
507 B.Add(Comp, mySections->Value(ii, ispin));
512 //=======================================================================
513 //function : PipeLine
514 //purpose : Construct a wire by sweeping of a point
515 //=======================================================================
517 TopoDS_Wire BRepFill_Pipe::PipeLine(const gp_Pnt& Point)
524 BRepLib_MakeVertex MkV(P);
525 Handle(BRepFill_ShapeLaw) Section =
526 new (BRepFill_ShapeLaw) (MkV.Vertex());
529 BRepFill_Sweep MkSw(Section, myLoc, Standard_True);
530 MkSw.SetForceApproxC1(myForceApproxC1);
531 MkSw.Build( myReversedEdges, myTapes, myRails,
532 BRepFill_Modified, myContinuity, GeomFill_Location, myDegmax, mySegmax );
533 TopoDS_Shape aLocalShape = MkSw.Shape();
534 myErrorOnSurf = MkSw.ErrorOnSurface();
535 return TopoDS::Wire(aLocalShape);
536 // return TopoDS::Wire(MkSw.Shape());
539 //=======================================================================
540 //function : MakeShape
542 //=======================================================================
544 TopoDS_Shape BRepFill_Pipe::MakeShape(const TopoDS_Shape& S,
545 const TopoDS_Shape& FirstShape,
546 const TopoDS_Shape& LastShape)
550 Standard_Boolean explode = Standard_False;
551 TopoDS_Shape TheS, TheFirst, TheLast;
552 Standard_Integer InitialLength = 0;
554 TheFirst = FirstShape;
556 if (! myFaces.IsNull()) InitialLength = myFaces->ColLength();
558 // there are two kinds of generation
559 // 1. generate with S from each Filler (Vertex, Edge)
560 // 2. call MakeShape recursively on the subshapes of S
562 // explode is True in the second case
564 // create the result empty
566 switch (S.ShapeType()) {
570 B.MakeWire(TopoDS::Wire(result));
577 B.MakeShell(TopoDS::Shell(result));
580 W.Closed(S.Closed());
582 if (!FirstShape.IsNull()) {
584 B.Add(W, FirstShape);
585 W.Closed(FirstShape.Closed());
588 if (!LastShape.IsNull()) {
591 W.Closed(LastShape.Closed());
598 B.MakeShell(TopoDS::Shell(result));
603 B.MakeShell(TopoDS::Shell(result));
604 explode = Standard_True;
605 if ( !mySpine.Closed() && !TheFirst.IsNull()) {
606 B.Add(result, TheFirst.Reversed());
613 B.MakeCompSolid(TopoDS::CompSolid(result));
614 explode = Standard_True;
619 case TopAbs_COMPSOLID :
620 Standard_DomainError::Raise("BRepFill_Pipe::profile contains solids");
623 case TopAbs_COMPOUND :
625 B.MakeCompound(TopoDS::Compound(result));
626 explode = Standard_True;
635 TopoDS_Iterator itFirst, itLast;
636 TopoDS_Shape first, last;
637 if (!TheFirst.IsNull()) itFirst.Initialize(TheFirst);
638 if (!TheLast.IsNull()) itLast.Initialize(TheLast);
640 for (TopoDS_Iterator it(S); it.More(); it.Next()) {
641 if (!TheFirst.IsNull()) first = itFirst.Value();
642 if (!TheLast.IsNull()) last = itLast.Value();
643 if (TheS.ShapeType() == TopAbs_FACE )
644 MakeShape(it.Value(), first, last);
646 B.Add(result,MakeShape(it.Value(), first, last));
648 if (!TheFirst.IsNull()) itFirst.Next();
649 if (!TheLast.IsNull()) itLast.Next();
654 if (TheS.ShapeType() == TopAbs_VERTEX ) {
655 Handle(BRepFill_ShapeLaw) Section =
656 new (BRepFill_ShapeLaw) (TopoDS::Vertex(TheS));
657 BRepFill_Sweep MkSw(Section, myLoc, Standard_True);
658 MkSw.SetForceApproxC1(myForceApproxC1);
659 MkSw.Build( myReversedEdges, myTapes, myRails,
660 BRepFill_Modified, myContinuity, GeomFill_Location, myDegmax, mySegmax );
661 result = MkSw.Shape();
662 myErrorOnSurf = MkSw.ErrorOnSurface();
664 Handle(TopTools_HArray2OfShape) aSections = MkSw.Sections();
666 if (aSections.IsNull() == Standard_False) {
667 const Standard_Integer aVLast = aSections->UpperCol();
669 myFirst = aSections->Value(1, 1);
670 myLast = aSections->Value(1, aVLast);
674 if (TheS.ShapeType() == TopAbs_WIRE ) {
675 Handle(BRepFill_ShapeLaw) Section =
676 new (BRepFill_ShapeLaw) (TopoDS::Wire(TheS));
677 BRepFill_Sweep MkSw(Section, myLoc, Standard_True);
678 MkSw.SetBounds(TopoDS::Wire(TheFirst),
679 TopoDS::Wire(TheLast));
680 MkSw.SetForceApproxC1(myForceApproxC1);
681 MkSw.Build( myReversedEdges, myTapes, myRails,
682 BRepFill_Modified, myContinuity, GeomFill_Location, myDegmax, mySegmax );
683 result = MkSw.Shape();
684 myErrorOnSurf = MkSw.ErrorOnSurface();
685 //Correct <myFirst> and <myLast>
686 ReverseModifiedEdges(myFirst, myReversedEdges);
687 ReverseModifiedEdges(myLast, myReversedEdges);
689 // Labeling of elements
690 if (mySections.IsNull()) {
691 myFaces = MkSw.SubShape();
692 mySections = MkSw.Sections();
693 myEdges = MkSw.InterFaces();
696 Handle(TopTools_HArray2OfShape) Aux, Somme;
697 Standard_Integer length;
698 Standard_Integer ii, jj, kk;
700 Aux = MkSw.SubShape();
701 length = Aux->ColLength() + myFaces->ColLength();
702 Somme = new (TopTools_HArray2OfShape) (1, length, 1,
704 for (jj=1; jj<=myFaces->RowLength(); jj++) {
705 for (ii=1; ii<=myFaces->ColLength(); ii++)
706 Somme->SetValue(ii, jj, myFaces->Value(ii, jj));
708 for (kk=1, ii=myFaces->ColLength()+1;
709 kk <=Aux->ColLength(); kk++, ii++)
710 Somme->SetValue(ii, jj, Aux->Value(kk, jj));
714 Aux = MkSw.Sections();
715 length = Aux->ColLength() + mySections->ColLength();
716 Somme = new (TopTools_HArray2OfShape) (1, length, 1,
718 for (jj=1; jj<=mySections->RowLength(); jj++) {
719 for (ii=1; ii<=mySections->ColLength(); ii++)
720 Somme->SetValue(ii, jj, mySections->Value(ii, jj));
722 myCurIndexOfSectionEdge = mySections->ColLength()+1;
724 for (kk=1, ii=mySections->ColLength()+1;
725 kk <=Aux->ColLength(); kk++, ii++)
726 Somme->SetValue(ii, jj, Aux->Value(kk, jj));
730 Aux = MkSw.InterFaces();
731 length = Aux->ColLength() + myEdges->ColLength();
732 Somme = new (TopTools_HArray2OfShape) (1, length, 1,
734 for (jj=1; jj<=myEdges->RowLength(); jj++) {
735 for (ii=1; ii<=myEdges->ColLength(); ii++)
736 Somme->SetValue(ii, jj, myEdges->Value(ii, jj));
738 for (kk=1, ii=myEdges->ColLength()+1;
739 kk <=Aux->ColLength(); kk++, ii++)
740 Somme->SetValue(ii, jj, Aux->Value(kk, jj));
748 if ( TheS.ShapeType() == TopAbs_FACE ) {
749 Standard_Integer ii, jj;
751 TopExp_Explorer Explo(result, TopAbs_FACE);
752 for (; Explo.More(); Explo.Next())
754 TopoDS_Shape aFace = Explo.Current();
755 RebuildTopOrBottomFace(aFace.Reversed(), Standard_True); //top face was reversed
759 for (ii=InitialLength+1; ii<=myFaces->ColLength(); ii++) {
760 for (jj=1; jj<=myFaces->RowLength(); jj++) {
761 F = TopoDS::Face(myFaces->Value(ii, jj));
762 if (!F.IsNull()) B.Add(result, F);
766 if ( !mySpine.Closed()) {
767 // if Spine is not closed
768 // add the last face of the solid
771 RebuildTopOrBottomFace(TheLast, Standard_False); //bottom face
773 B.Add(result, TopoDS::Face(TheLast));
780 result.Closed(Standard_True);
781 BS.Add(solid,TopoDS::Shell(result));
783 BRepClass3d_SolidClassifier SC(solid);
784 SC.PerformInfinitePoint(Precision::Confusion());
785 if ( SC.State() == TopAbs_IN) {
787 TopoDS_Shape aLocalShape = result.Reversed();
788 BS.Add(solid,TopoDS::Shell(aLocalShape));
789 // BS.Add(solid,TopoDS::Shell(result.Reversed()));
798 //============================================================================
799 //function : FindEdge
800 //purpose : Find the number of edge corresponding to the edge of the profile.
801 //============================================================================
803 Standard_Integer BRepFill_Pipe::FindEdge(const TopoDS_Shape& S,
804 const TopoDS_Edge& E,
805 Standard_Integer& InitialLength) const
807 Standard_Integer result = 0;
809 switch (S.ShapeType()) {
814 if (S.IsSame(E)) result = InitialLength;
820 Standard_Integer ii = InitialLength+1;
821 Handle(BRepFill_ShapeLaw) Section =
822 new (BRepFill_ShapeLaw) (TopoDS::Wire(S), Standard_False);
823 InitialLength += Section->NbLaw();
825 for (; (ii<=InitialLength) && (!result); ii++) {
826 if (E.IsSame(Section->Edge(ii)) ) result = ii;
833 case TopAbs_COMPOUND :
835 for (TopoDS_Iterator it(S); it.More() && (!result); it.Next())
836 result = FindEdge(it.Value(), E, InitialLength );
841 case TopAbs_COMPSOLID :
842 Standard_DomainError::Raise("BRepFill_Pipe::SOLID or COMPSOLID");
851 //=======================================================================
852 //function : FindVertex
853 //purpose : Find the number of edge corresponding to an edge of the profile.
854 //=======================================================================
856 Standard_Integer BRepFill_Pipe::FindVertex(const TopoDS_Shape& S,
857 const TopoDS_Vertex& V,
858 Standard_Integer& InitialLength) const
860 Standard_Integer result = 0;
862 switch (S.ShapeType()) {
866 if (S.IsSame(V)) result = InitialLength;
872 TopoDS_Vertex VF, VL;
873 TopExp::Vertices(TopoDS::Edge(S), VF, VL);
874 if (S.Orientation() == TopAbs_REVERSED) {
876 aux = VF; VF = VL; VL = aux;
878 if (VF.IsSame(V)) result = InitialLength+1;
879 else if (VL.IsSame(V)) result = InitialLength+2;
886 Standard_Integer ii = InitialLength+1;
887 Handle(BRepFill_ShapeLaw) Section =
888 new (BRepFill_ShapeLaw) (TopoDS::Wire(S), Standard_False);
889 InitialLength += Section->NbLaw()+1;
891 for (; (ii<=InitialLength) && (!result); ii++) {
892 if (V.IsSame(Section->Vertex(ii, 0.)) ) result = ii;
899 case TopAbs_COMPOUND :
901 for (TopoDS_Iterator it(S); it.More() && (!result); it.Next())
902 result = FindVertex(it.Value(), V, InitialLength);
907 case TopAbs_COMPSOLID :
908 Standard_DomainError::Raise("BRepFill_Pipe::SOLID or COMPSOLID");
917 //=======================================================================
918 //function : DefineRealSegmax
919 //purpose : Defines the real number of segments
920 // required in the case of bspline spine
921 //=======================================================================
923 void BRepFill_Pipe::DefineRealSegmax()
925 Standard_Integer RealSegmax = 0;
927 TopoDS_Iterator iter(mySpine);
928 for (; iter.More(); iter.Next())
930 TopoDS_Edge E = TopoDS::Edge(iter.Value());
931 Standard_Real first, last;
932 Handle(Geom_Curve) C = BRep_Tool::Curve( E, first, last );
935 while (C->DynamicType() == STANDARD_TYPE(Geom_TrimmedCurve) ||
936 C->DynamicType() == STANDARD_TYPE(Geom_OffsetCurve))
938 if (C->DynamicType() == STANDARD_TYPE(Geom_TrimmedCurve))
939 C = (*((Handle(Geom_TrimmedCurve)*)&C))->BasisCurve();
940 if (C->DynamicType() == STANDARD_TYPE(Geom_OffsetCurve))
941 C = (*((Handle(Geom_OffsetCurve)*)&C))->BasisCurve();
943 if (C->DynamicType() == STANDARD_TYPE(Geom_BSplineCurve))
945 const Handle(Geom_BSplineCurve)& BC = *((Handle(Geom_BSplineCurve)*)&C);
946 Standard_Integer NbKnots = BC->NbKnots();
947 Standard_Integer RealNbKnots = NbKnots;
948 if (first > BC->FirstParameter())
950 Standard_Integer I1, I2;
951 BC->LocateU( first, Precision::PConfusion(), I1, I2 );
954 if (last < BC->LastParameter())
956 Standard_Integer I1, I2;
957 BC->LocateU( last, Precision::PConfusion(), I1, I2 );
958 RealNbKnots -= NbKnots-I2;
960 RealSegmax += RealNbKnots-1;
964 if (mySegmax < RealSegmax)
965 mySegmax = RealSegmax;
968 //=======================================================================
969 //function : RebuildTopOrBottomFace
970 //purpose : Correct orientation of v-iso edges
971 // according to new 3d and 2d curves taken from swept surfaces
972 //=======================================================================
974 void BRepFill_Pipe::RebuildTopOrBottomFace(const TopoDS_Shape& aFace,
975 const Standard_Boolean IsTop) const
977 Standard_Integer IndexOfSection =
978 (IsTop)? 1 : mySections->RowLength();
982 TopoDS_Iterator itf(aFace);
983 for (; itf.More(); itf.Next())
985 TopoDS_Shape aWire = itf.Value();
986 TopTools_SequenceOfShape InitEdges;
987 TopTools_SequenceOfShape ResEdges;
988 TopoDS_Iterator itw(aWire);
989 for (; itw.More(); itw.Next())
991 TopoDS_Shape anEdge = itw.Value();
992 for (ii = myCurIndexOfSectionEdge; ii <= mySections->ColLength(); ii++)
994 TopoDS_Shape aVisoEdge = mySections->Value(ii, IndexOfSection);
995 if (anEdge.IsSame(aVisoEdge))
997 InitEdges.Append(anEdge);
998 ResEdges.Append(aVisoEdge);
1003 aWire.Free(Standard_True);
1004 for (ii = 1; ii <= InitEdges.Length(); ii++)
1006 BB.Remove(aWire, InitEdges(ii));
1007 UpdateTolFromTopOrBottomPCurve(TopoDS::Face(aFace), TopoDS::Edge(ResEdges(ii)));
1008 BB.Add(aWire, ResEdges(ii));