cuda/RFieldDft.h

#ifndef PRDC_CUDA_R_FIELD_DFT_H
#define PRDC_CUDA_R_FIELD_DFT_H
 
/*
* PSCF Package 
*
* Copyright 2016 - 2022, The Regents of the University of Minnesota
* Distributed under the terms of the GNU General Public License.
*/
 
#include "types.h"
#include <pscf/cuda/DeviceArray.h>
#include <pscf/cuda/HostDArray.h>
#include <pscf/math/IntVec.h>
#include <util/global.h>
 
namespace Pscf {
namespace Prdc {
namespace Cuda {
 
   using namespace Util;
 
   template <int D>
   class RFieldDft : public DeviceArray<cudaComplex>
   {
 
   public:
 
      RFieldDft();
 
      RFieldDft(IntVec<D> const & meshDimensions);
 
      RFieldDft(RFieldDft<D> const & other);
 
      virtual ~RFieldDft();
 
      RFieldDft<D>& operator = (RFieldDft<D> const & other);
 
      RFieldDft<D>& operator = (HostDArray<cudaComplex> const & other);
 
      void allocate(IntVec<D> const & meshDimensions);
 
      void associate(DeviceArray<cudaComplex>& arr, int beginId, 
                     IntVec<D> const & meshDimensions);
 
      IntVec<D> const & meshDimensions() const;
 
      IntVec<D> const & dftDimensions() const;
 
      template <class Archive>
      void serialize(Archive& ar, const unsigned int version);
 
   private:
 
      // Vector containing number of grid points in each direction.
      IntVec<D> meshDimensions_;
 
      // Vector containing dimensions of dft (Fourier) grid.
      IntVec<D> dftDimensions_;
 
      // Make private to prevent allocation without setting meshDimensions.
      using DeviceArray<cudaComplex>::allocate;
 
      // Make private to prevent association without setting meshDimensions.
      using DeviceArray<cudaComplex>::associate;
 
      // Make private to prevent assignment without setting meshDimensions.
      using DeviceArray<cudaComplex>::operator =;
 
   };
 
   // Inline and templated member functions
   
   /*
   * Return mesh dimensions by constant reference.
   */
   template <int D>
   inline const IntVec<D>& RFieldDft<D>::meshDimensions() const
   {  return meshDimensions_; }
 
   /*  
   * Return dimensions of dft grid by constant reference. 
   */
   template <int D>
   inline const IntVec<D>& RFieldDft<D>::dftDimensions() const
   {  return dftDimensions_; }
 
   /*
   * Serialize a Field to/from an Archive.
   */
   template <int D>
   template <class Archive>
   void RFieldDft<D>::serialize(Archive& ar, const unsigned int version)
   {
      int capacity;
      if (Archive::is_saving()) {
         capacity = capacity_;
      }
      ar & capacity;
      if (Archive::is_loading()) {
         if (!isAllocated()) {
            if (capacity > 0) {
               allocate(capacity);
            }
         } else {
            if (capacity != capacity_) {
               UTIL_THROW("Inconsistent Field capacities");
            }
         }
      }
 
      if (isAllocated()) {
         HostDArray<cudaComplex> tempData(capacity);
         tempData = this; // copy this object's data from device to host
         for (int i = 0; i < capacity_; ++i) {
            ar & tempData[i].x;
            ar & tempData[i].y;
         }
      }
      ar & meshDimensions_;
   }
 
   #ifndef PRDC_CUDA_R_FIELD_DFT_TPP
   extern template class RFieldDft<1>;
   extern template class RFieldDft<2>;
   extern template class RFieldDft<3>;
   #endif
 
}
}
}
#endif