Changeset 3385 in Sophya for trunk/SophyaLib/BaseTools/fiondblock.cc

Timestamp:

Nov 21, 2007, 6:59:05 PM (18 years ago)

Author:

ansari

Message:

protection pour I/O PPF de NDataBlock, lorsque taille (Size()) == 0, Reza 21/11/2007

File:

• trunk/SophyaLib/BaseTools/fiondblock.cc (modified) (2 diffs)

trunk/SophyaLib/BaseTools/fiondblock.cc

@@ -145 +145 @@
 uint_8 itab[3];
 is.Get(itab, 3);
-if (dobj == NULL) dobj = new NDataBlock<T>(itab[1]);
-else if (itab[1] != dobj->Size()) dobj->ReSize(itab[1]);
+if (dobj == NULL) { 
+  if (itab[1] > 0) dobj = new NDataBlock<T>(itab[1]);
+  else dobj = new NDataBlock<T>(); 
+}
+else { 
+  if (itab[1] != dobj->Size()) { 
+    if (itab[1] > 0)  dobj->ReSize(itab[1]);
+    else dobj->Dealloc(); 
+  }
+}
+if (dobj->Size() < 1)  return;  // Pas de donnees a lire ...
 // On lit le tableau de nombres
 if (is.Version() <= 2)   // lecture ancienne version PPF
@@ -166 +175 @@
 os.Put(itab, 3);
 //  On ecrit le tableau de nombres 
-os.Put(dobj->Data(), dobj->Size());
+if (dobj->Size() > 0)   // On ecrit les donnees, s'il y en a ... (sz>0)
+  os.Put(dobj->Data(), dobj->Size());
 }