mattmatt-threadlocal-attr-accessor 0.0.2

data/README.md

@@ -0,0 +1,29 @@
+Thread-local attr_accessor
+========
+
+Think attr_accessor, only thread-local. Figures, huh?
+
+    require 'threadsafe-attr-accessor'
+    
+    class Person
+      tl_attr_accessor :name
+      tl_attr_writer :spouse
+      tl_attr_reader :fullname
+    end
+
+Yeah, I know the examples above probably aren't good
+candidates for thread-local attribute accessors, but
+you get the gist.
+
+Works for classes too:
+
+    class Person
+      tl_cattr_accessor :connection
+    end
+
+License
+=======
+
+(c) 2009 Mathias Meyer
+
+MIT Baby!

data/Rakefile

@@ -0,0 +1,32 @@
+require 'rubygems'
+require 'rake'
+require 'rake/testtask'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |s|
+    s.name = 'threadlocal-attr-accessor'
+    s.summary = 'Think attr_accessor, only thread-local. Figures, huh?'
+    s.email = 'meyer@paperplanes.de'
+    s.homepage = 'http://github.com/mattmatt/threadlocal-attr-accessor'
+    s.authors = ["Mathias Meyer"]
+    s.files = FileList["[A-Z]*", "{lib,test}/**/*"]
+  end
+rescue LoadError 
+  puts "Jeweler, or one of its dependencies, is not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com" 
+end
+
+desc "Default Task"
+task :default => ["test"]
+
+desc "Runs the unit tests"
+task :test => "test:unit"
+
+namespace :test do
+  desc "Unit tests"
+  Rake::TestTask.new(:unit) do |t|
+    t.libs << 'test'
+    t.pattern = "test/*_test.rb"
+    t.verbose = true
+  end
+end

data/VERSION.yml

@@ -0,0 +1,4 @@
+--- 
+:minor: 0
+:patch: 2
+:major: 0

data/lib/core_ext/module.rb

@@ -0,0 +1,28 @@
+class Module
+  def tl_attr_accessor(*names)
+    tl_attr_reader(*names)
+    tl_attr_writer(*names)
+  end
+  
+  def tl_attr_reader(*names)
+    names.each do |name|
+      define_method(name) do
+        Thread.current["#{self.class.name.downcase}_#{object_id}_#{name.to_s}"]
+      end
+    end
+  end
+
+  def tl_attr_writer(*names)
+    names.each do |name|
+      define_method("#{name}=".to_sym) do |new_value|
+        Thread.current["#{self.class.name.downcase}_#{object_id}_#{name.to_s}"] = new_value
+      end
+    end
+  end
+  
+  def tl_attr(name, writable = false)
+    tl_attr_reader(name)
+    
+    tl_attr_writer(name) if writable
+  end
+end

data/test/attr_accessor_test.rb

@@ -0,0 +1,138 @@
+require 'test_helper'
+
+class Person
+  tl_attr_accessor :connection
+  tl_attr_reader :owner
+  tl_attr_writer :job
+
+  tl_attr :name, true
+  tl_attr :firstname
+  tl_attr :nickname, false
+  
+  tl_attr_accessor :other_connection, :real_connection
+  tl_attr_reader :spouse, :children
+  tl_attr_writer :occupation, :hobbies
+end
+
+class AttrAccessorTest < Test::Unit::TestCase
+  context "with a person instance" do
+    setup do
+      @person = Person.new
+    end
+    
+    context "and a connection" do
+      setup do
+        @person.connection = :connection
+      end
+      
+      should "keep the connection in a thread local variable" do
+        assert_not_nil Thread.current["person_#{@person.object_id}_connection"]
+      end
+      
+      should "be nil in a different thread" do
+        person = @person
+        t = Thread.new {Thread.current[:result] = person.connection}
+        t.join
+        assert_nil t[:result]
+        assert_not_nil person.connection
+      end
+      
+      should "store different values for different threads" do
+        person = @person
+        t = Thread.new do
+          person.connection = :other_connection
+          Thread.current[:result] = person.connection
+        end
+        t.join
+        assert_equal :other_connection, t[:result]
+      end
+    end
+    
+    context "and an owner" do
+      setup do
+        Thread.current["person_#{@person.object_id}_owner"] = :god
+      end
+      
+      should "return the value from thread local" do
+        assert_equal :god, @person.owner
+      end
+      
+      should "be nil in a different thread" do
+        person = @person
+        t = Thread.new do
+          Thread.current[:result] = person.owner
+        end
+        t.join
+        assert_nil t[:result]
+        assert_equal :god, person.owner
+      end
+      
+      should "not have a setter defined" do
+        assert !@person.respond_to?("owner=")
+      end
+    end
+    
+    context "and a job" do
+      setup do
+        @person.job = :janitor
+      end
+      
+      should "store the job in a thread local" do
+        assert_equal :janitor, Thread.current["person_#{@person.object_id}_job"]
+      end
+      
+      should "not have a getter" do
+        assert !@person.respond_to?(:job)
+      end
+      
+      should "be not overwrite from a different" do
+        person = @person
+        t = Thread.new do
+          person.job = :ceo
+        end
+        t.join
+        assert_equal :janitor, Thread.current["person_#{@person.object_id}_job"]
+      end
+    end
+    
+    context "with multiple variable names" do
+      should "create accessors for all variable names" do
+        assert @person.respond_to?(:other_connection)
+        assert @person.respond_to?(:real_connection)
+        assert @person.respond_to?(:real_connection=)
+        assert @person.respond_to?(:other_connection=)
+      end
+      
+      should "create only read-only accessors for all variable names" do
+        assert @person.respond_to?(:spouse)
+        assert @person.respond_to?(:children)
+        assert !@person.respond_to?(:spouse=)
+        assert !@person.respond_to?(:children=)
+      end
+      
+      should "create only write accessors for all variable names" do
+        assert !@person.respond_to?(:occupation)
+        assert !@person.respond_to?(:hobbies)
+        assert @person.respond_to?(:occupation=)
+        assert @person.respond_to?(:hobbies=)
+      end
+    end
+    
+    context "with attr" do
+      should "create a getter and no setter by default" do
+        assert @person.respond_to?(:firstname)
+        assert !@person.respond_to?(:firstname=)
+      end
+      
+      should "create a getter and setter with second parameter true" do
+        assert @person.respond_to?(:name)
+        assert @person.respond_to?(:name=)
+      end
+      
+      should "create only getter when second parameter false" do
+        assert @person.respond_to?(:nickname)
+        assert !@person.respond_to?(:nickname=)
+      end
+    end
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,5 @@
+$:.unshift(File.join(File.dirname(__FILE__), "..", "lib"))
+require 'test/unit'
+require 'rubygems'
+require 'shoulda'
+require 'core_ext/module'

metadata

@@ -0,0 +1,60 @@
+--- !ruby/object:Gem::Specification 
+name: mattmatt-threadlocal-attr-accessor
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+platform: ruby
+authors: 
+- Mathias Meyer
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-02-26 00:00:00 -08:00
+default_executable: 
+dependencies: []
+
+description: 
+email: meyer@paperplanes.de
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- Rakefile
+- README.md
+- VERSION.yml
+- lib/core_ext
+- lib/core_ext/module.rb
+- test/attr_accessor_test.rb
+- test/test_helper.rb
+has_rdoc: true
+homepage: http://github.com/mattmatt/threadlocal-attr-accessor
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Think attr_accessor, only thread-local. Figures, huh?
+test_files: []
+