0028550: Foundation Classes - fix empty message passed to thrown exception
[occt.git] / src / gce / gce_MakeElips.cxx
1 // Created on: 1992-09-02
2 // Created by: Remi GILET
3 // Copyright (c) 1992-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 <gce_MakeElips.hxx>
19 #include <gp.hxx>
20 #include <gp_Ax2.hxx>
21 #include <gp_Elips.hxx>
22 #include <gp_Lin.hxx>
23 #include <gp_Pnt.hxx>
24 #include <StdFail_NotDone.hxx>
25
26 //=========================================================================
27 //   Creation d une Ellipse 3d de gp a partir de son Ax2 et de son        +
28 //   grand rayon <MajorRadius> et son petit rayon <MinorRadius>.          +
29 //=========================================================================
30 gce_MakeElips::gce_MakeElips(const gp_Ax2&       A2          ,
31                              const Standard_Real MajorRadius ,
32                              const Standard_Real MinorRadius ) 
33 {
34   if (MajorRadius < MinorRadius ) { TheError = gce_InvertRadius;}
35   else if (MinorRadius < 0.0) { TheError = gce_NegativeRadius; }
36   else {
37     TheElips = gp_Elips(A2,MajorRadius,MinorRadius);
38     TheError = gce_Done;
39   }
40
41 }
42
43 //=========================================================================
44 //   Creation d une Ellipse 3d de gp de centre <Center> et de sommets     +
45 //   <S1> et <S2>.                                                        +
46 //   <S1> donne le grand rayon et <S2> le petit rayon.                    +
47 //=========================================================================
48
49 gce_MakeElips::gce_MakeElips(const gp_Pnt&   S1     ,
50                              const gp_Pnt&   S2     ,
51                              const gp_Pnt&   Center ) 
52 {
53   Standard_Real D1 = S1.Distance(Center);
54   if (D1 < gp::Resolution()) { TheError = gce_NullAxis; }
55   else {
56     gp_Dir XAxis(gp_XYZ(S1.XYZ()-Center.XYZ()));
57     Standard_Real D2 = gp_Lin(Center,XAxis).Distance(S2);
58     if (D1 < D2 || D2 < gp::Resolution()) { TheError = gce_InvertAxis; }
59     else {
60       gp_Dir Norm(XAxis.Crossed(gp_Dir(gp_XYZ(S2.XYZ()-Center.XYZ()))));
61       TheElips = gp_Elips(gp_Ax2(Center,Norm,XAxis),D1,D2);
62       TheError = gce_Done;
63     }
64   }
65 }
66
67 const gp_Elips& gce_MakeElips::Value() const
68
69   StdFail_NotDone_Raise_if (TheError != gce_Done,
70                             "gce_MakeElips::Value() - no result");
71   return TheElips;
72 }
73
74 const gp_Elips& gce_MakeElips::Operator() const 
75 {
76   return Value();
77 }
78
79 gce_MakeElips::operator gp_Elips() const
80 {
81   return Value();
82 }