asir 1.0.8 → 1.1.0

data/ChangeLog

@@ -1,3 +1,11 @@
+2012-12-03  Kurt A. Stephens  <ks.github@kurtstephens.com>
+
+	* v1.1.0: New version.
+	* ZMQ: Moved ZMQ support to gem asir_zmq.
+	* Thread: Preliminary ASIR::Transport::Thread.
+	* ThreadPool: Preliminary ASIR::ThreadPool suitable for Thread transport.
+	* Resque: Support for message[:resque_queue] || message[:queue].
+
 2012-11-30  Kurt A. Stephens  <ks.github@kurtstephens.com>
 
 	* v1.0.8: New version.

data/README.textile

@@ -26,12 +26,13 @@ h3. Features
 ** Named Pipe.
 ** TCP.
 ** HTTP under WEBrick or as Rack application.
-** Beanstalkd.
-** ZeroMQ.
-** Resque.
+** Beanstalkd. (gem asir_beanstalk)
+** ZeroMQ. (gem asir_zmq)
+** Resque. (gem asir_resque)
 ** Buffered transports.
 ** Broadcast transports.
 ** Fallback transports.
+** Database transports (e.g.: gem asir_activerecord)
 ** Time-decaying retry and polling logic.
 * Support for multiple encodings:
 ** Marshal.
@@ -50,9 +51,4 @@ h2. Platform support
 * CRuby 2.0-head
 * JRuby 1.6.x (with JRUBY_OPTS=--1.9) IN-PROGRESS
 
-h2. Dependencies
-
-* gem install zmq
-** zmq 2.1.4 needs a zmq 2.x library.
-** On OS X Macports: sudo port install zmq22.
 

data/asir.gemspec

@@ -31,7 +31,6 @@ Gem::Specification.new do |s|
   s.add_dependency "httpclient", "~> 2.3.0"
   s.add_dependency "libxml-ruby", "~> 2.3.3"
   s.add_dependency "rack", "~> 1.4.1"
-  s.add_dependency "zmq", "~> 2.1.4"
   s.add_dependency "json", ">= 1.5.3"
 
   s.add_development_dependency 'rake', '>= 0.9.0'

data/example/asir_control.sh

@@ -33,29 +33,6 @@ esac
 
 #############################
 
-case "$args"
-in
-  *zmq*|*ALL*)
-
-$asir start zmq worker
-sleep 1
-$asir pid zmq worker
-if $asir alive zmq worker; then
-  echo "alive"
-fi
-
-ruby "$dir/asir_control_client_zmq.rb"
-sleep 1
-
-$asir stop zmq worker
-sleep 1
-$asir pid zmq worker
-
-;;
-esac
-
-#############################
-
 case "$args"
 in
   *resque*|*ALL*)

data/example/config/asir_config.rb

@@ -47,11 +47,6 @@ when :transport
     require 'asir/transport/rack'
     transport = ASIR::Transport::Rack.new
     transport.uri = "http://localhost:#{30000 + asir.identifier.to_s.to_i}/asir"
-  when :zmq
-    reqiore 'asir/transport/zmq'
-    transport = ASIR::Transport::Zmq.new
-    transport.one_way = true
-    transport.uri = "tcp://localhost:#{31000 + asir.identifier.to_s.to_i}" # /asir"
   when :resque
     gem 'resque'
     require 'asir/transport/resque'

data/example/ex26.rb

@@ -0,0 +1,24 @@
+#
+# !SLIDE :capture_code_output true
+# One-way, asynchronous thread service
+
+require 'example_helper'
+begin
+  Email.asir.transport = t =
+    ASIR::Transport::Thread.new
+
+  t.after_thread_new = lambda do | transport, message, thread |
+    $stderr.puts "\n  #{$$}: Spawned Thread #{thread.inspect}"
+  end
+
+  pr Email.asir.send_email(:pdf_invoice,
+                             :to => "user@email.com",
+                             :customer => @customer)
+end
+
+# !SLIDE END
+# EXPECT: : Spawned Thread
+# EXPECT: : client process
+# EXPECT: : Email.send_mail :pdf_invoice
+# EXPECT: : pr: nil
+

data/example/example_helper.rb

@@ -11,6 +11,7 @@ require 'asir'
 require 'asir/transport/file'
 require 'asir/transport/local'
 require 'asir/transport/subprocess'
