TAO/tao/CORBA_String.cpp

   1 #include "tao/CORBA_String.h"
   2 #include "tao/String_Manager_T.h"
   3
   4 #include "ace/OS_NS_string.h"
   5 #include "ace/OS_NS_wchar.h"
   6 #include "ace/OS_Memory.h"
   7
   8 // FUZZ: disable check_for_streams_include
   9 #include "ace/streams.h"
  10
  11 #if !defined (__ACE_INLINE__)
  12 # include "tao/CORBA_String.inl"
  13 #endif /* ! __ACE_INLINE__ */
  14
  15 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  16
  17 // *************************************************************
  18 // C++ iostream operators for (W)String_var and (W)String_out
  19 // *************************************************************
  20
  21 #if !defined (ACE_LACKS_IOSTREAM_TOTALLY)
  22
  23 ostream &
  24 operator<< (ostream &os, const CORBA::String_var &sv)
  25 {
  26   os << sv.in ();
  27   return os;
  28 }
  29
  30 istream &
  31 operator>> (istream &is, CORBA::String_var &sv)
  32 {
  33   is.seekg (0, ios::end);
  34   std::streamsize const n = is.tellg ();
  35   sv = CORBA::string_alloc (static_cast<CORBA::ULong> (n));
  36   is.seekg (0, ios::beg);
  37   is.read (sv.inout (), n);
  38   return is;
  39 }
  40
  41 ostream &
  42 operator<< (ostream &os, CORBA::String_out &so)
  43 {
  44   os << so.ptr ();
  45   return os;
  46 }
  47
  48 istream &
  49 operator>> (istream &is, CORBA::String_out &so)
  50 {
  51   is.seekg (0, ios::end);
  52   std::streamsize const n = is.tellg ();
  53   so = CORBA::string_alloc (static_cast<CORBA::ULong> (n));
  54   is.seekg (0, ios::beg);
  55   is.read (so.ptr (), n);
  56   return is;
  57 }
  58
  59 #ifndef ACE_HAS_CPP20
  60
  61 // Until we implement WString support for platforms with a
  62 // 4-byte wchar_t, we just define the following to emit
  63 // the CORBA::WChars one by one.
  64
  65 ostream &
  66 operator<< (ostream &os, const CORBA::WString_var &wsv)
  67 {
  68   CORBA::ULong const len =
  69     static_cast <CORBA::ULong> (ACE_OS::strlen (wsv.in ()));
  70
  71   for (CORBA::ULong i = 0; i < len; ++i)
  72     {
  73       os << wsv[i];
  74     }
  75
  76   return os;
  77 }
  78
  79 istream &
  80 operator>> (istream &is, CORBA::WString_var &wsv)
  81 {
  82   is.seekg (0, ios::end);
  83   // @@ is.tellg()/sizeof(CORBA::WChar) instead?
  84   CORBA::ULong const len = static_cast<CORBA::ULong> (is.tellg ());
  85   wsv = CORBA::wstring_alloc (len);
  86   is.seekg (0, ios::beg);
  87
  88   for (CORBA::ULong i = 0; i < len; ++i)
  89     {
  90       CORBA::WChar wc = 0;
  91
  92       // Unformatted input is used to work around overloaded
  93       // extraction operator (>>) ambiguities on some platforms.
  94       is.read (reinterpret_cast<char *> (&wc), sizeof (wc));
  95
  96       wsv[i] = wc;
  97     }
  98
  99   wsv[len] = 0;  // NULL terminate
 100
 101   return is;
 102 }
 103
 104 ostream &
 105 operator<< (ostream &os, CORBA::WString_out &wso)
 106 {
 107   CORBA::WChar *tmp = wso.ptr ();
 108   const size_t len = ACE_OS::strlen (tmp);
 109
 110   for (size_t i = 0; i < len; ++i)
 111     {
 112       os << tmp[i];
 113     }
 114
 115   return os;
 116 }
 117
 118 istream &
 119 operator>> (istream &is, CORBA::WString_out &wso)
 120 {
 121   is.seekg (0, ios::end);
 122   // @@ is.tellg()/sizeof(CORBA::WChar) instead?
 123   const CORBA::ULong len = static_cast<CORBA::ULong> (is.tellg ());
 124   wso = CORBA::wstring_alloc (len);
 125   is.seekg (0, ios::beg);
 126
 127   for (CORBA::ULong i = 0; i < len; ++i)
 128     {
 129       CORBA::WChar wc = 0;
 130
 131       // Unformatted input is used to work around overloaded
 132       // extraction operator (>>) ambiguities on some platforms.
 133       is.read (reinterpret_cast<char *> (&wc), sizeof (wc));
 134
 135       wso.ptr ()[i] = wc;
 136     }
 137
 138   wso.ptr ()[len] = 0;  // NULL terminate
 139
 140   return is;
 141 }
 142
 143 #endif /* ACE_HAS_CPP20 */
 144
 145 #endif /* ACE_LACKS_IOSTREAM_TOTALLY */
 146
 147 TAO_END_VERSIONED_NAMESPACE_DECL