tetra 0.40.0

data/spec/lib/pom_getter_spec.rb

@@ -0,0 +1,36 @@
+# encoding: UTF-8
+
+require "spec_helper"
+
+describe Tetra::PomGetter do
+  let(:pom_getter) { Tetra::PomGetter.new }
+
+  describe "#get_pom" do
+    it "gets the pom from a jar" do
+      dir_path = File.join("spec", "data", "commons-logging")
+      jar_path = File.join(dir_path, "commons-logging-1.1.1.jar")
+      path, status = pom_getter.get_pom(jar_path)
+      expect(status).to eq :found_in_jar
+      expect(File.exist?(path)).to be_truthy
+      FileUtils.rm(path)
+    end
+
+    it "gets the pom from sha1" do
+      dir_path = File.join("spec", "data", "antlr")
+      jar_path = File.join(dir_path, "antlr-2.7.2.jar")
+      path, status = pom_getter.get_pom(jar_path)
+      expect(status).to eq :found_via_sha1
+      expect(File.exist?(path)).to be_truthy
+      FileUtils.rm(path)
+    end
+
+    it "gets the pom from a heuristic" do
+      dir_path = File.join("spec", "data", "nailgun")
+      jar_path = File.join(dir_path, "nailgun-0.7.1.jar")
+      path, status = pom_getter.get_pom(jar_path)
+      expect(status).to eq :found_via_heuristic
+      expect(File.exist?(path)).to be_truthy
+      FileUtils.rm(path)
+    end
+  end
+end

data/spec/lib/pom_spec.rb

@@ -0,0 +1,69 @@
+# encoding: UTF-8
+
+require "spec_helper"
+
+describe Tetra::Pom do
+  let(:pom) { Tetra::Pom.new(File.join("spec", "data", "commons-logging", "pom.xml")) }
+
+  describe "#group_id" do
+    it "reads the group id" do
+      expect(pom.group_id).to eq "commons-logging"
+    end
+  end
+
+  describe "#artifact_id" do
+    it "reads the artifact id" do
+      expect(pom.artifact_id).to eq "commons-logging"
+    end
+  end
+
+  describe "#name" do
+    it "reads artifact name" do
+      expect(pom.name).to eq "Commons Logging"
+    end
+  end
+
+  describe "#version" do
+    it "reads the version" do
+      expect(pom.version).to eq "1.1.1"
+    end
+  end
+
+  describe "#description" do
+    it "reads the description" do
+      expect(pom.description).to eq "Commons Logging is a thin adapter allowing configurable bridging to other,\n    " \
+        "well known logging systems."
+    end
+  end
+
+  describe "#url" do
+    it "reads the url" do
+      expect(pom.url).to eq "http://commons.apache.org/logging"
+    end
+  end
+
+  describe "#license_name" do
+    it "reads the license name" do
+      expect(pom.license_name).to eq ""
+    end
+  end
+
+  describe "#runtime_dependency_ids" do
+    it "reads the dependency maven ids" do
+      expect(pom.runtime_dependency_ids).to eq []
+    end
+  end
+
+  describe "#scm_connection" do
+    it "reads the SCM connection address" do
+      expect(pom.scm_connection).to eq "scm:svn:http://svn.apache.org/repos/asf/commons/proper/" \
+        "logging/tags/commons-logging-1.1.1"
+    end
+  end
+
+  describe "#scm_url" do
+    it "reads the SCM connection url" do
+      expect(pom.scm_url).to eq "http://svn.apache.org/repos/asf/commons/proper/logging/tags/commons-logging-1.1.1"
+    end
+  end
+end

data/spec/lib/project_spec.rb

