object_si_d.hpp

/*
 * object_si_d.hpp
 *
 *  Created on: May 31, 2015
 *      Author: Pietro Incardona
 */

#ifndef OBJECT_SI_D_HPP_
#define OBJECT_SI_D_HPP_

#include "for_each_ref.hpp"
#include <boost/mpl/range_c.hpp>
#include <boost/fusion/include/size.hpp>

template<typename v_src,typename v_dst, int... prp>
struct object_si_d_e
{
    typedef typename to_boost_vmpl<prp...>::type v_prp;

    const v_src & src;

    v_dst & dst;

    __device__ __host__ object_si_d_e(const v_src & src, v_dst & dst)
    :src(src),dst(dst)
    {
    };

    template<typename T>
    __device__ __host__ void operator()(T& t)
    {
        typedef decltype(src.template get<boost::mpl::at<v_prp,boost::mpl::int_<T::value>>::type::value>()) stype;

        // In case of layout switch use this
        //meta_copy_d<stype,dtype>::meta_copy_d_(src.template get<boost::mpl::at<v_prp,boost::mpl::int_<T::value>>::type::value>(),dst.template get<T::value>());

        meta_copy<typename std::remove_reference<stype>::type>::meta_copy_(src.template get<boost::mpl::at<v_prp,boost::mpl::int_<T::value>>::type::value>(),dst.template get<T::value>());
    }
};

template<typename T>
struct object_si_d_e_cnk_meta_copy_selector
{
    template<unsigned int T_value, typename v_prp, typename ctype, typename Tsrc, typename Tdst>
    static inline void copy(const Tsrc & src, Tdst & dst, int sub_id)
    {
        meta_copy<ctype>::meta_copy_(src.template get<boost::mpl::at<v_prp,boost::mpl::int_<T_value>>::type::value>()[sub_id],dst.template get<T_value>());
    }
};

template<unsigned int N1, typename T>
struct object_si_d_e_cnk_meta_copy_selector<T[N1]>
{
    template<unsigned int T_value, typename v_prp, typename ctype, typename Tsrc, typename Tdst>
    static inline void copy(const Tsrc & src, Tdst & dst, int sub_id)
    {
        for (int i = 0 ; i < N1 ; i++)
        {
            meta_copy<T>::meta_copy_(src.template get<boost::mpl::at<v_prp,boost::mpl::int_<T_value>>::type::value>()[i][sub_id],dst.template get<T_value>()[i]);
        }
    }
};

template<typename v_src,typename v_dst, int... prp>
struct object_si_d_e_cnk
{
    // Convert the packed properties into an MPL vector
    typedef typename to_boost_vmpl<prp...>::type v_prp;

    // Source object
    const v_src & src;

    // Destination object
    v_dst & dst;

    // Element id
    size_t sub_id;

    object_si_d_e_cnk(const v_src & src, size_t sub_id, v_dst & dst)
    :src(src),dst(dst),sub_id(sub_id)
    {
    };

    template<typename T>
    void operator()(T& t)
    {
        typedef typename boost::mpl::at<typename v_dst::type,typename boost::mpl::int_<T::value>>::type ctype;

        object_si_d_e_cnk_meta_copy_selector<ctype>::template copy<T::value,v_prp,ctype>(src,dst,sub_id);
    }
};

template<typename v_src,typename v_dst, int... prp>
struct object_si_d_f
{
    // Convert the packed properties into an MPL vector
    typedef typename to_boost_vmpl<prp...>::type v_prp;

    // Source object
    const v_src & src;

    // Destination object
    v_dst & dst;

    object_si_d_f(const v_src & src, v_dst & dst)
    :src(src),dst(dst)
    {
    };

    template<typename T>
    void operator()(T& t)
    {
        typedef typename boost::mpl::at<typename v_dst::type,typename boost::mpl::int_<T::value>>::type ctype;

        meta_copy<ctype>::meta_copy_(boost::fusion::at_c<boost::mpl::at<v_prp,boost::mpl::int_<T::value>>::type::value>(src.data),boost::fusion::at_c<T::value>(dst.data));
    }
};

#define OBJ_ENCAP 1
#define OBJ_NORMAL 2
#define OBJ_ENCAP_CHUNKING 3

template<typename v_src, typename v_dst,int type_copy, int... prp>
struct object_si_d
{
    inline object_si_d(const v_src & vs, v_dst & vd)
    {
        std::cerr << "Error object_copy: " << __FILE__ << " " << __LINE__ << "\n";
    };
};

template<typename v_src, typename v_dst, int... prp>
struct object_si_d<v_src,v_dst,OBJ_NORMAL,prp...>
{
    inline object_si_d(const v_src && vs, v_dst && vd)
    {
        object_si_d_f<v_src,v_dst,prp...> obj(vs,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }

    inline object_si_d(const v_src & vs, v_dst & vd)
    {
        object_si_d_f<v_src,v_dst,prp...> obj(vs,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }
};

template<typename v_src, typename v_dst, int... prp>
struct object_si_d<v_src,v_dst,OBJ_ENCAP,prp...>
{
    __device__ __host__ inline object_si_d(const v_src && vs, v_dst && vd)
    {
        object_si_d_e<v_src,v_dst,prp...> obj(vs,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }

    __device__ __host__ inline object_si_d(const v_src & vs, v_dst & vd)
    {
        object_si_d_e<v_src,v_dst,prp...> obj(vs,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }
};


template<typename v_src, typename v_dst, int... prp>
struct object_si_d<v_src,v_dst,OBJ_ENCAP_CHUNKING,prp...>
{
    inline object_si_d(const v_src && vs, size_t sub_id, v_dst && vd)
    {
        object_si_d_e_cnk<v_src,v_dst,prp...> obj(vs,sub_id,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }

    inline object_si_d(const v_src & vs, size_t sub_id, v_dst & vd)
    {
        object_si_d_e_cnk<v_src,v_dst,prp...> obj(vs,sub_id,vd);
        boost::mpl::for_each_ref< boost::mpl::range_c<int,0,v_dst::max_prop> >(obj);
    }
};

template<typename v_src, typename v_dst>
struct object_si_d<v_src,v_dst,OBJ_ENCAP>
{
    __device__ __host__  inline object_si_d(const v_src && vs, v_dst && vd)
    {
    }

    __device__ __host__  inline object_si_d(const v_src & vs, v_dst & vd)
    {
    }
};

#endif /* VECTOR_PROP_COPY_HPP_ */