+require 'asir/transport/thread'
 require 'asir/transport/tcp_socket'
 require 'asir/transport/fallback'
 require 'asir/transport/broadcast'

data/lib/asir/thread_pool.rb

@@ -0,0 +1,218 @@
+require 'asir/initialization'
+require 'asir/additional_data'
+require 'thread'
+require "time"
+
+module ASIR
+  class ThreadPool
+    include Initialization, AdditionalData
+    attr_accessor :thread_class, :workers, :n_workers
+    attr_accessor :work_queue
+    attr_accessor :verbose
+    attr_accessor :run
+
+    def initialize *args
+      super
+      @thread_class ||= ::Thread
+      @workers_mutex  = Mutex.new
+      @work_mutex     = Mutex.new
+      @workers      ||= [ ]
+      @work_queue   ||= Queue.new
+      @run = false
+      @work_id = @worker_id = 0
+      @time_0 ||= Time.now
+    end
+
+    # Returns a new Work object.
+    def new &blk
+      work_id = @work_mutex.synchronize do
+        @work_id += 1
+      end
+      work = Work.new(:block => blk, :work_id => work_id)
+      work_created! work
+      @work_queue.enq(work)
+      @run = true
+      start_workers! if @auto_start_workers
+      work
+    end
+
+    # Keep a list of workers busy.
+    def start_workers!
+      return nil unless @run
+      workers_size = @workers.size
+      want_n = [ n_workers, @work_queue.size ].min
+      want_n = n_workers if want_n > n_workers
+      start_n = want_n - workers_size
+      start_n = 0 if start_n < 0
+      return unless start_n > 0
+      log! { "start_workers! #{start_n}" }
+      start_n.times do
+        thread_class.new do
+          worker_id = @workers_mutex.synchronize do
+            @worker_id += 1
+          end
+          worker = Worker.new(:thread_pool => self, :worker_id => worker_id)
+          worker_created! worker
+          begin
+            worker_starting! worker
+            @workers_mutex.synchronize do
+              @workers << worker
+            end
+            worker.run!
+#          rescue ::Exception => exc
+#            log! "ERROR: #{exc.inspect}\n#{exc.backtrace * "\n"}"
+#            raise exc
+          ensure
+            @workers_mutex.synchronize do
+              @workers.delete(worker)
+            end
+            worker_stopping! worker
+          end
+        end
+      end
+      self
+    end
+
+    def worker_created! worker
+      log! { "worker_created! #{worker.inspect}" }
+    end
+
+    def worker_starting! worker
+      log! { "worker_starting! #{worker}" }
+    end
+
+    def worker_stopping! worker
+      log! { "worker_stopping! #{worker}" }
+    end
+
+    def work_created! work
+      log! { "work_created! #{work.inspect}" }
+    end
+
+    def work_starting! work
+      log! { "work_starting! #{work.inspect} #{work.worker.inspect}" }
+    end
+
+    def work_stopping! work
+      log! { "work_stopping! #{work.inspect}" }
+    end
+
+    def log! msg = nil
+      return unless @verbose
+      msg ||= yield
+      @time_1 = Time.now
+      $stderr.puts "  #{@time_1 - @time_0} #{$$} #{Thread.current.object_id} #{self} #{msg}"
+      self
+    end
+
+    def stop!
+      log! "stop!"
+      @run = false
+      # Ask each current worker to :stop!
+      @workers_mutex.synchronize do
+        @workers.each do | w |
+          @work_queue.enq :stop!
+        end
+      end
+      # Just incase.
+      @work_queue.enq :stop!
+      self
+    end
+
+    def kill! *args
+      log! "kill!"
+      @run = false
+      @workers_mutex.synchronize do
+        @workers.each do | worker |
+          worker.kill! *args
+        end
+      end
+      self
+    end
+
+    def join *args
+      until @workers.empty?
+        @workers.each do | worker |
+          worker.join(*args)
+        end
+      end
+    end
+
+    class Work
+      include Initialization, AdditionalData
+      attr_accessor :work_id, :block, :thread, :worker
+      attr_accessor :started, :finished
+
+      def to_s; super.sub(/>$/, " #{@work_id}>"); end
+      def inspect; to_s; end
+
+      def run!
+        @thread = ::Thread.current
+        thread_pool.work_starting! self
+        @started = true
+        @block.call
+        @finished = true
+      ensure
+        @thread = nil
+        thread_pool.work_stopping! self
+      end
+      def thread_pool; @worker.thread_pool; end
+    end
+
+    class Worker
+      include Initialization, AdditionalData
+      attr_accessor :thread_pool, :worker_id
+      # Current Work and Thread.
+      attr_accessor :work, :thread
+      attr_accessor :run, :running, :stopping, :stopped
+
+      def to_s; super.sub(/>$/, " #{@worker_id} #{@work_inspect}>"); end
+      def inspect; to_s; end
+
+      def run!
+        @thread = Thread.current
+        @run = @running = true
+        while @run
+          work = thread_pool.work_queue.deq
+          if work == :stop!
+            @run = false
+            @stopping = true
+            break
+          end
+          begin
+            @work = work
+            work.worker = self
+            work.run!
+          ensure
+            work.thread = work.worker = nil
+            @work = nil
+          end
+        end
+      ensure
+        if @stopping
+          @stopped = true
+        end
+        @running = false
+        @thread = nil
+      end
+
+      def join *args
+        @run = false
+        @thread.join(*args) if @thread
+      end
+
+      def stop!
+        @stopping = true
+        @run = false
+        self
+      end
+
+      def kill! *args
+        stop!
+        @thread.raise(*args) if @thread
+        self
+      end
+
+    end
+  end
+end

