brycethornton-integrity 0.1.7.1

data/lib/integrity.rb

@@ -0,0 +1,82 @@
+__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 "logger"
+require "digest/sha1"
+require "timeout"
+require "ostruct"
+require "fileutils"
+
+require "core_ext/object"
+require "core_ext/string"
+
+require "project"
+require "build"
+require "project_builder"
+require "scm"
+require "scm/git"
+require "notifier"
+
+module Integrity
+  def self.new(config_file = nil)
+    self.config = config_file unless config_file.nil?
+    DataMapper.logger = self.logger if config[:log_debug_info]
+    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",
+                    :log               => STDOUT,
+                    :base_uri          => "http://localhost:8910",
+                    :use_basic_auth    => false,
+                    :build_all_commits => true,
+                    :log_debug_info    => false }
+  end
+
+  def self.config
+    @config ||= default_configuration
+  end
+
+  def self.config=(file)
+    @config = default_configuration.merge(YAML.load_file(file))
+  end
+
+  def self.log(message, &block)
+    logger.info(message, &block)
+  end
+
+  def self.logger
+    @logger ||= Logger.new(config[:log], "daily").tap do |logger|
+      logger.formatter = LogFormatter.new
+    end
+  end
+
+  def self.version
+    @version ||= begin
+      file = YAML.load_file(Integrity.root / "VERSION.yml")
+      "#{file['major']}.#{file['minor']}.#{file['patch']}"
+    end
+  end
+
+  private
+
+    class LogFormatter < Logger::Formatter
+      def call(severity, time, progname, msg)
+        time.strftime("[%H:%M:%S] ") + msg2str(msg) + "\n"
+      end
+    end
+end

data/lib/integrity/build.rb

@@ -0,0 +1,61 @@
+module Integrity
+  class Build
+    include DataMapper::Resource
+
+    property :id,                Serial
+    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_metadata
+      case data = attribute_get(:commit_metadata)
+        when String; YAML.load(data)
+        else data
+      end
+    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/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/helpers.rb

@@ -0,0 +1,16 @@
+Dir["#{File.dirname(__FILE__)}/helpers/*.rb"].each &method(:require)
+
+module Integrity
+  module Helpers  
+    include Authorization
+    include Breadcrumbs
+    include Forms
+    include PrettyOutput
+    include Rendering
+    include Resources
+    include Urls
+    
+    include Rack::Utils
+    alias :h :escape_html
+  end
+end

data/lib/integrity/helpers/authorization.rb

@@ -0,0 +1,33 @@
+require "diddies"
+
+module Integrity
+  module Helpers
+    module Authorization
+      include Sinatra::Authorization
+
+      def authorization_realm
+        "Integrity"
+      end
+
+      def authorized?
+        return true unless Integrity.config[:use_basic_auth]
+        !!request.env["REMOTE_USER"]
+      end
+
+      def authorize(user, password)
+        if Integrity.config[:hash_admin_password]
+          password = Digest::SHA1.hexdigest(password)
+        end
+
+        !Integrity.config[:use_basic_auth] ||
+        (Integrity.config[:admin_username] == user &&
+          Integrity.config[:admin_password] == password)
+      end
+
+      def unauthorized!(realm=authorization_realm)
+        response["WWW-Authenticate"] = %(Basic realm="#{realm}")
+        throw :halt, [401, show(:unauthorized, :title => "incorrect credentials")]
+      end
+    end
+  end
+end

data/lib/integrity/helpers/breadcrumbs.rb

