integrity 0.1.8 → 0.1.9.0

data/test/helpers/acceptance/email_notifier.rb

@@ -0,0 +1,55 @@
+require 'rubygems'
+require 'integrity'
+
+module Integrity
+  class Notifier
+    class Email < Notifier::Base
+      attr_reader :to, :from
+
+      def self.to_haml
+        <<-EOF
+%p.normal
+  %label{ :for => "email_notifier_to" } Send to
+  %input.text#email_notifier_to{ :name => "notifiers[Email][to]", :type => "text", :value => config["to"] }
+
+%p.normal
+  %label{ :for => "email_notifier_from" } Send from
+  %input.text#email_notifier_from{ :name => "notifiers[Email][from]", :type => "text", :value => config["from"] }
+
+%h3 SMTP Server Configuration
+
+%p.normal
+  %label{ :for => "email_notifier_host" } Host : Port
+  = succeed " : " do
+    %input.text#email_notifier_host{ :name => "notifiers[Email][host]", :value => config["host"], :style => "width: 24.5em;", :type => "text" }
+  %input.text#email_notifier_port{ :name => "notifiers[Email][port]", :value => config["port"], :style => "width: 3.5em;", :type => "text" }
+
+%p.normal
+  %label{ :for => "email_notifier_user" } User
+  %input.text#email_notifier_user{ :name => "notifiers[Email][user]", :value => config["user"], :type => "text" }
+
+%p.normal
+  %label{ :for => "email_notifier_pass" } Password
+  %input.text#email_notifier_pass{ :name => "notifiers[Email][pass]", :value => config["pass"], :type => "text" }
+
+%p.normal
+  %label{ :for => "email_notifier_auth" } Auth type
+  %input.text#email_notifier_auth{ :name => "notifiers[Email][auth]", :value => (config["auth"] || "plain"), :type => "text" }
+
+%p.normal
+  %label{ :for => "email_notifier_domain" } Domain
+  %input.text#email_notifier_domain{ :name => "notifiers[Email][domain]", :value => config["domain"], :type => "text" }
+EOF
+      end
+
+      def initialize(build, config={})
+        @to     = config.delete("to")
+        @from   = config.delete("from")
+        super
+      end
+
+      def deliver!
+      end
+    end
+  end
+end

data/test/helpers/acceptance/git_helper.rb

@@ -1,32 +1,32 @@
 module GitHelper
   @@_git_repositories = Hash.new {|h,k| h[k] = Repo.new(k) }
-  
+
   def git_repo(name)
     @@_git_repositories[name]
   end
-  
+
   def destroy_all_git_repos
     @@_git_repositories.each {|n,r| r.destroy }
     @@_git_repositories.clear
   end
-  
+
   class Repo
     attr_reader :path
-    
+
     def initialize(name)
       @name = name
       @path = "/tmp" / @name.to_s
       create
     end
-    
+
     def path
       @path / ".git"
     end
-    
+
     def create
       destroy
       FileUtils.mkdir_p @path
-      
+
       Dir.chdir(@path) do
         system 'git init &>/dev/null'
         system 'git config user.name "John Doe"'
@@ -35,7 +35,7 @@ module GitHelper
         system 'git add README &>/dev/null'
         system 'git commit -m "First commit" &>/dev/null'
       end
-      
+
       add_successful_commit
     end
 
@@ -43,7 +43,7 @@ module GitHelper
       Dir.chdir(@path) do
         commits = `git log --pretty=oneline`.collect { |line| line.split(" ").first }
         commits.inject([]) do |commits, sha1|
