rlyeh 0.0.1

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/.rspec

@@ -0,0 +1,2 @@
+--color
+--format d

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in rlyeh.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2012 mashiro
+
+MIT License
+
+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.md

@@ -0,0 +1,29 @@
+# Rlyeh
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'rlyeh'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install rlyeh
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Added some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,6 @@
+#!/usr/bin/env rake
+require "bundler/gem_tasks"
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec)
+task :default => :spec

data/example/middleware.rb

@@ -0,0 +1,35 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+$LOAD_PATH.unshift 'lib'
+require 'rlyeh'
+
+class MyMiddleware
+  include Rlyeh::Dispatcher
+
+  on :privmsg do |env|
+    p "Middleware: #{env.message}"
+  end
+
+  def initialize(app)
+    @app = app
+  end
+
+  def call(env)
+    dispatch env
+    @app.call env
+  end
+end
+
+class MyApp < Rlyeh::Base
+  use MyMiddleware
+
+  on :privmsg do |env|
+    p "MyApp1: #{env.message}"
+  end
+
+  on :privmsg do |env|
+    p "MyApp2: #{env.message}"
+  end
+end
+
+Rlyeh.run MyApp

data/example/simple.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+$LOAD_PATH.unshift 'lib'
+require 'rlyeh'
+
+class MyApp < Rlyeh::Base
+  on :privmsg do |env|
+    p "MyApp1: #{env.message}"
+  end
+
+  on :privmsg do |env|
+    p "MyApp2: #{env.message}"
+  end
+end
+
+Rlyeh.run MyApp

data/lib/rlyeh/base.rb

@@ -0,0 +1,67 @@
+require 'rlyeh/dispatcher'
+require 'rlyeh/middleware/builder'
+
+module Rlyeh
+  class Base
+    include Rlyeh::Dispatcher
+
+    class << self
+      def middlewares
+        @middlewares ||= []
+        if superclass.respond_to?(:middlewares)
+          superclass.middlewares + @middlewares
+        else
+          @middlewares
+        end
+      end
+
+      def use(name, *args, &block)
+        @middlewares ||= []
+        @middlewares << [name, args, block]
+        @middlewares = @middlewares.uniq
+      end
+
+      alias new! new unless method_defined? :new!
+      def new(*args, &block)
+        build(Rlyeh::Middleware::Builder.new, *args, &block).to_app
+      end
+
+      private
+
+      def build(builder, *args, &block)
+        setup_default_middlewares builder
+        setup_middlewares builder
+        builder.run new!(*args, &block)
+        builder
+      end
+
+      def setup_default_middlewares(builder)
+      end
+
+      def setup_middlewares(builder)
+        middlewares.each do |name, args, block|
+          builder.use(name, *args, &block)
+        end
+      end
+    end
+
+    def initialize(app = nil)
+      @app = app
+      yield self if block_given?
+    end
+
+    def call(env)
+      name = env.message.command.to_s.downcase
+      trigger name, env
+
+      @app.call env if @app
+    end
+
+    def trigger(name, *args, &block)
+      callbacks = self.class.callbacks name
+      callbacks.each do |callback|
+        callback.bind(self).call *args, &block
+      end
+    end
+  end
+end

data/lib/rlyeh/connection.rb

@@ -0,0 +1,55 @@
+require 'ircp'
+require 'rlyeh/environment'
+
+module Rlyeh
+  class Connection < EventMachine::Connection
+    include EventMachine::Protocols::LineText2
+
+    attr_reader :server, :klass, :options
+    attr_reader :app, :session
+
+    def initialize(server, klass, options)
+      @server = server
+      @klass = klass
+      @options = options
+      set_delimiter "\r\n"
+    end
+
+    def post_init
+      @app = klass.new
+      #@app = @app_class.new self, options
+    end
+
+    def unbind
+      @server.unbind self
+    end
+
+    def receive_line(data)
+      env = Rlyeh::Environment.new
+      env.connection = self
+      env.raw = data
+
+      begin
+        env.message = Ircp.parse data
+      rescue Ircp::ParseError => e
+        p e
+      else
+        @app.call env
+      end
+    end
+
+    def attached(session)
+      @session = session
+      #@app.attached session
+    end
+
+    def deatched(session)
+      #@app.detached session
+      @session = nil
+    end
+
+    def attached?
+      !!@session
+    end
+  end
+end

