added #putdup and #get4 to Rufus::Edo::Cabinet

lib/rufus/edo/cabinet/abstract.rb

@@ -214,6 +214,23 @@ def initialize (path, params={})
       self.default = params[:default]
       @default_proc ||= params[:default_proc]
     end
+
+    # This is a B+ Tree method only, puts a value for a key who has
+    # [potentially] multiple values.
+    #
+    def putdup (k, v)
+
+      @db.putdup(k, v)
+    end
+
+    # This is a B+ Tree method only, returns all the values for a given
+    # key.
+    #
+    def get4 (k)
+
+      @db.getlist(k)
+    end
+    alias :getdup :get4
   end
 end
 

lib/rufus/tokyo/cabinet/abstract.rb

@@ -562,7 +562,7 @@ def get4 (k)
     #
     def as_btree
 
-      raise(ArgumentError.new("cannot call B+ Tree function on #{@path}")) \
+      raise(NoMethodError.new("cannot call B+ Tree function on #{@path}")) \
         if ! @path.match(/\.tcb$/)
 
       lib.tcadbreveal(@db)

spec/cabinet_btree_spec.rb

@@ -37,7 +37,7 @@
 
     @db = Rufus::Tokyo::Cabinet.new('tmp/cabinet_btree_spec.tch')
 
-    lambda { @db.putdup('a', 'a0') }.should.raise(ArgumentError)
+    lambda { @db.putdup('a', 'a0') }.should.raise(NoMethodError)
   end
 end
 

spec/edo_cabinet_btree_spec.rb

@@ -0,0 +1,43 @@
+
+#
+# Specifying rufus-tokyo
+#
+# Fri Aug 28 08:58:37 JST 2009
+#
+
+require File.dirname(__FILE__) + '/spec_base'
+
+require 'rufus/edo'
+
+FileUtils.mkdir('tmp') rescue nil
+
+
+describe 'Rufus::Edo::Cabinet .tcb' do
+
+  before do
+    @db = Rufus::Edo::Cabinet.new('tmp/edo_cabinet_btree_spec.tcb')
+    @db.clear
+  end
+  after do
+    @db.close
+  end
+
+  it 'should accept duplicate values' do
+
+    @db.putdup('a', 'a0')
+    @db.putdup('a', 'a1')
+
+    @db.getdup('a').should.equal([ 'a0', 'a1' ])
+  end
+end
+
+describe 'Rufus::Edo::Cabinet .tcb methods' do
+
+  it 'should fail on other structures' do
+
+    @db = Rufus::Edo::Cabinet.new('tmp/cabinet_btree_spec.tch')
+
+    lambda { @db.putdup('a', 'a0') }.should.raise(NoMethodError)
+  end
+end
+