Subversion Repositories scarts

// { dg-require-namedlocale "" }

// 2003-02-06  Petur Runolfsson  <peturr02@ru.is>

// Copyright (C) 2003, 2005 Free Software Foundation

//

// This file is part of the GNU ISO C++ Library.  This library is free

// software; you can redistribute it and/or modify it under the

// terms of the GNU General Public License as published by the

// Free Software Foundation; either version 2, or (at your option)

// any later version.

// This library is distributed in the hope that it will be useful,

// but WITHOUT ANY WARRANTY; without even the implied warranty of

// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

// GNU General Public License for more details.

// You should have received a copy of the GNU General Public License along

// with this library; see the file COPYING.  If not, write to the Free

// Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,

// USA.

// 22.2.1.5 - Template class codecvt [lib.locale.codecvt]

#include <locale>

#include <testsuite_hooks.h>

// Need to explicitly set the state(mbstate_t) to zero.

// How to do this is not specified by the ISO C99 standard, so we

// might need to add some operators to make the intuiative case

// work:

//   w_codecvt::state_type state00;

//   state00 = 0;  

// or, can use this explicit "C" initialization:

//   w_codecvt::state_type state01 = {0, 0};

// .. except Ulrich says: Use memset. Always use memset. Feel the force...

void

zero_state(std::mbstate_t& state)

{ std::memset(&state, 0, sizeof(std::mbstate_t)); }

// Required instantiation

// codecvt<wchar_t, char, mbstate_t>

void test02()

{

  using namespace std;

  typedef codecvt<wchar_t, char, mbstate_t>     w_codecvt;

  typedef codecvt_base::result                  result;

  typedef wchar_t                               int_type;

  typedef char                                  ext_type;

  typedef char_traits<char>                     ext_traits;

  bool test __attribute__((unused)) = true;

  const ext_type*       e_lit =

    "\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf\x10\x11\x12\x13"

    "\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f\x20!\"#$%&"

    "'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`"

    "abcdefghijklmnopqrstuvwxyz{|}~\x7f\x80\x81\x82\x83\x84\x85\x86"

    "\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95"

    "\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0\xa1\xa2\xa3\xa4"

    "\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xad\xae\xaf\xb0\xb1\xb2\xb3"

    "\xb4\xb5\xb6\xb7\xb8\xb9\xba\xbb\xbc\xbd\xbe\xbf\xc0\xc1\xc2"

    "\xc3\xc4\xc5\xc6\xc7\xc8\xc9\xca\xcb\xcc\xcd\xce\xcf\xd0\xd1"

    "\xd2\xd3\xd4\xd5\xd6\xd7\xd8\xd9\xda\xdb\xdc\xdd\xde\xdf\xe0"

    "\xe1\xe2\xe3\xe4\xe5\xe6\xe7\xe8\xe9\xea\xeb\xec\xed\xee\xef"

    "\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9\xfa\xfb\xfc\xfd\xfe"

    "\xff";

  const int_type*       i_lit =

    L"\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf\x10\x11\x12\x13"

    L"\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f\x20!\"#$%&"

    L"'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`"

    L"abcdefghijklmnopqrstuvwxyz{|}~\x7f\x80\x81\x82\x83\x84\x85\x86"

    L"\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95"

    L"\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0\xa1\xa2\xa3\xa4"

    L"\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xad\xae\xaf\xb0\xb1\xb2\xb3"

    L"\xb4\xb5\xb6\xb7\xb8\xb9\xba\xbb\xbc\xbd\xbe\xbf\xc0\xc1\xc2"

    L"\xc3\xc4\xc5\xc6\xc7\xc8\xc9\xca\xcb\xcc\xcd\xce\xcf\xd0\xd1"

    L"\xd2\xd3\xd4\xd5\xd6\xd7\xd8\xd9\xda\xdb\xdc\xdd\xde\xdf\xe0"

    L"\xe1\xe2\xe3\xe4\xe5\xe6\xe7\xe8\xe9\xea\xeb\xec\xed\xee\xef"

    L"\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9\xfa\xfb\xfc\xfd\xfe"

    L"\xff";

  const int_type*       ifrom_next;

  int                   size = strlen(e_lit);

  ext_type*             e_arr = new ext_type[size + 1];

  ext_type*             e_ref = new ext_type[size + 1];

  memset(e_arr, 0xf0, size + 1);

  memset(e_ref, 0xf0, size + 1);

  ext_type*             eto_next;

  locale  loc = locale("en_US.ISO-8859-1");

  locale::global(loc);

  const w_codecvt*      cvt = &use_facet<w_codecvt>(loc);

  // out

  w_codecvt::state_type state02;

  zero_state(state02);

  result r2 = cvt->out(state02, i_lit, i_lit + size, ifrom_next,

                       e_arr, e_arr + size, eto_next);

  VERIFY( r2 == codecvt_base::ok );

  VERIFY( ifrom_next == i_lit + size );

  VERIFY( eto_next == e_arr + size );

  VERIFY( !ext_traits::compare(e_arr, e_lit, size) );

  VERIFY( !ext_traits::compare(eto_next, e_ref, 1) );

  delete [] e_arr;

  delete [] e_ref;

}

int main ()

{

  test02();

  return 0;

}