data/lib/asir/transport/connection_oriented.rb

@@ -54,21 +54,21 @@ module ASIR
       # Sends the encoded Message payload String.
       def _send_message message, message_payload
         stream.with_stream! do | io |
-          _write message_payload, io
+          _write message_payload, io, message
         end
       end
 
       # !SLIDE
       # Receives the encoded Message payload String.
       def _receive_message stream, additional_data
-        [ _read(stream), nil ]
+        [ _read(stream, nil), nil ]
       end
 
       # !SLIDE
       # Sends the encoded Result payload String.
       def _send_result message, result, result_payload, stream, message_state
         unless @one_way || message.one_way
-          _write result_payload, stream
+          _write result_payload, stream, message
         end
       end
 
@@ -77,7 +77,7 @@ module ASIR
       def _receive_result message, opaque_result
         unless @one_way || message.one_way
           stream.with_stream! do | io |
-            _read io
+            _read io, message
           end
         end
       end

data/lib/asir/transport/file.rb

@@ -16,14 +16,14 @@ module ASIR
 
       # Writes a Message payload String.
       def _send_message message, message_payload
-        _write message_payload, stream
+        _write message_payload, stream, message
       ensure
         close if file && ::File.pipe?(file)
       end
 
       # Returns a Message payload String.
       def _receive_message stream, additional_data
-        [ _read(stream), nil ]
+        [ _read(stream, nil), nil ]
       end
 
       # one-way; no Result.

data/lib/asir/transport/payload_io.rb

@@ -14,7 +14,7 @@ module ASIR
       HEADER = "# asir_payload_size: "
       FOOTER = "\n# asir_payload_end"
 
-      def _write payload, stream
+      def _write payload, stream, context
         stream.write HEADER
         stream.puts payload.size
         stream.write payload
@@ -23,7 +23,7 @@ module ASIR
         stream
       end
 
-      def _read stream
+      def _read stream, context
         size = /\d+$/.match(stream.readline.chomp)[0].to_i # HEADER (size)
         payload = stream.read(size)
         stream.readline # FOOTER

data/lib/asir/transport/resque.rb

@@ -49,7 +49,7 @@ module ASIR
 
       def _send_message message, message_payload
         stream.with_stream! do | io |  # Force connect
-          queue = message[:resque_queue] || self.queue
+          queue = message[:resque_queue] || message[:queue] || self.queue
           $stderr.puts "  #{$$} #{self} _send_message #{message_payload.inspect} to queue=#{queue.inspect} as #{self.class} :process_job" if @verbose >= 2
           # Invokes Transport::Resque.perform(metadata, payload)
           metadata = message[:resque_metadata] || message.description
@@ -104,8 +104,8 @@ module ASIR
       end
 
       def serve_stream_message! in_stream, out_stream # ignored
