first commit
This commit is contained in:
Jose Caban
485
extern/stdcxx/4.2.1/tests/localization/22.locale.moneypunct.mt.cpp
vendored
Normal file
485
extern/stdcxx/4.2.1/tests/localization/22.locale.moneypunct.mt.cpp
vendored
Normal file
@@ -0,0 +1,485 @@
|
||||
/************************************************************************
|
||||
*
|
||||
* 22.locale.moneypunct.mt.cpp
|
||||
*
|
||||
* test exercising the thread safety of the moneypunct facet
|
||||
*
|
||||
* $Id: 22.locale.moneypunct.mt.cpp 648752 2008-04-16 17:01:56Z faridz $
|
||||
*
|
||||
***************************************************************************
|
||||
*
|
||||
* Licensed to the Apache Software Foundation (ASF) under one or more
|
||||
* contributor license agreements. See the NOTICE file distributed
|
||||
* with this work for additional information regarding copyright
|
||||
* ownership. The ASF licenses this file to you under the Apache
|
||||
* License, Version 2.0 (the "License"); you may not use this file
|
||||
* except in compliance with the License. You may obtain a copy of
|
||||
* the License at
|
||||
*
|
||||
* http://www.apache.org/licenses/LICENSE-2.0
|
||||
*
|
||||
* Unless required by applicable law or agreed to in writing, software
|
||||
* distributed under the License is distributed on an "AS IS" BASIS,
|
||||
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
|
||||
* implied. See the License for the specific language governing
|
||||
* permissions and limitations under the License.
|
||||
*
|
||||
**************************************************************************/
|
||||
|
||||
#include <ios> // for ios
|
||||
#include <locale> // for locale, moneypunct
|
||||
|
||||
#include <cstdlib> // for mbstowcs(), size_t
|
||||
#include <cstring> // for strcpy()
|
||||
|
||||
#include <rw_locale.h>
|
||||
#include <rw_thread.h>
|
||||
#include <driver.h>
|
||||
#include <valcmp.h>
|
||||
|
||||
|
||||
// maximum number of threads allowed by the command line interface
|
||||
#define MAX_THREADS 32
|
||||
|
||||
// default number of threads (will be adjusted to the number
|
||||
// of processors/cores later)
|
||||
int rw_opt_nthreads = 1;
|
||||
|
||||
// the default number of times for each thread to iterate
|
||||
#define DFLT_LOOPS 10000
|
||||
|
||||
// the number of times each thread should iterate (will be set to
|
||||
// DFLT_LOOPS unless explicitly specified on the command line)
|
||||
int rw_opt_nloops = -1;
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
// number of locales to test
|
||||
static std::size_t
|
||||
nlocales;
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
struct MoneypunctData
|
||||
{
|
||||
// the name of the locale the data goes with
|
||||
const char* locale_name_;
|
||||
|
||||
char decimal_point_;
|
||||
char thousands_sep_;
|
||||
char grouping_ [32];
|
||||
char curr_symbol_ [32];
|
||||
char positive_sign_ [32];
|
||||
char negative_sign_ [32];
|
||||
int frac_digits_;
|
||||
char pos_format_ [32];
|
||||
char neg_format_ [32];
|
||||
|
||||
char int_curr_symbol_ [32];
|
||||
|
||||
int int_frac_digits_;
|
||||
char int_pos_format_ [32];
|
||||
char int_neg_format_ [32];
|
||||
|
||||
#ifndef _RWSTD_NO_WCHAR_T
|
||||
|
||||
wchar_t wdecimal_point_;
|
||||
wchar_t wthousands_sep_;
|
||||
wchar_t wcurr_symbol_ [32];
|
||||
wchar_t wpositive_sign_ [32];
|
||||
wchar_t wnegative_sign_ [32];
|
||||
|
||||
wchar_t wint_curr_symbol_ [32];
|
||||
|
||||
#endif // _RWSTD_NO_WCHAR_T
|
||||
|
||||
} punct_data [MAX_THREADS];
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
bool test_char; // exercise num_put<char>
|
||||
bool test_wchar; // exercise num_put<wchar_t>
|
||||
|
||||
static void
|
||||
thread_loop_body (std::size_t i)
|
||||
{
|
||||
const std::size_t inx = std::size_t (i) % (nlocales ? nlocales : 1);
|
||||
|
||||
const MoneypunctData* const data = punct_data + inx;
|
||||
|
||||
// construct a named locale
|
||||
const std::locale loc (data->locale_name_);
|
||||
|
||||
if (test_char) {
|
||||
// exercise the narrow char, local specialization of the facet
|
||||
|
||||
typedef std::moneypunct<char, false> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const char dp = mp.decimal_point ();
|
||||
const char ts = mp.thousands_sep ();
|
||||
const std::string grp = mp.grouping ();
|
||||
const std::string cur = mp.curr_symbol ();
|
||||
const std::string pos = mp.positive_sign ();
|
||||
const std::string neg = mp.negative_sign ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
RW_ASSERT (dp == data->decimal_point_);
|
||||
RW_ASSERT (ts == data->thousands_sep_);
|
||||
RW_ASSERT (fd == data->frac_digits_);
|
||||
RW_ASSERT (!rw_strncmp (grp.c_str (), data->grouping_));
|
||||
RW_ASSERT (!rw_strncmp (cur.c_str (), data->curr_symbol_));
|
||||
RW_ASSERT (!rw_strncmp (pos.c_str (), data->positive_sign_));
|
||||
RW_ASSERT (!rw_strncmp (neg.c_str (), data->negative_sign_));
|
||||
|
||||
RW_ASSERT (!std::memcmp (&pfm, data->pos_format_, 4));
|
||||
RW_ASSERT (!std::memcmp (&nfm, data->neg_format_, 4));
|
||||
}
|
||||
|
||||
if (test_char) {
|
||||
// exercise the narrow char, international specialization
|
||||
|
||||
typedef std::moneypunct<char, true> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const char dp = mp.decimal_point ();
|
||||
const char ts = mp.thousands_sep ();
|
||||
const std::string grp = mp.grouping ();
|
||||
const std::string cur = mp.curr_symbol ();
|
||||
const std::string pos = mp.positive_sign ();
|
||||
const std::string neg = mp.negative_sign ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
RW_ASSERT (dp == data->decimal_point_);
|
||||
RW_ASSERT (ts == data->thousands_sep_);
|
||||
RW_ASSERT (fd == data->frac_digits_);
|
||||
RW_ASSERT (!rw_strncmp (grp.c_str (), data->grouping_));
|
||||
RW_ASSERT (!rw_strncmp (cur.c_str (), data->int_curr_symbol_));
|
||||
RW_ASSERT (!rw_strncmp (pos.c_str (), data->positive_sign_));
|
||||
RW_ASSERT (!rw_strncmp (neg.c_str (), data->negative_sign_));
|
||||
|
||||
RW_ASSERT (!std::memcmp (&pfm, data->int_pos_format_, 4));
|
||||
RW_ASSERT (!std::memcmp (&nfm, data->int_neg_format_, 4));
|
||||
}
|
||||
|
||||
// both specializations may be tested at the same time
|
||||
|
||||
#ifndef _RWSTD_NO_WCHAR_T
|
||||
|
||||
if (test_wchar) {
|
||||
// exercise the wide char, local specialization of the facet
|
||||
|
||||
typedef std::moneypunct<wchar_t, false> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const wchar_t dp = mp.decimal_point ();
|
||||
const wchar_t ts = mp.thousands_sep ();
|
||||
const std::string grp = mp.grouping ();
|
||||
const std::wstring cur = mp.curr_symbol ();
|
||||
const std::wstring pos = mp.positive_sign ();
|
||||
const std::wstring neg = mp.negative_sign ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
RW_ASSERT (dp == data->wdecimal_point_);
|
||||
RW_ASSERT (ts == data->wthousands_sep_);
|
||||
RW_ASSERT (fd == data->frac_digits_);
|
||||
RW_ASSERT (!rw_strncmp (grp.c_str (), data->grouping_));
|
||||
RW_ASSERT (!rw_strncmp (cur.c_str (), data->wcurr_symbol_));
|
||||
RW_ASSERT (!rw_strncmp (pos.c_str (), data->wpositive_sign_));
|
||||
RW_ASSERT (!rw_strncmp (neg.c_str (), data->wnegative_sign_));
|
||||
|
||||
RW_ASSERT (!std::memcmp (&pfm, data->pos_format_, 4));
|
||||
RW_ASSERT (!std::memcmp (&nfm, data->neg_format_, 4));
|
||||
}
|
||||
|
||||
if (test_wchar) {
|
||||
// exercise the wide char, international specialization
|
||||
|
||||
typedef std::moneypunct<wchar_t, true> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const wchar_t dp = mp.decimal_point ();
|
||||
const wchar_t ts = mp.thousands_sep ();
|
||||
const std::string grp = mp.grouping ();
|
||||
const std::wstring cur = mp.curr_symbol ();
|
||||
const std::wstring pos = mp.positive_sign ();
|
||||
const std::wstring neg = mp.negative_sign ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
RW_ASSERT (dp == data->wdecimal_point_);
|
||||
RW_ASSERT (ts == data->wthousands_sep_);
|
||||
RW_ASSERT (fd == data->frac_digits_);
|
||||
RW_ASSERT (!rw_strncmp (grp.c_str (), data->grouping_));
|
||||
RW_ASSERT (!rw_strncmp (cur.c_str (), data->wint_curr_symbol_));
|
||||
RW_ASSERT (!rw_strncmp (pos.c_str (), data->wpositive_sign_));
|
||||
RW_ASSERT (!rw_strncmp (neg.c_str (), data->wnegative_sign_));
|
||||
|
||||
RW_ASSERT (!std::memcmp (&pfm, data->int_pos_format_, 4));
|
||||
RW_ASSERT (!std::memcmp (&nfm, data->int_neg_format_, 4));
|
||||
}
|
||||
|
||||
#endif // _RWSTD_NO_WCHAR_T
|
||||
|
||||
}
|
||||
|
||||
|
||||
extern "C" {
|
||||
|
||||
static void*
|
||||
thread_func (void*)
|
||||
{
|
||||
for (int i = 0; i != rw_opt_nloops; ++i) {
|
||||
|
||||
thread_loop_body (std::size_t (i));
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
} // extern "C"
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
static int
|
||||
run_test (int, char**)
|
||||
{
|
||||
// find all installed locales for which setlocale(LC_ALL) succeeds
|
||||
const char* const locale_list =
|
||||
rw_opt_locales ? rw_opt_locales : rw_locales (_RWSTD_LC_ALL);
|
||||
|
||||
// array of locale names to use for testing
|
||||
const char* locales [sizeof punct_data / sizeof *punct_data];
|
||||
|
||||
const std::size_t maxinx = sizeof locales / sizeof *locales;
|
||||
|
||||
// iterate over locales, initializing a global punct_data array
|
||||
for (const char *name = locale_list; *name; name += std::strlen (name) +1) {
|
||||
|
||||
std::locale loc;
|
||||
|
||||
MoneypunctData* const pdata = punct_data + nlocales;
|
||||
|
||||
pdata->locale_name_ = name;
|
||||
locales [nlocales] = name;
|
||||
|
||||
try {
|
||||
loc = std::locale (name);
|
||||
|
||||
typedef std::moneypunct<char, false> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const char dp = mp.decimal_point ();
|
||||
const char ts = mp.thousands_sep ();
|
||||
const std::string grp = mp.grouping ();
|
||||
const std::string cur = mp.curr_symbol ();
|
||||
const std::string pos = mp.positive_sign ();
|
||||
const std::string neg = mp.negative_sign ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
pdata->decimal_point_ = dp;
|
||||
pdata->thousands_sep_ = ts;
|
||||
pdata->frac_digits_ = fd;
|
||||
|
||||
std::strcpy (pdata->grouping_, grp.c_str ());
|
||||
std::strcpy (pdata->curr_symbol_, cur.c_str ());
|
||||
std::strcpy (pdata->positive_sign_, pos.c_str ());
|
||||
std::strcpy (pdata->negative_sign_, neg.c_str ());
|
||||
std::memcpy (pdata->pos_format_, &pfm, sizeof pfm);
|
||||
std::memcpy (pdata->neg_format_, &nfm, sizeof nfm);
|
||||
}
|
||||
catch (...) {
|
||||
rw_warn (0, 0, __LINE__,
|
||||
"std::locale(%#s) threw an exception, skipping", name);
|
||||
continue;
|
||||
}
|
||||
|
||||
try {
|
||||
typedef std::moneypunct<char, true> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const std::string cur = mp.curr_symbol ();
|
||||
const int fd = mp.frac_digits ();
|
||||
const Punct::pattern pfm = mp.pos_format ();
|
||||
const Punct::pattern nfm = mp.neg_format ();
|
||||
|
||||
pdata->int_frac_digits_ = fd;
|
||||
|
||||
std::strcpy (pdata->int_curr_symbol_, cur.c_str ());
|
||||
std::memcpy (pdata->int_pos_format_, &pfm, sizeof pfm);
|
||||
std::memcpy (pdata->int_neg_format_, &nfm, sizeof nfm);
|
||||
}
|
||||
catch (...) {
|
||||
rw_warn (0, 0, __LINE__,
|
||||
"std::locale(%#s) threw an exception, skipping", name);
|
||||
continue;
|
||||
}
|
||||
|
||||
#ifndef _RWSTD_NO_WCHAR_T
|
||||
|
||||
try {
|
||||
typedef std::moneypunct<wchar_t, false> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const wchar_t dp = mp.decimal_point ();
|
||||
const wchar_t ts = mp.thousands_sep ();
|
||||
const std::wstring cur = mp.curr_symbol ();
|
||||
const std::wstring pos = mp.positive_sign ();
|
||||
const std::wstring neg = mp.negative_sign ();
|
||||
|
||||
pdata->wdecimal_point_ = dp;
|
||||
pdata->wthousands_sep_ = ts;
|
||||
|
||||
typedef std::wstring::traits_type Traits;
|
||||
|
||||
Traits::copy (pdata->wcurr_symbol_, cur.data (), cur.size ());
|
||||
Traits::copy (pdata->wpositive_sign_, pos.data (), pos.size ());
|
||||
Traits::copy (pdata->wnegative_sign_, neg.data (), neg.size ());
|
||||
}
|
||||
catch (...) {
|
||||
rw_warn (0, 0, __LINE__,
|
||||
"std::locale(%#s) threw an exception, skipping", name);
|
||||
continue;
|
||||
}
|
||||
|
||||
try {
|
||||
typedef std::moneypunct<wchar_t, true> Punct;
|
||||
|
||||
const Punct &mp = std::use_facet<Punct>(loc);
|
||||
|
||||
const std::wstring cur = mp.curr_symbol ();
|
||||
const std::wstring pos = mp.positive_sign ();
|
||||
const std::wstring neg = mp.negative_sign ();
|
||||
|
||||
typedef std::wstring::traits_type Traits;
|
||||
|
||||
Traits::copy (pdata->wint_curr_symbol_, cur.data (), cur.size ());
|
||||
}
|
||||
catch (...) {
|
||||
rw_warn (0, 0, __LINE__,
|
||||
"std::locale(%#s) threw an exception, skipping", name);
|
||||
continue;
|
||||
}
|
||||
|
||||
#endif // _RWSTD_NO_WCHAR_T
|
||||
|
||||
++nlocales;
|
||||
|
||||
if (nlocales == maxinx)
|
||||
break;
|
||||
}
|
||||
|
||||
// unless the number of iterations was explicitly specified
|
||||
// on the command line, decrease the number to equal the number
|
||||
// of excericsed locales when only one thread is being tested
|
||||
if (1 == rw_opt_nthreads && rw_opt_nloops < 0)
|
||||
rw_opt_nloops = int (nlocales);
|
||||
|
||||
// when the number of iterations wasn't explicitly specified
|
||||
// on the command line set it to the default value
|
||||
if (rw_opt_nloops < 0)
|
||||
rw_opt_nloops = DFLT_LOOPS;
|
||||
|
||||
rw_fatal (0 < nlocales, 0, __LINE__,
|
||||
"must have at least one valid locale to test");
|
||||
|
||||
rw_info (0, 0, 0,
|
||||
"testing std::moneypunct<charT> with %d thread%{?}s%{;}, "
|
||||
"%d iteration%{?}s%{;} each, in %zu locales { %{ .*A@} }",
|
||||
rw_opt_nthreads, 1 != rw_opt_nthreads,
|
||||
rw_opt_nloops, 1 != rw_opt_nloops,
|
||||
nlocales, int (nlocales), "%#s", locales);
|
||||
|
||||
rw_info (0, 0, 0, "exercising std::moneypunct<char>");
|
||||
|
||||
test_char = true;
|
||||
test_wchar = false;
|
||||
|
||||
// create and start a pool of threads and wait for them to finish
|
||||
int result =
|
||||
rw_thread_pool (0, std::size_t (rw_opt_nthreads), 0, thread_func, 0);
|
||||
|
||||
rw_error (result == 0, 0, __LINE__,
|
||||
"rw_thread_pool(0, %d, 0, %{#f}, 0) failed",
|
||||
rw_opt_nthreads, thread_func);
|
||||
|
||||
#ifndef _RWSTD_NO_WCHAR_T
|
||||
|
||||
rw_info (0, 0, 0, "exercising std::moneypunct<wchar_t>");
|
||||
|
||||
test_char = false;
|
||||
test_wchar = true;
|
||||
|
||||
// start a pool of threads to exercise the thread safety
|
||||
// of the wchar_t specialization
|
||||
result =
|
||||
rw_thread_pool (0, std::size_t (rw_opt_nthreads), 0, thread_func, 0);
|
||||
|
||||
rw_error (result == 0, 0, __LINE__,
|
||||
"rw_thread_pool(0, %d, 0, %{#f}, 0) failed",
|
||||
rw_opt_nthreads, thread_func);
|
||||
|
||||
// exercise both the char and the wchar_t specializations
|
||||
// at the same time
|
||||
|
||||
rw_info (0, 0, 0,
|
||||
"exercising both std::moneypunct<char> "
|
||||
"and std::moneypunct<wchar_t>");
|
||||
|
||||
test_char = true;
|
||||
test_wchar = true;
|
||||
|
||||
// start a pool of threads to exercise wstring thread safety
|
||||
result =
|
||||
rw_thread_pool (0, std::size_t (rw_opt_nthreads), 0, thread_func, 0);
|
||||
|
||||
rw_error (result == 0, 0, __LINE__,
|
||||
"rw_thread_pool(0, %d, 0, %{#f}, 0) failed",
|
||||
rw_opt_nthreads, thread_func);
|
||||
|
||||
#endif // _RWSTD_NO_WCHAR_T
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
int main (int argc, char *argv[])
|
||||
{
|
||||
#ifdef _RWSTD_REENTRANT
|
||||
|
||||
// set nthreads to the greater of the number of processors
|
||||
// and 2 (for uniprocessor systems) by default
|
||||
rw_opt_nthreads = rw_get_cpus ();
|
||||
if (rw_opt_nthreads < 2)
|
||||
rw_opt_nthreads = 2;
|
||||
|
||||
#endif // _RWSTD_REENTRANT
|
||||
|
||||
return rw_test (argc, argv, __FILE__,
|
||||
"lib.locale.moneypunct",
|
||||
"thread safety", run_test,
|
||||
"|-nloops#0 " // must be non-negative
|
||||
"|-nthreads#0-* " // must be in [0, MAX_THREADS]
|
||||
"|-locales=", // must be provided
|
||||
&rw_opt_nloops,
|
||||
int (MAX_THREADS),
|
||||
&rw_opt_nthreads,
|
||||
&rw_opt_setlocales);
|
||||
}
|
||||
Reference in New Issue
Block a user