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
|
# -*- coding: utf-8 -*- #
# frozen_string_literal: true
module Rouge
module Lexers
class XML < RegexLexer
title "XML"
desc %q(<desc for="this-lexer">XML</desc>)
tag 'xml'
filenames '*.xml', '*.xsl', '*.rss', '*.xslt', '*.xsd', '*.wsdl', '*.svg',
'*.plist'
mimetypes 'text/xml', 'application/xml', 'image/svg+xml',
'application/rss+xml', 'application/atom+xml'
# Documentation: https://www.w3.org/TR/xml11/#charsets and https://www.w3.org/TR/xml11/#sec-suggested-names
def self.detect?(text)
return false if text.doctype?(/html/)
return true if text =~ /\A<\?xml\b/
return true if text.doctype?
end
state :root do
rule %r/[^<&]+/, Text
rule %r/&\S*?;/, Name::Entity
rule %r/<!\[CDATA\[.*?\]\]\>/, Comment::Preproc
rule %r/<!--/, Comment, :comment
rule %r/<\?.*?\?>/, Comment::Preproc
rule %r/<![^>]*>/, Comment::Preproc
# open tags
rule %r(<\s*[\p{L}:_][\p{Word}\p{Cf}:.·-]*)m, Name::Tag, :tag
# self-closing tags
rule %r(<\s*/\s*[\p{L}:_][\p{Word}\p{Cf}:.·-]*\s*>)m, Name::Tag
end
state :comment do
rule %r/[^-]+/m, Comment
rule %r/-->/, Comment, :pop!
rule %r/-/, Comment
end
state :tag do
rule %r/\s+/m, Text
rule %r/[\p{L}:_][\p{Word}\p{Cf}:.·-]*\s*=/m, Name::Attribute, :attr
rule %r(/?\s*>), Name::Tag, :pop!
end
state :attr do
rule %r/\s+/m, Text
rule %r/".*?"|'.*?'|[^\s>]+/m, Str, :pop!
end
end
end
end
|
