angelo 0.0.4

data/.gitignore

@@ -0,0 +1,2 @@
+angelo-*.gem
+Gemfile.lock

data/CHANGELOG

@@ -0,0 +1,20 @@
+changelog
+=========
+
+### 0.0.3 30 oct 2013
+
+
+* added tilt/erb
+* added before/after
+* added content_type/headers
+* better websockets error handling
+
+### 0.0.2 29 oct 2013
+
+* added websockets helper
+
+### 0.0.1 28 oct 2013
+
+* initial release
+* get/post/put/delete/options support
+* socket support

data/Gemfile

@@ -0,0 +1,5 @@
+source 'https://rubygems.org'
+
+gem 'reel'
+gem 'pry'
+gem 'pry-nav'

data/LICENSE

@@ -0,0 +1,13 @@
+Copyright 2013 Kenichi Nakamura
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+    http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.

data/README.md

@@ -0,0 +1,78 @@
+Angelo
+======
+
+A Sinatra-esque DSL for Reel.
+
+__SUPER ALPHA!__
+
+### Quick example
+
+```ruby
+require 'angelo'
+
+class Foo < Angelo::Base
+
+  TEST = {foo: "bar", baz: 123, bat: false}.to_json
+
+  def pong; 'pong'; end
+  def foo; params[:foo]; end
+
+  get '/ping' do
+    pong
+  end
+
+  post '/foo' do
+    foo
+  end
+
+  post '/bar' do
+    params.to_json
+  end
+
+  post '/emit' do
+    websockets.each {|ws| ws.write TEST}
+    params.to_json
+  end
+
+  socket '/ws' do |s|
+    websockets << s
+    while msg = s.read
+      5.times { s.write TEST }
+      s.write foo.to_json
+    end
+  end
+
+end
+
+Foo.run
+```
+
+### Tilt / ERB
+
+To make `erb` available in route blocks
+
+1. add `tilt` to your `Gemfile`:
+
+```ruby
+gem 'tilt'
+```
+
+2. require `angelo/tilt/erb`
+3. include `Angelo::Tilt::ERB` in your app
+
+```ruby
+class Foo < Angelo::Base
+  include Angelo::Tilt::ERB
+
+  @@views = 'some/other/path' # defaults to './views'
+
+  get '/' do
+    erb :index
+  end
+
+end
+```
+
+### License
+
+see LICENSE

data/angelo.gemspec

@@ -0,0 +1,16 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/angelo/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.authors       = ["Kenichi Nakamura"]
+  gem.email         = ["kenichi.nakamura@gmail.com"]
+  gem.description   = gem.summary = "A Sinatra-esque DSL for Reel"
+  gem.homepage      = "https://github.com/kenichi/angelo"
+  gem.files         = `git ls-files | grep -Ev '^(myapp|examples)'`.split("\n")
+  gem.test_files    = `git ls-files -- test/*`.split("\n")
+  gem.name          = "angelo"
+  gem.require_paths = ["lib"]
+  gem.version       = Angelo::VERSION
+  gem.license       = 'apache'
+  gem.add_dependency 'reel'
+end

data/example/foo/foo.rb

@@ -0,0 +1,60 @@
+$:.unshift File.expand_path '../../../lib', __FILE__
+
+require 'angelo'
+require 'angelo/tilt/erb'
+
+class Foo < Angelo::Base
+  include Angelo::Tilt::ERB
+
+  TEST = {foo: "bar", baz: 123, bat: false}.to_json
+
+  def pong; 'pong'; end
+  def foo; params[:foo]; end
+  def time_ms; Time.now.to_f * 1000.0; end
+
+  before do
+    info "request: #{request.method} #{request.path}"
+    @foo = request.path
+    @timing = time_ms
+  end
+
+  after do
+    info "timing: #{time_ms - @timing}ms"
+  end
+
+  get '/' do
+    @name = params[:name]
+    @host = request.headers['Host']
+    erb :index, locals: {zzz: 'word'}
+  end
+
+  get '/ping' do
+    debug "@foo: #{@foo}"
+    pong
+  end
+
+  post '/foo' do
+    foo
+  end
+
+  post '/bar' do
+    content_type = :json
+    params
+  end
+
+  post '/emit' do
+    websockets.each {|ws| ws.write TEST}
+    params.to_json
+  end
+
+  socket '/ws' do |s|
+    websockets << s
+    while msg = s.read
+      5.times { s.write TEST }
+      s.write foo.to_json
+    end
+  end
+
+end
+
+Foo.run unless $0 == 'irb'

