medea 0.2.31 → 0.3.0

data/Rakefile

@@ -1,2 +1,9 @@
 require 'bundler'
-Bundler::GemHelper.install_tasks
+require 'rspec/core/rake_task'
+
+Bundler::GemHelper.install_tasks
+
+desc "Run all examples"
+RSpec::Core::RakeTask.new(:spec)
+
+#task :default => :spec

data/lib/medea/jasonlistproperty.rb

@@ -79,7 +79,7 @@ module Medea
       @state = :prefetch
     end
 
-    def remove! member
+    def remove! member, cascade=false
       raise RuntimeError, "You can only remove an item if you are accessing this list from an object." unless @parent.is_a? JasonObject
       raise ArgumentError, "You can only remove #{@type.name} items from this collection!" unless member.is_a? @type
       raise ArgumentError, "This item (#{member.jason_key}) doesn't exist in the list you're trying to remove it from!" unless self.include? member
@@ -87,11 +87,11 @@ module Medea
       if @list_type == :value
         member.jason_parent = nil
         member.jason_parent_list = nil
-        member.save!
+        member.delete! if cascade
       elsif @list_type == :reference
 
         #send DELETE to JasonDB::db_auth_url/a_class.name/
-        url = "#{JasonDB::db_auth_url}#{@type.name}/#{@parent.jason_key}/#{@list_name}/#{member.jason_key}"
+        url = "#{JasonDB::db_auth_url}#{@parent.class.name}/#{@parent.jason_key}/#{@list_name}/#{member.jason_key}"
 
         response = RestClient.delete url
 

data/lib/medea/jasonobject.rb

@@ -80,6 +80,11 @@ module Medea
       end
     end
 
+    def ==(other)
+      return false if not other.is_a? JasonObject
+      jason_key == other.jason_key
+    end
+
     #"flexihash" access interface
     def []=(key, value)
       @__jason_data ||= {}
@@ -219,7 +224,19 @@ module Medea
         @__jason_state = :stale
     end
 
-    def delete!
+    def delete! cascade=false
+      #TODO: Put this into some kind of async method or have JasonDB able to set flags on many records at once
+      #This will be REALLY REALLY slowww!
+      if cascade && (self.class.class_variable_defined? :@@lists)
+        @@lists.keys.each do |list_name|
+          #for each list that I have
+          list = send(list_name)
+          list.each do |item|
+            #remove each item from the list, deleting it if possible
+            list.remove! item, true
+          end
+        end
+      end
       url = "#{JasonDB::db_auth_url}#{self.class.name}/#{self.jason_key}"
       response = RestClient.delete url
       raise "DELETE failed!" unless response.code == 201

data/lib/medea/version.rb

@@ -1,3 +1,3 @@
 module Medea
-  VERSION = "0.2.31"
+  VERSION = "0.3.0"
 end

data/spec/jason_object_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+describe "JasonObject" do
+  before :each do
+    @user = User.new
+  end
+
+  after :each do
+    @user.delete!
+  end
+
+  it "should be comparable to other JasonObjects" do
+    @user.save!
+    (@user == User.new).should eq(false)
+    (@user == @user).should eq(true)
+    (@user == User.get_by_key(@user.jason_key, :lazy)).should eq(true)
+    (@user == User.get_by_key(@user.jason_key)).should eq(true)
+    (@user == "Hello world?").should eq(false)
+    (@user == @user.jason_key).should eq(false)
+  end
+
+  it "should be persistable" do
+    @user.name = "Freddy"
+    @user.save!
+
+    @user.jason_state.should eq(:stale)
+
+    retrieved_user = User.get_by_key @user.jason_key
+    retrieved_user.name.should eq(@user.name)
+  end
+
+  it "should track it's state" do
+    @user.jason_state.should eq(:new)
+    @user.save!
+    @user.name = "Freddy"
+    @user.jason_state.should eq(:dirty)
+    @user.save!
+    @user.jason_state.should eq(:stale)
+
+    retrieved_user = User.get_by_key @user.jason_key, :lazy
+    retrieved_user.jason_state.should eq(:ghost)
+    retrieved_user.name
+    retrieved_user.jason_state.should eq(:stale)
+  end
+end

data/spec/list_properties_spec.rb

