stream_cdf: added cdfDefZaxisUUID()

ChangeLog

+2014-02-18  Uwe Schulzweida  <Uwe.Schulzweida@zmaw.de>
+
+	* Version 1.6.3 released
+	* using CGRIBEX library version 1.6.3
+
+2014-01-31 Uwe Schulzweida  <Uwe.Schulzweida@zmaw.de>
+
+	* stream_cdf: added cdfDefZaxisUUID() [patch: Florian Prill]
+
 2014-01-13 Uwe Schulzweida  <Uwe.Schulzweida@zmaw.de>
 
 	* stream_cdf::define_all_grids: bug fix for unstructured grids and an additional undefined dimension [report: Florian Prill]

src/stream_cdf.c

@@ -1954,6 +1954,26 @@ void cdfDefGridUUID(stream_t *streamptr, int gridID)
     }
 }
 
+static
+void cdfDefZaxisUUID(stream_t *streamptr, int zaxisID)
+{
+  char uuidOfVGrid[17];
+  zaxisInqUUID(zaxisID, uuidOfVGrid);
+
+  if ( uuidOfVGrid[0] != 0 )
+    {
+      char uuidOfVGridStr[37];
+      uuid2str(uuidOfVGrid, uuidOfVGridStr);
+      if ( uuidOfVGridStr[0] != 0 && strlen(uuidOfVGridStr) == 36 )
+        {
+          int fileID  = streamptr->fileID;
+          if ( streamptr->ncmode == 2 ) cdf_redef(fileID);
+          cdf_put_att_text(fileID, NC_GLOBAL, "uuidOfVGrid", 36, uuidOfVGridStr);
+          if ( streamptr->ncmode == 2 ) cdf_enddef(fileID);
+        }
+    }
+}
+
 static
 void cdfDefUnstructured(stream_t *streamptr, int gridID)
 {
@@ -2324,6 +2344,9 @@ void cdfDefZaxis(stream_t *streamptr, int zaxisID)
 
       if ( ilevel ) sprintf(&axisname[strlen(axisname)], "_%1d", ilevel+1);
 
+      if ( type == ZAXIS_REFERENCE )
+	cdfDefZaxisUUID(streamptr, zaxisID);
+
       if ( type == ZAXIS_HYBRID || type == ZAXIS_HYBRID_HALF )
         {
           if ( type == ZAXIS_HYBRID )