-        save = Thread.current[:asir_transport_resque_instance]
-        Thread.current[:asir_transport_resque_instance] = self
+        save = ::Thread.current[:asir_transport_resque_instance]
+        ::Thread.current[:asir_transport_resque_instance] = self
         poll_throttle throttle do
           $stderr.puts "  #{$$} #{self} serve_stream_message!: resque_worker = #{resque_worker} on queues #{resque_worker.queues.inspect}" if @verbose >= 3
           if job = resque_worker.reserve
@@ -116,14 +116,14 @@ module ASIR
         end
         self
       ensure
-        Thread.current[:asir_transport_resque_instance] = save
+        ::Thread.current[:asir_transport_resque_instance] = save
       end
 
       # Class method entry point from Resque::Job.perform.
       def self.perform metadata, payload = nil
         payload ||= metadata # old calling signature (just payload).
         # $stderr.puts "  #{self} process_job payload=#{payload.inspect}"
-        t = Thread.current[:asir_transport_resque_instance]
+        t = ::Thread.current[:asir_transport_resque_instance]
         # Pass payload as in_stream; _receive_message will return it.
         t.serve_message! payload, nil
       end

data/lib/asir/transport/thread.rb

@@ -0,0 +1,41 @@
+require 'asir/transport/local'
+require 'thread'
+
+module ASIR
+  class Transport
+    # !SLIDE
+    # Thread Transport
+    #
+    # Send one-way Message to a Thread.
+    class Thread < Local
+      # Any object that responds to .new(&blk).
+      # Defaults to ::Thread.
+      attr_accessor :thread_class
+
+      # Callback: call(self, message, thr).
+      attr_accessor :after_thread_new
+
+      def initialize *args
+        @thread_class = ::Thread
+        @one_way = true; super
+      end
+
+      def _send_message message, message_payload
+        thr = thread_class.new do
+          send_result(super, nil, nil)
+        end
+        @after_thread_new.call(self, message, thr) if @after_thread_new
+        thr
+      end
+
+      # one-way; no Result
+      def _receive_result message, opaque_result
+      end
+
+      # one-way; no Result
+      def _send_result message, result, result_payload, stream, message_state
+      end
+    end
+    # !SLIDE END
+  end
+end

data/lib/asir/version.rb

@@ -1,3 +1,3 @@
 module ASIR
-  VERSION = "1.0.8"
+  VERSION = "1.1.0"
 end

data/spec/thread_pool_spec.rb

@@ -0,0 +1,57 @@
+require 'asir/thread_pool'
+
+describe 'ASIR::ThreadPool' do
+  it "should spawn workers only as needed" do
+    tp.workers.size.should == 0
+    work = tp.new do
+      $stderr.puts "#{Thread.current} start" if @verbose
+      sleep 2
+      $stderr.puts "#{Thread.current} stop" if @verbose
+    end
+    tp.workers.size.should == 0
+    work.class.should == ASIR::ThreadPool::Work
+    tp.start_workers!
+    sleep 0.25
+    tp.workers.size.should == 1
+    worker = tp.workers.first
+    worker.class.should == ASIR::ThreadPool::Worker
+    worker.work.should == work
+    work.worker.should == worker
+  end
+
+  it "should spawn up to n_workers only" do
+    # tp.verbose = 1
+    works = [ ]
+    20.times do
+      works << tp.new do
+        $stderr.puts "#{Thread.current} start" if @verbose
+        sleep 0.2
+        $stderr.puts "#{Thread.current} stop" if @verbose
+      end
+    end
+    tp.start_workers!
+    sleep 0.25
+    tp.workers.size.should == n_workers
+    tp.stop!
+    tp.join
+    tp.workers.size.should == 0
+    works.each do | work |
+      work.started.should == true
+      work.finished.should == true
+    end
+  end
+
+  def n_workers
+    @n_workers ||= 10
+  end
+
+  def tp
+    @tp ||= ASIR::ThreadPool.new(:n_workers => n_workers)
+  end
+
+  after :each do
+    if @tp
+      @tp.kill! rescue nil
+    end
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: asir
 version: !ruby/object:Gem::Version
-  version: 1.0.8
+  version: 1.1.0
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-11-30 00:00:00.000000000 Z
+date: 2012-12-04 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: uuid
@@ -107,22 +107,6 @@ dependencies:
     - - ~>
       - !ruby/object:Gem::Version
         version: 1.4.1
