methodmissing-channel 1.0.0

data/README

@@ -0,0 +1,51 @@
+Simple native Channel object for Ruby MRI
+  (c) 2009 Lourens Naudé (methodmissing), James Tucker (raggi) 
+ 
+  http://github.com/methodmissing/channel
+
+This library works with Ruby 1.8 and 1.9 and is a more efficient
+implementation of the following Ruby code :
+
+  class RubyChannel
+    def initialize
+      @subscribers = []
+    end
+    def subscribe(&b)
+      @subscribers << b
+      self
+    end
+    def <<(o)
+      @subscribers.each { |s| s.call(o) }
+    end
+  end
+
+Use cases :
+
+  * In process message dispatch
+  * Parsers and protocols with a message, error and warning channel 
+  * Facilitates decoupled notification and callback patterns
+
+Caveats :
+
+  * Fixed width channel size for very thin, and fast, subscriber management
+
+Examples :
+
+  counter = 0
+  ch = Channel.new.subscribe{|obj| @counter += obj }
+  ch << 3
+  ch << -2
+  counter #=> 1  
+
+Todo :
+  
+  * A deferrable mode that notifies on a background thread
+  * More flexible notification mechanism through integration with http://github.com/methodmissing/callback/tree/master 
+
+To run the test suite:
+
+  rake
+
+To run the benchmarks:
+
+  rake bench

data/Rakefile

