Salome HOME
sources v1.2
[modules/kernel.git] / src / SALOMEDS / SALOMEDS_AttributeSequenceOfInteger_i.cxx
1 //  SALOME SALOMEDS : data structure of SALOME and sources of Salome data server 
2 //
3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
6 //  This library is free software; you can redistribute it and/or 
7 //  modify it under the terms of the GNU Lesser General Public 
8 //  License as published by the Free Software Foundation; either 
9 //  version 2.1 of the License. 
10 // 
11 //  This library is distributed in the hope that it will be useful, 
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of 
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
14 //  Lesser General Public License for more details. 
15 // 
16 //  You should have received a copy of the GNU Lesser General Public 
17 //  License along with this library; if not, write to the Free Software 
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
19 // 
20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : SALOMEDS_AttributeSequenceOfInteger_i.cxx
25 //  Author : Yves FRICAUD
26 //  Module : SALOME
27 //  $Header$
28
29 using namespace std;
30 #include "SALOMEDS_AttributeSequenceOfInteger_i.hxx"
31 #include "SALOMEDS_SObject_i.hxx"
32 #include <TColStd_HSequenceOfInteger.hxx>
33
34
35 void SALOMEDS_AttributeSequenceOfInteger_i::Assign(const SALOMEDS::LongSeq& other) 
36 {
37   CheckLocked();
38   Handle(TColStd_HSequenceOfInteger) CasCadeSeq = new TColStd_HSequenceOfInteger;
39   for (int i = 0; i < other.length(); i++) {
40     CasCadeSeq->Append(other[i]);
41   }
42   Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Assign(CasCadeSeq);
43 }
44  
45 SALOMEDS::LongSeq* SALOMEDS_AttributeSequenceOfInteger_i::CorbaSequence()
46 {
47   SALOMEDS::LongSeq_var CorbaSeq = new SALOMEDS::LongSeq;
48   Handle(SALOMEDS_SequenceOfIntegerAttribute) CasCadeSeq = Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr);
49   CorbaSeq->length(CasCadeSeq->Length());
50   for (int i = 0; i < CasCadeSeq->Length(); i++) {
51     CorbaSeq[i] = CasCadeSeq->Value(i+1);;
52   }
53   return CorbaSeq._retn();
54 }
55  
56 void SALOMEDS_AttributeSequenceOfInteger_i::Add(CORBA::Long value) 
57 {
58   CheckLocked();
59   Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Add(value);
60 }
61
62 void SALOMEDS_AttributeSequenceOfInteger_i::Remove(CORBA::Long index) 
63 {
64   CheckLocked();
65   Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Remove(index);
66 }
67  
68 void SALOMEDS_AttributeSequenceOfInteger_i::ChangeValue(CORBA::Long index, CORBA::Long value)
69 {
70   CheckLocked();
71   Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->ChangeValue(index, value);
72 }
73  
74 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Value(CORBA::Short index) 
75 {
76   return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Value(index);
77 }
78
79 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Length() 
80 {
81   return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Length();
82 }