andyjeffries-journey 1.0.0

data/.autotest

@@ -0,0 +1,8 @@
+# -*- ruby -*-
+
+require 'autotest/restart'
+
+Autotest.add_hook :initialize do |at|
+  at.testlib          = 'minitest/autorun'
+  at.find_directories = ARGV unless ARGV.empty?
+end

data/CHANGELOG.rdoc

@@ -0,0 +1,6 @@
+=== 1.0.0 / 2011-03-08
+
+* 1 major enhancement
+
+  * Birthday!
+

data/Gemfile

@@ -0,0 +1,11 @@
+# -*- ruby -*-
+
+# DO NOT EDIT THIS FILE. Instead, edit Rakefile, and run `rake bundler:gemfile`.
+
+source :gemcutter
+
+
+gem "minitest", "~>2.5", :group => [:development, :test]
+gem "hoe", "~>2.10", :group => [:development, :test]
+
+# vim: syntax=ruby

data/Manifest.txt

@@ -0,0 +1,49 @@
+.autotest
+CHANGELOG.rdoc
+Gemfile
+Manifest.txt
+README.rdoc
+Rakefile
+journey.gemspec
+lib/journey.rb
+lib/journey/backwards.rb
+lib/journey/core-ext/hash.rb
+lib/journey/formatter.rb
+lib/journey/gtg/builder.rb
+lib/journey/gtg/simulator.rb
+lib/journey/gtg/transition_table.rb
+lib/journey/nfa/builder.rb
+lib/journey/nfa/dot.rb
+lib/journey/nfa/simulator.rb
+lib/journey/nfa/transition_table.rb
+lib/journey/nodes/node.rb
+lib/journey/parser.rb
+lib/journey/parser.y
+lib/journey/parser_extras.rb
+lib/journey/path/pattern.rb
+lib/journey/route.rb
+lib/journey/router.rb
+lib/journey/router/strexp.rb
+lib/journey/router/utils.rb
+lib/journey/routes.rb
+lib/journey/scanner.rb
+lib/journey/visitors.rb
+lib/journey/visualizer/d3.min.js
+lib/journey/visualizer/fsm.css
+lib/journey/visualizer/fsm.js
+lib/journey/visualizer/index.html.erb
+lib/journey/visualizer/reset.css
+test/gtg/test_builder.rb
+test/gtg/test_transition_table.rb
+test/helper.rb
+test/nfa/test_simulator.rb
+test/nfa/test_transition_table.rb
+test/nodes/test_symbol.rb
+test/path/test_pattern.rb
+test/route/definition/test_parser.rb
+test/route/definition/test_scanner.rb
+test/router/test_strexp.rb
+test/router/test_utils.rb
+test/test_route.rb
+test/test_router.rb
+test/test_routes.rb

data/README.rdoc

