TAO/tao/PortableServer/POA_Current_Impl.cpp

   1 // -- PortableServer Include --
   2 #include "tao/PortableServer/Object_Adapter.h"
   3 #include "tao/PortableServer/POA_Current_Impl.h"
   4 #include "tao/PortableServer/Root_POA.h"
   5
   6 #include "tao/TSS_Resources.h"
   7
   8 #if !defined (__ACE_INLINE__)
   9 # include "tao/PortableServer/POA_Current_Impl.inl"
  10 #endif /* __ACE_INLINE__ */
  11
  12 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  13
  14 namespace TAO
  15 {
  16   namespace Portable_Server
  17   {
  18     POA_Current_Impl::POA_Current_Impl ()
  19       : object_id_ (TAO_POA_OBJECT_ID_BUF_SIZE, 0, object_id_buf_),
  20         object_key_ (0),
  21         servant_ (0),
  22         priority_ (TAO_INVALID_PRIORITY),
  23         previous_current_impl_ (0),
  24         setup_done_ (false)
  25     {
  26     }
  27
  28     void
  29     POA_Current_Impl::setup (::TAO_Root_POA *p, const TAO::ObjectKey &key)
  30     {
  31       // Remember information about this upcall.
  32       this->poa_ = p;
  33       this->object_key_ = &key;
  34
  35       // Set the current context and remember the old one.
  36       this->tss_resources_ = TAO_TSS_Resources::instance ();
  37
  38       this->previous_current_impl_ =
  39         static_cast <POA_Current_Impl *>
  40                          (this->tss_resources_->poa_current_impl_);
  41       this->tss_resources_->poa_current_impl_ = this;
  42
  43       // Setup is complete.
  44       this->setup_done_ = true;
  45     }
  46
  47     POA_Current_Impl *
  48     POA_Current_Impl::previous () const
  49     {
  50       return this->previous_current_impl_;
  51     }
  52
  53     void
  54     POA_Current_Impl::teardown ()
  55     {
  56       if (this->setup_done_)
  57         {
  58           // Reset the old context.
  59           this->tss_resources_->poa_current_impl_ = this->previous_current_impl_;
  60         }
  61     }
  62
  63     PortableServer::POA_ptr
  64     POA_Current_Impl::get_POA ()
  65     {
  66       return PortableServer::POA::_duplicate (this->poa_);
  67     }
  68
  69     PortableServer::ObjectId *
  70     POA_Current_Impl::get_object_id ()
  71     {
  72       PortableServer::ObjectId *objid = 0;
  73
  74       // Create a new one and pass it back
  75       ACE_NEW_RETURN (objid,
  76                       PortableServer::ObjectId (this->object_id_),
  77                       0);
  78       return objid;
  79     }
  80
  81     CORBA::Object_ptr
  82     POA_Current_Impl::get_reference ()
  83     {
  84       return this->poa_->id_to_reference (this->object_id_);
  85     }
  86
  87     PortableServer::Servant
  88     POA_Current_Impl::get_servant ()
  89     {
  90       return this->servant_;
  91     }
  92
  93     TAO_ORB_Core &
  94     POA_Current_Impl::orb_core () const
  95
  96     {
  97       return this->poa_->orb_core ();
  98     }
  99   }
 100 }
 101
 102 TAO_END_VERSIONED_NAMESPACE_DECL