1 // Copyright (c) 2001-2011 Hartmut Kaiser
2 //
3 // Distributed under the Boost Software License, Version 1.0. (See accompanying
4 // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
5
6 #include <boost/config/warning_disable.hpp>
7 #include <boost/detail/lightweight_test.hpp>
8
9 #include <boost/spirit/include/karma_binary.hpp>
10 #include <boost/spirit/include/karma_generate.hpp>
11
12 #include <boost/predef/other/endian.h>
13
14 #include "test.hpp"
15
16 using namespace spirit_test;
17
18 ///////////////////////////////////////////////////////////////////////////////
19 int
main()20 main()
21 {
22 using namespace boost::spirit;
23
24 { // test native endian binaries
25 #if BOOST_ENDIAN_LITTLE_BYTE
26 BOOST_TEST(binary_test("\x01", 1, byte_, 0x01));
27 BOOST_TEST(binary_test("\x80", 1, byte_, 0x80));
28 BOOST_TEST(binary_test("\x01\x82", 2, word, 0x8201));
29 BOOST_TEST(binary_test("\x81\x02", 2, word, 0x0281));
30 BOOST_TEST(binary_test("\x01\x02\x03\x84", 4, dword, 0x84030201));
31 BOOST_TEST(binary_test("\x81\x02\x03\x04", 4, dword, 0x04030281));
32 #ifdef BOOST_HAS_LONG_LONG
33 BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x88", 8, qword,
34 0x8807060504030201LL));
35 BOOST_TEST(binary_test("\x81\x02\x03\x04\x05\x06\x07\x08", 8, qword,
36 0x0807060504030281LL));
37 #endif
38 BOOST_TEST(binary_test("\x00\x00\x80\x3f", 4, bin_float, 1.0f));
39 BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
40 bin_double, 1.0));
41
42 BOOST_TEST(binary_test_delimited("\x01\x00\x00\x00", 4, byte_, 0x01, pad(4)));
43 BOOST_TEST(binary_test_delimited("\x01\x02\x00\x00", 4, word, 0x0201, pad(4)));
44 BOOST_TEST(binary_test_delimited("\x01\x02\x03\x04", 4, dword, 0x04030201, pad(4)));
45 #ifdef BOOST_HAS_LONG_LONG
46 BOOST_TEST(binary_test_delimited("\x01\x02\x03\x04\x05\x06\x07\x08\x00\x00", 10,
47 qword, 0x0807060504030201LL, pad(10)));
48 #endif
49 BOOST_TEST(binary_test_delimited("\x00\x00\x80\x3f", 4, bin_float,
50 1.0f, pad(4)));
51 BOOST_TEST(binary_test_delimited("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
52 bin_double, 1.0, pad(8)));
53
54 #else // BOOST_ENDIAN_LITTLE_BYTE
55
56 BOOST_TEST(binary_test("\x01", 1, byte_, 0x01));
57 BOOST_TEST(binary_test("\x80", 1, byte_, 0x80));
58 BOOST_TEST(binary_test("\x01\x82", 2, word, 0x0182));
59 BOOST_TEST(binary_test("\x81\x02", 2, word, 0x8102));
60 BOOST_TEST(binary_test("\x01\x02\x03\x84", 4, dword, 0x01020384));
61 BOOST_TEST(binary_test("\x81\x02\x03\x04", 4, dword, 0x81020304));
62 #ifdef BOOST_HAS_LONG_LONG
63 BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x88", 8, qword,
64 0x0102030405060788LL));
65 BOOST_TEST(binary_test("\x81\x02\x03\x04\x05\x06\x07\x08", 8, qword,
66 0x8102030405060708LL));
67 #endif
68 BOOST_TEST(binary_test("\x3f\x80\x00\x00", 4, bin_float, 1.0f));
69 BOOST_TEST(binary_test("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
70 bin_double, 1.0));
71
72 BOOST_TEST(binary_test_delimited("\x01\x00\x00\x00", 4, byte_, 0x01, pad(4)));
73 BOOST_TEST(binary_test_delimited("\x01\x02\x00\x00", 4, word, 0x0102, pad(4)));
74 BOOST_TEST(binary_test_delimited("\x01\x02\x03\x04", 4, dword, 0x01020304, pad(4)));
75 #ifdef BOOST_HAS_LONG_LONG
76 BOOST_TEST(binary_test_delimited("\x01\x02\x03\x04\x05\x06\x07\x08\x00\x00", 10,
77 qword, 0x0102030405060708LL, pad(10)));
78 #endif
79 BOOST_TEST(binary_test_delimited("\x3f\x80\x00\x00", 4, bin_float,
80 1.0f, pad(4)));
81 BOOST_TEST(binary_test_delimited("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
82 bin_double, 1.0, pad(8)));
83 #endif
84 }
85
86 { // test native endian binaries
87 #if BOOST_ENDIAN_LITTLE_BYTE
88 BOOST_TEST(binary_test("\x01", 1, byte_(0x01)));
89 BOOST_TEST(binary_test("\x01\x02", 2, word(0x0201)));
90 BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword(0x04030201)));
91 #ifdef BOOST_HAS_LONG_LONG
92 BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8,
93 qword(0x0807060504030201LL)));
94 #endif
95 BOOST_TEST(binary_test("\x00\x00\x80\x3f", 4, bin_float(1.0f)));
96 BOOST_TEST(binary_test("\x00\x00\x00\x00\x00\x00\xf0\x3f", 8,
97 bin_double(1.0)));
98 #else
99 BOOST_TEST(binary_test("\x01", 1, byte_(0x01)));
100 BOOST_TEST(binary_test("\x01\x02", 2, word(0x0102)));
101 BOOST_TEST(binary_test("\x01\x02\x03\x04", 4, dword(0x01020304)));
102 #ifdef BOOST_HAS_LONG_LONG
103 BOOST_TEST(binary_test("\x01\x02\x03\x04\x05\x06\x07\x08", 8,
104 qword(0x0102030405060708LL)));
105 #endif
106 BOOST_TEST(binary_test("\x3f\x80\x00\x00", 4, bin_float(1.0f)));
107 BOOST_TEST(binary_test("\x3f\xf0\x00\x00\x00\x00\x00\x00", 8,
108 bin_double(1.0)));
109 #endif
110 }
111
112 return boost::report_errors();
113 }
114