@@ -0,0 +1,48 @@
+= Journey
+
+* http://github.com/tenderlove/journey
+
+== DESCRIPTION:
+
+Journey is a router.  It routes requests.
+
+== FEATURES/PROBLEMS:
+
+* Designed for rails
+
+== SYNOPSIS:
+
+  Too complex right now. :(
+
+== REQUIREMENTS:
+
+* None
+
+== INSTALL:
+
+* gem install journey
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2011 Aaron Patterson
+
+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,31 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+
+Hoe.plugins.delete :rubyforge
+Hoe.plugin :minitest
+Hoe.plugin :gemspec # `gem install hoe-gemspec`
+Hoe.plugin :git     # `gem install hoe-git`
+Hoe.plugin :bundler # `gem install hoe-bundler`
+
+Hoe.spec 'andyjeffries-journey' do
+  developer('Aaron Patterson', 'aaron@tenderlovemaking.com')
+  self.readme_file      = 'README.rdoc'
+  self.history_file     = 'CHANGELOG.rdoc'
+  self.extra_rdoc_files = FileList['*.rdoc']
+  self.extra_dev_deps += [
+    ["racc",            ">= 1.4.6"],
+    ["json"],
+  ]
+end
+
+rule '.rb' => '.y' do |t|
+  sh "racc -l -o #{t.name} #{t.source}"
+end
+
+task :compile => "lib/journey/parser.rb"
+
+Rake::Task[:test].prerequisites.unshift "lib/journey/parser.rb"
+
+# vim: syntax=ruby

data/journey.gemspec

@@ -0,0 +1,42 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = "andyjeffries-journey"
+  s.version = "1.0.0.20111022124133"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Aaron Patterson", "Andy Jeffries"]
+  s.date = "2011-10-22"
+  s.description = "Journey is a router.  It routes requests."
+  s.email = ["aaron@tenderlovemaking.com"]
+  s.extra_rdoc_files = ["Manifest.txt", "CHANGELOG.rdoc", "README.rdoc"]
+  s.files = [".autotest", "CHANGELOG.rdoc", "Gemfile", "Manifest.txt", "README.rdoc", "Rakefile", "journey.gemspec", "lib/journey.rb", "lib/journey/backwards.rb", "lib/journey/core-ext/hash.rb", "lib/journey/formatter.rb", "lib/journey/gtg/builder.rb", "lib/journey/gtg/simulator.rb", "lib/journey/gtg/transition_table.rb", "lib/journey/nfa/builder.rb", "lib/journey/nfa/dot.rb", "lib/journey/nfa/simulator.rb", "lib/journey/nfa/transition_table.rb", "lib/journey/nodes/node.rb", "lib/journey/parser.rb", "lib/journey/parser.y", "lib/journey/parser_extras.rb", "lib/journey/path/pattern.rb", "lib/journey/route.rb", "lib/journey/router.rb", "lib/journey/router/strexp.rb", "lib/journey/router/utils.rb", "lib/journey/routes.rb", "lib/journey/scanner.rb", "lib/journey/visitors.rb", "lib/journey/visualizer/d3.min.js", "lib/journey/visualizer/fsm.css", "lib/journey/visualizer/fsm.js", "lib/journey/visualizer/index.html.erb", "lib/journey/visualizer/reset.css", "test/gtg/test_builder.rb", "test/gtg/test_transition_table.rb", "test/helper.rb", "test/nfa/test_simulator.rb", "test/nfa/test_transition_table.rb", "test/nodes/test_symbol.rb", "test/path/test_pattern.rb", "test/route/definition/test_parser.rb", "test/route/definition/test_scanner.rb", "test/router/test_strexp.rb", "test/router/test_utils.rb", "test/test_route.rb", "test/test_router.rb", "test/test_routes.rb", ".gemtest"]
+  s.homepage = "http://github.com/tenderlove/journey"
+  s.rdoc_options = ["--main", "README.rdoc"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = "journey"
+  s.rubygems_version = "1.8.11"
+  s.summary = "Journey is a router"
+  s.test_files = ["test/gtg/test_builder.rb", "test/gtg/test_transition_table.rb", "test/nfa/test_simulator.rb", "test/nfa/test_transition_table.rb", "test/nodes/test_symbol.rb", "test/path/test_pattern.rb", "test/route/definition/test_parser.rb", "test/route/definition/test_scanner.rb", "test/router/test_strexp.rb", "test/router/test_utils.rb", "test/test_route.rb", "test/test_router.rb", "test/test_routes.rb"]
+
+  if s.respond_to? :specification_version then
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<minitest>, ["~> 2.6"])
+      s.add_development_dependency(%q<racc>, [">= 1.4.6"])
+      s.add_development_dependency(%q<json>, [">= 0"])
+      s.add_development_dependency(%q<hoe>, ["~> 2.12"])
+    else
+      s.add_dependency(%q<minitest>, ["~> 2.6"])
+      s.add_dependency(%q<racc>, [">= 1.4.6"])
+      s.add_dependency(%q<json>, [">= 0"])
+      s.add_dependency(%q<hoe>, ["~> 2.12"])
+    end
+  else
+    s.add_dependency(%q<minitest>, ["~> 2.6"])
+    s.add_dependency(%q<racc>, [">= 1.4.6"])
+    s.add_dependency(%q<json>, [">= 0"])
+    s.add_dependency(%q<hoe>, ["~> 2.12"])
+  end
+end

data/lib/journey/backwards.rb

@@ -0,0 +1,5 @@
+module Rack
+  Mount = Journey::Router
+  Mount::RouteSet = Journey::Router
+  Mount::RegexpWithNamedGroups = Journey::Path::Pattern
+end

data/lib/journey/core-ext/hash.rb

@@ -0,0 +1,11 @@
+# :stopdoc:
+if RUBY_VERSION < '1.9'
+class Hash
+  def keep_if
+    each do |k,v|
+      delete(k) unless yield(k,v)
+    end
+  end
+end
+end
+# :startdoc:

data/lib/journey/formatter.rb

@@ -0,0 +1,129 @@
+module Journey
+  ###
+  # The Formatter class is used for formatting URLs.  For example, parameters
+  # passed to +url_for+ in rails will eventually call Formatter#generate
+  class Formatter
+    attr_reader :routes
+
+    def initialize routes
+      @routes = routes
+      @cache  = nil
+    end
+
+    def generate key, name, options, recall = {}, parameterize = nil
+      constraints = recall.merge options
+
+      match_route(name, constraints) do |route|
+        data = constraints.dup
+
+        keys_to_keep = route.parts.reverse.drop_while { |part|
+          !options.key?(part) || (options[part] || recall[part]).nil?
+        } | route.required_parts
+
+        (data.keys - keys_to_keep).each do |bad_key|
+          data.delete bad_key
+        end
+
+        parameterized_parts = data.dup
+
+        if parameterize
+          parameterized_parts.each do |k,v|
+            parameterized_parts[k] = parameterize.call(k, v)
+          end
+        end
+
+        parameterized_parts.keep_if { |_,v| v  }
+
+        next unless verify_required_parts!(route, parameterized_parts)
+
+        z = Hash[options.to_a - data.to_a - route.defaults.to_a]
+
+        return [route.format(parameterized_parts), z]
+      end
+
+      raise Router::RoutingError
+    end
+
+    def clear
+      @cache = nil
+    end
+
+    private
+    def named_routes
+      routes.named_routes
+    end
+
+    def match_route name, options
+      if named_routes.key? name
+        yield named_routes[name]
+      else
+        #routes = possibles(@cache, options.to_a)
+        routes = non_recursive(cache, options.to_a)
+
+        hash = routes.group_by { |_, r|
+          r.score options
+        }
+
+        hash.keys.sort.reverse_each do |score|
+          next if score < 0
+
+          hash[score].sort_by { |i,_| i }.each do |_,route|
+            yield route
+          end
+        end
+      end
+    end
+
+    def non_recursive cache, options
+      routes = []
+      stack  = [cache]
+
+      while stack.any?
+        c = stack.shift
+        routes.concat c[:___routes] if c.key? :___routes
+
+        options.each do |pair|
+          stack << c[pair] if c.key? pair
+        end
+      end
+
+      routes
+    end
+
+    def possibles cache, options, depth = 0
+      cache.fetch(:___routes) { [] } + options.find_all { |pair|
+        cache.key? pair
+      }.map { |pair|
+        possibles(cache[pair], options, depth + 1)
+      }.flatten(1)
+    end
+
+    def verify_required_parts! route, parts
+      tests = route.path.requirements
+      route.required_parts.all? { |key|
+        if tests.key? key
+          /\A#{tests[key]}\Z/ === parts[key]
+        else
+          true
+        end
+      }
+    end
+
+    def build_cache
+      kash = {}
+      routes.each_with_index do |route, i|
+        money = kash
+        route.required_defaults.each do |tuple|
+          hash = (money[tuple] ||= {})
+          money = hash
+        end
+        (money[:___routes] ||= []) << [i, route]
+      end
+      kash
+    end
+
+    def cache
+      @cache ||= build_cache
+    end
+  end
+end

data/lib/journey/gtg/builder.rb

@@ -0,0 +1,159 @@
+require 'journey/gtg/transition_table'
+
+module Journey
+  module GTG
+    class Builder
+      DUMMY = Nodes::Literal.new Object.new # :nodoc:
+
+      attr_reader :root, :ast, :endpoints
+
+      def initialize root
+        @root         = root
+        @ast          = Nodes::Cat.new root, DUMMY
+        @followpos    = nil
+      end
+
+      def transition_table
+        dtrans   = TransitionTable.new
+        marked   = {}
+        state_id = Hash.new { |h,k| h[k] = h.length }
+
+        start   = firstpos(root)
+        dstates = [start]
+        until dstates.empty?
+          s = dstates.shift
+          next if marked[s]
+          marked[s] = true # mark s
+
+          s.group_by { |state| symbol(state) }.each do |sym, ps|
+            u = ps.map { |l| followpos(l) }.flatten
+            next if u.empty?
+
+            if u.uniq == [DUMMY]
+              from = state_id[s]
+              to   = state_id[Object.new]
+              dtrans[from, to] = sym
+
+              dtrans.add_accepting to
+              ps.each { |state| dtrans.add_memo to, state.memo }
+            else
+              dtrans[state_id[s], state_id[u]] = sym
+
+              if u.include? DUMMY
+                to = state_id[u]
+
+                accepting = ps.find_all { |l| followpos(l).include? DUMMY }
+
+                accepting.each { |accepting_state|
+                  dtrans.add_memo to, accepting_state.memo
+                }
+
+                dtrans.add_accepting state_id[u]
+              end
+            end
+
+            dstates << u
+          end
+        end
+
+        dtrans
+      end
+
+      def nullable? node
+        case node
+        when Nodes::Group
+          true
+        when Nodes::Star
+          true
+        when Nodes::Or
+          node.children.any? { |c| nullable?(c) }
+        when Nodes::Cat
+          nullable?(node.left) && nullable?(node.right)
+        when Nodes::Terminal
+          !node.left
+        when Nodes::Unary
+          nullable? node.left
+        else
+          raise ArgumentError, 'unknown nullable: %s' % node.class.name
+        end
+      end
+
+      def firstpos node
+        case node
+        when Nodes::Star
+          firstpos(node.left)
+        when Nodes::Cat
+          if nullable? node.left
+            firstpos(node.left) | firstpos(node.right)
+          else
+            firstpos(node.left)
+          end
+        when Nodes::Or
+          node.children.map { |c| firstpos(c) }.flatten.uniq
+        when Nodes::Unary
+          firstpos(node.left)
+        when Nodes::Terminal
+          nullable?(node) ? [] : [node]
+        else
+          raise ArgumentError, 'unknown firstpos: %s' % node.class.name
+        end
+      end
+
+      def lastpos node
+        case node
+        when Nodes::Star
+          firstpos(node.left)
+        when Nodes::Or
+          node.children.map { |c| lastpos(c) }.flatten.uniq
+        when Nodes::Cat
+          if nullable? node.right
+            lastpos(node.left) | lastpos(node.right)
+          else
+            lastpos(node.right)
+          end
+        when Nodes::Terminal
+          nullable?(node) ? [] : [node]
+        when Nodes::Unary
+          lastpos(node.left)
+        else
+          raise ArgumentError, 'unknown lastpos: %s' % node.class.name
+        end
+      end
+
+      def followpos node
+        followpos_table[node]
+      end
+
+      private
+      def followpos_table
+        @followpos ||= build_followpos
+      end
+
+      def build_followpos
+        table = Hash.new { |h,k| h[k] = [] }
+        @ast.each do |n|
+          case n
+          when Nodes::Cat
+            lastpos(n.left).each do |i|
+              table[i] += firstpos(n.right)
+            end
+          when Nodes::Star
+            lastpos(n).each do |i|
+              table[i] += firstpos(n)
+            end
+          end
+        end
+        table
+      end
+
+      def symbol edge
+        case edge
+        when Journey::Nodes::Symbol
+          edge.regexp
+        else
+          edge.left
+        end
+      end
+    end
+  end
+end

data/lib/journey/gtg/simulator.rb

@@ -0,0 +1,44 @@
+require 'strscan'
+
+module Journey
+  module GTG
+    class MatchData
+      attr_reader :memos
+
+      def initialize memos
+        @memos = memos
+      end
+    end
+
+    class Simulator
+      attr_reader :tt
+
+      def initialize transition_table
+        @tt = transition_table
+      end
+
+      def simulate string
+        input = StringScanner.new string
+        state = [0]
+        until input.eos?
+          sym   = input.scan(/[\/\.\?]|[^\/\.\?]+/)
+          state = tt.move(state, sym)
+        end
+
+        acceptance_states = state.find_all { |s|
+          tt.accepting? s
+        }
+
+        return if acceptance_states.empty?
+
+        memos = acceptance_states.map { |x| tt.memo x }.flatten.compact
+
+        MatchData.new memos
+      end
+
+      alias :=~    :simulate
+      alias :match :simulate
+    end
+  end
+end
+