blob: d069bf0205b021edb6a9a9f384e3af2caf7f807a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
|
require 'action_dispatch/journey/visitors'
module ActionDispatch
module Journey # :nodoc:
module Nodes # :nodoc:
class Node # :nodoc:
include Enumerable
attr_accessor :left, :memo
def initialize(left)
@left = left
@memo = nil
end
def each(&block)
Visitors::Each::INSTANCE.accept(self, block)
end
def to_s
Visitors::String::INSTANCE.accept(self, '')
end
def to_dot
Visitors::Dot::INSTANCE.accept(self)
end
def to_sym
name.to_sym
end
def name
left.tr '*:'.freeze, ''.freeze
end
def type
raise NotImplementedError
end
def symbol?; false; end
def literal?; false; end
def terminal?; false; end
def star?; false; end
def cat?; false; end
end
class Terminal < Node # :nodoc:
alias :symbol :left
def terminal?; true; end
end
class Literal < Terminal # :nodoc:
def literal?; true; end
def type; :LITERAL; end
end
class Dummy < Literal # :nodoc:
def initialize(x = Object.new)
super
end
def literal?; false; end
end
%w{ Symbol Slash Dot }.each do |t|
class_eval <<-eoruby, __FILE__, __LINE__ + 1
class #{t} < Terminal;
def type; :#{t.upcase}; end
end
eoruby
end
class Symbol < Terminal # :nodoc:
attr_accessor :regexp
alias :symbol :regexp
attr_reader :name
DEFAULT_EXP = /[^\.\/\?]+/
def initialize(left)
super
@regexp = DEFAULT_EXP
@name = left.tr '*:'.freeze, ''.freeze
end
def default_regexp?
regexp == DEFAULT_EXP
end
def symbol?; true; end
end
class Unary < Node # :nodoc:
def children; [left] end
end
class Group < Unary # :nodoc:
def type; :GROUP; end
end
class Star < Unary # :nodoc:
def star?; true; end
def type; :STAR; end
def name
left.name.tr '*:', ''
end
end
class Binary < Node # :nodoc:
attr_accessor :right
def initialize(left, right)
super(left)
@right = right
end
def children; [left, right] end
end
class Cat < Binary # :nodoc:
def cat?; true; end
def type; :CAT; end
end
class Or < Node # :nodoc:
attr_reader :children
def initialize(children)
@children = children
end
def type; :OR; end
end
end
end
end
|