// -*- C++ -*-
//
// $Id$
// ****************************************************************

ACE_INLINE
CORBA::Object::Object (int)
  : servant_ (0),
    is_collocated_ (0),
    is_local_ (1),
    proxy_broker_ (0),
    is_evaluated_ (1),
    ior_ (),
    orb_core_ (0),
    protocol_proxy_ (0),
    refcount_ (1),
    refcount_lock_ (0)
{
}


ACE_INLINE CORBA::Object_ptr
CORBA::Object::_duplicate (CORBA::Object_ptr obj)
{
  if (obj)
    obj->_add_ref ();
  return obj;
}

// ************************************************************
// These are in CORBA namespace

ACE_INLINE void
CORBA::release (CORBA::Object_ptr obj)
{
  if (obj)
    obj->_remove_ref ();
}

ACE_INLINE CORBA::Boolean
CORBA::is_nil (CORBA::Object_ptr obj)
{
  if (obj == 0)
    {
      return 1;
    }

  return CORBA::Object::is_nil_i (obj);
}

// ************************************************************

// Null pointers represent nil objects.

ACE_INLINE CORBA::Object_ptr
CORBA::Object::_nil (void)
{
  return 0;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object::_unchecked_narrow (CORBA::Object_ptr obj
                                  ACE_ENV_ARG_DECL_NOT_USED)
{
  if (CORBA::is_nil (obj))
    return CORBA::Object::_nil ();

  if (obj->is_local_)
    return
      ACE_reinterpret_cast (CORBA::Object_ptr,
                            obj->_tao_QueryInterface
                            (ACE_reinterpret_cast (ptr_arith_t,
                                                   &CORBA::Object::_tao_class_id)));
  else
    return CORBA::Object::_duplicate (obj);
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object::_narrow (CORBA::Object_ptr obj
                        ACE_ENV_ARG_DECL)
{
  return CORBA::Object::_unchecked_narrow (obj
                                           ACE_ENV_ARG_PARAMETER);
}

ACE_INLINE TAO_Stub *
CORBA::Object::_stubobj (void) const
{
  return this->protocol_proxy_;
}

ACE_INLINE CORBA::Boolean
CORBA::Object::marshal (TAO_OutputCDR &cdr)
{
  return (cdr << this);
}

ACE_INLINE CORBA::Boolean
CORBA::Object::is_evaluated (void) const
{
  return this->is_evaluated_;
}

ACE_INLINE void
CORBA::Object::set_collocated_servant (TAO_Abstract_ServantBase *b)
{
  this->servant_ = b;
  this->is_collocated_ = 1;
}

ACE_INLINE TAO_ORB_Core *
CORBA::Object::orb_core (void) const
{
  return this->orb_core_;
}

ACE_INLINE IOP::IOR *
CORBA::Object::steal_ior (void)
{
  return this->ior_._retn ();
}

ACE_INLINE const IOP::IOR &
CORBA::Object::ior (void) const
{
  return this->ior_.in ();
}

// *************************************************************
// Inline operations for class CORBA::Object_var
// *************************************************************

ACE_INLINE
CORBA::Object_var::Object_var (void)
  : ptr_ (CORBA::Object::_nil ())
{
}

ACE_INLINE
CORBA::Object_var::Object_var (CORBA::Object_ptr p)
  : ptr_ (p)
{
}

ACE_INLINE
CORBA::Object_var::~Object_var (void)
{
  CORBA::release (this->ptr_);
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::ptr (void) const
{
  return this->ptr_;
}

ACE_INLINE
CORBA::Object_var::Object_var (const CORBA::Object_var &p)
  : TAO_Base_var (),
    ptr_ (CORBA::Object::_duplicate (p.ptr ()))
{
}

ACE_INLINE CORBA::Object_var &
CORBA::Object_var::operator= (CORBA::Object_ptr p)
{
  CORBA::release (this->ptr_);
  this->ptr_ = p;
  return *this;
}

ACE_INLINE CORBA::Object_var &
CORBA::Object_var::operator= (const CORBA::Object_var &p)
{
  if (this != &p)
  {
    CORBA::release (this->ptr_);
    this->ptr_ = CORBA::Object::_duplicate (p.ptr ());
  }
  return *this;
}

ACE_INLINE
CORBA::Object_var::operator const CORBA::Object_ptr &() const // cast
{
  return this->ptr_;
}

ACE_INLINE
CORBA::Object_var::operator CORBA::Object_ptr &() // cast
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::operator-> (void) const
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::in (void) const
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr &
CORBA::Object_var::inout (void)
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr &
CORBA::Object_var::out (void)
{
  CORBA::release (this->ptr_);
  this->ptr_ = CORBA::Object::_nil ();
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::_retn (void)
{
  // yield ownership of managed obj reference
  CORBA::Object_ptr val = this->ptr_;
  this->ptr_ = CORBA::Object::_nil ();
  return val;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::tao_duplicate (CORBA::Object_ptr p)
{
  return CORBA::Object::_duplicate (p);
}

ACE_INLINE void
CORBA::Object_var::tao_release (CORBA::Object_ptr p)
{
  CORBA::release (p);
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::tao_nil (void)
{
  return CORBA::Object::_nil ();
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_var::tao_narrow (
    CORBA::Object *p
    ACE_ENV_ARG_DECL_NOT_USED
  )
{
  return CORBA::Object::_duplicate (p);
}

ACE_INLINE CORBA::Object *
CORBA::Object_var::tao_upcast (void *src)
{
  CORBA::Object **tmp =
    ACE_static_cast (CORBA::Object **, src);
  return *tmp;
}

// *************************************************************
// Inline operations for class CORBA::Object_out
// *************************************************************

ACE_INLINE
CORBA::Object_out::Object_out (CORBA::Object_ptr &p)
  : ptr_ (p)
{
  this->ptr_ = CORBA::Object::_nil ();
}

ACE_INLINE
CORBA::Object_out::Object_out (CORBA::Object_var &p)
  : ptr_ (p.out ())
{
  CORBA::release (this->ptr_);
  this->ptr_ = CORBA::Object::_nil ();
}

ACE_INLINE
CORBA::Object_out::Object_out (const CORBA::Object_out &p)
  : ptr_ (p.ptr_)
{
}

ACE_INLINE CORBA::Object_out &
CORBA::Object_out::operator= (const CORBA::Object_out &p)
{
  this->ptr_ = p.ptr_;
  return *this;
}

ACE_INLINE CORBA::Object_out &
CORBA::Object_out::operator= (const CORBA::Object_var &p)
{
  this->ptr_ = CORBA::Object::_duplicate (p.ptr ());
  return *this;
}

ACE_INLINE CORBA::Object_out &
CORBA::Object_out::operator= (CORBA::Object_ptr p)
{
  this->ptr_ = p;
  return *this;
}

ACE_INLINE
CORBA::Object_out::operator CORBA::Object_ptr &() // cast
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr &
CORBA::Object_out::ptr (void) // ptr
{
  return this->ptr_;
}

ACE_INLINE CORBA::Object_ptr
CORBA::Object_out::operator-> (void)
{
  return this->ptr_;
}