973c2be1 |
1 | // Copyright (c) 1999-2014 OPEN CASCADE SAS |
b311480e |
2 | // |
973c2be1 |
3 | // This file is part of Open CASCADE Technology software library. |
b311480e |
4 | // |
d5f74e42 |
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 |
973c2be1 |
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. |
b311480e |
10 | // |
973c2be1 |
11 | // Alternatively, this file may be used under the terms of Open CASCADE |
12 | // commercial license or contractual agreement. |
7fd59977 |
13 | |
7fd59977 |
14 | |
42cf5bc1 |
15 | #include <Interface_Check.hxx> |
7fd59977 |
16 | #include <Interface_EntityIterator.hxx> |
42cf5bc1 |
17 | #include <RWStepRepr_RWGlobalUnitAssignedContext.hxx> |
18 | #include <StepBasic_HArray1OfNamedUnit.hxx> |
19 | #include <StepBasic_NamedUnit.hxx> |
20 | #include <StepData_StepReaderData.hxx> |
21 | #include <StepData_StepWriter.hxx> |
7fd59977 |
22 | #include <StepRepr_GlobalUnitAssignedContext.hxx> |
23 | |
7fd59977 |
24 | RWStepRepr_RWGlobalUnitAssignedContext::RWStepRepr_RWGlobalUnitAssignedContext () {} |
25 | |
26 | void RWStepRepr_RWGlobalUnitAssignedContext::ReadStep |
27 | (const Handle(StepData_StepReaderData)& data, |
28 | const Standard_Integer num, |
29 | Handle(Interface_Check)& ach, |
30 | const Handle(StepRepr_GlobalUnitAssignedContext)& ent) const |
31 | { |
32 | |
33 | |
34 | // --- Number of Parameter Control --- |
35 | |
36 | if (!data->CheckNbParams(num,3,ach,"global_unit_assigned_context")) return; |
37 | |
38 | // --- inherited field : contextIdentifier --- |
39 | |
40 | Handle(TCollection_HAsciiString) aContextIdentifier; |
41 | //szv#4:S4163:12Mar99 `Standard_Boolean stat1 =` not needed |
42 | data->ReadString (num,1,"context_identifier",ach,aContextIdentifier); |
43 | |
44 | // --- inherited field : contextType --- |
45 | |
46 | Handle(TCollection_HAsciiString) aContextType; |
47 | //szv#4:S4163:12Mar99 `Standard_Boolean stat2 =` not needed |
48 | data->ReadString (num,2,"context_type",ach,aContextType); |
49 | |
50 | // --- own field : units --- |
51 | |
52 | Handle(StepBasic_HArray1OfNamedUnit) aUnits; |
53 | Handle(StepBasic_NamedUnit) anent3; |
54 | Standard_Integer nsub3; |
55 | if (data->ReadSubList (num,3,"units",ach,nsub3)) { |
56 | Standard_Integer nb3 = data->NbParams(nsub3); |
57 | aUnits = new StepBasic_HArray1OfNamedUnit (1, nb3); |
58 | for (Standard_Integer i3 = 1; i3 <= nb3; i3 ++) { |
59 | //szv#4:S4163:12Mar99 `Standard_Boolean stat3 =` not needed |
60 | if (data->ReadEntity (nsub3, i3,"unit", ach, STANDARD_TYPE(StepBasic_NamedUnit), anent3)) |
61 | aUnits->SetValue(i3, anent3); |
62 | } |
63 | } |
64 | |
65 | //--- Initialisation of the read entity --- |
66 | |
67 | |
68 | ent->Init(aContextIdentifier, aContextType, aUnits); |
69 | } |
70 | |
71 | |
72 | void RWStepRepr_RWGlobalUnitAssignedContext::WriteStep |
73 | (StepData_StepWriter& SW, |
74 | const Handle(StepRepr_GlobalUnitAssignedContext)& ent) const |
75 | { |
76 | |
77 | // --- inherited field contextIdentifier --- |
78 | |
79 | SW.Send(ent->ContextIdentifier()); |
80 | |
81 | // --- inherited field contextType --- |
82 | |
83 | SW.Send(ent->ContextType()); |
84 | |
85 | // --- own field : units --- |
86 | |
87 | SW.OpenSub(); |
88 | for (Standard_Integer i3 = 1; i3 <= ent->NbUnits(); i3 ++) { |
89 | SW.Send(ent->UnitsValue(i3)); |
90 | } |
91 | SW.CloseSub(); |
92 | } |
93 | |
94 | |
95 | void RWStepRepr_RWGlobalUnitAssignedContext::Share(const Handle(StepRepr_GlobalUnitAssignedContext)& ent, Interface_EntityIterator& iter) const |
96 | { |
97 | |
98 | Standard_Integer nbElem1 = ent->NbUnits(); |
99 | for (Standard_Integer is1=1; is1<=nbElem1; is1 ++) { |
100 | iter.GetOneItem(ent->UnitsValue(is1)); |
101 | } |
102 | |
103 | } |
104 | |