data/lib/rlyeh/dispatcher.rb

@@ -0,0 +1,46 @@
+module Rlyeh
+  module Dispatcher
+    def self.included(base)
+      base.extend ClassMethods
+    end
+
+    module ClassMethods
+      def callbacks(name)
+        @dispatchers ||= {}
+        callbacks = @dispatchers[name] || []
+        if superclass.respond_to?(:callbacks)
+          superclass.callbacks(name) + callbacks
+        else
+          callbacks
+        end
+      end
+
+      def on(name, &block)
+        @dispatchers ||= {}
+        name = name.to_s
+        callbacks = (@dispatchers[name] ||= [])
+        callbacks << generate_method(name, &block)
+        callbacks.uniq!
+      end
+
+      def generate_method(method_name, &block)
+        define_method method_name, &block
+        method = instance_method method_name
+        remove_method method_name
+        method
+      end
+    end
+
+    def dispatch(env)
+      name = env.message.command.to_s.downcase
+      trigger name, env
+    end
+
+    def trigger(name, *args, &block)
+      callbacks = self.class.callbacks name
+      callbacks.each do |callback|
+        callback.bind(self).call *args, &block
+      end
+    end
+  end
+end

data/lib/rlyeh/environment.rb

@@ -0,0 +1,18 @@
+module Rlyeh
+  class Environment < ::Hash
+    def method_missing(method_id, *args)
+      case method_id.to_s
+      when /^(.+)=$/
+        store $1.to_sym, args.first
+      when /^(.+)\?$/
+        key? $1.to_sym
+      else
+        unless key? method_id
+          store method_id, Environment.new
+        else
+          fetch method_id
+        end
+      end
+    end
+  end
+end

data/lib/rlyeh/filter.rb

@@ -0,0 +1,77 @@
+module Rlyeh
+  module Filter
+    def self.included(base)
+      base.extend ClassMethods
+    end
+
+    module ClassMethods
+      def define_filter(*names, &block)
+        names.each do |name|
+          unless method_defined?("#{name}_with_filter")
+            define_method(:"#{name}_with_filter") do |*args, &block|
+              _run_filter_callbacks(:"#{name}", [:before, :around], *args, &block)
+              result = send(:"#{name}_without_filter", *args, &block)
+              _run_filter_callbacks(:"#{name}", [:around, :after], *args, &block)
+              result
+            end
+            alias_method :"#{name}_without_filter", :"#{name}"
+            alias_method :"#{name}", :"#{name}_with_filter"
+          end
+        end
+      end
+    end
+
+    def _filter_callbacks
+      @_filter_callbacks ||= {}
+    end
+    private :_filter_callbacks
+
+    def _run_filter_callbacks(name, types, *args, &block)
+      named_filter_callbacks = _filter_callbacks[name] || {}
+      types.each do |type|
+        (named_filter_callbacks[type] || []).each do |callback|
+          callback.call(*args, &block)
+        end
+      end
+    end
+    private :_run_filter_callbacks
+
+    def _insert_filter_callbacks(names, type, block, options = {})
+      prepend = options[:prepend]
+      names.each do |name|
+        named_filter_callbacks = (_filter_callbacks[:"#{name}"] ||= {})
+        callbacks = (named_filter_callbacks[type] ||= [])
+        if prepend
+          callbacks.unshift block
+        else
+          callbacks.push block
+        end
+      end
+    end
+    private :_insert_filter_callbacks
+
+    def _remove_filter_callbacks(names, type, block)
+      names.each do |name|
+        named_filter_callbacks = (_filter_callbacks[:"#{name}"] ||= {})
+        callbacks = (named_filter_callbacks[type] ||= [])
+        callbacks.delete block
+      end
+    end
+    private :_remove_filter_callbacks
+
+    [:before, :after, :around].each do |type|
+      define_method(:"#{type}_filter") do |*names, &block|
+        _insert_filter_callbacks(names, type, block)
+      end
+      alias_method :"append_#{type}_filter", :"#{type}_filter"
+
+      define_method(:"prepend_#{type}_filter") do |*names, &block|
+        _insert_filter_callbacks(names, type, block, :prepend => true)
+      end
+
+      define_method(:"remove_#{type}_filter") do |*names, &block|
+        _remove_filter_callbacks(names, type, block)
+      end
+    end
+  end
+end

