dkastner-moneta 0.7.0 → 1.0.0

data/lib/moneta/monetas.rb

@@ -0,0 +1,67 @@
+module Moneta
+  # A meta-store that is backed by one or more Moneta stores.
+  # Read operations select a random store, write operations write to all stores.
+  class Monetas
+    def initialize(options = {})
+      @caches = options[:stores] || raise("You must provide the :stores options")
+    end
+
+    module Implementation
+      def key?(key)
+        read_cache.key?(key)
+      end
+
+      def has_key?(key)
+        key?(key)
+      end
+
+      def [](key)
+        read_cache[key]
+      end
+
+      def fetch(key, value = nil)
+        value ||= block_given? ? yield(key) : default # TODO: Shouldn't yield if key is present?
+        read_cache[key] || value
+      end
+
+      def []=(key, value)
+        @caches.map do |cache|
+          cache[key] = value
+        end.first
+      end
+
+      def delete(key)
+        @caches.map do |cache|
+          cache.delete(key)
+        end.first
+      end
+
+      def store(*args)
+        @caches.map do |cache|
+          cache.store(*args)
+        end.first
+      end
+
+      def clear(*args)
+        @caches.map do |cache|
+          cache.clear(*args)
+        end.first
+      end
+    end
+
+    # Unimplemented
+    module Expiration
+      def update_key(key, options)
+      end
+    end
+
+    include Implementation
+    include Expiration
+
+    protected
+
+      def read_cache
+        @caches[rand(@caches.size)]
+      end
+  end
+end

data/lib/moneta/version.rb

@@ -0,0 +1,3 @@
+module Moneta
+  VERSION = '1.0.0'
+end

data/script/destroy

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/destroy'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:newgem_simple, :test_unit]
+RubiGen::Scripts::Destroy.new.run(ARGV)

data/script/generate

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/generate'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:newgem_simple, :test_unit]
+RubiGen::Scripts::Generate.new.run(ARGV)

data/spec/moneta_active_record_spec.rb

@@ -0,0 +1,21 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+require 'moneta/adapters/active_record'
+
+if defined?(ActiveRecord)
+  describe 'Moneta::ActiveRecord' do
+    before(:each) do
+      @cache = Moneta::ActiveRecord.new(:connection => {
+        :adapter  => 'sqlite3',
+        :database => 'reports_test.sqlite3'
+      })
+      @cache.migrate
+      @cache.clear
+    end
+    after :all do
+      FileUtils.rm_f File.expand_path('../reports_test.sqlite3', File.dirname(__FILE__))
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+end

data/spec/moneta_basic_file_spec.rb

@@ -0,0 +1,62 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/basic_file"
+
+  describe "Moneta::Adapters::BasicFile" do
+    describe "without namespacing" do
+      before(:each) do
+        @cache = Moneta::Builder.build do
+          run Moneta::Adapters::BasicFile, :path => File.expand_path("../basic_file_cache", __FILE__)
+        end
+        @cache.clear
+      end
+      
+      if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'basic_file'
+        it_should_behave_like "a read/write Moneta cache"
+      end
+      
+      it "should deal with '/' and '#' in a key" do
+        key = "hello/mom#crazycharacters"
+        @cache[key] = "hi"
+        @cache[key].should == "hi"
+        ::File.exists?(File.join(File.dirname(__FILE__), "basic_file_cache", "")).should == true
+      end
+    end
+    
+    describe "with namespacing" do
+      before(:each) do
+        @cache = Moneta::Builder.build do
+          run Moneta::Adapters::BasicFile, 
+            :path => File.expand_path("../basic_file_cache", __FILE__),
+            :namespace => "test_namespace"
+        end
+        
+        @cache.clear
+      end
+      
+      if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'basic_file'
+        it_should_behave_like "a read/write Moneta cache"
+      end
+      
+      it "should act as two stores within the same directory" do
+        @second = Moneta::Builder.build do
+          run Moneta::Adapters::BasicFile, 
+            :path => File.expand_path("../basic_file_cache", __FILE__),
+            :namespace => "second_namespace"
+        end
+        
+        @second[:key] = "hello"
+        @cache[:key] = "world!"
+        @second[:key].should == "hello"
+        @cache[:key].should == "world!"
+      end
+    end
+
+    after(:all) do
+      FileUtils.rm_rf(File.join(File.dirname(__FILE__), "basic_file_cache"))
+    end
+    
+  end
+rescue SystemExit
+end

data/spec/moneta_couch_spec.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+begin
+  require 'moneta/adapters/couch'
+
+  describe "Moneta::Adapters::Couch" do
+    before(:each) do
+      @cache = Moneta::Builder.build do
+        run Moneta::Adapters::Couch, :db => "couch_test"
+      end
+      @cache.clear
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_datamapper_spec.rb

