moneta 0.6.0 → 0.7.0

data/spec/helper.rb

@@ -0,0 +1,91 @@
+require 'moneta'
+require 'fileutils'
+require 'monetaspecs'
+
+module Moneta
+  class Transformer < Proxy
+    class << self
+      alias_method :verbose_new, :new
+
+      def new(adapter, options = {})
+        options[:quiet] = true
+        verbose_new(adapter, options)
+      end
+    end
+  end
+end
+
+class Value
+  attr_accessor :x
+  def initialize(x)
+    @x = x
+  end
+
+  def ==(other)
+    Value === other && other.x == x
+  end
+
+  def eql?(other)
+    Value === other && other.x == x
+  end
+
+  def hash
+    x.hash
+  end
+end
+
+def make_tempdir
+  # Expand path since datamapper needs absolute path in setup
+  tempdir = File.expand_path(File.join(File.dirname(__FILE__), 'tmp'))
+  FileUtils.mkpath(tempdir)
+  tempdir
+end
+
+def marshal_error
+  # HACK: Marshalling structs in rubinius without class name throws
+  # NoMethodError (to_sym). TODO: Create an issue for rubinius!
+  if defined?(RUBY_ENGINE) && RUBY_ENGINE == 'rbx'
+    RUBY_VERSION < '1.9' ? ArgumentError : NoMethodError
+  else
+    TypeError
+  end
+end
+
+class InitializeStore
+  def initialize(&block)
+    instance_eval(&block)
+    store = new_store
+    store['foo'] = 'bar'
+    store.clear
+    store.close
+  end
+
+  def method_missing(*args)
+  end
+end
+
+def describe_moneta(name, &block)
+  begin
+    InitializeStore.new(&block)
+    describe(name, &block)
+  rescue LoadError => ex
+    puts "\e[31mTest #{name} not executed: #{ex.message}\e[0m"
+  rescue Exception => ex
+    puts "\e[31mTest #{name} not executed: #{ex.message}\e[0m"
+    puts ex.backtrace.join("\n")
+  end
+end
+
+shared_context 'setup_store' do
+  let(:store) do
+    new_store
+  end
+
+  before do
+    store.clear
+  end
+
+  after do
+    store.close.should == nil if store
+  end
+end

data/spec/moneta/adapter_activerecord_spec.rb

@@ -0,0 +1,32 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_activerecord" do
+  def new_store
+    Moneta::Adapters::ActiveRecord.new(:connection => { :adapter => (defined?(JRUBY_VERSION) ? 'jdbcsqlite3' : 'sqlite3'), :database => File.join(make_tempdir, 'adapter_activerecord') })
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+  it 'updates an existing key/value' do
+    store['foo/bar'] = '1'
+    store['foo/bar'] = '2'
+    records = store.table.find :all, :conditions => { :k => 'foo/bar' }
+    records.count.should == 1
+  end
+
+  it 'uses an existing connection' do
+    ActiveRecord::Base.establish_connection :adapter => (defined?(JRUBY_VERSION) ? 'jdbcsqlite3' : 'sqlite3'), :database => File.join(make_tempdir, 'activerecord-existing')
+
+    store = Moneta::Adapters::ActiveRecord.new
+    store.table.should be_table_exists
+  end
+
+end

data/spec/moneta/adapter_cassandra_spec.rb

@@ -0,0 +1,30 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_cassandra" do
+  def new_store
+    Moneta::Adapters::Cassandra.new(:keyspace => 'adapter_cassandra')
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'not_increment'
+  it_should_behave_like 'expires_stringkey_stringvalue'
+  it 'should support default expiration time' do
+    store = Moneta::Adapters::Cassandra.new(:expires => 2, :keyspace => 'adapter_cassandra')
+    store.store('key1', 'val1')
+    store.store('key2', 'val2', :expires => 60)
+    store.load('key1').should == 'val1'
+    sleep 1
+    store.load('key1').should == 'val1'
+    sleep 2
+    store.load('key1').should == nil
+    store['key2'].should == 'val2'
+  end
+end

data/spec/moneta/adapter_client_spec.rb

@@ -0,0 +1,19 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_client" do
+  $tcp_server ||= Moneta::Server.new(Moneta::Adapters::Memory.new)
+  def new_store
+    Moneta::Adapters::Client.new
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_cookie_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_cookie" do
+  def new_store
+    Moneta::Adapters::Cookie.new
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_couch_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_couch" do
+  def new_store
+    Moneta::Adapters::Couch.new(:db => 'adapter_couch')
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'not_increment'
+end

data/spec/moneta/adapter_datamapper_spec.rb

