191041Sobrien// { dg-require-namedlocale "" }
2
3// 2001-08-27 Benjamin Kosnik  <bkoz@redhat.com>
4
5// Copyright (C) 2001, 2002, 2003, 2004, 2005 Free Software Foundation
6//
7// This file is part of the GNU ISO C++ Library.  This library is free
8// software; you can redistribute it and/or modify it under the
9// terms of the GNU General Public License as published by the
10// Free Software Foundation; either version 2, or (at your option)
11// any later version.
12
13// This library is distributed in the hope that it will be useful,
14// but WITHOUT ANY WARRANTY; without even the implied warranty of
15// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16// GNU General Public License for more details.
17
18// You should have received a copy of the GNU General Public License along
19// with this library; see the file COPYING.  If not, write to the Free
20// Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
21// USA.
22
23// 22.2.6.2.1 money_put members
24
25#include <locale>
26#include <sstream>
27#include <testsuite_hooks.h>
28
29// test string version
30void test02()
31{
32  using namespace std;
33  typedef ostreambuf_iterator<char> iterator_type;
34
35  bool test __attribute__((unused)) = true;
36
37  // basic construction
38  locale loc_c = locale::classic();
39  locale loc_hk = locale("en_HK");
40  VERIFY( loc_c != loc_hk );
41
42  // sanity check the data is correct.
43  const string empty;
44
45  // total EPA budget FY 2002
46  const string digits1("720000000000");
47
48  // est. cost, national missile "defense", expressed as a loss in USD 2001
49  const string digits2("-10000000000000");
50
51  // not valid input
52  const string digits3("-A");
53
54  // input less than frac_digits
55  const string digits4("-1");
56
57  // cache the money_put facet
58  ostringstream oss;
59  oss.imbue(loc_hk);
60  const money_put<char>& mon_put = use_facet<money_put<char> >(oss.getloc());
61
62  // now try with showbase, to get currency symbol in format
63  oss.setf(ios_base::showbase);
64
65  // test sign of more than one digit, say hong kong.
66  oss.str(empty);
67  iterator_type os_it05 = mon_put.put(oss.rdbuf(), false, oss, ' ', digits1);
68  string result5 = oss.str();
69  VERIFY( result5 == "HK$7,200,000,000.00");
70
71  oss.str(empty);
72  iterator_type os_it06 = mon_put.put(oss.rdbuf(), true, oss, ' ', digits2);
73  string result6 = oss.str();
74  VERIFY( result6 == "(HKD 100,000,000,000.00)");
75
76  // test one-digit formats without zero padding
77  oss.imbue(loc_c);
78  oss.str(empty);
79  const money_put<char>& mon_put2 = use_facet<money_put<char> >(oss.getloc());
80  iterator_type os_it07 = mon_put2.put(oss.rdbuf(), true, oss, ' ', digits4);
81  string result7 = oss.str();
82  VERIFY( result7 == "1");
83
84  // test one-digit formats with zero padding, zero frac widths
85  oss.imbue(loc_hk);
86  oss.str(empty);
87  const money_put<char>& mon_put3 = use_facet<money_put<char> >(oss.getloc());
88  iterator_type os_it08 = mon_put3.put(oss.rdbuf(), true, oss, ' ', digits4);
89  string result8 = oss.str();
90  VERIFY( result8 == "(HKD .01)");
91
92  oss.unsetf(ios_base::showbase);
93
94  // test bunk input
95  oss.str(empty);
96  iterator_type os_it09 = mon_put.put(oss.rdbuf(), true, oss, ' ', digits3);
97  string result9 = oss.str();
98  VERIFY( result9 == "");
99}
100
101int main()
102{
103  test02();
104  return 0;
105}
106