flazz-slipcover 0.0.0

data/Rakefile

@@ -0,0 +1,9 @@
+require 'rake'
+require 'spec/rake/spectask'
+
+Spec::Rake::SpecTask.new do |t|
+  t.libs << 'lib'
+  t.libs   << 'spec'
+end
+
+task :default => [:spec]

data/lib/slipcover.rb

@@ -0,0 +1,4 @@
+require 'slipcover/database'
+require 'slipcover/document'
+require 'slipcover/model'
+require 'slipcover/server'

data/lib/slipcover/database.rb

@@ -0,0 +1,33 @@
+module CouchDB
+
+  # Database resource
+  class Database
+
+    attr_reader :server, :name
+
+    def initialize(server, name)
+      @server = server
+      @name = name
+    end
+
+    def create
+      @server.put "/#{@name}"
+    end
+
+    def delete
+      @server.delete "/#{@name}"
+    end
+
+    def documents
+      response = @server.get "/#{@name}/_all_docs"
+      JSON.parse(response.body).map { |id| Document.new self, id }
+    end
+
+    def info
+      response = @server.get "/#{@name}"
+      JSON.parse(response.body)
+    end
+    
+  end
+  
+end

data/lib/slipcover/document.rb

@@ -0,0 +1,46 @@
+module CouchDB
+
+  class Document
+    attr_reader :id, :rev, :data
+    attr_writer :id, :rev, :data
+
+    def initialize(database, id=nil, rev=nil)
+      @database = database
+      @id = id
+      @rev = rev
+    end
+
+
+    def get
+      response = @database.server.get "/#{@database.name}/#{@id}"
+      rson = JSON.parse(response.body)
+      @id = rson["_id"]
+      @rev = rson["_rev"]
+      response
+    end
+
+    def post(json)
+      response = @database.server.post "/#{@database.name}", json
+      rson = JSON.parse(response.body)
+      @id = rson["id"]
+      @rev = rson["rev"]
+      response
+    end
+
+    def put(json)
+      rson = JSON.parse json
+      rson["_rev"] = @rev
+      json = JSON.generate rson
+      response = @database.server.put "/#{@database.name}/#{@id}", json
+      rson = JSON.parse(response.body)
+      @rev = rson["rev"]
+      response
+    end
+
+    def delete
+      @database.server.delete "/#{@database.name}/#{@id}?rev=#{@rev}"
+    end
+
+  end
+
+end

data/lib/slipcover/model.rb

@@ -0,0 +1,92 @@
+require 'json'
+
+module CouchDB
+
+  # CRUD-like model for MVC
+  class Model
+    attr_reader :id, :rev
+    attr_writer :id
+
+    def initialize
+      @document = Document.new @@database
+    end
+
+    # Create a document
+    def create
+
+      # post data to the server
+      response = @document.post compile_json
+
+      # parse the output & store the rev
+      data = JSON.parse response.body
+      @rev = data["rev"]
+      
+      # store the id and rev
+      @id = data["id"]
+    end
+
+    # Read a document
+    def read
+
+      # require @id
+      raise "id is required" unless @id
+      @document.id = @id
+
+      # get the data
+      response = @document.get
+
+      # parse the output & store the rev
+      data = JSON.parse response.body
+      @rev = data["_rev"]
+
+      # store only property values
+      @@properties.each do |name|
+        instance_variable_set "@#{name}".intern, data[name.id2name]
+      end
+
+    end
+
+    # Update a document
+    def update
+      # put the properties
+      response = @document.put compile_json
+
+      # parse the output & store the rev
+      data = JSON.parse response.body
+      @rev = data["rev"]
+    end
+
+    # Destroy a document
+    def destroy
+      
+      # require @id
+      raise "id is required" unless @id
+      @document.id = @id
+
+      # require the revision
+      raise 'rev is required to delete' unless @rev
+      @document.rev = @rev
+
+      # delete it
+      response = @document.delete
+
+      # parse the output & store the rev
+      data = JSON.parse response.body
+      @rev = data["rev"]
+    end
+
+    protected
+    
+    # make a document based on the properties
+    def compile_json
+      data = @@properties.inject({}) do |acc, p|
+        h = { p.id2name => instance_variable_get("@#{p.id2name}".intern) }
+        acc.merge h
+      end
+
+      JSON.generate data
+    end
+
+  end
+
+end

data/lib/slipcover/rest.rb

@@ -0,0 +1,51 @@
+require 'net/http'
+
+module CouchDB
+
+  # requires the existence of @host and @port
+  module RESTfulResource
+
+    # Delete a resource
+    def delete(uri)
+      request Net::HTTP::Delete.new(uri)
+    end
+    
+    # Get a resource
+    def get(uri)
+      request Net::HTTP::Get.new(uri)
+    end
+    
+    # Put a document
+    def put(uri, body=nil, content_type="application/json")
+      req = Net::HTTP::Put.new uri
+      req["content-type"] = content_type
+      req.body = body
+      request req
+    end
+
+    # Post a document to a uri
+    def post(uri, body, content_type="application/json")
+      req = Net::HTTP::Post.new uri
+      req["content-type"] = content_type
+      req.body = body
+      request req 
+    end
+
+    protected
+
+    def request(req)
+
+      res = Net::HTTP.start(@host, @port) do |http|
+        http.request req
+      end
+      
+      unless res.kind_of? Net::HTTPSuccess
+        raise "#{res.code}:#{res.message}\nMETHOD:#{req.method}\nURI:#{req.path}\n#{res.body}"
+      end
+      
+      res
+    end
+
+  end
+
+end

data/lib/slipcover/server.rb

@@ -0,0 +1,23 @@
+require 'json'
+require 'slipcover/rest'
+
+module CouchDB
+
+  # Server resource
+  class Server
+
+    include CouchDB::RESTfulResource
+
+    def initialize(host="localhost", port=5984)
+      @host = host
+      @port = port
+    end
+
+    def databases
+      response = get "/_all_dbs"
+      JSON.parse(response.body).map { |name| Database.new self, name }
+    end
+
+  end
+
+end

data/slipcover.gemspec

@@ -0,0 +1,13 @@
+Gem::Specification.new do |spec|
+  spec.name = "slipcover"
+  spec.version = '0.0.0'
+  spec.summary  = "Simple Layer over CouchDB"
+  spec.email    = "flazzarino@gmail.com"
+  spec.homepage = "http://github.com/flazz/couchdb"
+  spec.authors  = ["Francesco (franco) Lazzarino"]
+  spec.files = ["Rakefile", "slipcover.gemspec",
+                "lib/slipcover/database.rb", "lib/slipcover/document.rb",
+                "lib/slipcover/model.rb", "lib/slipcover/rest.rb",
+                "lib/slipcover/server.rb", "lib/slipcover.rb"]
+  spec.add_dependency("json", ">= 1.1.3")
+end

metadata

@@ -0,0 +1,68 @@
+--- !ruby/object:Gem::Specification 
+name: flazz-slipcover
+version: !ruby/object:Gem::Version 
+  version: 0.0.0
+platform: ruby
+authors: 
+- Francesco (franco) Lazzarino
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-12-22 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: json
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.3
+    version: 
+description: 
+email: flazzarino@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- Rakefile
+- slipcover.gemspec
+- lib/slipcover/database.rb
+- lib/slipcover/document.rb
+- lib/slipcover/model.rb
+- lib/slipcover/rest.rb
+- lib/slipcover/server.rb
+- lib/slipcover.rb
+has_rdoc: false
+homepage: http://github.com/flazz/couchdb
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Simple Layer over CouchDB
+test_files: []
+