/usr/lib/ruby/vendor_ruby/rugments/lexers/lua.rb is in ruby-rugments 1.0.0~beta8-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | module Rugments
module Lexers
class Lua < RegexLexer
title 'Lua'
desc 'Lua (http://www.lua.org)'
tag 'lua'
filenames '*.lua', '*.wlua'
mimetypes 'text/x-lua', 'application/x-lua'
def initialize(opts = {})
@function_highlighting = opts.delete(:function_highlighting) { true }
@disabled_modules = opts.delete(:disabled_modules) { [] }
super(opts)
end
def self.analyze_text(text)
return 1 if text.shebang? 'lua'
end
def self.builtins
load Pathname.new(__FILE__).dirname.join('lua/builtins.rb')
builtins
end
def builtins
return [] unless @function_highlighting
@builtins ||= Set.new.tap do |builtins|
self.class.builtins.each do |mod, fns|
next if @disabled_modules.include? mod
builtins.merge(fns)
end
end
end
state :root do
# lua allows a file to start with a shebang
rule %r{#!(.*?)$}, Comment::Preproc
rule //, Text, :base
end
state :base do
rule %r{--\[(=*)\[.*?\]\1\]}m, Comment::Multiline
rule %r{--.*$}, Comment::Single
rule %r{(?i)(\d*\.\d+|\d+\.\d*)(e[+-]?\d+)?'}, Num::Float
rule %r{(?i)\d+e[+-]?\d+}, Num::Float
rule %r{(?i)0x[0-9a-f]*}, Num::Hex
rule %r{\d+}, Num::Integer
rule %r{\n}, Text
rule %r{[^\S\n]}, Text
# multiline strings
rule %r{\[(=*)\[.*?\]\1\]}m, Str
rule %r{(==|~=|<=|>=|\.\.\.|\.\.|[=+\-*/%^<>#])}, Operator
rule %r([\[\]\{\}\(\)\.,:;]), Punctuation
rule %r{(and|or|not)\b}, Operator::Word
rule %r{(break|do|else|elseif|end|for|if|in|repeat|return|then|until|while)\b}, Keyword
rule %r{(local)\b}, Keyword::Declaration
rule %r{(true|false|nil)\b}, Keyword::Constant
rule %r{(function)\b}, Keyword, :function_name
rule %r{[A-Za-z_][A-Za-z0-9_]*(\.[A-Za-z_][A-Za-z0-9_]*)?} do |m|
name = m[0]
if self.builtins.include?(name)
token Name::Builtin
elsif name =~ /\./
a, b = name.split('.', 2)
token Name, a
token Punctuation, '.'
token Name, b
else
token Name
end
end
rule %r{'}, Str::Single, :escape_sqs
rule %r{"}, Str::Double, :escape_dqs
end
state :function_name do
rule /\s+/, Text
rule %r{(?:([A-Za-z_][A-Za-z0-9_]*)(\.))?([A-Za-z_][A-Za-z0-9_]*)} do
groups Name::Class, Punctuation, Name::Function
pop!
end
# inline function
rule %r{\(}, Punctuation, :pop!
end
state :escape_sqs do
mixin :string_escape
mixin :sqs
end
state :escape_dqs do
mixin :string_escape
mixin :dqs
end
state :string_escape do
rule %r(\\([abfnrtv\\"']|\d{1,3})), Str::Escape
end
state :sqs do
rule %r{'}, Str::Single, :pop!
rule %r{[^']+}, Str::Single
end
state :dqs do
rule %r{"}, Str::Double, :pop!
rule %r{[^"]+}, Str::Double
end
end
end
end
|