source: XIOS/dev/dev_rv/src4/xmlio/fortran/icfile.cpp @ 2357

Last change on this file since 2357 was 269, checked in by hozdoba, 13 years ago
File size: 2.8 KB
Line 
1/* ************************************************************************** *
2 *      Copyright © IPSL/LSCE, XMLIOServer, Avril 2010 - Octobre 2011         *
3 * ************************************************************************** */
4
5#include "icutil.hpp"
6
7extern "C"
8{
9// /////////////////////////////// Définitions ////////////////////////////// //
10
11   // ----------------------- Redéfinition de types ----------------------------
12   
13   typedef void * XFilePtr, * XFileGroupPtr;
14
15   // ------------------------- Attributs des axes -----------------------------
16   
17   void xios_set_file_name(XFilePtr file_hdl, const char * name, int name_size)
18   {
19      std::string name_str; 
20      if (!cstr2string(name, name_size, name_str)) return; 
21   }
22   
23   void xios_set_file_description(XFilePtr file_hdl, const char * description, int description_size)
24   {
25      std::string description_str; 
26      if (!cstr2string(description, description_size, description_str)) return; 
27   } 
28   
29   void xios_set_file_output_freq(XFilePtr file_hdl, const char * output_freq, int output_freq_size)
30   {
31      std::string output_freq_str; 
32      if (!cstr2string(output_freq, output_freq_size, output_freq_str)) return; 
33   }
34   
35   void xios_set_file_output_level(XFilePtr file_hdl, int output_level)
36   {
37   
38   }
39   
40   void xios_set_file_enabled(XFilePtr file_hdl, bool enabled)
41   {
42   
43   }
44   
45   // -------------------- Attributs des groupes d'axes ------------------------
46   
47   void xios_set_filegroup_name(XFileGroupPtr filegroup_hdl, const char * name, int name_size)
48   {
49      std::string name_str; 
50      if (!cstr2string(name, name_size, name_str)) return; 
51   }
52   
53   void xios_set_filegroup_description(XFileGroupPtr filegroup_hdl, const char * description, int description_size)
54   {
55      std::string description_str; 
56      if (!cstr2string(description, description_size, description_str)) return; 
57   } 
58   
59   void xios_set_filegroup_output_freq(XFileGroupPtr filegroup_hdl, const char * output_freq, int output_freq_size)
60   {
61      std::string output_freq_str; 
62      if (!cstr2string(output_freq, output_freq_size, output_freq_str)) return; 
63   }
64   
65   void xios_set_filegroup_output_level(XFileGroupPtr filegroup_hdl, int output_level)
66   {
67   
68   }
69   
70   void xios_set_filegroup_enabled(XFileGroupPtr filegroup_hdl, bool enabled)
71   {
72   
73   }
74   
75   // ------------------------ Création des handle -----------------------------
76   
77   void xios_file_handle_create (XFilePtr * _ret, const char * _id, int _id_len)
78   {
79      std::string id; 
80      if (!cstr2string(_id, _id_len, id)) return;
81   }
82   
83   void xios_filegroup_handle_create (XFileGroupPtr * _ret, const char * _id, int _id_len)
84   {
85      std::string id; 
86      if (!cstr2string(_id, _id_len, id)) return;
87   }
88   
89} // extern "C"
Note: See TracBrowser for help on using the repository browser.