gforces-integrity 0.1.9.3

data/test/acceptance/error_page_test.rb

@@ -0,0 +1,18 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class ErrorPageTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As an user,
+    I want to be shown a friendly page when something go terribly wrong
+    So that I can understand what's going on
+  EOS
+
+  scenario "an error happen while I am browsing my Integrity install" do
+    stub(Project).only_public_unless(false) { raise ArgumentError }
+    lambda { visit "/" }.should raise_error(Webrat::PageLoadError)
+
+    response_code.should == 500
+    assert_have_tag("h1", :content => "Whatever you do")
+    assert_have_tag("strong", :content => "ArgumentError")
+  end
+end

data/test/acceptance/installer_test.rb

@@ -0,0 +1,79 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+require "integrity/installer"
+
+class InstallerTest < Test::Unit::AcceptanceTestCase
+  include FileUtils
+
+  story <<-EOS
+    As an user,
+    I want to easily install Integrity
+    So that I can spend time actually writing code
+  EOS
+
+  before(:each) do
+    rm_rf root if File.directory?(root)
+  end
+
+  def root
+    Pathname("/tmp/i-haz-integrity")
+  end
+
+  def install(option="")
+    installer = File.dirname(__FILE__) + "/../../bin/integrity"
+    IO.popen("#{installer} install #{root} #{option}".strip).read
+  end
+
+  scenario "Installing integrity into a given directory" do
+    post_install_message = install
+
+    assert post_install_message.include?("Awesome")
+    assert post_install_message.include?("integrity migrate_db #{root.join("config.yml")}")
+
+    assert root.join("builds").directory?
+    assert root.join("log").directory?
+    assert ! root.join("public").directory?
+    assert ! root.join("tmp").directory?
+
+    assert ! root.join("Rakefile").file?
+    assert ! root.join("integrity.rb").file?
+    assert ! root.join(".gems").file?
+
+    assert ! root.join("thin.yml").file?
+    assert root.join("config.ru").file?
+
+    config = YAML.load_file(root.join("config.yml"))
+
+    config[:export_directory].should == root.join("builds").to_s
+    config[:database_uri].should == "sqlite3://#{root}/integrity.db"
+    config[:log].should          == root.join("log/integrity.log").to_s
+  end
+
+  scenario "Installing integrity for Passenger" do
+    install("--passenger")
+
+    assert root.join("public").directory?
+    assert root.join("tmp").directory?
+  end
+
+  scenario "Installing Integrity for Thin" do
+    install("--thin")
+
+    config = YAML.load_file(root.join("thin.yml"))
+    config["chdir"].should  == root.to_s
+    config["pid"].should    == root.join("thin.pid").to_s
+    config["rackup"].should == root.join("config.ru").to_s
+    config["log"].should    == root.join("log/thin.log").to_s
+  end
+
+  scenario "Installing Integrity for Heroku" do
+    message = install("--heroku")
+
+    assert_equal "integrity --version 0.1.9.0", root.join(".gems").read.chomp
+
+    assert root.join("Rakefile").file?
+    assert root.join("integrity-config.rb").file?
+    assert root.join("config.ru").file?
+
+    assert message.include?("ready to be deployed onto Heroku")
+  end
+end

data/test/acceptance/manual_build_project_test.rb

