ceph/src/boost/libs/format/tools/format_matrix.cpp

   1 // ------------------------------------------------------------------------------
   2 //  format_matrix.cpp : tool to check for regressions between boost format
   3 //                      releases and compare format specification handling
   4 // ------------------------------------------------------------------------------
   5
   6 //  Copyright 2017 - 2019 James E. King, III. Use, modification, and distribution
   7 //  are subject to the Boost Software License, Version 1.0. (See accompanying
   8 //  file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
   9
  10 //  See http://www.boost.org/libs/format for library home page
  11
  12 // ------------------------------------------------------------------------------
  13 // reference (ISO C99)   : http://en.cppreference.com/w/cpp/io/c/fprintf
  14 // reference (Java)      : http://docs.oracle.com/javase/8/docs/api/java/util/Formatter.html
  15 // reference (Microsoft) : https://docs.microsoft.com/en-us/cpp/c-runtime-library/format-specification-syntax-printf-and-wprintf-functions
  16 // reference (POSIX 2008): http://pubs.opengroup.org/onlinepubs/9699919799/functions/printf.html
  17
  18 #include <boost/array.hpp>
  19 #include <boost/config.hpp>
  20 #include <boost/cstdint.hpp>
  21 #include <boost/filesystem/path.hpp>
  22 #include <boost/format.hpp>
  23 #include <boost/io/ios_state.hpp>
  24 #include <boost/predef.h>
  25 #include <boost/program_options.hpp>
  26 #include <cerrno>
  27 #include <climits>
  28 #include <clocale>
  29 #if BOOST_COMP_MSVC && BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) >= 19
  30 #include <corecrt.h>    // wint_t
  31 #endif
  32 #include <cstdio>
  33 #include <cstdlib>
  34 #include <cstring>
  35 #include <cwchar>
  36 #include <fstream>
  37 #include <iomanip>
  38 #include <iostream>
  39 #include <math.h>
  40
  41 #define SNPRINTF snprintf
  42 #if BOOST_COMP_MSVC && BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) < 19
  43 #undef SNPRINTF
  44 #define SNPRINTF _snprintf
  45 #endif
  46
  47 namespace fs = boost::filesystem;
  48 namespace po = boost::program_options;
  49 using namespace std;
  50
  51 namespace matrix
  52 {
  53
  54 enum interop_datatype
  55 {
  56     // special types:
  57     ID_UNDEF,           // undefined behavior according to the spec, so combination is not tested
  58     ID_NOTSUP,          // behavior is not supported and therefore not tested currently
  59
  60     // boolean type values:
  61     ID_BOOLF,           // false
  62     ID_BOOLT,           // true
  63
  64     // string type values:
  65     ID_CHAR,            // single signed character
  66     ID_UCHAR,           // single unsigned character
  67     ID_WCHAR,           // single wide character
  68     ID_STR,             // C style string
  69     ID_WSTR,            // C style wide string
  70
  71     // integer type values:
  72     ID_ZERO,            // zero value
  73     ID_BYTE,            // int8_t
  74     ID_UBYTE,           // uint8_t
  75     ID_SHORT,           // signed short
  76     ID_USHORT,          // unsigned short
  77     ID_INT,             // signed integer
  78     ID_UINT,            // unsigned integer
  79     ID_LONG,            // signed long
  80     ID_ULONG,           // unsigned long
  81     ID_LLONG,           // signed long long
  82     ID_ULLONG,          // unsigned long long
  83     ID_INTMAX,          // intmax_t
  84     ID_SSIZET,          // ssize_t
  85     ID_SIZET,           // size_t
  86     ID_SPTRDF,          // signed ptrdiff_t
  87     ID_PTRDIF,          // ptrdiff_t
  88
  89     // floating type values:
  90     ID_INF,             // infinity
  91     ID_NAN,             // not a number
  92     ID_DOUBLE,          // double
  93     ID_NEGDBL,          // negative double
  94     ID_LNGDBL,          // long double
  95     ID_NEGLNG           // negative long double
  96 };
  97
  98 BOOST_CONSTEXPR const bool            g_bf  = false;
  99 BOOST_CONSTEXPR const bool            g_bt  = true;
 100 BOOST_CONSTEXPR const uint64_t        g_z   = 0;
 101 BOOST_CONSTEXPR const char            g_by  = 0x60;
 102 BOOST_CONSTEXPR const unsigned char   g_uby = 0xA0;
 103 BOOST_CONSTEXPR const char            g_c   = 0x58;
 104 BOOST_CONSTEXPR const wint_t          g_wc  = L'X';          // 'X', but wide
 105 BOOST_CONSTEXPR const char *          g_s   = " string";
 106 BOOST_CONSTEXPR const wchar_t *       g_ws  = L"widestr";
 107 BOOST_CONSTEXPR const short           g_h   = numeric_limits<short>::min() + 12345;
 108 BOOST_CONSTEXPR const unsigned short  g_uh  = numeric_limits<unsigned short>::max() - 12345;
 109 BOOST_CONSTEXPR const int             g_i   = numeric_limits<int>::max() - 12345;
 110 BOOST_CONSTEXPR const unsigned int    g_ui  = numeric_limits<unsigned int>::max() - 12345;
 111 BOOST_CONSTEXPR const long            g_l   = numeric_limits<long>::max() - 12345;
 112 BOOST_CONSTEXPR const unsigned long   g_ul  = numeric_limits<unsigned long>::max() - 12345;
 113 BOOST_CONSTEXPR const int64_t         g_ll  = numeric_limits<int64_t>::max() - 12345;
 114 BOOST_CONSTEXPR const uint64_t        g_ull = numeric_limits<uint64_t>::max() - 12345;
 115 BOOST_CONSTEXPR const intmax_t        g_max = numeric_limits<intmax_t>::max() - 12345;
 116 BOOST_CONSTEXPR const size_t          g_sst = numeric_limits<size_t>::min() - 12345;
 117 BOOST_CONSTEXPR const size_t          g_st  = numeric_limits<size_t>::max() - 12345;
 118 BOOST_CONSTEXPR const ptrdiff_t       g_pt  = numeric_limits<ptrdiff_t>::max() - 12345;
 119 BOOST_CONSTEXPR const double          g_db  = 1234567.891234f;
 120 BOOST_CONSTEXPR const double          g_ndb = -1234567.891234f;
 121 BOOST_CONSTEXPR const long double     g_ldb = 6543211234567.891234l;
 122 BOOST_CONSTEXPR const long double     g_nld = -6543211234567.891234l;
 123
 124 boost::array<const char *, 12> length_modifier = { { "hh", "h", "", "l", "ll", "j", "z", "L", "w", "I", "I32", "I64" } };
 125 boost::array<const char *, 6>  format_flags    = { { "", "-", "+", " ", "#", "0" } };
 126 boost::array<const char *, 6>  minimum_width   = { { "", "1", "2", "5", "10", "20" } };           // TODO: , "*" } };
 127 boost::array<const char *, 7>  precision       = { { "", ".", ".0", ".2", ".5", ".10", ".20" } }; // TODO: , ".*" } };
 128
 129 struct interop_row
 130 {
 131     char conversion_specifier;
 132     interop_datatype datatype[12];
 133 };
 134
 135 // Each row represents a conversion specifier which is indicated in the first column
 136 // The subsequent columns are argument type specifiers for that conversion specifier
 137 // The data in the cell is the value to pass into snprintf and format to see what comes out
 138
 139 interop_row interop_matrix[] = {
 140     //         |----------------------------------- ISO C99 ---------------------------------------|   |-------------- Microsoft --------------|
 141     //  spc,   hh       , h        , (none)   , l        , ll       , j        , z        , L        , w        , I        , I32      , I64
 142       { '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 } },
 143       { '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 } },
 144
 145       { '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 } },
 146       { '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} },
 147       { '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  } },
 148       { '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 } },
 149       { '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} },
 150       { '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  } },
 151
 152       { '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} },
 153       { '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  } },
 154       { '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} },
 155       { '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  } },
 156       { '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} },
 157       { '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  } },
 158       { '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} },
 159       { '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  } },
 160
 161       { '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 } },
 162       { '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 } },
 163       { '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 } },
 164       { '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 } },
 165       { '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 } },
 166       { '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 } },
 167       { '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 } },
 168       { '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 } },
 169       { '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 } },
 170       { '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 } },
 171       { '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 } },
 172       { '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 } },
 173       { '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 } },
 174       { '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 } },
 175       { '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 } },
 176       { '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 } },
 177       { '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 } },
 178       { '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 } },
 179       { '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 } },
 180       { '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 } },
 181       { '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 } },
 182       { '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 } },
 183       { '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 } },
 184       { '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 } },
 185       { '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 } },
 186       { '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 } },
 187       { '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 } },
 188       { '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 } },
 189       { '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 } },
 190       { '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 } },
 191       { '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 } },
 192       { '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 } },
 193       { '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 } },
 194       { '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 } },
 195       { '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 } },
 196       { '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 } },
 197       { '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 } },
 198       { '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 } },
 199       { '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 } },
 200       { '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 } },
 201
 202     // boolalpha - not supported in snprintf per ISO C99 but is by boost::format so...
 203       { '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 } },
 204       { '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 } },
 205
 206     // this is the terminator for conversion specifier loops:
 207       {  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 } },
 208 };
 209
 210 std::string call_snprintf(const std::string& fmtStr, interop_datatype type)
 211 {
 212     // enough space to hold any value in this test
 213     char buf[BUFSIZ];
 214     int len = 0;
 215
 216     switch (type)
 217     {
 218         case ID_ZERO:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_z  ); break;
 219         case ID_BOOLF:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_bf ); break;
 220         case ID_BOOLT:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_bt ); break;
 221         case ID_BYTE:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_by ); break;
 222         case ID_UBYTE:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_uby); break;
 223         case ID_CHAR:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_c  ); break;
 224         case ID_WCHAR:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_wc ); break;
 225         case ID_STR:    len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_s  ); break;
 226         case ID_WSTR:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ws ); break;
 227         case ID_SHORT:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_h  ); break;
 228         case ID_USHORT: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_uh ); break;
 229         case ID_INT:    len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_i  ); break;
 230         case ID_UINT:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ui ); break;
 231         case ID_LONG:   len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_l  ); break;
 232         case ID_ULONG:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ul ); break;
 233         case ID_LLONG:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ll ); break;
 234         case ID_ULLONG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ull); break;
 235         case ID_INTMAX: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_max); break;
 236         case ID_SSIZET: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_sst); break;
 237         case ID_SIZET:  len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_st ); break;
 238         case ID_SPTRDF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_pt ); break;
 239         case ID_PTRDIF: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_pt ); break;
 240 #if defined(INFINITY)
 241         case ID_INF:    len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), INFINITY); break;
 242 #endif
 243 #if defined(NAN)
 244         case ID_NAN:    len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), NAN);   break;
 245 #endif
 246         case ID_DOUBLE: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_db ); break;
 247         case ID_NEGDBL: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ndb); break;
 248         case ID_LNGDBL: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_ldb); break;
 249         case ID_NEGLNG: len = SNPRINTF(buf, BUFSIZ, fmtStr.c_str(), g_nld); break;
 250         default: throw logic_error("unhandled type in call_snprintf");
 251     }
 252
 253     if (len < 0)
 254     {
 255         throw logic_error("snprintf length 0");
 256     }
 257
 258     return std::string(buf, len);
 259 }
 260
 261 std::string call_format(const std::string& fmtStr, interop_datatype type)
 262 {
 263     switch (type)
 264     {
 265         case ID_ZERO:   return ::boost::str(::boost::format(fmtStr) % g_z  );
 266         case ID_BOOLF:  return ::boost::str(::boost::format(fmtStr) % g_bf );
 267         case ID_BOOLT:  return ::boost::str(::boost::format(fmtStr) % g_bt );
 268         case ID_BYTE:   return ::boost::str(::boost::format(fmtStr) % g_by );
 269         case ID_UBYTE:  return ::boost::str(::boost::format(fmtStr) % g_uby);
 270         case ID_CHAR:   return ::boost::str(::boost::format(fmtStr) % g_c  );
 271         case ID_WCHAR:  return ::boost::str(::boost::format(fmtStr) % g_wc );
 272         case ID_STR:    return ::boost::str(::boost::format(fmtStr) % g_s  );
 273         case ID_WSTR:   return ::boost::str(::boost::format(fmtStr) % g_ws );
 274         case ID_SHORT:  return ::boost::str(::boost::format(fmtStr) % g_h  );
 275         case ID_USHORT: return ::boost::str(::boost::format(fmtStr) % g_uh );
 276         case ID_INT:    return ::boost::str(::boost::format(fmtStr) % g_i  );
 277         case ID_UINT:   return ::boost::str(::boost::format(fmtStr) % g_ui );
 278         case ID_LONG:   return ::boost::str(::boost::format(fmtStr) % g_l  );
 279         case ID_ULONG:  return ::boost::str(::boost::format(fmtStr) % g_ul );
 280         case ID_LLONG:  return ::boost::str(::boost::format(fmtStr) % g_ll );
 281         case ID_ULLONG: return ::boost::str(::boost::format(fmtStr) % g_ull);
 282         case ID_INTMAX: return ::boost::str(::boost::format(fmtStr) % g_max);
 283         case ID_SSIZET: return ::boost::str(::boost::format(fmtStr) % g_sst);
 284         case ID_SIZET:  return ::boost::str(::boost::format(fmtStr) % g_st );
 285         case ID_SPTRDF: return ::boost::str(::boost::format(fmtStr) % g_pt );
 286         case ID_PTRDIF: return ::boost::str(::boost::format(fmtStr) % g_pt );
 287 #if defined(INFINITY)
 288         case ID_INF:    return ::boost::str(::boost::format(fmtStr) % INFINITY);
 289 #endif
 290 #if defined(NAN)
 291         case ID_NAN:    return ::boost::str(::boost::format(fmtStr) % NAN);
 292 #endif
 293         case ID_DOUBLE: return ::boost::str(::boost::format(fmtStr) % g_db );
 294         case ID_NEGDBL: return ::boost::str(::boost::format(fmtStr) % g_ndb);
 295         case ID_LNGDBL: return ::boost::str(::boost::format(fmtStr) % g_ldb);
 296         case ID_NEGLNG: return ::boost::str(::boost::format(fmtStr) % g_nld);
 297         default: throw logic_error("unhandled type in call_format");
 298     }
 299 }
 300
 301 po::variables_map g_args;
 302 ofstream g_os;
 303
 304 void
 305 write_header()
 306 {
 307     if (g_args.count("snprintf"))
 308     {
 309 #if BOOST_LIB_C_GNU
 310         g_os << "# glibc.version = " << BOOST_VERSION_NUMBER_MAJOR(BOOST_LIB_C_GNU) << "."
 311                                      << BOOST_VERSION_NUMBER_MINOR(BOOST_LIB_C_GNU) << "."
 312                                      << BOOST_VERSION_NUMBER_PATCH(BOOST_LIB_C_GNU)
 313                                      << endl;
 314 #elif BOOST_COMP_MSVC
 315         g_os << "# msvc.version = "  << BOOST_VERSION_NUMBER_MAJOR(BOOST_COMP_MSVC) << "."
 316                                      << BOOST_VERSION_NUMBER_MINOR(BOOST_COMP_MSVC) << "."
 317                                      << BOOST_VERSION_NUMBER_PATCH(BOOST_COMP_MSVC)
 318                                      << endl;
 319 #else
 320         g_os << "# libc.version = unknown" << endl;
 321 #endif
 322     }
 323     else
 324     {
 325         g_os << "# boost.version = " << BOOST_VERSION / 100000 << "."      // major version
 326                                      << BOOST_VERSION / 100 % 1000 << "."  // minor version
 327                                      << BOOST_VERSION % 100                // patch level
 328                                      << endl;
 329     }
 330 }
 331
 332 void
 333 log(const std::string& spec, bool ok, const std::string& result)
 334 {
 335     boost::io::ios_all_saver saver(g_os);
 336     g_os << setw(20) << right << spec << "\t"
 337          << (ok ? "OK " : "ERR") << "\t" << "\"" << result << "\"" << endl;
 338 }
 339
 340 void cell(std::size_t nrow, std::size_t ncol)
 341 {
 342     const interop_row& row(interop_matrix[nrow]);
 343
 344     const interop_datatype& dataType(row.datatype[ncol]);
 345     if (dataType == ID_UNDEF || dataType == ID_NOTSUP)
 346     {
 347         return;
 348     }
 349
 350 #if !defined(INFINITY)
 351     if (dataType == ID_INF)
 352     {
 353         return;
 354     }
 355 #endif
 356
 357 #if !defined(NAN)
 358     if (dataType == ID_NAN)
 359     {
 360         return;
 361     }
 362 #endif
 363
 364     // TODO: every combination of format flags - right now we do only one
 365     for (std::size_t ffi = 0; ffi < format_flags.size(); ++ffi)
 366     {
 367         for (std::size_t mwi = 0; mwi < minimum_width.size(); ++mwi)
 368         {
 369             for (std::size_t pri = 0; pri < precision.size(); ++pri)
 370             {
 371                 // Make the format string
 372                 std::stringstream fss;
 373                 fss << '%';
 374                 fss << format_flags[ffi];
 375                 fss << minimum_width[mwi];
 376                 fss << precision[pri];
 377                 fss << length_modifier[ncol];
 378                 fss << row.conversion_specifier;
 379                 std::string fmtStr = fss.str();
 380
 381                 try
 382                 {
 383                     std::string result = g_args.count("snprintf") ?
 384                                             call_snprintf(fmtStr, dataType) :
 385                                             call_format  (fmtStr, dataType) ;
 386                     log(fmtStr, true, result);
 387                 }
 388                 catch (const std::exception& ex)
 389                 {
 390                     log(fmtStr, false, ex.what());
 391                 }
 392             }
 393         }
 394     }
 395 }
 396
 397 void
 398 matrix()
 399 {
 400     for (std::size_t row = 0; interop_matrix[row].conversion_specifier != 0x00; ++row)
 401     {
 402         for (std::size_t col = 0; col < length_modifier.size(); ++col)
 403         {
 404             cell(row, col);
 405         }
 406     }
 407 }
 408
 409 void
 410 write_pctpct()
 411 {
 412     if (g_args.count("snprintf"))
 413     {
 414         char buf[BUFSIZ];
 415         int len = SNPRINTF(buf, BUFSIZ, "%%");
 416         log("%%", len == 1, len == 1 ? buf : "snprintf length != 1");
 417     }
 418     else
 419     {
 420         try
 421         {
 422             log("%%", true, ::boost::format("%%").str());
 423         }
 424         catch (std::exception& ex)
 425         {
 426             log("%%", false, ex.what());
 427         }
 428     }
 429 }
 430
 431 void
 432 generate()
 433 {
 434     string genpath = g_args["generate"].as<string>();
 435     g_os.open(genpath.c_str(), ios::out | ios::trunc);
 436     write_header();
 437     write_pctpct();
 438     matrix();
 439     g_os.close();
 440 }
 441
 442 } // matrix
 443
 444 ///////////////////////////////////////////////////////////////////////////////
 445 //  main entry point
 446 int
 447 main(int argc, char *argv[])
 448 {
 449     using matrix::g_args;
 450
 451     po::options_description desc("Allowed options");
 452     desc.add_options()
 453         ("generate,g", po::value<string>()->required(), "generate output filename")
 454         ("help,h", "produce help message")
 455         ("snprintf,s", "use snprintf instead of boost::format")
 456         ;
 457
 458     po::store(po::command_line_parser(argc, argv).options(desc).run(), g_args);
 459     po::notify(g_args);
 460
 461     if (g_args.count("help")) {
 462         cout << "Usage: format_matrix [options]\n";
 463         cout << desc;
 464         return 0;
 465     }
 466
 467     matrix::generate();
 468
 469     return 0;
 470 }