data/example/foo/views/index.html.erb

@@ -0,0 +1,20 @@
+hi <%= @name %><br/>
+this is a local - <%= zzz %><br/>
+<br/>
+<a href="#" onclick="openws();">websocket!</a>
+<br/>
+<a href="#" onclick="emit();">emit!</a>
+
+<script>
+  var ws;
+  function openws() {
+    ws = new WebSocket('ws://<%= @host %>/ws');
+    ws.onmessage = function(e) { console.log(e.data); };
+    ws.onopen = function(e) {
+      ws.send('hi');
+    };
+  }
+  function emit() {
+    $.post('/emit', {data: {"foo": "bar"}});
+  }
+</script>

data/example/foo/views/layout.html.erb

@@ -0,0 +1,10 @@
+<!doctype html>
+<html>
+  <head>
+    <title>example</title>
+     <script src="//ajax.googleapis.com/ajax/libs/jquery/1.10.2/jquery.min.js"></script>
+  </head>
+  <body>
+    <%= yield %>
+  </body>
+</html>

data/lib/angelo/base.rb

@@ -0,0 +1,106 @@
+module Angelo
+
+  class Base
+    include ParamsParser
+    include Celluloid::Logger
+
+    extend Forwardable
+    def_delegator :@responder, :request
+
+    attr_accessor :responder
+
+    class << self
+
+      attr_accessor :app_file
+
+      def inherited subclass
+        subclass.app_file = caller(1).map {|l| l.split(/:(?=|in )/, 3)[0,1]}.flatten[0]
+
+        def subclass.root
+          @root ||= File.expand_path '..', app_file
+          @root
+        end
+
+        def subclass.view_dir
+          v = self.class_variable_get(:@@views) rescue 'views'
+          File.join root, v
+        end
+
+      end
+
+      def compile! name, &block
+        define_method name, &block
+        method = instance_method name
+        remove_method name
+        method
+      end
+
+      def routes
+        @routes ||= {}
+        [:get, :post, :put, :delete, :options, :socket].each do |m|
+          @routes[m] ||= {}
+        end
+        @routes
+      end
+
+      def before &block
+        # @before = compile! :before, &block
+        define_method :before, &block
+      end
+
+      def after &block
+        # @after = compile! :after, &block
+        define_method :after, &block
+      end
+
+      [:get, :post, :put, :delete, :options].each do |m|
+        define_method m do |path, &block|
+          routes[m][path] = Responder.new &block
+        end
+      end
+
+      def socket path, &block
+        routes[:socket][path] = WebsocketResponder.new &block
+      end
+
+      def websockets
+        if @websockets.nil?
+          @websockets = []
+          def @websockets.each &block
+            super do |ws|
+              begin
+                yield ws
+              rescue Reel::SocketError => rse
+                warn "#{rse.class} - #{rse.message}"
+                delete ws
+              end
+            end
+          end
+        end
+        @websockets.reject! &:closed?
+        @websockets
+      end
+
+      def run host = '127.0.0.1', port = 4567
+        @server = Angelo::Server.new self, host, port
+        sleep
+      end
+
+    end
+
+    def before; end;
+    def after; end;
+
+    def params
+      @params ||= case request.method
+                  when GET;  parse_query_string
+                  when POST; parse_post_body
+                  end
+      @params
+    end
+
+    def websockets; self.class.websockets; end
+
+  end
+
+end

data/lib/angelo/params_parser.rb

@@ -0,0 +1,48 @@
+require 'cgi'
+
+module Angelo
+
+  module ParamsParser
+
+    EMPTY_JSON = '{}'.freeze
+    SEMICOLON = ';'.freeze
+
+    def parse_formencoded str
+      str.split('&').reduce(Responder.symhash) do |p, kv|
+        key, value = kv.split('=').map {|s| CGI.escape s}
+        p[key] = value
+        p
+      end
+    end
+
+    def parse_query_string
+      parse_formencoded(request.query_string || '')
+    end
+
+    def parse_post_body
+      body = request.body.to_s
+      case
+      when form_encoded?
+        body = parse_formencoded body
+      when json?
+        body = EMPTY_JSON if body.empty?
+        body = JSON.parse body
+      end
+      parse_query_string.merge! body
+    end
+
+    def form_encoded?
+      content_type? FORM_TYPE
+    end
+
+    def json?
+      content_type? JSON_TYPE
+    end
+
+    def content_type? type
+      request.headers[CONTENT_TYPE_HEADER_KEY].split(SEMICOLON).include? type
+    end
+
+  end
+
+end