@@ -0,0 +1,82 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class ManualBuildProjectTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As an administrator,
+    I want to manually build my project
+    So that I know if it builds properly
+  EOS
+
+  scenario "clicking on 'Manual Build' triggers a successful build" do
+    git_repo(:my_test_project).add_successful_commit
+    Project.gen(:my_test_project, :uri => git_repo(:my_test_project).path)
+    login_as "admin", "test"
+
+    visit "/my-test-project"
+    click_button "manual build"
+
+    assert_have_tag("h1", :content =>
+      "Built #{git_repo(:my_test_project).short_head} successfully")
+    assert_have_tag("blockquote p", :content => "This commit will work")
+    assert_have_tag("span.who",     :content => "by: John Doe")
+    assert_have_tag("span.when",    :content => "today")
+    assert_have_tag("pre.output",   :content => "Running tests...")
+  end
+
+  scenario "clicking on 'Manual Build' triggers a failed build" do
+    git_repo(:my_test_project).add_failing_commit
+    Project.gen(:my_test_project, :uri => git_repo(:my_test_project).path)
+    login_as "admin", "test"
+
+    visit "/my-test-project"
+    click_button "manual build"
+
+    assert_have_tag("h1",
+      :content => "Built #{git_repo(:my_test_project).short_head} and failed")
+    assert_have_tag("blockquote p", :content => "This commit will fail")
+  end
+
+  scenario "fixing the build command and then rebuilding result in a successful build" do
+    git_repo(:my_test_project).add_successful_commit
+    Project.gen(:my_test_project,
+                :uri => git_repo(:my_test_project).path,
+                :command => "ruby not-found.rb")
+
+    login_as "admin", "test"
+
+    visit "/my-test-project"
+    click_button "manual build"
+    assert_have_tag("h1", :content => "failed")
+
+    visit "/my-test-project/edit"
+    fill_in "Build script", :with => "./test"
+    click_button "Update Project"
+
+    visit "/my-test-project"
+    click_button "Build the last commit"
+
+    assert_have_tag("h1", :content => "success")
+  end
+
+  scenario "Successful builds should not display the 'Rebuild' button" do
+    git_repo(:my_test_project).add_successful_commit
+    Project.gen(:my_test_project, :uri => git_repo(:my_test_project).path)
+    login_as "admin", "test"
+
+    visit "/my-test-project"
+    click_button "manual build"
+
+    assert_have_no_tag("button", :content => "Rebuild")
+  end
+
+  scenario "Failed builds should display the 'Rebuild' button" do
+    git_repo(:my_test_project).add_failing_commit
+    Project.gen(:my_test_project, :uri => git_repo(:my_test_project).path)
+    login_as "admin", "test"
+
+    visit "/my-test-project"
+    click_button "manual build"
+
+    assert_have_tag("button", :content => "Rebuild")
+  end
+end

data/test/acceptance/not_found_page_test.rb

@@ -0,0 +1,29 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class NotFoundPageTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As an visitor,
+    I want to be shown a friendly four oh four
+    So that I DON'T HAVE TO THINK.
+  EOS
+
+  scenario "chilling on some Integrity instance found via The Holy Hub" do
+    project = Project.gen
+
+    visit "/42"
+    assert_equal 404, response_code
+
+    click_link "list of projects"
+    assert_contain(project.name)
+
+    visit "/42"
+
+    click_link "the projects list"
+    assert_contain(project.name)
+
+    visit "/42"
+
+    click_link "back from whence you came"
+    assert_contain("Add a new project")
+  end
+end

data/test/acceptance/project_syndication_test.rb

@@ -0,0 +1,30 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class ProjectSyndicationTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As a user,
+    I want to subscribe to a public project's Atom feed
+    So I can know the status of my favorite projects while having my morning coffee
+  EOS
+
+  scenario "a public project's page includes an autodiscovery link tag for the feed" do
+    Project.gen(:integrity, :public => true)
+    visit "/integrity"
+
+    assert_have_tag("link[@href='/integrity.atom']")
+  end
+
+  scenario "a public project's feed should include the latest builds" do
+    commits = 10.of { Commit.gen(:successful) } + 1.of { Commit.gen(:failed) }
+    Project.gen(:integrity, :public => true, :commits => commits)
+
+    visit "/integrity.atom"
+
+    # TODO: check for content-type
+
+    assert_have_tag("feed title", :content => "Build history for Integrity")
+    assert_have_tag("feed entry", :count => 11)
+    assert_have_tag("feed entry:first title", :content => "success")
+    assert_have_tag("feed entry:last title",  :content => "failed")
+  end
+end

data/test/acceptance/stylesheet_test.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class IntegrityStylesheetTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As a user,
+    I want the stylesheet to work (even with Sinatra 0.9.1)
+    So that Integrity isn't a PITA to use
+  EOS
+
+  scenario "browsing on some Integrity install" do
+    visit "/"
+    assert_have_tag("link[@href='/integrity.css']")
+    visit "/integrity.css"
+
+    assert_contain("body {")
+    # TODO: Check that it actually returns a 302
+    assert_equal %Q{"2465c472aacf302259dde5146a841e45"},
+      webrat_session.send(:response).headers["ETag"]
+
+    visit "/reset.css"
+    assert_contain("Yahoo!")
+
+    visit "/buttons.css"
+    assert_contain("button {")
+  end
+end

data/test/acceptance/unauthorized_page_test.rb

@@ -0,0 +1,20 @@
+require File.dirname(__FILE__) + "/../helpers/acceptance"
+
+class UnauthorizedPageTest < Test::Unit::AcceptanceTestCase
+  story <<-EOS
+    As an administrator,
+    I want to be shown a friendly login error page
+    So that I don't feel guilty of loosing my password
+  EOS
+
+  scenario "an administrator (who's amnesiac) tries to login" do
+    project = Project.gen(:public => false)
+
+    visit "/#{project.name}/edit"
+    assert_equal 401, response_code
+
+    # TODO click_link "try again"
+    assert_have_tag("a[@href='/login']", :content => "try again")
+    assert_have_tag("a[@href='/']",      :content => "go back")
+  end
+end