@@ -0,0 +1,254 @@
+# encoding: UTF-8
+
+require "spec_helper"
+
+describe Tetra::Project do
+  before(:each) do
+    @project_path = File.join("spec", "data", "test-project")
+    Dir.mkdir(@project_path)
+
+    Tetra::Project.init(@project_path)
+    @project = Tetra::Project.new(@project_path)
+  end
+
+  after(:each) do
+    FileUtils.rm_rf(@project_path)
+  end
+
+  describe "#project?"  do
+    it "checks if a directory is a tetra project or not" do
+      expect(Tetra::Project.project?(@project_path)).to be_truthy
+      expect(Tetra::Project.project?(File.join(@project_path, ".."))).to be_falsey
+    end
+  end
+
+  describe "#find_project_dir"  do
+    it "recursively the parent project directory" do
+      expanded_path = File.expand_path(@project_path)
+      expect(Tetra::Project.find_project_dir(expanded_path)).to eq expanded_path
+      expect(Tetra::Project.find_project_dir(File.expand_path("src", @project_path))).to eq expanded_path
+      expect(Tetra::Project.find_project_dir(File.expand_path("kit", @project_path))).to eq expanded_path
+
+      expect do
+        expect(Tetra::Project.find_project_dir(File.expand_path("..", @project_path))).to raise_error
+      end.to raise_error(Tetra::NoProjectDirectoryError)
+    end
+  end
+
+  describe ".get_package_name"  do
+    it "raises an error with a directory outside a tetra project" do
+      expect do
+        @project.get_package_name("/")
+      end.to raise_error(Tetra::NoPackageDirectoryError)
+    end
+
+    it "raises an error with a tetra project directory" do
+      expect do
+        @project.get_package_name(@project_path)
+      end.to raise_error(Tetra::NoPackageDirectoryError)
+    end
+
+    it "raises an error with a tetra kit directory" do
+      expect do
+        @project.get_package_name(File.join(@project_path, "kit"))
+      end.to raise_error(Tetra::NoPackageDirectoryError)
+    end
+
+    it "raises an error with a tetra src directory" do
+      expect do
+        @project.get_package_name(File.join(@project_path, "src"))
+      end.to raise_error(Tetra::NoPackageDirectoryError)
+    end
+
+    it "raises an error with a nonexisting package directory" do
+      expect do
+        @project.get_package_name(File.join(@project_path, "src", "test_package"))
+      end.to raise_error(Tetra::NoPackageDirectoryError)
+    end
+
+    it "returns the package on an existing package directory" do
+      FileUtils.mkdir_p(File.join(@project_path, "src", "test_package"))
+      expect(@project.get_package_name(File.join(@project_path, "src", "test_package"))).to eq "test_package"
+    end
+
+    it "returns the package on an existing package subdirectory" do
+      FileUtils.mkdir_p(File.join(@project_path, "src", "test_package", "subdir1"))
+      expect(@project.get_package_name(File.join(@project_path, "src", "test_package", "subdir1"))).to eq "test_package"
+    end
+
+    it "returns the package on an existing package subsubdirectory" do
+      FileUtils.mkdir_p(File.join(@project_path, "src", "test_package", "subdir1", "subdir2"))
+      expect(@project.get_package_name(File.join(@project_path, "src", "test_package", "subdir1", "subdir2")))
+        .to eq "test_package"
+    end
+  end
+
+  describe "full_path" do
+    it "returns the project's full path" do
+      expect(@project.full_path).to eq File.expand_path(@project_path)
+    end
+  end
+
+  describe "#init" do
+    it "inits a new project" do
+      kit_path = File.join(@project_path, "kit")
+      expect(Dir.exist?(kit_path)).to be_truthy
+
+      src_path = File.join(@project_path, "src")
+      expect(Dir.exist?(src_path)).to be_truthy
+    end
+  end
+
+  describe "#dry_running?" do
+    it "checks if a project is dry running" do
+      @project.from_directory do
+        expect(@project.dry_running?).to be_falsey
+        @project.dry_run
+        expect(@project.dry_running?).to be_truthy
+        @project.finish(false)
+        expect(@project.dry_running?).to be_falsey
+      end
+    end
+  end
+
+  describe "#take_snapshot" do
+    it "commits the project contents to git for later use" do
+      @project.from_directory do
+        `touch kit/test`
+
+        @project.take_snapshot "test", :revertable
+
+        expect(`git rev-list --all`.split("\n").length).to eq 2
+        expect(@project.latest_tag(:revertable)).to eq "revertable_1"
+      end
+    end
+  end
+
+  describe "#finish" do
+    it "ends the current dry-run phase after a successful build" do
+      @project.from_directory do
+        Dir.mkdir("src/abc")
+        `echo A > src/abc/test`
+      end
+
+      expect(@project.finish(true)).to be_falsey
+      expect(@project.finish(false)).to be_falsey
+
+      expect(@project.dry_run).to be_truthy
+
+      @project.from_directory do
+        `echo B > src/abc/test`
+        `touch src/abc/test2`
+      end
+
+      expect(@project.finish(false)).to be_truthy
+      expect(@project.dry_running?).to be_falsey
+
+      @project.from_directory do
+        expect(`git rev-list --all`.split("\n").length).to eq 4
+        expect(File.read("src/abc/test")).to eq "A\n"
+
+        expect(`git diff-tree --no-commit-id --name-only -r HEAD~`.split("\n")).to include("src/abc/test2")
+        expect(File.exist?("src/abc/test2")).to be_falsey
+      end
+    end
+    it "ends the current dry-run phase after a failed build" do
+      @project.from_directory do
+        Dir.mkdir("src/abc")
+        `echo A > src/abc/test`
+        `echo A > kit/test`
+      end
+
+      expect(@project.finish(true)).to be_falsey
+      expect(@project.finish(false)).to be_falsey
+
+      expect(@project.dry_run).to be_truthy
+
+      @project.from_directory do
+        `echo B > src/abc/test`
+        `touch src/abc/test2`
+        `echo B > kit/test`
+        `touch kit/test2`
+      end
+
+      expect(@project.finish(true)).to be_truthy
+      expect(@project.dry_running?).to be_falsey
+
+      @project.from_directory do
+        expect(`git rev-list --all`.split("\n").length).to eq 2
+        expect(File.read("src/abc/test")).to eq "A\n"
+        expect(File.exist?("src/abc/test2")).to be_falsey
+
+        expect(File.read("kit/test")).to eq "A\n"
+        expect(File.exist?("kit/test2")).to be_falsey
+      end
+    end
+  end
+
+  describe "#dry_run" do
+    it "starts a dry running phase" do
+      expect(@project.finish(false)).to be_falsey
+
+      @project.from_directory do
+        `touch src/test`
+      end
+
+      @project.from_directory("src") do
+        expect(@project.dry_run).to be_truthy
+      end
+
+      @project.from_directory do
+        expect(@project.dry_running?).to be_truthy
+        expect(`git rev-list --all`.split("\n").length).to eq 2
+        expect(`git diff-tree --no-commit-id --name-only -r HEAD`.split("\n")).to include("src/test")
+        expect(`git cat-file tag tetra_dry_run_started_1 | tail -1`).to include("src")
+      end
+    end
+  end
+
+  describe "#get_produced_files" do
+    it "gets a list of produced files" do
+      @project.from_directory do
+        Dir.mkdir("src/abc")
+        `echo A > src/abc/added_outside_dry_run`
+      end
+
+      expect(@project.dry_run).to be_truthy
+      @project.from_directory do
+        `echo A > src/abc/added_in_first_dry_run`
+        `echo A > src/added_outside_directory`
+      end
+      expect(@project.finish(false)).to be_truthy
+
+      expect(@project.dry_run).to be_truthy
+      @project.from_directory do
+        `echo A > src/abc/added_in_second_dry_run`
+      end
+      expect(@project.finish(false)).to be_truthy
+
+      list = @project.get_produced_files("abc")
+      expect(list).to include("added_in_first_dry_run")
+      expect(list).to include("added_in_second_dry_run")
+
+      expect(list).not_to include("added_outside_dry_run")
+      expect(list).not_to include("added_outside_directory")
+    end
+  end
+
+  describe "#purge_jars" do
+    it "moves jars in kit/jars" do
+      @project.from_directory do
+        `echo "jarring" > src/test.jar`
+      end
+      expect(@project.finish(false)).to be_falsey
+
+      @project.purge_jars
+
+      @project.from_directory do
+        expect(File.symlink?(File.join("src", "test.jar"))).to be_truthy
+        expect(File.readlink(File.join("src", "test.jar"))).to eq "../kit/jars/test.jar"
+        expect(File.readlines(File.join("kit", "jars", "test.jar"))).to include("jarring\n")
+      end
+    end
+  end
+end