@@ -0,0 +1,20 @@
+module Integrity
+  module Helpers
+    module Breadcrumbs
+      def pages
+        @pages ||= [["projects", "/"], ["new project", "/new"]]
+      end
+
+      def breadcrumbs(*crumbs)
+        crumbs[0..-2].map do |crumb|
+          if page_data = pages.detect {|c| c.first == crumb }
+            %Q(<a href="#{page_data.last}">#{page_data.first}</a>)
+          elsif @project && @project.permalink == crumb
+            %Q(<a href="#{project_url(@project)}">#{@project.permalink}</a>)
+          end
+        end + [crumbs.last]
+      end
+
+    end
+  end
+end

data/lib/integrity/helpers/forms.rb

@@ -0,0 +1,28 @@
+module Integrity
+  module Helpers
+    module Forms
+      def errors_on(object, field)
+        return "" unless errors = object.errors.on(field)
+        errors.map {|e| e.gsub(/#{field} /i, "") }.join(", ")
+      end
+
+      def error_class(object, field)
+        object.errors.on(field).nil? ? "" : "with_errors"
+      end
+
+      def checkbox(name, condition, extras={})
+        attrs = { :name => name, :type => "checkbox", :value => "1" }
+        attrs.merge!(:checked => condition ? true : nil)
+        attrs.merge(extras)
+      end
+
+      def notifier_form(notifier)
+        haml(notifier.to_haml, :layout => :notifier, :locals => {
+          :config => current_project.config_for(notifier),
+          :notifier => "#{notifier.to_s.split(/::/).last}",
+          :enabled => current_project.notifies?(notifier)
+        })
+      end
+    end
+  end
+end

data/lib/integrity/helpers/pretty_output.rb

@@ -0,0 +1,45 @@
+module Integrity
+  module Helpers
+    module PrettyOutput
+      def cycle(*values)
+        @cycles ||= {}
+        @cycles[values] ||= -1 # first value returned is 0
+        next_value = @cycles[values] = (@cycles[values] + 1) % values.size
+        values[next_value]
+      end
+
+      def bash_color_codes(string)
+        string.gsub("\e[0m", '</span>').
+          gsub("\e[31m", '<span class="color31">').
+          gsub("\e[32m", '<span class="color32">').
+          gsub("\e[33m", '<span class="color33">').
+          gsub("\e[34m", '<span class="color34">').
+          gsub("\e[35m", '<span class="color35">').
+          gsub("\e[36m", '<span class="color36">').
+          gsub("\e[37m", '<span class="color37">')
+      end
+
+      def pretty_date(date_time)
+        days_away = (Date.today - Date.new(date_time.year, date_time.month, date_time.day)).to_i
+        if days_away == 0
+          "today"
+        elsif days_away == 1
+          "yesterday"
+        else
+          strftime_with_ordinal(date_time, "on %b %d%o")
+        end
+      end
+
+      def strftime_with_ordinal(date_time, format_string)
+        ordinal = case date_time.day
+          when 1, 21, 31 then "st"
+          when 2, 22     then "nd"
+          when 3, 23     then "rd"
+          else                "th"
+        end
+
+        date_time.strftime(format_string.gsub("%o", ordinal))
+      end
+    end
+  end
+end

data/lib/integrity/helpers/rendering.rb

@@ -0,0 +1,14 @@
+module Integrity
+  module Helpers
+    module Rendering
+      def show(view, options={})
+        @title = breadcrumbs(*options[:title])
+        haml view
+      end
+
+      def partial(template, locals={})
+        haml("_#{template}".to_sym, :locals => locals, :layout => false)
+      end
+    end
+  end
+end

data/lib/integrity/helpers/resources.rb

@@ -0,0 +1,13 @@
+module Integrity
+  module Helpers
+    module Resources
+      def current_project
+        @project ||= Project.first(:permalink => params[:project]) or raise Sinatra::NotFound
+      end
+
+      def current_build
+        @build ||= current_project.builds.first(:commit_identifier => params[:build]) or raise Sinatra::NotFound
+      end
+    end
+  end
+end

data/lib/integrity/helpers/urls.rb

@@ -0,0 +1,47 @@
+module Integrity
+  module Helpers
+    module Urls
+      def url(path)
+        url = "#{request.scheme}://#{request.host}"
+
+        if request.scheme == "https" && request.port != 443 ||
+            request.scheme == "http" && request.port != 80
+          url << ":#{request.port}"
+        end
+
+        url << "/" unless path.index("/").zero?
+        url << path
+      end
+
+      def root_url
+        url("/")
+      end
+
+      def project_path(project, *path)
+        "/" << [project.permalink, *path].join("/")
+      end
+
+      def project_url(project, *path)
+        url project_path(project, *path)
+      end
+
+      def push_url_for(project)
+        Addressable::URI.parse(project_url(project, "push")).tap do |url|
+          if Integrity.config[:use_basic_auth]
+            url.user     = Integrity.config[:admin_username]
+            url.password = Integrity.config[:hash_admin_password] ?
+              "<password>" : Integrity.config[:admin_password]
+          end
+        end.to_s
+      end
+
+      def build_path(build)
+        "/#{build.project.permalink}/builds/#{build.commit_identifier}"
+      end
+
+      def build_url(build)
+        url build_path(build)
+      end
+    end
+  end
+end

data/lib/integrity/installer.rb

@@ -0,0 +1,132 @@
+require File.dirname(__FILE__) + "/../integrity"
+require "thor"
+
+module Integrity
+  class Installer < Thor
+    include FileUtils
+
+    desc "install [PATH]",
+       "Copy template files to PATH. Next, go there and edit them."
+    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_db [CONFIG]",
+         "Checks the `database_uri` in CONFIG and creates and bootstraps a database for integrity"
+    def create_db(config, direction="up")
+      Integrity.new(config)
+      migrate_db(direction)
+    end
+
+    desc "version",
+         "Print the current integrity version"
+    def version
+      puts Integrity.version
+    end
+
+    private
+      attr_reader :root
+
+      def migrate_db(direction="up")
+        require 'migrations'
+
+        set_up_migrations unless migrations_already_set_up?
+        add_initial_migration if tables_from_before_migrations_exist?
+
+        case direction.to_s
+        when "up"   then Integrity::Migrations.migrate_up!
+        when "down" then Integrity::Migrations.migrate_down!
+        else raise ArgumentError, "DIRECTION must be either up or down"
+        end
+      end
+
+      def create_dir_structure
+        mkdir_p root
+        mkdir_p root / "builds"
+        mkdir_p root / "log"
+        mkdir_p root / "public" # this one is to play nice with Passenger
+        mkdir_p root / "tmp"    # this one is to play nice with Passenger
+      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"
+        config.gsub! %r(/var/log),                    "#{root}/log"
+        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")
+        puts
+        puts %Q(Don't forget to tweak #{root / "config.yml"} to your needs.)
+      end
+
+      def set_up_migrations
+        database_adapter.execute %q(CREATE TABLE "migration_info" ("migration_name" VARCHAR(255));)
+      end
+
+      def add_initial_migration
+        database_adapter.execute %q(INSERT INTO "migration_info" ("migration_name") VALUES ("initial"))
+      end
+
+      def tables_from_before_migrations_exist?
+        table_exists?("integrity_projects") && 
+          table_exists?("integrity_builds") && 
+          table_exists?("integrity_notifiers")
+      end
+
+      def migrations_already_set_up?
+        table_exists?("migration_info")
+      end
+
+      def without_pluralizing_table_names
+        database_adapter.resource_naming_convention = DataMapper::NamingConventions::Resource::Underscored
+        yield
+        database_adapter.resource_naming_convention = DataMapper::NamingConventions::Resource::UnderscoredAndPluralized
+      end
+
+      def table_exists?(table_name)
+        database_adapter.storage_exists?(table_name)
+      end
+
+      def database_adapter
+        DataMapper.repository(:default).adapter
+      end
+  end
+end