ShRefCountImpl.hpp

// Sh: A GPU metaprogramming language.
//
// Copyright 2003-2005 Serious Hack Inc.
// 
// This software is provided 'as-is', without any express or implied
// warranty. In no event will the authors be held liable for any damages
// arising from the use of this software.
// 
// Permission is granted to anyone to use this software for any purpose,
// including commercial applications, and to alter it and redistribute it
// freely, subject to the following restrictions:
// 
// 1. The origin of this software must not be misrepresented; you must
// not claim that you wrote the original software. If you use this
// software in a product, an acknowledgment in the product documentation
// would be appreciated but is not required.
// 
// 2. Altered source versions must be plainly marked as such, and must
// not be misrepresented as being the original software.
// 
// 3. This notice may not be removed or altered from any source
// distribution.
#ifndef SHREFCOUNTIMPL_HPP
#define SHREFCOUNTIMPL_HPP

#include "ShRefCount.hpp"

namespace SH {

template<typename T>
inline
ShPointer<T>::ShPointer()
  : m_object(0)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[cons] " << std::flush << std::setw(10) << "0" << " (default)" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif
}

template<typename T>
inline
ShPointer<T>::ShPointer(T* object)
  : m_object(object)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[cons] " << std::flush << std::setw(10) << object << " <" << (object ? typeid(*(object)).name() : "n/a") << ">" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif
  if (m_object) m_object->acquireRef();
}

template<typename T>
inline
ShPointer<T>::ShPointer(const ShPointer<T>& other)
  : m_object(other.m_object)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_DEBUG_ASSERT((unsigned long)m_object < 0xb0000000L);
  SH_RCDEBUG_BLUE;
  std::cerr << "[copy] " << std::flush << std::setw(10) << other.m_object << " <" << (other.m_object ? typeid(*(other.m_object)).name() : "n/a") << ">" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif


  if (m_object) m_object->acquireRef();
}

template<typename T>
template<typename S>
inline
ShPointer<T>::ShPointer(const ShPointer<S>& other)
  : m_object(other.object())
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[cpct] " << std::flush << std::setw(10) << other.object()
            << " <" << (other.object() ? typeid(*(other.object())).name() : "n/a") << ">"
            << " -> " << typeid(T).name()
            << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  if (m_object) m_object->acquireRef();
}

template<typename T>
inline
void ShPointer<T>::releaseRef()
{
  if (m_object && m_object->releaseRef() == 0) {
#ifdef SH_REFCOUNT_DEBUGGING
    SH_RCDEBUG_RED;
    std::cerr << "[dstr] " << std::flush << std::setw(10) << m_object << " <" << typeid(*m_object).name() << ">" << std::endl;
    SH_RCDEBUG_NORMAL;
#endif
    delete m_object;
#ifdef SH_REFCOUNT_DEBUGGING
    m_object = 0;
#endif
  }
}

template<typename T>
inline
ShPointer<T>::~ShPointer()
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[dest] " << std::flush << std::setw(10) << m_object << " <" << (m_object ? typeid(*(m_object)).name() : "n/a") << ">" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  releaseRef();
}

template<typename T>
inline
void ShPointer<T>::swap(ShPointer<T>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[swap] " << std::flush << std::setw(10) << other.m_object << " <" << (other.m_object ? typeid(*(other.m_object)).name() : "n/a") << ">" << " (was " << m_object << " <" << (m_object ? typeid(*(m_object)).name() : "n/a") << ">" << ")" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif
  T* t = m_object;
  m_object = other.m_object;
  other.m_object = t;
}

template<typename T>
inline
ShPointer<T>& ShPointer<T>::operator=(T* object)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[asn*] " << std::flush << std::setw(10) << object << " <" << (object ? typeid(*(object)).name() : "n/a") << ">" << " (was " << m_object << " <" << (m_object ? typeid(*(m_object)).name() : "n/a") << ">" << ")" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  ShPointer<T> t(object);
  t.swap(*this);
  
  return *this;
}

template<typename T>
inline
ShPointer<T>& ShPointer<T>::operator=(const ShPointer<T>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[assn] " << std::flush << std::setw(10) << other.m_object << " <" << (other.m_object ? typeid(*(other.m_object)).name() : "n/a") << ">" << " (was " << m_object << " <" << (m_object ? typeid(*(m_object)).name() : "n/a") << ">" << ")" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  ShPointer<T> t(other);
  t.swap(*this);
  
  return *this;
}

template<typename T>
template<typename S>
inline
ShPointer<T>& ShPointer<T>::operator=(const ShPointer<S>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[assn] " << std::flush << std::setw(10) << other.object() << " <" << (other.object() ? typeid(*(other.object())).name() : "n/a") << ">" << " (was " << m_object << " <" << (m_object ? typeid(*(m_object)).name() : "n/a") << ">" << ")" << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  ShPointer<T> t(other);
  t.swap(*this);

  return *this;
}

template<typename T>
inline
bool ShPointer<T>::operator==(const ShPointer<T>& other) const
{
  return m_object == other.m_object;
}

template<typename T>
inline
bool ShPointer<T>::operator!=(const ShPointer<T>& other) const
{
  return m_object != other.m_object;
}

template<typename T>
inline
bool ShPointer<T>::operator<(const ShPointer<T>& other) const
{
  return m_object < other.m_object; // TODO: Make sure this is portable...
}

template<typename T>
inline
T& ShPointer<T>::operator*() const
{
  return *m_object;
}

template<typename T>
inline
T* ShPointer<T>::operator->() const
{
  return m_object;
}

template<typename T>
inline
ShPointer<T>::operator bool() const
{
  return m_object != 0;
}

template<typename T>
inline
int ShPointer<T>::refCount() const
{
  if (!m_object)
    return 0; // TODO: Maybe -1?
  else
    return m_object->refCount();
}

template<typename T>
inline
T* ShPointer<T>::object() const
{
  return m_object;
}


template<typename T, typename S>
ShPointer<T> shref_static_cast(const ShPointer<S>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[csts] " << std::flush << std::setw(10) << other.object() << " <" << (other.object() ? typeid(*(other.object())).name() : "n/a") << ">"
            << " -> " << typeid(T).name() << std::endl;
  SH_RCDEBUG_NORMAL;
#endif

  return ShPointer<T>(static_cast<T*>(other.object()));
}

template<typename T, typename S>
ShPointer<T> shref_dynamic_cast(const ShPointer<S>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[cstd] " << std::flush << std::setw(10) << other.object() << " <" << (other.object() ? typeid(*(other.object())).name() : "n/a") << ">"
            << " -> " << typeid(T).name() << std::endl;
  SH_RCDEBUG_NORMAL;
#endif
  return ShPointer<T>(dynamic_cast<T*>(other.object()));
}

template<typename T, typename S>
ShPointer<T> shref_const_cast(const ShPointer<S>& other)
{
#ifdef SH_REFCOUNT_DEBUGGING
  SH_RCDEBUG_BLUE;
  std::cerr << "[cstc] " << std::flush << std::setw(10) << other.object() << " <" << (other.object() ? typeid(*(other.object())).name() : "n/a") << ">"
            << " -> " << typeid(T).name() << std::endl;
  SH_RCDEBUG_NORMAL;
#endif
  return ShPointer<T>(const_cast<T*>(other.object()));
}

}

#endif

---