build/config/module.cxx


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

// file      : build/config/module.cxx -*- C++ -*-
// copyright : Copyright (c) 2014-2015 Code Synthesis Ltd
// license   : MIT; see accompanying LICENSE file

#include <build/config/module>

#include <butl/filesystem>

#include <build/scope>
#include <build/file>
#include <build/diagnostics>

#include <build/config/operation>

using namespace std;
using namespace butl;

namespace build
{
  namespace config
  {
    //@@ Same as in operation.cxx
    //
    static const path config_file ("build/config.build");

    extern "C" void
    config_init (scope& root,
                 scope& base,
                 const location& l,
                 std::unique_ptr<module>&,
                 bool first)
    {
      tracer trace ("config::init");

      if (&root != &base)
        fail (l) << "config module must be initialized in bootstrap.build";

      if (!first)
      {
        warn (l) << "multiple config module initializations";
        return;
      }

      const dir_path& out_root (root.path ());
      level4 ([&]{trace << "for " << out_root;});

      // Register meta-operations.
      //
      if (root.meta_operations.insert (configure) != configure_id ||
          root.meta_operations.insert (disfigure) != disfigure_id)
        fail (l) << "config module must be initialized before other modules";

      // Load config.build if one exists.
      //
      path f (out_root / config_file);

      if (file_exists (f))
        source (f, root, root);
    }
  }
}