TAO/examples/Simple/echo/Echo_i.cpp

   1 #include "Echo_i.h"
   2
   3 // Set the ORB pointer.
   4 void
   5 Echo_i::orb (CORBA::ORB_ptr o)
   6 {
   7   this->orb_ = CORBA::ORB::_duplicate (o);
   8 }
   9
  10 // Return a list of object references.
  11 Echo::List *
  12 Echo_i::echo_list (const char *)
  13 {
  14   Echo::List_var list;
  15
  16   {
  17     Echo::List *tmp = 0;
  18     ACE_NEW_RETURN (tmp,
  19                     Echo::List (3),
  20                     0);
  21     // Pass ownership to the _var, pitty that ACE_NEW_RETURN cannot
  22     // assign to T_vars directly.
  23     list = tmp;
  24   }
  25
  26   list->length (3);
  27
  28   // Just do something to get a list of object references.
  29   list[CORBA::ULong(0)] =
  30     orb_->resolve_initial_references ("NameService");
  31
  32   list[CORBA::ULong(1)] =
  33     orb_->resolve_initial_references ("NameService");
  34
  35   list[CORBA::ULong(2)] =
  36     orb_->resolve_initial_references ("NameService");
  37
  38   return list._retn ();
  39 }
  40
  41 // Return the mesg string from the server
  42
  43 char *
  44 Echo_i::echo_string (const char *mesg)
  45 {
  46   // The pointer mesg was NULL, return.
  47   if (mesg == 0)
  48     return 0;
  49
  50   CORBA::String_var str = CORBA::string_dup (mesg);
  51
  52   // if <CORBA::string_dup> returns a 0 pointer, an exception is
  53   // raised.
  54
  55   if (str.in () == 0)
  56     throw CORBA::NO_MEMORY ();
  57
  58   // Got thru! now, make a deep copy of the mesg string and send it
  59   // back to the client.
  60
  61   return str._retn ();
  62   // The _retn is used as it allows the conversion of
  63   // CORBA::String_var to char* without causing any compiler errors.
  64 }
  65
  66 // Shutdown the server application.
  67
  68 void
  69 Echo_i::shutdown ()
  70 {
  71   ACE_DEBUG ((LM_DEBUG,
  72               ACE_TEXT ("\nThe echo server is shutting down\n")));
  73
  74   // Instruct the ORB to shutdown.
  75   this->orb_->shutdown ();
  76 }