source: XIOS/trunk/src/interface/c_attr/icvariablegroup_attr.cpp @ 1626

Last change on this file since 1626 was 1626, checked in by oabramkina, 5 years ago

Trunk: limiting the line length to 132 characters in the Fortran interface + updating the interface.
  • 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
  • Property svn:eol-style set to native
File size: 4.6 KB
Line 
1/* ************************************************************************** *
2 *               Interface auto generated - do not modify                     *
3 * ************************************************************************** */
4
5#include <boost/multi_array.hpp>
6#include "xios.hpp"
7#include "attribute_template.hpp"
8#include "object_template.hpp"
9#include "group_template.hpp"
10#include "icutil.hpp"
11#include "icdate.hpp"
12#include "timer.hpp"
13#include "node_type.hpp"
14
15extern "C"
16{
17  typedef xios::CVariableGroup* variablegroup_Ptr;
18
19  void cxios_set_variablegroup_group_ref(variablegroup_Ptr variablegroup_hdl, const char * group_ref, int group_ref_size)
20  {
21    std::string group_ref_str;
22    if (!cstr2string(group_ref, group_ref_size, group_ref_str)) return;
23    CTimer::get("XIOS").resume();
24    variablegroup_hdl->group_ref.setValue(group_ref_str);
25    CTimer::get("XIOS").suspend();
26  }
27
28  void cxios_get_variablegroup_group_ref(variablegroup_Ptr variablegroup_hdl, char * group_ref, int group_ref_size)
29  {
30    CTimer::get("XIOS").resume();
31    if (!string_copy(variablegroup_hdl->group_ref.getInheritedValue(), group_ref, group_ref_size))
32      ERROR("void cxios_get_variablegroup_group_ref(variablegroup_Ptr variablegroup_hdl, char * group_ref, int group_ref_size)", << "Input string is too short");
33    CTimer::get("XIOS").suspend();
34  }
35
36  bool cxios_is_defined_variablegroup_group_ref(variablegroup_Ptr variablegroup_hdl)
37  {
38     CTimer::get("XIOS").resume();
39     bool isDefined = variablegroup_hdl->group_ref.hasInheritedValue();
40     CTimer::get("XIOS").suspend();
41     return isDefined;
42  }
43
44
45  void cxios_set_variablegroup_name(variablegroup_Ptr variablegroup_hdl, const char * name, int name_size)
46  {
47    std::string name_str;
48    if (!cstr2string(name, name_size, name_str)) return;
49    CTimer::get("XIOS").resume();
50    variablegroup_hdl->name.setValue(name_str);
51    CTimer::get("XIOS").suspend();
52  }
53
54  void cxios_get_variablegroup_name(variablegroup_Ptr variablegroup_hdl, char * name, int name_size)
55  {
56    CTimer::get("XIOS").resume();
57    if (!string_copy(variablegroup_hdl->name.getInheritedValue(), name, name_size))
58      ERROR("void cxios_get_variablegroup_name(variablegroup_Ptr variablegroup_hdl, char * name, int name_size)", << "Input string is too short");
59    CTimer::get("XIOS").suspend();
60  }
61
62  bool cxios_is_defined_variablegroup_name(variablegroup_Ptr variablegroup_hdl)
63  {
64     CTimer::get("XIOS").resume();
65     bool isDefined = variablegroup_hdl->name.hasInheritedValue();
66     CTimer::get("XIOS").suspend();
67     return isDefined;
68  }
69
70
71  void cxios_set_variablegroup_ts_target(variablegroup_Ptr variablegroup_hdl, const char * ts_target, int ts_target_size)
72  {
73    std::string ts_target_str;
74    if (!cstr2string(ts_target, ts_target_size, ts_target_str)) return;
75    CTimer::get("XIOS").resume();
76    variablegroup_hdl->ts_target.fromString(ts_target_str);
77    CTimer::get("XIOS").suspend();
78  }
79
80  void cxios_get_variablegroup_ts_target(variablegroup_Ptr variablegroup_hdl, char * ts_target, int ts_target_size)
81  {
82    CTimer::get("XIOS").resume();
83    if (!string_copy(variablegroup_hdl->ts_target.getInheritedStringValue(), ts_target, ts_target_size))
84      ERROR("void cxios_get_variablegroup_ts_target(variablegroup_Ptr variablegroup_hdl, char * ts_target, int ts_target_size)", << "Input string is too short");
85    CTimer::get("XIOS").suspend();
86  }
87
88  bool cxios_is_defined_variablegroup_ts_target(variablegroup_Ptr variablegroup_hdl)
89  {
90     CTimer::get("XIOS").resume();
91     bool isDefined = variablegroup_hdl->ts_target.hasInheritedValue();
92     CTimer::get("XIOS").suspend();
93     return isDefined;
94  }
95
96
97  void cxios_set_variablegroup_type(variablegroup_Ptr variablegroup_hdl, const char * type, int type_size)
98  {
99    std::string type_str;
100    if (!cstr2string(type, type_size, type_str)) return;
101    CTimer::get("XIOS").resume();
102    variablegroup_hdl->type.fromString(type_str);
103    CTimer::get("XIOS").suspend();
104  }
105
106  void cxios_get_variablegroup_type(variablegroup_Ptr variablegroup_hdl, char * type, int type_size)
107  {
108    CTimer::get("XIOS").resume();
109    if (!string_copy(variablegroup_hdl->type.getInheritedStringValue(), type, type_size))
110      ERROR("void cxios_get_variablegroup_type(variablegroup_Ptr variablegroup_hdl, char * type, int type_size)", << "Input string is too short");
111    CTimer::get("XIOS").suspend();
112  }
113
114  bool cxios_is_defined_variablegroup_type(variablegroup_Ptr variablegroup_hdl)
115  {
116     CTimer::get("XIOS").resume();
117     bool isDefined = variablegroup_hdl->type.hasInheritedValue();
118     CTimer::get("XIOS").suspend();
119     return isDefined;
120  }
121}
Note: See TracBrowser for help on using the repository browser.