libdolt 0.6.0

data/lib/libdolt/view/tab_width.rb

@@ -0,0 +1,30 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+module Dolt
+  module View
+    module TabWidth
+      def self.tab_width; @@tab_width; end
+      def self.tab_width=(tab_width); @@tab_width = tab_width; end
+
+      def format_whitespace(text)
+        text.gsub(/\t/, " " * TabWidth.tab_width)
+      end
+    end
+  end
+end

data/lib/libdolt/view/tree.rb

@@ -0,0 +1,100 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+module Dolt
+  module View
+    module Tree
+      def tree_url(repository, ref, path)
+        repo_url(repository, "/tree/#{ref}:#{path}")
+      end
+
+      def tree_entries(tree)
+        sort(tree.entries.select { |e| [:tree, :submodule].index(e[:type]) }) +
+          sort(tree.entries.select { |e| e[:type] == :blob })
+      end
+
+      def tree_context(repo, ref, levels)
+        return "" if levels.length == 1 && levels[0].length == 1
+        total = 4 + levels.length
+        colspan = total
+        (levels.map do |level|
+          html = <<-HTML
+            <tr>
+              #{'<td></td>' * (total - colspan)}
+              <td colspan="#{colspan}">
+                #{tree_context_level_links(repo, ref, level)}
+              </td>
+            </tr>
+          HTML
+          colspan -= 1
+          html
+        end).join
+      end
+
+      def tree_context_level_links(repo, ref, level)
+        extra = "<i class=\"icon icon-folder-open\"></i>"
+
+        (level.map do |path|
+           dir = File.dirname(path)
+           dir = "" if dir == "."
+           file = path == "" ? "/" : File.basename(path)
+           url = object_url(repo, ref, dir, { :type => :tree, :name => file })
+           html = "<a href=\"#{url}\">#{extra} #{file}</a>"
+           extra = extra == "" || extra == "/" ? "/" : ""
+           html
+        end).join(" ")
+      end
+
+      def partition_path(path, maxdepth = nil)
+        path = path.sub(/^\.?\//, "")
+        result = [[""]]
+        return result if path == ""
+        parts = path.split("/")
+        maxdepth ||= parts.length
+        fill_first = [parts.length, [1, parts.length - maxdepth + 1].max].min
+        fill_first.times { result[0] << parts.shift }
+        result << [parts.shift] while parts.length > 0
+        result
+      end
+
+      def accumulate_path(pieces)
+        acc = []
+        pieces.map do |piece|
+          piece.map do |p|
+            next p if p == ""
+            acc << p
+            File.join(acc)
+          end
+        end
+      end
+
+      def tree_table_padding_width(partitioned)
+        partitioned.length == 1 ? partitioned[0].length - 1 : partitioned.length
+      end
+
+      def tree_table_padding_td(partitioned)
+        "<td></td>" * tree_table_padding_width(partitioned)
+      end
+
+      private
+      def sort(entries)
+        entries.sort_by { |e| e[:name] }
+      end
+    end
+  end
+end

data/lib/libdolt/view.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+dir = File.join(File.dirname(__FILE__), "view")
+
+Dir.entries(dir).select { |f| f =~ /\.rb$/ }.map do |file|
+  require(File.join(dir, file))
+end

data/lib/libdolt.rb

@@ -0,0 +1,29 @@
+
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+require "libdolt/version"
+require "libdolt/disk_repo_resolver"
+require "libdolt/repo_actions"
+require "libdolt/view"
+
+module Dolt
+  def self.template_dir
+    File.join(File.dirname(__FILE__), "..", "views")
+  end
+end

data/libdolt.gemspec

@@ -0,0 +1,35 @@
+# -*- encoding: utf-8 -*-
+dir = File.expand_path(File.dirname(__FILE__))
+require File.join(dir, "lib/libdolt/version")
+
+Gem::Specification.new do |s|
+  s.name        = "libdolt"
+  s.version     = Dolt::VERSION
+  s.authors     = ["Christian Johansen"]
+  s.email       = ["christian@gitorious.org"]
+  s.homepage    = "http://gitorious.org/gitorious/libdolt"
+  s.summary     = %q{Dolt API for serving git trees and syntax highlighted blobs}
+  s.description = %q{Dolt API for serving git trees and syntax highlighted blobs}
+
+  s.rubyforge_project = "libdolt"
+
+  s.add_dependency "eventmachine", "~>1.0"
+  s.add_dependency "em_pessimistic", "~>0.1"
+  s.add_dependency "em_rugged", "~> 0.1.2"
+  s.add_dependency "tzinfo", "~> 0.3"
+  s.add_dependency "makeup", "~>0"
+  s.add_dependency "htmlentities", "~> 4.3"
+  s.add_dependency "json", "~> 1.7"
+  s.add_dependency "mime-types", "~> 1.19"
+
+  s.add_development_dependency "minitest", "~> 2.0"
+  s.add_development_dependency "em-minitest-spec", "~> 1.1"
+  s.add_development_dependency "rake", "~> 0.9"
+  s.add_development_dependency "redcarpet"
+  s.add_development_dependency "tiltout", "~>1"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

data/test/libdolt/async/when_test.rb

@@ -0,0 +1,112 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+require "test_helper"
+require "libdolt/async/when"
+
+describe When do
+  include EM::MiniTest::Spec
+
+  describe ".all" do
+    it "returns deferrable" do
+      d = When.all([When.deferred(42)])
+      assert d.respond_to?(:callback)
+      assert d.respond_to?(:errback)
+    end
+
+    it "resolves immediately if no promises" do
+      d = When.all([])
+      d.callback do |results|
+        assert_equal [], results
+        done!
+      end
+      wait!
+    end
+
+    it "resolves when single deferrable resolves" do
+      deferred = When::Deferred.new
+      d = When.all([deferred.promise])
+      resolved = false
+      d.callback { |results| resolved = true }
+
+      assert !resolved
+      deferred.resolve(42)
+      assert resolved
+    end
+
+    it "resolves when all deferrables are resolved" do
+      deferreds = [When::Deferred.new, When::Deferred.new, When::Deferred.new]
+      d = When.all(deferreds.map(&:promise))
+      resolved = false
+      d.callback { |results| resolved = true }
+
+      assert !resolved
+      deferreds[0].resolve(42)
+      assert !resolved
+      deferreds[1].resolve(13)
+      assert !resolved
+      deferreds[2].resolve(3)
+      assert resolved
+    end
+
+    it "rejects when single deferrable rejects" do
+      deferred = When::Deferred.new
+      d = When.all([deferred.promise])
+      rejected = false
+      d.errback { |results| rejected = true }
+
+      assert !rejected
+      deferred.reject(StandardError.new)
+      assert rejected
+    end
+
+    it "rejects on first rejection" do
+      deferreds = [When::Deferred.new, When::Deferred.new, When::Deferred.new]
+      d = When.all(deferreds.map(&:promise))
+      rejected = false
+      d.errback { |results| rejected = true }
+
+      deferreds[0].resolve(42)
+      deferreds[2].reject(StandardError.new)
+      deferreds[1].resolve(13)
+
+      assert rejected
+    end
+
+    it "proxies resolution vaule in array" do
+      deferred = When::Deferred.new
+      d = When.all([deferred.promise])
+      results = nil
+      d.callback { |res| results = res }
+
+      deferred.resolve(42)
+      assert_equal [42], results
+    end
+
+    it "orders results like input" do
+      deferred1 = When::Deferred.new
+      deferred2 = When::Deferred.new
+      d = When.all([deferred1.promise, deferred2.promise])
+      results = nil
+      d.callback { |res| results = res }
+
+      deferred2.resolve(42)
+      deferred1.resolve(13)
+      assert_equal [13, 42], results
+    end
+  end
+end

data/test/libdolt/git/blame_test.rb

@@ -0,0 +1,128 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+require "test_helper"
+require "libdolt/git/blame"
+
+describe Dolt::Git::Blame do
+  include EM::MiniTest::Spec
+
+  describe "parse" do
+    before do
+      @blame = <<-GIT
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 1 1 17
+author Christian Johansen
+author-mail <christian@cjohansen.no>
+author-time 1347282459
+author-tz +0200
+committer Christian Johansen
+committer-mail <christian@cjohansen.no>
+committer-time 1347282459
+committer-tz +0200
+summary Working Moron server for viewing blobs
+filename lib/moron/view.rb
+ # encoding: utf-8
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 2 2
+ #--
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 3 3
+ #   Copyright (C) 2012 Gitorious AS
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 4 4
+ #
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 5 5
+ #   This program is free software: you can redistribute it and/or modify
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 6 6
+ #   it under the terms of the GNU Affero General Public License as published by
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 7 7
+ #   the Free Software Foundation, either version 3 of the License, or
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 8 8
+ #   (at your option) any later version.
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 9 9
+ #
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 10 10
+ #   This program is distributed in the hope that it will be useful,
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 11 11
+ #   but WITHOUT ANY WARRANTY; without even the implied warranty of
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 12 12
+ #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 13 13
+ #   GNU Affero General Public License for more details.
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 14 14
+ #
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 15 15
+ #   You should have received a copy of the GNU Affero General Public License
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 16 16
+ #   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 17 17
+ #++
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 20 18 1
+
+beb65bee5619c651532179b19421363ead2c2a44 19 19 1
+author Christian Johansen
+author-mail <christian@gitorious.com>
+author-time 1348128947
+author-tz +0200
+committer Christian Johansen
+committer-mail <christian@gitorious.com>
+committer-time 1348128947
+committer-tz +0200
+summary Helpers are modules again
+previous 05f0137175fe341545587a544315cd4a6cc2c824 lib/dolt/view.rb
+filename lib/dolt/view.rb
+ dir = File.join(File.dirname(__FILE__), "view")
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 30 20 1
+
+beb65bee5619c651532179b19421363ead2c2a44 21 21 2
+ Dir.entries(dir).select { |f| f =~ /\.rb$/ }.map do |file|
+beb65bee5619c651532179b19421363ead2c2a44 22 22
+   require(File.join(dir, file))
+906d67b4f3e5de7364ba9b57d174d8998d53ced6 58 23 1
+ end
+      GIT
+
+      @blame = Dolt::Git::Blame.parse_porcelain(@blame)
+    end
+
+    it "has chunks" do
+      assert_equal 5, @blame.chunks.length
+    end
+
+    it "has chunk with commit meta data" do
+      chunk = @blame.chunks.first
+      author = chunk[:author]
+      committer = chunk[:committer]
+
+      assert_equal "906d67b4f3e5de7364ba9b57d174d8998d53ced6", chunk[:oid]
+      assert_equal "Christian Johansen", author[:name]
+      assert_equal "christian@cjohansen.no", author[:mail]
+      assert_equal "2012-09-10 17:07:39", author[:time].strftime("%Y-%m-%d %H:%M:%S")
+      assert_equal "Christian Johansen", committer[:name]
+      assert_equal "christian@cjohansen.no", committer[:mail]
+      assert_equal "2012-09-10 17:07:39", committer[:time].strftime("%Y-%m-%d %H:%M:%S")
+      assert_equal "Working Moron server for viewing blobs", chunk[:summary]
+    end
+
+    it "has chunk with lines" do
+      chunk = @blame.chunks.first
+      assert_equal 18, chunk[:lines].length
+      assert_equal "#   Copyright (C) 2012 Gitorious AS", chunk[:lines][2]
+    end
+
+    it "repeats commit meta" do
+      assert_equal @blame.chunks[2][:committer], @blame.chunks[0][:committer]
+    end
+  end
+end

data/test/libdolt/git/commit_test.rb

@@ -0,0 +1,89 @@
+# encoding: utf-8
+#--
+#   Copyright (C) 2012 Gitorious AS
+#
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU Affero General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU Affero General Public License for more details.
+#
+#   You should have received a copy of the GNU Affero General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#++
+require "test_helper"
+require "libdolt/git/commit"
+
+describe Dolt::Git::Commit do
+  include EM::MiniTest::Spec
+
+  describe "parse" do
+    before do
+      @log = <<-GIT
+commit dc0846b6c98a3f6db1172629329b70ada80598bb
+Author: Christian Johansen <christian@gitorious.com>
+Date:   Thu Sep 20 15:55:52 2012 +0200
+
+    Add rough blame
+
+commit 222eef3679553c9da2897144e03a5844f6e77586
+Author: Christian Johansen <christian@gitorious.com>
+Date:   Wed Sep 19 12:27:54 2012 +0200
+
+    Rewrite template/views. Use EMRugged for Git.
+
+      - Not complete, still some failing tests
+      - View helpers need to change
+
+commit 06293404488d9cc72e70eb2ae25aa609af73dada
+Author: Christian Johansen <christian@gitorious.com>
+Date:   Tue Sep 11 20:03:14 2012 +0200
+
+    Rename FileSystemRepositoryResolver to DiskRepoResolver
+
+commit 7a3d69a2327bb9575bb520fe30c6abb3bbd0b719
+Author: Christian Johansen <christian@gitorious.com>
+Date:   Tue Sep 11 19:57:22 2012 +0200
+
+    One more rename: "Dolt" is shorter, better
+
+commit eabcd577e921d01aeaf777d2daac565f88ab174c
+Author: Christian Johansen <christian@gitorious.com>
+Date:   Tue Sep 11 15:25:50 2012 +0200
+
+    Moron was taken, going with Addlepate
+
+      GIT
+
+      @commits = Dolt::Git::Commit.parse_log(@log)
+    end
+
+    it "has commits" do
+      assert_equal 5, @commits.length
+    end
+
+    it "has commit oids" do
+      assert_equal "dc0846b6c98a3f6db1172629329b70ada80598bb", @commits[0][:oid]
+      assert_equal "222eef3679553c9da2897144e03a5844f6e77586", @commits[1][:oid]
+      assert_equal "06293404488d9cc72e70eb2ae25aa609af73dada", @commits[2][:oid]
+      assert_equal "7a3d69a2327bb9575bb520fe30c6abb3bbd0b719", @commits[3][:oid]
+      assert_equal "eabcd577e921d01aeaf777d2daac565f88ab174c", @commits[4][:oid]
+    end
+
+    it "has author" do
+      expected = {
+        :name => "Christian Johansen",
+        :email => "christian@gitorious.com"
+      }
+      assert_equal expected, @commits.first[:author]
+    end
+
+    it "has commit date" do
+      assert_equal "2012-09-11", @commits.last[:date].strftime("%Y-%m-%d")
+    end
+  end
+end