data/spec/lib/script_generator_spec.rb

@@ -0,0 +1,67 @@
+# encoding: UTF-8
+
+require "spec_helper"
+
+describe Tetra::ScriptGenerator do
+  before(:each) do
+    @project_path = File.join("spec", "data", "test-project")
+    Dir.mkdir(@project_path)
+
+    Tetra::Project.init(@project_path)
+    @project = Tetra::Project.new(@project_path)
+
+    @project.from_directory do
+      File.open("history", "w") do |io|
+        io.puts "some earlier command"
+        io.puts "tetra dry-run --unwanted-options"
+        io.puts "cd somewhere significant"
+        io.puts "tetra mvn --options"
+        io.puts "tetra finish -a"
+        io.puts "some later command"
+      end
+
+      FileUtils.mkdir_p(File.join("src", "test-package"))
+      @project.dry_run
+
+      @generator = Tetra::ScriptGenerator.new(@project, "history")
+    end
+
+    mock_maven_executable
+  end
+
+  after(:each) do
+    FileUtils.rm_rf(@project_path)
+  end
+
+  describe "#generate_build_script" do
+    it "generates a build script from the history" do
+      @project.from_directory do
+        @generator.generate_build_script("test-package")
+
+        lines = File.readlines(File.join("src", "test-package", "build.sh"))
+
+        expect(lines).to include("#!/bin/bash\n")
+        expect(lines).to include("cd somewhere significant\n")
+        expect(lines).to include("$PROJECT_PREFIX/kit/mvn/bin/mvn -Dmaven.repo.local=$PROJECT_PREFIX/kit/m2 " \
+          "-s$PROJECT_PREFIX/kit/m2/settings.xml -o --options\n"
+        )
+
+        expect(lines).not_to include("some earlier command\n")
+        expect(lines).not_to include("tetra dry-run --unwanted-options\n")
+        expect(lines).not_to include("tetra dry-run --unwanted-options\n")
+        expect(lines).not_to include("tetra finish -a\n")
+        expect(lines).not_to include("some later command\n")
+      end
+    end
+  end
+
+  def mock_maven_executable
+    Dir.chdir(@project_path) do
+      @bin_dir = File.join("kit", "mvn", "bin")
+      FileUtils.mkdir_p(@bin_dir)
+      @maven_executable = File.join(@bin_dir, "mvn")
+      File.open(@maven_executable, "w") { |io| io.puts "echo $0 $*>test_out" }
+      File.chmod(0777, @maven_executable)
+    end
+  end
+end

