1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
// Copyright (C) 2005, 2006 Douglas Gregor.
// Use, modification and distribution is 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)
// A test of the all_to_all() collective.
#include <boost/mpi/collectives/all_to_all.hpp>
#include <boost/mpi/communicator.hpp>
#include <boost/mpi/environment.hpp>
#include <algorithm>
#include "gps_position.hpp"
#include <boost/serialization/string.hpp>
#include <boost/serialization/list.hpp>
#include <boost/iterator/counting_iterator.hpp>
#include <boost/lexical_cast.hpp>
#include "mpi_test_utils.hpp"
using boost::mpi::communicator;
using boost::mpi::packed_skeleton_iarchive;
using boost::mpi::packed_skeleton_oarchive;
template<typename Generator>
int
all_to_all_test(const communicator& comm, Generator generator,
const char* kind)
{
typedef typename Generator::result_type value_type;
using boost::mpi::all_to_all;
int failed = 0;
std::vector<value_type> in_values;
for (int p = 0; p < comm.size(); ++p)
in_values.push_back(generator((p + 1) * (comm.rank() + 1)));
if (comm.rank() == 0) {
std::cout << "Performing all-to-all operation on " << kind << "...";
std::cout.flush();
}
std::vector<value_type> out_values;
all_to_all(comm, in_values, out_values);
for (int p = 0; p < comm.size(); ++p) {
BOOST_MPI_CHECK(out_values[p] == generator((p + 1) * (comm.rank() + 1)), failed);
}
if (comm.rank() == 0) {
std::cout << " done." << std::endl;
}
(comm.barrier)();
return failed;
}
// Generates integers to test with all_to_all()
struct int_generator
{
typedef int result_type;
int operator()(int p) const { return 17 + p; }
};
// Generates GPS positions to test with all_to_all()
struct gps_generator
{
typedef gps_position result_type;
gps_position operator()(int p) const
{
return gps_position(39 + p, 16, 20.2799);
}
};
struct string_generator
{
typedef std::string result_type;
std::string operator()(int p) const
{
std::string result = boost::lexical_cast<std::string>(p);
result += " rosebud";
if (p != 1) result += 's';
return result;
}
};
struct string_list_generator
{
typedef std::list<std::string> result_type;
std::list<std::string> operator()(int p) const
{
std::list<std::string> result;
for (int i = 0; i <= p; ++i) {
std::string value = boost::lexical_cast<std::string>(i);
result.push_back(value);
}
return result;
}
};
int main()
{
boost::mpi::environment env;
communicator comm;
int failed = 0;
BOOST_MPI_COUNT_FAILED(all_to_all_test(comm, int_generator(), "integers"), failed);
BOOST_MPI_COUNT_FAILED(all_to_all_test(comm, gps_generator(), "GPS positions"), failed);
BOOST_MPI_COUNT_FAILED(all_to_all_test(comm, string_generator(), "string"), failed);
BOOST_MPI_COUNT_FAILED(all_to_all_test(comm, string_list_generator(), "list of strings"), failed);
return failed;
}
|
