| [842] | 1 | // G. Le Meur 04/2000
 | 
|---|
 | 2 | 
 | 
|---|
 | 3 | #include "fiolocalmap.h"
 | 
|---|
 | 4 | #include "pexceptions.h"
 | 
|---|
 | 5 | #include "fiondblock.h"
 | 
|---|
 | 6 | 
 | 
|---|
 | 7 | //*******************************************************************
 | 
|---|
 | 8 | // class FIO_LocalMap<T>
 | 
|---|
 | 9 | //  Les objets delegues pour la gestion de persistance 
 | 
|---|
 | 10 | //*******************************************************************
 | 
|---|
 | 11 | 
 | 
|---|
 | 12 | //++
 | 
|---|
 | 13 | template <class T>
 | 
|---|
 | 14 | FIO_LocalMap<T>::FIO_LocalMap()
 | 
|---|
 | 15 | //
 | 
|---|
 | 16 | //--
 | 
|---|
 | 17 | {
 | 
|---|
 | 18 |   dobj= new LocalMap<T>;
 | 
|---|
 | 19 |   ownobj= true;
 | 
|---|
 | 20 | }
 | 
|---|
 | 21 | //++
 | 
|---|
 | 22 | template <class T>
 | 
|---|
 | 23 | FIO_LocalMap<T>::FIO_LocalMap(string const& filename)
 | 
|---|
 | 24 | //
 | 
|---|
 | 25 | //--
 | 
|---|
 | 26 | {
 | 
|---|
 | 27 |   dobj= new LocalMap<T>;
 | 
|---|
 | 28 |   ownobj= true;
 | 
|---|
 | 29 |   Read(filename);
 | 
|---|
 | 30 | }
 | 
|---|
 | 31 | 
 | 
|---|
 | 32 | //++
 | 
|---|
 | 33 | template <class T>
 | 
|---|
 | 34 | FIO_LocalMap<T>::FIO_LocalMap(const LocalMap<T>& obj)
 | 
|---|
 | 35 | //
 | 
|---|
 | 36 | //--
 | 
|---|
 | 37 | {
 | 
|---|
 | 38 |   dobj= new LocalMap<T>(obj, true);
 | 
|---|
 | 39 |   ownobj= true;
 | 
|---|
 | 40 | }
 | 
|---|
 | 41 | 
 | 
|---|
 | 42 | template <class T>
 | 
|---|
 | 43 | FIO_LocalMap<T>::FIO_LocalMap(LocalMap<T>* obj)
 | 
|---|
 | 44 | {
 | 
|---|
 | 45 |   dobj= obj;
 | 
|---|
 | 46 |   ownobj= false;
 | 
|---|
 | 47 | }
 | 
|---|
 | 48 | 
 | 
|---|
 | 49 | //++
 | 
|---|
 | 50 | template <class T>
 | 
|---|
 | 51 | FIO_LocalMap<T>::~FIO_LocalMap()
 | 
|---|
 | 52 | //
 | 
|---|
 | 53 | //--
 | 
|---|
 | 54 | {
 | 
|---|
 | 55 |   if (ownobj && dobj) delete dobj;
 | 
|---|
 | 56 | }
 | 
|---|
 | 57 | 
 | 
|---|
 | 58 | //++
 | 
|---|
 | 59 | template <class T>
 | 
|---|
 | 60 | AnyDataObj* FIO_LocalMap<T>::DataObj()
 | 
|---|
 | 61 | //
 | 
|---|
 | 62 | //--
 | 
|---|
 | 63 | {
 | 
|---|
 | 64 |   return(dobj);
 | 
|---|
 | 65 | }
 | 
|---|
 | 66 | 
 | 
|---|
 | 67 | //++
 | 
|---|
 | 68 | template <class T>
 | 
|---|
 | 69 | void FIO_LocalMap<T>::SetDataObj(AnyDataObj & o)
 | 
|---|
 | 70 | //
 | 
|---|
 | 71 | //--
 | 
|---|
 | 72 | {
 | 
|---|
 | 73 |   LocalMap<T> * po = dynamic_cast< LocalMap<T> * >(&o);
 | 
|---|
 | 74 |   if (po == NULL) return;
 | 
|---|
 | 75 |   if (ownobj && dobj) delete dobj;
 | 
|---|
 | 76 |   dobj = po; ownobj = false;
 | 
|---|
 | 77 | } 
 | 
|---|
 | 78 | 
 | 
|---|
 | 79 | //++
 | 
