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

Timestamp:

Oct 3, 2003, 3:39:33 PM (22 years ago)

Author:

ansari

Message:

1) Premiere serie des modifications et ajout fonctionalites pour les PPersist:

• Ecriture/lecture complex<> et tableaux de complex
• Ecriture/lecture int_1, uint_1 et tableaux de
• Tag de positionnement et table de tag de positionnement

2) Adaptation de Read/Write NDataBlock et suppression du fichier piocmplx.h

Reza 03/10/2003

File:

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

trunk/SophyaLib/BaseTools/fiondblock.cc

@@ -8 +8 @@
 #include <complex>
 #include "pexceptions.h"
+#include "datatype.h"
 #include "fiondblock.h"
-#include "datatype.h"
 #include <typeinfo>
 
@@ -24 +24 @@
 */
 
-// Pour pouvoir ecrire des tableaux de complex, en attendant 
-// PIn/POutPersist::Get/Put(complex<>)
-#include "piocmplx.h"
 
 template <class T>
@@ -110 +107 @@
 }
 
+//---------------------------------------------------------------------------
+// Pour compatibilite de lecture avec PPF V2 
+inline void PIOSReadArray(PInPersist & is, uint_1 * arr, size_t n)
+{ is.GetBytes(arr, n); }
+inline void PIOSReadArray(PInPersist & is, uint_2 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, int_2 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, uint_4 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, int_4 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, uint_8 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, int_8 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, r_4 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, r_8 * arr, size_t n)
+{ is.Get(arr, n); }
+inline void PIOSReadArray(PInPersist & is, complex<float> * arr, size_t n)
+{ r_4 * pr = (r_4 *)arr; is.Get(pr, n*2); }
+inline void PIOSReadArray(PInPersist & is, complex<double> * arr, size_t n)
+{ r_8 * pr = (r_8 *)arr; is.Get(pr, n*2); }
+//---------------------------------------------------------------------------
+
 template <class T>
 void FIO_NDataBlock<T>::ReadSelf(PInPersist& is)
@@ -119 +142 @@
 else if (itab[1] != dobj->Size()) dobj->ReSize(itab[1]);
 // On lit le tableau de nombres
-PIOSReadArray(is, dobj->Data(), dobj->Size()); 
+if (is.Version() <= 2)   // lecture ancienne version PPF
+  PIOSReadArray(is, dobj->Data(), dobj->Size()); 
+else is.Get(dobj->Data(), dobj->Size());
 }
 
@@ -135 +160 @@
 os.Put(itab, 3);
 //  On ecrit le tableau de nombres 
-PIOSWriteArray(os, dobj->Data(), dobj->Size()); 
+os.Put(dobj->Data(), dobj->Size());
 }