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
|
# -*- coding: utf-8 -*- #
# frozen_string_literal: true
module Rouge
module Lexers
class P4 < RegexLexer
tag 'p4'
title 'P4'
desc 'The P4 programming language'
filenames '*.p4'
mimetypes 'text/x-p4'
def self.keywords
@keywords ||= %w(
abstract action actions apply const default default_action else enum
entries extern exit if in inout key list out package packet_in
packet_out return size select switch this transition tuple type
typedef
)
end
def self.operators
@operators ||= %w(
\|\+\| \|-\| \? \& \&\&\& < > << >> \* \| ~ \^ - \+ /
\# \. = != <= >= \+\+
)
end
def self.decls
@decls ||= %w(
control header header_union parser state struct table
value_set
)
end
def self.builtins
@builtins ||= %w(
bit bool error extract int isValid setValid setInvalid match_kind
string varbit verify void
)
end
state :whitespace do
rule %r/\s+/m, Text
end
state :comment do
rule %r((//).*$\n?), Comment::Single
rule %r/\/\*(?:(?!\*\/).)*\*\//m, Comment::Multiline
end
state :number do
rule %r/([0-9]+[sw])?0[oO][0-7_]+/, Num
rule %r/([0-9]+[sw])?0[xX][0-9a-fA-F_]+/, Num
rule %r/([0-9]+[sw])?0[bB][01_]+/, Num
rule %r/([0-9]+[sw])?0[dD][0-9_]+/, Num
rule %r/([0-9]+[sw])?[0-9_]+/, Num
end
id = /[\p{XID_Start}_]\p{XID_Continue}*/
string_element = /\\"|[^"]/x
state :root do
mixin :whitespace
mixin :comment
rule %r/#\s*#{id}/, Comment::Preproc
rule %r/\b(?:#{P4.keywords.join('|')})\b/, Keyword
rule %r/\b(?:#{P4.decls.join('|')})\b/, Keyword::Declaration
rule %r/\b(?:#{P4.builtins.join('|')})\b/, Name::Builtin
rule %r/\b#{id}_[th]\b/x, Name::Class
rule %r/(?:#{P4.operators.join('|')})/x, Operator
rule %r/[(){}\[\]<>,:;\.]/, Punctuation
mixin :number
rule %r/@#{id}/x, Name::Label
rule %r/#{id}/x, Text
rule %r/"(?: #{string_element} )*"/x, Str::String
end
end
end
end
|
