pact_broker 0.0.10 → 1.0.0.alpha1

data/bethtest.rb

@@ -0,0 +1,67 @@
+require 'set'
+
+class Link
+  def initialize from, to
+    @from = from
+    @to = to
+  end
+
+  def include? endpoint
+    @from == endpoint || @to == endpoint
+  end
+
+  def to_s
+    "#{@from} - #{@to}"
+  end
+
+  def to_a
+    [@from, @to]
+  end
+
+end
+
+def unique_nodes links
+  links.collect(&:to_a).flatten.uniq.sort
+end
+
+def nodes_connected_to_node node, links
+  unique_nodes links.select{|l|l.include?(node)}
+end
+
+def nodes_connected_to_nodes_within_pool nodes, links, node_pool
+  nodes.collect{ | node | nodes_connected_to_node(node, links) }.flatten & node_pool
+end
+
+def split_into_clusters links
+  node_pool =  unique_nodes links
+  groups = []
+
+  while node_pool.any?
+    group = []
+    groups << group
+    connected_nodes = [node_pool.first]
+
+    while connected_nodes.any?
+      group.concat(connected_nodes)
+      node_pool = node_pool - connected_nodes
+      connected_nodes = nodes_connected_to_nodes_within_pool connected_nodes, links, node_pool
+    end
+  end
+
+  groups
+end
+
+links = [Link.new('A', 'B'), Link.new('A', 'C'), Link.new('C', 'D'), Link.new('D', 'E'), Link.new('E','A'),
+  Link.new('Y', 'Z'), Link.new('X', 'Y'),
+  Link.new('M', 'N'), Link.new('N', 'O'), Link.new('O', 'P'), Link.new('P','Q')]
+
+
+groups = split_into_clusters links
+
+puts groups.collect{ | group| "group = #{group.join(" ")}"}
+
+
+
+
+
+

data/config.ru

@@ -1,11 +1,17 @@
 require File.dirname(__FILE__) + '/config/boot'
-require 'pact_broker/db'
+require 'db'
 require 'pact_broker/api'
-require 'pact_broker/api/resources/pact'
+require 'rack/hal_browser'
+require 'pact_broker/ui/controllers/relationships'
 
 
-use Rack::Static, root: 'public', urls: ['/favicon.ico']
+use Rack::Static, :urls => ["/stylesheets", "/css", "/fonts", "/js"], :root => "public"
+use Rack::HalBrowser::Redirect, :exclude => ['/diagnostic', '/trace','/index','/force.csv']
 
 run Rack::URLMap.new(
-  '/' => PactBroker::API
+  '/ui/relationships' => PactBroker::UI::Controllers::Relationships,
+  '/index.html' => Rack::File.new("#{File.dirname(__FILE__)}/assets/index.html"),
+  '/index2.html' => Rack::File.new("#{File.dirname(__FILE__)}/assets/index2.html"),
+  '/force.csv' => Rack::File.new("#{File.dirname(__FILE__)}/assets/force.csv"),
+  '/' => PactBroker::API,
 )

data/config/boot.rb

@@ -14,4 +14,8 @@ if File.exists?(ENV['BUNDLE_GEMFILE'])
   Bundler.require
 end
 
+if defined?(I18n)
+  I18n.enforce_available_locales = false
+end
+
 require 'pact_broker'

data/example/Gemfile

@@ -0,0 +1,5 @@
+source 'https://rubygems.org'
+
+gem "pact_broker"
+gem "sqlite3" # Replace with your choice of database driver eg. mysql2
+gem "thin" # Keep, or replace with your choice of web server

data/example/config.ru

@@ -0,0 +1,18 @@
+require 'fileutils'
+require 'logger'
+require 'sequel'
+require 'pact_broker'
+require 'rack/hal_browser'
+
+# Create a real database, and set the credentials for it here
+DATABASE_CREDENTIALS = {database: "pact_broker_database.sqlite3", adapter: "sqlite"}
+
+app = PactBroker::App.new do | config |
+  # change these from their default values if desired
+  # config.log_dir = "./log"
+  # config.auto_migrate_db = true
+  # config.use_hal_browser = true
+  config.database_connection = Sequel.connect(DATABASE_CREDENTIALS.merge(:logger => config.logger))
+end
+
+run app

data/lib/db.rb

