Changeset 300 for XMLIO_V2/dev/common/src/fortran/icfile.cpp

Timestamp:

02/13/12 19:35:25 (12 years ago)

Author:

ymipsl

Message:

nouvelle version de developpement de xios

• nouvelle interface fortran
• recodage complet de la couche de communication
• et bien d'autres choses...

YM

File:

• XMLIO_V2/dev/common/src/fortran/icfile.cpp (modified) (12 diffs)

XMLIO_V2/dev/common/src/fortran/icfile.cpp

@@ -31 +31 @@
 
       file_hdl->name.setValue(name_str);
+      file_hdl->sendAttributToServer(file_hdl->name) ;
    }
    
@@ -39 +40 @@
 
       file_hdl->description.setValue(description_str);
+      file_hdl->sendAttributToServer(file_hdl->description) ;
    } 
    
@@ -47 +49 @@
 
       file_hdl->name_suffix.setValue(name_suffix_str);
+      file_hdl->sendAttributToServer(file_hdl->name_suffix) ;
    } 
    
@@ -55 +58 @@
 
       file_hdl->output_freq.setValue(output_freq_str);
+      file_hdl->sendAttributToServer(file_hdl->output_freq) ;
    }
    
@@ -60 +64 @@
    {
       file_hdl->output_level.setValue(output_level);
+      file_hdl->sendAttributToServer(file_hdl->output_level) ;
    }
    
@@ -65 +70 @@
    {
       file_hdl->enabled.setValue(enabled);
+      file_hdl->sendAttributToServer(file_hdl->enabled) ;
+   }
+   
+   void cxios_set_file_type(XFilePtr file_hdl, const char * type, int type_size)
+   {
+      std::string type_str; 
+      if (!cstr2string(type, type_size, type_str)) return;
+
+      file_hdl->type.setValue(type_str);
+      file_hdl->sendAttributToServer(file_hdl->type) ;
    }
    
@@ -73 +88 @@
       std::string name_str; 
       if (!cstr2string(name, name_size, name_str)) return;
-      if (!cstr2string(name, name_size, name_str)) return;
 
       filegroup_hdl->name.setValue(name_str);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->name) ;
    }
    
@@ -84 +99 @@
 
       filegroup_hdl->description.setValue(description_str);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->description) ;
    } 
    
@@ -92 +108 @@
 
       filegroup_hdl->name_suffix.setValue(name_suffix_str);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->name_suffix) ;
    } 
    
@@ -100 +117 @@
 
       filegroup_hdl->output_freq.setValue(output_freq_str);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->output_freq) ;
    }
    
@@ -105 +123 @@
    {
       filegroup_hdl->output_level.setValue(output_level);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->output_level) ;
    }
    
@@ -110 +129 @@
    {
       filegroup_hdl->enabled.setValue(enabled);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->enabled) ;
+   }
+   
+   void cxios_set_filegroup_type(XFileGroupPtr filegroup_hdl, const char * type, int type_size)
+   {
+      std::string type_str; 
+      if (!cstr2string(type, type_size, type_str)) return;
+
+      filegroup_hdl->type.setValue(type_str);
+      filegroup_hdl->sendAttributToServer(filegroup_hdl->type) ;
    }