source: XIOS/dev/dev_ym/XIOS_COUPLING/src/interface/c_attr/iccontext_attr.cpp @ 1941

Last change on this file since 1941 was 1941, checked in by ymipsl, 4 years ago

XIOS coupling : Update fortran interface
YM

  • 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: 2.2 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::CContext* context_Ptr;
18
19  void cxios_set_context_attached_mode(context_Ptr context_hdl, bool attached_mode)
20  {
21    CTimer::get("XIOS").resume();
22    context_hdl->attached_mode.setValue(attached_mode);
23    CTimer::get("XIOS").suspend();
24  }
25
26  void cxios_get_context_attached_mode(context_Ptr context_hdl, bool* attached_mode)
27  {
28    CTimer::get("XIOS").resume();
29    *attached_mode = context_hdl->attached_mode.getInheritedValue();
30    CTimer::get("XIOS").suspend();
31  }
32
33  bool cxios_is_defined_context_attached_mode(context_Ptr context_hdl)
34  {
35     CTimer::get("XIOS").resume();
36     bool isDefined = context_hdl->attached_mode.hasInheritedValue();
37     CTimer::get("XIOS").suspend();
38     return isDefined;
39  }
40
41
42  void cxios_set_context_output_dir(context_Ptr context_hdl, const char * output_dir, int output_dir_size)
43  {
44    std::string output_dir_str;
45    if (!cstr2string(output_dir, output_dir_size, output_dir_str)) return;
46    CTimer::get("XIOS").resume();
47    context_hdl->output_dir.setValue(output_dir_str);
48    CTimer::get("XIOS").suspend();
49  }
50
51  void cxios_get_context_output_dir(context_Ptr context_hdl, char * output_dir, int output_dir_size)
52  {
53    CTimer::get("XIOS").resume();
54    if (!string_copy(context_hdl->output_dir.getInheritedValue(), output_dir, output_dir_size))
55      ERROR("void cxios_get_context_output_dir(context_Ptr context_hdl, char * output_dir, int output_dir_size)", << "Input string is too short");
56    CTimer::get("XIOS").suspend();
57  }
58
59  bool cxios_is_defined_context_output_dir(context_Ptr context_hdl)
60  {
61     CTimer::get("XIOS").resume();
62     bool isDefined = context_hdl->output_dir.hasInheritedValue();
63     CTimer::get("XIOS").suspend();
64     return isDefined;
65  }
66}
Note: See TracBrowser for help on using the repository browser.