@@ -0,0 +1,52 @@
+require 'sequel'
+require 'sequel/connection_pool/threaded'
+require 'yaml'
+require 'pact_broker/logging'
+require 'erb'
+require 'pact_broker/project_root'
+
+module DB
+  include PactBroker::Logging
+  ##
+  # Sequel by default does not test connections in its connection pool before
+  # handing them to a client. To enable connection testing you need to load the
+  # "connection_validator" extension like below. The connection validator
+  # extension is configurable, by default it only checks connections once per
+  # hour:
+  #
+  # http://sequel.rubyforge.org/rdoc-plugins/files/lib/sequel/extensions/connection_validator_rb.html
+  #
+  # Because most of our applications so far are accessed infrequently, there is
+  # very little overhead in checking each connection when it is requested. This
+  # takes care of stale connections.
+  #
+  # A gotcha here is that it is not enough to enable the "connection_validator"
+  # extension, we also need to specify that we want to use the threaded connection
+  # pool, as noted in the documentation for the extension.
+  #
+  def self.connect db_credentials
+    con = Sequel.connect(db_credentials.merge(:logger => logger, :pool_class => Sequel::ThreadedConnectionPool))
+    con.extension(:connection_validator)
+    con.pool.connection_validation_timeout = -1 #Check the connection on every request
+    con
+  end
+
+  def self.connection_for_env env
+    logger.info "Connecting to #{env} database."
+    connect configuration_for_env(env)
+  end
+
+  def self.configuration_for_env env
+    database_yml = PactBroker.project_root.join('config','database.yml')
+    config = YAML.load(ERB.new(File.read(database_yml)).result)
+    config.fetch(env)
+  end
+
+  PACT_BROKER_DB ||= connection_for_env ENV.fetch('RACK_ENV')
+
+  def self.health_check
+    PACT_BROKER_DB.synchronize do |c| c
+      PACT_BROKER_DB.valid_connection? c
+    end
+  end
+end

data/lib/pact_broker.rb

@@ -1,4 +1,6 @@
 require 'pact_broker/version'
+require 'pact_broker/logging'
+require 'pact_broker/app'
 
 module PactBroker
 

data/lib/pact_broker/api.rb

@@ -5,6 +5,7 @@ require 'pact_broker/api/resources/pacticipant'
 require 'pact_broker/api/resources/pacticipants'
 require 'pact_broker/api/resources/tag'
 require 'pact_broker/api/resources/index'
+require 'pact_broker/api/resources/relationships'
 
 require 'webmachine/adapters/rack'
 
@@ -20,6 +21,7 @@ module PactBroker
         add ['pacticipants'], Api::Resources::Pacticipants
         add ['pacticipants', :name], Api::Resources::Pacticipant
         add ['pacticipants', :pacticipant_name, 'versions', :pacticipant_version_number, 'tags', :tag_name], Api::Resources::Tag
+        add ['relationships'], Api::Resources::Relationships
         add [], Api::Resources::Index
       end
     end

data/lib/pact_broker/api/decorators/pact_collection_decorator.rb

@@ -13,7 +13,7 @@ module PactBroker
         include Roar::Representer::JSON::HAL
         include PactBroker::Api::PactBrokerUrls
 
-        collection :pacts, decorator_scope: true, :class => PactBroker::Models::Pact, :extend => PactBroker::Api::Decorators::LatestPactDecorator
+        collection :pacts, exec_context: :decorator, :class => PactBroker::Models::Pact, :extend => PactBroker::Api::Decorators::LatestPactDecorator
 
         def pacts
           represented.collect{ | pact | create_representable_pact(pact) }

data/lib/pact_broker/api/decorators/pacticipant_collection_decorator.rb

@@ -30,7 +30,7 @@ module PactBroker
 
       class PacticipantCollectionRepresenter < BaseDecorator
 
-        collection :pacticipants, decorator_scope: true, :class => PactBroker::Models::Pacticipant, :extend => PactBroker::Api::Decorators::PacticipantRepresenter
+        collection :pacticipants, exec_context: :decorator, :class => PactBroker::Models::Pacticipant, :extend => PactBroker::Api::Decorators::PacticipantRepresenter
 
         def pacticipants
           represented

data/lib/pact_broker/api/decorators/relationships_csv_decorator.rb

@@ -0,0 +1,32 @@
+require 'csv'
+
+module PactBroker
+
+  module Api
+
+    module Decorators
+
+      class RelationshipsCsvDecorator
+
+        def initialize pacts
+          @pacts = pacts
+        end
+
+        def to_csv
+
+          CSV.generate do |csv|
+            csv << ["source", "target", "weight"]
+            pacts.each do | pact |
+              csv << [pact.consumer.name, pact.provider.name, 1]
+            end
+          end
+        end
+
+        private
+
+        attr_accessor :pacts
+
+      end
+    end
+  end
+end

data/lib/pact_broker/api/renderers/html_pact_renderer.rb

