0026937: Eliminate NO_CXX_EXCEPTION macro support
[occt.git] / src / MAT2d / MAT2d_CutCurve.cxx
1 // Created on: 1994-09-23
2 // Created by: Yves FRICAUD
3 // Copyright (c) 1994-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 <Geom2d_Curve.hxx>
19 #include <Geom2d_TrimmedCurve.hxx>
20 #include <Geom2dLProp_CurAndInf2d.hxx>
21 #include <gp_Pnt2d.hxx>
22 #include <MAT2d_CutCurve.hxx>
23 #include <Precision.hxx>
24 #include <Standard_OutOfRange.hxx>
25 #include <TColGeom2d_SequenceOfCurve.hxx>
26
27 //=======================================================================
28 //function : MAT2d_CutCurve
29 //purpose  : 
30 //=======================================================================
31 MAT2d_CutCurve::MAT2d_CutCurve()
32 {
33 }
34
35
36 //=======================================================================
37 //function : MAT2d_CutCurve
38 //purpose  : 
39 //=======================================================================
40
41 MAT2d_CutCurve::MAT2d_CutCurve(const Handle(Geom2d_Curve)& C)
42 {
43   Perform (C);
44 }
45
46
47 //=======================================================================
48 //function : Perform
49 //purpose  : 
50 //=======================================================================
51
52 void MAT2d_CutCurve::Perform(const Handle(Geom2d_Curve)& C)
53 {
54   theCurves.Clear();
55
56   Geom2dLProp_CurAndInf2d     Sommets;
57   Handle(Geom2d_TrimmedCurve) TrimC;
58   Standard_Real               UF,UL,UC;
59   gp_Pnt2d                    PF,PL,PC;
60   Standard_Real               PTol  = Precision::PConfusion()*10;
61   Standard_Real               Tol   = Precision::Confusion()*10;
62   Standard_Boolean            YaCut = Standard_False;
63   Sommets.Perform (C);
64
65   if (Sommets.IsDone() && !Sommets.IsEmpty()) {
66     UF = C->FirstParameter();
67     UL = C->LastParameter ();
68     PF = C->Value(UF);
69     PL = C->Value(UL);
70
71     for (Standard_Integer i = 1; i <= Sommets.NbPoints(); i++) {
72       UC = Sommets.Parameter(i);
73       
74       PC = C->Value(UC);
75       if (UC - UF > PTol && PC.Distance(PF) > Tol) {
76         if ( UL - UC < PTol || PL.Distance(PC) < Tol) {
77           break;
78         }
79         TrimC = new Geom2d_TrimmedCurve(C,UF,UC);
80         theCurves.Append(TrimC);
81         UF    = UC;
82         PF    = PC;
83         YaCut = Standard_True;
84       }
85     }
86     if (YaCut) {
87       TrimC = new Geom2d_TrimmedCurve(C,UF,UL);
88       theCurves.Append(TrimC);
89     }
90   }
91 }
92
93
94 //=======================================================================
95 //function : UnModified
96 //purpose  : 
97 //=======================================================================
98
99 Standard_Boolean MAT2d_CutCurve::UnModified() const 
100 {
101   return theCurves.IsEmpty();
102 }
103
104
105 //=======================================================================
106 //function : NbCurves
107 //purpose  : 
108 //=======================================================================
109
110 Standard_Integer MAT2d_CutCurve::NbCurves() const 
111 {
112   if (UnModified()) {throw Standard_OutOfRange();}
113   return theCurves.Length();
114 }
115
116
117 //=======================================================================
118 //function : Value
119 //purpose  : 
120 //=======================================================================
121
122 Handle(Geom2d_TrimmedCurve) MAT2d_CutCurve::Value (
123    const Standard_Integer Index) 
124 const 
125 {
126   if (UnModified()) {throw Standard_OutOfRange();}
127   if ( Index < 1 || Index > theCurves.Length()) {
128     throw Standard_OutOfRange();
129   }
130   return Handle(Geom2d_TrimmedCurve)::DownCast(theCurves.Value(Index));
131 }
132
133