ACE/ace/ace_wchar.inl

   1 // -*- C++ -*-
   2 // These are always inlined
   3 // FUZZ: disable check_for_inline
   4
   5 #if defined (ACE_HAS_WCHAR)
   6
   7 #if !defined (ACE_WIN32)
   8 #  include /**/ <string.h>             // Need to see strlen()
   9 #endif /* ACE_WIN32 */
  10
  11 ACE_BEGIN_VERSIONED_NAMESPACE_DECL
  12
  13 inline
  14 ACE_Wide_To_Ascii::~ACE_Wide_To_Ascii ()
  15 {
  16   delete [] this->s_;
  17 }
  18
  19 inline char *
  20 ACE_Wide_To_Ascii::char_rep ()
  21 {
  22   return this->s_;
  23 }
  24
  25 inline char *
  26 ACE_Wide_To_Ascii::convert (const wchar_t *wstr)
  27 {
  28   // Short circuit null pointer case
  29   if (wstr == 0)
  30     return 0;
  31
  32 # if defined (ACE_WIN32)
  33   UINT const cp = GetACP ();  // Codepage
  34   int const len = ::WideCharToMultiByte (cp,
  35                                          0,
  36                                          wstr,
  37                                          -1,
  38                                          0,
  39                                          0,
  40                                          0,
  41                                          0);
  42 # elif defined (ACE_LACKS_WCSLEN)
  43   const wchar_t * wtemp = wstr;
  44   while ((*wtemp) != 0) // Hopefully the string is null terminated!
  45     ++wtemp;
  46
  47   size_t const len = wtemp - wstr + 1;
  48 # else  /* ACE_WIN32 */
  49   size_t const len = ::wcslen (wstr) + 1;
  50 # endif /* ACE_WIN32 */
  51
  52 #if !defined (ACE_HAS_ICONV)
  53   char *str = new char[len];
  54 #endif
  55
  56 # if defined (ACE_WIN32)
  57   ::WideCharToMultiByte (cp, 0, wstr, -1, str, len, 0, 0);
  58 # elif defined (ACE_VXWORKS)
  59   ::wcstombs (str, wstr, len);
  60 # elif defined (ACE_HAS_ICONV)
  61   wchar_t * wstri = const_cast<wchar_t*> (wstr);
  62   size_t lensi = ACE_MAX_ICONV_BUFFER;
  63   size_t lenwi = len * sizeof(wchar_t);
  64   char buf[ACE_MAX_ICONV_BUFFER];
  65   char *stri = buf;
  66
  67   size_t hr = iconv (ACE_Wide_To_Ascii_iconv_env, (char**)&wstri, &lenwi, &stri, &lensi);
  68   if ((hr==size_t(-1))||(lensi==ACE_MAX_ICONV_BUFFER))
  69     {
  70       char *str=new char[len];
  71       for (size_t i = 0; i < len; i++)
  72         {
  73           wchar_t *t = const_cast <wchar_t *> (wstr);
  74           str[i] = static_cast<char> (*(t + i));
  75         }
  76
  77       return str;
  78     }
  79   char *str = new char[ACE_MAX_ICONV_BUFFER-lensi];
  80   ::memcpy(str, buf, ACE_MAX_ICONV_BUFFER-lensi);
  81 # else /* ACE_HAS_ICONV */
  82   for (size_t i = 0; i < len; ++i)
  83     {
  84       wchar_t *t = const_cast <wchar_t *> (wstr);
  85       str[i] = static_cast<char> (*(t + i));
  86     }
  87 # endif /* ACE_WIN32 */
  88   return str;
  89 }
  90
  91 inline
  92 ACE_Wide_To_Ascii::ACE_Wide_To_Ascii (const wchar_t *s)
  93 {
  94 #if defined(ACE_HAS_ICONV)
  95   if (ACE_Wide_To_Ascii_iconv_env == 0)
  96     {
  97       ACE_Wide_To_Ascii_iconv_env = iconv_open("", "WCHAR_T");
  98     }
  99 #endif
 100   s_ = ACE_Wide_To_Ascii::convert (s);
 101 }
 102
 103 inline
 104 ACE_Ascii_To_Wide::~ACE_Ascii_To_Wide ()
 105 {
 106   delete [] this->s_;
 107 }
 108
 109 inline wchar_t *
 110 ACE_Ascii_To_Wide::wchar_rep ()
 111 {
 112   return this->s_;
 113 }
 114
 115 inline wchar_t *
 116 ACE_Ascii_To_Wide::convert (const char *str)
 117 {
 118   // Short circuit null pointer case
 119   if (!str)
 120     return nullptr;
 121
 122 # if defined (ACE_WIN32)
 123   UINT const cp = GetACP ();  // Codepage
 124   int const len = ::MultiByteToWideChar (cp, 0, str, -1, 0, 0);
 125 # else /* ACE_WIN32 */
 126   size_t const len = strlen (str) + 1;
 127 # endif /* ACE_WIN32 */
 128
 129 #if !defined (ACE_HAS_ICONV)
 130   wchar_t *wstr = new wchar_t[len];
 131 #endif
 132
 133 # if defined (ACE_WIN32)
 134   ::MultiByteToWideChar (cp, 0, str, -1, wstr, len);
 135 # elif defined (ACE_VXWORKS)
 136   ::mbstowcs (wstr, str, len);
 137 # elif defined (ACE_HAS_ICONV) /* ACE_VXWORKS */
 138   char *stri = const_cast<char*>(str);
 139   size_t lensi = len;
 140   size_t lenwi = ACE_MAX_ICONV_BUFFER;
 141   wchar_t buf[ACE_MAX_ICONV_BUFFER/sizeof(wchar_t)];
 142   wchar_t *wstri=buf;
 143
 144   size_t hr=iconv(ACE_Ascii_To_Wide_iconv_env, &stri, &lensi, (char**)&wstri, &lenwi);
 145   if((hr==size_t(-1))||(lenwi==ACE_MAX_ICONV_BUFFER)){
 146   wchar_t *wstr=new wchar_t[len*sizeof(wchar_t)];
 147   for (size_t i = 0; i < len; i++){
 148     char *t = const_cast<char *> (str);
 149     wstr[i] = static_cast<wchar_t> (*((unsigned char*)t + i));
 150   }
 151
 152   return wstr;
 153   }
 154   wchar_t *wstr=new wchar_t[(ACE_MAX_ICONV_BUFFER-lenwi)/sizeof(wchar_t)];
 155   ::memcpy(wstr,buf,ACE_MAX_ICONV_BUFFER-lenwi);
 156 # else /* ACE_HAS_ICONV */
 157   for (size_t i = 0; i < len; ++i)
 158     {
 159       char *t = const_cast<char *> (str);
 160       wstr[i] = static_cast<wchar_t> (*((unsigned char*)(t + i)));
 161     }
 162 # endif /* ACE_WIN32 */
 163   return wstr;
 164 }
 165
 166 inline
 167 ACE_Ascii_To_Wide::ACE_Ascii_To_Wide (const char *s)
 168 {
 169 #if defined(ACE_HAS_ICONV)
 170   if (ACE_Ascii_To_Wide_iconv_env == 0)
 171     {
 172       ACE_Ascii_To_Wide_iconv_env = iconv_open("WCHAR_T", "");
 173     }
 174 #endif
 175   s_ = ACE_Ascii_To_Wide::convert (s);
 176 }
 177
 178 ACE_END_VERSIONED_NAMESPACE_DECL
 179
 180 #endif /* ACE_HAS_WCHAR */