@@ -0,0 +1,43 @@
+require 'pact/consumer_contract'
+require 'pact/reification'
+require 'redcarpet'
+
+module PactBroker
+  module Api
+    module Renderers
+      class HtmlPactRenderer
+
+        def self.call json_content
+          new(json_content).call
+        end
+
+        def initialize json_content
+          @json_content = json_content
+        end
+
+        def call
+          "<html><head>#{head}</head><body>#{html}</body></html>"
+        end
+
+        private
+
+        def head
+          '<link rel="stylesheet" type="text/css" href="/stylesheets/github.css">'
+        end
+
+        def markdown
+          Pact::Doc::Markdown::InteractionsRenderer.call consumer_contract
+        end
+
+        def html
+          Redcarpet::Markdown.new(Redcarpet::Render::HTML, :fenced_code_blocks => true, :lax_spacing => true).render(markdown)
+        end
+
+        def consumer_contract
+          Pact::ConsumerContract.from_json(@json_content)
+        end
+
+      end
+    end
+  end
+end

data/lib/pact_broker/api/resources/latest_pact.rb

@@ -1,4 +1,5 @@
 require 'pact_broker/api/resources/base_resource'
+require 'pact_broker/configuration'
 
 module PactBroker::Api
 
@@ -7,7 +8,8 @@ module PactBroker::Api
     class LatestPact < BaseResource
 
       def content_types_provided
-        [["application/json", :to_json]]
+        [["application/json", :to_json],
+        ["text/html", :to_html]]
       end
 
       def allowed_methods
@@ -24,6 +26,10 @@ module PactBroker::Api
         @pact.json_content
       end
 
+      def to_html
+        PactBroker.configuration.html_pact_renderer.call(@pact.json_content)
+      end
+
     end
   end
 

data/lib/pact_broker/api/resources/relationships.rb

@@ -0,0 +1,29 @@
+require 'pact_broker/api/resources/base_resource'
+require 'pact_broker/api/decorators/relationships_csv_decorator'
+
+module PactBroker::Api
+
+  module Resources
+
+    class Relationships < BaseResource
+
+      def content_types_provided
+        [["text/csv", :to_csv]]
+      end
+
+      def allowed_methods
+        ["GET"]
+      end
+
+      def to_csv
+        generate_csv(pact_service.find_latest_pacts)
+      end
+
+      def generate_csv pacts
+        PactBroker::Api::Decorators::RelationshipsCsvDecorator.new(pacts).to_csv
+      end
+
+    end
+  end
+
+end

data/lib/pact_broker/app.rb

@@ -0,0 +1,82 @@
+require 'pact_broker/configuration'
+require 'pact_broker/db'
+require 'pact_broker/project_root'
+require 'rack/hal_browser'
+
+module PactBroker
+
+  class App
+
+    attr_accessor :configuration
+
+    def initialize &block
+      @configuration = Configuration.default_configuration
+      yield configuration
+      post_configure
+      build_app
+    end
+
+    def call env
+      @app.call env
+    end
+
+    private
+
+    def logger
+      PactBroker.logger
+    end
+
+    def post_configure
+      PactBroker.logger = configuration.logger
+
+      if configuration.auto_migrate_db
+        logger.info "Migrating database"
+        PactBroker::DB.run_migrations configuration.database_connection
+      else
+        logger.info "Skipping database migrations"
+      end
+    end
+
+    def build_app
+      @app = Rack::Builder.new
+
+      @app.use Rack::Static, :urls => ["/stylesheets", "/images", "/css", "/fonts", "/js", "/javascripts"], :root => PactBroker.project_root.join("public")
+
+      if configuration.use_hal_browser
+        logger.info "Mounting HAL browser"
+        @app.use Rack::HalBrowser::Redirect, :exclude => ['/trace']
+      else
+        logger.info "Not mounting HAL browser"
+      end
+
+      logger.info "Mounting UI"
+      require 'pact_broker/ui/controllers/relationships'
+
+      ui = Rack::Builder.new {
+        map "/ui/relationships" do
+          run PactBroker::UI::Controllers::Relationships
+        end
+        map "/" do
+          run lambda { |env|
+            if (env['PATH_INFO'] == "/" || env['PATH_INFO'] == "") && !env['HTTP_ACCEPT'].include?("json")
+              [303, {'Location' => 'ui/relationships'},[]]
+            else
+              [404, {},[]]
+            end
+          }
+        end
+      }
+
+      logger.info "Mounting PactBroker::API"
+      require 'pact_broker/api'
+
+      apps = [ui, PactBroker::API]
+
+      @app.map "/" do
+        run Rack::Cascade.new(apps)
+      end
+
+    end
+  end
+
+end