call.h

Go to the documentation of this file.

//    sampalib.org ESL library and tools
//    Copyright (C) 2007  Thierry Grellier
//
//    This program is free software; you can redistribute it and/or modify
//    it under the terms of the GNU General Public License version 2 as
//    published by the Free Software Foundation.
//
//    This program 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 this program; if not, write to the Free Software Foundation, Inc.,
//    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
//
//    contact: www.sampalib.org

#ifndef SAMPA_CALL_H
#define SAMPA_CALL_H

#include "sampa/core/object.h"

#if SAMPA_CONFIG_TRACE_CALLS == SAMPA_DISABLED

#  define SAMPA_IMPLEMENT_INTERFACE /* */

namespace Sampa {    
  
  template<class Interface>
  class CallObserver : public Object {
  public:
    CallObserver(const Name& name)
    : Object(name), m_interface(0) {}
    void bind_target(Interface* interface) { m_interface = interface; }
    Interface* operator->() { return m_interface; }
  private:  
    Interface* m_interface;
    SAMPA_PERSISTENT(CallObserver);
  };
}

#else

namespace Sampa {

  class Object;
  
  class CallBase {
  public:
    CallBase(Object* from, Object* to);
    CallBase();
    ~CallBase();
    inline static void implement_interface(const char* function_name) 
    {
      if (M_current_call) {
        M_current_call->m_function_name = function_name;
        M_current_call = 0;
      }
    }
  private:
    bool             m_trace;
    const char*      m_function_name;
    unsigned         m_call_id;
    static CallBase* M_current_call;
    static unsigned  M_num_call;
  };
  
  template<class Interface>
  class Call : public CallBase {
  public:
    Call(Interface* interface, Object* from, Object* to)
    : CallBase(from, to), m_interface(interface) { }
    Call(Interface* interface)
    : m_interface(interface) { }
    Interface* operator->() { return m_interface; }
  private:
    Interface* m_interface;
  };
  
  template<class Interface>
  class CallObserver : public Object {
  public:
    CallObserver(const Name& name)
    : Object(name), m_interface(0), m_target(0) {}
    void bind_target(Interface* interface) { m_interface = interface; m_target = dynamic_cast<Interface>(interface); }
    Call<Interface> operator->() { return Call<Interface>(m_interface, this, m_target); }
  private:  
    Interface* m_interface;
    Object*    m_target;
    SAMPA_PERSISTENT(CallObserver);
  };
}

#ifdef __GNUC__
#  define SAMPA_IMPLEMENT_INTERFACE Sampa::CallBase::implement_interface(__PRETTY_FUNCTION__)
#else
#  define SAMPA_IMPLEMENT_INTERFACE Sampa::CallBase::implement_interface(__func__)
#endif

#endif

#endif

---