hanswurst 0.5.5 → 0.5.6

data/README.md

@@ -1,6 +1,8 @@
 hanswurst: Be a couch potato and play different roles
 =====================
 
+<strong>hanswurst is discontinued in favour of [https://github.com/metakeule/thingtank](https://github.com/metakeule/thingtank) using CouchRest Model and a slightly different concept</strong>
+
 Hanswurst is a library that uses couch potato to create arbitrary
 objects that may have different roles. The roles determine the
 properties and they can be mixed and matched at will.
@@ -19,132 +21,231 @@ or in rvm:
     gem install hanswurst
 
 
-Example:
+Examples:
 --------
 
-first you have to build your roles as normal couch potato classes 
-
-    class Person
-      include CouchPotato::Persistence
+To simplify the class building we let them all inherit from a role class
 
-      property :last_name
-      property :first_name
+    class Role
+      include CouchPotato::Persistence # add the couch potato features
+      include Hanswurst::Shares        # allows to share roles
+      include Hanswurst::Delegates     # delegate methods to methods of a property that is a role
+      include Hanswurst::Doc           # access the doc from inside the role
 
-      def name()
-        "#{firstname} #{lastname}"
+      # simplify saving
+      def save
+        CouchPotato.database.save_document _doc
       end
+    end
+
+
+Imagine a Caesar is born
+
+    class Birth < Role
+      property :date
+      property :place
 
-      validates_presence_of :last_name
+      validates_presence_of :date # make sure a date is given
     end
 
-    class Product
-      include CouchPotato::Persistence
+    # just in case he might die....we might want to have a date and maybe even a place
+    class Dead < Birth
+    end
 
-      property :price
-      property :in_stock
+    class Person < Role
+      property :name
+      property :gender
+      shares :birth => Birth # requires the shared property :birth which is a Birth
+      shares :dead => Dead # requires the shared property :dead which is a Dead
     end
 
-then you may use them as you like
+    julius = Hanswurst.new
+    julius.person = Person.new # the shared property :birth is propagated
+    julius.person.gender = "m"
+    julius.person.name = 'Gaius Iulius Caesar' 
 
-    hw = Hanswurst.new
-    hw << {:person => Person} # first role then class
-    hw.person.first_name = 'Diederich'
-    hw.person.last_name = 'Hessling' # an RoleNotValid error is raised if hw.person.last_name is missing
+    # we could directly setup the properties and don't have to do 'julius.birth = Birth.new' first
+    julius.birth.date = "100 BC"
+    julius.birth.place = "Rome"
 
-    # you may also use some syntatic sugar with 'as', the following does the same thing as above
-    hw = Hanswurst.new :person => Person.new(:first_name => 'Diederich', :last_name => 'Hessling') 
-      
-    # this is also possible
-    hw.product = Product.new :price => 20, :in_stock => 1  
+    julius.person.save # doen't matter on with role you call save, see Role#save above
 
-    id = CouchPotato.database.save_document hw
+    julius_id = julius._id
 
 later...
 
-    hw = CouchPotato.database.load_document id
+    julius = CouchPotato.database.load_document julius_id
+    julius.person.name  # => 'Gaius Iulius Caesar'
+    julius.birth.place  # => "Rome"
 
-    hw.person.first_name  # => 'Diederich'
-    hw.person.name # => 'Diederich Hessling'
-    hw.product.price       # => 20
 
-you may also set roles as properties of other roles
+when he is adult, he wants to marry. now things are getting a bit more complicated:
 
-    class Address
-      include CouchPotato::Persistence
+    # he needs a marriage and a women
+    class Marriage < Role
+      property :date    # the date of the marriage
+      property :end     # when the marriage ended
+      property :spouse  # doc_id of the spouse
+      property :state   # current state of the marriage, e.g. 'married', 'widowed', 'divorced'
 
-      property :street
-      property :zip
-      property :city
+      # ensure that 'spouse' is a fkey (doc_id) of a Person and that we have only one of them
+      validates :spouse, :hanswurst => {:class => Person, :fkey => true, :max => 1}
     end
 
-    class Person
-      include CouchPotato::Persistence
-
-      property :address_privat
-      property :address_work
-      
-      # gets invalid unless address_privat / address_work are instances of Address
-      validates :address_privat, :hanswurst => {:class => Address}
-      validates :address_work, :hanswurst => {:class => Address}
-      
-      property :last_name
-      property :first_name
+    # and we don't want to load the spouses document manually just to get her name. so here is a role that does it for us
+    class Spouse < Role
+      shares :marriage => Marriage # depends on the shared marriage role
+
+      # convenience method to get name of the current spouse by doc.spouse.name
+      def name
+        CouchPotato.database.load_document(id).person.name if (id=marriage_spouse)
+      end
+
+      def marriage_spouse
+        m = marriage()
+        return m.spouse if m and m.status == 'married'
+        return nil
+      end
+
+      def marriage()
+        _doc.marriage  # here we access the shared marriage role via the _doc (Hanswurst document)
+      end
     end
 
-    hw = Hanswurst.new :employee => Person.new(:last_name => 'Hessling')
-    emp = hw.employee
-    emp.address_privat = Address.new :city => 'Berlin'
-    emp.address_work = Address.new :city => 'Potsdam'
 
-as comfort you might delegate to some roles property
+now we could easily get julius married
+
+    conny = Hanswurst.new
+    conny.person = Person.new :gender => "f", :name => 'Cornelia'
+    conny.save
+
+    julius.marriage = Marriage.new
+    julius.marriage.date = "84 BC"
+    julius.marriage.spouse = conny._id
+    julius.marriage.state = 'married'
+
+    julius.spouse.name # => 'Cornelia'
+    
+while that is nice, let see if we could make it more comfortable:
+
+    class Marriage
+      shares :spouse => Spouse # we need a spouse as role of the doc
 
-    class Address
-      include CouchPotato::Persistence
+      # marry a person that is or is not already saved or part of a Hanswurst
+      def marry(person)
 
-      property :street
-      property :zip
-      property :city
+        # attach it to a hanswurst, if it is not already
+        person = Hanswurst.new(:person => person).person unless person.respond_to? :_doc # if it responds to :_doc it already has a hanswurst doc attached to it
+
+        # save the person if it is not already
+        person.save unless person._doc._id
+
+        # assign the doc_id to spouse
+        self.spouse = person._doc._id
+        self.state = 'married'
+
+        # now look if she is already married to him and make her marry him
+        unless self._doc && self._doc._id && person._doc.marriage_spouse == self._doc._id
+          person._doc.marriage = Marriage.new :date => self.date
+          person._doc.marriage.marry self
+          person.save
+        end
+      end
     end
 
-    class Person
-      include CouchPotato::Persistence
-      include Hanswurst::Delegates
+it now becomes much less work and Cornelia also knows that she is married to Julius
+
+    conny = Person.new(:gender => "f", :name => 'Cornelia')
+    julius.marriage = Marriage.new :date => "84 BC"
+    julius.marriage.marry conny
 
-      property :address
+    julius.spouse.name # => 'Cornelia'
+    conny.spouse.name  # => 'Gaius Iulius Caesar'
 
-      delegates [:street,:zip,:city] => :address
+julius could even marry a second time, i.e. marriage becomes an Array of Marriage objects
+
+    marriage = Marriage.new :date => "68-65 BC"
+    marriage.marry Person.new(:gender => "f", :name => 'Pompeia')
+    julius.marriage << marriage
+
+    # ouch!
+    julius.spouse.name # => Error
+
+we should let Spouse know that Marriage might be an array, so simply overwrite marriage with
+
+    class Spouse
+      def marriage()
+        [_doc.marriage].flatten.last
+      end
     end
 
-    hw = Hanswurst.new :employee => Person.new(:last_name => 'Hessling'), :address => Address.new
-    emp = hw.employee
-    emp.city = 'Berlin' # => sets emp.addess.city = 'Berlin'
-    emp.city # => gets emp.addess.city
+now it works:
+
+    julius.spouse.name # => 'Pompeia'
+
+    julius.marriage.size # => 2
+    julius.marriage.first.spouse.name # => 'Cornelia'
 
-you might also share dependancies
+    # oops!
+    julius.marriage.first.status # => 'married'
 
-    class Address
-      include CouchPotato::Persistence
+julius is still married with Cornelia but he should not
 
-      property :street
-      property :zip
-      property :city
+if Cornelia died before his second marriage, it should'nt be a problem:
+
+    class Dead
+      # all callbacks of roles are called and defined like corresponding callbacks of the doc
+      before_save do
+        if _doc.spouse && marriage=_doc.spouse.marriage
+          marriage.end = self.date    # marriage ends with date of dead
+          marriage.state = 'widowed'
+        end
+      end
     end
 
     class Person
-      include CouchPotato::Persistence
-      include Hanswurst::Shares
-
-      shares :address_privat => Address
-      shares :address_work => Address
-      
-      property :last_name
-      property :first_name
+      def die(date)
+        _doc.dead = Dead.new :date => date
+      end
     end
 
-    hw = Hanswurst.new :employee => Person.new(:last_name => 'Hessling')
-    hw.address_privat.city = 'Berlin'
-    hw.address_work.city = 'Potsdam'
-    
+    # ok first replay the marriage of conny and julius to prevent errors
+    conny.marriage = nil
+    conny.save
+
+    julius.marriage = Marriage.new :date => "84 BC"
+    julius.marriage.marry conny
+
+    # now conny dies
+    conny.die "68-65 BC"
+
+    # and julius may marry Pompeia
+    marriage = Marriage.new :date => "68-65 BC"
+    marriage.marry Person.new(:gender => "f", :name => 'Pompeia')
+    julius.marriage << marriage
+
+    julius.marriage.first.status # => 'widowed'
+    julius.marriage.first.spouse.name # => 'Cornelia'
+
+    julius.marriage.last.status # => 'married'
+    julius.marriage.last.spouse.name # => 'Pompeia'
+
+    julius.spouse.name # => 'Pompeia'
+
+since julius is immortal, no one should be able to destroy him:
+
+    class Undestroyable < Role
+      before_save do
+        false # never allow to destroy
+      end
+    end
+
+    julius.immortal = Undestroyable.new
+
+    CouchPotato.database.destroy_document julius
+
+    CouchPotato.database.load_document julius._id # => julius is still there
+
 All views are attached to the hanswurst design document
 You may create general views:
 
@@ -152,10 +253,10 @@ You may create general views:
 
 or views specific for a role
 
-    Hanswurst.view_for :employee, :all, :key => :created_at
+    Hanswurst.view_for :immortal, :all, :key => :created_at
 
     # execute them this way
-    CouchPotato.database.view Hanswurst.employee_all
+    CouchPotato.database.view Hanswurst.immortal_all
 
 the same works with lists.
 

data/VERSION

@@ -1 +1 @@
-0.5.5
+0.5.6

data/examples/bear_julius.rb

@@ -0,0 +1,45 @@
+require_relative 'role.rb'
+
+class Birth < Role
+  property :date
+  property :place
+
+  validates_presence_of :date # make sure a date is given
+end
+
+# just in case he might die....we might want to have a date and maybe even a place
+class Dead < Birth
+end
+
+class Person < Role
+  property :name
+  property :gender
+  shares :birth => Birth # requires the shared property :birth which is a Birth
+  shares :dead => Dead # requires the shared property :dead which is a Dead
+end
+
+
+# include this in the tests
+module HanswurstExampleTests
+
+  def bear_julius
+    julius = Hanswurst.new
+    julius.person = Person.new # the shared property :birth is propagated
+    julius.person.gender = "m"
+    julius.person.name = 'Gaius Iulius Caesar' 
+
+    # we could directly setup the properties and don't have to do 'julius.birth = Birth.new' first
+    julius.birth.date = "100 BC"
+    julius.birth.place = "Rome"
+
+    julius.person.save # doen't matter on with role you call save, see Role#save above
+
+    julius = julius.person.load
+
+    assert_equal 'Gaius Iulius Caesar', julius.person.name
+    assert_equal 'Rome', julius.birth.place
+
+    return julius
+  end
+
+end

data/examples/first_marriage.rb

@@ -0,0 +1,64 @@
+require_relative 'bear_julius.rb'
+
+# he needs a marriage and a women
+class Marriage < Role
+  #shares :person => Person # we need to be a person in order to marry
+
+  property :date    # the date of the marriage
+  property :end     # when the marriage ended
+  property :spouse  # doc_id of the spouse
+  property :state   # current state of the marriage, e.g. 'married', 'widowed', 'divorced'
+
+  # ensure that 'spouse' is a fkey (doc_id) of a Person and that we have only one of them
+  validates :spouse, :hanswurst => {:class => Person, :fkey => true, :max => 1}
+end
+
+# and we don't want to load the spouses document manually just to get her name. so here is a role that does it for us
+class Spouse < Role
+#  shares :marriage => Marriage # depends on the shared marriage role
+
+  # convenience method to get name of the current spouse by doc.spouse.name
+  def name
+    if (id=marriage_spouse)
+      return CouchPotato.database.load_document(id).person.name
+    end
+    return nil
+  end
+
+  def marriage_spouse
+    m = marriage()
+    return m.spouse if m and m.state == 'married'
+    return nil
+  end
+
+  def marriage()
+    _doc.marriage  # here we access the shared marriage role via the _doc (Hanswurst document)
+  end
+end
+
+# include this in the tests
+module HanswurstExampleTests
+
+  def first_marriage()
+    julius = bear_julius
+
+    conny = Hanswurst.new :person => Person.new(:gender => "f", :name => 'Cornelia')
+    conny.person.save
+
+    julius.marriage = Marriage.new
+    julius.marriage.date = "84 BC"
+    julius.marriage.spouse = conny._id 
+    julius.marriage.state = 'married'
+    
+    julius.spouse = Spouse.new
+
+    assert_equal 'Cornelia', julius.spouse.name
+
+    julius.person.save
+    julius = julius.person.load
+
+    assert_equal 'Cornelia', julius.spouse.name
+  end
+
+end
+

data/examples/immortal_julius.rb

@@ -0,0 +1,25 @@
+require_relative 'bear_julius.rb'
+
+class Undestroyable < Role
+  before_destroy do
+    false # never allow to destroy
+  end
+end
+
+
+
+module HanswurstExampleTests
+  def julius_immortal
+    julius = bear_julius()
+    julius.immortal = Undestroyable.new
+    julius.immortal.save
+
+    id = julius._id
+    julius = load id
+
+    CouchPotato.database.destroy_document julius
+  
+    assert !load(id).nil? # => julius is still there
+  end
+end
+

data/examples/marriage_improvement.rb

@@ -0,0 +1,50 @@
+require_relative 'first_marriage.rb'
+
+class Marriage
+  shares :spouse => Spouse # we need a spouse as role of the doc
+
+  # marry a person that is or is not already saved or part of a Hanswurst
+  def marry(person)
+    # attach it to a hanswurst, if it has not one yet
+    person = Hanswurst.new(:person => person).person unless person.respond_to?(:_doc) && person._doc
+
+    # save the person if it is not already
+    person.save unless person._doc._id
+
+    # assign the doc_id to spouse
+    self.spouse = person._doc._id
+    self.state = 'married'
+
+    unless person._doc.marriage
+      person._doc.marriage = Marriage.new :date => self.date
+    end
+
+    # now look if she is already married to him and make her marry him
+    unless self._doc && self._doc._id && person._doc.spouse.marriage_spouse == self._doc._id
+      person._doc.marriage.marry self._doc.person
+      person.save
+    end
+  end
+end
+
+class Spouse
+  def marriage()
+    [_doc.marriage].flatten.last
+  end
+end
+
+# include this in the tests
+module HanswurstExampleTests
+  def improved_marriage()
+    julius = bear_julius()
+    julius.marriage = Marriage.new :date => "84 BC"
+    julius.marriage.marry Person.new(:gender => "f", :name => 'Cornelia')
+    conny = load julius.spouse.marriage_spouse
+    assert_equal 'married', julius.marriage.state
+    assert_equal 'Cornelia', julius.spouse.name
+    assert_equal 'Gaius Iulius Caesar', conny.spouse.name
+    return julius
+  end
+end
+
+

data/examples/role.rb

@@ -0,0 +1,24 @@
+
+# class used by the other examples
+class Role
+  include CouchPotato::Persistence # add the couch potato features
+  include Hanswurst::Shares        # allows to share roles
+  include Hanswurst::Delegates     # delegate methods to methods of a property that is a role
+  include Hanswurst::Doc           # access the doc from inside the role
+
+  # simplify saving
+  def save
+    CouchPotato.database.save_document _doc
+  end
+
+  def load
+    CouchPotato.database.load_document _doc._id
+  end
+end
+
+# include this in the tests
+module HanswurstExampleTests
+  def load(doc_id)
+    CouchPotato.database.load_document doc_id
+  end
+end

data/examples/second_marriage.rb

@@ -0,0 +1,69 @@
+require_relative 'marriage_improvement.rb'
+
+class Dead
+
+  # all callbacks of roles are called and defined like corresponding callbacks of the doc
+  before_save do
+    if _doc.spouse && marriage=_doc.spouse.marriage
+      doc = CouchPotato.database.load_document(marriage.spouse)
+      m = doc.spouse.marriage
+      m.state = 'widowed'
+      m.end = self.date
+      CouchPotato.database.save_document doc
+    end
+    true
+  end
+end
+
+class Person
+  def die(date)
+    _doc.dead = Dead.new :date => date
+  end
+end
+
+# include this in the tests
+module HanswurstExampleTests
+
+  def second_marriage()
+    julius = improved_marriage()
+    julius.marriage << Marriage.new(:date => "68-65 BC")
+    julius.marriage.last.marry Person.new(:gender => "f", :name => 'Pompeia')
+
+    assert_equal 2, julius.marriage.size
+    assert_equal 'Cornelia', load(julius.marriage.first.spouse).person.name
+    assert_equal 'Pompeia', load(julius.marriage.last.spouse).person.name
+    assert_equal 'Pompeia', julius.spouse.name
+    assert_equal 'married', julius.marriage.first.state
+    assert_equal 'married', julius.marriage.last.state
+
+    return julius
+  end
+
+  def second_marriage_after_conny_died()
+    julius = bear_julius()
+    conny = Person.new(:gender => "f", :name => 'Cornelia')
+    julius.marriage = Marriage.new :date => "84 BC" # we need to attach marriage first (before calling marry), so that it has a _doc
+    julius.marriage.marry conny
+    julius.person.save
+
+    conny = load(julius.spouse.marriage_spouse)
+    conny.person.save
+    conny = conny.person.load
+    conny.person.die "68-65 BC"
+    conny.person.save  # terminates the marriage
+
+    julius = julius.person.load
+
+    julius.marriage << Marriage.new(:date => "68-65 BC") # we need to attach marriage first (before calling marry), so that it has a _doc
+    julius.marriage.last.marry Person.new(:gender => "f", :name => 'Pompeia')
+
+    assert_equal 2, julius.marriage.size
+    assert_equal 'Cornelia',  load(julius.marriage.first.spouse).person.name
+    assert_equal 'widowed', julius.marriage.first.state
+    assert_equal 'Pompeia', load(julius.marriage.last.spouse).person.name
+    assert_equal 'married', julius.marriage.last.state
+    assert_equal 'Pompeia', julius.spouse.name
+  end
+
+end
+

data/lib/hanswurst.rb

@@ -5,10 +5,25 @@ require_relative File.join('hanswurst', 'class_methods')
 require_relative File.join('hanswurst', 'method_missing')
 require_relative File.join('hanswurst', 'instance_methods')
 require_relative File.join('hanswurst', 'delegates')
+require_relative File.join('hanswurst', 'doc')
 require_relative File.join('hanswurst', 'shares')
 require_relative File.join('hanswurst', 'as')
 require_relative File.join('hanswurst', 'callbacks')
 
+=begin
+TODO
+
+- throw errors where it makes sense
+- make a module to allow the execution of callbacks of roles of roles
+- improve the inheritence situation of Hanswurst
+- meta module to collect metainformation about roles (by overwriting of methods of method_missing
+- add possibility to dynamically create roles from a hash and to save this role-designs in the design document of hanswurst and recreate them wenn fetching data from database
+- improve documentation
+- performance tests
+- examples for views
+
+=end
+
 # Each Hanswurst may have a different combination of roles. It's a very flexible way to be a couch potato.
 class Hanswurst
   include CouchPotato::Persistence

data/lib/hanswurst/as.rb

@@ -3,17 +3,29 @@ class Hanswurst
 
   # helper for easy access to role attributes
   class As
-    def initialize(doc, role)
+    def initialize(doc, role, rolename)
       @doc = doc
       @role = role
+      @rolename = rolename.to_sym
+      if @role.respond_to? :_doc=
+        @role._doc = @doc
+      end
     end
   
     def _role
       @role
     end
 
-    def _id
-      @doc._id
+    def << (new_role)
+      if new_role.class == Hanswurst::As
+        new_role = new_role._role
+      end
+      if @role.is_a? Array
+        @role << new_role
+      else
+        @role = [@role, new_role]
+        @doc.send :"#{@rolename}=", @role
+      end
     end
 
     def _doc
@@ -22,13 +34,29 @@ class Hanswurst
 
     # we suppose, we have a subrole
     def method_missing(meth, *args, &code)
-      # a hack around http://api.rubyonrails.org/classes/ActiveModel/Dirty.html
-      # since ActiveModel::Dirty does not recognize when property is a hash and hashentries do change
-      @doc.update_roles! if meth =~ /=$/
+      rolename = meth
+      if meth.to_s =~ /^(.*)=$/
+        rolename = $1
+        case args.first
+        when Hanswurst::As
+          args = [args.first._role]
+        when Array
+          first = args.first.collect do |e|
+            e.class == Hanswurst::As ? e._role : e
+          end
+          args = [first]
+        end
+      end
 
       obj = @role.send(meth, *args)
-      obj = self.class.new(@doc, @role.send(meth, *args)) if obj.is_a? CouchPotato::Persistence
+      obj = self.class.new(@doc, @role.send(meth, *args), rolename) if obj.is_a? CouchPotato::Persistence
       obj.instance_eval(&code) if code
+
+      # a hack around http://api.rubyonrails.org/classes/ActiveModel/Dirty.html
+      # since ActiveModel::Dirty does not recognize when property is a hash and hashentries do change
+      if meth.to_s =~ /^(.*)=$/
+        @doc.update_roles! 
+      end
       obj
     end
   end

data/lib/hanswurst/doc.rb

@@ -0,0 +1,15 @@
+class Hanswurst
+  module Doc
+    def self.included(mod)
+      mod.class_eval do
+        def _doc=(doc)
+          @_doc = doc
+        end
+
+        def _doc
+          @_doc
+        end
+      end
+    end
+  end
+end

data/lib/hanswurst/instance_methods.rb

@@ -89,6 +89,9 @@ class Hanswurst
 
   # set instance for a role
   def set(role, val)
+    if val.respond_to? :_doc=
+      val._doc = self
+    end
     self.hanswurst_data ||= {}
     self.hanswurst_data.update role.to_s => val
     update_roles!
@@ -121,7 +124,7 @@ class Hanswurst
       create(role.to_s)
     end
     if role_obj = hanswurst_data[role.to_s]
-      obj = As.new(self, role_obj)
+      obj = As.new(self, role_obj, role)
       obj.instance_eval(&code) if code
       return obj
     end

data/lib/hanswurst/method_missing.rb

@@ -6,11 +6,16 @@ class Hanswurst
       case meth
       when /^([^=]+)\=$/ # obj.role = ... # => we set a role
         role=$1
+        if value.class == Hanswurst::As
+          return self.send meth, value._role
+        end
         add_role(role, value.class) unless role_exists?(role)
         set_role(role, value) if role_exists?(role)
         return as(meth)
       else
         return as(meth) if role_exists?(meth.to_s)
+        return super if meth == :hanswurst_data_will_change!
+        return nil
       end
       super
     end

data/test/examples/test_bear_julius.rb

@@ -0,0 +1,11 @@
+require 'helper'
+require 'bear_julius'
+
+class TestBearJulius < Test::Unit::TestCase
+
+  should "bear a julius" do
+    recreate_db()
+    bear_julius()
+  end
+
+end

data/test/examples/test_first_marriage.rb

@@ -0,0 +1,11 @@
+require 'helper'
+require 'first_marriage'
+
+class TestFirstMarriage < Test::Unit::TestCase
+
+  should "make the first marriage" do
+    recreate_db()
+    first_marriage()
+  end
+
+end

data/test/examples/test_immortal_julius.rb

@@ -0,0 +1,11 @@
+require 'helper'
+require 'immortal_julius'
+
+class TestImmortalJulius < Test::Unit::TestCase
+
+  should "be an immortal julius" do
+    recreate_db()
+    julius_immortal()
+  end
+
+end

data/test/examples/test_marriage_improvement.rb

@@ -0,0 +1,15 @@
+require 'helper'
+require 'marriage_improvement'
+
+class TestImprovedMarriage < Test::Unit::TestCase
+
+  should "make the improved marriage" do
+    recreate_db()
+    improved_marriage()
+  end
+
+  should "make a second marriage" do
+    second_marriage()
+  end
+
+end

data/test/examples/test_second_marriage.rb

@@ -0,0 +1,15 @@
+require 'helper'
+require 'second_marriage'
+
+class TestSecondMarriage < Test::Unit::TestCase
+
+  should "make a second marriage" do
+    recreate_db()
+    second_marriage()
+  end
+
+  should "make a second marriage after conny died" do
+    recreate_db()
+    second_marriage_after_conny_died()
+  end
+end

data/test/helper.rb

@@ -15,5 +15,18 @@ $LOAD_PATH.unshift(File.dirname(__FILE__))
 $LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
 require 'hanswurst'
 
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'examples'))
 
 
+CouchPotato::Config.database_name = ENV['COUCH_POTATO_TEST_DB']
+
+module HanswurstExampleTests
+  def recreate_db
+    CouchPotato.couchrest_database.recreate!
+  end
+end
+
+class Test::Unit::TestCase
+  include HanswurstExampleTests
+  
+end

