hayeah-ASS 0.0.1

data/ASS.gemspec

@@ -0,0 +1,48 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{ASS}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Howard Yeh"]
+  s.date = %q{2009-08-13}
+  s.email = %q{hayeah@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+    "README.textile"
+  ]
+  s.files = [
+    "ASS.gemspec",
+    "LICENSE",
+    "README.textile",
+    "Rakefile",
+    "VERSION.yml",
+    "lib/ass.rb",
+    "test/ass_test.rb",
+    "test/test_helper.rb"
+  ]
+  s.has_rdoc = true
+  s.homepage = %q{http://github.com/hayeah/ass}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{Asynchronous Service Stages for Distributed Services}
+  s.test_files = [
+    "test/ass_test.rb",
+    "test/test_helper.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<amqp>, [">= 0"])
+    else
+      s.add_dependency(%q<amqp>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<amqp>, [">= 0"])
+  end
+end

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Howard Yeh
+
+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/Rakefile

@@ -0,0 +1,57 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "ASS"
+    gem.summary = "Asynchronous Service Stages for Distributed Services"
+    gem.email = "hayeah@gmail.com"
+    gem.homepage = "http://github.com/hayeah/ass"
+    gem.authors = ["Howard Yeh"]
+    gem.add_dependency "amqp"
+    gem.files = FileList["[A-Z]*", "{lib,test}/**/*"]
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "ass #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

data/VERSION.yml

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

data/lib/ass.rb

@@ -0,0 +1,212 @@
+require 'mq'
+class Ass
+  
+  attr_reader :server_exchange
+
+  def self.declare(server_exchange)
+    self.new([server_exchange,{:passive => true}])
+  end
+  
+  # uh... we'll assume that the exchanges are all direct exchanges.
+  def initialize(server_exchange)
+    @server_exchange = get_exchange(server_exchange)
+  end
+
+  def client(client_exchange,*args)
+    @client_exchange ||= get_exchange(client_exchange)
+    q = get_queue(@client_exchange,*args) 
+    Client.new(@server_exchange,@client_exchange,q)
+  end
+
+  def server(*args)
+    Server.new(@server_exchange,get_queue(@server_exchange,*args))
+  end
+
+  def get_exchange(arg)
+    case arg
+    when Array
+      exchanges = exchange[0]
+      opts = exchange[1]
+    else
+      exchange = arg
+      opts = nil
+    end
+    opts = {} if opts.nil?
+    exchange = exchange.is_a?(MQ::Exchange) ? exchange : MQ.direct(exchange,opts)
+    raise "accepts only direct exchanges" unless exchange.type == :direct
+    exchange
+  end
+
+  # can specify a key to create a queue for that subdomain
+  def get_queue(exchange,*args)
+    case args[0]
+    when Hash
+      key = nil
+      opts = args[0]
+    when String
+      key = args[0]
+      opts = args[1]
+    end
+    opts = {} if opts.nil?
+    if key
+      name = "#{exchange.name}--#{key}"
+      q = MQ.queue(name,opts)
+      q.bind(exchange,{ :routing_key => key})
+    else
+      q = MQ.queue(exchange.name,opts)
+      q.bind(exchange,{ :routing_key => exchange.name })
+    end
+    q
+  end
+
+  module Callback
+
+    def build_callback_klass(callback)
+      case callback
+      when Proc
+        Class.new &callback
+      when Class
+        callback
+      when Module
+        Class.new { include callback }
+      end
+    end
+    
+    def callback(info,payload)
+      # method,data,meta
+      if @callback_klass.respond_to? :version
+        klass = @callback_klass.get_version(payload[:version])
+      else
+        klass = @callback_klass
+      end
+      obj = klass.new
+      service = self
+      obj.instance_variable_set("@__service__",service)
+      obj.instance_variable_set("@__header__",info)
+      obj.instance_variable_set("@__meta__",payload[:meta])
+      class << obj
+        def header
+          @__header__
+        end
+
+        def meta
+          @__meta__
+        end
+        
+        def service
+          @__service__
+        end
+
+        def call(method,data=nil,meta=nil,opts={})
+          @__service__.call(method,data,meta,opts)
+        end
+      end
+      #p [:call,payload]
+      obj.send(payload[:method],
+               payload[:data])
+    end
+  end
+
+  class Client
+    include Callback
+    def initialize(server_exchange,client_exchange,queue)
+      @server_exchange = server_exchange
+      @client_exchange = client_exchange
+      @queue = queue
+    end
+    
+    def react(callback=nil,opts=nil,&block)
+      if block
+        opts = callback
+        callback = block
+      end
+      opts = {} if opts.nil?
+      
+      @callback_klass = build_callback_klass(callback)
+      @ack = opts[:ack]
+      @queue.subscribe(opts) do |info,payload|
+        payload = ::Marshal.load(payload)
+        callback(info,payload)
+        info.ack if @ack
+      end
+      self
+    end
+    
+    def call(method,data=nil,meta=nil,opts={})
+      # opts passed to publish
+      # if no routing key is given, use receiver's name as the routing key.
+      version = @klass.version  if @klass.respond_to? :version
+      payload = {
+        :method => method,
+        :data => data,
+        :meta => meta,
+        :version => version
+      }
+
+      # set it up s.t. server would respond to
+      # private queue if key is given, otherwise
+      # the server would respond to public queue.
+      key = opts.delete(:key)
+      @server_exchange.publish Marshal.dump(payload), {
+        :key => (key ? key : @server_exchange.name),
+        :reply_to => @client_exchange.name
+      }.merge(opts)
+    end
+
+    # for casting, just null the reply_to field, so server doesn't respond.
+    def cast(method,data=nil,meta=nil,opts={})
+      self.call(method,data,meta,opts.merge({:reply_to => nil}))
+    end
+
+    
+  end
+
+  class Server
+    include Callback
+
+    def initialize(server_exchange,q)
+      @queue = q
+      @server_exchange = server_exchange
+    end
+
+    attr_reader :queue
+    def exchange
+      @server_exchange
+    end
+
+    def react(callback=nil,opts=nil,&block)
+      if block
+        opts = callback
+        callback = block
+      end
+      opts = {} if opts.nil?
+      
+      @callback_klass = build_callback_klass(callback)
+      @ack = opts[:ack]
+      @queue.subscribe(opts) do |info,payload|
+        payload = ::Marshal.load(payload)
+        #p [info,info.reply_to,payload]
+        data2 = callback(info,payload)
+        payload2 = payload.merge :data => data2
+        if info.routing_key == @server_exchange.name
+          # addressed to the server's public
+          # queue, respond to the routing_key of
+          # the client's public queue.
+          key = info.reply_to
+        else
+          # addressed to the private queue
+          key = info.routing_key
+        end
+        MQ.direct(info.reply_to).publish(::Marshal.dump(payload2),:routing_key => key) if info.reply_to
+        info.ack if @ack
+      end
+      self
+    end
+  end
+
+  class Peeper
+    def initialize(exchange,callback)
+      # create a temporary queue that binds to an exchange
+    end
+  end
+end

data/test/ass_test.rb

@@ -0,0 +1,7 @@
+require 'test_helper'
+
+class AssTest < Test::Unit::TestCase
+  should "probably rename this file and start testing for real" do
+    flunk "hey buddy, you should probably rename this file and start testing for real"
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'ass'
+
+class Test::Unit::TestCase
+end

metadata

@@ -0,0 +1,72 @@
+--- !ruby/object:Gem::Specification 
+name: hayeah-ASS
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Howard Yeh
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-13 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: amqp
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: 
+email: hayeah@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.textile
+files: 
+- ASS.gemspec
+- LICENSE
+- README.textile
+- Rakefile
+- VERSION.yml
+- lib/ass.rb
+- test/ass_test.rb
+- test/test_helper.rb
+has_rdoc: true
+homepage: http://github.com/hayeah/ass
+licenses: 
+post_install_message: 
+rdoc_options: 
+- --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.3.5
+signing_key: 
+specification_version: 2
+summary: Asynchronous Service Stages for Distributed Services
+test_files: 
+- test/ass_test.rb
+- test/test_helper.rb