2
0
mirror of https://github.com/boostorg/spirit.git synced 2026-01-19 16:52:10 +00:00
Files
spirit/test/karma/binary3.cpp
Nikita Kniazev 4ea7e3a7b7 Deprecate Phoenix transition headers
There is no purpose in these transition headers, Phoenix V2 was removed 8 years ago.
2021-09-28 22:24:57 +03:00

165 lines
6.4 KiB
C++

// Copyright (c) 2001-2011 Hartmut Kaiser
//
// Distributed under 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)
#include <boost/spirit/include/karma_binary.hpp>
#include <boost/spirit/include/karma_generate.hpp>
#include <boost/spirit/include/karma_phoenix_attributes.hpp>
#include <boost/phoenix/core.hpp>
#include <boost/phoenix/operator.hpp>
#include <boost/predef/other/endian.h>
#include "test.hpp"
using namespace spirit_test;
///////////////////////////////////////////////////////////////////////////////
int
main()
{
using namespace boost::spirit;
using namespace boost::phoenix;
{ // test optional attributes
#if BOOST_ENDIAN_LITTLE_BYTE
boost::optional<boost::uint8_t> v8 (0x01);
BOOST_TEST(binary_test("\x01", 1, byte_, v8));
boost::optional<boost::uint16_t> v16 (0x0201);
BOOST_TEST(binary_test("\x01\x02", 2, word, v16));
boost::optional<boost::uint32_t> v32 (0x04030201);
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword, v32));
#ifdef BOOST_HAS_LONG_LONG
boost::optional<boost::uint64_t> v64 (0x0807060504030201LL);
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword, v64));
#endif
boost::optional<float> vf(1.0f);
BOOST_TEST(binary_test("\x00\x00\x80\x3f", 4, bin_float, vf));
boost::optional<double> vd(1.0);
BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
bin_double, vd));
#else // BOOST_ENDIAN_LITTLE_BYTE
boost::optional<boost::uint8_t> v8 (0x01);
BOOST_TEST(binary_test("\x01", 1, byte_, v8));
boost::optional<boost::uint16_t> v16 (0x0102);
BOOST_TEST(binary_test("\x01\x02", 2, word, v16));
boost::optional<boost::uint32_t> v32 (0x01020304);
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword, v32));
#ifdef BOOST_HAS_LONG_LONG
boost::optional<boost::uint64_t> v64 (0x0102030405060708LL);
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword, v64));
#endif
boost::optional<float> vf(1.0f);
BOOST_TEST(binary_test("\x3f\x80\x00\x00", 4, bin_float, vf));
boost::optional<double> vd(1.0);
BOOST_TEST(binary_test("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
bin_double, vd));
#endif
}
{ // test Phoenix expression attributes, only supported if
// karma_phoenix_attributes.hpp is included
namespace phoenix = boost::phoenix;
#if BOOST_ENDIAN_LITTLE_BYTE
BOOST_TEST(binary_test("\x01", 1, byte_, phoenix::val(0x01)));
BOOST_TEST(binary_test("\x01\x02", 2, word, phoenix::val(0x0201)));
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword,
phoenix::val(0x04030201)));
boost::uint8_t v8 (0x01);
BOOST_TEST(binary_test("\x01", 1, byte_, phoenix::ref(v8)));
BOOST_TEST(binary_test("\x02", 1, byte_, ++phoenix::ref(v8)));
boost::uint16_t v16 (0x0201);
BOOST_TEST(binary_test("\x01\x02", 2, word, phoenix::ref(v16)));
BOOST_TEST(binary_test("\x02\x02", 2, word, ++phoenix::ref(v16)));
boost::uint32_t v32 (0x04030201);
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword, phoenix::ref(v32)));
BOOST_TEST(binary_test("\x02\x02\x03\x04", 4, dword, ++phoenix::ref(v32)));
#ifdef BOOST_HAS_LONG_LONG
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword,
phoenix::val(0x0807060504030201LL)));
boost::uint64_t v64 (0x0807060504030201LL);
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword,
phoenix::ref(v64)));
BOOST_TEST(binary_test("\x02\x02\x03\x04\x05\x06\x07\x08", 8, qword,
++phoenix::ref(v64)));
#endif
BOOST_TEST(binary_test("\x00\x00\x80\x3f", 4, bin_float,
phoenix::val(1.0f)));
float vf(1.0f);
BOOST_TEST(binary_test("\x00\x00\x80\x3f", 4, bin_float,
phoenix::ref(vf)));
BOOST_TEST(binary_test("\x00\x00\x00\x40", 4, bin_float,
++phoenix::ref(vf)));
BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
bin_double, phoenix::val(1.0)));
double vd(1.0);
BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
bin_double, phoenix::ref(vd)));
BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\x00\x40", 8,
bin_double, ++phoenix::ref(vd)));
#else // BOOST_ENDIAN_LITTLE_BYTE
BOOST_TEST(binary_test("\x01", 1, byte_, phoenix::val(0x01)));
BOOST_TEST(binary_test("\x01\x02", 2, word, phoenix::val(0x0102)));
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword,
phoenix::val(0x01020304)));
boost::uint8_t v8 (0x01);
BOOST_TEST(binary_test("\x01", 1, byte_, phoenix::ref(v8)));
BOOST_TEST(binary_test("\x02", 1, byte_, ++phoenix::ref(v8)));
boost::uint16_t v16 (0x0102);
BOOST_TEST(binary_test("\x01\x02", 2, word, phoenix::ref(v16)));
BOOST_TEST(binary_test("\x01\x03", 2, word, ++phoenix::ref(v16)));
boost::uint32_t v32 (0x01020304);
BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword, phoenix::ref(v32)));
BOOST_TEST(binary_test("\x01\x02\x03\x05", 4, dword, ++phoenix::ref(v32)));
#ifdef BOOST_HAS_LONG_LONG
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword,
phoenix::val(0x0102030405060708LL)));
boost::uint64_t v64 (0x0102030405060708LL);
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8, qword,
phoenix::ref(v64)));
BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x09", 8, qword,
++phoenix::ref(v64)));
#endif
BOOST_TEST(binary_test("\x3f\x80\x00\x00", 4, bin_float,
phoenix::val(1.0f)));
float vf(1.0f);
BOOST_TEST(binary_test("\x3f\x80\x00\x00", 4, bin_float,
phoenix::ref(vf)));
BOOST_TEST(binary_test("\x40\x00\x00\x00", 4, bin_float,
++phoenix::ref(vf)));
BOOST_TEST(binary_test("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
bin_double, phoenix::val(1.0)));
double vd(1.0);
BOOST_TEST(binary_test("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
bin_double, phoenix::ref(vd)));
BOOST_TEST(binary_test("\x40\x00\x00\x00\x00\x00\x00\x00", 8,
bin_double, ++phoenix::ref(vd)));
#endif
}
return boost::report_errors();
}