rscons/spec/build_tests_spec.rb

require 'fileutils'
require "open3"
require "set"

describe Rscons do

  def rm_rf(dir)
    FileUtils.rm_rf(dir)
    if File.exists?(dir)
      sleep 0.2
      FileUtils.rm_rf(dir)
      if File.exists?(dir)
        sleep 0.5
        FileUtils.rm_rf(dir)
        if File.exists?(dir)
          sleep 1.0
          FileUtils.rm_rf(dir)
          if File.exists?(dir)
            raise "Could not remove #{dir}"
          end
        end
      end
    end
  end

  before(:all) do
    @statics = {}
    @build_test_run_dir = "build_test_run"
    @run_results = Struct.new(:stdout, :stderr, :status)
    @owd = Dir.pwd
    rm_rf(@build_test_run_dir)
  end

  after(:each) do
    Dir.chdir(@owd)
    rm_rf(@build_test_run_dir)
  end

  def test_dir(build_test_directory)
    Dir.chdir(@owd)
    rm_rf(@build_test_run_dir)
    FileUtils.cp_r("build_tests/#{build_test_directory}", @build_test_run_dir)
    Dir.chdir(@build_test_run_dir)
  end

  def file_sub(fname)
    contents = File.read(fname)
    replaced = ''
    contents.each_line do |line|
      replaced += yield(line)
    end
    File.open(fname, 'wb') do |fh|
      fh.write(replaced)
    end
  end

  def run_test(options = {})
    rsconsfile = options[:rsconsfile] || "Rsconsfile"
    rscons_args = options[:rscons_args] || []
    command = %w[rscons -f _build_test.rb] + rscons_args
    @statics[:build_test_id] ||= 0
    @statics[:build_test_id] += 1
    command_name = "b#{@statics[:build_test_id]}"
    rsconsfile_contents = File.read(rsconsfile)
    File.open("_build_test.rb", "w") do |fh|
      fh.puts <<EOF
require "simplecov"
class MyFormatter
  def format(*args)
  end