data/test/test_hanswurst.rb

@@ -1,12 +1,10 @@
 require 'helper'
-require 'hanswurst'
-
-CouchPotato::Config.database_name = ENV['COUCH_POTATO_TEST_DB']
 
 
 class Pers
 
   include CouchPotato::Persistence
+  include Hanswurst::Doc
   property :firstname
   property :lastname
 
@@ -17,6 +15,7 @@ class Pers
   attr_accessor :callbacks
 
   before_save do
+    p [:before_save, _doc._id] if _doc
     @callbacks ||= []
     @callbacks << :before_save
   end
@@ -261,6 +260,23 @@ class TestCouch < Test::Unit::TestCase
       assert_equal 'Donald', o.person.firstname
     end
 
+    should "add roles" do
+      o = Hanswurst.new
+      o.product = Prod.new( :article_number => 'abc', :name => 'prod1' )
+      save o
+      o = load(o._id)      
+
+      o.product <<  Prod.new( :article_number => 'def', :name => 'prod2' )
+
+      save o
+      #p [o.product]
+      o = load(o._id)      
+
+      assert_equal 'prod1', o.product.first.name
+      assert_equal 'prod2', o.product.last.name
+      assert_equal 2, o.product.size
+    end
+
     should "update role properties" do
       o = Hanswurst.new
       o.product = Prod.new( :article_number => 'xyz', :name => 'prod1' )

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: hanswurst
 version: !ruby/object:Gem::Version
