TAO/tests/Portable_Interceptors/Slot/driver.cpp

   1 // author    : Boris Kolpackov <boris@kolpackov.net>
   2 #include "tao/PI/PI.h"
   3 #include "tao/LocalObject.h"
   4 #include "tao/ORBInitializer_Registry.h"
   5
   6 PortableInterceptor::SlotId slot_id;
   7
   8 class ORB_Initializer : public virtual PortableInterceptor::ORBInitializer,
   9                         public virtual ::CORBA::LocalObject
  10 {
  11 public:
  12   virtual void
  13   pre_init (PortableInterceptor::ORBInitInfo_ptr)
  14   {
  15   }
  16
  17   virtual void
  18   post_init (PortableInterceptor::ORBInitInfo_ptr info)
  19   {
  20     slot_id = info->allocate_slot_id ();
  21     ACE_DEBUG ((LM_DEBUG, "Allocated slot with id %d.\n", slot_id));
  22   }
  23 };
  24
  25 int
  26 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  27 {
  28   try
  29   {
  30     PortableInterceptor::ORBInitializer_var orb_initializer = new ORB_Initializer ();
  31     PortableInterceptor::register_orb_initializer (orb_initializer.in ());
  32
  33     CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
  34
  35     CORBA::Object_var pic_obj = orb->resolve_initial_references ("PICurrent");
  36     PortableInterceptor::Current_var pic (
  37       PortableInterceptor::Current::_narrow (pic_obj.in ()));
  38
  39     CORBA::Any in;
  40     in <<= CORBA::ULong (1);
  41     pic->set_slot (slot_id, in);
  42
  43     CORBA::ULong v (0);
  44     CORBA::Any_var out = pic->get_slot (slot_id);
  45     out >>= v;
  46
  47     if (v != 1)
  48     {
  49       ACE_ERROR ((LM_ERROR, "ERROR: Slot value was not preserved.\n"));
  50       return 1;
  51     }
  52
  53     orb->destroy ();
  54   }
  55   catch (PortableInterceptor::InvalidSlot const&)
  56     {
  57       ACE_ERROR ((LM_ERROR, "ERROR: Caught InvalidSlot exception.\n"));
  58       return 1;
  59     }
  60   catch (const CORBA::Exception& ex)
  61     {
  62       ex._tao_print_exception ("Exception caught:");
  63       return 1;
  64     }
  65
  66   return 0;
  67 }