thumblemonks-grudge 0.1.0

data/test/config_test.rb

@@ -0,0 +1,18 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+class ConfigTest < Test::Unit::TestCase
+  context "config file" do
+    setup do
+      config_file = StringIO.new({"foo" => {"bar" => "baz"}}.to_yaml)
+      @config = Grudge::Config::ConfigFile.new(config_file, :foo)
+    end
+
+    should "scope to specified environment" do
+      assert_equal "baz", @config.bar
+    end
+  end
+  
+  should "return hash as value of repository" do
+    assert_kind_of Hash, Grudge::Config.repo
+  end
+end

data/test/grudge_test.rb

@@ -0,0 +1,193 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+class GrudgeTest < Test::Unit::TestCase
+  context "grudge" do
+    setup do
+      Grudge::Repository.stubs(:object).returns(repository_commit)
+    end
+
+    context "/" do
+      should "redirect to /recent" do
+        assert_redirected_to('/recent') { get_it '/' }
+      end
+    end # /
+
+    context "list view" do
+      setup do
+        @commits = (1..20).map {Factory.build(:commit)}
+      end
+
+      context "/recent" do
+        setup do
+          Commit.expects(:recent).returns(@commits)
+          get_it '/recent'
+          @h = Hpricot(@response.body)
+        end
+
+        should "render 20 most recent commits" do
+          assert_equal 20, (@h/'.commit').length
+        end
+
+        should "set a title" do
+          assert_match %r[Recent commits$], (@h/'title').text
+        end
+      end # /recent
+
+      context "/popular" do
+        setup do
+          Commit.expects(:popular).returns(@commits)
+          get_it '/popular'
+          @h = Hpricot(@response.body)
+        end
+
+        should "render 20 most recent commits" do
+          assert_equal 20, (@h/'.commit').length
+        end
+
+        should "set a title" do
+          assert_match %r[Popular commits$], (@h/'title').text
+        end
+      end # /popular
+
+      context "/unpopular" do
+        setup do
+          Commit.expects(:unpopular).returns(@commits)
+          get_it '/unpopular'
+          @h = Hpricot(@response.body)
+        end
+
+        should "render 20 most recent commits" do
+          assert_equal 20, (@h/'.commit').length
+        end
+
+        should "set a title" do
+          assert_match %r[Unpopular commits$], (@h/'title').text
+        end
+      end # /unpopular
+    end # list view
+
+    context "/:sha" do
+      context "found an entry" do
+        setup do
+          @commit = Factory.build(:commit, :sha => 'abc')
+          Commit.expects(:first).with(:sha => 'abc').returns(@commit)
+          get_it "/#{@commit.sha}"
+          @h = Hpricot(@response.body)
+        end
+    
+        should "render one commit entry" do
+          assert_equal 1, (@h/'.commit').length
+        end
+
+        should "set title to sha" do
+          assert_match %r[abc$], (@h/'title').text
+        end
+      end # found an entry
+
+      context "no entry found" do
+        setup do
+          Commit.expects(:first).with(:sha => 'abcdef').returns(nil)
+          get_it "/abcdef"
+          @h = Hpricot(@response.body)
+        end
+    
+        should "render not found page" do
+          assert_match %r[I don't even know you anymore], (@h/'body').text
+        end
+      end # no entry found
+    end # /:sha
+
+    context "voting" do
+      context "record found" do
+        setup do
+          @commit = Factory.build(:commit, :sha => 'abc')
+          Commit.expects(:first).with(:sha => 'abc').returns(@commit)
+        end
+
+        context "for /:sha/awesome" do
+          setup do
+            @commit.expects(:awesome!)
+            get_it "/abc/awesome"
+          end
+          should "redirect to show page" do
+            assert_redirected_to '/abc'
+          end
+        end # for /:sha/awesome
+
+        context "for /:sha/suck" do
+          setup do
+            @commit.expects(:suck!)
+            get_it "/abc/suck"
+          end
+          should "redirect to show page" do
+            assert_redirected_to '/abc'
+          end
+        end # for /:sha/suck
+      end # record found
+
+      context "record not found" do
+        setup do
+          Commit.expects(:first).returns(nil)
+        end
+
+        context "for /:sha/awesome" do
+          setup do
+            get_it "/abc/awesome"
+            @h = Hpricot(@response.body)
+          end
+          should "render not found page" do
+            assert_match %r[I don't even know you anymore], (@h/'body').text
+          end
+        end # for /:sha/awesome
+
+        context "for /:sha/suck" do
+          setup do
+            get_it "/abc/suck"
+            @h = Hpricot(@response.body)
+          end
+          should "render not found page" do
+            assert_match %r[I don't even know you anymore], (@h/'body').text
+          end
+        end # for /:sha/suck
+      end # record not found
+    end # voting
+
+    context "/search" do
+      context "for existing commit" do
+        setup do
+          @commit = Factory.build(:commit, :sha => 'abc')
+          Commit.expects(:search).with('abc').returns(@commit)
+          post_it '/search', {'query' => 'abc'}
+          @h = Hpricot(@response.body)
+        end
+
+        should "render page with just one commit" do
+          assert_equal 1, (@h/'.commit').length
+        end
+      end
+    
+      context "for nonexistant commit" do
+        setup do
+          Commit.expects(:search).with('abc').returns(nil)
+          post_it '/search', {'query' => 'abc'}
+          @h = Hpricot(@response.body)
+        end
+        should "render not found page" do
+          assert_match %r[I don't even know you anymore], (@h/'body').text
+        end
+      end
+    end # /search
+
+    context "/repository/pull" do
+      setup do
+        @commits = (1..2).map {Factory(:commit)}
+        Commit.expects(:download!)
+        post_it '/repository/pull'
+      end
+
+      should "render blank page" do
+        assert_equal '', @response.body
+      end
+    end # /repository/pull
+  end # grudge
+end

data/test/model_factory.rb

@@ -0,0 +1,30 @@
+require 'factory_girl'
+require 'ostruct'
+
+# Model stuff
+
+Factory.sequence :sha do |n|
+  "a#{n}b#{n}c#{n}d#{n}e#{n}f#{n}"
+end
+
+Factory.define :commit do |commit|
+  commit.sha { Factory.next(:sha) }
+  commit.committed_at Time.now
+  commit.score 0
+end
+
+Factory.define :awesome, :class => Vote do |vote|
+  vote.score 1
+end
+
+Factory.define :suck, :class => Vote do |vote|
+  vote.score -1
+end
+
+# Repository stuff
+
+def repository_commit(attributes={})
+  defaults = {:sha => Factory.next(:sha), :author => O(:name => "Barney"),
+    :committer_date => Time.now, :message => "This is the shiznit!"}
+  O(defaults.merge(attributes))
+end

data/test/repository_test.rb

@@ -0,0 +1,118 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+class RepositoryTest < Test::Unit::TestCase
+
+  context "origin uri" do
+    should "return URI of repository/origin from config" do
+      assert_equal URI.parse('test/origin.git'), Grudge::Repository.origin_uri
+    end
+  end # origin uri
+
+  context "master path" do
+    should "return path from repository/master in config" do
+      assert_equal 'test/clone.git', Grudge::Repository.master_path
+    end
+  end # master path
+
+  context "open" do
+    context "logging" do
+      should "write to configured log" do
+        Git.expects(:open).with(any_parameters)
+        Grudge::Config.expects(:log)
+        Grudge::Repository.open
+      end
+    end # logging
+
+    context "without valid working directory" do
+      should "raise an error" do
+        assert_raise(ArgumentError) { Grudge::Repository.open }
+      end
+    end # without valid working directory
+  end # open
+
+  context "open or clone" do
+    should "clone if no master path exists" do
+      Git.expects(:clone).with(Grudge::Repository.origin_uri,
+        Grudge::Repository.master_path, any_parameters)
+      Grudge::Repository.open_or_clone
+    end
+
+    should "open if master_path exists" do
+      File.expects(:exists?).with(Grudge::Repository.master_path).returns(true)
+      Grudge::Repository.expects(:open)
+      Grudge::Repository.open_or_clone
+    end
+  end # open or clone
+
+  context "pull" do
+    setup do
+      git = mock('git repo') do
+        expects(:pull).with('origin', 'origin/master', 'grudge origin pull')
+      end
+      Grudge::Repository.stubs(:open).returns(git)
+    end
+
+    should "fetch from origin and merge from origin/master" do
+      Grudge::Repository.pull
+    end
+  end # pull
+
+  context "object" do
+    setup do
+      git = mock('git repo') { expects(:object).with('abc') }
+      Grudge::Repository.stubs(:open).returns(git)
+    end
+
+    should "return object for given sha" do
+      Grudge::Repository.object('abc')
+    end
+  end # object
+
+  context "latest commits" do
+    setup do
+      @repo_commits = (1..10).map { |i| Factory.next(:sha) }
+      Grudge::Repository.expects(:pull)
+    end
+    
+    context "when since is provided" do
+      should "also provide a between option" do
+        since = 'abcdef'
+        git = O(:lib => stub('lib'))
+        git.lib.expects(:log_commits).with(:between => [since, '']).returns([])
+        Grudge::Repository.expects(:open).returns(git)
+        Grudge::Repository.latest_commits_since(since)
+      end
+    end # when since provided
+
+    context "when since is not provided" do
+      should "not provide any options" do
+        git = O(:lib => stub('lib'))
+        git.lib.expects(:log_commits).with({}).returns([])
+        Grudge::Repository.expects(:open).returns(git)
+        Grudge::Repository.latest_commits_since(nil)
+      end
+    end # when since is not provided
+
+    context "yield" do
+      setup do
+        git = O(:lib => O(:log_commits => @repo_commits))
+        Grudge::Repository.expects(:open).returns(git)
+        Grudge::Repository.expects(:object).times(10).with(kind_of(String)).
+          returns(repository_commit(:sha => 'abc'))
+      end
+
+      should "for each commit" do
+        count = 0
+        Grudge::Repository.latest_commits_since { |o| count += 1 }
+        assert_equal 10, count
+      end
+
+      should "an object loaded from :sha" do
+        Grudge::Repository.latest_commits_since do |o|
+          assert_kind_of OpenStruct, o
+        end
+      end
+    end # yield
+  end # latest commits since
+
+end

data/test/test_helper.rb

@@ -0,0 +1,46 @@
+require 'rubygems'
+require 'hpricot'
+
+require 'sinatra'
+require 'sinatra/test/unit'
+require File.join(File.dirname(__FILE__), '..', 'lib', 'grudge')
+
+require 'mocha'
+require 'shoulda'
+require 'ostruct'
+require File.join(File.dirname(__FILE__), 'model_factory')
+
+# TODO: Move to custom_assertions or make a new library for others to use.
+# Gus would want to call it Chicago (as in "Chicago. It's my kind of town.")
+
+class Test::Unit::TestCase
+  def teardown
+    Commit.all.destroy!
+  end
+
+  # Generic test helpers
+
+  def deny(check, message=nil) assert(!check, message); end
+
+  def O(*args) OpenStruct.new(*args); end
+
+  # Controller test helpers
+
+  def assert_redirected_to(expected_path, &block)
+    yield if block_given?
+    assert_equal 302, @response.status
+    action = expected_path.kind_of?(Regexp) ? 'match' : 'equal'
+    send("assert_#{action}", expected_path, @response.headers["Location"])
+  end
+
+  def assert_ok(&block)
+    yield
+    assert_equal 200, @response.status
+  end
+
+  # Model test helpers
+  # Add some of these to a Shoulda::DataMapper::Macros thing
+  # def self.should_require_attributes(attributes=[])
+  # def self.should_expect_a_default_value :attribute, expected_value
+  # def self.should_be_unique :attribute
+end

data/test/vote_test.rb

@@ -0,0 +1,65 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+class VoteTest < Test::Unit::TestCase
+  context "required attributes" do
+    setup do
+      @vote = Vote.new
+      @vote.valid?
+      @errors = @vote.errors
+    end
+  
+    should "include score" do
+      assert_contains @errors[:score], "Score must not be blank"
+    end
+
+    should "include commit id" do
+      assert_contains @errors[:commit_id], "Commit must not be blank"
+    end
+  end # required attributes
+
+  context "associations" do
+    should "belong to commit" do
+      assert_equal Hash.new, Vote.relationships[:commit].options
+      assert_equal Commit, Vote.relationships[:commit].parent_model
+    end
+  end # associations
+
+  context "building awesome votes" do
+    setup { @vote = Vote.awesome }
+    should "create new vote with positive score" do
+      assert_equal 1, @vote.score
+    end
+
+    should "create unsaved vote" do
+      assert @vote.new_record?
+    end
+
+    should "be awesome?" do
+      assert @vote.awesome?
+    end
+
+    should "not suck?" do
+      deny @vote.suck?
+    end
+  end # building awesome votes
+
+  context "building sucky votes" do
+    setup { @vote = Vote.suck }
+    should "create new vote with negative score" do
+      assert_equal -1, @vote.score
+    end
+
+    should "create unsaved vote" do
+      assert @vote.new_record?
+    end
+
+    should "not be awesome?" do
+      deny @vote.awesome?
+    end
+
+    should "suck?" do
+      assert @vote.suck?
+    end
+  end # building sucky votes
+
+end