source: XIOS/dev/dev_trunk_omp/src/attribute_array_impl.hpp @ 1646

Last change on this file since 1646 was 1646, checked in by yushan, 5 years ago

branch merged with trunk @1645. arch file (ep&mpi) added for ADA

  • Property copyright set to
    Software name : XIOS (Xml I/O Server)
    http://forge.ipsl.jussieu.fr/ioserver
    Creation date : January 2009
    Licence : CeCCIL version2
    see license file in root directory : Licence_CeCILL_V2-en.txt
    or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
    Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
    CNRS/IPSL (Institut Pierre Simon Laplace)
    Project Manager : Yann Meurdesoif
    yann.meurdesoif@cea.fr
File size: 7.7 KB
Line 
1#ifndef __XIOS_ATTRIBUTE_ARRAY_IMPL_HPP__
2#define __XIOS_ATTRIBUTE_ARRAY_IMPL_HPP__
3
4#include "buffer_in.hpp"
5#include "buffer_out.hpp"
6#include "generate_interface.hpp"
7#include "attribute_array.hpp"
8
9
10namespace xios
11{
12      /// ////////////////////// Définitions ////////////////////// ///
13      template <typename T_numtype, int N_rank>
14      CAttributeArray<T_numtype, N_rank>::CAttributeArray(const StdString & id)
15         : CAttribute(id)
16      { /* Ne rien faire de plus */ }
17
18      template <typename T_numtype, int N_rank>
19      CAttributeArray<T_numtype,N_rank>::CAttributeArray(const StdString & id, const CArray<T_numtype,N_rank>& value)
20         : CAttribute(id)
21      {
22         this->setValue(value);
23      }
24
25      template <typename T_numtype, int N_rank>
26      CAttributeArray<T_numtype, N_rank>::CAttributeArray(const StdString & id, xios_map<StdString, CAttribute*> & umap)
27         : CAttribute(id)
28      {
29         umap.insert(umap.end(), std::make_pair(id, this));
30      }
31
32      template <typename T_numtype, int N_rank>
33      CAttributeArray<T_numtype, N_rank>::CAttributeArray (const StdString & id, const CArray<T_numtype,N_rank>& value,
34                                                           xios_map<StdString, CAttribute*> & umap)
35         : CAttribute(id)
36      {
37         this->setValue(value);
38         umap.insert(umap.end(), std::make_pair(id, this));
39      }
40
41      ///--------------------------------------------------------------
42
43      template <typename T_numtype, int N_rank>
44      void CAttributeArray<T_numtype, N_rank>::reset(void)
45      {
46        CArray<T_numtype, N_rank>::reset() ;
47        inheritedValue.reset() ;
48      }
49
50      template <typename T_numtype, int N_rank>
51      CArray<T_numtype,N_rank> CAttributeArray<T_numtype, N_rank>::getValue(void) const
52      {
53        return this->copy() ;
54      }
55
56      template <typename T_numtype, int N_rank>
57      void CAttributeArray<T_numtype,N_rank>::setValue(const CArray<T_numtype,N_rank>& value)
58      {
59        this->resize(value.shape()) ;
60        *this=value ;
61      }
62
63    template <typename T_numtype, int N_rank>
64    void CAttributeArray<T_numtype,N_rank>::set(const CAttribute& attr)
65    {
66      this->set(dynamic_cast<const CAttributeArray<T_numtype,N_rank>& >(attr)) ;
67    }
68
69    template <typename T_numtype, int N_rank>
70    void CAttributeArray<T_numtype,N_rank>::set(const CAttributeArray& attr)
71    {
72      this->setValue(attr) ;
73    }
74
75
76    template <typename T_numtype, int N_rank>
77    void CAttributeArray<T_numtype,N_rank>::setInheritedValue(const CAttribute& attr)
78    {
79      this->setInheritedValue(dynamic_cast<const CAttributeArray<T_numtype,N_rank>& >(attr)) ;
80    }
81
82    template <typename T_numtype, int N_rank>
83    void CAttributeArray<T_numtype,N_rank>::setInheritedValue(const CAttributeArray& attr)
84    {
85      if (this->isEmpty() && _canInherite && attr.hasInheritedValue())
86      {
87        inheritedValue.resize(attr.shape()) ;
88        inheritedValue=attr ;
89      }
90    }
91
92    template <typename T_numtype, int N_rank>
93    CArray<T_numtype,N_rank> CAttributeArray<T_numtype,N_rank>::getInheritedValue(void) const
94    {
95      if (this->isEmpty()) return inheritedValue.copy() ;
96      else return getValue() ;
97    }
98
99    template <typename T_numtype, int N_rank>
100    bool CAttributeArray<T_numtype,N_rank>::hasInheritedValue(void) const
101    {
102      return !this->isEmpty() || !inheritedValue.isEmpty() ;
103    }
104
105    template <typename T_numtype, int N_rank>
106    bool CAttributeArray<T_numtype,N_rank>::isEqual(const CAttribute& attr)
107    {
108      const CAttributeArray<T_numtype,N_rank>& tmp = dynamic_cast<const CAttributeArray<T_numtype,N_rank>& >(attr);
109      return this->isEqual_(tmp);     
110    }
111
112    template <typename T_numtype, int N_rank>
113    bool CAttributeArray<T_numtype,N_rank>::isEqual_(const CAttributeArray& attr)
114    {
115      if ((!this->hasInheritedValue() && !attr.hasInheritedValue()))
116          return true;
117      if (this->hasInheritedValue() && attr.hasInheritedValue())
118          return (this->getInheritedValue() == attr.getInheritedValue());
119      else 
120        return false;     
121    }
122
123    template <typename T_numtype, int N_rank>
124    StdString CAttributeArray<T_numtype,N_rank>::_toString(void) const
125    {
126      StdOStringStream oss;
127      if (! isEmpty() && this->hasId()) oss << this->getName() << "=\"" << CArray<T_numtype, N_rank>::toString() << "\"";
128      return (oss.str());
129    }
130
131    template <typename T_numtype, int N_rank>
132    StdString CAttributeArray<T_numtype,N_rank>::_dump(void) const
133    {
134      StdOStringStream oss;
135      if (! isEmpty() && this->hasId() && (this->numElements()!=0))
136        oss << this->getName() << "=\"" << CArray<T_numtype, N_rank>::dump() << "\"";
137      return (oss.str());
138    }
139
140
141      template <typename T_numtype, int N_rank>
142         void CAttributeArray<T_numtype, N_rank>::_fromString(const StdString & str)
143      {
144        CArray<T_numtype, N_rank>::fromString(str) ;
145      }
146
147      template <typename T_numtype, int N_rank>
148      bool CAttributeArray<T_numtype, N_rank>::_toBuffer (CBufferOut& buffer) const
149      {
150         return CArray<T_numtype, N_rank>::toBuffer(buffer) ;
151      }
152
153      template <typename T_numtype, int N_rank>
154      bool CAttributeArray<T_numtype, N_rank>::_fromBuffer(CBufferIn& buffer)
155      {
156        return CArray<T_numtype, N_rank>::fromBuffer(buffer) ;
157      }
158
159      template <typename T_numtype, int N_rank>
160      void CAttributeArray<T_numtype, N_rank>::generateCInterface(ostream& oss,const string& className)
161      {
162        CInterface::AttributeCInterface<CArray<T_numtype, N_rank> >(oss, className, this->getName());
163      }
164
165      template <typename T_numtype, int N_rank>
166      void CAttributeArray<T_numtype, N_rank>::generateFortran2003Interface(ostream& oss,const string& className)
167      {
168        CInterface::AttributeFortran2003Interface<CArray<T_numtype, N_rank> >(oss, className, this->getName());
169      }
170
171      template <typename T_numtype, int N_rank>
172      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceDeclaration_(ostream& oss,const string& className)
173      {
174        CInterface::AttributeFortranInterfaceDeclaration<CArray<T_numtype, N_rank> >(oss, className, this->getName() + "_");
175      }
176
177      template <typename T_numtype, int N_rank>
178      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceBody_(ostream& oss,const string& className)
179      {
180        CInterface::AttributeFortranInterfaceBody<CArray<T_numtype, N_rank> >(oss, className, this->getName());
181      }
182
183      template <typename T_numtype, int N_rank>
184      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceDeclaration(ostream& oss,const string& className)
185      {
186        CInterface::AttributeFortranInterfaceDeclaration<CArray<T_numtype, N_rank> >(oss, className, this->getName());
187      }
188
189      template <typename T_numtype, int N_rank>
190      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceGetDeclaration_(ostream& oss,const string& className)
191      {
192        CInterface::AttributeFortranInterfaceGetDeclaration<CArray<T_numtype, N_rank> >(oss, className, this->getName() + "_");
193      }
194
195      template <typename T_numtype, int N_rank>
196      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceGetBody_(ostream& oss,const string& className)
197      {
198        CInterface::AttributeFortranInterfaceGetBody<CArray<T_numtype, N_rank> >(oss, className, this->getName());
199      }
200
201      template <typename T_numtype, int N_rank>
202      void CAttributeArray<T_numtype, N_rank>::generateFortranInterfaceGetDeclaration(ostream& oss,const string& className)
203      {
204        CInterface::AttributeFortranInterfaceGetDeclaration<CArray<T_numtype, N_rank> >(oss, className, this->getName());
205      }
206} // namespace xios
207
208#endif // __XIOS_ATTRIBUTE_ENUM_IMPL_HPP__
Note: See TracBrowser for help on using the repository browser.