closure.h

Go to the documentation of this file.

 
/******************************************************************************
The MIT License(MIT)
 
Embedded Template Library.
https://github.com/ETLCPP/etl
https://www.etlcpp.com
 
Copyright(c) 2025 BMW AG
 
Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files(the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and / or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions :
 
The above copyright notice and this permission notice shall be included in all
copies or substantial portions of the Software.
 
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
SOFTWARE.
******************************************************************************/
 
#ifndef ETL_CLOSURE_INCLUDED
#define ETL_CLOSURE_INCLUDED
 
#include "platform.h"
#include "delegate.h"
#include "tuple.h"
#include "utility.h"
#include "type_list.h"
 
namespace etl
{
#if ETL_USING_CPP11 && !defined(ETL_CLOSURE_FORCE_CPP03_IMPLEMENTATION)
  //*************************************************************************
  //*************************************************************************
  template <typename>
  class closure;
 
  //*************************************************************************
  //*************************************************************************
  template <typename TReturn, typename... TArgs>
  class closure<TReturn(TArgs...)>
  {
  public:
   
    using delegate_type  = etl::delegate<TReturn(TArgs...)>; 
    using argument_types = etl::type_list<TArgs...>;         
    
    //*********************************************************************
    //*********************************************************************
    ETL_CONSTEXPR14 closure(const delegate_type& f, const TArgs... args)
      : m_f(f)
      , m_args(args...)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    ETL_CONSTEXPR14 TReturn operator()() const
    {
      return execute(etl::index_sequence_for<TArgs...>{});
    }
 
    //*********************************************************************
    //*********************************************************************
    template <size_t Index, typename UArg>
    ETL_CONSTEXPR14 void bind(UArg arg)
    {
      static_assert(etl::is_convertible<UArg, etl::type_list_type_at_index_t<argument_types, Index>>::value, "Argument is not convertible");
      static_assert(!etl::is_reference<UArg>::value, "Cannot bind reference arguments");
 
      etl::get<Index>(m_args) = arg;
    }
 
    //*********************************************************************
    template <typename... UArgs>
    ETL_CONSTEXPR14 void bind(UArgs&&... args)
    {
      static_assert(sizeof...(UArgs) == sizeof...(TArgs), "Argument count mismatch");
      bind_impl(etl::make_index_sequence<sizeof...(TArgs)>{}, etl::forward<UArgs>(args)...);
    }
 
  private:
 
    //*********************************************************************
    template <size_t... Indexes, typename... UArgs>
    ETL_CONSTEXPR14 void bind_impl(etl::index_sequence<Indexes...>, UArgs&&... args)
    {
      // Expand the pack and call bind<Index>(arg) for each argument
      int dummy[] = {0, (bind<Indexes>(etl::forward<UArgs>(args)), 0)...};
      (void)dummy; // Suppress unused variable warning
    }
 
    //*********************************************************************
    //*********************************************************************
    template<size_t... Indexes>
    ETL_CONSTEXPR14 TReturn execute(etl::index_sequence<Indexes...>) const
    {
      return m_f(etl::get<Indexes>(m_args)...);
    }
 
    delegate_type m_f;           
    etl::tuple<TArgs...> m_args; 
  };
#else
  //*************************************************************************
  //*************************************************************************
  template <typename>
  class closure;
 
  //*************************************************************************
  //*************************************************************************
  template<typename TReturn, typename TArg0>
  class closure<TReturn(TArg0)>
  {
  public:

    typedef etl::delegate<TReturn(TArg0)> delegate_type;
 
    //*********************************************************************
    //*********************************************************************
    closure(const delegate_type& f, const TArg0 arg0)
      : m_f(f)
      , m_arg0(arg0)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    TReturn operator()() const 
    {
      return m_f(m_arg0);
    }
 
  private:
 
    delegate_type m_f; 
    TArg0 m_arg0;
  };
 
