1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 // This file is part of Open CASCADE Technology software library.
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
14 #include <IGESConvGeom_GeomBuilder.ixx>
15 #include <TColStd_HArray1OfReal.hxx>
16 #include <TColStd_HArray2OfReal.hxx>
17 #include <Interface_Translates.hxx>
18 #include <Standard_DomainError.hxx>
22 static Standard_Real epsl = 1.E-10;
23 static Standard_Real epsa = 1.E-10;
25 IGESConvGeom_GeomBuilder::IGESConvGeom_GeomBuilder ()
29 void IGESConvGeom_GeomBuilder::Clear ()
31 theXYZ = new TColgp_HSequenceOfXYZ();
32 theVec = new TColgp_HSequenceOfXYZ();
33 gp_Trsf trid; thepos = trid;
36 void IGESConvGeom_GeomBuilder::AddXY (const gp_XY& val)
38 gp_XYZ aval (val.X(),val.Y(),0.);
39 theXYZ->Append (aval);
40 aval.SetCoord (0.,0.,0.);
41 theVec->Append (aval);
44 void IGESConvGeom_GeomBuilder::AddXYZ (const gp_XYZ& val)
47 theVec->Append (gp_XYZ(0.,0.,0.) );
50 void IGESConvGeom_GeomBuilder::AddVec (const gp_XYZ& val)
52 if (!theVec->IsEmpty()) theVec->SetValue (theVec->Length(), val);
55 Standard_Integer IGESConvGeom_GeomBuilder::NbPoints () const
56 { return theXYZ->Length(); }
58 gp_XYZ IGESConvGeom_GeomBuilder::Point (const Standard_Integer num) const
59 { return theXYZ->Value (num); }
61 Handle(IGESGeom_CopiousData) IGESConvGeom_GeomBuilder::MakeCopiousData
62 (const Standard_Integer datatype, const Standard_Boolean polyline) const
64 Standard_Integer num, nb = theXYZ->Length();
65 if (datatype < 1 || datatype > 3 || nb == 0 || (polyline && datatype == 3))
66 Standard_DomainError::Raise ("IGESConvGeom_GeomBuilder : MakeCopiousData");
68 Standard_Integer nbd = datatype+1; // 1->2 2->3 et 3->6
69 if (datatype == 3) nbd = 6;
70 Handle(TColStd_HArray1OfReal) data = new TColStd_HArray1OfReal (1,nb*nbd);
71 Standard_Real CZ = 0.;
72 for (num = 1; num <= nb; num ++) {
73 const gp_XYZ& pnt = theXYZ->Value(num);
74 data->SetValue ((num-1)*nbd+1 , pnt.X());
75 data->SetValue ((num-1)*nbd+2 , pnt.Y());
76 if (datatype > 1) data->SetValue ((num-1)*nbd+3 , pnt.Z());
78 if (datatype < 3) continue;
79 const gp_XYZ& vec = theVec->Value(num);
80 data->SetValue ((num-1)*nbd+4 , vec.X());
81 data->SetValue ((num-1)*nbd+5 , vec.Y());
82 data->SetValue ((num-1)*nbd+6 , vec.Z());
84 if (datatype == 1) CZ /= nb;
86 Handle(IGESGeom_CopiousData) res = new IGESGeom_CopiousData;
87 res->Init (datatype,CZ,data);
88 res->SetPolyline (polyline);
92 Handle(TColgp_HArray1OfXY) IGESConvGeom_GeomBuilder::MakeXY () const
94 Handle(TColgp_HArray1OfXY) res;
95 Standard_Integer num, nb = theXYZ->Length();
96 if (nb == 0) return res;
97 res = new TColgp_HArray1OfXY (1,nb);
98 for (num = 1; num <= nb; num ++) {
99 const gp_XYZ& pnt = theXYZ->Value(num);
100 res->SetValue (num , gp_XY (pnt.X(),pnt.Y()) );
105 Handle(TColgp_HArray1OfXYZ) IGESConvGeom_GeomBuilder::MakeXYZ () const
107 Handle(TColgp_HArray1OfXYZ) res;
109 Standard_Integer num, nb = theXYZ->Length();
110 if (nb == 0) return res;
111 res = new TColgp_HArray1OfXYZ (1,nb);
112 for (num = 1; num <= nb; num ++) {
113 res->SetValue (num , theXYZ->Value(num) );
116 SeqToArray(theXYZ,res,TColgp_HArray1OfXYZ);
121 gp_Trsf IGESConvGeom_GeomBuilder::Position () const
124 void IGESConvGeom_GeomBuilder::SetPosition (const gp_Trsf& pos)
127 void IGESConvGeom_GeomBuilder::SetPosition (const gp_Ax3& pos)
129 gp_Ax3 orig (gp::XOY());
131 ps.SetTransformation (pos,orig);
135 void IGESConvGeom_GeomBuilder::SetPosition (const gp_Ax2& pos)
141 void IGESConvGeom_GeomBuilder::SetPosition (const gp_Ax1& pos)
143 const gp_Pnt& p = pos.Location();
144 const gp_Dir& d = pos.Direction();
149 Standard_Boolean IGESConvGeom_GeomBuilder::IsIdentity () const
151 if (thepos.Form() == gp_Identity) return Standard_True;
152 // sinon, regarder de plus pres ...
153 if (!IsTranslation()) return Standard_False;
154 if (!thepos.TranslationPart().IsEqual (gp_XYZ(0.,0.,0.),epsl) )
155 return Standard_False;
156 return Standard_True;
159 Standard_Boolean IGESConvGeom_GeomBuilder::IsTranslation () const
161 if (thepos.Form() == gp_Identity || thepos.Form() == gp_Translation)
162 return Standard_True;
163 // sinon, regarder de plus pres ...
165 Standard_Integer i,j;
166 for (i = 1; i <= 3; i ++)
167 for (j = 1; j <= 3; j ++) {
168 Standard_Real cons = (i == j ? 1. : 0.);
169 Standard_Real val = thepos.Value(i,j);
170 if (val > cons + epsa || val < cons - epsa) return Standard_False;
172 return Standard_True;
175 Standard_Boolean IGESConvGeom_GeomBuilder::IsZOnly () const
177 if (!IsTranslation()) return Standard_False;
178 gp_XYZ t = thepos.TranslationPart(); t.SetZ (0.0);
179 if (!t.IsEqual (gp_XYZ(0.,0.,0.),epsl) ) return Standard_False;
180 return Standard_True;
183 void IGESConvGeom_GeomBuilder::EvalXYZ
185 Standard_Real& X, Standard_Real& Y, Standard_Real& Z) const
188 thepos.Inverted().Transforms (X,Y,Z);
191 Handle(IGESGeom_TransformationMatrix)
192 IGESConvGeom_GeomBuilder::MakeTransformation (const Standard_Real unit) const
194 Handle(TColStd_HArray2OfReal) data = new TColStd_HArray2OfReal (1,3,1,4);
195 Standard_Integer i,j;
196 for (i = 1; i <= 3; i ++)
197 for (j = 1; j <= 4; j ++)
198 data->SetValue (i,j, (j == 4 ? thepos.Value(i,j)/unit : thepos.Value(i,j)) );
199 Handle(IGESGeom_TransformationMatrix) rs = new IGESGeom_TransformationMatrix;
201 if (thepos.IsNegative()) rs->SetFormNumber(1);