data/lib/rlyeh/middleware/builder.rb

@@ -0,0 +1,31 @@
+module Rlyeh
+  module Middleware
+    class Builder
+      def initialize(&block)
+        @ins = []
+        instance_eval(&block) if block_given?
+      end
+
+      def self.app(&block)
+        self.new(&block).to_app
+      end
+
+      def use(middleware, *args, &block)
+        @ins << lambda { |app| middleware.new(app, *args, &block) }
+      end
+
+      def run(app)
+        @ins << app #lambda { |nothing| app }
+      end
+
+      def to_app
+        inner_app = @ins.last
+        @ins[0...-1].reverse.inject(inner_app) { |a, e| e.call(a) }
+      end
+
+      def call(env)
+        to_app.call(env)
+      end
+    end
+  end
+end

data/lib/rlyeh/middleware/typablemap.rb

@@ -0,0 +1,13 @@
+module Rlyeh
+  module Middleware
+    class TypableMap
+      def initialize(app)
+        @app = app
+      end
+
+      def call(env)
+        @app.call env
+      end
+    end
+  end
+end

data/lib/rlyeh/runner.rb

@@ -0,0 +1,25 @@
+module Rlyeh
+  module Runner
+    def self.included(base)
+      base.extend ClassMethods
+    end
+
+    module ClassMethods
+      def run(*args, &block)
+        starter = proc do
+          Server.start *args, &block
+        end
+
+        if EventMachine.reactor_running?
+          starter.call
+        else
+          EventMachine.run &starter
+        end
+      end
+
+      def stop
+        EventMachine.stop if EventMachine.reactor_running?
+      end
+    end
+  end
+end

data/lib/rlyeh/server.rb

@@ -0,0 +1,60 @@
+require 'rlyeh/connection'
+require 'rlyeh/utils'
+require 'rlyeh/filter'
+
+module Rlyeh
+  class Server
+    include Rlyeh::Filter
+
+    attr_reader :options, :host, :port
+    attr_reader :app_class, :signature, :connections, :sessions
+
+    def initialize(*args)
+      @options = Rlyeh::Utils.extract_options! args
+      @host = @options.delete(:host) || "127.0.0.1"
+      @port = @options.delete(:port) || 46667
+      @app_class = args.shift
+      @signature = nil
+      @connections = []
+      @sessions = {}
+    end
+
+    def self.start(*args)
+      new(*args).start
+    end
+
+    def start
+      args = [self, @app_class, options]
+      @signature = EventMachine.start_server @host, @port, Rlyeh::Connection, *args do |connection|
+        bind connection
+      end
+    end
+
+    def stop
+      EventMachine.stop_server @signature if @signature
+      @signature = nil
+    end
+
+    def bind(connection)
+      @connections.push connection
+      puts 'bind'
+    end
+
+    def unbind(connection)
+      if connection.attached?
+        session = connection.session
+        session.detach connection
+
+        if session.empty?
+          session.close
+          @sessions.delete session
+        end
+      end
+
+      @connections.delete connection
+      puts 'unbind'
+    end
+
+    define_filter :start, :stop, :bind, :unbind
+  end
+end

data/lib/rlyeh/session.rb