-- !ruby/object:Gem::Dependency
-  name: zmq
-  requirement: !ruby/object:Gem::Requirement
-    none: false
-    requirements:
-    - - ~>
-      - !ruby/object:Gem::Version
-        version: 2.1.4
-  type: :runtime
-  prerelease: false
-  version_requirements: !ruby/object:Gem::Requirement
-    none: false
-    requirements:
-    - - ~>
-      - !ruby/object:Gem::Version
-        version: 2.1.4
 - !ruby/object:Gem::Dependency
   name: json
   requirement: !ruby/object:Gem::Requirement
@@ -228,7 +212,6 @@ files:
 - example/asir_control.sh
 - example/asir_control_client_http.rb
 - example/asir_control_client_resque.rb
-- example/asir_control_client_zmq.rb
 - example/config/asir_config.rb
 - example/delayed_service.rb
 - example/ex01.rb
@@ -250,12 +233,11 @@ files:
 - example/ex17.rb
 - example/ex18.rb
 - example/ex19.rb
-- example/ex20.rb
-- example/ex21.rb
 - example/ex22.rb
 - example/ex23.rb
 - example/ex24.rb
 - example/ex25.rb
+- example/ex26.rb
 - example/example_helper.rb
 - example/sample_service.rb
 - example/unsafe_service.rb
@@ -312,6 +294,7 @@ files:
 - lib/asir/poll_throttle.rb
 - lib/asir/result.rb
 - lib/asir/retry_behavior.rb
+- lib/asir/thread_pool.rb
 - lib/asir/thread_variable.rb
 - lib/asir/transport.rb
 - lib/asir/transport/beanstalk.rb
@@ -336,8 +319,8 @@ files:
 - lib/asir/transport/stream.rb
 - lib/asir/transport/subprocess.rb
 - lib/asir/transport/tcp_socket.rb
+- lib/asir/transport/thread.rb
 - lib/asir/transport/webrick.rb
-- lib/asir/transport/zmq.rb
 - lib/asir/uri_config.rb
 - lib/asir/uuid.rb
 - lib/asir/version.rb
@@ -350,6 +333,7 @@ files:
 - spec/performance_spec.rb
 - spec/resque_spec.rb
 - spec/spec_helper.rb
+- spec/thread_pool_spec.rb
 - spec/thread_variable_spec.rb
 - spec/transport_spec.rb
 - spec/xml_spec.rb
@@ -369,7 +353,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
       version: '0'
       segments:
       - 0
-      hash: 885978386070956346
+      hash: 2626327431831346289
 required_rubygems_version: !ruby/object:Gem::Requirement
   none: false
   requirements:
@@ -378,7 +362,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: '0'
       segments:
       - 0
-      hash: 885978386070956346
+      hash: 2626327431831346289
 requirements: []
 rubyforge_project: 
 rubygems_version: 1.8.24
@@ -395,6 +379,7 @@ test_files:
 - spec/performance_spec.rb
 - spec/resque_spec.rb
 - spec/spec_helper.rb
+- spec/thread_pool_spec.rb
 - spec/thread_variable_spec.rb
 - spec/transport_spec.rb
 - spec/xml_spec.rb

data/example/asir_control_client_zmq.rb

@@ -1,15 +0,0 @@
-require 'example_helper'
-require 'asir/transport/zmq'
-require 'asir/coder/marshal'
-begin
-  Email.asir.transport = t =
-    ASIR::Transport::Zmq.new(:uri => "tcp://localhost:31000") # "/asir"
-  t.one_way = true
-  t.encoder = ASIR::Coder::Marshal.new
-  pr Email.asir.send_email(:pdf_invoice,
-                             :to => "user@email.com",
-                             :customer => @customer)
-ensure
-  t.close rescue nil
-end
-

data/example/ex20.rb

@@ -1,28 +0,0 @@
-# !SLIDE :capture_code_output true
-# One-way ZMQ service.
-
-require 'example_helper'
-require 'asir/transport/zmq'
-begin
-  zmq = ASIR::Transport::Zmq.new(:port => 31920,
-                                 :encoder => ASIR::Coder::Marshal.new,
-                                 :one_way => true)
-  server_process do
-    zmq.prepare_server!
-    zmq.run_server!
-  end
-  UnsafeService.asir.transport = t = zmq
-  pr UnsafeService.asir.do_it(":ok")
-rescue ::Exception => err
-  $stderr.puts "### #{$$}: ERROR: #{err.inspect}\n  #{err.backtrace * "\n  "}"
-  raise
-ensure
-  zmq.close rescue nil; sleep 1; server_kill
-end
-
-# !SLIDE END
-# EXPECT: : client process
-# EXPECT: : server process
-# EXPECT: UnsafeService.do_it => :ok
-# EXPECT: : pr: nil
-# EXPECT!: ERROR

