defunkt-integrity 0.1.1

data/bin/integrity

@@ -0,0 +1,80 @@
+#!/usr/bin/env ruby
+require "rubygems"
+require "thor"
+
+require File.dirname(__FILE__) + "/../lib/integrity"
+
+class WithIntegrity < Thor
+  include FileUtils
+
+  desc "Install integrity at PATH", 
+       "Copy template files at PATH. After this, edit the files to your convenience"
+  def install(path)
+    @root = File.expand_path(path)
+    
+    create_dir_structure
+    copy_template_files
+    edit_template_files
+    create_db(root / 'config.yml')
+    after_setup_message
+  end
+
+  desc "Create databases for CONFIG",
+       "Create the database necessary to run Integrity"
+  def create_db(config)
+    Integrity.config = config
+    Integrity.new
+    DataMapper.auto_migrate!
+  end
+  
+  private
+    attr_reader :root
+    
+    def create_dir_structure
+      mkdir_p root
+      mkdir_p root / "builds"
+      mkdir_p root / "log"
+    end
+    
+    def copy_template_files
+      cp Integrity.root / "config" / "config.sample.ru",  root / "config.ru"
+      cp Integrity.root / "config" / "config.sample.yml", root / "config.yml"
+      cp Integrity.root / "config" / "thin.sample.yml",   root / "thin.yml"
+    end
+    
+    def edit_template_files
+      edit_integrity_configuration
+      edit_thin_configuration
+    end
+
+    def edit_integrity_configuration
+      config = File.read(root / "config.yml")
+      config.gsub!(%r(sqlite3:///var/integrity.db), "sqlite3://#{root}/integrity.db")
+      config.gsub!(%r(/path/to/scm/exports),        "#{root}/builds")
+      File.open(root / "config.yml", "w") {|f| f.puts config }
+    end
+
+    def edit_thin_configuration
+      config = File.read(root / 'thin.yml')
+      config.gsub!(%r(/apps/integrity), root)
+      File.open(root / 'thin.yml', 'w') { |f| f.puts config }
+    end
+  
+    def after_setup_message
+      puts
+      puts %Q(Awesome! Integrity was installed successfully!)
+      puts
+      puts %Q(If you want to enable notifiers, install the gems and then require them)
+      puts %Q(in #{root}/config.ru)
+      puts
+      puts %Q(For example:)
+      puts
+      puts %Q(  sudo gem install -s http://gems.github.com foca-integrity-email)
+      puts
+      puts %Q(And then in #{root}/config.ru add:)
+      puts
+      puts %Q(  require "notifier/email")
+    end
+end
+
+WithIntegrity.start

data/config/config.sample.ru

@@ -0,0 +1,30 @@
+#!/usr/bin/env ruby
+require 'rubygems'
+require 'integrity'
+
+# If you want to add any notifiers, install the gems and then require them here
+# For example, to enable the Email notifier: install the gem (from github: 
+#
+#   sudo gem install -s http://gems.github.com foca-integrity-email
+# 
+# And then uncomment the following line:
+# 
+# require "notifier/email"
+
+# Load integrity's configuration.
+Integrity.config = File.expand_path('./config.yml')
+
+#######################################################################
+##                                                                   ##
+## == DON'T EDIT ANYTHING BELOW UNLESS YOU KNOW WHAT YOU'RE DOING == ##
+##                                                                   ##
+#######################################################################
+require Integrity.root / 'app'
+
+set     :public,  Integrity.root / 'public'
+set     :views,   Integrity.root / 'views'
+set     :port,    8910
+set     :env,     :production
+disable :run,     :reload
+
+run Sinatra.application

data/config/config.sample.yml

@@ -0,0 +1,31 @@
+# Domain where integrity will be running from. This is used to have
+# nice URLs in your notifications.
+# For example:
+#   http://builder.integrityapp.com
+:base_uri: http://integrity.domain.tld
+
+# This should be a complete connection string to your database. For example 
+# `mysql://user@localhost/integrity` (you need an `integrity` db created in 
+# localhost, of course).
+:database_uri: sqlite3:///var/integrity.db
+
+# This is where your project's code will be checked out to. Make sure it's 
+# writable by the user that runs Integrity.
+:export_directory: /path/to/scm/exports
+
+# Enable or disable HTTP authentication for the app. BE AWARE that if you 
+# disable this anyone can delete and alter projects, so do it only if your 
+# app is running in a controlled environment (ie, behind your company's
+# firewall.)
+:use_basic_auth: true
+
+# When `use_basic_auth` is true, the admin's username for HTTP authentication.
+:admin_username: username
+
+# When `use_basic_auth` is true, the admin's password. Usually saved as a 
+# SHA1 hash. See the next option.
+:admin_password: a94a8fe5ccb19ba61c4c0873d391e987982fbbd3
+
+# If this is true, then whenever we authenticate the admin user, will hash 
+# it using SHA1. If not, we'll assume the provided password is in plain text.
+:hash_admin_password: true

data/config/thin.sample.yml

@@ -0,0 +1,14 @@
+---
+environment: production
+chdir: /apps/integrity
+address: 127.0.0.1
+user: deploy
+group: deploy
+port: 8910
+pid: /apps/integrity/thin.pid
+rackup: /apps/integrity/config.ru
+log: /apps/integrity/log/thin.log
+max_conns: 1024
+timeout: 30
+max_persistent_conns: 512
+daemonize: true

data/integrity.gemspec

@@ -0,0 +1,66 @@
+Gem::Specification.new do |s|
+  s.name              = 'integrity'
+  s.version           = '0.1.1'
+  s.date              = '2008-11-14'
+  s.summary           = 'The easy and fun Continuous Integration server'
+  s.description       = 'Your Friendly Continuous Integration server. Easy, fun and painless!'
+  s.homepage          = 'http://integrityapp.com'
+  s.rubyforge_project = 'integrity'
+  s.email             = 'contacto@nicolassanguinetti.info'
+  s.authors           = ['Nicolás Sanguinetti', 'Simon Rozet']
+  s.has_rdoc          = false
+  s.executables       = ['integrity']
+  s.post_install_message = 'Run `integrity help` for information on how to setup Integrity.'
+  s.files             = %w(
+                          README.markdown
+                          Rakefile
+                          app.rb
+                          bin/integrity
+                          config/config.sample.ru
+                          config/config.sample.yml
+                          config/thin.sample.yml
+                          integrity.gemspec
+                          lib/integrity.rb
+                          lib/integrity/build.rb
+                          lib/integrity/builder.rb
+                          lib/integrity/core_ext/object.rb
+                          lib/integrity/core_ext/string.rb
+                          lib/integrity/core_ext/time.rb
+                          lib/integrity/notifier.rb
+                          lib/integrity/notifier/base.rb
+                          lib/integrity/project.rb
+                          lib/integrity/scm.rb
+                          lib/integrity/scm/git.rb
+                          lib/integrity/scm/git/uri.rb
+                          lib/integrity/version.rb
+                          public/buttons.css
+                          public/reset.css
+                          public/spinner.gif
+                          vendor/sinatra-hacks/lib/hacks.rb
+                          views/build.haml
+                          views/build_info.haml
+                          views/home.haml
+                          views/integrity.sass
+                          views/layout.haml
+                          views/new.haml
+                          views/not_found.haml
+                          views/notifier.haml
+                          views/project.haml
+                          views/unauthorized.haml
+                          spec/spec_helper.rb
+                          spec/form_field_matchers.rb
+                        )
+
+  s.add_dependency 'sinatra', ['>= 0.3.2']
+  s.add_dependency 'dm-core', ['>= 0.9.5']
+  s.add_dependency 'dm-validations', ['>= 0.9.5']
+  s.add_dependency 'dm-types', ['>= 0.9.5']
+  s.add_dependency 'dm-timestamps', ['>= 0.9.5']
+  s.add_dependency 'dm-aggregates', ['>= 0.9.5']
+  s.add_dependency 'data_objects', ['>= 0.9.5']
+  s.add_dependency 'do_sqlite3', ['>= 0.9.5']        
+  s.add_dependency 'json'
+  s.add_dependency 'foca-sinatra-diddies', ['>= 0.0.2']
+  s.add_dependency 'rspec_hpricot_matchers'
+  s.add_dependency 'thor'
+end

data/lib/integrity.rb

@@ -0,0 +1,44 @@
+__DIR__ = File.dirname(__FILE__)
+$:.unshift "#{__DIR__}/integrity", *Dir["#{__DIR__}/../vendor/**/lib"].to_a
+
+require 'rubygems'
+require 'json'
+require 'dm-core'
+require 'dm-validations'
+require 'dm-types'
+require 'dm-timestamps'
+require 'dm-aggregates'
+
+require 'yaml'
+require 'digest/sha1'
+
+require "core_ext/object"
+require "core_ext/string"
+require "core_ext/time"
+
+%w(project build builder scm scm/git notifier version).each &method(:require)
+
+module Integrity
+  def self.new
+    DataMapper.setup(:default, config[:database_uri])
+  end
+
+  def self.root
+    File.expand_path(File.join(File.dirname(__FILE__), ".."))
+  end
+
+  def self.default_configuration
+    @defaults ||= { :database_uri => 'sqlite3::memory:',
+                    :export_directory => root / 'exports',
+                    :base_uri => 'http://localhost:8910',
+                    :use_basic_auth => false }
+  end
+
+  def self.config
+    @config ||= default_configuration
+  end
+
+  def self.config=(file)
+    @config = default_configuration.merge(YAML.load_file(file))
+  end
+end

data/lib/integrity/build.rb

@@ -0,0 +1,56 @@
+require 'ostruct'
+
+module Integrity
+  class Build
+    include DataMapper::Resource
+
+    property :id,                Integer,  :serial => true
+    property :output,            Text,     :nullable => false, :default => ''
+    property :successful,        Boolean,  :nullable => false, :default => false
+    property :commit_identifier, String,   :nullable => false
+    property :commit_metadata,   Yaml,     :nullable => false, :lazy => false
+    property :created_at,        DateTime
+    property :updated_at,        DateTime
+
+    belongs_to :project, :class_name => "Integrity::Project"
+
+    def failed?
+      !successful?
+    end
+
+    def status
+      successful? ? :success : :failed
+    end
+
+    def human_readable_status
+      successful? ? 'Build Successful' : 'Build Failed'
+    end
+
+    def short_commit_identifier
+      sha1?(commit_identifier) ? commit_identifier[0..6] : commit_identifier
+    end
+
+    def commit_author
+      @author ||= begin
+        commit_metadata[:author] =~ /^(.*) <(.*)>$/
+        OpenStruct.new(:name => $1.strip, :email => $2.strip, :full => commit_metadata[:author])
+      end
+    end
+
+    def commit_message
+      commit_metadata[:message]
+    end
+
+    def commited_at
+      case commit_metadata[:date]
+        when String then Time.parse(commit_metadata[:date])
+        else commit_metadata[:date]
+      end
+    end
+
+    private
+      def sha1?(string)
+        string =~ /^[a-f0-9]{40}$/
+      end
+  end
+end

data/lib/integrity/builder.rb

@@ -0,0 +1,42 @@
+require 'fileutils'
+
+module Integrity
+  class Builder
+    attr_reader :build_script
+
+    def initialize(project)
+      @uri = project.uri
+      @build_script = project.command
+      @branch = project.branch
+      @scm = SCM.new(@uri, @branch, export_directory)
+      @build = Build.new(:project => project)
+    end
+
+    def build(commit)
+      @scm.with_revision(commit) { run_build_script }
+      @build
+    ensure
+      @build.commit_identifier = @scm.commit_identifier(commit)
+      @build.commit_metadata = @scm.commit_metadata(commit)
+      @build.save
+    end
+
+    def delete_code
+      FileUtils.rm_r export_directory
+    rescue Errno::ENOENT
+      nil
+    end
+
+    private
+      def export_directory
+        Integrity.config[:export_directory] / "#{SCM.working_tree_path(@uri)}-#{@branch}"
+      end
+
+      def run_build_script
+        IO.popen "(cd #{@scm.working_directory} && #{build_script}) 2>&1", "r" do |pipe|
+          @build.output = pipe.read
+        end
+        @build.successful = $?.success?
+      end
+  end
+end

data/lib/integrity/core_ext/object.rb

@@ -0,0 +1,6 @@
+class Object
+  def tap
+    yield self
+    self
+  end
+end

data/lib/integrity/core_ext/string.rb

@@ -0,0 +1,5 @@
+class String
+  def /(other)
+    File.join(self, other)
+  end
+end

data/lib/integrity/core_ext/time.rb

@@ -0,0 +1,13 @@
+class Time
+  alias :strftime_without_ordinals :strftime
+  def strftime(format_string)
+    format_string.gsub! "%o", case day
+      when 1, 21, 31 then "st"
+      when 2, 22     then "nd"
+      when 3, 23     then "rd"
+      else                "th"
+    end
+
+    strftime_without_ordinals(format_string)
+  end
+end

data/lib/integrity/notifier.rb

@@ -0,0 +1,49 @@
+module Integrity
+  class Notifier
+    include DataMapper::Resource
+
+    property :id,      Integer,  :serial => true
+    property :name,    String,   :nullable => false
+    property :config,  Yaml,     :nullable => false, :lazy => false
+
+    belongs_to :project, :class_name => "Integrity::Project"
+
+    validates_is_unique :name, :scope => :project_id
+    validates_present :project_id
+
+    def self.available
+      @available ||= constants.map {|name| const_get(name) }.select do |notifier|
+        notifier.respond_to?(:to_haml) && notifier.respond_to?(:notify_of_build)
+      end - [Notifier::Base]
+    end
+
+    def self.enable_notifiers(project, enabled, config={})
+      Project.get(project).notifiers.destroy!
+      list_of_enabled_notifiers(enabled).each do |name|
+        create! :project_id => project, :name => name, :config => config[name]
+      end
+    end
+
+    def notify_of_build(build)
+      to_const.notify_of_build(build, config)
+    end
+
+    private
+
+      def to_const
+        self.class.module_eval(name)
+      end
+
+      def self.list_of_enabled_notifiers(names)
+        case names
+          when Array then names
+          when NilClass then []
+          else [names]
+        end
+      end
+  end
+end
+
+require File.dirname(__FILE__) / 'notifier' / 'base'
+
+Dir["#{File.dirname(__FILE__)}/notifier/*.rb"].each &method(:require)