123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470 |
- // ------------------------------------------------------------------------------
- // format_matrix.cpp : tool to check for regressions between boost format
- // releases and compare format specification handling
- // ------------------------------------------------------------------------------
- // Copyright 2017 - 2019 James E. King, III. Use, modification, and distribution
- // are subject to the Boost Software License, Version 1.0. (See accompanying
- // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
- // See http://www.boost.org/libs/format for library home page
- // ------------------------------------------------------------------------------
- // reference (ISO C99) : http://en.cppreference.com/w/cpp/io/c/fprintf
- // reference (Java) : http://docs.oracle.com/javase/8/docs/api/java/util/Formatter.html
- // reference (Microsoft) : https://docs.microsoft.com/en-us/cpp/c-runtime-library/format-specification-syntax-printf-and-wprintf-functions
- // reference (POSIX 2008): http://pubs.opengroup.org/onlinepubs/9699919799/functions/printf.html
- #include <boost/array.hpp>
- #include <boost/config.hpp>
- #include <boost/cstdint.hpp>
- #include <boost/filesystem/path.hpp>
- #include <boost/format.hpp>
- #include <boost/io/ios_state.hpp>
- #include <boost/predef.h>
- #include <boost/program_options.hpp>
- #include <cerrno>
- #include <climits>
- #include <clocale>
- #if BOOST_COMP_MSVC && BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) >= 19
- #include <corecrt.h> // wint_t
- #endif
- #include <cstdio>
- #include <cstdlib>
- #include <cstring>
- #include <cwchar>
- #include <fstream>
- #include <iomanip>
- #include <iostream>
- #include <math.h>
- #define SNPRINTF snprintf
- #if BOOST_COMP_MSVC && BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) < 19
- #undef SNPRINTF
- #define SNPRINTF _snprintf
- #endif
- namespace fs = boost::filesystem;
- namespace po = boost::program_options;
- using namespace std;
- namespace matrix
- {
- enum interop_datatype
- {
- // special types:
- ID_UNDEF, // undefined behavior according to the spec, so combination is not tested
- ID_NOTSUP, // behavior is not supported and therefore not tested currently
- // boolean type values:
- ID_BOOLF, // false
- ID_BOOLT, // true
- // string type values:
- ID_CHAR, // single signed character
- ID_UCHAR, // single unsigned character
- ID_WCHAR, // single wide character
- ID_STR, // C style string
- ID_WSTR, // C style wide string
- // integer type values:
- ID_ZERO, // zero value
- ID_BYTE, // int8_t
- ID_UBYTE, // uint8_t
- ID_SHORT, // signed short
- ID_USHORT, // unsigned short
- ID_INT, // signed integer
- ID_UINT, // unsigned integer
- ID_LONG, // signed long
- ID_ULONG, // unsigned long
- ID_LLONG, // signed long long
- ID_ULLONG, // unsigned long long
- ID_INTMAX, // intmax_t
- ID_SSIZET, // ssize_t
- ID_SIZET, // size_t
- ID_SPTRDF, // signed ptrdiff_t
- ID_PTRDIF, // ptrdiff_t
- // floating type values:
- ID_INF, // infinity
- ID_NAN, // not a number
- ID_DOUBLE, // double
- ID_NEGDBL, // negative double
- ID_LNGDBL, // long double
- ID_NEGLNG // negative long double
- };
- BOOST_CONSTEXPR const bool g_bf = false;
- BOOST_CONSTEXPR const bool g_bt = true;
- BOOST_CONSTEXPR const uint64_t g_z = 0;
- BOOST_CONSTEXPR const char g_by = 0x60;
- BOOST_CONSTEXPR const unsigned char g_uby = 0xA0;
- BOOST_CONSTEXPR const char g_c = 0x58;
- BOOST_CONSTEXPR const wint_t g_wc = L'X'; // 'X', but wide
- BOOST_CONSTEXPR const char * g_s = " string";
- BOOST_CONSTEXPR const wchar_t * g_ws = L"widestr";
- BOOST_CONSTEXPR const short g_h = numeric_limits<short>::min() + 12345;
- BOOST_CONSTEXPR const unsigned short g_uh = numeric_limits<unsigned short>::max() - 12345;
- BOOST_CONSTEXPR const int g_i = numeric_limits<int>::max() - 12345;
- BOOST_CONSTEXPR const unsigned int g_ui = numeric_limits<unsigned int>::max() - 12345;
- BOOST_CONSTEXPR const long g_l = numeric_limits<long>::max() - 12345;
- BOOST_CONSTEXPR const unsigned long g_ul = numeric_limits<unsigned long>::max() - 12345;
- BOOST_CONSTEXPR const int64_t g_ll = numeric_limits<int64_t>::max() - 12345;
- BOOST_CONSTEXPR const uint64_t g_ull = numeric_limits<uint64_t>::max() - 12345;
- BOOST_CONSTEXPR const intmax_t g_max = numeric_limits<intmax_t>::max() - 12345;
- BOOST_CONSTEXPR const size_t g_sst = numeric_limits<size_t>::min() - 12345;
- BOOST_CONSTEXPR const size_t g_st = numeric_limits<size_t>::max() - 12345;
- BOOST_CONSTEXPR const ptrdiff_t g_pt = numeric_limits<ptrdiff_t>::max() - 12345;
- BOOST_CONSTEXPR const double g_db = 1234567.891234f;
- BOOST_CONSTEXPR const double g_ndb = -1234567.891234f;
- BOOST_CONSTEXPR const long double g_ldb = 6543211234567.891234l;
- BOOST_CONSTEXPR const long double g_nld = -6543211234567.891234l;
- boost::array<const char *, 12> length_modifier = { { "hh", "h", "", "l", "ll", "j", "z", "L", "w", "I", "I32", "I64" } };
- boost::array<const char *, 6> format_flags = { { "", "-", "+", " ", "#", "0" } };
- boost::array<const char *, 6> minimum_width = { { "", "1", "2", "5", "10", "20" } }; // TODO: , "*" } };
- boost::array<const char *, 7> precision = { { "", ".", ".0", ".2", ".5", ".10", ".20" } }; // TODO: , ".*" } };
- struct interop_row
- {
- char conversion_specifier;
- interop_datatype datatype[12];
- };
- // Each row represents a conversion specifier which is indicated in the first column
- // The subsequent columns are argument type specifiers for that conversion specifier
- // The data in the cell is the value to pass into snprintf and format to see what comes out
- interop_row interop_matrix[] = {
- // |----------------------------------- ISO C99 ---------------------------------------| |-------------- Microsoft --------------|
- // spc, hh , h , (none) , l , ll , j , z , L , w , I , I32 , I64
- { 'c', { ID_UNDEF , ID_UNDEF , ID_CHAR , ID_WCHAR , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_WCHAR , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 's', { ID_UNDEF , ID_UNDEF , ID_STR , ID_WSTR , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_WSTR , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'd', { ID_BYTE , ID_SHORT , ID_INT , ID_LONG , ID_LLONG , ID_INTMAX, ID_SSIZET, ID_UNDEF , ID_UNDEF , ID_SPTRDF, ID_INT , ID_LLONG } },
- { 'd', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'd', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'i', { ID_BYTE , ID_SHORT , ID_INT , ID_LONG , ID_LLONG , ID_INTMAX, ID_SSIZET, ID_UNDEF , ID_UNDEF , ID_SPTRDF, ID_INT , ID_LLONG } },
- { 'i', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'i', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'o', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'o', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'x', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'x', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'X', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'X', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'u', { ID_UBYTE , ID_USHORT, ID_UINT , ID_ULONG , ID_ULLONG, ID_INTMAX, ID_SIZET , ID_UNDEF , ID_UNDEF , ID_PTRDIF, ID_UINT , ID_ULLONG} },
- { 'u', { ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_ZERO } },
- { 'f', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'f', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'f', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'f', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'f', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'F', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'F', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'F', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'F', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'F', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'e', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'e', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'e', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'e', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'e', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'E', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'E', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'E', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'E', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'E', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'a', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'a', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'a', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'a', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'a', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'A', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'A', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'A', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'A', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'A', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'g', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'g', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'g', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'g', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'g', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'G', { ID_UNDEF , ID_UNDEF , ID_DOUBLE, ID_DOUBLE, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_LNGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'G', { ID_UNDEF , ID_UNDEF , ID_NEGDBL, ID_NEGDBL, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NEGLNG, ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'G', { ID_UNDEF , ID_UNDEF , ID_INF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_INF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'G', { ID_UNDEF , ID_UNDEF , ID_NAN , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_NAN , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'G', { ID_UNDEF , ID_UNDEF , ID_ZERO , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_ZERO , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- // boolalpha - not supported in snprintf per ISO C99 but is by boost::format so...
- { 'b', { ID_UNDEF , ID_UNDEF , ID_BOOLF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- { 'b', { ID_UNDEF , ID_UNDEF , ID_BOOLT , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- // this is the terminator for conversion specifier loops:
- { 0 , { ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF , ID_UNDEF } },
- };
- std::string call_snprintf(const std::string& fmtStr, interop_datatype type)
- {
- // enough space to hold any value in this test
- char buf[BUFSIZ];
- int len = 0;
- switch (type)
- {
- case ID_ZERO: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_z ); break;
- case ID_BOOLF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_bf ); break;
- case ID_BOOLT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_bt ); break;
- case ID_BYTE: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_by ); break;
- case ID_UBYTE: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_uby); break;
- case ID_CHAR: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_c ); break;
- case ID_WCHAR: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_wc ); break;
- case ID_STR: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_s ); break;
- case ID_WSTR: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ws ); break;
- case ID_SHORT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_h ); break;
- case ID_USHORT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_uh ); break;
- case ID_INT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_i ); break;
- case ID_UINT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ui ); break;
- case ID_LONG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_l ); break;
- case ID_ULONG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ul ); break;
- case ID_LLONG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ll ); break;
- case ID_ULLONG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ull); break;
- case ID_INTMAX: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_max); break;
- case ID_SSIZET: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_sst); break;
- case ID_SIZET: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_st ); break;
- case ID_SPTRDF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_pt ); break;
- case ID_PTRDIF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_pt ); break;
- #if defined(INFINITY)
- case ID_INF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), INFINITY); break;
- #endif
- #if defined(NAN)
- case ID_NAN: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), NAN); break;
- #endif
- case ID_DOUBLE: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_db ); break;
- case ID_NEGDBL: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ndb); break;
- case ID_LNGDBL: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ldb); break;
- case ID_NEGLNG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_nld); break;
- default: throw logic_error("unhandled type in call_snprintf");
- }
- if (len < 0)
- {
- throw logic_error("snprintf length 0");
- }
- return std::string(buf, len);
- }
- std::string call_format(const std::string& fmtStr, interop_datatype type)
- {
- switch (type)
- {
- case ID_ZERO: return ::boost::str(::boost::format(fmtStr) % g_z );
- case ID_BOOLF: return ::boost::str(::boost::format(fmtStr) % g_bf );
- case ID_BOOLT: return ::boost::str(::boost::format(fmtStr) % g_bt );
- case ID_BYTE: return ::boost::str(::boost::format(fmtStr) % g_by );
- case ID_UBYTE: return ::boost::str(::boost::format(fmtStr) % g_uby);
- case ID_CHAR: return ::boost::str(::boost::format(fmtStr) % g_c );
- case ID_WCHAR: return ::boost::str(::boost::format(fmtStr) % g_wc );
- case ID_STR: return ::boost::str(::boost::format(fmtStr) % g_s );
- case ID_WSTR: return ::boost::str(::boost::format(fmtStr) % g_ws );
- case ID_SHORT: return ::boost::str(::boost::format(fmtStr) % g_h );
- case ID_USHORT: return ::boost::str(::boost::format(fmtStr) % g_uh );
- case ID_INT: return ::boost::str(::boost::format(fmtStr) % g_i );
- case ID_UINT: return ::boost::str(::boost::format(fmtStr) % g_ui );
- case ID_LONG: return ::boost::str(::boost::format(fmtStr) % g_l );
- case ID_ULONG: return ::boost::str(::boost::format(fmtStr) % g_ul );
- case ID_LLONG: return ::boost::str(::boost::format(fmtStr) % g_ll );
- case ID_ULLONG: return ::boost::str(::boost::format(fmtStr) % g_ull);
- case ID_INTMAX: return ::boost::str(::boost::format(fmtStr) % g_max);
- case ID_SSIZET: return ::boost::str(::boost::format(fmtStr) % g_sst);
- case ID_SIZET: return ::boost::str(::boost::format(fmtStr) % g_st );
- case ID_SPTRDF: return ::boost::str(::boost::format(fmtStr) % g_pt );
- case ID_PTRDIF: return ::boost::str(::boost::format(fmtStr) % g_pt );
- #if defined(INFINITY)
- case ID_INF: return ::boost::str(::boost::format(fmtStr) % INFINITY);
- #endif
- #if defined(NAN)
- case ID_NAN: return ::boost::str(::boost::format(fmtStr) % NAN);
- #endif
- case ID_DOUBLE: return ::boost::str(::boost::format(fmtStr) % g_db );
- case ID_NEGDBL: return ::boost::str(::boost::format(fmtStr) % g_ndb);
- case ID_LNGDBL: return ::boost::str(::boost::format(fmtStr) % g_ldb);
- case ID_NEGLNG: return ::boost::str(::boost::format(fmtStr) % g_nld);
- default: throw logic_error("unhandled type in call_format");
- }
- }
- po::variables_map g_args;
- ofstream g_os;
- void
- write_header()
- {
- if (g_args.count("snprintf"))
- {
- #if BOOST_LIB_C_GNU
- g_os << "# glibc.version = " << BOOST_VERSION_NUMBER_MAJOR(BOOST_LIB_C_GNU) << "."
- << BOOST_VERSION_NUMBER_MINOR(BOOST_LIB_C_GNU) << "."
- << BOOST_VERSION_NUMBER_PATCH(BOOST_LIB_C_GNU)
- << endl;
- #elif BOOST_COMP_MSVC
- g_os << "# msvc.version = " << BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) << "."
- << BOOST_VERSION_NUMBER_MINOR(BOOST_COMP_MSVC) << "."
- << BOOST_VERSION_NUMBER_PATCH(BOOST_COMP_MSVC)
- << endl;
- #else
- g_os << "# libc.version = unknown" << endl;
- #endif
- }
- else
- {
- g_os << "# boost.version = " << BOOST_VERSION / 100000 << "." // major version
- << BOOST_VERSION / 100 % 1000 << "." // minor version
- << BOOST_VERSION % 100 // patch level
- << endl;
- }
- }
- void
- log(const std::string& spec, bool ok, const std::string& result)
- {
- boost::io::ios_all_saver saver(g_os);
- g_os << setw(20) << right << spec << "\t"
- << (ok ? "OK " : "ERR") << "\t" << "\"" << result << "\"" << endl;
- }
- void cell(std::size_t nrow, std::size_t ncol)
- {
- const interop_row& row(interop_matrix[nrow]);
- const interop_datatype& dataType(row.datatype[ncol]);
- if (dataType == ID_UNDEF || dataType == ID_NOTSUP)
- {
- return;
- }
- #if !defined(INFINITY)
- if (dataType == ID_INF)
- {
- return;
- }
- #endif
- #if !defined(NAN)
- if (dataType == ID_NAN)
- {
- return;
- }
- #endif
- // TODO: every combination of format flags - right now we do only one
- for (std::size_t ffi = 0; ffi < format_flags.size(); ++ffi)
- {
- for (std::size_t mwi = 0; mwi < minimum_width.size(); ++mwi)
- {
- for (std::size_t pri = 0; pri < precision.size(); ++pri)
- {
- // Make the format string
- std::stringstream fss;
- fss << '%';
- fss << format_flags[ffi];
- fss << minimum_width[mwi];
- fss << precision[pri];
- fss << length_modifier[ncol];
- fss << row.conversion_specifier;
- std::string fmtStr = fss.str();
- try
- {
- std::string result = g_args.count("snprintf") ?
- call_snprintf(fmtStr, dataType) :
- call_format (fmtStr, dataType) ;
- log(fmtStr, true, result);
- }
- catch (const std::exception& ex)
- {
- log(fmtStr, false, ex.what());
- }
- }
- }
- }
- }
- void
- matrix()
- {
- for (std::size_t row = 0; interop_matrix[row].conversion_specifier != 0x00; ++row)
- {
- for (std::size_t col = 0; col < length_modifier.size(); ++col)
- {
- cell(row, col);
- }
- }
- }
- void
- write_pctpct()
- {
- if (g_args.count("snprintf"))
- {
- char buf[BUFSIZ];
- int len = SNPRINTF(buf, BUFSIZ, "%%");
- log("%%", len == 1, len == 1 ? buf : "snprintf length != 1");
- }
- else
- {
- try
- {
- log("%%", true, ::boost::format("%%").str());
- }
- catch (std::exception& ex)
- {
- log("%%", false, ex.what());
- }
- }
- }
- void
- generate()
- {
- string genpath = g_args["generate"].as<string>();
- g_os.open(genpath.c_str(), ios::out | ios::trunc);
- write_header();
- write_pctpct();
- matrix();
- g_os.close();
- }
- } // matrix
- ///////////////////////////////////////////////////////////////////////////////
- // main entry point
- int
- main(int argc, char *argv[])
- {
- using matrix::g_args;
- po::options_description desc("Allowed options");
- desc.add_options()
- ("generate,g", po::value<string>()->required(), "generate output filename")
- ("help,h", "produce help message")
- ("snprintf,s", "use snprintf instead of boost::format")
- ;
- po::store(po::command_line_parser(argc, argv).options(desc).run(), g_args);
- po::notify(g_args);
- if (g_args.count("help")) {
- cout << "Usage: format_matrix [options]\n";
- cout << desc;
- return 0;
- }
- matrix::generate();
- return 0;
- }
|