data/lib/angelo/responder/websocket.rb

@@ -0,0 +1,38 @@
+module Angelo
+
+  class WebsocketResponder < Responder
+
+    def params
+      @params ||= parse_query_string
+      @params
+    end
+
+    def request= request
+      @params = nil
+      @request = request
+      @websocket = @request.websocket
+      handle_request
+    end
+
+    def handle_request
+      begin
+        if @response_handler
+          @bound_response_handler ||= @response_handler.bind @base
+          @bound_response_handler[@websocket]
+        else
+          raise NotImplementedError
+        end
+      rescue IOError => ioe
+        error "#{ioe.class} - #{ioe.message}"
+        @websocket.close
+        @base.websockets.delete @websocket
+      rescue => e
+        error e.message
+        ::STDERR.puts e.backtrace
+        @connection.close
+      end
+    end
+
+  end
+
+end

data/lib/angelo/responder.rb

@@ -0,0 +1,87 @@
+module Angelo
+
+  class Responder
+    include Celluloid::Logger
+
+    class << self
+
+      def symhash
+        Hash.new {|hash,key| hash[key.to_s] if Symbol === key }
+      end
+
+    end
+
+    attr_writer :connection
+    attr_reader :request
+
+    def initialize &block
+      @response_handler = Base.compile! :request_handler, &block
+    end
+
+    def base= base
+      @base = base
+      @base.responder = self
+    end
+
+    def request= request
+      @params = nil
+      @request = request
+      handle_request
+      respond
+    end
+
+    def handle_request
+      begin
+        if @response_handler
+          @base.before
+          @body = @response_handler.bind(@base).call || ''
+          @base.after
+        else
+          raise NotImplementedError
+        end
+      rescue => e
+        error_message = case
+                        when respond_with?(:json)
+                          { error: e.message }.to_json
+                        else
+                          e.message
+                        end
+        @connection.respond :internal_server_error, headers, error_message
+        @connection.close
+        error "#{e.class} - #{e.message}"
+        ::STDERR.puts e.backtrace
+      end
+    end
+
+    def headers hs = nil
+      @headers ||= {}
+      @headers.merge! hs if hs
+      @headers
+    end
+
+    def content_type= type
+      case type
+      when :json
+        headers CONTENT_TYPE_HEADER_KEY => JSON_TYPE
+      else
+        raise ArgumentError.new "invalid content_type: #{type}"
+      end
+    end
+
+    def respond_with? type
+      case headers[CONTENT_TYPE_HEADER_KEY]
+      when JSON_TYPE
+        type == :json
+      else
+        type == :html
+      end
+    end
+
+    def respond
+      @body = @body.to_json if respond_with? :json
+      @connection.respond :ok, DEFAULT_RESPONSE_HEADERS.merge(headers), @body
+    end
+
+  end
+
+end

data/lib/angelo/server.rb

@@ -0,0 +1,47 @@
+module Angelo
+
+  class Server < Reel::Server
+    include Celluloid::Logger
+
+    def initialize base, host = '127.0.0.1', port = 4567
+      @base = base
+      info "Angelo listening on #{host}:#{port}"
+      super host, port, &method(:on_connection)
+    end
+
+    def on_connection connection
+      connection.each_request do |request|
+        if request.websocket?
+          debug "got websocket request..."
+          route_websocket connection, request
+        else
+          route_request connection, request
+        end
+      end
+    end
+
+    private
+
+    def route_request connection, request
+      route! request.method.downcase.to_sym, connection, request
+    end
+
+    def route_websocket connection, request
+      route! :socket, connection, request
+    end
+
+    def route! meth, connection, request
+      rs = @base.routes[meth][request.path]
+      if rs
+        responder = rs.dup
+        responder.base = @base.new
+        responder.connection = connection
+        responder.request = request
+      else
+        connection.respond :not_found, DEFAULT_RESPONSE_HEADERS, NOT_FOUND
+      end
+    end
+
+  end
+
+end

data/lib/angelo/tilt/erb.rb

