minicontext 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 3921cd064245ac91d6458de058aae081017e91d0
+  data.tar.gz: 072368db78a1b5e9907feec2750fbd6d8620528f
+SHA512:
+  metadata.gz: dc9af6210e1cb9d3ef79387b8aae07fd8a8a55db807fe401b66d8934a9a44db495b678275483177fad44a730eb02745830cd0949b759777a20604ba604a8734d
+  data.tar.gz: 0b61e2812b9fffe72ed7a9450288b15fd7bfa77c7fa63d54f2cf2f8ab52ca2d9a27ae76111e27a4d46247a2d9e78fca9a96517340e266ecb5e2a0d21cd0dd1f8

data/.gitignore

@@ -0,0 +1,10 @@
+*.gem
+*.swp
+.ruby-version
+.bundle
+.DS_Store
+Gemfile.lock
+coverage
+pkg
+vendor/bundle
+tmp

data/.travis.yml

@@ -0,0 +1,4 @@
+language: ruby
+rvm:
+  - 2.2.2
+before_install: gem install bundler -v 1.10.6

data/CODE_OF_CONDUCT.md

@@ -0,0 +1,13 @@
+# Contributor Code of Conduct
+
+As contributors and maintainers of this project, we pledge to respect all people who contribute through reporting issues, posting feature requests, updating documentation, submitting pull requests or patches, and other activities.
+
+We are committed to making participation in this project a harassment-free experience for everyone, regardless of level of experience, gender, gender identity and expression, sexual orientation, disability, personal appearance, body size, race, ethnicity, age, or religion.
+
+Examples of unacceptable behavior by participants include the use of sexual language or imagery, derogatory comments or personal attacks, trolling, public or private harassment, insults, or other unprofessional conduct.
+
+Project maintainers have the right and responsibility to remove, edit, or reject comments, commits, code, wiki edits, issues, and other contributions that are not aligned to this Code of Conduct. Project maintainers who do not follow the Code of Conduct may be removed from the project team.
+
+Instances of abusive, harassing, or otherwise unacceptable behavior may be reported by opening an issue or contacting one or more of the project maintainers.
+
+This Code of Conduct is adapted from the [Contributor Covenant](http://contributor-covenant.org), version 1.0.0, available at [http://contributor-covenant.org/version/1/0/0/](http://contributor-covenant.org/version/1/0/0/)

data/Gemfile

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

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2015 daisuko
+
+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,24 @@
+# Minicontext
+
+Mimicontext is a DSL kit.
+
+## Installation
+
+` Gemfile`:
+
+```ruby
+gem 'minicontext'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install minicontext
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](http://opensource.org/licenses/MIT).
+

data/Rakefile

@@ -0,0 +1,9 @@
+require "bundler/gem_tasks"
+require "rake/testtask"
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << "spec"
+  t.test_files = FileList['spec/**/*_spec.rb']
+end
+
+task :default => :test

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "minicontext"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start

data/bin/setup

@@ -0,0 +1,7 @@
+#!/bin/bash
+set -euo pipefail
+IFS=$'\n\t'
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/lib/minicontext/context.rb

@@ -0,0 +1,86 @@
+module Minicontext
+  class Context
+    KEYWORD = %i(before after)
+    COMPOSE = -> (f, g) { -> (env) { f.(g.(env)) } }
+    RELAY   = -> (env) { env }
+
+    def initialize(parent = nil)
+      @vars   = {}
+      @parent = parent
+    end
+
+    def context(name, &block)
+      raise AssignError, name if KEYWORD.include?(name)
+      raise AssignError, name if (val = @vars[name]) && Proc === val
+
+      val ? val.action(&block) : define_context(name, &block)
+    end
+
+    def task(name, &block)
+      self[name] = -> (env) { env.(self, &block) }
+    end
+
+    def let(name, &block)
+      raise AssignError, name if KEYWORD.include?(name)
+
+      self[name] = -> (env) do
+        env.memoized.fetch(name) do
+          env.memoized[name] = env.(self, &block)
+        end
+      end
+    end
+
+    %i(before after).each do |name|
+      define_method(name) {|&block| task name, &block}
+    end
+
+    def action(&block)
+      instance_eval &block
+    end
+
+    def load(filename)
+      instance_eval open(filename) {|f| f.read}, filename
+    end
+
+    def call(name)
+      Proc === (val = @vars[name]) ? apply(name) : val
+    end
+
+    def lookup(name)
+      Proc === (val = @vars[name]) ? val : (@parent && @parent.lookup(name))
+    end
+
+    def [](name)
+      router[name]
+    end
+
+    def []=(name, val)
+      raise AssignError, name if @vars[name]
+
+      @vars[name] = val
+    end
+
+    private
+
+    def define_context(name, &block)
+      self.class.new(self).tap do |ctx|
+        self[name] = ctx
+        ctx.action &block
+      end
+    end
+
+    def apply(name)
+      f = compose(@vars[name])
+
+      @parent ? @parent.send(:compose, f) : f
+    end
+
+    def compose(f)
+      COMPOSE.(@vars[:after] || RELAY, COMPOSE.(f, @vars[:before] || RELAY))
+    end
+
+    def router
+      Router::Maybe.new(self)
+    end
+  end
+end

data/lib/minicontext/environment.rb

@@ -0,0 +1,46 @@
+module Minicontext
+  class Environment
+    attr_reader :request, :response, :memoized
+
+    def initialize(request, response = nil)
+      @request  = request
+      @response = response
+      @memoized = {}
+    end
+
+    def bind(val)
+      dup.tap { |env| env.response = val }
+    end
+
+    def response=(val)
+      raise AssignError, 'response' if response
+
+      @response = val
+    end
+
+    def halt(*args)
+      Halt.new(*args)
+    end
+
+    def fetch(name)
+      (f = @context.lookup(name)) && f.(self).response
+    end
+
+    def action(&block)
+      instance_eval(&block)
+    end
+
+    def call(context, &block)
+      @context = context
+
+      bind(Halt === @response ? @response : action(&block))
+    end
+
+    private
+
+    def initialize_copy(obj)
+      @context  = nil
+      @response = nil
+    end
+  end
+end

data/lib/minicontext/halt.rb

@@ -0,0 +1,7 @@
+module Minicontext
+  class Halt
+    def initialize(*args)
+      @args = args
+    end
+  end
+end

data/lib/minicontext/router.rb

@@ -0,0 +1,43 @@
+module Minicontext
+  class Router
+    class Maybe
+      def initialize(val)
+        @val = val
+      end
+
+      def value
+        @val
+      end
+
+      def [](name)
+        klass = case val = @val.(name)
+                when Context then Maybe
+                when Proc    then Just
+                else              Noting
+                end
+
+        klass.new(val)
+      end
+    end
+
+    class Just < Maybe
+      def [](name)
+        Noting.new
+      end
+    end
+
+    class Noting < Maybe
+      def initialize(val = nil)
+        @val = val
+      end
+
+      def [](name)
+        self
+      end
+
+      def value
+        nil
+      end
+    end
+  end
+end

data/lib/minicontext/version.rb

@@ -0,0 +1,3 @@
+module Minicontext
+  VERSION = "0.1.0"
+end

data/lib/minicontext.rb

@@ -0,0 +1,10 @@
+require "minicontext/version"
+
+module Minicontext
+  class AssignError < StandardError; end
+end
+
+require "minicontext/context"
+require "minicontext/environment"
+require "minicontext/router"
+require "minicontext/halt"

data/minicontext.gemspec

@@ -0,0 +1,24 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'minicontext/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "minicontext"
+  spec.version       = Minicontext::VERSION
+  spec.authors       = ["daisuko"]
+  spec.email         = ["striker.daisuko@gmail.com"]
+
+  spec.summary       = %q{Minicontext is a DSL Kit}
+  spec.homepage      = "https://github.com/daisuko/minicontext"
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files -z`.split("\x0").reject do |f|
+                         f.match(%r{^(test|spec|features)/})
+                       end
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.10"
+  spec.add_development_dependency "rake", "~> 10.0"
+  spec.add_development_dependency "minitest"
+end

metadata

@@ -0,0 +1,102 @@
+--- !ruby/object:Gem::Specification
+name: minicontext
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- daisuko
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-11-07 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.10'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.10'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+- !ruby/object:Gem::Dependency
+  name: minitest
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: 
+email:
+- striker.daisuko@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".travis.yml"
+- CODE_OF_CONDUCT.md
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- lib/minicontext.rb
+- lib/minicontext/context.rb
+- lib/minicontext/environment.rb
+- lib/minicontext/halt.rb
+- lib/minicontext/router.rb
+- lib/minicontext/version.rb
+- minicontext.gemspec
+homepage: https://github.com/daisuko/minicontext
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.5
+signing_key: 
+specification_version: 4
+summary: Minicontext is a DSL Kit
+test_files: []