@@ -0,0 +1,77 @@
+require 'spec_helper'
+require 'fileutils'
+
+begin
+  require "moneta/adapters/datamapper"
+
+  DataMapper.setup(:default, :adapter => :in_memory)
+  path = File.expand_path("../datamapper_spec.db", __FILE__)
+  FileUtils.rm(path) if File.exist?(path)
+
+  describe "Moneta::DataMapper" do
+
+    before(:each) do
+      DataMapper.repository(:default).adapter.reset
+    end
+
+    describe "with the default repository" do
+      before(:each) do
+        @cache = Moneta::Adapters::DataMapper.new(:setup => "sqlite3://#{path}")
+        @cache.clear
+      end
+
+      after(:all) do
+        MonetaHash.auto_migrate!(:moneta)
+      end
+
+      it_should_behave_like "a read/write Moneta cache"
+    end
+
+    describe "when :repository specified" do
+      before(:each) do
+        @cache = Moneta::Adapters::DataMapper.new(:repository => :sample, :setup => "sqlite3://#{path}")
+        @cache.clear
+      end
+
+      after(:all) do
+        MonetaHash.auto_migrate!(:sample)
+      end
+
+      it_should_behave_like "a read/write Moneta cache"
+    end
+
+    describe "with multiple stores" do
+      before(:each) do
+        @default_cache = Moneta::Adapters::DataMapper.new(:setup => "sqlite3:moneta.db")
+        @default_cache.clear
+
+        @sample_cache = Moneta::Adapters::DataMapper.new(:repository => :sample, :setup => "sqlite3:sample.db")
+        @sample_cache.clear
+      end
+
+      after(:all) do
+        File.delete('moneta.db')
+        File.delete('sample.db')
+      end
+
+      # TODO should there be more tests than these?
+      it "does not cross contaminate when storing" do
+        @default_cache["key"] = "value"
+        @sample_cache["key"] = "value2"
+
+        @default_cache["key"].should == "value"
+        @sample_cache["key"].should == "value2"
+      end
+
+      it "does not cross contaminate when deleting" do
+        @default_cache["key"] = "value"
+        @sample_cache["key"] = "value2"
+
+        @default_cache.delete("key").should == "value"
+        @default_cache.key?("key").should be_false
+        @sample_cache["key"].should == "value2"
+      end
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_file_spec.rb

@@ -0,0 +1,23 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/file"
+
+  describe "Moneta::Adapters::File" do
+    before(:each) do
+      @cache = Moneta::Builder.build do
+        run Moneta::Adapters::File, :path => File.expand_path("../file_cache", __FILE__)
+      end
+      @cache.clear
+    end
+
+    after(:all) do
+      FileUtils.rm_rf(File.join(File.dirname(__FILE__), "file_cache"))
+    end
+
+    if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'file'
+      it_should_behave_like "a read/write Moneta cache"
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_lmc_spec.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+begin
+  require "moneta/adapters/lmc"
+  require "fileutils"
+
+  # Problem: If there are multiple caches around, they start
+  # to block (with a system semaphore), which can be unpleasant
+  # so just use one cache for the entire test run.
+  $lmc_cache = Moneta::Builder.build do
+    run Moneta::Adapters::LMC, :filename => "test"
+  end
+
+  describe "Moneta::LMC" do
+    before(:all) do
+      @cache = $lmc_cache
+    end
+    
+    after(:each) do
+      @cache.clear
+    end
+    
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_memcache_spec.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+if defined?(MemCache)
+  require "moneta/adapters/memcache"
+
+  describe "Moneta::Adapters::Memcache" do
+    before(:each) do
+      @native_expires = true
+      @cache = Moneta::Builder.build do
+        run Moneta::Adapters::Memcache, :server => "localhost:11211", :namespace => "moneta_spec"
+      end
+      @cache.clear
+    end
+  
+    it_should_behave_like "a read/write Moneta cache"
+  end
+end  

data/spec/moneta_memory_spec.rb

@@ -0,0 +1,18 @@
+require 'spec_helper'
+
+require "moneta/adapters/memory"
+
+describe "Moneta::Adapters::Memory" do
+  class EmptyMiddleware
+    include Moneta::Middleware
+  end
+
+  before(:each) do
+    @cache = Moneta::Builder.build do
+      run Moneta::Adapters::Memory
+    end
+    @cache.clear
+  end
+
+  it_should_behave_like "a read/write Moneta cache"
+end

data/spec/moneta_mongodb_spec.rb

@@ -0,0 +1,39 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+begin
+  require "moneta/adapters/mongodb"
+
+  describe "Moneta::Adapters::MongoDB" do
+    before(:each) do
+      @cache = Moneta::Adapters::MongoDB.new
+      @cache.clear
+    end
+
+    describe '#initialize' do
+      it 'should initialize with a URI' do
+        mock_mongo = mock(Object, :db => mock(Object, :collection => []))
+        Mongo::Connection.should_receive(:from_uri).
+          with('mongodb://a:b@localhost:27059/cache').
+          and_return mock_mongo
+        m = Moneta::Adapters::MongoDB.new :uri => 'mongodb://a:b@localhost:27059/cache'
+      end
+      it 'should initialize with a hash of options' do
+        m = Moneta::Adapters::MongoDB.new
+        m['example'] = 3.0
+        m['example'].should == 3.0
+      end
+    end
+
+    context 'initialized' do
+      it_should_behave_like "a read/write Moneta cache"
+
+      describe '#store' do
+        it 'should store marshalled data that contains "invalid" UTF-8 characters' do
+          expect { @cache['example'] = 17.8 }.
+            should_not raise_error
+        end
+      end
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_pstore_spec.rb