-          format  = %Q(---%n:message: >-%n  %s%n:timestamp: %ci%n:id: #{sha1})
+          format  = %Q(---%n:message: >-%n  %s%n:timestamp: %ci%n:id: %H%n:author: %n :name: %an%n :email: %ae%n)
           commits << YAML.load(`git show -s --pretty=format:"#{format}" #{sha1}`)
         end
       end
@@ -55,7 +55,7 @@ module GitHelper
         system %Q(git commit -m "#{message}" &>/dev/null)
       end
     end
-    
+
     def add_failing_commit
       add_commit "This commit will fail" do
         system %Q(echo '#{build_script(false)}' > test)
@@ -71,23 +71,23 @@ module GitHelper
         system %Q(git add test &>/dev/null)
       end
     end
-    
+
     def head
       Dir.chdir(@path) do
         `git log --pretty=format:%H | head -1`.chomp
       end
     end
-    
+
     def short_head
       head[0..6]
     end
-    
+
     def destroy
       FileUtils.rm_rf @path if File.directory?(@path)
     end
-    
+
     protected
-    
+
       def build_script(successful=true)
         <<-script
 #!/bin/sh

data/test/helpers/acceptance/textfile_notifier.rb

@@ -8,12 +8,12 @@ module Integrity
   %input.text#textfile_notifier_file{ :name => "notifiers[Textfile][file]", :type => "text", :value => config["file"] }
         haml
       end
-      
+
       def initialize(build, config={})
         super
         @file = @config["file"]
       end
-      
+
       def deliver!
         File.open(@file, "a") do |f|
           f.puts "=== #{short_message} ==="
@@ -23,4 +23,4 @@ module Integrity
       end
     end
   end
-end
+end

data/test/helpers/expectations.rb

@@ -2,4 +2,3 @@ require File.dirname(__FILE__) + "/expectations/be_a"
 require File.dirname(__FILE__) + "/expectations/change"
 require File.dirname(__FILE__) + "/expectations/have"
 require File.dirname(__FILE__) + "/expectations/predicates"
-require File.dirname(__FILE__) + "/expectations/have_tag"

data/test/helpers/expectations/be_a.rb

@@ -4,20 +4,20 @@ module Matchy::Expectations
       @receiver = receiver
       @receiver.is_a?(@expected)
     end
-  
+
     def failure_message
       "Expected #{@receiver.inspect} to be a #{@expected.inspect}."
     end
-  
+
     def negative_failure_message
       "Expected #{@receiver.inspect} to not be a #{@expected.inspect}."
     end
   end
-  
+
   module TestCaseExtensions
     def be_a(obj)
       Matchy::Expectations::BeAExpectation.new(obj, self)
     end
     alias :be_an :be_a
   end
-end
+end

data/test/helpers/expectations/change.rb

@@ -10,16 +10,16 @@ module Matchy::Expectations
 
     def matches?(event_proc)
       raise_block_syntax_error if block_given?
-      
+
       @before = evaluate_value_proc
       event_proc.call
       @after = evaluate_value_proc
-      
+
       return false if @from unless @from == @before
       return false if @to unless @to == @after
       return (@before + @amount == @after) if @amount
       return ((@after - @before) >= @minimum) if @minimum
-      return ((@after - @before) <= @maximum) if @maximum        
+      return ((@after - @before) <= @maximum) if @maximum
       return @before != @after
     end
 
@@ -68,7 +68,7 @@ module Matchy::Expectations
     def by_at_most(maximum)
       @maximum = maximum
       self
-    end      
+    end
 
     def to(to)
       @to = to
@@ -87,4 +87,4 @@ module Matchy::Expectations
       Matchy::Expectations::ChangeExpectation.new(receiver, message, self, &block)
     end
   end
-end
+end

data/test/helpers/expectations/have.rb

@@ -87,19 +87,19 @@ EOF
     end
   end
 
-  
+
   module TestCaseExtensions
     def have(n)
       HaveExpectation.new(n, :exactly, self)
     end
     alias :have_exactly :have
-    
+
     def have_at_least(n)
       HaveExpectation.new(n, :at_least, self)
     end
-    
+
     def have_at_most(n)
       HaveExpectation.new(n, :at_most, self)
     end
   end
-end
+end

data/test/helpers/expectations/predicates.rb

@@ -5,12 +5,12 @@ module Matchy::Expectations
       @predicate = predicate
       @arguments = arguments
     end
-    
+
     def matches?(receiver)
       @receiver = receiver
       @receiver.send("#{@predicate}?", *@arguments)
     end
-    
+
     def failure_message
       message = "Expected #{@receiver.inspect} to be #{@predicate}"
       message << " with #{@arguments.map {|e| e.inspect }.join(", ")}" unless @arguments.empty?
@@ -23,7 +23,7 @@ module Matchy::Expectations
       message
     end
   end
-  
+
   module TestCaseExtensions
     def method_missing(method, *args, &block)
       if method.to_s =~ /^be_(.*)/
@@ -34,4 +34,4 @@ module Matchy::Expectations
       end
     end
   end
-end
+end

data/test/helpers/fixtures.rb

@@ -1,5 +1,4 @@
-require 'rubygems'
-require 'dm-sweatshop'
+require "dm-sweatshop"
 
 include DataMapper::Sweatshop::Unique
 
@@ -9,16 +8,6 @@ class Array
   end
 end
 
-def commit_metadata
-  meta_data = <<-EOS
----
-:author: #{/\w+ \w+ <\w+@example.org>/.gen}
-:message: >-
-  #{/\w+/.gen}
-:date: #{unique {|i| Time.mktime(2008, 12, 15, 18, (59 - i) % 60) }}
-EOS
-end
-
 def create_notifier!(name)
   klass = Class.new(Integrity::Notifier::Base) do
     def self.to_haml; "";   end
@@ -51,19 +40,56 @@ end
 
 Integrity::Project.fixture(:my_test_project) do
   { :name       => "My Test Project",
-    :uri        => Integrity.root / "my-test-project",
+    :uri        => File.dirname(__FILE__) + "/../../",
     :branch     => "master",
     :command    => "./test",
     :public     => true,
     :building   => false }
 end
 
+Integrity::Commit.fixture do
+  project = Integrity::Project.first || Integrity::Project.gen
+
+  { :identifier =>   Digest::SHA1.hexdigest(/[:paragraph:]/.gen),
+    :message =>      /[:sentence:]/.gen,
+    :author =>       /\w+ \w+ <\w+@example.org>/.gen,
+    :committed_at => unique {|i| Time.mktime(2008, 12, 15, 18, (59 - i) % 60) },
+    :project_id =>   project.id }
+end
+
+Integrity::Commit.fixture(:successful) do
+  Integrity::Commit.generate_attributes.update(:build => Integrity::Build.gen(:successful))
+end
+
+Integrity::Commit.fixture(:failed) do
+  Integrity::Commit.generate_attributes.update(:build => Integrity::Build.gen(:failed))
+end
+
+Integrity::Commit.fixture(:pending) do
+  Integrity::Commit.generate_attributes.update(:build => Integrity::Build.gen(:pending))
+end
+
 Integrity::Build.fixture do
-  { :output     => /[:paragraph:]/.gen,
-    :successful => true,
-    :created_at => unique {|i| Time.mktime(2008, 12, 15, 18, (59 - i) % 60) },
-    :commit_identifier => Digest::SHA1.hexdigest(/[:paragraph:]/.gen),
-    :commit_metadata   => commit_metadata }
+  commit = Integrity::Commit.first || Integrity::Commit.gen
+
+  { :output       => /[:paragraph:]/.gen,
+    :successful   => true,
+    :started_at   => unique {|i| Time.mktime(2008, 12, 15, 18, i % 60) },
+    :created_at   => unique {|i| Time.mktime(2008, 12, 15, 18, i % 60) },
+    :completed_at => unique {|i| Time.mktime(2008, 12, 15, 18, i % 60) },
+    :commit_id    => commit.id }
+end
+
+Integrity::Build.fixture(:successful) do
+  Integrity::Build.generate_attributes.update(:successful => true)
+end
+
+Integrity::Build.fixture(:failed) do
+  Integrity::Build.generate_attributes.update(:successful => false)
+end
+
+Integrity::Build.fixture(:pending) do
+  Integrity::Build.generate_attributes.update(:successful => nil, :started_at => nil, :completed_at => nil)
 end
 
 Integrity::Notifier.fixture(:irc) do

data/test/helpers/initial_migration_fixture.sql

@@ -0,0 +1,44 @@
+CREATE TABLE "integrity_builds" ("id" INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, "output" TEXT NOT NULL DEFAULT '', "successful" BOOLEAN NOT NULL DEFAULT 'f', "commit_identifier" VARCHAR(50) NOT NULL, "commit_metadata" TEXT NOT NULL, "created_at" DATETIME, "updated_at" DATETIME, "project_id" INTEGER);
+INSERT INTO "integrity_builds" VALUES(1,'rake aborted!
+Don''t know how to build task ''default''
+/home/simon/.gems/gems/rake-0.8.3/lib/rake.rb:1706:in `[]''
+(See full trace by running task with --trace)
+(in /home/simon/bar/builds/sr-shout-bot-master)
+','f','348e9e27fa72645518fc539b77f1c37fcc20ab11','---
+:message: had to allow for registration time
+:date: 2009-01-04 06:19:30 +0800
+:author: syd <syd@teh.magicha.us>
+','2009-02-17T19:48:31+01:00','2009-02-17T19:48:31+01:00',1);
+INSERT INTO "integrity_builds" VALUES(2,'....*...........
+
+Pending:
+ShoutBot When using Shouter.shout passes given block to join (TODO)
+  Called from shout-bot.rb:113
+
+Finished in 10.222458 seconds
+
+16 examples, 0 failures, 1 pending
+','t','348e9e27fa72645518fc539b77f1c37fcc20ab11','---
+:message: had to allow for registration time
+:date: 2009-01-04 06:19:30 +0800
+:author: syd <syd@teh.magicha.us>
+','2009-02-17T19:49:05+01:00','2009-02-17T19:49:05+01:00',1);
+INSERT INTO "integrity_builds" VALUES(3,'(in /home/simon/bar/builds/sinatra-sinatra-master)
+Loaded suite /home/simon/.gems/gems/rake-0.8.3/lib/rake/rake_test_loader
+Started
+.......................................................................................................................................................................................................................................
+Finished in 1.097704 seconds.
+
+231 tests, 437 assertions, 0 failures, 0 errors
+','t','a2f5803ec642c43ece86ad96676c45f44fe3746e','---
+:message: Allow dot in named param capture [#153]
+:date: 2009-02-17 09:32:58 -0800
+:author: Ryan Tomayko <rtomayko@gmail.com>
+','2009-02-17T19:50:11+01:00','2009-02-17T19:50:11+01:00',2);
+DELETE FROM sqlite_sequence;
+INSERT INTO "sqlite_sequence" VALUES('integrity_projects',2);
+INSERT INTO "sqlite_sequence" VALUES('integrity_builds',3);
+CREATE TABLE "integrity_notifiers" ("id" INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, "name" VARCHAR(50) NOT NULL, "config" TEXT NOT NULL, "project_id" INTEGER);
+CREATE TABLE "integrity_projects" ("id" INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, "name" VARCHAR(50) NOT NULL, "permalink" VARCHAR(50), "uri" VARCHAR(255) NOT NULL, "branch" VARCHAR(50) NOT NULL DEFAULT 'master', "command" VARCHAR(255) NOT NULL DEFAULT 'rake', "public" BOOLEAN DEFAULT 't', "building" BOOLEAN DEFAULT 'f', "created_at" DATETIME, "updated_at" DATETIME);
+INSERT INTO "integrity_projects" VALUES(1,'Shout Bot','shout-bot','git://github.com/sr/shout-bot.git','master','ruby shout-bot.rb','t','f','2009-02-17T19:48:23+01:00','2009-02-17T19:49:05+01:00');
+INSERT INTO "integrity_projects" VALUES(2,'Sinatra','sinatra','git://github.com/sinatra/sinatra.git','master','rake compat test','t','f','2009-02-17T19:49:48+01:00','2009-02-17T19:50:22+01:00');

data/test/unit/build_test.rb

@@ -0,0 +1,51 @@
+require File.dirname(__FILE__) + '/../helpers'
+
+class BuildTest < Test::Unit::TestCase
+  before(:each) do
+    RR.reset
+  end
+
+  specify "fixture is valid and can be saved" do
+    lambda do
+      build = Build.gen
+      build.save
+
+      build.should be_valid
+    end.should change(Build, :count).by(1)
+  end
+
+  describe "Properties" do
+    before(:each) do
+      @build = Build.gen
+    end
+
+    it "captures the build's STDOUT/STDERR" do
+      @build.output.should_not be_blank
+    end
+
+    it "knows if it failed or not" do
+      @build.successful = true
+      @build.should be_successful
+      @build.successful = false
+      @build.should be_failed
+    end
+
+    it "knows it's status" do
+      @build.successful = true
+      @build.status.should be(:success)
+      @build.successful = false
+      @build.status.should be(:failed)
+    end
+  end
+
+  describe "Pending builds" do
+    before(:each) do
+      3.of { Build.gen(:started_at => nil) }
+      2.of { Build.gen(:started_at => Time.mktime(2009, 1, 17, 23, 18)) }
+    end
+
+    it "finds builds that need to be built" do
+      Build.should have(3).pending
+    end
+  end
+end