|---|
 | 80 | template <class T>
 | 
|---|
 | 81 | void FIO_LocalMap<T>::ReadSelf(PInPersist& is)
 | 
|---|
 | 82 | //
 | 
|---|
 | 83 | //--
 | 
|---|
 | 84 | {
 | 
|---|
 | 85 | 
 | 
|---|
 | 86 |   if(dobj == NULL) 
 | 
|---|
 | 87 |     {
 | 
|---|
 | 88 |       dobj= new LocalMap<T>;
 | 
|---|
 | 89 |       ownobj= true;
 | 
|---|
 | 90 |     }
 | 
|---|
 | 91 | 
 | 
|---|
 | 92 |   // Pour savoir s'il y avait un DVList Info associe
 | 
|---|
 | 93 |   char strg[256];
 | 
|---|
 | 94 |   is.GetLine(strg, 255);
 | 
|---|
 | 95 |   bool hadinfo= false;
 | 
|---|
 | 96 |   if(strncmp(strg+strlen(strg)-7, "HasInfo", 7) == 0)  hadinfo= true;
 | 
|---|
 | 97 |   if(hadinfo) 
 | 
|---|
 | 98 |     {    // Lecture eventuelle du DVList Info
 | 
|---|
 | 99 |       is >> dobj->Info(); 
 | 
|---|
 | 100 |     }
 | 
|---|
 | 101 | 
 | 
|---|
 | 102 |   int_4 nSzX;
 | 
|---|
 | 103 |   is.GetI4(nSzX);
 | 
|---|
 | 104 |   //  dobj->setSize_x(nSzX);
 | 
|---|
 | 105 | 
 | 
|---|
 | 106 |   int_4 nSzY;
 | 
|---|
 | 107 |   is.GetI4(nSzY);
 | 
|---|
 | 108 |   //  dobj->setSize_y(nSzY);
 | 
|---|
 | 109 | 
 | 
|---|
 | 110 |   int_4 nPix;
 | 
|---|
 | 111 |   is.GetI4(nPix);
 | 
|---|
 | 112 |   //  dobj->setNbPixels(nPix);
 | 
|---|
 | 113 |   dobj->ReSize(nSzX, nSzY); 
 | 
|---|
 | 114 |   string ss("local mapping is done");
 | 
|---|
 | 115 |   string sso;
 | 
|---|
 | 116 |   is.GetStr(sso);
 | 
|---|
 | 117 |   if(sso == ss)
 | 
|---|
 | 118 |     {
 | 
|---|
 | 119 |       cout<<" ReadSelf:: local mapping"<<endl;
 | 
|---|
 | 120 |       int_4 x0, y0;
 | 
|---|
 | 121 |       double theta, phi, angle;
 | 
|---|
 | 122 |       is.GetI4(x0);
 | 
|---|
 | 123 |       is.GetI4(y0);
 | 
|---|
 | 124 |       is.GetR8(theta);
 | 
|---|
 | 125 |       is.GetR8(phi);
 | 
|---|
 | 126 |       is.GetR8(angle);
 | 
|---|
 | 127 |       dobj->SetOrigin(theta, phi, x0, y0, angle);
 | 
|---|
 | 128 | 
 | 
|---|
 | 129 |       double angleX, angleY;
 | 
|---|
 | 130 |       is.GetR8(angleX);
 | 
|---|
 | 131 |       is.GetR8(angleY);
 | 
|---|
 | 132 |       dobj->SetSize(angleX, angleY);
 | 
|---|
 | 133 |     }
 | 
|---|
 | 134 | 
 | 
|---|
 | 135 | // On lit le DataBlock;
 | 
|---|
 | 136 |   FIO_NDataBlock<T> fio_nd(&dobj->DataBlock());
 | 
|---|
 | 137 |   fio_nd.Read(is);
 | 
|---|
 | 138 | }
 | 
|---|
 | 139 | 
 | 
|---|
 | 140 | //++
 | 
|---|
 | 141 | template <class T>
 | 
|---|
 | 142 | void FIO_LocalMap<T>::WriteSelf(POutPersist& os) const
 | 
|---|
 | 143 | //
 | 
|---|
 | 144 | //--
 | 