-  version: 0.5.5
+  version: 0.5.6
   prerelease: 
 platform: ruby
 authors:
@@ -9,11 +9,11 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-01-20 00:00:00.000000000Z
+date: 2012-02-05 00:00:00.000000000Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: couch_potato
-  requirement: &15523120 !ruby/object:Gem::Requirement
+  requirement: &16666360 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -21,10 +21,10 @@ dependencies:
         version: '0'
   type: :runtime
   prerelease: false
-  version_requirements: *15523120
+  version_requirements: *16666360
 - !ruby/object:Gem::Dependency
   name: yard
-  requirement: &15522500 !ruby/object:Gem::Requirement
+  requirement: &16665560 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ~>
@@ -32,10 +32,10 @@ dependencies:
         version: 0.6.0
   type: :development
   prerelease: false
-  version_requirements: *15522500
+  version_requirements: *16665560
 - !ruby/object:Gem::Dependency
   name: bundler
-  requirement: &15521920 !ruby/object:Gem::Requirement
+  requirement: &16664780 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ~>
@@ -43,10 +43,10 @@ dependencies:
         version: 1.0.0
   type: :development
   prerelease: false
-  version_requirements: *15521920
+  version_requirements: *16664780
 - !ruby/object:Gem::Dependency
   name: jeweler