@@ -0,0 +1,49 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_datamapper" do
+  require 'dm-core'
+  DataMapper.setup(:default, :adapter => :in_memory)
+  def new_store
+    Moneta::Adapters::DataMapper.new(:setup => "sqlite3://#{make_tempdir}/adapter_datamapper")
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'not_increment'
+  it 'does not cross contaminate when storing' do
+    first = Moneta::Adapters::DataMapper.new(:setup => "sqlite3://#{make_tempdir}/datamapper-first")
+    first.clear
+
+    second = Moneta::Adapters::DataMapper.new(:repository => :sample, :setup => "sqlite3://#{make_tempdir}/datamapper-second")
+    second.clear
+
+    first['key'] = 'value'
+    second['key'] = 'value2'
+
+    first['key'].should == 'value'
+    second['key'].should == 'value2'
+  end
+
+  it 'does not cross contaminate when deleting' do
+    first = Moneta::Adapters::DataMapper.new(:setup => "sqlite3://#{make_tempdir}/datamapper-first")
+    first.clear
+
+    second = Moneta::Adapters::DataMapper.new(:repository => :sample, :setup => "sqlite3://#{make_tempdir}/datamapper-second")
+    second.clear
+
+    first['key'] = 'value'
+    second['key'] = 'value2'
+
+    first.delete('key').should == 'value'
+    first.key?('key').should == false
+    second['key'].should == 'value2'
+  end
+
+end

data/spec/moneta/adapter_dbm_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_dbm" do
+  def new_store
+    Moneta::Adapters::DBM.new(:file => File.join(make_tempdir, "adapter_dbm"))
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_file_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_file" do
+  def new_store
+    Moneta::Adapters::File.new(:dir => File.join(make_tempdir, "adapter_file"))
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_fog_spec.rb

@@ -0,0 +1,23 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_fog" do
+  require 'fog'
+  Fog.mock!
+  def new_store
+    Moneta::Adapters::Fog.new(:aws_access_key_id => 'fake_access_key_id',
+        :aws_secret_access_key  => 'fake_secret_access_key',
+        :provider               => 'AWS',
+        :dir                    => 'moneta')
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'not_increment'
+end

data/spec/moneta/adapter_gdbm_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_gdbm" do
+  def new_store
+    Moneta::Adapters::GDBM.new(:file => File.join(make_tempdir, "adapter_gdbm"))
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_hbase_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_hbase" do
+  def new_store
+    Moneta::Adapters::HBase.new(:table => 'adapter_hbase')
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_leveldb_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_leveldb" do
+  def new_store
+    Moneta::Adapters::LevelDB.new(:dir => File.join(make_tempdir, "adapter_leveldb"))
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+end

data/spec/moneta/adapter_localmemcache_spec.rb

@@ -0,0 +1,18 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_localmemcache" do
+  def new_store
+    Moneta::Adapters::LocalMemCache.new(:file => File.join(make_tempdir, "adapter_localmemcache"))
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'not_increment'
+end

data/spec/moneta/adapter_lruhash_spec.rb

@@ -0,0 +1,31 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_lruhash" do
+  def new_store
+    Moneta::Adapters::LRUHash.new
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+  it 'should delete oldest' do
+    store = Moneta::Adapters::LRUHash.new(:max_size => 10)
+    store[0]  = 'y'
+    (1..1000).each do |i|
+      store[i] = 'x'
+      store[0].should == 'y'
+      store.instance_variable_get(:@entry).size.should == [10, i+1].min
+      (0...[9, i-1].min).each do |j|
+        store.instance_variable_get(:@entry)[i-j].should_not be_nil
+      end
+      store.key?(i-9).should be_false if i > 9
+    end
+  end
+end

data/spec/moneta/adapter_memcached_dalli_spec.rb

@@ -0,0 +1,30 @@
+# Generated by generate.rb
+require 'helper'
+
+describe_moneta "adapter_memcached_dalli" do
+  def new_store
+    Moneta::Adapters::MemcachedDalli.new(:namespace => "adapter_memcached_dalli")
+  end
+
+  def load_value(value)
+    Marshal.load(value)
+  end
+
+  include_context 'setup_store'
+  it_should_behave_like 'null_stringkey_stringvalue'
+  it_should_behave_like 'store_stringkey_stringvalue'
+  it_should_behave_like 'returndifferent_stringkey_stringvalue'
+  it_should_behave_like 'expires_stringkey_stringvalue'
+  it_should_behave_like 'increment'
+  it 'should support default expiration time' do
+    store = Moneta::Adapters::MemcachedDalli.new(:expires => 2, :namespace => "adapter_memcached_dalli")
+    store.store('key1', 'val1')
+    store.store('key2', 'val2', :expires => 60)
+    store.load('key1').should == 'val1'
+    sleep 1
+    store.load('key1').should == 'val1'
+    sleep 2
+    store.load('key1').should == nil
+    store['key2'].should == 'val2'
+  end
+end