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
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
|
module CodeRay
module Scanners
# A scanner for Sass.
class Sass < CSS
register_for :sass
file_extension 'sass'
protected
def setup
@state = :initial
end
def scan_tokens encoder, options
states = Array(options[:state] || @state).dup
encoder.begin_group :string if states.last == :sqstring || states.last == :dqstring
until eos?
if bol? && (match = scan(/(?>( +)?(\/[\*\/])(.+)?)(?=\n)/))
encoder.text_token self[1], :space if self[1]
encoder.begin_group :comment
encoder.text_token self[2], :delimiter
encoder.text_token self[3], :content if self[3]
if match = scan(/(?:\n+#{self[1]} .*)+/)
encoder.text_token match, :content
end
encoder.end_group :comment
elsif match = scan(/\n|[^\n\S]+\n?/)
encoder.text_token match, :space
if match.index(/\n/)
value_expected = false
states.pop if states.last == :include
end
elsif states.last == :sass_inline && (match = scan(/\}/))
encoder.text_token match, :inline_delimiter
encoder.end_group :inline
states.pop
elsif case states.last
when :initial, :media, :sass_inline
if match = scan(/(?>#{RE::Ident})(?!\()/ox)
encoder.text_token match, value_expected ? :value : (check(/.*:(?![a-z])/) ? :key : :tag)
next
elsif !value_expected && (match = scan(/\*/))
encoder.text_token match, :tag
next
elsif match = scan(RE::Class)
encoder.text_token match, :class
next
elsif match = scan(RE::Id)
encoder.text_token match, :id
next
elsif match = scan(RE::PseudoClass)
encoder.text_token match, :pseudo_class
next
elsif match = scan(RE::AttributeSelector)
# TODO: Improve highlighting inside of attribute selectors.
encoder.text_token match[0,1], :operator
encoder.text_token match[1..-2], :attribute_name if match.size > 2
encoder.text_token match[-1,1], :operator if match[-1] == ?]
next
elsif match = scan(/(\=|@mixin +)#{RE::Ident}/o)
encoder.text_token match, :function
next
elsif match = scan(/@import\b/)
encoder.text_token match, :directive
states << :include
next
elsif match = scan(/@media\b/)
encoder.text_token match, :directive
# states.push :media_before_name
next
end
when :block
if match = scan(/(?>#{RE::Ident})(?!\()/ox)
if value_expected
encoder.text_token match, :value
else
encoder.text_token match, :key
end
next
end
when :sqstring, :dqstring
if match = scan(states.last == :sqstring ? /(?:[^\n\'\#]+|\\\n|#{RE::Escape}|#(?!\{))+/o : /(?:[^\n\"\#]+|\\\n|#{RE::Escape}|#(?!\{))+/o)
encoder.text_token match, :content
elsif match = scan(/['"]/)
encoder.text_token match, :delimiter
encoder.end_group :string
states.pop
elsif match = scan(/#\{/)
encoder.begin_group :inline
encoder.text_token match, :inline_delimiter
states.push :sass_inline
elsif match = scan(/ \\ | $ /x)
encoder.end_group states.last
encoder.text_token match, :error unless match.empty?
states.pop
else
raise_inspect "else case #{states.last} reached; %p not handled." % peek(1), encoder
end
when :include
if match = scan(/[^\s'",]+/)
encoder.text_token match, :include
next
end
else
#:nocov:
raise_inspect 'Unknown state: %p' % [states.last], encoder
#:nocov:
end
elsif match = scan(/\$#{RE::Ident}/o)
encoder.text_token match, :variable
next
elsif match = scan(/&/)
encoder.text_token match, :local_variable
elsif match = scan(/\+#{RE::Ident}/o)
encoder.text_token match, :include
value_expected = true
elsif match = scan(/\/\*(?:.*?\*\/|.*)|\/\/.*/)
encoder.text_token match, :comment
elsif match = scan(/#\{/)
encoder.begin_group :inline
encoder.text_token match, :inline_delimiter
states.push :sass_inline
elsif match = scan(/\{/)
value_expected = false
encoder.text_token match, :operator
states.push :block
elsif match = scan(/\}/)
value_expected = false
encoder.text_token match, :operator
if states.last == :block || states.last == :media
states.pop
end
elsif match = scan(/['"]/)
encoder.begin_group :string
encoder.text_token match, :delimiter
if states.include? :sass_inline
# no nesting, just scan the string until delimiter
content = scan_until(/(?=#{match}|\}|\z)/)
encoder.text_token content, :content unless content.empty?
encoder.text_token match, :delimiter if scan(/#{match}/)
encoder.end_group :string
else
states.push match == "'" ? :sqstring : :dqstring
end
elsif match = scan(/#{RE::Function}/o)
encoder.begin_group :function
start = match[/^[-\w]+\(/]
encoder.text_token start, :delimiter
if match[-1] == ?)
encoder.text_token match[start.size..-2], :content
encoder.text_token ')', :delimiter
else
encoder.text_token match[start.size..-1], :content if start.size < match.size
end
encoder.end_group :function
elsif match = scan(/[a-z][-a-z_]*(?=\()/o)
encoder.text_token match, :predefined
elsif match = scan(/(?: #{RE::Dimension} | #{RE::Percentage} | #{RE::Num} )/ox)
encoder.text_token match, :float
elsif match = scan(/#{RE::HexColor}/o)
encoder.text_token match, :color
elsif match = scan(/! *(?:important|optional)/)
encoder.text_token match, :important
elsif match = scan(/(?:rgb|hsl)a?\([^()\n]*\)?/)
encoder.text_token match, :color
elsif match = scan(/@else if\b|#{RE::AtKeyword}/o)
encoder.text_token match, :directive
value_expected = true
elsif match = scan(/ == | != | [-+*\/>~:;,.=()] /x)
if match == ':'
value_expected = true
elsif match == ';'
value_expected = false
end
encoder.text_token match, :operator
else
encoder.text_token getch, :error
end
end
states.pop if states.last == :include
if options[:keep_state]
@state = states.dup
end
while state = states.pop
if state == :sass_inline
encoder.end_group :inline
elsif state == :sqstring || state == :dqstring
encoder.end_group :string
end
end
encoder
end
end
end
end
|
