foca-integrity 0.1.0

data/bin/integrity

@@ -0,0 +1,60 @@
+#!/usr/bin/env ruby
+
+require "rubygems"
+require "integrity"
+require "thor"
+
+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
+    after_setup_message
+  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
+      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 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 "lib/integrity"
+require "sinatra"
+
+# 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 == ##
+##                                                                   ##
+#######################################################################
+
+Sinatra::Application.default_options.merge!(
+  :run  => false,
+  :port => Integrity.config[:port],
+  :env  => :production
+)
+ 
+require "app"
+run Sinatra.application

data/config/config.sample.yml

@@ -0,0 +1,8 @@
+:base_uri: http://integrity.domain.tld
+:database_uri: sqlite3:///var/integrity.db
+:export_directory: /path/to/scm/exports
+:hash_admin_password: true
+:use_basic_auth: true
+:admin_username: username
+:admin_password: a94a8fe5ccb19ba61c4c0873d391e987982fbbd3
+:port: 4567

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,65 @@
+Gem::Specification.new do |s|
+  s.name              = 'integrity'
+  s.version           = '0.1.0'
+  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.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,47 @@
+__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:4567',
+                    :use_basic_auth => false,
+                    :port => 9876 }
+  end
+
+  def self.config
+    @config ||= default_configuration
+  end
+
+  def self.config=(file)
+    @config = default_configuration.merge(YAML.load_file(file))
+  rescue Errno::ENOENT
+    {}
+  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={})
+      all.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)

data/lib/integrity/notifier/base.rb

@@ -0,0 +1,56 @@
+module Integrity
+  class Notifier
+    class Base
+      def self.notify_of_build(build, config)
+        new(build, config).deliver!
+      end
+
+      def self.to_haml
+        filename = name.split("::").last.downcase
+        File.read File.join(Integrity.root / "lib" / "integrity" / "notifier" / "#{filename}.haml")
+      end
+      
+      attr_reader :build
+      
+      def initialize(build, config)
+        @build = build
+        @config = config
+      end
+      
+      def deliver!
+        raise NoMethodError, "you need to implement this method in your notifier"
+      end
+      
+      def short_message
+        "Build #{build.short_commit_identifier} #{build.successful? ? "was successful" : "failed"}"
+      end
+      
+      def full_message
+        <<-EOM
+"Build #{build.commit_identifier} #{build.successful? ? "was successful" : "failed"}"
+
+Commit Message: #{build.commit_message}
+Commit Date: #{build.commited_at}
+Commit Author: #{build.commit_author.name}
+
+Link: #{build_url}
+
+Build Output:
+
+#{stripped_build_output}
+EOM
+      end
+      
+      def build_url
+        raise if Integrity.config[:base_uri].nil?
+        Integrity.config[:base_uri] / build.project.permalink / "builds" / build.commit_identifier
+      end
+
+      private
+
+        def stripped_build_output
+          build.output.gsub("\e[0m", '').gsub(/\e\[3[1-7]m/, '')
+        end
+    end
+  end
+end