data/test/helpers.rb

@@ -0,0 +1,82 @@
+$:.unshift File.dirname(__FILE__) + "/../lib", File.dirname(__FILE__)
+
+require "rubygems"
+
+require "test/unit"
+require "rr"
+require "mocha"
+require "dm-sweatshop"
+require "webrat/sinatra"
+
+gem "jeremymcanally-context"
+gem "jeremymcanally-matchy"
+gem "jeremymcanally-pending"
+require "context"
+require "matchy"
+require "pending"
+
+require "integrity"
+require "integrity/notifier/test/fixtures"
+
+require "helpers/expectations"
+
+begin
+  require "ruby-debug"
+  require "redgreen"
+rescue LoadError
+end
+
+module TestHelper
+  def ignore_logs!
+    Integrity.config[:log] = "/tmp/integrity.test.log"
+  end
+
+  def capture_stdout
+    output = StringIO.new
+    $stdout = output
+    yield
+    $stdout = STDOUT
+    output
+  end
+
+  def silence_warnings
+    $VERBOSE, v = nil, $VERBOSE
+    yield
+  ensure
+    $VERBOSE = v
+  end
+end
+
+class Test::Unit::TestCase
+  class << self
+    alias_method :specify, :test
+  end
+
+  include RR::Adapters::TestUnit
+  include Integrity
+  include TestHelper
+
+  before(:all) do
+    DataMapper.setup(:default, "sqlite3::memory:")
+
+    require "integrity/migrations"
+  end
+
+  before(:each) do
+    [Project, Build, Commit, Notifier].each(&:auto_migrate_down!)
+    capture_stdout { Integrity.migrate_db }
+
+    RR.reset
+
+    Notifier.available.each { |n|
+      Notifier.send(:remove_const, n.to_s.split(":").last.to_sym)
+    }
+
+    Notifier.available.clear
+    Integrity.instance_variable_set(:@config, nil)
+  end
+
+  after(:each) do
+    capture_stdout { Integrity::Migrations.migrate_down! }
+  end
+end

data/test/helpers/acceptance.rb

@@ -0,0 +1,83 @@
+require File.dirname(__FILE__) + "/../helpers"
+
+gem "foca-storyteller"
+require "storyteller"
+
+require "helpers/acceptance/git_helper"
+
+module AcceptanceHelper
+  include FileUtils
+
+  def export_directory
+    File.dirname(__FILE__) + "/../../exports"
+  end
+
+  def enable_auth!
+    Integrity.config[:use_basic_auth]      = true
+    Integrity.config[:admin_username]      = "admin"
+    Integrity.config[:admin_password]      = "test"
+    Integrity.config[:hash_admin_password] = false
+  end
+
+  def login_as(user, password)
+    def AcceptanceHelper.logged_in; true; end
+    basic_auth user, password
+    visit "/login"
+    Integrity::App.before { login_required if AcceptanceHelper.logged_in }
+  end
+
+  def log_out
+    def AcceptanceHelper.logged_in; false; end
+    @_webrat_session = Webrat::SinatraSession.new(self)
+  end
+
+  def disable_auth!
+    Integrity.config[:use_basic_auth] = false
+  end
+
+  def set_and_create_export_directory!
+    FileUtils.rm_r(export_directory) if File.directory?(export_directory)
+    FileUtils.mkdir(export_directory)
+    Integrity.config[:export_directory] = export_directory
+  end
+
+  def setup_log!
+    log_file = Pathname(File.dirname(__FILE__) + "/../../integrity.log")
+    log_file.delete if log_file.exist?
+    Integrity.config[:log] = log_file
+  end
+end
+
+class Test::Unit::AcceptanceTestCase < Test::Unit::TestCase
+  include AcceptanceHelper
+  include Test::Storyteller
+  include GitHelper
+  include Webrat::Methods
+  include Webrat::Matchers
+  include Webrat::HaveTagMatcher
+
+  # TODO: does this belongs in Webrat::SinatraSession?
+  Webrat::Methods.delegate_to_session :response_code
+
+  def app
+    Integrity::App.tap { |app|
+      app.set     :environment, :test
+      app.disable :raise_errors, :run, :reload
+    }
+  end
+
+  before(:each) do
+    # ensure each scenario is run in a clean sandbox
+    Integrity.config[:base_uri] = "http://www.example.com"
+    enable_auth!
+    setup_log!
+    set_and_create_export_directory!
+    log_out
+  end
+
+  after(:each) do
+    destroy_all_git_repos
+    rm_r export_directory if File.directory?(export_directory)
+  end
+
+end