src/IGESToBRep/IGESToBRep_IGESBoundary.cxx

   1 // Created on: 1998-12-16
   2 // Created by: Roman LYGIN
   3 // Copyright (c) 1998-1999 Matra Datavision
   4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 //
   6 // This file is part of Open CASCADE Technology software library.
   7 //
   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.
  13 //
  14 // Alternatively, this file may be used under the terms of Open CASCADE
  15 // commercial license or contractual agreement.
  16
  17
  18 #include <BRep_Builder.hxx>
  19 #include <BRep_Tool.hxx>
  20 #include <Geom2d_Curve.hxx>
  21 #include <Geom_Curve.hxx>
  22 #include <Geom_Plane.hxx>
  23 #include <GeomAdaptor_Curve.hxx>
  24 #include <gp_Trsf2d.hxx>
  25 #include <IGESToBRep.hxx>
  26 #include <IGESToBRep_IGESBoundary.hxx>
  27 #include <IGESToBRep_TopoCurve.hxx>
  28 #include <ShapeBuild_Edge.hxx>
  29 #include <ShapeFix_Wire.hxx>
  30 #include <Standard_Type.hxx>
  31 #include <TColStd_HSequenceOfTransient.hxx>
  32 #include <TopoDS_Edge.hxx>
  33 #include <TopoDS_Face.hxx>
  34 #include <TopoDS_Wire.hxx>
  35
  36 IMPLEMENT_STANDARD_RTTIEXT(IGESToBRep_IGESBoundary,Standard_Transient)
  37
  38 //=======================================================================
  39 //function : IGESToBRep_IGESBoundary
  40 //purpose  :
  41 //=======================================================================
  42 IGESToBRep_IGESBoundary::IGESToBRep_IGESBoundary()
  43 {
  44 }
  45
  46 //=======================================================================
  47 //function : IGESToBRep_IGESBoundary
  48 //purpose  :
  49 //=======================================================================
  50
  51 IGESToBRep_IGESBoundary::IGESToBRep_IGESBoundary(const IGESToBRep_CurveAndSurface& CS)
  52      : myCS (CS)
  53 {
  54 }
  55
  56 //=======================================================================
  57 //function : Init
  58 //purpose  :
  59 //=======================================================================
  60
  61  void IGESToBRep_IGESBoundary::Init(const IGESToBRep_CurveAndSurface& CS,
  62                                     const Handle(IGESData_IGESEntity)& entity,
  63                                     const TopoDS_Face& face,
  64                                     const gp_Trsf2d& trans,
  65                                     const Standard_Real uFact,
  66                                     const Standard_Integer filepreference)
  67 {
  68   myCS             = CS;
  69   myentity         = entity;
  70   myface           = face;
  71   mytrsf           = trans;
  72   myuFact          = uFact;
  73   myfilepreference = filepreference;
  74 }
  75
  76 //=======================================================================
  77 //function : Transfer
  78 //purpose  :
  79 //=======================================================================
  80
  81  Standard_Boolean IGESToBRep_IGESBoundary::Transfer(Standard_Boolean& okCurve,
  82                                                     Standard_Boolean& okCurve3d,
  83                                                     Standard_Boolean& okCurve2d,
  84                                                     const Handle(IGESData_IGESEntity)& curve3d,
  85                                                     const Standard_Boolean toreverse3d,
  86                                                     const Handle(IGESData_HArray1OfIGESEntity)& curves2d,
  87                                                     const Standard_Integer number)
  88 {
  89   Handle(ShapeExtend_WireData) scurve3d, lsewd; //temporary objects
  90   return Transfer (okCurve, okCurve3d, okCurve2d,
  91                    curve3d, scurve3d, Standard_False, toreverse3d,
  92                    curves2d, Standard_False,
  93                    number, lsewd);
  94 }
  95
  96 //=======================================================================
  97 //function : Transfer
  98 //purpose  :
  99 //=======================================================================
 100
 101  Standard_Boolean IGESToBRep_IGESBoundary::Transfer(Standard_Boolean& okCurve,
 102                                                     Standard_Boolean& okCurve3d,
 103                                                     Standard_Boolean& okCurve2d,
 104                                                     const Handle(ShapeExtend_WireData)& curve3d,
 105                                                     const Handle(IGESData_HArray1OfIGESEntity)& curves2d,
 106                                                     const Standard_Boolean toreverse2d,
 107                                                     const Standard_Integer number,
 108                                                     Handle(ShapeExtend_WireData)& lsewd)
 109 {
 110   Handle(IGESData_IGESEntity) icurve3d; //temporary object
 111   return Transfer (okCurve, okCurve3d, okCurve2d,
 112                    icurve3d, curve3d, Standard_True, Standard_False,
 113                    curves2d, toreverse2d,
 114                    number, lsewd);
 115 }
 116
 117 //=======================================================================
 118 //function : Check
 119 //purpose  :
 120 //=======================================================================
 121
 122  void IGESToBRep_IGESBoundary::Check(const Standard_Boolean,const Standard_Boolean,const Standard_Boolean,const Standard_Boolean)
 123 {
 124   // Implemented in IGESControl_IGESBoundary, subject to refactoring
 125 }
 126
 127 //=======================================================================
 128 //function : Transfer
 129 //purpose  :
 130 //=======================================================================
 131
 132  Standard_Boolean IGESToBRep_IGESBoundary::Transfer(Standard_Boolean&,
 133                                                     Standard_Boolean&,
 134                                                     Standard_Boolean&,
 135                                                     const Handle(IGESData_IGESEntity)& icurve3d,
 136                                                     const Handle(ShapeExtend_WireData)& scurve3d,
 137                                                     const Standard_Boolean usescurve,
 138                                                     const Standard_Boolean toreverse3d,
 139                                                     const Handle(IGESData_HArray1OfIGESEntity)& curves2d,
 140                                                     const Standard_Boolean toreverse2d,
 141                                                     const Standard_Integer number,
 142                                                     Handle(ShapeExtend_WireData)& Gsewd)
 143 {
 144   Gsewd                                = new ShapeExtend_WireData;//local translation (for mysewd)
 145   Handle(ShapeExtend_WireData) Gsewd3d = new ShapeExtend_WireData;//local translation (for mysewd3d)
 146   Handle(ShapeExtend_WireData) Gsewd2d = new ShapeExtend_WireData;//local translation (for mysewd2d)
 147
 148   Standard_Boolean GTranslate3d = Standard_True, GTranslate2d = Standard_True,
 149                    Preferred3d  = Standard_True, Preferred2d  = Standard_True;
 150
 151   Standard_Integer len3d = 0, len2d = 0;
 152   Handle(TColStd_HSequenceOfTransient) seq3d, seq2d;
 153   if (usescurve)
 154     len3d = scurve3d->NbEdges();
 155   else {
 156     IGESToBRep::IGESCurveToSequenceOfIGESCurve (icurve3d, seq3d);
 157     len3d = seq3d->Length();
 158   }
 159   if (!curves2d.IsNull()) {
 160     for (Standard_Integer i = 1; i <= curves2d->Length(); i++)
 161       IGESToBRep::IGESCurveToSequenceOfIGESCurve (curves2d->Value (i), seq2d);
 162     len2d = seq2d->Length();
 163   }
 164
 165   if (len3d == 0)
 166     GTranslate3d = Standard_False;
 167   else if (len2d == 0)
 168     GTranslate2d = Standard_False;
 169
 170   if (GTranslate3d && GTranslate2d) {
 171     //Setting preference in the case of inconsistency between 3D and 2D
 172     if      (myfilepreference == 2) Preferred3d = Standard_False;
 173     else if (myfilepreference == 3) Preferred2d = Standard_False;
 174     else                            Preferred3d = Standard_False;
 175   }
 176   if (GTranslate3d && GTranslate2d && len3d != len2d) {
 177     GTranslate3d = Preferred3d;
 178     GTranslate2d = Preferred2d;
 179   }
 180
 181   IGESToBRep_TopoCurve TC (myCS);
 182
 183   if (GTranslate3d && !GTranslate2d) {
 184     if (usescurve)
 185       Gsewd->Add (scurve3d->Wire());
 186     else {
 187       TopoDS_Shape Sh = TC.TransferTopoCurve (icurve3d);
 188       if (!Sh.IsNull()) {
 189         Gsewd3d->Add (Sh);
 190         if (toreverse3d) {
 191           ReverseCurves3d (Gsewd3d);
 192           Gsewd->Add (Gsewd3d->Wire());
 193         }
 194         else Gsewd->Add (Sh);//Gsewd = Gsewd3d is impossible to avoid sharing of sewd (UK1.igs entity 7)
 195       }
 196     }
 197   }
 198   else if (!GTranslate3d && GTranslate2d) {
 199     for (Standard_Integer i = curves2d->Lower(); i <= curves2d->Upper(); i++) {
 200       TopoDS_Shape Sh = TC.Transfer2dTopoCurve (curves2d->Value (i), myface, mytrsf, myuFact);
 201       if (!Sh.IsNull()) Gsewd2d->Add (Sh);
 202     }
 203     if (toreverse2d)
 204       ReverseCurves2d (Gsewd2d, myface);
 205     Gsewd->Add (Gsewd2d->Wire());
 206   }
 207   else if (GTranslate3d && GTranslate2d) {
 208     //Translate both curves 3D and 2D
 209     //Suppose that i-th segment in 2D curve corresponds to i-th segment in 3D curve
 210     for (Standard_Integer i = 1; i <= len3d; i++) {
 211       Standard_Boolean LTranslate3d = Standard_True, LTranslate2d = Standard_True;
 212
 213       Handle(ShapeExtend_WireData) Lsewd3d = new ShapeExtend_WireData;
 214       TC.SetBadCase (Standard_False); //:27
 215       if (usescurve)
 216         Lsewd3d->Add (scurve3d->Edge (i));
 217       else {
 218         TopoDS_Shape shape3d = TC.TransferTopoCurve (Handle(IGESData_IGESEntity)::DownCast (seq3d->Value (i)));
 219         if (!shape3d.IsNull()) {
 220           Lsewd3d->Add (shape3d);
 221           if (toreverse3d)
 222             ReverseCurves3d (Lsewd3d);
 223         }
 224         else LTranslate3d = Standard_False;
 225       }
 226       Gsewd3d->Add (Lsewd3d->Wire());
 227
 228       Handle(ShapeExtend_WireData) Lsewd2d = new ShapeExtend_WireData;
 229       TopoDS_Shape shape2d = TC.Transfer2dTopoCurve (Handle(IGESData_IGESEntity)::DownCast (seq2d->Value (i)),
 230                                                      myface, mytrsf, myuFact);
 231       if (!shape2d.IsNull()) {
 232         Lsewd2d->Add  (shape2d);
 233         if (toreverse2d)
 234           ReverseCurves2d (Lsewd2d, myface);
 235         Gsewd2d->Add (Lsewd2d->Wire());
 236       }
 237       else LTranslate2d = Standard_False;
 238
 239       if (LTranslate3d && LTranslate2d && Lsewd3d->NbEdges() != Lsewd2d->NbEdges()) {
 240         LTranslate3d = Preferred3d;
 241         LTranslate2d = Preferred2d;
 242       }
 243       Handle(ShapeExtend_WireData) Lsewd;//Lsewd3d or Lsewd2d or Lsewd3d+pcurve
 244       if      ( LTranslate3d && !LTranslate2d) Lsewd = Lsewd3d;
 245       else if (!LTranslate3d &&  LTranslate2d) Lsewd = Lsewd2d;
 246       else {
 247         Lsewd = Lsewd3d;
 248         //copying pcurve to edge with 3D curve
 249         for (Standard_Integer iedge = 1; iedge <= Lsewd3d->NbEdges(); iedge++) {
 250           TopoDS_Edge edge3d = Lsewd3d->Edge (iedge), edge2d = Lsewd2d->Edge (iedge);
 251           if (!IGESToBRep::TransferPCurve (edge2d, edge3d, myface)) continue;
 252         }
 253       }
 254       Gsewd->Add (Lsewd->Wire());
 255     }
 256   }
 257
 258   if (number > 1) {
 259     mysewd  ->Add (Gsewd  ->Wire());
 260     mysewd3d->Add (Gsewd3d->Wire());
 261     mysewd2d->Add (Gsewd2d->Wire());
 262   }
 263   else {
 264     mysewd   = Gsewd;
 265     mysewd3d = Gsewd3d;
 266     mysewd2d = Gsewd2d;
 267   }
 268   return Standard_True;
 269 }
 270
 271 //=======================================================================
 272 //function : ReverseCurves3d
 273 //purpose  : Reverses 3D curves of the edges in the wire and reverses
 274 //           the order of edges in the wire.
 275 //           Orientation of each edge is not changed
 276 //=======================================================================
 277
 278 void IGESToBRep_IGESBoundary::ReverseCurves3d (const Handle(ShapeExtend_WireData)& sewd)
 279 {
 280   sewd->Reverse();
 281   BRep_Builder B;
 282   TopoDS_Wire W;
 283   B.MakeWire(W);
 284   for (Standard_Integer i = 1; i <= sewd->NbEdges(); i++) {
 285     TopoDS_Edge oldedge = sewd->Edge (i), newedge;
 286     TopLoc_Location L;
 287     Standard_Real p1, p2;
 288     Handle(Geom_Curve) curve = BRep_Tool::Curve (oldedge, L, p1, p2);
 289     if (curve->IsPeriodic())                                   //#21
 290       ShapeBuild_Edge().MakeEdge (newedge, curve->Reversed(), L,
 291                                 curve->ReversedParameter (p2),
 292                                 curve->ReversedParameter (p1));
 293     else ShapeBuild_Edge().MakeEdge (newedge, curve->Reversed(), L,
 294                                 Max (curve->ReversedParameter(curve->LastParameter()), curve->ReversedParameter (p2)),
 295                                 Min (curve->ReversedParameter(curve->FirstParameter()),  curve->ReversedParameter (p1)));
 296     newedge.Orientation(TopAbs::Reverse (oldedge.Orientation()));
 297     //sewd->Set (newedge, i);
 298     B.Add(W,newedge);
 299   }
 300   Handle(ShapeFix_Wire) sfw = new ShapeFix_Wire();
 301   sfw->Load(W);
 302   sfw->FixConnected();
 303   sewd->Init(sfw->Wire());
 304 }
 305
 306 //=======================================================================
 307 //function : ReverseCurves2d
 308 //purpose  : Reverses pcurves of the edges in the wire and reverses
 309 //           the order of edges in the wire.
 310 //           Orientation of each edge is also changed
 311 //=======================================================================
 312
 313  void IGESToBRep_IGESBoundary::ReverseCurves2d (const Handle(ShapeExtend_WireData)& sewd, const TopoDS_Face& face)
 314 {
 315   sewd->Reverse(face);
 316   for (Standard_Integer i = 1; i <= sewd->NbEdges(); i++) {
 317     TopoDS_Edge oldedge = sewd->Edge (i), newedge;
 318     Standard_Real p1, p2;
 319     Handle(Geom2d_Curve) curve = BRep_Tool::CurveOnSurface (oldedge, face, p1, p2);
 320
 321     // skl 24.04.2002 for OCC314
 322     if(curve->IsPeriodic())
 323       ShapeBuild_Edge().MakeEdge (newedge, curve->Reversed(), face,
 324                                   curve->ReversedParameter (p2),
 325                                   curve->ReversedParameter (p1));
 326     else
 327       ShapeBuild_Edge().MakeEdge (newedge, curve->Reversed(), face,
 328                                   Max (curve->FirstParameter(), curve->ReversedParameter (p2)),//BUC50001 entity 936 2DForced
 329                                   Min (curve->LastParameter(),  curve->ReversedParameter (p1)));
 330     newedge.Orientation(oldedge.Orientation());
 331     sewd->Set (newedge, i);
 332   }
 333 }
 334