data/example/ex21.rb

@@ -1,28 +0,0 @@
-# !SLIDE :capture_code_output true
-# Bi-directional ZMQ service.
-
-require 'example_helper'
-require 'asir/transport/zmq'
-begin
-  zmq = ASIR::Transport::Zmq.new(:port => 31920,
-                                 :encoder => ASIR::Coder::Marshal.new,
-                                 :one_way => false)
-  server_process do
-    zmq.prepare_server!
-    zmq.run_server!
-  end
-  UnsafeService.asir.transport = t = zmq
-  pr UnsafeService.asir.do_it(":ok")
-rescue ::Exception => err
-  $stderr.puts "### #{$$}: ERROR: #{err.inspect}\n  #{err.backtrace * "\n  "}"
-  raise
-ensure
-  zmq.close rescue nil; sleep 1; server_kill
-end
-
-# !SLIDE END
-# EXPECT: : client process
-# EXPECT: : server process
-# EXPECT: UnsafeService.do_it => :ok
-# EXPECT: : pr: :ok
-# EXPECT!: ERROR

data/lib/asir/transport/zmq.rb

@@ -1,107 +0,0 @@
-require 'asir/transport/connection_oriented'
-gem 'zmq'
-require 'zmq'
-
-module ASIR
-  class Transport
-    # !SLIDE
-    # ZeroMQ Transport
-    class Zmq < ConnectionOriented
-      attr_accessor :queue
-
-      # !SLIDE
-      # 0MQ client.
-      def _client_connect!
-        sock = zmq_context.socket(one_way ? ZMQ::PUB : ZMQ::REQ)
-        sock.connect(zmq_uri)
-        sock
-      rescue ::Exception => exc
-        raise exc.class, "#{self.class} #{zmq_uri}: #{exc.message}", exc.backtrace
-      end
-
-      # !SLIDE
-      # 0MQ server.
-      def _server!
-        sock = zmq_context.socket(one_way ? ZMQ::SUB : ZMQ::REP)
-        sock.setsockopt(ZMQ::SUBSCRIBE, queue) if one_way
-        sock.bind("tcp://*:#{port}") # WTF?: why doesn't tcp://localhost:PORT work?
-        @server = sock
-      rescue ::Exception => exc
-        raise exc.class, "#{self.class} #{zmq_uri}: #{exc.message}", exc.backtrace
-      end
-
-      def _receive_result message, opaque_result
-        return nil if one_way || message.one_way
-        super
-      end
-
-      def _send_result message, result, result_payload, stream, message_state
-        return nil if one_way || message.one_way
-        super
-      end
-
-      def _write payload, stream
-        payload.insert(0, queue_) if one_way
-        stream.send payload, 0
-        stream
-      end
-
-      def _read stream
-        stream.recv 0
-      end
-
-      def queue
-        @queue ||=
-          (
-          case
-          when @uri
-            x = URI.parse(@uri).path
-          else
-            x = ""
-          end
-          # x << "\t" unless x.empty?
-          x.freeze
-          )
-      end
-      def queue_
-        @queue_ ||=
-          (queue.empty? ? queue : queue + " ").freeze
-      end
-
-      # server represents a receiving ZMQ endpoint.
-      def _server_accept_connection! server
-        [ server, @one_way ? nil : server ]
-      end
-
-      # ZMQ is message-oriented, process only one message per "connection".
-      alias :_server_serve_stream :serve_message!
-
-      def stream_eof? stream
-        false
-      end
-
-      # Nothing to be closed for ZMQ.
-      def _server_close_connection! in_stream, out_stream
-        # NOTHING
-      end
-
-      def zmq_uri
-        @zmq_uri ||=
-          (
-          u = URI.parse(uri)
-          u.path = ''
-          u.to_s.freeze
-          )
-      end
-
-      def zmq_context
-        @@zmq_context ||=
-          ZMQ::Context.new(1)
-      end
-      @@zmq_context ||= nil
-    end
-    # !SLIDE END
-  end # class
-end # module
-
-