@@ -0,0 +1,76 @@
+require 'erb'
+require 'tilt'
+
+module Angelo
+  module Tilt
+    module ERB
+
+      # hrm, sneaky
+      #
+      def self.included base
+        base.extend ClassMethods
+      end
+
+      module ClassMethods
+
+        DEFAULT_LAYOUT = 'layout.html.erb'.freeze
+
+        def view_glob *glob
+          File.join view_dir, *glob
+        end
+
+        def templatify *glob
+          Dir[view_glob *glob].reduce({}) do |h,v|
+            sym = v.gsub view_dir + '/', ''
+            return h if (block_given? && yield(v))
+            sym.gsub! '/', '_'
+            sym.gsub! /\.\w+?\.erb$/, ''
+            h[sym.to_sym] = ::Tilt::ERBTemplate.new v
+            h
+          end
+        end
+
+        def templates
+          @templates ||= templatify('**', '*.erb'){|v| v =~ /^layouts\//}
+          @templates
+        end
+
+        def layout_templates
+          @layout_templates ||= templatify 'layouts', '*.erb'
+          @layout_templates
+        end
+
+        def default_layout
+          if @default_layout.nil?
+            l = view_glob(DEFAULT_LAYOUT)
+            @default_layout = ::Tilt::ERBTemplate.new l if File.exist? l
+          end
+          @default_layout
+        end
+
+      end
+
+      def erb view, opts = {locals: {}}
+        locals = Hash === opts[:locals] ? opts[:locals] : {}
+        render = ->{self.class.templates[view].render self, locals}
+        case opts[:layout]
+        when false
+          render[]
+        when Symbol
+          if lt = self.class.layout_templates[opts[:layout]]
+            lt.render self, locals, &render
+          else
+            raise ArgumentError.new "unknown layout - :#{opts[:layout]}"
+          end
+        else
+          if self.class.default_layout
+            self.class.default_layout.render self, locals, &render
+          else
+            render[]
+          end
+        end
+      end
+
+    end
+  end
+end

data/lib/angelo/version.rb

@@ -0,0 +1,3 @@
+module Angelo
+  VERSION = '0.0.4'
+end

data/lib/angelo.rb

@@ -0,0 +1,33 @@
+require 'reel'
+require 'json'
+require 'pry'
+require 'pry-nav'
+
+module Angelo
+
+  GET =     'GET'.freeze
+  POST =    'POST'.freeze
+  PUT =     'PUT'.freeze
+  DELETE =  'DELETE'.freeze
+  OPTIONS = 'OPTIONS'.freeze
+
+  CONTENT_TYPE_HEADER_KEY = 'Content-Type'.freeze
+
+  HTML_TYPE = 'text/html'.freeze
+  JSON_TYPE = 'application/json'.freeze
+  FORM_TYPE = 'application/x-www-form-urlencoded'.freeze
+
+  DEFAULT_RESPONSE_HEADERS = {
+    CONTENT_TYPE_HEADER_KEY => HTML_TYPE
+  }
+
+  NOT_FOUND = 'Not Found'.freeze
+
+end
+
+require 'angelo/version'
+require 'angelo/params_parser'
+require 'angelo/server'
+require 'angelo/base'
+require 'angelo/responder'
+require 'angelo/responder/websocket'

metadata

@@ -0,0 +1,79 @@
+--- !ruby/object:Gem::Specification
+name: angelo
+version: !ruby/object:Gem::Version
+  version: 0.0.4
+  prerelease: 
+platform: ruby
+authors:
+- Kenichi Nakamura
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-10-31 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: reel
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: A Sinatra-esque DSL for Reel
+email:
+- kenichi.nakamura@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- CHANGELOG
+- Gemfile
+- LICENSE
+- README.md
+- angelo.gemspec
+- example/foo/foo.rb
+- example/foo/views/index.html.erb
+- example/foo/views/layout.html.erb
+- lib/angelo.rb
+- lib/angelo/base.rb
+- lib/angelo/params_parser.rb
+- lib/angelo/responder.rb
+- lib/angelo/responder/websocket.rb
+- lib/angelo/server.rb
+- lib/angelo/tilt/erb.rb
+- lib/angelo/version.rb
+homepage: https://github.com/kenichi/angelo
+licenses:
+- apache
+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.23
+signing_key: 
+specification_version: 3
+summary: A Sinatra-esque DSL for Reel
+test_files: []