tpool 0.0.1

data/.document

@@ -0,0 +1,5 @@
+lib/**/*.rb
+bin/*
+- 
+features/**/*.feature
+LICENSE.txt

data/.rspec

@@ -0,0 +1 @@
+--color

data/Gemfile

@@ -0,0 +1,13 @@
+source "http://rubygems.org"
+# Add dependencies required to use your gem here.
+# Example:
+#   gem "activesupport", ">= 2.3.5"
+
+# Add dependencies to develop your gem here.
+# Include everything needed to run rake, tests, features, etc.
+group :development do
+  gem "rspec", "~> 2.8.0"
+  gem "rdoc", "~> 3.12"
+  gem "bundler", ">= 1.0.0"
+  gem "jeweler", "~> 1.8.4"
+end

data/Gemfile.lock

@@ -0,0 +1,31 @@
+GEM
+  remote: http://rubygems.org/
+  specs:
+    diff-lcs (1.1.3)
+    git (1.2.5)
+    jeweler (1.8.4)
+      bundler (~> 1.0)
+      git (>= 1.2.5)
+      rake
+      rdoc
+    json (1.7.5)
+    rake (0.9.2.2)
+    rdoc (3.12)
+      json (~> 1.4)
+    rspec (2.8.0)
+      rspec-core (~> 2.8.0)
+      rspec-expectations (~> 2.8.0)
+      rspec-mocks (~> 2.8.0)
+    rspec-core (2.8.0)
+    rspec-expectations (2.8.0)
+      diff-lcs (~> 1.1.2)
+    rspec-mocks (2.8.0)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler (>= 1.0.0)
+  jeweler (~> 1.8.4)
+  rdoc (~> 3.12)
+  rspec (~> 2.8.0)

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2012 Kasper Johansen
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,19 @@
+= tpool
+
+Description goes here.
+
+== Contributing to tpool
+ 
+* Check out the latest master to make sure the feature hasn't been implemented or the bug hasn't been fixed yet.
+* Check out the issue tracker to make sure someone already hasn't requested it and/or contributed it.
+* Fork the project.
+* Start a feature/bugfix branch.
+* Commit and push until you are happy with your contribution.
+* Make sure to add tests for it. This is important so I don't break it in a future version unintentionally.
+* Please try not to mess with the Rakefile, version, or history. If you want to have your own version, or is otherwise necessary, that is fine, but please isolate to its own commit so I can cherry-pick around it.
+
+== Copyright
+
+Copyright (c) 2012 Kasper Johansen. See LICENSE.txt for
+further details.
+

data/Rakefile

@@ -0,0 +1,49 @@
+# encoding: utf-8
+
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'rake'
+
+require 'jeweler'
+Jeweler::Tasks.new do |gem|
+  # gem is a Gem::Specification... see http://docs.rubygems.org/read/chapter/20 for more options
+  gem.name = "tpool"
+  gem.homepage = "http://github.com/kaspernj/tpool"
+  gem.license = "MIT"
+  gem.summary = %Q{A thread-pool for Ruby.}
+  gem.description = %Q{A thread-pool for Ruby that supports joining, status-checking, stopping jobs and more.}
+  gem.email = "k@spernj.org"
+  gem.authors = ["Kasper Johansen"]
+  # dependencies defined in Gemfile
+end
+Jeweler::RubygemsDotOrgTasks.new
+
+require 'rspec/core'
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.pattern = FileList['spec/**/*_spec.rb']
+end
+
+RSpec::Core::RakeTask.new(:rcov) do |spec|
+  spec.pattern = 'spec/**/*_spec.rb'
+  spec.rcov = true
+end
+
+task :default => :spec
+
+require 'rdoc/task'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "tpool #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.1

data/lib/tpool.rb