  //*************************************************************************
  //*************************************************************************
  template<typename TReturn, typename TArg0, typename TArg1>
  class closure<TReturn(TArg0, TArg1)>
  {
  public:
 
    typedef etl::delegate<TReturn(TArg0, TArg1)> delegate_type;
 
    //*********************************************************************
    //*********************************************************************
    closure(const delegate_type& f, const TArg0 arg0, const TArg1 arg1)
      : m_f(f)
      , m_arg0(arg0)
      , m_arg1(arg1)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    TReturn operator()() const 
    {
      return m_f(m_arg0, m_arg1);
    }
 
  private:
 
    delegate_type m_f; 
    TArg0 m_arg0;
    TArg1 m_arg1;
  };
 
  //*************************************************************************
  //*************************************************************************
  template<typename TReturn, typename TArg0, typename TArg1, typename TArg2>
  class closure<TReturn(TArg0, TArg1, TArg2)>
  {
  public:
 
    typedef etl::delegate<TReturn(TArg0, TArg1, TArg2)> delegate_type;
 
    //*********************************************************************
    //*********************************************************************
    closure(const delegate_type& f, const TArg0 arg0, const TArg1 arg1, const TArg2 arg2)
      : m_f(f)
      , m_arg0(arg0)
      , m_arg1(arg1)
      , m_arg2(arg2)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    TReturn operator()() const 
    {
      return m_f(m_arg0, m_arg1, m_arg2);
    }
 
  private:
 
    delegate_type m_f; 
    TArg0 m_arg0;
    TArg1 m_arg1;
    TArg2 m_arg2;
  };
 
  //*************************************************************************
  //*************************************************************************
  template<typename TReturn, typename TArg0, typename TArg1, typename TArg2, typename TArg3>
  class closure<TReturn(TArg0, TArg1, TArg2, TArg3)>
  {
  public:
 
    typedef etl::delegate<TReturn(TArg0, TArg1, TArg2, TArg3)> delegate_type;
 
    //*********************************************************************
    //*********************************************************************
    closure(const delegate_type& f, const TArg0 arg0, const TArg1 arg1, const TArg2 arg2, const TArg3 arg3)
      : m_f(f)
      , m_arg0(arg0)
      , m_arg1(arg1)
      , m_arg2(arg2)
      , m_arg3(arg3)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    TReturn operator()() const 
    {
      return m_f(m_arg0, m_arg1, m_arg2, m_arg3);
    }
 
  private:
 
    delegate_type m_f; 
    TArg0 m_arg0;
    TArg1 m_arg1;
    TArg2 m_arg2;
    TArg3 m_arg3;
  };
 
  //*************************************************************************
  //*************************************************************************
  template<typename TReturn, typename TArg0, typename TArg1, typename TArg2, typename TArg3, typename TArg4>
  class closure<TReturn(TArg0, TArg1, TArg2, TArg3, TArg4)>
  {
  public:
 
    typedef etl::delegate<TReturn(TArg0, TArg1, TArg2, TArg3, TArg4)> delegate_type;
 
    //*********************************************************************
    //*********************************************************************
    closure(const delegate_type& f, const TArg0 arg0, const TArg1 arg1, const TArg2 arg2, const TArg3 arg3, const TArg4 arg4)
      : m_f(f)
      , m_arg0(arg0)
      , m_arg1(arg1)
      , m_arg2(arg2)
      , m_arg3(arg3)
      , m_arg4(arg4)
    {
    }
 
    //*********************************************************************
    //*********************************************************************
    TReturn operator()() const 
    {
      return m_f(m_arg0, m_arg1, m_arg2, m_arg3, m_arg4);
    }
 
  private:
 
    delegate_type m_f; 
    TArg0 m_arg0;
    TArg1 m_arg1;
    TArg2 m_arg2;
    TArg3 m_arg3;
    TArg4 m_arg4;
  };
#endif
}
 
#endif