@@ -0,0 +1,68 @@
+require 'rake'
+require 'rake/testtask'
+require 'rake/clean'
+
+CH_ROOT = 'ext/channel'
+
+desc 'Default: test'
+task :default => :test
+
+desc 'Run channel tests.'
+Rake::TestTask.new(:test) do |t|
+  t.libs = [CH_ROOT]
+  t.pattern = 'test/test_*.rb'
+  t.verbose = true
+end
+task :test => :build
+
+namespace :build do
+  file "#{CH_ROOT}/channel.c"
+  file "#{CH_ROOT}/extconf.rb"
+  file "#{CH_ROOT}/Makefile" => %W(#{CH_ROOT}/channel.c #{CH_ROOT}/extconf.rb) do
+    Dir.chdir(CH_ROOT) do
+      ruby 'extconf.rb'
+    end
+  end
+
+  desc "generate makefile"
+  task :makefile => %W(#{CH_ROOT}/Makefile #{CH_ROOT}/channel.c)
+
+  dlext = Config::CONFIG['DLEXT']
+  file "#{CH_ROOT}/channel.#{dlext}" => %W(#{CH_ROOT}/Makefile #{CH_ROOT}/channel.c) do
+    Dir.chdir(CH_ROOT) do
+      sh 'make' # TODO - is there a config for which make somewhere?
+    end
+  end
+
+  desc "compile channel extension"
+  task :compile => "#{CH_ROOT}/channel.#{dlext}"
+
+  task :clean do
+    Dir.chdir(CH_ROOT) do
+      sh 'make clean'
+    end if File.exists?("#{CH_ROOT}/Makefile")
+  end
+
+  CLEAN.include("#{CH_ROOT}/Makefile")
+  CLEAN.include("#{CH_ROOT}/channel.#{dlext}")
+end
+
+task :clean => %w(build:clean)
+
+desc "compile"
+task :build => %w(build:compile)
+
+task :install do |t|
+  Dir.chdir(CH_ROOT) do
+    sh 'sudo make install'
+  end
+end
+
+desc "clean build install"
+task :setup => %w(clean build install)
+
+desc "run benchmarks"
+task :bench do |t|
+  ruby "bench/bench.rb"  
+end
+task :bench => :build

data/bench/bench.rb

@@ -0,0 +1,15 @@
+require "benchmark"
+$:.unshift "."
+require File.dirname(__FILE__) + "/../ext/channel/channel"
+require File.dirname(__FILE__) + "/ruby_channel"
+
+channel = Channel.new(16)
+16.times{ channel.subscribe{|o| o } }
+rb_channel = RubyChannel.new
+16.times{ rb_channel.subscribe{|o| o } }
+
+TESTS = 10_000
+Benchmark.bmbm do |results|
+  results.report("Channel#<<") { TESTS.times { channel << :obj } }  
+  results.report("RubyChannel#<<") { TESTS.times { rb_channel << :obj  } }
+end

data/bench/ruby_channel.rb

@@ -0,0 +1,12 @@
+class RubyChannel
+  def initialize
+    @subscribers = []
+  end
+  def subscribe(&b)
+    @subscribers << b
+    self
+  end
+  def <<(o)
+    @subscribers.each { |s| s.call(o) }
+  end
+end

data/channel.gemspec

@@ -0,0 +1,24 @@
+Gem::Specification.new do |s|
+  s.name     = "channel"
+  s.version  = "1.0.0"
+  s.date     = "2009-08-28"
+  s.summary  = "Native MRI channel"
+  s.email    = "lourens@methodmissing.com"
+  s.homepage = "http://github.com/methodmissing/channel"
+  s.description = "Simple native Channel object for Ruby MRI (1.8.{6,7} and 1.9.2)"
+  s.has_rdoc = true
+  s.authors  = ["Lourens Naudé (methodmissing)","James Tucker (raggi)"]
+  s.platform = Gem::Platform::RUBY
+  s.files    = %w[
+    README
+    Rakefile
+    bench/bench.rb
+    bench/ruby_channel.rb
+    ext/channel/extconf.rb
+    ext/channel/channel.c
+    channel.gemspec
+  ] + Dir.glob('test/*')
+  s.rdoc_options = ["--main", "README"]
+  s.extra_rdoc_files = ["README"]
+  s.extensions << "ext/channel/extconf.rb"
+end

data/ext/channel/channel.c

@@ -0,0 +1,115 @@
+#include "ruby.h"
+
+typedef struct {
+	int size;
+	int sbs;
+    VALUE *subscribers;
+} RChannel;
+
+#define MAX_CHANNEL_SIZE 32
+#define GetChannelStruct(obj)	(Check_Type(obj, T_DATA), (RChannel*)DATA_PTR(obj))
+
+VALUE rb_cChannel;
+static ID id_call;
+
+static void mark_channel(RChannel* ch)
+{
+    int i;
+    for (i=0; i < ch->sbs; i++) {
+      rb_gc_mark(ch->subscribers[i]);
+    }
+}
+
+static void free_channel(RChannel* ch)
+{
+    xfree(ch);
+}
+
+static VALUE channel_alloc _((VALUE));
+static VALUE
+channel_alloc( VALUE klass )
+{
+    VALUE ch;
+    RChannel* chs;
+    ch = Data_Make_Struct(klass, RChannel, mark_channel, free_channel, chs);
+    chs->size = 0;
+    chs->sbs = 0;
+    chs->subscribers = 0;
+   
+    return ch;
+}
+
+static VALUE
+rb_channel_new(VALUE ch, int size)
+{
+    RChannel* chs = GetChannelStruct(ch);
+    if (size < 0 || size > MAX_CHANNEL_SIZE){ 
+      rb_raise(rb_eArgError, "Invalid channel size!");
+    }
+    if (size == 0) size++;
+    chs->size = size;
+    chs->subscribers = ALLOC_N(VALUE, size);
+    return ch;  
+}
+
+static VALUE 
+rb_channel_initialize( int argc, VALUE *argv, VALUE ch )
+{
+    VALUE size;
+    int channel_size;  
+    rb_scan_args(argc, argv, "01", &size);
+    channel_size = NIL_P(size) ? 0 : FIX2INT(size);
+    return rb_channel_new(ch, channel_size); 
+}
+
+static VALUE 
+rb_channel_size( VALUE ch )
+{
+    RChannel* chs = GetChannelStruct(ch);    
+    return INT2FIX(chs->size); 
+}
+
+static VALUE 
+rb_channel_subscribers( VALUE ch )
+{
+    RChannel* chs = GetChannelStruct(ch);    
+    return INT2FIX(chs->sbs); 
+}
+
+static VALUE 
+rb_channel_subscribe( int argc, VALUE *argv, VALUE ch )
+{
+    VALUE cb;
+    RChannel* chs = GetChannelStruct(ch);    
+    if (!rb_block_given_p()) rb_raise(rb_eArgError, "Block callback required!");
+    cb = rb_block_proc();
+    chs->subscribers[chs->sbs] = cb;
+    chs->sbs++;
+    return ch;
+}
+
+static VALUE 
+rb_channel_push( VALUE ch, VALUE obj )
+{
+    int i;
+    RChannel* chs = GetChannelStruct(ch);    
+    for (i=0; i < chs->sbs; i++) {
+      rb_funcall(chs->subscribers[i],id_call,1,obj);
+    }
+    return ch;
+}
+
+void
+Init_channel()
+{ 
+    id_call = rb_intern("call");
+
+    rb_cChannel  = rb_define_class("Channel", rb_cObject);
+    rb_define_alloc_func(rb_cChannel, channel_alloc);
+    
+    rb_define_method(rb_cChannel,"initialize", rb_channel_initialize, -1);
+    rb_define_method(rb_cChannel,"size", rb_channel_size, 0);
+    rb_define_method(rb_cChannel,"subscribers", rb_channel_subscribers, 0);
+    rb_define_method(rb_cChannel,"subscribe", rb_channel_subscribe, -1);
+    rb_define_method(rb_cChannel,"<<", rb_channel_push, 1);
+}

data/ext/channel/extconf.rb

@@ -0,0 +1,12 @@
+require 'mkmf'
+
+def add_define(name)
+  $defs.push("-D#{name}")
+end
+
+dir_config('channel')
+
+add_define 'RUBY19' if have_func('rb_thread_blocking_region') and have_macro('RUBY_UBF_IO', 'ruby.h')
+add_define 'RUBY18' if have_var('rb_trap_immediate', ['ruby.h', 'rubysig.h'])
+
+create_makefile('channel')

metadata

@@ -0,0 +1,61 @@
+--- !ruby/object:Gem::Specification 
+name: methodmissing-channel
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+platform: ruby
+authors: 
+- "Lourens Naud\xC3\xA9 (methodmissing)"
+- James Tucker (raggi)
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-28 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: Simple native Channel object for Ruby MRI (1.8.{6,7} and 1.9.2)
+email: lourens@methodmissing.com
+executables: []
+
+extensions: 
+- ext/channel/extconf.rb
+extra_rdoc_files: 
+- README
+files: 
+- README
+- Rakefile
+- bench/bench.rb
+- bench/ruby_channel.rb
+- ext/channel/extconf.rb
+- ext/channel/channel.c
+- channel.gemspec
+has_rdoc: true
+homepage: http://github.com/methodmissing/channel
+post_install_message: 
+rdoc_options: 
+- --main
+- README
+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: Native MRI channel
+test_files: []
+