typePassive.hpp

Go to the documentation of this file.

/*
 * MeDiPack, a Message Differentiation Package
 *
 * Copyright (C) 2015-2024 Chair for Scientific Computing (SciComp), University of Kaiserslautern-Landau
 * Homepage: http://scicomp.rptu.de
 * Contact:  Prof. Nicolas R. Gauger (codi@scicomp.uni-kl.de)
 *
 * Lead developers: Max Sagebaum (SciComp, University of Kaiserslautern-Landau)
 *
 * This file is part of MeDiPack (http://scicomp.rptu.de/software/codi).
 *
 * MeDiPack is free software: you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation, either
 * version 3 of the License, or (at your option) any later version.
 *
 * MeDiPack is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 *
 * See the GNU Lesser General Public License for more details.
 * You should have received a copy of the GNU
 * Lesser General Public License along with MeDiPack.
 * If not, see <http://www.gnu.org/licenses/>.
 *
 * Authors: Max Sagebaum, Tim Albring (SciComp, University of Kaiserslautern-Landau)
 */
 
#pragma once
 
#include <mpi.h>
 
#include <new>
 
#include "../adToolPassive.hpp"
#include "../macros.h"
#include "typeInterface.hpp"
#include "op.hpp"
 
namespace medi {
 
  template<typename T>
  class MpiTypePassive final
      : public MpiTypeBase<
          MpiTypePassive<T>,
          T,
          T,
          ADToolPassive>
  {
 
    public:
 
      typedef T Type;
      typedef T ModifiedType;
      typedef void PrimalType;
      typedef void IndexType;
 
      typedef ADToolPassive Tool;
 
      bool isClone;
 
      Tool adTool;
 
      MpiTypePassive(MPI_Datatype type) :
        MpiTypeBase<MpiTypePassive<T>, Type, ModifiedType, ADToolPassive>(type, type),
        isClone(false),
        adTool(type, type) {}
 
    private:
      MpiTypePassive(MPI_Datatype type, bool clone) :
        MpiTypeBase<MpiTypePassive<T>, Type, ModifiedType, ADToolPassive>(type, type),
        isClone(clone),
        adTool(type, type) {}
 
    public:
      ~MpiTypePassive() {
        if(isClone) {
          MPI_Datatype temp = this->getMpiType();
          MPI_Type_free(&temp);
        }
      }
 
      const Tool& getADTool() const{
        return adTool;
      }
 
      int computeActiveElements(const int count) const {
        MEDI_UNUSED(count);
 
        return 0;
      }
 
      bool isModifiedBufferRequired() const {
        return false;
      }
 
      inline void copyIntoModifiedBuffer(const Type* buf, size_t bufOffset, ModifiedType* bufMod, size_t bufModOffset, int elements) const {
        for(int i = 0; i < elements; ++i) {
          bufMod[bufModOffset + i] = buf[bufOffset + i];
        }
      }
 
      inline void copyFromModifiedBuffer(Type* buf, size_t bufOffset, const ModifiedType* bufMod, size_t bufModOffset, int elements) const {
        for(int i = 0; i < elements; ++i) {
          buf[bufOffset + i] = bufMod[bufModOffset + i];
        }
      }
 
      inline void getIndices(const Type* buf, size_t bufOffset, IndexType* indices, size_t bufModOffset, int elements) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(bufOffset);
        MEDI_UNUSED(indices);
        MEDI_UNUSED(bufModOffset);
        MEDI_UNUSED(elements);
      }
 
      inline void registerValue(Type* buf, size_t bufOffset, IndexType* indices, PrimalType* oldPrimals, size_t bufModOffset, int elements) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(bufOffset);
        MEDI_UNUSED(indices);
        MEDI_UNUSED(oldPrimals);
        MEDI_UNUSED(bufModOffset);
        MEDI_UNUSED(elements);
      }
 
      inline void clearIndices(Type* buf, size_t bufOffset, int elements) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(bufOffset);
        MEDI_UNUSED(elements);
      }
 
      inline void createIndices(Type* buf, size_t bufOffset, IndexType* indices, size_t bufModOffset, int elements) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(bufOffset);
        MEDI_UNUSED(indices);
        MEDI_UNUSED(bufModOffset);
        MEDI_UNUSED(elements);
      }
 
      inline void getValues(const Type* buf, size_t bufOffset, PrimalType* primals, size_t bufModOffset, int elements) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(bufOffset);
        MEDI_UNUSED(primals);
        MEDI_UNUSED(bufModOffset);
        MEDI_UNUSED(elements);
      }
 
      inline void performReduce(Type* buf, Type* target, int count, AMPI_Op op, int ranks) const {
        MEDI_UNUSED(buf);
        MEDI_UNUSED(target);
        MEDI_UNUSED(count);
        MEDI_UNUSED(op);
        MEDI_UNUSED(ranks);
      }
 
      inline void copy(Type* from, size_t fromOffset, Type* to, size_t toOffset, int count) const {
        for(int i = 0; i < count; ++i) {
          to[toOffset + i] = from[fromOffset + i];
        }
      }
 
      void initializeType(Type* buf, size_t bufOffset, int elements) const {
        for(int i = 0; i < elements; ++i) {
          new(&buf[bufOffset + i]) Type;
        }
      }
 
      void freeType(Type* buf, size_t bufOffset, int elements) const {
        for(int i = 0; i < elements; ++i) {
          buf[bufOffset + elements].~Type();
        }
      }
 
      inline void createTypeBuffer(Type* &buf, size_t size) const {
        buf = new Type[size];
      }
 
      inline void createModifiedTypeBuffer(ModifiedType* &buf, size_t size) const {
        buf = new ModifiedType[size];
      }
 
      inline void deleteTypeBuffer(Type* &buf, size_t size) const {
        if(NULL != buf) {
          delete [] buf;
          buf = NULL;
        }
      }
 
      inline void deleteModifiedTypeBuffer(ModifiedType* &buf) const {
        if(NULL != buf) {
          delete [] buf;
          buf = NULL;
        }
      }
 
      inline MpiTypePassive* clone() const {
        MPI_Datatype type;
        MPI_Type_dup(this->getMpiType(), &type);
 
        return new MpiTypePassive(type, true);
      }
  };
}