| 1 | // This may look like C code, but it is really -*- C++ -*-
 | 
|---|
| 2 | // Gestion de block de donnees swapable
 | 
|---|
| 3 | //          C. Magneville R. Ansari  Mai 2005
 | 
|---|
| 4 | // LAL (Orsay) / IN2P3-CNRS  DAPNIA/SPP (Saclay) / CEA
 | 
|---|
| 5 | #ifndef FITSSWAPPER_H
 | 
|---|
| 6 | #define FITSSWAPPER_H
 | 
|---|
| 7 | 
 | 
|---|
| 8 | 
 | 
|---|
| 9 | #include "machdefs.h"
 | 
|---|
| 10 | #include "swsegdb.h"
 | 
|---|
| 11 | #include "fitsinoutfile.h"
 | 
|---|
| 12 | #include "fitsblkrw.h"
 | 
|---|
| 13 | 
 | 
|---|
| 14 | #include "basedtable.h"
 | 
|---|
| 15 | 
 | 
|---|
| 16 | /*!
 | 
|---|
| 17 |   \class SOPHYA::FITSDataSwapper
 | 
|---|
| 18 |   \ingroup FitsIOServer
 | 
|---|
| 19 |   Implementation of SOPHYA::DataSwapperInterface interface on FITS files
 | 
|---|
| 20 |   (FitsInOutFile) to be used with SOPHYA::SwSegDataBlock classes.
 | 
|---|
| 21 | */
 | 
|---|
| 22 | 
 | 
|---|
| 23 | namespace SOPHYA {
 | 
|---|
| 24 | 
 | 
|---|
| 25 | template <class T> 
 | 
|---|
| 26 | class FITSDataSwapper : public DataSwapperInterface<T> {
 | 
|---|
| 27 | public:
 | 
|---|
| 28 |   FITSDataSwapper() 
 | 
|---|
| 29 |     : fcol(0) , rowos(1) , dtp(NULL)
 | 
|---|
| 30 |   {
 | 
|---|
| 31 |   }
 | 
|---|
| 32 |   FITSDataSwapper(FitsInOutFile & ios, int col, BaseDataTable* dt=NULL) 
 | 
|---|
| 33 |     : fios(ios) , fcol(col), rowos(1) , dtp(dt)
 | 
|---|
| 34 |   {
 | 
|---|
| 35 |   }
 | 
|---|
| 36 | 
 | 
|---|
| 37 |   inline FitsInOutFile & InOutStream() { return fios; }
 | 
|---|
| 38 | 
 | 
|---|
| 39 |   void SetInOutStream(FitsInOutFile & ios, int col) 
 | 
|---|
| 40 |   {
 | 
|---|
| 41 |     fios = ios;
 | 
|---|
| 42 |     fcol = col;
 | 
|---|
| 43 |     rowos = 1;
 | 
|---|
| 44 |     /*  On ne fait pas de check sur type HDU - Reza , 30/12/2005
 | 
|---|
| 45 |     if ( fios != NULL) {
 | 
|---|
| 46 |       fhdu = fios->CurrentHDU();
 | 
|---|
| 47 |       if (fios->CurrentHDUType() != BINARY_TBL)
 | 
|---|
| 48 |         throw FitsIOException("FITSDataSwapper<T>::SetInOutStream() CurrHDU not a BINARY_TBL");
 | 
|---|
| 49 |     }    */
 | 
|---|
| 50 |   }
 | 
|---|
| 51 | 
 | 
|---|
| 52 |   // Operateur = , on recopie les pointeurs des streams 
 | 
|---|
| 53 |   FITSDataSwapper<T>& operator = (FITSDataSwapper<T> const & a)
 | 
|---|
| 54 |   {
 | 
|---|
| 55 |     fios = a.fios;
 | 
|---|
| 56 |     fcol = a.fcol;
 | 
|---|
| 57 |     rowos = a.rowos;
 | 
|---|
| 58 |     dtp = a.dtp;
 | 
|---|
| 59 |   }
 | 
|---|
| 60 | 
 | 
|---|
| 61 |   virtual int_8 WriteToSwap(const T * d, size_t sz, int_8 idx, int_8 oswp=0, bool osw=false)
 | 
|---|
| 62 |   {
 | 
|---|
| 63 |     /* fios->MoveAbsToHDU(fhdu);  On suppose qu'on est sur le bon HDU - Reza 30/12/2005 */
 | 
|---|
| 64 |     LONGLONG row = rowos;
 | 
|---|
| 65 |     if (osw)  row = oswp;
 | 
|---|
| 66 |     if (dtp != NULL)
 | 
|---|
| 67 |        if ((row+sz-1) > dtp->NRows() )  sz = dtp->NRows()-row+1;
 | 
|---|
| 68 |     FitsBlockRW<T>::WriteColumnData(fios, fcol, row, 1, d, sz);
 | 
|---|
| 69 |     if (!osw) rowos += sz;
 | 
|---|
| 70 |     return row;
 | 
|---|
| 71 |   }
 | 
|---|
| 72 | 
 | 
|---|
| 73 |   virtual void  ReadFromSwap(int_8 idx, int_8 swp, T* d, size_t sz)
 | 
|---|
| 74 |   {
 | 
|---|
| 75 |     int_8 nrows = fios.GetNbRows();
 | 
|---|
| 76 |     size_t szi = sz;
 | 
|---|
| 77 |     if ((swp+sz-1) > nrows) sz = nrows-swp+1;  
 | 
|---|
| 78 |     FitsBlockRW<T>::ReadColumnData(fios, fcol, swp, 1, d, sz);
 | 
|---|
| 79 |     if (sz < szi) {
 | 
|---|
| 80 |       T zz = d[sz-1];
 | 
|---|
| 81 |       for(size_t k=sz; k<szi; k++)  d[k] = zz;
 | 
|---|
| 82 |     }
 | 
|---|
| 83 |   }
 | 
|---|
| 84 | 
 | 
|---|
| 85 |   virtual DataSwapperInterface<T>* Clone()
 | 
|---|
| 86 |   {
 | 
|---|
| 87 |     FITSDataSwapper<T> * rsw = new FITSDataSwapper<T>(fios, fcol, dtp) ;
 | 
|---|
| 88 |     rsw->rowos = rowos;
 | 
|---|
| 89 |     rsw->dtp = dtp;    
 | 
|---|
| 90 |     return rsw;
 | 
|---|
| 91 |   }
 | 
|---|
| 92 | 
 | 
|---|
| 93 | protected:
 | 
|---|
| 94 |   FitsInOutFile fios;
 | 
|---|
| 95 |   int fcol; 
 | 
|---|
| 96 |   LONGLONG rowos;
 | 
|---|
| 97 |   BaseDataTable* dtp;
 | 
|---|
| 98 | };
 | 
|---|
| 99 | 
 | 
|---|
| 100 | } // Fin du namespace
 | 
|---|
| 101 | 
 | 
|---|
| 102 | #endif
 | 
|---|