@@ -0,0 +1,96 @@
+require "thread"
+
+class Tpool
+  def self.const_missing(name)
+    require "#{File.dirname(__FILE__)}/tpool_#{name.to_s.downcase}.rb"
+    raise "Still not defined: '#{name}'." if !Tpool.const_defined?(name)
+    return Tpool.const_get(name)
+  end
+  
+  #Returns the 'Tpool::Block' that is running in the given thread.
+  def self.current_block(thread = Thread.current)
+    return thread[:tpool][:block] if thread[:tpool].is_a?(Hash)
+    raise "No block was found running in that thread."
+  end
+  
+  def initialize(args)
+    @args = args
+    @queue = Queue.new
+    self.start
+  end
+  
+  def start
+    raise "Already started." if @pool and !@pool.empty?
+    
+    @pool = Array.new(@args[:threads]) do |i|
+      Thread.new do
+        begin
+          Thread.current[:tpool] = {:i => i}
+          
+          loop do
+            block = @queue.pop
+            Thread.current[:tpool][:block] = block
+            
+            block.run
+            Thread.current[:tpool].delete(:block)
+          end
+        rescue Exception => e
+          $stderr.puts e.inspect
+          $stderr.puts e.backtrace
+        end
+      end
+    end
+  end
+  
+  #Kills all running threads.
+  def stop
+    @pool.delete_if do |thread|
+      thread.kill
+      true
+    end
+  end
+  
+  #Runs the given block in the thread-pool, joins it and returns the result.
+  def run(*args, &blk)
+    raise "No block was given." if !blk
+    
+    block = Tpool::Block.new(
+      :args => args,
+      :blk => blk,
+      :thread_starts => [Thread.current]
+    )
+    @queue << block
+    
+    begin
+      Thread.stop
+    rescue Exception
+      #Its not possible to stop main thread (dead-lock-error - sleep it instead).
+      sleep 0.1 while !block.done?
+    end
+    
+    return block.res
+  end
+  
+  #Runs the given block in the thread-pool and returns a block-object to keep a look on the status.
+  def run_async(*args, &blk)
+    raise "No block was given." if !blk
+    
+    block = Tpool::Block.new(
+      :tpool => self,
+      :args => args,
+      :blk => blk,
+      :thread_starts => [Thread.current]
+    )
+    @queue << block
+    
+    return block
+  end
+  
+  def on_error_call(*args)
+    @on_error.call(*args) if @on_error
+  end
+  
+  def on_error(&blk)
+    @on_error = blk
+  end
+end

data/lib/tpool_block.rb

@@ -0,0 +1,90 @@
+class Tpool::Block
+  attr_accessor :res
+  
+  #Constructor. Should not be called manually.
+  def initialize(args)
+    @args = args
+    
+    @running = false
+    @done = false
+    @error = nil
+  end
+  
+  #Starts running whatever block it is holding.
+  def run
+    @thread_running = Thread.current
+    @running = true
+    
+    begin
+      @res = @args[:blk].call(*@args[:args], &@args[:blk])
+    rescue Exception => e
+      @error = e
+      @args[:tpool].on_error_call(:on_error, e)
+    ensure
+      @running = false
+      @done = true
+      @thread_running = nil
+    end
+    
+    if @args[:thread_starts]
+      @args[:thread_starts].each do |thread|
+        thread.wakeup
+      end
+    end
+    
+    return self
+  end
+  
+  #Returns true if the asynced job is done running.
+  def done?
+    return @done
+  end
+  
+  #Returns true if the asynced job is still running.
+  def running?
+    return @running
+  end
+  
+  #Returns true if the asynced job is still waiting to run.
+  def waiting?
+    return true if !@done and !@running and !@error
+    return false
+  end
+  
+  #Raises error if one has happened in the asynced job.
+  def error!
+    #Wait for error to get set if any.
+    self.join
+    
+    #Raise it if it got set.
+    raise @error if @error
+  end
+  
+  #Sleeps until the asynced job is done. If an error occurred in the job, that error will be raised when calling the method.
+  def join
+    if !@done
+      @args[:thread_starts] << Thread.current
+      
+      begin
+        Thread.stop
+      rescue Exception
+        sleep 0.1 while !@done
+      end
+    end
+    
+    return self
+  end
+  
+  #Kills the current running job.
+  def kill
+    Thread.pass while !self.done? and !self.running?
+    @thread_running.raise Exception, "Should kill itself." if !self.done? and self.running?
+  end
+  
+  def result(args = nil)
+    self.join if args and args[:wait]
+    raise "Not done yet." unless self.done?
+    self.error!
+    return @res
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,12 @@
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'rspec'
+require 'tpool'
+
+# Requires supporting files with custom matchers and macros, etc,
+# in ./support/ and its subdirectories.
+Dir["#{File.dirname(__FILE__)}/support/**/*.rb"].each {|f| require f}
+
+RSpec.configure do |config|
+  
+end