-  requirement: &15521320 !ruby/object:Gem::Requirement
+  requirement: &16664060 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ~>
@@ -54,10 +54,10 @@ dependencies:
         version: 1.5.2
   type: :development
   prerelease: false
-  version_requirements: *15521320
+  version_requirements: *16664060
 - !ruby/object:Gem::Dependency
   name: rcov
-  requirement: &15520780 !ruby/object:Gem::Requirement
+  requirement: &16663240 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -65,10 +65,10 @@ dependencies:
         version: '0'
   type: :development
   prerelease: false
-  version_requirements: *15520780
+  version_requirements: *16663240
 - !ruby/object:Gem::Dependency
   name: mocha
-  requirement: &15520200 !ruby/object:Gem::Requirement
+  requirement: &16662440 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -76,10 +76,10 @@ dependencies:
         version: '0'
   type: :development
   prerelease: false
-  version_requirements: *15520200
+  version_requirements: *16662440
 - !ruby/object:Gem::Dependency
   name: shoulda
-  requirement: &15495700 !ruby/object:Gem::Requirement
+  requirement: &16659800 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -87,10 +87,10 @@ dependencies:
         version: '0'
   type: :development
   prerelease: false
-  version_requirements: *15495700
+  version_requirements: *16659800
 - !ruby/object:Gem::Dependency
   name: linecache19