@@ -0,0 +1,73 @@
+require "spec_helper"
+
+describe "list properties" do
+  before :all do
+    @user_list = []
+    @user = User.new
+    @user_list << @user
+    (1..4).collect do |i|
+      other_user = User.new
+      other_user.name = "Automaton #{i}"
+      @user_list << other_user
+      @user.followees.add! other_user
+      m = Message.new
+      m.message = "Hello world! #automaton"
+      other_user.messages.add! m
+    end
+
+    ["Hello? #user", "Is this thing on? #user", "I love Mondays! #user"].each do |m|
+      msg = Message.new
+      msg.message = m
+      @user.messages.add! msg
+    end
+
+  end
+
+  after :all do
+    @user_list.each do |user|
+      user.messages.each do |m|
+        user.remove! m, true
+      end
+      user.delete!
+    end
+  end
+
+  it "should add a method to the class" do
+    @user.respond_to?(:followees).should eq(true)
+    @user.respond_to?(:messages).should eq(true)
+    @user.respond_to?(:products).should eq(false)
+  end
+
+  it "should return a JasonListProperty" do
+    @user.followees.is_a?(Medea::JasonListProperty).should eq(true)
+    @user.messages.is_a?(Medea::JasonListProperty).should eq(true)
+  end
+
+  it "should resolve to objects" do
+    @user.followees.each do |f|
+      f.is_a?(Medea::JasonObject).should eq(true)
+    end
+
+    @user.messages.each do |m|
+      m.is_a?(Medea::JasonObject).should eq(true)
+      m.message.should include("#user")
+    end
+  end
+
+  it "should resolve sub-lists" do
+    @user.followees.messages.is_a?(Medea::JasonListProperty).should eq(true)
+  end
+
+  it "should resolve items in a sub-list as objects" do
+    @user.followees.messages.each do |msg|
+      msg.is_a?(Medea::JasonObject).should eq(true)
+      msg.message.should include("#automaton")
+    end
+  end
+
+  it "should count correctly" do
+    @user.messages.count.should eq(3)
+    @user.followees.messages.count.should eq(4)
+    @user.followees.count.should eq(4)
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,19 @@
+$: << File.join(File.dirname(__FILE__), '/../lib')
+require 'rspec'
+require 'rspec/mocks'
+require 'medea'
+
+class Message < Medea::JasonObject
+end
+
+class User < Medea::JasonObject
+  has_many :followees, User
+  owns_many :messages, Message
+end
+
+#mock the db url
+module JasonDB
+  def JasonDB::db_auth_url mode=:secure
+    "https://michael:password@rest.jasondb.com/medea-test/"
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: medea
 version: !ruby/object:Gem::Version 
-  hash: 41
+  hash: 19
   prerelease: false
   segments: 
   - 0
-  - 2
-  - 31
-  version: 0.2.31
+  - 3
+  - 0
+  version: 0.3.0
 platform: ruby
 authors: 
 - Michael Jensen
@@ -98,12 +98,10 @@ files:
 - lib/medea/jasonobject.rb
 - lib/medea/list_properties.rb
 - lib/medea/version.rb
-- lib/test.rb
-- lib/testjdq.rb
-- lib/testjlp.rb
-- lib/testmeta.rb
-- lib/testsublist.rb
 - medea.gemspec
+- spec/jason_object_spec.rb
+- spec/list_properties_spec.rb
+- spec/spec_helper.rb
 has_rdoc: true
 homepage: ""
 licenses: []

data/lib/test.rb

@@ -1,31 +0,0 @@
-$: << "~/Projects/Medea/lib"
-require 'rubygems'
-require 'medea'
-
-class Person < Medea::JasonObject
-end
-
-mikey = Person.new
-puts "state: #{mikey.jason_state}"
-mikey.name = "Michael"
-mikey.age = 21
-mikey.location = {:longitude => -30.123213, :latitude => 130.1231458}
-puts mikey.jason_key
-puts mikey.to_json
-mikey.save!
-
-puts "state: #{mikey.jason_state}"
-
-puts "Changing name => Bob"
-mikey.name = "Bob"
-
-puts "state: #{mikey.jason_state}"
-puts mikey.to_json
-mikey.save!
-puts "state: #{mikey.jason_state}"
-
-puts "Enter a Person key to retrieve: "
-id = gets.strip
-
-person = Person.new id
-puts person.to_json

