mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-21 10:13:43 +03:00
255 lines
9.0 KiB
C++
255 lines
9.0 KiB
C++
// Created on : Thu Mar 24 18:30:11 2022
|
|
// Created by: snn
|
|
// Generator: Express (EXPRESS -> CASCADE/XSTEP Translator) V2.0
|
|
// Copyright (c) Open CASCADE 2022
|
|
//
|
|
// This file is part of Open CASCADE Technology software library.
|
|
//
|
|
// This library is free software; you can redistribute it and/or modify it under
|
|
// the terms of the GNU Lesser General Public License version 2.1 as published
|
|
// by the Free Software Foundation, with special exception defined in the file
|
|
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
// distribution for complete text of the license and disclaimer of any warranty.
|
|
//
|
|
// Alternatively, this file may be used under the terms of Open CASCADE
|
|
// commercial license or contractual agreement.
|
|
|
|
#include <RWStepVisual_RWComplexTriangulatedSurfaceSet.hxx>
|
|
#include <StepVisual_ComplexTriangulatedSurfaceSet.hxx>
|
|
#include <Interface_EntityIterator.hxx>
|
|
#include <StepData_StepReaderData.hxx>
|
|
#include <StepData_StepWriter.hxx>
|
|
#include <TCollection_HAsciiString.hxx>
|
|
#include <StepVisual_CoordinatesList.hxx>
|
|
#include <Standard_Integer.hxx>
|
|
#include <TColStd_HArray2OfReal.hxx>
|
|
#include <TColStd_HArray1OfReal.hxx>
|
|
#include <Standard_Real.hxx>
|
|
#include <TColStd_HArray1OfInteger.hxx>
|
|
#include <TColStd_HArray2OfInteger.hxx>
|
|
#include <TColStd_HArray1OfTransient.hxx>
|
|
|
|
//=======================================================================
|
|
//function : RWStepVisual_RWComplexTriangulatedSurfaceSet
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
RWStepVisual_RWComplexTriangulatedSurfaceSet::RWStepVisual_RWComplexTriangulatedSurfaceSet() {}
|
|
|
|
|
|
//=======================================================================
|
|
//function : ReadStep
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void RWStepVisual_RWComplexTriangulatedSurfaceSet::ReadStep(
|
|
const Handle(StepData_StepReaderData)& theData,
|
|
const Standard_Integer theNum,
|
|
Handle(Interface_Check)& theCheck,
|
|
const Handle(StepVisual_ComplexTriangulatedSurfaceSet)& theEnt) const
|
|
{
|
|
// Check number of parameters
|
|
if (!theData->CheckNbParams(theNum, 7, theCheck, "complex_triangulated_surface_set"))
|
|
{
|
|
return;
|
|
}
|
|
|
|
// Inherited fields of RepresentationItem
|
|
|
|
Handle(TCollection_HAsciiString) aRepresentationItem_Name;
|
|
theData->ReadString(theNum, 1, "representation_item.name", theCheck, aRepresentationItem_Name);
|
|
|
|
// Inherited fields of TessellatedSurfaceSet
|
|
|
|
Handle(StepVisual_CoordinatesList) aTessellatedSurfaceSet_Coordinates;
|
|
theData->ReadEntity(theNum, 2, "tessellated_surface_set.coordinates", theCheck,
|
|
STANDARD_TYPE(StepVisual_CoordinatesList), aTessellatedSurfaceSet_Coordinates);
|
|
|
|
Standard_Integer aTessellatedSurfaceSet_Pnmax;
|
|
theData->ReadInteger(theNum, 3, "tessellated_surface_set.pnmax", theCheck, aTessellatedSurfaceSet_Pnmax);
|
|
|
|
Handle(TColStd_HArray2OfReal) aTessellatedSurfaceSet_Normals;
|
|
Standard_Integer sub4 = 0;
|
|
if (theData->ReadSubList(theNum, 4, "tessellated_surface_set.normals", theCheck, sub4))
|
|
{
|
|
Standard_Integer nb0 = theData->NbParams(sub4);
|
|
Standard_Integer nbj0 = theData->NbParams(theData->ParamNumber(sub4,1));
|
|
aTessellatedSurfaceSet_Normals = new TColStd_HArray2OfReal(1, nb0, 1, nbj0);
|
|
for (Standard_Integer i0 = 1; i0 <= nb0; i0++)
|
|
{
|
|
Standard_Integer subj4 = 0;
|
|
if ( theData->ReadSubList (sub4, i0, "sub-part(tessellated_surface_set.normals)", theCheck, subj4) ) {
|
|
Standard_Integer num4 = subj4;
|
|
for (Standard_Integer j0 = 1; j0 <= nbj0; j0++)
|
|
{
|
|
Standard_Real anIt0;
|
|
theData->ReadReal(num4, j0, "real", theCheck, anIt0);
|
|
aTessellatedSurfaceSet_Normals->SetValue(i0,j0, anIt0);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// Own fields of ComplexTriangulatedSurfaceSet
|
|
|
|
Handle(TColStd_HArray1OfInteger) aPnindex;
|
|
Standard_Integer sub5 = 0;
|
|
if (theData->ReadSubList(theNum, 5, "pnindex", theCheck, sub5))
|
|
{
|
|
Standard_Integer nb0 = theData->NbParams(sub5);
|
|
aPnindex = new TColStd_HArray1OfInteger(1, nb0);
|
|
Standard_Integer num2 = sub5;
|
|
for (Standard_Integer i0 = 1; i0 <= nb0; i0++)
|
|
{
|
|
Standard_Integer anIt0;
|
|
theData->ReadInteger(num2, i0, "integer", theCheck, anIt0);
|
|
aPnindex->SetValue(i0, anIt0);
|
|
}
|
|
}
|
|
|
|
Handle(TColStd_HArray1OfTransient) aTriangleStrips;
|
|
Standard_Integer sub6 = 0;
|
|
if (theData->ReadSubList(theNum, 6, "triangle_strips", theCheck, sub6))
|
|
{
|
|
Standard_Integer nb0 = theData->NbParams(sub6);
|
|
aTriangleStrips = new TColStd_HArray1OfTransient(1, nb0);
|
|
for (Standard_Integer i0 = 1; i0 <= nb0; i0++)
|
|
{
|
|
Standard_Integer nbj0 = theData->NbParams(theData->ParamNumber(sub6, i0));
|
|
Handle(TColStd_HArray1OfInteger) aSingleTriangleStrip = new TColStd_HArray1OfInteger(1, nbj0);
|
|
Standard_Integer subj6 = 0;
|
|
if ( theData->ReadSubList (sub6, i0, "sub-part(triangle_strips)", theCheck, subj6) ) {
|
|
Standard_Integer num4 = subj6;
|
|
for (Standard_Integer j0 = 1; j0 <= nbj0; j0++)
|
|
{
|
|
Standard_Integer anIt0;
|
|
theData->ReadInteger(num4, j0, "integer", theCheck, anIt0);
|
|
aSingleTriangleStrip->SetValue(j0, anIt0);
|
|
}
|
|
aTriangleStrips->SetValue(i0, aSingleTriangleStrip);
|
|
}
|
|
}
|
|
}
|
|
|
|
Handle(TColStd_HArray1OfTransient) aTriangleFans;
|
|
Standard_Integer sub7 = 0;
|
|
if (theData->ReadSubList(theNum, 7, "triangle_fans", theCheck, sub7))
|
|
{
|
|
Standard_Integer nb0 = theData->NbParams(sub7);
|
|
aTriangleFans = new TColStd_HArray1OfTransient(1, nb0);
|
|
for (Standard_Integer i0 = 1; i0 <= nb0; i0++)
|
|
{
|
|
Standard_Integer nbj0 = theData->NbParams(theData->ParamNumber(sub7, i0));
|
|
Handle(TColStd_HArray1OfInteger) aSingleTriangleFan = new TColStd_HArray1OfInteger(1, nbj0);
|
|
Standard_Integer subj7 = 0;
|
|
if ( theData->ReadSubList (sub7, i0, "sub-part(triangle_fans)", theCheck, subj7) ) {
|
|
Standard_Integer num4 = subj7;
|
|
for (Standard_Integer j0 = 1; j0 <= nbj0; j0++)
|
|
{
|
|
Standard_Integer anIt0;
|
|
theData->ReadInteger(num4, j0, "integer", theCheck, anIt0);
|
|
aSingleTriangleFan->SetValue(j0, anIt0);
|
|
}
|
|
aTriangleFans->SetValue(i0, aSingleTriangleFan);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Initialize entity
|
|
theEnt->Init(aRepresentationItem_Name, aTessellatedSurfaceSet_Coordinates, aTessellatedSurfaceSet_Pnmax, aTessellatedSurfaceSet_Normals, aPnindex, aTriangleStrips, aTriangleFans);
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : WriteStep
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void RWStepVisual_RWComplexTriangulatedSurfaceSet::WriteStep(
|
|
StepData_StepWriter& theSW,
|
|
const Handle(StepVisual_ComplexTriangulatedSurfaceSet)& theEnt) const
|
|
{
|
|
|
|
// Own fields of RepresentationItem
|
|
|
|
theSW.Send(theEnt->Name());
|
|
|
|
// Own fields of TessellatedSurfaceSet
|
|
|
|
theSW.Send(theEnt->Coordinates());
|
|
|
|
theSW.Send(theEnt->Pnmax());
|
|
|
|
theSW.OpenSub();
|
|
for (Standard_Integer i3 = 1; i3 <= theEnt->Normals()->RowLength(); i3++)
|
|
{
|
|
theSW.NewLine(Standard_False);
|
|
theSW.OpenSub();
|
|
for (Standard_Integer j3 = 1; j3 <= theEnt->Normals()->ColLength(); j3++)
|
|
{
|
|
Standard_Real Var0 = theEnt->Normals()->Value(i3,j3);
|
|
theSW.Send(Var0);
|
|
}
|
|
theSW.CloseSub();
|
|
}
|
|
theSW.CloseSub();
|
|
|
|
// Own fields of ComplexTriangulatedSurfaceSet
|
|
|
|
theSW.OpenSub();
|
|
for (Standard_Integer i4 = 1; i4 <= theEnt->Pnindex()->Length(); i4++)
|
|
{
|
|
Standard_Integer Var0 = theEnt->Pnindex()->Value(i4);
|
|
theSW.Send(Var0);
|
|
}
|
|
theSW.CloseSub();
|
|
|
|
theSW.OpenSub();
|
|
for (Standard_Integer i5 = 1; i5 <= theEnt->NbTriangleStrips(); i5++)
|
|
{
|
|
theSW.NewLine(Standard_False);
|
|
theSW.OpenSub();
|
|
Handle(TColStd_HArray1OfInteger) aTriangleStrip = Handle(TColStd_HArray1OfInteger)::DownCast(theEnt->TriangleStrips()->Value(i5));
|
|
for (Standard_Integer j5 = 1; j5 <= aTriangleStrip->Length(); j5++)
|
|
{
|
|
Standard_Integer Var0 = aTriangleStrip->Value(j5);
|
|
theSW.Send(Var0);
|
|
}
|
|
theSW.CloseSub();
|
|
}
|
|
theSW.CloseSub();
|
|
|
|
theSW.OpenSub();
|
|
for (Standard_Integer i6 = 1; i6 <= theEnt->NbTriangleFans(); i6++)
|
|
{
|
|
theSW.NewLine(Standard_False);
|
|
theSW.OpenSub();
|
|
Handle(TColStd_HArray1OfInteger) aTriangleFan = Handle(TColStd_HArray1OfInteger)::DownCast(theEnt->TriangleFans()->Value(i6));
|
|
for (Standard_Integer j6 = 1; j6 <= aTriangleFan->Length(); j6++)
|
|
{
|
|
Standard_Integer Var0 = aTriangleFan->Value(j6);
|
|
theSW.Send(Var0);
|
|
}
|
|
theSW.CloseSub();
|
|
}
|
|
theSW.CloseSub();
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Share
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void RWStepVisual_RWComplexTriangulatedSurfaceSet::Share(
|
|
const Handle(StepVisual_ComplexTriangulatedSurfaceSet)&theEnt,
|
|
Interface_EntityIterator& theIter) const
|
|
{
|
|
|
|
// Inherited fields of RepresentationItem
|
|
|
|
// Inherited fields of TessellatedSurfaceSet
|
|
|
|
theIter.AddItem(theEnt->StepVisual_TessellatedSurfaceSet::Coordinates());
|
|
|
|
// Own fields of ComplexTriangulatedSurfaceSet
|
|
}
|