source: XIOS/trunk/src/interface/c_attr/icfield_attr.cpp @ 1005

Last change on this file since 1005 was 1005, checked in by mhnguyen, 7 years ago

Updating Fortran interfaces

  • 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: 25.8 KB
Line 
1/* ************************************************************************** *
2 *               Interface auto generated - do not modify                     *
3 * ************************************************************************** */
4
5#include <boost/multi_array.hpp>
6#include <boost/shared_ptr.hpp>
7#include "xios.hpp"
8#include "attribute_template.hpp"
9#include "object_template.hpp"
10#include "group_template.hpp"
11#include "icutil.hpp"
12#include "icdate.hpp"
13#include "timer.hpp"
14#include "node_type.hpp"
15
16extern "C"
17{
18  typedef xios::CField* field_Ptr;
19
20  void cxios_set_field_add_offset(field_Ptr field_hdl, double add_offset)
21  {
22    CTimer::get("XIOS").resume();
23    field_hdl->add_offset.setValue(add_offset);
24    CTimer::get("XIOS").suspend();
25  }
26
27  void cxios_get_field_add_offset(field_Ptr field_hdl, double* add_offset)
28  {
29    CTimer::get("XIOS").resume();
30    *add_offset = field_hdl->add_offset.getInheritedValue();
31    CTimer::get("XIOS").suspend();
32  }
33
34  bool cxios_is_defined_field_add_offset(field_Ptr field_hdl)
35  {
36     CTimer::get("XIOS").resume();
37     bool isDefined = field_hdl->add_offset.hasInheritedValue();
38     CTimer::get("XIOS").suspend();
39     return isDefined;
40  }
41
42
43  void cxios_set_field_axis_ref(field_Ptr field_hdl, const char * axis_ref, int axis_ref_size)
44  {
45    std::string axis_ref_str;
46    if (!cstr2string(axis_ref, axis_ref_size, axis_ref_str)) return;
47    CTimer::get("XIOS").resume();
48    field_hdl->axis_ref.setValue(axis_ref_str);
49    CTimer::get("XIOS").suspend();
50  }
51
52  void cxios_get_field_axis_ref(field_Ptr field_hdl, char * axis_ref, int axis_ref_size)
53  {
54    CTimer::get("XIOS").resume();
55    if (!string_copy(field_hdl->axis_ref.getInheritedValue(), axis_ref, axis_ref_size))
56      ERROR("void cxios_get_field_axis_ref(field_Ptr field_hdl, char * axis_ref, int axis_ref_size)", << "Input string is too short");
57    CTimer::get("XIOS").suspend();
58  }
59
60  bool cxios_is_defined_field_axis_ref(field_Ptr field_hdl)
61  {
62     CTimer::get("XIOS").resume();
63     bool isDefined = field_hdl->axis_ref.hasInheritedValue();
64     CTimer::get("XIOS").suspend();
65     return isDefined;
66  }
67
68
69  void cxios_set_field_cell_methods(field_Ptr field_hdl, const char * cell_methods, int cell_methods_size)
70  {
71    std::string cell_methods_str;
72    if (!cstr2string(cell_methods, cell_methods_size, cell_methods_str)) return;
73    CTimer::get("XIOS").resume();
74    field_hdl->cell_methods.setValue(cell_methods_str);
75    CTimer::get("XIOS").suspend();
76  }
77
78  void cxios_get_field_cell_methods(field_Ptr field_hdl, char * cell_methods, int cell_methods_size)
79  {
80    CTimer::get("XIOS").resume();
81    if (!string_copy(field_hdl->cell_methods.getInheritedValue(), cell_methods, cell_methods_size))
82      ERROR("void cxios_get_field_cell_methods(field_Ptr field_hdl, char * cell_methods, int cell_methods_size)", << "Input string is too short");
83    CTimer::get("XIOS").suspend();
84  }
85
86  bool cxios_is_defined_field_cell_methods(field_Ptr field_hdl)
87  {
88     CTimer::get("XIOS").resume();
89     bool isDefined = field_hdl->cell_methods.hasInheritedValue();
90     CTimer::get("XIOS").suspend();
91     return isDefined;
92  }
93
94
95  void cxios_set_field_cell_methods_mode(field_Ptr field_hdl, const char * cell_methods_mode, int cell_methods_mode_size)
96  {
97    std::string cell_methods_mode_str;
98    if (!cstr2string(cell_methods_mode, cell_methods_mode_size, cell_methods_mode_str)) return;
99    CTimer::get("XIOS").resume();
100    field_hdl->cell_methods_mode.fromString(cell_methods_mode_str);
101    CTimer::get("XIOS").suspend();
102  }
103
104  void cxios_get_field_cell_methods_mode(field_Ptr field_hdl, char * cell_methods_mode, int cell_methods_mode_size)
105  {
106    CTimer::get("XIOS").resume();
107    if (!string_copy(field_hdl->cell_methods_mode.getInheritedStringValue(), cell_methods_mode, cell_methods_mode_size))
108      ERROR("void cxios_get_field_cell_methods_mode(field_Ptr field_hdl, char * cell_methods_mode, int cell_methods_mode_size)", << "Input string is too short");
109    CTimer::get("XIOS").suspend();
110  }
111
112  bool cxios_is_defined_field_cell_methods_mode(field_Ptr field_hdl)
113  {
114     CTimer::get("XIOS").resume();
115     bool isDefined = field_hdl->cell_methods_mode.hasInheritedValue();
116     CTimer::get("XIOS").suspend();
117     return isDefined;
118  }
119
120
121  void cxios_set_field_compression_level(field_Ptr field_hdl, int compression_level)
122  {
123    CTimer::get("XIOS").resume();
124    field_hdl->compression_level.setValue(compression_level);
125    CTimer::get("XIOS").suspend();
126  }
127
128  void cxios_get_field_compression_level(field_Ptr field_hdl, int* compression_level)
129  {
130    CTimer::get("XIOS").resume();
131    *compression_level = field_hdl->compression_level.getInheritedValue();
132    CTimer::get("XIOS").suspend();
133  }
134
135  bool cxios_is_defined_field_compression_level(field_Ptr field_hdl)
136  {
137     CTimer::get("XIOS").resume();
138     bool isDefined = field_hdl->compression_level.hasInheritedValue();
139     CTimer::get("XIOS").suspend();
140     return isDefined;
141  }
142
143
144  void cxios_set_field_default_value(field_Ptr field_hdl, double default_value)
145  {
146    CTimer::get("XIOS").resume();
147    field_hdl->default_value.setValue(default_value);
148    CTimer::get("XIOS").suspend();
149  }
150
151  void cxios_get_field_default_value(field_Ptr field_hdl, double* default_value)
152  {
153    CTimer::get("XIOS").resume();
154    *default_value = field_hdl->default_value.getInheritedValue();
155    CTimer::get("XIOS").suspend();
156  }
157
158  bool cxios_is_defined_field_default_value(field_Ptr field_hdl)
159  {
160     CTimer::get("XIOS").resume();
161     bool isDefined = field_hdl->default_value.hasInheritedValue();
162     CTimer::get("XIOS").suspend();
163     return isDefined;
164  }
165
166
167  void cxios_set_field_detect_missing_value(field_Ptr field_hdl, bool detect_missing_value)
168  {
169    CTimer::get("XIOS").resume();
170    field_hdl->detect_missing_value.setValue(detect_missing_value);
171    CTimer::get("XIOS").suspend();
172  }
173
174  void cxios_get_field_detect_missing_value(field_Ptr field_hdl, bool* detect_missing_value)
175  {
176    CTimer::get("XIOS").resume();
177    *detect_missing_value = field_hdl->detect_missing_value.getInheritedValue();
178    CTimer::get("XIOS").suspend();
179  }
180
181  bool cxios_is_defined_field_detect_missing_value(field_Ptr field_hdl)
182  {
183     CTimer::get("XIOS").resume();
184     bool isDefined = field_hdl->detect_missing_value.hasInheritedValue();
185     CTimer::get("XIOS").suspend();
186     return isDefined;
187  }
188
189
190  void cxios_set_field_domain_ref(field_Ptr field_hdl, const char * domain_ref, int domain_ref_size)
191  {
192    std::string domain_ref_str;
193    if (!cstr2string(domain_ref, domain_ref_size, domain_ref_str)) return;
194    CTimer::get("XIOS").resume();
195    field_hdl->domain_ref.setValue(domain_ref_str);
196    CTimer::get("XIOS").suspend();
197  }
198
199  void cxios_get_field_domain_ref(field_Ptr field_hdl, char * domain_ref, int domain_ref_size)
200  {
201    CTimer::get("XIOS").resume();
202    if (!string_copy(field_hdl->domain_ref.getInheritedValue(), domain_ref, domain_ref_size))
203      ERROR("void cxios_get_field_domain_ref(field_Ptr field_hdl, char * domain_ref, int domain_ref_size)", << "Input string is too short");
204    CTimer::get("XIOS").suspend();
205  }
206
207  bool cxios_is_defined_field_domain_ref(field_Ptr field_hdl)
208  {
209     CTimer::get("XIOS").resume();
210     bool isDefined = field_hdl->domain_ref.hasInheritedValue();
211     CTimer::get("XIOS").suspend();
212     return isDefined;
213  }
214
215
216  void cxios_set_field_enabled(field_Ptr field_hdl, bool enabled)
217  {
218    CTimer::get("XIOS").resume();
219    field_hdl->enabled.setValue(enabled);
220    CTimer::get("XIOS").suspend();
221  }
222
223  void cxios_get_field_enabled(field_Ptr field_hdl, bool* enabled)
224  {
225    CTimer::get("XIOS").resume();
226    *enabled = field_hdl->enabled.getInheritedValue();
227    CTimer::get("XIOS").suspend();
228  }
229
230  bool cxios_is_defined_field_enabled(field_Ptr field_hdl)
231  {
232     CTimer::get("XIOS").resume();
233     bool isDefined = field_hdl->enabled.hasInheritedValue();
234     CTimer::get("XIOS").suspend();
235     return isDefined;
236  }
237
238
239  void cxios_set_field_expr(field_Ptr field_hdl, const char * expr, int expr_size)
240  {
241    std::string expr_str;
242    if (!cstr2string(expr, expr_size, expr_str)) return;
243    CTimer::get("XIOS").resume();
244    field_hdl->expr.setValue(expr_str);
245    CTimer::get("XIOS").suspend();
246  }
247
248  void cxios_get_field_expr(field_Ptr field_hdl, char * expr, int expr_size)
249  {
250    CTimer::get("XIOS").resume();
251    if (!string_copy(field_hdl->expr.getInheritedValue(), expr, expr_size))
252      ERROR("void cxios_get_field_expr(field_Ptr field_hdl, char * expr, int expr_size)", << "Input string is too short");
253    CTimer::get("XIOS").suspend();
254  }
255
256  bool cxios_is_defined_field_expr(field_Ptr field_hdl)
257  {
258     CTimer::get("XIOS").resume();
259     bool isDefined = field_hdl->expr.hasInheritedValue();
260     CTimer::get("XIOS").suspend();
261     return isDefined;
262  }
263
264
265  void cxios_set_field_field_ref(field_Ptr field_hdl, const char * field_ref, int field_ref_size)
266  {
267    std::string field_ref_str;
268    if (!cstr2string(field_ref, field_ref_size, field_ref_str)) return;
269    CTimer::get("XIOS").resume();
270    field_hdl->field_ref.setValue(field_ref_str);
271    CTimer::get("XIOS").suspend();
272  }
273
274  void cxios_get_field_field_ref(field_Ptr field_hdl, char * field_ref, int field_ref_size)
275  {
276    CTimer::get("XIOS").resume();
277    if (!string_copy(field_hdl->field_ref.getInheritedValue(), field_ref, field_ref_size))
278      ERROR("void cxios_get_field_field_ref(field_Ptr field_hdl, char * field_ref, int field_ref_size)", << "Input string is too short");
279    CTimer::get("XIOS").suspend();
280  }
281
282  bool cxios_is_defined_field_field_ref(field_Ptr field_hdl)
283  {
284     CTimer::get("XIOS").resume();
285     bool isDefined = field_hdl->field_ref.hasInheritedValue();
286     CTimer::get("XIOS").suspend();
287     return isDefined;
288  }
289
290
291  void cxios_set_field_freq_offset(field_Ptr field_hdl, cxios_duration freq_offset_c)
292  {
293    CTimer::get("XIOS").resume();
294    field_hdl->freq_offset.allocate();
295    CDuration& freq_offset = field_hdl->freq_offset.get();
296    freq_offset.year = freq_offset_c.year;
297    freq_offset.month = freq_offset_c.month;
298    freq_offset.day = freq_offset_c.day;
299    freq_offset.hour = freq_offset_c.hour;
300    freq_offset.minute = freq_offset_c.minute;
301    freq_offset.second = freq_offset_c.second;
302    freq_offset.timestep = freq_offset_c.timestep;
303    CTimer::get("XIOS").suspend();
304  }
305
306  void cxios_get_field_freq_offset(field_Ptr field_hdl, cxios_duration* freq_offset_c)
307  {
308    CTimer::get("XIOS").resume();
309    CDuration freq_offset = field_hdl->freq_offset.getInheritedValue();
310    freq_offset_c->year = freq_offset.year;
311    freq_offset_c->month = freq_offset.month;
312    freq_offset_c->day = freq_offset.day;
313    freq_offset_c->hour = freq_offset.hour;
314    freq_offset_c->minute = freq_offset.minute;
315    freq_offset_c->second = freq_offset.second;
316    freq_offset_c->timestep = freq_offset.timestep;
317    CTimer::get("XIOS").suspend();
318  }
319
320  bool cxios_is_defined_field_freq_offset(field_Ptr field_hdl)
321  {
322     CTimer::get("XIOS").resume();
323     bool isDefined = field_hdl->freq_offset.hasInheritedValue();
324     CTimer::get("XIOS").suspend();
325     return isDefined;
326  }
327
328
329  void cxios_set_field_freq_op(field_Ptr field_hdl, cxios_duration freq_op_c)
330  {
331    CTimer::get("XIOS").resume();
332    field_hdl->freq_op.allocate();
333    CDuration& freq_op = field_hdl->freq_op.get();
334    freq_op.year = freq_op_c.year;
335    freq_op.month = freq_op_c.month;
336    freq_op.day = freq_op_c.day;
337    freq_op.hour = freq_op_c.hour;
338    freq_op.minute = freq_op_c.minute;
339    freq_op.second = freq_op_c.second;
340    freq_op.timestep = freq_op_c.timestep;
341    CTimer::get("XIOS").suspend();
342  }
343
344  void cxios_get_field_freq_op(field_Ptr field_hdl, cxios_duration* freq_op_c)
345  {
346    CTimer::get("XIOS").resume();
347    CDuration freq_op = field_hdl->freq_op.getInheritedValue();
348    freq_op_c->year = freq_op.year;
349    freq_op_c->month = freq_op.month;
350    freq_op_c->day = freq_op.day;
351    freq_op_c->hour = freq_op.hour;
352    freq_op_c->minute = freq_op.minute;
353    freq_op_c->second = freq_op.second;
354    freq_op_c->timestep = freq_op.timestep;
355    CTimer::get("XIOS").suspend();
356  }
357
358  bool cxios_is_defined_field_freq_op(field_Ptr field_hdl)
359  {
360     CTimer::get("XIOS").resume();
361     bool isDefined = field_hdl->freq_op.hasInheritedValue();
362     CTimer::get("XIOS").suspend();
363     return isDefined;
364  }
365
366
367  void cxios_set_field_grid_path(field_Ptr field_hdl, const char * grid_path, int grid_path_size)
368  {
369    std::string grid_path_str;
370    if (!cstr2string(grid_path, grid_path_size, grid_path_str)) return;
371    CTimer::get("XIOS").resume();
372    field_hdl->grid_path.setValue(grid_path_str);
373    CTimer::get("XIOS").suspend();
374  }
375
376  void cxios_get_field_grid_path(field_Ptr field_hdl, char * grid_path, int grid_path_size)
377  {
378    CTimer::get("XIOS").resume();
379    if (!string_copy(field_hdl->grid_path.getInheritedValue(), grid_path, grid_path_size))
380      ERROR("void cxios_get_field_grid_path(field_Ptr field_hdl, char * grid_path, int grid_path_size)", << "Input string is too short");
381    CTimer::get("XIOS").suspend();
382  }
383
384  bool cxios_is_defined_field_grid_path(field_Ptr field_hdl)
385  {
386     CTimer::get("XIOS").resume();
387     bool isDefined = field_hdl->grid_path.hasInheritedValue();
388     CTimer::get("XIOS").suspend();
389     return isDefined;
390  }
391
392
393  void cxios_set_field_grid_ref(field_Ptr field_hdl, const char * grid_ref, int grid_ref_size)
394  {
395    std::string grid_ref_str;
396    if (!cstr2string(grid_ref, grid_ref_size, grid_ref_str)) return;
397    CTimer::get("XIOS").resume();
398    field_hdl->grid_ref.setValue(grid_ref_str);
399    CTimer::get("XIOS").suspend();
400  }
401
402  void cxios_get_field_grid_ref(field_Ptr field_hdl, char * grid_ref, int grid_ref_size)
403  {
404    CTimer::get("XIOS").resume();
405    if (!string_copy(field_hdl->grid_ref.getInheritedValue(), grid_ref, grid_ref_size))
406      ERROR("void cxios_get_field_grid_ref(field_Ptr field_hdl, char * grid_ref, int grid_ref_size)", << "Input string is too short");
407    CTimer::get("XIOS").suspend();
408  }
409
410  bool cxios_is_defined_field_grid_ref(field_Ptr field_hdl)
411  {
412     CTimer::get("XIOS").resume();
413     bool isDefined = field_hdl->grid_ref.hasInheritedValue();
414     CTimer::get("XIOS").suspend();
415     return isDefined;
416  }
417
418
419  void cxios_set_field_indexed_output(field_Ptr field_hdl, bool indexed_output)
420  {
421    CTimer::get("XIOS").resume();
422    field_hdl->indexed_output.setValue(indexed_output);
423    CTimer::get("XIOS").suspend();
424  }
425
426  void cxios_get_field_indexed_output(field_Ptr field_hdl, bool* indexed_output)
427  {
428    CTimer::get("XIOS").resume();
429    *indexed_output = field_hdl->indexed_output.getInheritedValue();
430    CTimer::get("XIOS").suspend();
431  }
432
433  bool cxios_is_defined_field_indexed_output(field_Ptr field_hdl)
434  {
435     CTimer::get("XIOS").resume();
436     bool isDefined = field_hdl->indexed_output.hasInheritedValue();
437     CTimer::get("XIOS").suspend();
438     return isDefined;
439  }
440
441
442  void cxios_set_field_level(field_Ptr field_hdl, int level)
443  {
444    CTimer::get("XIOS").resume();
445    field_hdl->level.setValue(level);
446    CTimer::get("XIOS").suspend();
447  }
448
449  void cxios_get_field_level(field_Ptr field_hdl, int* level)
450  {
451    CTimer::get("XIOS").resume();
452    *level = field_hdl->level.getInheritedValue();
453    CTimer::get("XIOS").suspend();
454  }
455
456  bool cxios_is_defined_field_level(field_Ptr field_hdl)
457  {
458     CTimer::get("XIOS").resume();
459     bool isDefined = field_hdl->level.hasInheritedValue();
460     CTimer::get("XIOS").suspend();
461     return isDefined;
462  }
463
464
465  void cxios_set_field_long_name(field_Ptr field_hdl, const char * long_name, int long_name_size)
466  {
467    std::string long_name_str;
468    if (!cstr2string(long_name, long_name_size, long_name_str)) return;
469    CTimer::get("XIOS").resume();
470    field_hdl->long_name.setValue(long_name_str);
471    CTimer::get("XIOS").suspend();
472  }
473
474  void cxios_get_field_long_name(field_Ptr field_hdl, char * long_name, int long_name_size)
475  {
476    CTimer::get("XIOS").resume();
477    if (!string_copy(field_hdl->long_name.getInheritedValue(), long_name, long_name_size))
478      ERROR("void cxios_get_field_long_name(field_Ptr field_hdl, char * long_name, int long_name_size)", << "Input string is too short");
479    CTimer::get("XIOS").suspend();
480  }
481
482  bool cxios_is_defined_field_long_name(field_Ptr field_hdl)
483  {
484     CTimer::get("XIOS").resume();
485     bool isDefined = field_hdl->long_name.hasInheritedValue();
486     CTimer::get("XIOS").suspend();
487     return isDefined;
488  }
489
490
491  void cxios_set_field_name(field_Ptr field_hdl, const char * name, int name_size)
492  {
493    std::string name_str;
494    if (!cstr2string(name, name_size, name_str)) return;
495    CTimer::get("XIOS").resume();
496    field_hdl->name.setValue(name_str);
497    CTimer::get("XIOS").suspend();
498  }
499
500  void cxios_get_field_name(field_Ptr field_hdl, char * name, int name_size)
501  {
502    CTimer::get("XIOS").resume();
503    if (!string_copy(field_hdl->name.getInheritedValue(), name, name_size))
504      ERROR("void cxios_get_field_name(field_Ptr field_hdl, char * name, int name_size)", << "Input string is too short");
505    CTimer::get("XIOS").suspend();
506  }
507
508  bool cxios_is_defined_field_name(field_Ptr field_hdl)
509  {
510     CTimer::get("XIOS").resume();
511     bool isDefined = field_hdl->name.hasInheritedValue();
512     CTimer::get("XIOS").suspend();
513     return isDefined;
514  }
515
516
517  void cxios_set_field_operation(field_Ptr field_hdl, const char * operation, int operation_size)
518  {
519    std::string operation_str;
520    if (!cstr2string(operation, operation_size, operation_str)) return;
521    CTimer::get("XIOS").resume();
522    field_hdl->operation.setValue(operation_str);
523    CTimer::get("XIOS").suspend();
524  }
525
526  void cxios_get_field_operation(field_Ptr field_hdl, char * operation, int operation_size)
527  {
528    CTimer::get("XIOS").resume();
529    if (!string_copy(field_hdl->operation.getInheritedValue(), operation, operation_size))
530      ERROR("void cxios_get_field_operation(field_Ptr field_hdl, char * operation, int operation_size)", << "Input string is too short");
531    CTimer::get("XIOS").suspend();
532  }
533
534  bool cxios_is_defined_field_operation(field_Ptr field_hdl)
535  {
536     CTimer::get("XIOS").resume();
537     bool isDefined = field_hdl->operation.hasInheritedValue();
538     CTimer::get("XIOS").suspend();
539     return isDefined;
540  }
541
542
543  void cxios_set_field_prec(field_Ptr field_hdl, int prec)
544  {
545    CTimer::get("XIOS").resume();
546    field_hdl->prec.setValue(prec);
547    CTimer::get("XIOS").suspend();
548  }
549
550  void cxios_get_field_prec(field_Ptr field_hdl, int* prec)
551  {
552    CTimer::get("XIOS").resume();
553    *prec = field_hdl->prec.getInheritedValue();
554    CTimer::get("XIOS").suspend();
555  }
556
557  bool cxios_is_defined_field_prec(field_Ptr field_hdl)
558  {
559     CTimer::get("XIOS").resume();
560     bool isDefined = field_hdl->prec.hasInheritedValue();
561     CTimer::get("XIOS").suspend();
562     return isDefined;
563  }
564
565
566  void cxios_set_field_read_access(field_Ptr field_hdl, bool read_access)
567  {
568    CTimer::get("XIOS").resume();
569    field_hdl->read_access.setValue(read_access);
570    CTimer::get("XIOS").suspend();
571  }
572
573  void cxios_get_field_read_access(field_Ptr field_hdl, bool* read_access)
574  {
575    CTimer::get("XIOS").resume();
576    *read_access = field_hdl->read_access.getInheritedValue();
577    CTimer::get("XIOS").suspend();
578  }
579
580  bool cxios_is_defined_field_read_access(field_Ptr field_hdl)
581  {
582     CTimer::get("XIOS").resume();
583     bool isDefined = field_hdl->read_access.hasInheritedValue();
584     CTimer::get("XIOS").suspend();
585     return isDefined;
586  }
587
588
589  void cxios_set_field_scalar_ref(field_Ptr field_hdl, const char * scalar_ref, int scalar_ref_size)
590  {
591    std::string scalar_ref_str;
592    if (!cstr2string(scalar_ref, scalar_ref_size, scalar_ref_str)) return;
593    CTimer::get("XIOS").resume();
594    field_hdl->scalar_ref.setValue(scalar_ref_str);
595    CTimer::get("XIOS").suspend();
596  }
597
598  void cxios_get_field_scalar_ref(field_Ptr field_hdl, char * scalar_ref, int scalar_ref_size)
599  {
600    CTimer::get("XIOS").resume();
601    if (!string_copy(field_hdl->scalar_ref.getInheritedValue(), scalar_ref, scalar_ref_size))
602      ERROR("void cxios_get_field_scalar_ref(field_Ptr field_hdl, char * scalar_ref, int scalar_ref_size)", << "Input string is too short");
603    CTimer::get("XIOS").suspend();
604  }
605
606  bool cxios_is_defined_field_scalar_ref(field_Ptr field_hdl)
607  {
608     CTimer::get("XIOS").resume();
609     bool isDefined = field_hdl->scalar_ref.hasInheritedValue();
610     CTimer::get("XIOS").suspend();
611     return isDefined;
612  }
613
614
615  void cxios_set_field_scale_factor(field_Ptr field_hdl, double scale_factor)
616  {
617    CTimer::get("XIOS").resume();
618    field_hdl->scale_factor.setValue(scale_factor);
619    CTimer::get("XIOS").suspend();
620  }
621
622  void cxios_get_field_scale_factor(field_Ptr field_hdl, double* scale_factor)
623  {
624    CTimer::get("XIOS").resume();
625    *scale_factor = field_hdl->scale_factor.getInheritedValue();
626    CTimer::get("XIOS").suspend();
627  }
628
629  bool cxios_is_defined_field_scale_factor(field_Ptr field_hdl)
630  {
631     CTimer::get("XIOS").resume();
632     bool isDefined = field_hdl->scale_factor.hasInheritedValue();
633     CTimer::get("XIOS").suspend();
634     return isDefined;
635  }
636
637
638  void cxios_set_field_standard_name(field_Ptr field_hdl, const char * standard_name, int standard_name_size)
639  {
640    std::string standard_name_str;
641    if (!cstr2string(standard_name, standard_name_size, standard_name_str)) return;
642    CTimer::get("XIOS").resume();
643    field_hdl->standard_name.setValue(standard_name_str);
644    CTimer::get("XIOS").suspend();
645  }
646
647  void cxios_get_field_standard_name(field_Ptr field_hdl, char * standard_name, int standard_name_size)
648  {
649    CTimer::get("XIOS").resume();
650    if (!string_copy(field_hdl->standard_name.getInheritedValue(), standard_name, standard_name_size))
651      ERROR("void cxios_get_field_standard_name(field_Ptr field_hdl, char * standard_name, int standard_name_size)", << "Input string is too short");
652    CTimer::get("XIOS").suspend();
653  }
654
655  bool cxios_is_defined_field_standard_name(field_Ptr field_hdl)
656  {
657     CTimer::get("XIOS").resume();
658     bool isDefined = field_hdl->standard_name.hasInheritedValue();
659     CTimer::get("XIOS").suspend();
660     return isDefined;
661  }
662
663
664  void cxios_set_field_ts_enabled(field_Ptr field_hdl, bool ts_enabled)
665  {
666    CTimer::get("XIOS").resume();
667    field_hdl->ts_enabled.setValue(ts_enabled);
668    CTimer::get("XIOS").suspend();
669  }
670
671  void cxios_get_field_ts_enabled(field_Ptr field_hdl, bool* ts_enabled)
672  {
673    CTimer::get("XIOS").resume();
674    *ts_enabled = field_hdl->ts_enabled.getInheritedValue();
675    CTimer::get("XIOS").suspend();
676  }
677
678  bool cxios_is_defined_field_ts_enabled(field_Ptr field_hdl)
679  {
680     CTimer::get("XIOS").resume();
681     bool isDefined = field_hdl->ts_enabled.hasInheritedValue();
682     CTimer::get("XIOS").suspend();
683     return isDefined;
684  }
685
686
687  void cxios_set_field_ts_split_freq(field_Ptr field_hdl, cxios_duration ts_split_freq_c)
688  {
689    CTimer::get("XIOS").resume();
690    field_hdl->ts_split_freq.allocate();
691    CDuration& ts_split_freq = field_hdl->ts_split_freq.get();
692    ts_split_freq.year = ts_split_freq_c.year;
693    ts_split_freq.month = ts_split_freq_c.month;
694    ts_split_freq.day = ts_split_freq_c.day;
695    ts_split_freq.hour = ts_split_freq_c.hour;
696    ts_split_freq.minute = ts_split_freq_c.minute;
697    ts_split_freq.second = ts_split_freq_c.second;
698    ts_split_freq.timestep = ts_split_freq_c.timestep;
699    CTimer::get("XIOS").suspend();
700  }
701
702  void cxios_get_field_ts_split_freq(field_Ptr field_hdl, cxios_duration* ts_split_freq_c)
703  {
704    CTimer::get("XIOS").resume();
705    CDuration ts_split_freq = field_hdl->ts_split_freq.getInheritedValue();
706    ts_split_freq_c->year = ts_split_freq.year;
707    ts_split_freq_c->month = ts_split_freq.month;
708    ts_split_freq_c->day = ts_split_freq.day;
709    ts_split_freq_c->hour = ts_split_freq.hour;
710    ts_split_freq_c->minute = ts_split_freq.minute;
711    ts_split_freq_c->second = ts_split_freq.second;
712    ts_split_freq_c->timestep = ts_split_freq.timestep;
713    CTimer::get("XIOS").suspend();
714  }
715
716  bool cxios_is_defined_field_ts_split_freq(field_Ptr field_hdl)
717  {
718     CTimer::get("XIOS").resume();
719     bool isDefined = field_hdl->ts_split_freq.hasInheritedValue();
720     CTimer::get("XIOS").suspend();
721     return isDefined;
722  }
723
724
725  void cxios_set_field_unit(field_Ptr field_hdl, const char * unit, int unit_size)
726  {
727    std::string unit_str;
728    if (!cstr2string(unit, unit_size, unit_str)) return;
729    CTimer::get("XIOS").resume();
730    field_hdl->unit.setValue(unit_str);
731    CTimer::get("XIOS").suspend();
732  }
733
734  void cxios_get_field_unit(field_Ptr field_hdl, char * unit, int unit_size)
735  {
736    CTimer::get("XIOS").resume();
737    if (!string_copy(field_hdl->unit.getInheritedValue(), unit, unit_size))
738      ERROR("void cxios_get_field_unit(field_Ptr field_hdl, char * unit, int unit_size)", << "Input string is too short");
739    CTimer::get("XIOS").suspend();
740  }
741
742  bool cxios_is_defined_field_unit(field_Ptr field_hdl)
743  {
744     CTimer::get("XIOS").resume();
745     bool isDefined = field_hdl->unit.hasInheritedValue();
746     CTimer::get("XIOS").suspend();
747     return isDefined;
748  }
749
750
751  void cxios_set_field_valid_max(field_Ptr field_hdl, double valid_max)
752  {
753    CTimer::get("XIOS").resume();
754    field_hdl->valid_max.setValue(valid_max);
755    CTimer::get("XIOS").suspend();
756  }
757
758  void cxios_get_field_valid_max(field_Ptr field_hdl, double* valid_max)
759  {
760    CTimer::get("XIOS").resume();
761    *valid_max = field_hdl->valid_max.getInheritedValue();
762    CTimer::get("XIOS").suspend();
763  }
764
765  bool cxios_is_defined_field_valid_max(field_Ptr field_hdl)
766  {
767     CTimer::get("XIOS").resume();
768     bool isDefined = field_hdl->valid_max.hasInheritedValue();
769     CTimer::get("XIOS").suspend();
770     return isDefined;
771  }
772
773
774  void cxios_set_field_valid_min(field_Ptr field_hdl, double valid_min)
775  {
776    CTimer::get("XIOS").resume();
777    field_hdl->valid_min.setValue(valid_min);
778    CTimer::get("XIOS").suspend();
779  }
780
781  void cxios_get_field_valid_min(field_Ptr field_hdl, double* valid_min)
782  {
783    CTimer::get("XIOS").resume();
784    *valid_min = field_hdl->valid_min.getInheritedValue();
785    CTimer::get("XIOS").suspend();
786  }
787
788  bool cxios_is_defined_field_valid_min(field_Ptr field_hdl)
789  {
790     CTimer::get("XIOS").resume();
791     bool isDefined = field_hdl->valid_min.hasInheritedValue();
792     CTimer::get("XIOS").suspend();
793     return isDefined;
794  }
795}
Note: See TracBrowser for help on using the repository browser.