-  requirement: &15495060 !ruby/object:Gem::Requirement
+  requirement: &16658920 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -98,10 +98,10 @@ dependencies:
         version: '0'
   type: :development
   prerelease: false
-  version_requirements: *15495060
+  version_requirements: *16658920
 - !ruby/object:Gem::Dependency
   name: ruby-debug19
-  requirement: &15494420 !ruby/object:Gem::Requirement
+  requirement: &16658180 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -109,10 +109,10 @@ dependencies:
         version: '0'
   type: :development
   prerelease: false
-  version_requirements: *15494420
+  version_requirements: *16658180
 - !ruby/object:Gem::Dependency
   name: couch_potato
-  requirement: &15493800 !ruby/object:Gem::Requirement
+  requirement: &16657360 !ruby/object:Gem::Requirement
     none: false
     requirements:
     - - ! '>='
@@ -120,7 +120,7 @@ dependencies:
         version: '0'
   type: :runtime
   prerelease: false
-  version_requirements: *15493800
+  version_requirements: *16657360
 description: flexible enhancement of couch potato
 email: ! 'Base64.decode64(''bGludXhAbWFyY3JlbmVhcm5zLmRl
 
@@ -137,15 +137,27 @@ files:
 - README.md
 - Rakefile
 - VERSION