data/spec/lib/source_getter_spec.rb

@@ -0,0 +1,36 @@
+# encoding: UTF-8
+
+require "spec_helper"
+require "fileutils"
+
+describe Tetra::SourceGetter do
+  include Tetra::Mockers
+  let(:source_getter) { Tetra::SourceGetter.new }
+
+  before(:each) do
+    create_mock_project
+  end
+
+  after(:each) do
+    delete_mock_project
+  end
+
+  describe "#get_maven_source_jars" do
+    it "gets sources for jars in the Maven repo through Maven itself" do
+      create_mock_executable("mvn")
+
+      @project.from_directory(File.join("kit", "m2")) do
+        jar_dir_path = File.join("net", "test", "artifact", "1.0")
+        jar_path = File.join(jar_dir_path, "artifact-1.0-blabla.jar")
+        FileUtils.mkdir_p(jar_dir_path)
+        FileUtils.touch(jar_path)
+
+        successes, failures = source_getter.get_maven_source_jars(@project)
+        commandline = File.read(File.join("..", "..", "test_out")).strip
+        expect(commandline).to match(/-Dartifact=net.test:artifact:1.0:jar:sources -Dtransitive=false$/)
+        expect(successes).to include File.join(".", "kit", "m2", jar_path)
+        expect(failures).to eq []
+      end
+    end
+  end
+end