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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
// file : build2/test/init.cxx -*- C++ -*-
// copyright : Copyright (c) 2014-2017 Code Synthesis Ltd
// license : MIT; see accompanying LICENSE file
#include <build2/test/init>
#include <build2/scope>
#include <build2/target>
#include <build2/rule>
#include <build2/diagnostics>
#include <build2/test/rule>
#include <build2/test/target>
#include <build2/test/operation>
using namespace std;
using namespace butl;
namespace build2
{
namespace test
{
static rule rule_;
static alias_rule alias_rule_;
void
boot (scope& rs, const location&, unique_ptr<module_base>&)
{
tracer trace ("test::boot");
l5 ([&]{trace << "for " << rs.out_path ();});
// Register the test operation.
//
rs.operations.insert (test_id, test);
// Enter module variables. Do it during boot in case they get assigned
// in bootstrap.build.
//
auto& vp (var_pool);
// Note: none are overridable.
//
// The test variable is a name which can be a path (with the
// true/false special values) or a target name.
//
vp.insert<name> ("test", variable_visibility::target);
vp.insert<name> ("test.input", variable_visibility::project);
vp.insert<name> ("test.output", variable_visibility::project);
vp.insert<name> ("test.roundtrip", variable_visibility::project);
vp.insert<strings> ("test.options", variable_visibility::project);
vp.insert<strings> ("test.arguments", variable_visibility::project);
// These are only used in testscript.
//
vp.insert<strings> ("test.redirects", variable_visibility::project);
vp.insert<strings> ("test.cleanups", variable_visibility::project);
// Test target platform.
//
// Unless already set, default test.target to build.host. Note that it
// can still be overriden by the user, e.g., in root.build.
//
{
value& v (
rs.assign (
vp.insert<target_triplet> (
"test.target", variable_visibility::project)));
if (!v || v.empty ())
v = cast<target_triplet> ((*global_scope)["build.host"]);
}
}
bool
init (scope& rs,
scope&,
const location& l,
unique_ptr<module_base>&,
bool first,
bool,
const variable_map& config_hints)
{
tracer trace ("test::init");
if (!first)
{
warn (l) << "multiple test module initializations";
return true;
}
const dir_path& out_root (rs.out_path ());
l5 ([&]{trace << "for " << out_root;});
assert (config_hints.empty ()); // We don't known any hints.
//@@ TODO: Need ability to specify extra diff options (e.g.,
// --strip-trailing-cr, now hardcoded).
// Adjust module priority so that the config.test.* values are saved at
// the end of config.build.
//
// if (s)
// config::save_module (r, "test", INT32_MAX);
// Register target types.
//
{
auto& t (rs.target_types);
t.insert<testscript> ();
}
// Register rules.
//
{
auto& r (rs.rules);
// Register our test running rule.
//
r.insert<target> (perform_test_id, "test", rule_);
r.insert<alias> (perform_test_id, "test", alias_rule_);
// Register our rule for the dist meta-operation. We need to do this
// because we may have ad hoc prerequisites (test input/output files)
// that need to be entered into the target list.
//
r.insert<target> (dist_id, test_id, "test", rule_);
}
return true;
}
}
}
|
