ddollar-git-db 0.0.2 → 0.1.2

data/lib/git-db/database.rb

@@ -0,0 +1,134 @@
+class GitDB::Database
+
+  def self.couch
+    @couch ||= CouchRest.new('http://localhost:5984')
+  end
+
+  def self.database(repository)
+    @databases             ||= {}
+    @databases[repository] ||= new(repository)
+  end
+
+  attr_reader :repository, :name, :database
+
+  def initialize(repository)
+    @repository = repository
+    @name       = "gitdb-#{repository.gsub('/', '-')}"
+    @database   = self.class.couch.database!(name)
+    update_views
+  end
+  
+## refs ######################################################################
+
+  def get_ref(ref)
+    doc = database.view('refs/all', :key => ref)['rows'].first
+    doc ? doc['value'] : nil
+  end
+
+  def get_refs
+    database.view('refs/all')['rows'].inject({}) do |hash, row|
+      hash.update(row['key'] => row['value']['sha'])
+    end
+  end
+
+  def write_ref(ref, sha)
+    if doc = get_ref(ref)
+      doc['sha'] = sha
+      database.save_doc(doc)
+    else
+      database.save_doc(:doctype => 'ref', :ref => ref, :sha => sha)
+    end
+  end
+
+  def delete_ref(ref)
+    if doc = get_ref(ref)
+      database.delete_doc(doc)
+    end
+  end
+
+## objects ###################################################################
+
+  def get_raw_object(sha)
+    doc = database.view('objects/all', :key => sha)['rows'].first
+    doc = doc ? decode_object(doc['value']) : nil
+  end
+
+  def get_object(sha)
+    raw = get_raw_object(sha)
+    raw ? GitDB::Objects.new_from_type(raw['type'], raw['data']) : nil
+  end
+
+  def write_object(object)
+    doc = object_to_doc(object)
+    doc = (get_raw_object(object.sha) || {}).merge(doc)
+    database.save_doc(doc)
+  end
+
+  def write_objects(objects)
+    docs = objects.map do |object|
+      doc = object_to_doc(object)
+      doc = (get_raw_object(object.sha) || {}).merge(doc)
+    end
+    database.bulk_save(docs)
+  end
+
+## utility ###################################################################
+
+  def document_ids
+    database.documents['rows'].map { |row| row['id']}
+  end
+
+  def encode_object(doc)
+    doc['data'] = Base64.encode64(doc['data'])
+    doc
+  end
+
+  def decode_object(doc)
+    doc['data'] = Base64.decode64(doc['data'])
+    doc
+  end
+
+  def object_to_doc(object)
+    properties = object.properties
+    properties += [:type, :data, :sha]
+    doc = properties.inject({ :doctype => 'object' }) do |hash, property|
+      hash.update(property.to_s => object.send(property))
+    end
+    encode_object(doc)
+  end
+
+  def update_views
+    if document_ids.include?('_design/refs')
+      database.delete_doc(database.get('_design/refs'))
+    end
+    database.save_doc({
+      '_id'  => '_design/refs',
+      :views => {
+        :all => {
+          :map => %{
+            function(doc) {
+              if (doc.doctype == 'ref') { emit(doc.ref, doc); }
+            }
+          }
+        },
+      }
+    })
+    if document_ids.include?('_design/objects')
+      database.delete_doc(database.get('_design/objects'))
+    end
+    database.save_doc({
+      '_id'  => '_design/objects',
+      :views => {
+        :all => {
+          :map => %{
+            function(doc) {
+              if (doc.doctype == 'object') { emit(doc.sha, doc); }
+            }
+          }
+        },
+      }
+    })
+  end
+
+
+end

data/lib/git-db/objects.rb

@@ -0,0 +1,20 @@
+module GitDB::Objects; 
+
+  def self.new_from_type(type, data)
+    case type
+      when GitDB::OBJ_COMMIT then GitDB::Objects::Commit.new(data)
+      when GitDB::OBJ_TREE   then GitDB::Objects::Tree.new(data)
+      when GitDB::OBJ_BLOB   then GitDB::Objects::Blob.new(data)
+      when GitDB::OBJ_TAG    then GitDB::Objects::Tag.new(data)
+      else raise "Unknown object type: #{type}"
+    end
+  end
+
+end
+
+require 'git-db/objects/base'
+require 'git-db/objects/blob'
+require 'git-db/objects/commit'
+require 'git-db/objects/entry'
+require 'git-db/objects/tag'
+require 'git-db/objects/tree'