@@ -0,0 +1,42 @@
+require 'rlyeh/filter'
+
+module Rlyeh
+  class Session
+    include Rlyeh::Filter
+
+    attr_accessor :channel, :connections
+
+    def initialize
+      @channel = EventMachine::Channel.new
+      @subscribers = {}
+    end
+
+    def attach(conn)
+      conn.attached self
+
+      @subscribers[conn] = @channel.subscribe do |msg|
+        conn.send_data msg
+      end
+    end
+
+    def detach(conn)
+      id = @subscribers.delete conn
+      @channel.unsubscribe id if id
+
+      conn.detached self
+    end
+
+    def close
+    end
+
+    def send_data(data)
+      @channel.push data
+    end
+
+    def empty?
+      @subscribes.empty?
+    end
+
+    define_filter :attach, :detach, :close, :send_data
+  end
+end

data/lib/rlyeh/utils.rb

@@ -0,0 +1,9 @@
+module Rlyeh
+  module Utils
+    class << self
+      def extract_options!(args)
+        args.last.is_a?(::Hash) ? args.pop : {}
+      end
+    end
+  end
+end

data/lib/rlyeh/version.rb

@@ -0,0 +1,3 @@
+module Rlyeh
+  VERSION = "0.0.1"
+end

data/lib/rlyeh.rb

@@ -0,0 +1,17 @@
+require 'eventmachine'
+
+module Rlyeh
+  autoload :VERSION,     'rlyeh/version'
+
+  autoload :Server,      'rlyeh/server'
+  autoload :Connection,  'rlyeh/connection'
+  autoload :Session,     'rlyeh/session'
+  autoload :Environment, 'rlyeh/environment'
+  autoload :Base,        'rlyeh/base'
+
+  autoload :Dispatcher,  'rlyeh/dispatcher'
+  autoload :Filter,      'rlyeh/filter'
+
+  require 'rlyeh/runner'
+  include Rlyeh::Runner
+end

data/rlyeh.gemspec

@@ -0,0 +1,22 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/rlyeh/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.authors       = ["mashiro"]
+  gem.email         = ["mail@mashiro.org"]
+  gem.description   = %q{Welcome to the deep sea}
+  gem.summary       = %q{IRC gateway server framework}
+  gem.homepage      = ""
+
+  gem.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  gem.files         = `git ls-files`.split("\n")
+  gem.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  gem.name          = "rlyeh"
+  gem.require_paths = ["lib"]
+  gem.version       = Rlyeh::VERSION
+
+  gem.add_dependency 'ircp'
+  gem.add_dependency 'eventmachine'
+  gem.add_development_dependency 'rake'
+  gem.add_development_dependency 'rspec'
+end

data/spec/rlyeh/server_spec.rb

@@ -0,0 +1 @@
+require 'spec_helper'

data/spec/spec_helper.rb

@@ -0,0 +1,11 @@
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'rspec'
+require 'ircp'
+
+# 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

metadata

@@ -0,0 +1,113 @@
+--- !ruby/object:Gem::Specification
+name: rlyeh
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- mashiro
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-10 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: ircp
+  requirement: &14960720 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *14960720
+- !ruby/object:Gem::Dependency
+  name: eventmachine
+  requirement: &14960300 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *14960300
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &14959880 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *14959880
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &15007960 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *15007960
+description: Welcome to the deep sea
+email:
+- mail@mashiro.org
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- example/middleware.rb
+- example/simple.rb
+- lib/rlyeh.rb
+- lib/rlyeh/base.rb
+- lib/rlyeh/connection.rb
+- lib/rlyeh/dispatcher.rb
+- lib/rlyeh/environment.rb
+- lib/rlyeh/filter.rb
+- lib/rlyeh/middleware/builder.rb
+- lib/rlyeh/middleware/typablemap.rb
+- lib/rlyeh/runner.rb
+- lib/rlyeh/server.rb
+- lib/rlyeh/session.rb
+- lib/rlyeh/utils.rb
+- lib/rlyeh/version.rb
+- rlyeh.gemspec
+- spec/rlyeh/server_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: IRC gateway server framework
+test_files: []