@@ -0,0 +1,25 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/pstore"
+
+  describe Moneta::Adapters::PStore do
+    path = File.expand_path("../pstore_cache", __FILE__)
+
+    before(:each) do
+      @cache = Moneta::Builder.new do
+        run Moneta::Adapters::PStore, :path => path
+      end
+      @cache.clear
+    end
+
+    after(:all) do
+      FileUtils.rm_rf(path)
+    end
+
+    if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'pstore'
+      it_should_behave_like "a read/write Moneta cache"
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_rackspace_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+begin
+  require 'moneta/adapters/rackspace'
+
+  describe "Moneta::Adapters::Rackspace" do
+    before(:each) do
+      #Fog.mock! unless ENV["RACKSPACE_USERNAME"]
+
+      @cache = Moneta::Adapters::Rackspace.new(
+        :rackspace_username => ENV["RACKSPACE_USERNAME"] || "mocked",
+        :rackspace_api_key => ENV["RACKSPACE_APIKEY"] || "mocked",
+        :namespace => "TESTING"
+      )
+      @cache.clear
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_redis_spec.rb

@@ -0,0 +1,15 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/redis"
+
+  describe "Moneta::Adapters::Redis" do
+    before(:each) do
+      @cache = Moneta::Adapters::Redis.new
+      @cache.clear
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_s3_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+begin
+  require 'moneta/adapters/s3'
+
+  describe "Moneta::Adapters::S3" do
+    before(:each) do
+      Fog.mock! unless ENV["S3_KEY"]
+
+      @cache = Moneta::Adapters::S3.new(
+        :aws_access_key_id => ENV["S3_KEY"] || "mocked",
+        :aws_secret_access_key => ENV["S3_SECRET"] || "mocked",
+        :namespace => "TESTING"
+      )
+      @cache.clear
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_sdbm_spec.rb

@@ -0,0 +1,23 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/sdbm"
+
+  path = File.expand_path("../sdbm_cache", __FILE__)
+
+  describe "Moneta::Adapters::SDBM" do
+    before(:each) do
+      @cache = Moneta::Adapters::SDBM.new(:file => path)
+      @cache.clear
+    end
+  
+    after(:all) do
+      FileUtils.rm_rf(Dir["#{path}*"])
+    end
+  
+    if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'sdbm'
+      it_should_behave_like "a read/write Moneta cache"
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_tokyo_cabinet_spec.rb

@@ -0,0 +1,19 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/tokyo_cabinet"
+
+  describe "Moneta::Adapters::TokyoCabinet" do
+    before(:each) do
+      @cache = Moneta::Adapters::TokyoCabinet.new(:file => File.expand_path("../cache", __FILE__))
+      @cache.clear
+    end
+
+    after(:each) do
+      @cache.close
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_tyrant_spec.rb

@@ -0,0 +1,15 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/tyrant"
+
+  describe "Moneta::Adapters::Tyrant" do
+    before(:each) do
+      @cache = Moneta::Adapters::Tyrant.new(:host => "127.0.0.1", :port => 1978)
+      @cache.clear
+    end
+
+    it_should_behave_like "a read/write Moneta cache"
+  end
+rescue SystemExit
+end

data/spec/moneta_xattr_spec.rb

@@ -0,0 +1,25 @@
+require 'spec_helper'
+
+begin
+  require "moneta/adapters/xattr"
+
+  describe "Moneta::Adapters::Xattr" do
+    path = File.expand_path("../file_cache/xattr_cache", __FILE__)
+
+    before(:each) do
+      @cache = Moneta::Builder.build do
+        run Moneta::Adapters::Xattr, :file => path
+      end
+      @cache.clear
+    end
+  
+    after(:all) do
+      FileUtils.rm_rf(File.dirname(path))
+    end
+  
+    if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'xattrs'
+      it_should_behave_like "a read/write Moneta cache"
+    end
+  end
+rescue SystemExit
+end

data/spec/moneta_yaml_spec.rb

@@ -0,0 +1,25 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+begin
+  require "moneta/adapters/yaml"
+
+  describe "Moneta::Adapters::YAML" do
+    path = File.expand_path("../yaml_cache", __FILE__)
+
+    before(:each) do
+      @cache = Moneta::Builder.new do
+        run Moneta::Adapters::YAML, :path => path
+      end
+      @cache.clear
+    end
+
+    after(:all) do
+      FileUtils.rm_rf(path)
+    end
+
+    if ENV['MONETA_TEST'].nil? || ENV['MONETA_TEST'] == 'yaml'
+      it_should_behave_like "a read/write Moneta cache"
+    end
+  end
+rescue SystemExit
+end