TAO/tests/GIOP_Fragments/Big_String_Sequence/Echo_i.cpp

   1 #include "Echo_i.h"
   2
   3 constexpr size_t BIG_LENGTH = 4 * 1024;
   4
   5 // Constructor.
   6
   7 Echo_i::Echo_i (CORBA::ORB_ptr o)
   8    : orb_(o)
   9 {
  10 }
  11
  12 // Return a list of strings.
  13 Echo::List *
  14 Echo_i::return_list ()
  15 {
  16   Echo::List_var list;
  17
  18   {
  19     Echo::List *tmp {};
  20     ACE_NEW_RETURN (tmp,
  21                     Echo::List (2),
  22                     {});
  23     list = tmp;
  24   }
  25
  26   list->length (2);
  27
  28   // Just do something to get a 'big' list of strings.
  29   CORBA::Char big[BIG_LENGTH + 1];
  30   for (size_t i = 0; i < BIG_LENGTH; ++i)
  31      big[i] = 'A';
  32   big[BIG_LENGTH] = 0;
  33   list[CORBA::ULong(0)] = CORBA::string_dup(big);
  34   list[CORBA::ULong(1)] = CORBA::string_dup("Hello World");
  35
  36   return list._retn ();
  37 }
  38
  39 Echo::WList *
  40 Echo_i::return_wlist ()
  41 {
  42   Echo::WList_var list;
  43
  44   {
  45     Echo::WList *tmp {};
  46     ACE_NEW_RETURN (tmp,
  47                     Echo::WList (2),
  48                     {});
  49     list = tmp;
  50   }
  51
  52   list->length (2);
  53
  54   // Just do something to get a 'big' list of wide strings.
  55   CORBA::WChar big[BIG_LENGTH + 1];
  56   for (size_t i = 0; i < BIG_LENGTH; ++i)
  57      big[i] = 'A';
  58   big[BIG_LENGTH] = 0;
  59   CORBA::WChar small[17 + 1];
  60   for (size_t i = 0; i < 17; ++i)
  61      small[i] = 'B';
  62   small[17] = 0;
  63   list[CORBA::ULong(0)] = CORBA::wstring_dup(big);
  64   list[CORBA::ULong(1)] = CORBA::wstring_dup(small);
  65
  66   return list._retn ();
  67 }
  68
  69 // Shutdown the server application.
  70
  71 void
  72 Echo_i::shutdown ()
  73 {
  74   ACE_DEBUG ((LM_DEBUG,
  75               ACE_TEXT ("\nThe echo server is shutting down\n")));
  76
  77   // Instruct the ORB to shutdown.
  78   this->orb_->shutdown ();
  79 }