end
SimpleCov.start do
  root(#{@owd.inspect})
  command_name(#{command_name.inspect})
  formatter(MyFormatter)
end
$LOAD_PATH.unshift(#{@owd.inspect} + "/lib")
# force color off
ENV["TERM"] = nil
EOF
      fh.puts rsconsfile_contents
    end
    stdout, stderr, status = Open3.capture3(*command)
    # Remove output lines generated as a result of the test environment
    stderr = stderr.lines.find_all do |line|
      not (line =~ /Warning: coverage data provided by Coverage.*exceeds number of lines/)
    end.join
    @run_results.new(stdout, stderr, status)
  end

  def lines(str)
    str.lines.map(&:chomp)
  end

  ###########################################################################
  # Tests
  ###########################################################################

  it 'builds a C program with one source file' do
    test_dir('simple')
    result = run_test
    expect(result.stderr).to eq ""
    expect(File.exists?('simple.o')).to be_truthy
    expect(`./simple`).to eq "This is a simple C program\n"
  end

  it 'prints commands as they are executed' do
    test_dir('simple')
    result = run_test(rsconsfile: "command.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      'gcc -c -o simple.o -MMD -MF simple.mf simple.c',
      "gcc -o simple.exe simple.o",
    ]
  end

  it 'prints short representations of the commands being executed' do
    test_dir('header')
    result = run_test
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      'CC header.o',
      "LD header.exe",
    ]
  end

  it 'builds a C program with one source file and one header file' do
    test_dir('header')
    result = run_test
    expect(result.stderr).to eq ""
    expect(File.exists?('header.o')).to be_truthy
    expect(`./header.exe`).to eq "The value is 2\n"
  end

  it 'rebuilds a C module when a header it depends on changes' do
    test_dir('header')
    result = run_test
    expect(result.stderr).to eq ""
    expect(`./header.exe`).to eq "The value is 2\n"
    file_sub('header.h') {|line| line.sub(/2/, '5')}
    result = run_test
    expect(result.stderr).to eq ""
    expect(`./header.exe`).to eq "The value is 5\n"
  end

  it 'does not rebuild a C module when its dependencies have not changed' do
    test_dir('header')
    result = run_test
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      'CC header.o',
      "LD header.exe",
    ]
    expect(`./header.exe`).to eq "The value is 2\n"
    result = run_test
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq ""
  end

  it "does not rebuild a C module when only the file's timestamp has changed" do
    test_dir('header')
    result = run_test
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      'CC header.o',
      "LD header.exe",
    ]
    expect(`./header.exe`).to eq "The value is 2\n"
    sleep 0.05
    file_sub('header.c') {|line| line}
    result = run_test
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq ""
  end

  it 're-links a program when the link flags have changed' do
    test_dir('simple')
    result = run_test(rsconsfile: "command.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      'gcc -c -o simple.o -MMD -MF simple.mf simple.c',
      "gcc -o simple.exe simple.o",
    ]
    result = run_test(rsconsfile: "link_flag_change.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      "gcc -o simple.exe simple.o -Llibdir",
    ]
  end

  it 'builds object files in a different build directory' do
    test_dir('build_dir')
    result = run_test
    expect(result.stderr).to eq ""
    expect(`./build_dir.exe`).to eq "Hello from two()\n"
    expect(File.exists?('build_one/one.o')).to be_truthy
    expect(File.exists?('build_two/two.o')).to be_truthy
  end

  it "supports trailing slashes at the end of build_dir sources and destinations" do
    test_dir("build_dir")
    result = run_test(rsconsfile: "slashes.rb")
    expect(result.stderr).to eq ""
    expect(`./build_dir.exe`).to eq "Hello from two()\n"
    expect(File.exists?("build_one/one.o")).to be_truthy
    expect(File.exists?("build_two/two.o")).to be_truthy
  end

  it 'uses build directories before build root' do
    test_dir('build_dir')
    result = run_test(rsconsfile: "build_dirs_and_root.rb")
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      "CC build/one/one.o",
      "CC build/two/two.o",
      "LD build_dir.exe",
    ]
  end

  it 'uses build_root if no build directories match' do
    test_dir('build_dir')
    result = run_test(rsconsfile: "no_match_build_dir.rb")
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      "CC build_root/src/one/one.o",
      "CC build_root/src/two/two.o",
      "LD build_dir.exe",
    ]
  end

  it "expands target and source paths starting with ^/ to be relative to the build root" do
    test_dir('build_dir')
    result = run_test(rsconsfile: "carat.rb")
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      %q{gcc -c -o build_root/one.o -MMD -MF build_root/one.mf -Isrc/one/ -Isrc/two/ build_root/one.c},
      %q{gcc -c -o build_root/src/two/two.o -MMD -MF build_root/src/two/two.mf -Isrc/one/ -Isrc/two/ src/two/two.c},
      %Q{gcc -o build_dir.exe build_root/src/two/two.o build_root/one.o},
    ]
  end

  it 'supports simple builders' do
    test_dir('json_to_yaml')
    result = run_test
    expect(result.stderr).to eq ""
    expect(File.exists?('foo.yml')).to be_truthy
    expect(IO.read('foo.yml')).to eq("---\nkey: value\n")
  end

  it 'cleans built files' do
    test_dir('build_dir')
    result = run_test
    expect(result.stderr).to eq ""
    expect(`./build_dir.exe`).to eq "Hello from two()\n"
    expect(File.exists?('build_one/one.o')).to be_truthy
    expect(File.exists?('build_two/two.o')).to be_truthy
    result = run_test(rscons_args: %w[-c])
    expect(File.exists?('build_one/one.o')).to be_falsey
    expect(File.exists?('build_two/two.o')).to be_falsey
    expect(File.exists?('build_one')).to be_falsey
    expect(File.exists?('build_two')).to be_falsey
    expect(File.exists?('build_dir.exe')).to be_falsey
    expect(File.exists?('src/one/one.c')).to be_truthy
  end

  it 'does not clean created directories if other non-rscons-generated files reside there' do
    test_dir('build_dir')
    result = run_test
    expect(result.stderr).to eq ""
    expect(`./build_dir.exe`).to eq "Hello from two()\n"
    expect(File.exists?('build_one/one.o')).to be_truthy
    expect(File.exists?('build_two/two.o')).to be_truthy
    File.open('build_two/tmp', 'w') { |fh| fh.puts "dum" }
    result = run_test(rscons_args: %w[-c])
    expect(File.exists?('build_one/one.o')).to be_falsey
    expect(File.exists?('build_two/two.o')).to be_falsey
    expect(File.exists?('build_one')).to be_falsey
    expect(File.exists?('build_two')).to be_truthy
    expect(File.exists?('build_dir.exe')).to be_falsey
    expect(File.exists?('src/one/one.c')).to be_truthy
  end

  it 'allows Ruby classes as custom builders to be used to construct files' do
    test_dir('custom_builder')
    result = run_test
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq ["CC program.o", "LD program.exe"]
    expect(File.exists?('inc.h')).to be_truthy
    expect(`./program.exe`).to eq "The value is 5678\n"
  end

  it 'supports custom builders with multiple targets' do
    test_dir('custom_builder')
    result = run_test(rsconsfile: "multiple_targets.rb")
    expect(result.stderr).to eq ""
    slines = lines(result.stdout)
    expect(slines[0]).to eq("CHGen inc.c")
    expect(Set[*slines[1..2]]).to eq(Set["CC program.o", "CC inc.o"])
    expect(slines[3]).to eq("LD program.exe")
    expect(File.exists?("inc.c")).to be_truthy
    expect(File.exists?("inc.h")).to be_truthy
    expect(`./program.exe`).to eq "The value is 42\n"

    File.open("inc.c", "w") {|fh| fh.puts "int THE_VALUE = 33;"}
    result = run_test(rsconsfile: "multiple_targets.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq ["CHGen inc.c"]
    expect(`./program.exe`).to eq "The value is 42\n"
  end

  it 'allows cloning Environment objects' do
    test_dir('clone_env')
    result = run_test
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      %q{gcc -c -o debug/program.o -MMD -MF debug/program.mf '-DSTRING="Debug Version"' -O2 src/program.c},
      %Q{gcc -o program-debug.exe debug/program.o},
      %q{gcc -c -o release/program.o -MMD -MF release/program.mf '-DSTRING="Release Version"' -O2 src/program.c},
      %Q{gcc -o program-release.exe release/program.o},
    ]
  end

  it 'allows cloning all attributes of an Environment object' do
    test_dir('clone_env')
    result = run_test(rsconsfile: "clone_all.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      %q{gcc -c -o build/program.o -MMD -MF build/program.mf -DSTRING="Hello" -O2 src/program.c},
      %q{post build/program.o},
      %Q{gcc -o program.exe build/program.o},
      %q{post program.exe},
      %q{post build/program.o},
      %Q{gcc -o program2.exe build/program.o},
      %q{post program2.exe},
    ]
  end

  it 'builds a C++ program with one source file' do
    test_dir('simple_cc')
    result = run_test
    expect(result.stderr).to eq ""
    expect(File.exists?('simple.o')).to be_truthy
    expect(`./simple.exe`).to eq "This is a simple C++ program\n"
  end

  it 'allows overriding construction variables for individual builder calls' do
    test_dir('two_sources')
    result = run_test
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      'gcc -c -o one.o -MMD -MF one.mf -DONE one.c',
      'gcc -c -o two.o -MMD -MF two.mf two.c',
      "gcc -o two_sources.exe one.o two.o",
    ]
    expect(File.exists?("two_sources.exe")).to be_truthy
    expect(`./two_sources.exe`).to eq "This is a C program with two sources.\n"
  end

  it 'builds a static library archive' do
    test_dir('library')
    result = run_test
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      'gcc -c -o one.o -MMD -MF one.mf -Dmake_lib one.c',
      'gcc -c -o two.o -MMD -MF two.mf -Dmake_lib two.c',
      'ar rcs lib.a one.o two.o',
      'gcc -c -o three.o -MMD -MF three.mf three.c',
      "gcc -o library.exe lib.a three.o",
    ]
    expect(File.exists?("library.exe")).to be_truthy
    expect(`ar t lib.a`).to eq "one.o\ntwo.o\n"
  end

  it 'supports build hooks to override construction variables' do
    test_dir("build_dir")
    result = run_test(rsconsfile: "build_hooks.rb")
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      'gcc -c -o build_one/one.o -MMD -MF build_one/one.mf -Isrc/one/ -Isrc/two/ -O1 src/one/one.c',
      'gcc -c -o build_two/two.o -MMD -MF build_two/two.mf -Isrc/one/ -Isrc/two/ -O2 src/two/two.c',
      'gcc -o build_hook.exe build_one/one.o build_two/two.o',
    ]
    expect(`./build_hook.exe`).to eq "Hello from two()\n"
  end

  it 'rebuilds when user-specified dependencies change' do
    test_dir('simple')

    File.open("program.ld", "w") {|fh| fh.puts("1")}
    result = run_test(rsconsfile: "user_dependencies.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq ["CC simple.o", "LD simple.exe"]
    expect(File.exists?('simple.o')).to be_truthy
    expect(`./simple.exe`).to eq "This is a simple C program\n"

    File.open("program.ld", "w") {|fh| fh.puts("2")}
    result = run_test(rsconsfile: "user_dependencies.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq(["LD simple.exe"])

    File.unlink("program.ld")
    result = run_test(rsconsfile: "user_dependencies.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq ["LD simple.exe"]

    result = run_test(rsconsfile: "user_dependencies.rb")
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq ""
  end

  unless ENV["omit_gdc_tests"]
    it "supports building D sources" do
      test_dir("d")
      result = run_test
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq [
        "gdc -c -o main.o main.d",
        "gdc -o hello-d.exe main.o",
      ]
      expect(`./hello-d.exe`.rstrip).to eq "Hello from D!"
    end
  end

  it "supports disassembling object files" do
    test_dir("simple")
    result = run_test(rsconsfile: "disassemble.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("simple.txt")).to be_truthy
    expect(File.read("simple.txt")).to match /Disassembly of section .text:/
  end

  it "supports preprocessing C sources" do
    test_dir("simple")
    result = run_test(rsconsfile: "preprocess.rb")
    expect(result.stderr).to eq ""
    expect(File.read("simplepp.c")).to match /# \d+ "simple.c"/
    expect(`./simple.exe`).to eq "This is a simple C program\n"
  end

  it "supports preprocessing C++ sources" do
    test_dir("simple_cc")
    result = run_test(rsconsfile: "preprocess.rb")
    expect(result.stderr).to eq ""
    expect(File.read("simplepp.cc")).to match /# \d+ "simple.cc"/
    expect(`./simple.exe`).to eq "This is a simple C++ program\n"
  end

  it "supports invoking builders with no sources and a build_root defined" do
    test_dir("simple")
    result = run_test(rsconsfile: "build_root_builder_no_sources.rb")
    expect(result.stderr).to eq ""
  end

  it "expands construction variables in builder target and sources before invoking the builder" do
    test_dir('custom_builder')
    result = run_test(rsconsfile: "cvar_expansion.rb")
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq ["CC program.o", "LD program.exe"]
    expect(File.exists?('inc.h')).to be_truthy
    expect(`./program.exe`).to eq "The value is 678\n"
  end

  it "supports lambdas as construction variable values" do
    test_dir "custom_builder"
    result = run_test(rsconsfile: "cvar_lambda.rb")
    expect(result.stderr).to eq ""
    expect(`./program.exe`).to eq "The value is 5678\n"
  end

  it "supports registering build targets from within a build hook" do
    test_dir("simple")
    result = run_test(rsconsfile: "register_target_in_build_hook.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("simple.o")).to be_truthy
    expect(File.exists?("simple.o.txt")).to be_truthy
    expect(`./simple.exe`).to eq "This is a simple C program\n"
  end

  it "supports multiple values for CXXSUFFIX" do
    test_dir("simple_cc")
    File.open("other.cccc", "w") {|fh| fh.puts}
    result = run_test(rsconsfile: "cxxsuffix.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("simple.o")).to be_truthy
    expect(File.exists?("other.o")).to be_truthy
    expect(`./simple.exe`).to eq "This is a simple C++ program\n"
  end

  it "supports multiple values for CSUFFIX" do
    test_dir("build_dir")
    FileUtils.mv("src/one/one.c", "src/one/one.yargh")
    result = run_test(rsconsfile: "csuffix.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("src/one/one.o")).to be_truthy
    expect(File.exists?("src/two/two.o")).to be_truthy
    expect(`./build_dir.exe`).to eq "Hello from two()\n"
  end

  it "supports multiple values for OBJSUFFIX" do
    test_dir("two_sources")
    result = run_test(rsconsfile: "objsuffix.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("two_sources.exe")).to be_truthy
    expect(File.exists?("one.oooo")).to be_truthy
    expect(File.exists?("two.ooo")).to be_truthy
    expect(`./two_sources.exe`).to eq "This is a C program with two sources.\n"
  end

  it "supports multiple values for LIBSUFFIX" do
    test_dir("two_sources")
    result = run_test(rsconsfile: "libsuffix.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("two_sources.exe")).to be_truthy
    expect(`./two_sources.exe`).to eq "This is a C program with two sources.\n"
  end

  it "supports multiple values for ASSUFFIX" do
    test_dir("two_sources")
    result = run_test(rsconsfile: "assuffix.rb")
    expect(result.stderr).to eq ""
    expect(Set[*lines(result.stdout)]).to eq Set[
      "CC one.ssss",
      "CC two.sss",
      "AS one.o",
      "AS two.o",
      "LD two_sources.exe",
    ]
    expect(File.exists?("two_sources.exe")).to be_truthy
    expect(`./two_sources.exe`).to eq "This is a C program with two sources.\n"
  end

  it "supports dumping an Environment's construction variables" do
    test_dir("simple")
    result = run_test(rsconsfile: "dump.rb")
    expect(result.stderr).to eq ""
    slines = lines(result.stdout)
    expect(slines.include?(%{:foo => :bar})).to be_truthy
    expect(slines.include?(%{CFLAGS => ["-O2", "-fomit-frame-pointer"]})).to be_truthy
    expect(slines.include?(%{CPPPATH => []})).to be_truthy
  end

  it "considers deep dependencies when deciding whether to rerun Preprocess builder" do
    test_dir("preprocess")

    result = run_test
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq("Preprocess pp\n")
    expect(File.read("pp")).to match(%r{xyz42abc}m)

    result = run_test
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq ""

    File.open("bar.h", "w") do |fh|
      fh.puts "#define BAR abc88xyz"
    end
    result = run_test
    expect(result.stderr).to eq ""
    expect(result.stdout).to eq("Preprocess pp\n")
    expect(File.read("pp")).to match(%r{abc88xyz}m)
  end

  it "allows construction variable references which expand to arrays in sources of a build target" do
    test_dir("simple")
    result = run_test(rsconsfile: "cvar_array.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("simple.o")).to be_truthy
    expect(`./simple.exe`).to eq "This is a simple C program\n"
  end

  it "supports registering multiple build targets with the same target path" do
    test_dir("build_dir")
    result = run_test(rsconsfile: "multiple_targets_same_name.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("one.o")).to be_truthy
    expect(lines(result.stdout)).to eq([
      "CC one.o",
      "CC one.o",
    ])
  end

  it "expands target and source paths when builders are registered in build hooks" do
    test_dir("build_dir")
    result = run_test(rsconsfile: "post_build_hook_expansion.rb")
    expect(result.stderr).to eq ""
    expect(File.exists?("one.o")).to be_truthy
    expect(File.exists?("two.o")).to be_truthy
    expect(lines(result.stdout)).to eq([
      "CC one.o",
      "CC two.o",
    ])
  end

  it "does not re-run previously successful builders if one fails" do
    test_dir('simple')
    File.open("two.c", "w") do |fh|
      fh.puts("FOO")
    end
    result = run_test(rsconsfile: "cache_successful_builds_when_one_fails.rb",
                      rscons_args: %w[-j1])
    expect(result.stderr).to match /FOO/
    expect(File.exists?("simple.o")).to be_truthy
    expect(File.exists?("two.o")).to be_falsey

    File.open("two.c", "w") {|fh|}
    result = run_test(rsconsfile: "cache_successful_builds_when_one_fails.rb",
                      rscons_args: %w[-j1])
    expect(result.stderr).to eq ""
    expect(lines(result.stdout)).to eq [
      "CC two.o",
    ]
  end

  context "Directory builder" do
    it "creates the requested directory" do
      test_dir("simple")
      result = run_test(rsconsfile: "directory.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq(["Directory teh_dir"])
      expect(File.directory?("teh_dir")).to be_truthy
    end

    it "succeeds when the requested directory already exists" do
      test_dir("simple")
      FileUtils.mkdir("teh_dir")
      result = run_test(rsconsfile: "directory.rb")
      expect(result.stderr).to eq ""
      expect(result.stdout).to eq ""
      expect(File.directory?("teh_dir")).to be_truthy
    end

    it "fails when the target path is a file" do
      test_dir("simple")
      FileUtils.touch("teh_dir")
      result = run_test(rsconsfile: "directory.rb")
      expect(result.stderr).to match %r{Error: `teh_dir' already exists and is not a directory}
    end
  end

  context "Install buildler" do
    it "copies a file to the target file name" do
      test_dir("build_dir")

      result = run_test(rsconsfile: "install.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq ["Install inst.exe"]

      result = run_test(rsconsfile: "install.rb")
      expect(result.stderr).to eq ""
      expect(result.stdout).to eq ""

      expect(File.exists?("inst.exe")).to be_truthy
      expect(File.read("inst.exe", mode: "rb")).to eq(File.read("install.rb", mode: "rb"))

      FileUtils.rm("inst.exe")
      result = run_test(rsconsfile: "install.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq ["Install inst.exe"]
    end

    it "operates the same as a Copy builder" do
      test_dir("build_dir")

      result = run_test(rsconsfile: "copy.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq ["Copy inst.exe"]

      result = run_test(rsconsfile: "copy.rb")
      expect(result.stderr).to eq ""
      expect(result.stdout).to eq ""

      expect(File.exists?("inst.exe")).to be_truthy
      expect(File.read("inst.exe", mode: "rb")).to eq(File.read("copy.rb", mode: "rb"))

      FileUtils.rm("inst.exe")
      result = run_test(rsconsfile: "copy.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to eq ["Copy inst.exe"]
    end

    it "copies a file to the target directory name" do
      test_dir "build_dir"

      result = run_test(rsconsfile: "install_directory.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to include("Install inst")
      expect(File.exists?("inst/install_directory.rb")).to be_truthy
      expect(File.read("inst/install_directory.rb", mode: "rb")).to eq(File.read("install_directory.rb", mode: "rb"))

      result = run_test(rsconsfile: "install_directory.rb")
      expect(result.stderr).to eq ""
      expect(result.stdout).to eq ""
    end

    it "copies a directory to the non-existent target directory name" do
      test_dir "build_dir"
      result = run_test(rsconsfile: "install_directory.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to include("Install noexist/src")
      %w[src/one/one.c src/two/two.c src/two/two.h].each do |f|
        expect(File.exists?("noexist/#{f}")).to be_truthy
        expect(File.read("noexist/#{f}", mode: "rb")).to eq(File.read(f, mode: "rb"))
      end
    end

    it "copies a directory to the existent target directory name" do
      test_dir "build_dir"
      result = run_test(rsconsfile: "install_directory.rb")
      expect(result.stderr).to eq ""
      expect(lines(result.stdout)).to include("Install exist/src")
      %w[src/one/one.c src/two/two.c src/two/two.h].each do |f|
        expect(File.exists?("exist/#{f}")).to be_truthy
        expect(File.read("exist/#{f}", mode: "rb")).to eq(File.read(f, mode: "rb"))
      end
    end
  end

  context "phony targets" do
    [false, true].each do |with_build_root|
      context "with#{with_build_root ? "" : "out"} build root" do
        it "allows specifying a Symbol as a target name and reruns the builder if the sources or command have changed" do
          test_dir("simple")

          FileUtils.cp("phony_target.rb", "phony_target2.rb")
          unless with_build_root
            file_sub("phony_target2.rb") {|line| line.sub(/.*build_root.*/, "")}
          end
          result = run_test(rsconsfile: "phony_target2.rb")
          expect(result.stderr).to eq ""
          expect(lines(result.stdout)).to eq([
            "CC #{with_build_root ? "build/" : ""}simple.o",
            "LD simple.exe",
            "Checker simple.exe",
          ])

          result = run_test(rsconsfile: "phony_target2.rb")
          expect(result.stderr).to eq ""
          expect(result.stdout).to eq ""

          FileUtils.cp("phony_target.rb", "phony_target2.rb")
          file_sub("phony_target2.rb") {|line| line.sub(/.*Program.*/, "")}
          File.open("simple.exe", "w") do |fh|
            fh.puts "Changed simple.exe"
          end
          result = run_test(rsconsfile: "phony_target2.rb")
          expect(result.stderr).to eq ""
          expect(lines(result.stdout)).to eq([
            "Checker simple.exe",
          ])
        end
      end
    end
  end

  context "Environment#clear_targets" do
    it "clears registered targets" do
      test_dir("simple")
      result = run_test(rsconsfile: "clear_targets.rb")
      expect(result.stderr).to eq ""
      expect(result.stdout).to eq ""
    end
  end

end