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.
15 #include <Interface_Check.hxx>
16 #include <Interface_EntityIterator.hxx>
17 #include <RWStepVisual_RWSurfaceStyleParameterLine.hxx>
18 #include <Standard_Integer.hxx>
19 #include <StepData_StepReaderData.hxx>
20 #include <StepData_StepWriter.hxx>
21 #include <StepVisual_CurveStyle.hxx>
22 #include <StepVisual_HArray1OfDirectionCountSelect.hxx>
23 #include <StepVisual_SurfaceStyleParameterLine.hxx>
25 RWStepVisual_RWSurfaceStyleParameterLine::RWStepVisual_RWSurfaceStyleParameterLine () {}
27 void RWStepVisual_RWSurfaceStyleParameterLine::ReadStep
28 (const Handle(StepData_StepReaderData)& data,
29 const Standard_Integer num,
30 Handle(Interface_Check)& ach,
31 const Handle(StepVisual_SurfaceStyleParameterLine)& ent) const
35 // --- Number of Parameter Control ---
37 if (!data->CheckNbParams(num,2,ach,"surface_style_parameter_line")) return;
39 // --- own field : styleOfParameterLines ---
41 Handle(StepVisual_CurveStyle) aStyleOfParameterLines;
42 //szv#4:S4163:12Mar99 `Standard_Boolean stat1 =` not needed
43 data->ReadEntity(num, 1,"style_of_parameter_lines", ach, STANDARD_TYPE(StepVisual_CurveStyle), aStyleOfParameterLines);
45 // --- own field : directionCounts ---
46 // DirectionCount : select de UDirectionCount et VDirectionCount qui sont
48 // Par consequent, on doit trouver dans le fichier :
49 // ... , (U_DIRECTION_COUNT(10), V_DIRECTION_COUNT(1)) );
51 Standard_Integer numr, numpr;
52 TCollection_AsciiString UType("U_DIRECTION_COUNT");
53 TCollection_AsciiString VType("V_DIRECTION_COUNT");
54 TCollection_AsciiString TrueType;
56 Handle(StepVisual_HArray1OfDirectionCountSelect) aDirectionCounts;
57 Standard_Integer aDirectionCountsItem;
58 StepVisual_DirectionCountSelect aDirectionCountSelect;
60 Standard_Integer nsub2;
61 if (data->ReadSubList (num,2,"direction_counts",ach,nsub2)) {
62 Standard_Integer nb2 = data->NbParams(nsub2);
63 aDirectionCounts = new StepVisual_HArray1OfDirectionCountSelect(1, nb2);
64 for (Standard_Integer i2 = 1; i2 <= nb2; i2 ++) {
65 // looks for true type :
66 //szv#4:S4163:12Mar99 `Standard_Boolean statUV =` not needed
67 if (data->ReadTypedParam(nsub2,i2,Standard_True,"direction_count", ach,numr,numpr,TrueType)) {
68 //szv#4:S4163:12Mar99 `Standard_Boolean stat1 =` not needed
69 if (data->ReadInteger (numr,numpr,"direction_counts",ach,aDirectionCountsItem)) {
70 if (TrueType == UType) {
71 aDirectionCountSelect.SetUDirectionCount(aDirectionCountsItem);
72 aDirectionCounts->SetValue(i2,aDirectionCountSelect);
74 else if (TrueType == VType) {
75 aDirectionCountSelect.SetVDirectionCount(aDirectionCountsItem);
76 aDirectionCounts->SetValue(i2,aDirectionCountSelect);
79 ach->AddFail("Parameter #2 (direction_counts) item has illegal TYPE");
83 ach->AddFail("Parameter #2 (direction_counts) item is not an INTEGER");
87 ach->AddFail("Parameter #2 (direction_counts) item is not TYPED");
92 //--- Initialisation of the read entity ---
94 ent->Init(aStyleOfParameterLines, aDirectionCounts);
98 void RWStepVisual_RWSurfaceStyleParameterLine::WriteStep
99 (StepData_StepWriter& SW,
100 const Handle(StepVisual_SurfaceStyleParameterLine)& ent) const
103 // --- own field : styleOfParameterLines ---
105 SW.Send(ent->StyleOfParameterLines());
107 // --- own field : directionCounts ---
108 // Attention : a modifier avant utilisation
110 SW.Send(ent->DirectionCounts());
114 void RWStepVisual_RWSurfaceStyleParameterLine::Share(const Handle(StepVisual_SurfaceStyleParameterLine)& ent, Interface_EntityIterator& iter) const
117 iter.GetOneItem(ent->StyleOfParameterLines());