data/spec/tpool_spec.rb

@@ -0,0 +1,38 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Tpool" do
+  it "should work" do
+    tp = Tpool.new(:threads => 4)
+    res = tp.run do
+      "kasper"
+    end
+    
+    raise "Expected result to be 'kasper' but it wasnt: '#{res}'." if res != "kasper"
+    
+    
+    blk = tp.run_async do
+      "kasper"
+    end
+    blk.join
+    
+    raise "Expected result to be 'kasper' but it wasnt: '#{res}'." if res != "kasper"
+    
+    
+    
+    blk = tp.run_async do
+      sleep 5
+      "kasper"
+    end
+    
+    blk.kill
+    
+    error = false
+    begin
+      blk.error!
+    rescue Exception
+      error = true
+    end
+    
+    raise "Expected error but didnt get one." if !error
+  end
+end

data/tpool.gemspec

@@ -0,0 +1,61 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{tpool}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Kasper Johansen"]
+  s.date = %q{2012-08-19}
+  s.description = %q{A thread-pool for Ruby that supports joining, status-checking, stopping jobs and more.}
+  s.email = %q{k@spernj.org}
+  s.extra_rdoc_files = [
+    "LICENSE.txt",
+    "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+    ".rspec",
+    "Gemfile",
+    "Gemfile.lock",
+    "LICENSE.txt",
+    "README.rdoc",
+    "Rakefile",
+    "VERSION",
+    "lib/tpool.rb",
+    "lib/tpool_block.rb",
+    "spec/spec_helper.rb",
+    "spec/tpool_spec.rb",
+    "tpool.gemspec"
+  ]
+  s.homepage = %q{http://github.com/kaspernj/tpool}
+  s.licenses = ["MIT"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.6.2}
+  s.summary = %q{A thread-pool for Ruby.}
+
+  if s.respond_to? :specification_version then
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<rspec>, ["~> 2.8.0"])
+      s.add_development_dependency(%q<rdoc>, ["~> 3.12"])
+      s.add_development_dependency(%q<bundler>, [">= 1.0.0"])
+      s.add_development_dependency(%q<jeweler>, ["~> 1.8.4"])
+    else
+      s.add_dependency(%q<rspec>, ["~> 2.8.0"])
+      s.add_dependency(%q<rdoc>, ["~> 3.12"])
+      s.add_dependency(%q<bundler>, [">= 1.0.0"])
+      s.add_dependency(%q<jeweler>, ["~> 1.8.4"])
+    end
+  else
+    s.add_dependency(%q<rspec>, ["~> 2.8.0"])
+    s.add_dependency(%q<rdoc>, ["~> 3.12"])
+    s.add_dependency(%q<bundler>, [">= 1.0.0"])
+    s.add_dependency(%q<jeweler>, ["~> 1.8.4"])
+  end
+end
+

metadata

@@ -0,0 +1,115 @@
+--- !ruby/object:Gem::Specification 
+name: tpool
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Kasper Johansen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2012-08-19 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 2.8.0
+  type: :development
+  prerelease: false
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rdoc
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: "3.12"
+  type: :development
+  prerelease: false
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: bundler
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.0.0
+  type: :development
+  prerelease: false
+  version_requirements: *id003
+- !ruby/object:Gem::Dependency 
+  name: jeweler
+  requirement: &id004 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 1.8.4
+  type: :development
+  prerelease: false
+  version_requirements: *id004
+description: A thread-pool for Ruby that supports joining, status-checking, stopping jobs and more.
+email: k@spernj.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE.txt
+- README.rdoc
+files: 
+- .document
+- .rspec
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- VERSION
+- lib/tpool.rb
+- lib/tpool_block.rb
+- spec/spec_helper.rb
+- spec/tpool_spec.rb
+- tpool.gemspec
+has_rdoc: true
+homepage: http://github.com/kaspernj/tpool
+licenses: 
+- MIT
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 733002826955008460
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: A thread-pool for Ruby.
+test_files: []
+