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