|---|
 | 145 | {
 | 
|---|
 | 146 |   if(dobj == NULL) 
 | 
|---|
 | 147 |     {
 | 
|---|
 | 148 |       cout << " FIO_LocalMap::WriteSelf:: dobj= null " << endl;
 | 
|---|
 | 149 |       return;
 | 
|---|
 | 150 |     }
 | 
|---|
 | 151 | 
 | 
|---|
 | 152 |   char strg[256];
 | 
|---|
 | 153 |   int_4 nSzX= dobj->Size_x();
 | 
|---|
 | 154 |   int_4 nSzY= dobj->Size_y();
 | 
|---|
 | 155 |   int_4 nPix= dobj->NbPixels();
 | 
|---|
 | 156 |  
 | 
|---|
 | 157 |   if(dobj->ptrInfo()) 
 | 
|---|
 | 158 |     {
 | 
|---|
 | 159 |       sprintf(strg,"LocalMap: NPixX=%6d  NPixY=%9d HasInfo",nSzX,nSzY);
 | 
|---|
 | 160 |       os.PutLine(strg);
 | 
|---|
 | 161 |       os << dobj->Info();
 | 
|---|
 | 162 |     }
 | 
|---|
 | 163 |   else 
 | 
|---|
 | 164 |     { 
 | 
|---|
 | 165 |       sprintf(strg,"LocalMap: NPixX=%6d  NPixY=%9d ",nSzX,nSzY);
 | 
|---|
 | 166 |       os.PutLine(strg);  
 | 
|---|
 | 167 |     }
 | 
|---|
 | 168 | 
 | 
|---|
 | 169 |   os.PutI4(nSzX);
 | 
|---|
 | 170 |   os.PutI4(nSzY);
 | 
|---|
 | 171 |   os.PutI4(nPix);
 | 
|---|
 | 172 | 
 | 
|---|
 | 173 |   if(dobj->LocalMap_isDone())
 | 
|---|
 | 174 |     {
 | 
|---|
 | 175 |       string ss("local mapping is done");
 | 
|---|
 | 176 |       os.PutStr(ss);
 | 
|---|
 | 177 |       int_4 x0, y0;
 | 
|---|
 | 178 |       double theta, phi, angle;
 | 
|---|
 | 179 |       dobj->Origin(theta, phi, x0, y0, angle);
 | 
|---|
 | 180 |       os.PutI4(x0);
 | 
|---|
 | 181 |       os.PutI4(y0);
 | 
|---|
 | 182 |       os.PutR8(theta);
 | 
|---|
 | 183 |       os.PutR8(phi);
 | 
|---|
 | 184 |       os.PutR8(angle);
 | 
|---|
 | 185 | 
 | 
|---|
 | 186 |       double angleX, angleY;
 | 
|---|
 | 187 |       dobj->Aperture(angleX, angleY);
 | 
|---|
 | 188 |       os.PutR8(angleX);
 | 
|---|
 | 189 |       os.PutR8(angleY);
 | 
|---|
 | 190 |     }
 | 
|---|
 | 191 |   else
 | 
|---|
 | 192 |     {
 | 
|---|
 | 193 |       string ss("no local mapping");
 | 
|---|
 | 194 |       os.PutStr(ss);
 | 
|---|
 | 195 |     }
 | 
|---|
 | 196 | 
 | 
|---|
 | 197 | // On ecrit le dataBlock 
 | 
|---|
 | 198 |   FIO_NDataBlock<T> fio_nd(&dobj->DataBlock());
 | 
|---|
 | 199 |   fio_nd.Write(os);
 | 
|---|
 | 200 | }
 | 
|---|
 | 201 | 
 | 
|---|
 | 202 | #ifdef __CXX_PRAGMA_TEMPLATES__
 | 
|---|
 | 203 | #pragma define_template FIO_LocalMap<r_8>
 | 
|---|
 | 204 | #pragma define_template FIO_LocalMap<r_4>
 | 
|---|
 | 205 | #pragma define_template FIO_LocalMap< complex<r_4> >
 | 
|---|
 | 206 | #pragma define_template FIO_LocalMap< complex<r_8> >
 | 
|---|
 | 207 | #endif
 | 
|---|
 | 208 | #if defined(ANSI_TEMPLATES) || defined(GNU_TEMPLATES)
 | 
|---|
 | 209 | template class FIO_LocalMap<r_8>;
 | 
|---|
 | 210 | template class FIO_LocalMap<r_4>;
 | 
|---|
 | 211 | template class FIO_LocalMap< complex<r_4> >;
 | 
|---|
 | 212 | template class FIO_LocalMap< complex<r_8> >;
 | 
|---|
 | 213 | #endif
 | 
|---|