data/lib/testjdq.rb

@@ -1,41 +0,0 @@
-$: << "~/Projects/Medea/lib"
-require 'rubygems'
-require 'medea'
-
-class Person < Medea::JasonObject
-end
-
-class Company < Medea::JasonObject
-  has_many :employees, Person
-end
-
-puts "Lets make a person!"
-p = Person.new
-puts "Name?"
-p.name = gets.strip
-puts "Age?"
-p.age = gets.strip.to_i
-puts "OK - Saving"
-p.save!
-
-puts "", "Lets make a company!"
-c = Company.new
-puts "Name?"
-c.name = gets.strip
-puts "Address?"
-c.address = gets.strip
-puts "OK - Saving"
-c.save!
-
-puts "", "Making #{p.name} a member of #{c.name}"
-c.employees.add! p
-puts "OK - Saving"
-p.save!
-
-puts "", "Now querying for Persons that are members of #{c.name}"
-r = c.employees
-puts "Query: #{r.to_url}"
-puts "Got #{r.count} items:"
-r.each do |p|
-  puts p.name
-end

data/lib/testjlp.rb

@@ -1,31 +0,0 @@
-$: << "~/Projects/Medea/lib"
-require 'rubygems'
-require 'medea'
-
-class Person < Medea::JasonObject
-  has_many :followees, Person
-end
-
-p = Person.get_by_key "pa76b65a2-ba64-4cf0-8b37-7ad6a30ee8db"
-
-puts p.followees.to_url
-puts p.followees.count
-
-puts "Let's make a new person!"
-
-p1 = Person.new
-puts "Name?"
-p1.name = gets.strip
-if p1.name != ""
-  puts "Saving..."
-  p1.save!
-
-  puts "Making #{p.name} follow #{p1.name}..."
-  p.followees.add! p1
-end
-puts "Done!"
-list = p.followees
-puts "#{p.name} now following #{list.count} users:"
-list.each do |f|
-  puts " - #{f.jason_key}: #{f.name}\n"
-end

data/lib/testmeta.rb

@@ -1,39 +0,0 @@
-$: << "~/Projects/Medea/lib"
-require 'rubygems'
-require 'medea'
-
-class Message < Medea::JasonObject
-end
-
-class User < Medea::JasonObject
-  owns_many :messages, Message
-end
-
-puts "Enter an id, or blank to make a new user:"
-id = gets.strip
-if id == ""
-  u = User.new
-  puts "User's name?"
-  u.name = gets.strip
-
-  puts "Saving"
-  u.save!
-else
-  u = User.get_by_key id
-  puts "#{u.name} has posted #{u.messages.count} messages"
-end
-
-while true
-  puts "Enter a message (blank to stop):"
-  message = gets.strip
-  break if message == ""
-  m = Message.new
-  m.message = message
-  m.from = u.name
-  u.messages.add! m
-end
-
-puts "Fetching messages..."
-u.messages.each do |e|
-  puts " - #{e.message}\n"
-end

data/lib/testsublist.rb

@@ -1,46 +0,0 @@
-$: << "~/Projects/Medea/lib"
-require 'rubygems'
-require 'medea'
-
-class Message < Medea::JasonObject; end
-
-class User < Medea::JasonObject
-  owns_many :messages, Message
-  has_many :followees, User
-end
-
-u1 = User.new
-u1.name = "Fred"
-u1.save!
-
-u2 = User.new
-u2.name = "George"
-u2.save!
-
-u1.followees.add! u2
-u1.followees.add! u1
-
-m1 = Message.new
-m1.from = u2.name
-m1.message = "Hello! This is George"
-u2.messages.add! m1
-
-m3 = Message.new
-m3.from = u1.name
-m3.message = "George sent me here, hope it's fun!"
-u1.messages.add! m3
-
-m2 = Message.new
-m2.from = u2.name
-m2.message = "Man, this is a long day!"
-u2.messages.add! m2
-
-puts "#{u2.name} has posted #{u2.messages.count} messages"
-
-puts "#{u1.name} is following #{u1.followees.count} users"
-puts "#{u1.name}'s timeline has #{u1.followees.messages.count} messages in it"
-
-u1.followees.messages.each do |m|
-  puts "#{m.from}:"
-  puts "      #{m.message}"
-end