data/lib/{git → git-db}/objects/base.rb

@@ -1,4 +1,4 @@
-class GitDB::Git::Objects::Base
+class GitDB::Objects::Base
 
   attr_reader :data
 
@@ -7,7 +7,15 @@ class GitDB::Git::Objects::Base
   end
 
   def inspect
-    %{#<#{self.class} #{inspect_arguments_as_string}>}
+    %{#<#{self.class} #{inspect_properties}>}
+  end
+
+  def properties
+    [:data]
+  end
+
+  def raw
+    data
   end
 
   def sha
@@ -16,14 +24,11 @@ class GitDB::Git::Objects::Base
 
 private ######################################################################
 
-  def inspect_arguments
-    [:data]
-  end
-
-  def inspect_arguments_as_string
-    inspect_arguments.unshift(:sha).map do |argument|
+  def inspect_properties
+    inspectors = properties.unshift(:sha).map do |argument|
       "#{argument}=#{self.send(argument).inspect}"
-    end.join(' ')
+    end
+    inspectors.join(' ')
   end
 
 end

data/lib/git-db/objects/blob.rb

@@ -0,0 +1,11 @@
+class GitDB::Objects::Blob < GitDB::Objects::Base
+
+  def raw
+    "blob #{data.length}\000#{data}"
+  end
+
+  def type
+    GitDB::OBJ_BLOB
+  end
+
+end

data/lib/{git → git-db}/objects/commit.rb

@@ -1,11 +1,11 @@
-class GitDB::Git::Objects::Commit < GitDB::Git::Objects::Base
+class GitDB::Objects::Commit < GitDB::Objects::Base
   
   def raw
     "commit #{data.length}\000#{data}"
   end
 
   def type
-    Git::OBJ_COMMIT
+    GitDB::OBJ_COMMIT
   end
 
   def message
@@ -28,12 +28,12 @@ class GitDB::Git::Objects::Commit < GitDB::Git::Objects::Base
     attributes['parent']
   end
 
-private ######################################################################
-
-  def inspect_arguments
+  def properties
     [:tree, :parents, :author, :committer, :message]
   end
 
+private ######################################################################
+
   def attributes
     @attributes ||= begin
       attributes = data.split("\n\n", 2).first

data/lib/{git → git-db}/objects/entry.rb

@@ -1,6 +1,6 @@
 require 'stringio'
 
-class GitDB::Git::Objects::Entry < GitDB::Git::Objects::Base
+class GitDB::Objects::Entry < GitDB::Objects::Base
 
   attr_reader :sha, :permissions, :name
 
@@ -10,10 +10,18 @@ class GitDB::Git::Objects::Entry < GitDB::Git::Objects::Base
     @name = name
   end
 
-private ######################################################################
-
-  def inspect_arguments
+  def properties
     [:permissions, :name]
   end
 
+  def to_hash
+    { :sha => sha, :permissions => permissions, :name => name }
+  end
+
+  def to_json
+    to_hash.to_json
+  end
+
+private ######################################################################
+
 end

data/lib/git-db/objects/tag.rb

@@ -0,0 +1,7 @@
+class GitDB::Objects::Tag < GitDB::Objects::Base
+
+  def type
+    GitDB::OBJ_TAG
+  end
+
+end

data/lib/{git → git-db}/objects/tree.rb

@@ -1,19 +1,23 @@
 require 'stringio'
 
-class GitDB::Git::Objects::Tree < GitDB::Git::Objects::Base
+class GitDB::Objects::Tree < GitDB::Objects::Base
+
+  # TODO: memoize entries
 
   def entries
-    @entries ||= begin
-      entries = []
-      stream = StringIO.new(data)
-      until stream.eof?
-        perms = read_until(stream, ' ').to_i
-        name  = read_until(stream, 0.chr)
-        sha   = Git.sha1_to_hex(stream.read(20))
-        entries << GitDB::Git::Objects::Entry.new(sha, perms, name)
-      end
-      entries
+    entries = []
+    stream = StringIO.new(data)
+    until stream.eof?
+      perms = read_until(stream, ' ').to_i
+      name  = read_until(stream, 0.chr)
+      sha   = GitDB.sha1_to_hex(stream.read(20))
+      entries << GitDB::Objects::Entry.new(sha, perms, name)
     end
+    entries
+  end
+
+  def properties
+    [:entries]
   end
 
   def raw
@@ -21,15 +25,11 @@ class GitDB::Git::Objects::Tree < GitDB::Git::Objects::Base
   end
 
   def type
-    Git::OBJ_TREE
+    GitDB::OBJ_TREE
   end
 
 private ######################################################################
 
-  def inspect_arguments
-    [:entries]
-  end
-
   def read_until(stream, separator)
     data = ""
     char = ""

data/lib/{git → git-db}/pack.rb

@@ -2,7 +2,7 @@ require 'digest/sha1'
 require 'stringio'
 require 'zlib'
 
-class GitDB::Git::Pack
+class GitDB::Pack
 
   PackObject = Struct.new(:type, :offset, :data)
 
@@ -29,13 +29,13 @@ class GitDB::Git::Pack
 
       object = case type
         when 1 then
-          GitDB::Git::Objects::Commit.new(read_compressed(io))
+          GitDB::Objects::Commit.new(read_compressed(io))
         when 2 then
-          GitDB::Git::Objects::Tree.new(read_compressed(io))
+          GitDB::Objects::Tree.new(read_compressed(io))
         when 3 then
-          GitDB::Git::Objects::Blob.new(read_compressed(io))
+          GitDB::Objects::Blob.new(read_compressed(io))
         when 4 then
-          GitDB::Git::Objects::Tag.new(read_compressed(io))
+          GitDB::Objects::Tag.new(read_compressed(io))
         when 5 then
           raise 'Invalid Type: 5'
         when 6 then
@@ -80,7 +80,7 @@ class GitDB::Git::Pack
     end
     
     #GitDB.log("BUFFER: #{buffer.inspect}")
-    signature = Git::hex_to_sha1(Digest::SHA1.hexdigest(buffer))
+    signature = GitDB::hex_to_sha1(Digest::SHA1.hexdigest(buffer))
     #GitDB.log("SIGNATURE: #{signature.inspect}")
     io.write(signature)
     io.flush

data/lib/{git → git-db}/protocol.rb

@@ -1,4 +1,4 @@
-class GitDB::Git::Protocol
+class GitDB::Protocol
 
   attr_reader :reader
   attr_reader :writer
@@ -53,11 +53,11 @@ class GitDB::Git::Protocol
 ## packs #####################################################################
 
   def read_pack
-    GitDB::Git::Pack.new(reader).read
+    GitDB::Pack.new(reader).read
   end
 
   def write_pack(entries)
-    GitDB::Git::Pack.new(writer).write(entries)
+    GitDB::Pack.new(writer).write(entries)
   end
 
 private ######################################################################

data/lib/git-db/utility.rb

@@ -0,0 +1,3 @@
+module GitDB::Utility; end
+
+require 'git-db/utility/counting_io'

data/spec/git-db/commands_spec.rb

@@ -0,0 +1,23 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe "GitDB::Commands" do
+
+  it "has a receive-pack command" do
+    GitDB::Commands.commands['receive-pack'].should_not be_nil
+  end
+
+  it "has an upload-pack command" do
+  end
+
+  it "executes a command" do
+    @command = mock
+    @name    = 'command'
+    @args    = ['Test Repository']
+
+    GitDB::Commands.should_receive(:commands).at_least(:once).and_return({ @name => @command })
+    @command.should_receive(:execute).with(@args)
+    
+    GitDB::Commands.execute(@name, @args)
+  end
+
+end

data/spec/git-db/objects/base_spec.rb

@@ -0,0 +1,27 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe "GitDB::Objects::Base" do
+
+  before(:each) do
+    @data = "Test Data"
+    @base = GitDB::Objects::Base.new(@data)
+  end
+
+  it "initializes with data" do
+    @base.data.should == @data
+  end
+
+  it "inspects its own properties" do
+    @base.should_receive(:properties).and_return([:data])
+    @base.inspect
+  end
+
+  it "has default properties" do
+    @base.properties.should == [:data]
+  end
+
+  it "has default raw" do
+    @base.raw.should == @data
+  end
+
+end