Changeset 318 for XIOS/trunk/src/fortran_attr_interface/icfile_attr.cpp

Timestamp:

02/21/12 15:34:27 (12 years ago)

Author:

ymipsl

Message:

• Adding new file attribut : sync_freq : flush file for a given frequency
• Now, when a file has a single domain, domain id is not anymore appended to the coordinate name.

YM

File:

• XIOS/trunk/src/fortran_attr_interface/icfile_attr.cpp (modified) (1 diff)

XIOS/trunk/src/fortran_attr_interface/icfile_attr.cpp

@@ -99 +99 @@
   
   
+  void cxios_set_file_split_freq(file_Ptr file_hdl, const char * split_freq, int split_freq_size)
+  {
+    std::string split_freq_str;
+    if(!cstr2string(split_freq, split_freq_size, split_freq_str)) return;
+    file_hdl->split_freq.setValue(split_freq_str);
+    file_hdl->sendAttributToServer(file_hdl->split_freq);
+  }
+  
+  void cxios_get_file_split_freq(file_Ptr file_hdl, char * split_freq, int split_freq_size)
+  {
+    if(!string_copy(file_hdl->split_freq.getValue(),split_freq , split_freq_size))
+      ERROR("void cxios_get_file_split_freq(file_Ptr file_hdl, char * split_freq, int split_freq_size)", <<"Input string is to short");
+  }
+  
+  
+  void cxios_set_file_sync_freq(file_Ptr file_hdl, const char * sync_freq, int sync_freq_size)
+  {
+    std::string sync_freq_str;
+    if(!cstr2string(sync_freq, sync_freq_size, sync_freq_str)) return;
+    file_hdl->sync_freq.setValue(sync_freq_str);
+    file_hdl->sendAttributToServer(file_hdl->sync_freq);
+  }
+  
+  void cxios_get_file_sync_freq(file_Ptr file_hdl, char * sync_freq, int sync_freq_size)
+  {
+    if(!string_copy(file_hdl->sync_freq.getValue(),sync_freq , sync_freq_size))
+      ERROR("void cxios_get_file_sync_freq(file_Ptr file_hdl, char * sync_freq, int sync_freq_size)", <<"Input string is to short");
+  }
+  
+  
   void cxios_set_file_type(file_Ptr file_hdl, const char * type, int type_size)
   {