innerStatementEvaluator.hpp

/*
 * CoDiPack, a Code Differentiation Package
 *
 * Copyright (C) 2015-2025 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, Johannes Blühdorn (SciComp, University of Kaiserslautern-Landau)
 *
 * This file is part of CoDiPack (http://scicomp.rptu.de/software/codi).
 *
 * CoDiPack is free software: you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * CoDiPack 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 General Public License for more details.
 * You should have received a copy of the GNU
 * General Public License along with CoDiPack.
 * If not, see <http://www.gnu.org/licenses/>.
 *
 * For other licensing options please contact us.
 *
 * Authors:
 *  - SciComp, University of Kaiserslautern-Landau:
 *    - Max Sagebaum
 *    - Johannes Blühdorn
 *    - Former members:
 *      - Tim Albring
 */
#pragma once
 
#include <algorithm>
#include <functional>
#include <type_traits>
 
#include "../../expressions/activeType.hpp"
#include "../../misc/macros.hpp"
#include "../../traits/expressionTraits.hpp"
#include "../misc/assignStatement.hpp"
#include "../misc/statementSizes.hpp"
#include "directStatementEvaluator.hpp"
#include "statementEvaluatorInterface.hpp"

namespace codi {

  struct InnerPrimalTapeStatementData {
    public:
 
      using Base = PrimalTapeStatementFunctions;  
 
      PrimalTapeStatementFunctions functions;  
      StatementSizes stmtSizes;                

      InnerPrimalTapeStatementData(PrimalTapeStatementFunctions functions, StatementSizes stmtSizes)
          : functions(functions), stmtSizes(stmtSizes) {}
  };

  template<typename Generator, typename Stmt>
  struct InnerStatementEvaluatorStaticStore {
    public:

      static InnerPrimalTapeStatementData const staticStore;  

      template<StatementCall... types>
      static InnerPrimalTapeStatementData gen() {
        using Handle = typename PrimalTapeStatementFunctions::Handle;
 
        return InnerPrimalTapeStatementData(
            PrimalTapeStatementFunctions(
                ((Handle)Generator::template StatementCallGenerator<types, Stmt>::evaluateInner)...),
            StatementSizes::create<Stmt>());
      }
  };
 
  template<typename Generator, typename Stmt>
  InnerPrimalTapeStatementData const InnerStatementEvaluatorStaticStore<Generator, Stmt>::staticStore =
      InnerStatementEvaluatorStaticStore<Generator, Stmt>::gen<CODI_STMT_CALL_GEN_ARGS>();

  struct InnerStatementEvaluator : public StatementEvaluatorInterface {
    public:
 
      /*******************************************************************************/
 
      using Handle = InnerPrimalTapeStatementData const*;  

      template<StatementCall type, typename Tape, typename... Args>
      static void call(Handle const& h, Args&&... args) {
        using Stmt = AssignStatement<ActiveType<Tape>, ActiveType<Tape>>;
        using CallGen = typename Tape::template StatementCallGenerator<type, Stmt>;
 
        using Function = decltype(&CallGen::evaluateInner);
 
        CallGen::evaluateFull(((Function)h->functions.funcs[(size_t)type]), h->stmtSizes.outputArgs,
                              h->stmtSizes.inputArgs, h->stmtSizes.constantArgs, std::forward<Args>(args)...);
      }

      template<typename Tape, typename Generator, typename Stmt>
      static Handle createHandle() {
        return &InnerStatementEvaluatorStaticStore<Generator, Stmt>::staticStore;
      }

  };
}