+- examples/bear_julius.rb
+- examples/first_marriage.rb
+- examples/immortal_julius.rb
+- examples/marriage_improvement.rb
+- examples/role.rb
+- examples/second_marriage.rb
 - lib/hanswurst.rb
 - lib/hanswurst/as.rb
 - lib/hanswurst/callbacks.rb
 - lib/hanswurst/class_methods.rb
 - lib/hanswurst/delegates.rb
+- lib/hanswurst/doc.rb
 - lib/hanswurst/instance_methods.rb
 - lib/hanswurst/method_missing.rb
 - lib/hanswurst/shares.rb
 - lib/hanswurst/validator.rb
+- test/examples/test_bear_julius.rb
+- test/examples/test_first_marriage.rb
+- test/examples/test_immortal_julius.rb
+- test/examples/test_marriage_improvement.rb
+- test/examples/test_second_marriage.rb
 - test/helper.rb
 - test/test_hanswurst.rb
 homepage: http://github.com/metakeule/hanswurst
@@ -163,7 +175,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
       version: '0'
       segments:
       - 0
-      hash: -1349200765658973839
+      hash: 1041771107013312987
 required_rubygems_version: !ruby/object:Gem::Requirement
   none: false
   requirements:
@@ -172,10 +184,21 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: '0'
 requirements: []
 rubyforge_project: 
-rubygems_version: 1.8.6
+rubygems_version: 1.8.15
 signing_key: 
 specification_version: 3
 summary: Be a couch potato and play different roles
 test_files:
+- examples/bear_julius.rb
+- examples/first_marriage.rb
+- examples/immortal_julius.rb
+- examples/marriage_improvement.rb
+- examples/role.rb
+- examples/second_marriage.rb
+- test/examples/test_bear_julius.rb
+- test/examples/test_first_marriage.rb
+- test/examples/test_immortal_julius.rb
+- test/examples/test_marriage_improvement.rb
+- test/examples/test_second_marriage.rb
 - test/helper.rb
 - test/test_hanswurst.rb