0024171: Eliminate CLang compiler warning -Wreorder
[occt.git] / src / VrmlData / VrmlData_IndexedFaceSet.cxx
... / ...
CommitLineData
1// Created on: 2006-11-04
2// Created by: Alexander GRIGORIEV
3// Copyright (c) 2006-2012 OPEN CASCADE SAS
4//
5// The content of this file is subject to the Open CASCADE Technology Public
6// License Version 6.5 (the "License"). You may not use the content of this file
7// except in compliance with the License. Please obtain a copy of the License
8// at http://www.opencascade.org and read it completely before using this file.
9//
10// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
12//
13// The Original Code and all software distributed under the License is
14// distributed on an "AS IS" basis, without warranty of any kind, and the
15// Initial Developer hereby disclaims all such warranties, including without
16// limitation, any warranties of merchantability, fitness for a particular
17// purpose or non-infringement. Please see the License for the specific terms
18// and conditions governing the rights and limitations under the License.
19
20
21
22#include <VrmlData_IndexedFaceSet.hxx>
23#include <VrmlData_InBuffer.hxx>
24#include <VrmlData_UnknownNode.hxx>
25#include <Poly_Triangulation.hxx>
26#include <BRep_TFace.hxx>
27#include <VrmlData_Coordinate.hxx>
28#include <VrmlData_Color.hxx>
29#include <VrmlData_Normal.hxx>
30#include <VrmlData_TextureCoordinate.hxx>
31#include <VrmlData_Scene.hxx>
32#include <Precision.hxx>
33#include <NCollection_Vector.hxx>
34#include <NCollection_DataMap.hxx>
35#include <Poly.hxx>
36#include <TShort_HArray1OfShortReal.hxx>
37
38#ifdef WNT
39#define _CRT_SECURE_NO_DEPRECATE
40#pragma warning (disable:4996)
41#endif
42
43IMPLEMENT_STANDARD_HANDLE (VrmlData_Faceted, VrmlData_Geometry)
44IMPLEMENT_STANDARD_RTTIEXT (VrmlData_Faceted, VrmlData_Geometry)
45IMPLEMENT_STANDARD_HANDLE (VrmlData_IndexedFaceSet, VrmlData_Faceted)
46IMPLEMENT_STANDARD_RTTIEXT (VrmlData_IndexedFaceSet, VrmlData_Faceted)
47
48//=======================================================================
49//function : readData
50//purpose :
51//=======================================================================
52
53VrmlData_ErrorStatus VrmlData_Faceted::readData (VrmlData_InBuffer& theBuffer)
54{
55 VrmlData_ErrorStatus aStatus (VrmlData_EmptyData);
56 Standard_Boolean aBool;
57 if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "ccw")) {
58 if (OK(aStatus, ReadBoolean (theBuffer, aBool)))
59 myIsCCW = aBool;
60 } else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "convex")) {
61 if (OK(aStatus, ReadBoolean (theBuffer, aBool)))
62 myIsConvex = aBool;
63 } else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "solid")) {
64 if (OK(aStatus, ReadBoolean (theBuffer, aBool)))
65 myIsSolid = aBool;
66 } else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "creaseAngle")) {
67 Standard_Real anAngle;
68 if (OK(aStatus, Scene().ReadReal (theBuffer, anAngle,
69 Standard_False, Standard_False))) {
70 if (anAngle < -Precision::Confusion()*0.001)
71 aStatus = VrmlData_IrrelevantNumber;
72 else
73 myCreaseAngle = anAngle;
74 }
75 }
76 return aStatus;
77}
78
79//=======================================================================
80//function : VrmlData_IndexedFaceSet::TShape
81//purpose :
82//=======================================================================
83
84const Handle(TopoDS_TShape)& VrmlData_IndexedFaceSet::TShape ()
85{
86 if (myNbPolygons == 0)
87 myTShape.Nullify();
88 else if (myIsModified) {
89 // Create an empty topological Face
90 const gp_XYZ * arrNodes = myCoords->Values();
91 Standard_Integer i, nTri(0);
92
93 NCollection_DataMap <int, int> mapNodeId;
94
95 // Count non-degenerated triangles
96 for (i = 0; i < (int)myNbPolygons; i++) {
97 const Standard_Integer * arrIndice;
98 if (Polygon(i, arrIndice) == 3) {
99 if (arrIndice[0] < 0)
100 continue;
101 const gp_XYZ aVec[2] = {
102 arrNodes[arrIndice[1]] - arrNodes[arrIndice[0]],
103 arrNodes[arrIndice[2]] - arrNodes[arrIndice[0]]
104 };
105 if ((aVec[0] ^ aVec[1]).SquareModulus() >
106 Precision::SquareConfusion())
107 ++nTri;
108 else {
109 const_cast<Standard_Integer&> (arrIndice[0]) = -1;
110 continue;
111 }
112 }
113 if (mapNodeId.IsBound (arrIndice[0]) == Standard_False)
114 mapNodeId.Bind (arrIndice[0], 0);
115 if (mapNodeId.IsBound (arrIndice[1]) == Standard_False)
116 mapNodeId.Bind (arrIndice[1], 0);
117 if (mapNodeId.IsBound (arrIndice[2]) == Standard_False)
118 mapNodeId.Bind (arrIndice[2], 0);
119 }
120 const Standard_Integer nbNodes (mapNodeId.Extent());
121 if (!nbNodes)
122 {
123 myIsModified = Standard_False;
124 myTShape.Nullify();
125 return myTShape;
126 }
127
128 Handle(Poly_Triangulation) aTriangulation =
129 new Poly_Triangulation (nbNodes, nTri, Standard_False);
130 Handle(BRep_TFace) aFace = new BRep_TFace();
131 aFace->Triangulation (aTriangulation);
132 myTShape = aFace;
133
134 // Copy the triangulation vertices
135 TColgp_Array1OfPnt& aNodes = aTriangulation->ChangeNodes();
136 NCollection_DataMap <int, int>::Iterator anIterN(mapNodeId);
137 for (i = 1; anIterN.More(); anIterN.Next()) {
138 const int aKey = anIterN.Key();
139 const gp_XYZ& aNodePnt = arrNodes[aKey];
140 aNodes(i) = gp_Pnt (aNodePnt);
141 anIterN.ChangeValue() = i++;
142 }
143
144 // Copy the triangles. Only the triangle-type polygons are supported.
145 // In this loop we also get rid of any possible degenerated triangles.
146 Poly_Array1OfTriangle& aTriangles = aTriangulation->ChangeTriangles();
147 nTri = 0;
148 for (i = 0; i < (int)myNbPolygons; i++) {
149 const Standard_Integer * arrIndice;
150 if (Polygon (i, arrIndice) == 3)
151 if (arrIndice[0] >= 0) // check to avoid previously skipped faces
152 aTriangles(++nTri).Set (mapNodeId(arrIndice[0]),
153 mapNodeId(arrIndice[1]),
154 mapNodeId(arrIndice[2]));
155 }
156
157 // Normals should be defined; if they are not, compute them
158 if (myNormals.IsNull ()) {
159 //aTriangulation->ComputeNormals();
160 Poly::ComputeNormals(aTriangulation);
161 }
162 else {
163 // Copy the normals. Currently only normals-per-vertex are supported.
164 Handle(TShort_HArray1OfShortReal) Normals =
165 new TShort_HArray1OfShortReal (1, 3*nbNodes);
166 if (myNormalPerVertex) {
167 if (myArrNormalInd == 0L) {
168 NCollection_DataMap <int, int>::Iterator anIterNN (mapNodeId);
169 for (; anIterNN.More (); anIterNN.Next ()) {
170 Standard_Integer anIdx = (anIterNN.Value() - 1) * 3 + 1;
171 const gp_XYZ& aNormal = myNormals->Normal (anIterNN.Key ());
172 Normals->SetValue (anIdx + 0, Standard_ShortReal (aNormal.X ()));
173 Normals->SetValue (anIdx + 1, Standard_ShortReal (aNormal.Y ()));
174 Normals->SetValue (anIdx + 2, Standard_ShortReal (aNormal.Z ()));
175 }
176 } else {
177 nTri = 0;
178 for (i = 0; i < (int)myNbPolygons; i++) {
179 const Standard_Integer * arrIndice;
180 if (Polygon(i, arrIndice) == 3)
181 if (arrIndice[0] >= 0) // check to avoid previously skipped faces
182 if (IndiceNormals(i, arrIndice) == 3) {
183 Standard_Integer anInd = (++nTri - 1) * 3 + 1;
184 for (Standard_Integer j = 0; j < 3; j++) {
185 const gp_XYZ& aNormal = myNormals->Normal (arrIndice[j]);
186 Normals->SetValue (anInd + 0 + j*3,
187 Standard_ShortReal (aNormal.X ()));
188 Normals->SetValue (anInd + 1 + j*3,
189 Standard_ShortReal (aNormal.Y ()));
190 Normals->SetValue (anInd + 2 + j*3,
191 Standard_ShortReal (aNormal.Z ()));
192 }
193 }
194 }
195 }
196 } else {
197 //TODO ..
198 }
199 aTriangulation->SetNormals(Normals);
200 }
201
202 myIsModified = Standard_False;
203 }
204 return myTShape;
205}
206
207//=======================================================================
208//function : VrmlData_IndexedFaceSet::Clone
209//purpose :
210//=======================================================================
211
212Handle(VrmlData_Node) VrmlData_IndexedFaceSet::Clone
213 (const Handle(VrmlData_Node)& theOther) const
214{
215 Handle(VrmlData_IndexedFaceSet) aResult =
216 Handle(VrmlData_IndexedFaceSet)::DownCast (VrmlData_Node::Clone(theOther));
217 if (aResult.IsNull())
218 aResult =
219 new VrmlData_IndexedFaceSet(theOther.IsNull()? Scene(): theOther->Scene(),
220 Name());
221
222 if (&aResult->Scene() == &Scene()) {
223 aResult->SetCoordinates (myCoords);
224 aResult->SetNormals (myNormals);
225 aResult->SetColors (myColors);
226 aResult->SetPolygons (myNbPolygons, myArrPolygons);
227 aResult->SetNormalInd (myNbNormals, myArrNormalInd);
228 aResult->SetColorInd (myNbColors, myArrColorInd);
229 aResult->SetTextureCoordInd (myNbTextures, myArrTextureInd);
230 } else {
231 // Create a dummy node to pass the different Scene instance to methods Clone
232 const Handle(VrmlData_UnknownNode) aDummyNode =
233 new VrmlData_UnknownNode (aResult->Scene());
234 if (myCoords.IsNull() == Standard_False)
235 aResult->SetCoordinates (Handle(VrmlData_Coordinate)::DownCast
236 (myCoords->Clone (aDummyNode)));
237 if (myNormals.IsNull() == Standard_False)
238 aResult->SetNormals (Handle(VrmlData_Normal)::DownCast
239 (myNormals->Clone (aDummyNode)));
240 if (myColors.IsNull() == Standard_False)
241 aResult->SetColors (Handle(VrmlData_Color)::DownCast
242 (myColors->Clone (aDummyNode)));
243 //TODO: Replace the following lines with the relevant copying
244 aResult->SetPolygons (myNbPolygons, myArrPolygons);
245 aResult->SetNormalInd (myNbNormals, myArrNormalInd);
246 aResult->SetColorInd (myNbColors, myArrColorInd);
247 aResult->SetTextureCoordInd (myNbTextures, myArrTextureInd);
248 }
249 aResult->SetNormalPerVertex (myNormalPerVertex);
250 aResult->SetColorPerVertex (myColorPerVertex);
251 return aResult;
252}
253
254//=======================================================================
255//function : VrmlData_IndexedFaceSet::Read
256//purpose :
257//=======================================================================
258
259VrmlData_ErrorStatus VrmlData_IndexedFaceSet::Read(VrmlData_InBuffer& theBuffer)
260{
261 VrmlData_ErrorStatus aStatus;
262 const VrmlData_Scene& aScene = Scene();
263 while (OK(aStatus, VrmlData_Scene::ReadLine(theBuffer)))
264 {
265 if (OK(aStatus, VrmlData_Faceted::readData (theBuffer)))
266 continue;
267 if (aStatus != VrmlData_EmptyData)
268 break;
269 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "colorPerVertex"))
270 aStatus = ReadBoolean (theBuffer, myColorPerVertex);
271 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "normalPerVertex"))
272 aStatus = ReadBoolean (theBuffer, myNormalPerVertex);
273 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "coordIndex"))
274 aStatus = aScene.ReadArrIndex (theBuffer, myArrPolygons, myNbPolygons);
275 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "colorIndex"))
276 aStatus = aScene.ReadArrIndex (theBuffer, myArrColorInd, myNbColors);
277 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "normalIndex"))
278 aStatus = aScene.ReadArrIndex (theBuffer, myArrNormalInd, myNbNormals);
279 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "texCoordIndex"))
280 aStatus = aScene.ReadArrIndex (theBuffer, myArrTextureInd, myNbTextures);
281 // These four checks should be the last one to avoid their interference
282 // with the other tokens (e.g., coordIndex)
283 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "texCoord"))
284 aStatus = ReadNode (theBuffer, myTxCoords,
285 STANDARD_TYPE(VrmlData_TextureCoordinate));
286 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "color"))
287 aStatus = ReadNode (theBuffer, myColors,
288 STANDARD_TYPE(VrmlData_Color));
289 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "coord"))
290 aStatus = ReadNode (theBuffer, myCoords,
291 STANDARD_TYPE(VrmlData_Coordinate));
292 else if (VRMLDATA_LCOMPARE (theBuffer.LinePtr, "normal"))
293 aStatus = ReadNode (theBuffer, myNormals,
294 STANDARD_TYPE(VrmlData_Normal));
295 if (!OK(aStatus))
296 break;
297 }
298 // Read the terminating (closing) brace
299 if (OK(aStatus) || aStatus == VrmlData_EmptyData)
300 if (OK(aStatus, readBrace (theBuffer))) {
301 // Post-processing
302 ;
303 }
304 return aStatus;
305}
306
307// //=======================================================================
308// //function : dummyReadBrackets
309// //purpose : static (local) function
310// //=======================================================================
311
312// VrmlData_ErrorStatus dummyReadBrackets (VrmlData_InBuffer& theBuffer)
313// {
314// VrmlData_ErrorStatus aStatus;
315// Standard_Integer aLevelCounter (0);
316// // This loop searches for any opening bracket.
317// // Such bracket increments the level counter. A closing bracket decrements
318// // the counter. The loop terminates when the counter becomes zero.
319// while ((aStatus = VrmlData_Scene::ReadLine(theBuffer)) == VrmlData_StatusOK)
320// {
321// int aChar;
322// while ((aChar = theBuffer.LinePtr[0]) != '\0') {
323// theBuffer.LinePtr++;
324// if (aChar == '[') {
325// aLevelCounter++;
326// break;
327// } else if (aChar == ']') {
328// aLevelCounter--;
329// break;
330// }
331// }
332// if (aLevelCounter <= 0)
333// break;
334// }
335// return aStatus;
336// }
337
338//=======================================================================
339//function : IsDefault
340//purpose :
341//=======================================================================
342
343Standard_Boolean VrmlData_IndexedFaceSet::IsDefault () const
344{
345 Standard_Boolean aResult (Standard_True);
346 if (myNbPolygons)
347 aResult = Standard_False;
348 else if (myCoords.IsNull() == Standard_False)
349 aResult = myCoords->IsDefault();
350 return aResult;
351}
352
353//=======================================================================
354//function : Write
355//purpose :
356//=======================================================================
357
358VrmlData_ErrorStatus VrmlData_IndexedFaceSet::Write
359 (const char * thePrefix) const
360{
361 static char header[] = "IndexedFaceSet {";
362 const VrmlData_Scene& aScene = Scene();
363 VrmlData_ErrorStatus aStatus;
364 if (OK (aStatus, aScene.WriteLine (thePrefix, header, GlobalIndent()))) {
365
366 // Write the attributes of interface "VrmlData_Faceted"
367 if (IsCCW() == Standard_False)
368 aStatus = aScene.WriteLine ("ccw FALSE");
369 if (OK(aStatus) && IsSolid() == Standard_False)
370 aStatus = aScene.WriteLine ("solid FALSE");
371 if (OK(aStatus) && IsConvex() == Standard_False)
372 aStatus = aScene.WriteLine ("convex FALSE");
373 if (OK(aStatus) && CreaseAngle() > Precision::Confusion()) {
374 char buf[64];
375 Sprintf (buf, "%.9g", CreaseAngle());
376 aStatus = aScene.WriteLine ("creaseAngle", buf);
377 }
378
379 if (OK(aStatus) && myCoords.IsNull() == Standard_False)
380 aStatus = aScene.WriteNode ("coord", myCoords);
381 if (OK(aStatus))
382 aStatus = aScene.WriteArrIndex ("coordIndex", myArrPolygons,myNbPolygons);
383
384 if (OK(aStatus) && myNormalPerVertex == Standard_False)
385 aStatus = aScene.WriteLine ("normalPerVertex FALSE");
386 if (OK(aStatus) && myNormals.IsNull() == Standard_False)
387 aStatus = aScene.WriteNode ("normal", myNormals);
388 if (OK(aStatus))
389 aStatus = aScene.WriteArrIndex ("normalIndex",myArrNormalInd,myNbNormals);
390
391 if (OK(aStatus) && myColorPerVertex == Standard_False)
392 aStatus = aScene.WriteLine ("colorPerVertex FALSE");
393 if (OK(aStatus) && myColors.IsNull() == Standard_False)
394 aStatus = aScene.WriteNode ("color", myColors);
395 if (OK(aStatus))
396 aStatus = aScene.WriteArrIndex ("colorIndex", myArrColorInd, myNbColors);
397
398 if (OK(aStatus) && myTxCoords.IsNull() == Standard_False)
399 aStatus = aScene.WriteNode ("texCoord", myTxCoords);
400 if (OK(aStatus))
401 aStatus = aScene.WriteArrIndex ("texCoordIndex", myArrTextureInd,
402 myNbTextures);
403
404 aStatus = WriteClosing();
405 }
406 return aStatus;
407}
408
409//=======================================================================
410//function : GetColor
411//purpose :
412//=======================================================================
413
414Quantity_Color VrmlData_IndexedFaceSet::GetColor
415 (const Standard_Integer /*iFace*/,
416 const Standard_Integer /*iVertex*/)
417{
418 //TODO
419 return Quantity_NOC_BLACK;
420}
421