rouge 3.8.0 → 3.12.0

data/lib/rouge/lexers/minizinc.rb

@@ -0,0 +1,87 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+# Based on Chroma's MiniZinc lexer:
+# https://github.com/alecthomas/chroma/blob/5152194c717b394686d3d7a7e1946a360ec0728f/lexers/m/minizinc.go
+
+module Rouge
+  module Lexers
+    class MiniZinc < RegexLexer
+      title "MiniZinc"
+      desc "MiniZinc is a free and open-source constraint modeling language (minizinc.org)"
+      tag 'minizinc'
+      filenames '*.mzn', '*.fzn', '*.dzn'
+      mimetypes 'text/minizinc'
+
+      def self.builtins
+        @builtins = Set.new %w[
+          abort abs acosh array_intersect array_union array1d array2d array3d
+          array4d array5d array6d asin assert atan bool2int card ceil concat
+          cos cosh dom dom_array dom_size fix exp floor index_set
+          index_set_1of2 index_set_2of2 index_set_1of3 index_set_2of3
+          index_set_3of3 int2float is_fixed join lb lb_array length ln log log2
+          log10 min max pow product round set2array show show_int show_float
+          sin sinh sqrt sum tan tanh trace ub ub_array
+        ]
+      end
+
+      def self.keywords
+        @keywords = Set.new %w[
+          ann annotation any constraint else endif function for forall if
+          include list of op output minimize maximize par predicate record
+          satisfy solve test then type var where
+        ]
+      end
+
+      def self.keywords_type
+        @keywords_type ||= Set.new %w(
+          array set bool enum float int string tuple
+        )
+      end
+
+      def self.operators
+        @operators ||= Set.new %w(
+          in subset superset union diff symdiff intersect
+        )
+      end
+
+      id = /[$a-zA-Z_]\w*/
+
+      state :root do
+        rule %r(\s+)m, Text::Whitespace
+        rule %r(\\\n)m, Text::Whitespace
+        rule %r(%.*), Comment::Single
+        rule %r(/(\\\n)?[*](.|\n)*?[*](\\\n)?/)m, Comment::Multiline
+        rule %r/"(\\\\|\\"|[^"])*"/, Literal::String
+
+        rule %r(not|<->|->|<-|\\/|xor|/\\), Operator
+        rule %r(<|>|<=|>=|==|=|!=), Operator
+        rule %r(\+|-|\*|/|div|mod), Operator
+        rule %r(\\|\.\.|\+\+), Operator
+        rule %r([|()\[\]{},:;]), Punctuation
+        rule %r((true|false)\b), Keyword::Constant
+        rule %r(([+-]?)\d+(\.(?!\.)\d*)?([eE][-+]?\d+)?), Literal::Number
+
+        rule id do |m|
+          if self.class.keywords.include? m[0]
+            token Keyword
+          elsif self.class.keywords_type.include? m[0]
+            token Keyword::Type
+          elsif self.class.builtins.include? m[0]
+            token Name::Builtin
+          elsif self.class.operators.include? m[0]
+            token Operator
+          else
+            token Name::Other
+          end
+        end
+
+        rule %r(::\s*([^\W\d]\w*)(\s*\([^\)]*\))?), Name::Decorator
+        rule %r(\b([^\W\d]\w*)\b(\()) do
+          groups Name::Function, Punctuation
+        end
+        rule %r([^\W\d]\w*), Name::Other
+      end
+    end
+  end
+end

data/lib/rouge/lexers/perl.rb

@@ -127,7 +127,7 @@ module Rouge
         rule %r/(q|qq|qw|qr|qx)\(/, Str::Other, :rb_string
         rule %r/(q|qq|qw|qr|qx)\[/, Str::Other, :sb_string
         rule %r/(q|qq|qw|qr|qx)</, Str::Other, :lt_string
-        rule %r/(q|qq|qw|qr|qx)([^a-zA-Z0-9])(.|\n)*?\2/, Str::Other
+        rule %r/(q|qq|qw|qr|qx)(\W)(.|\n)*?\2/, Str::Other
 
         rule %r/package\s+/, Keyword, :modulename
         rule %r/sub\s+/, Keyword, :funcname

data/lib/rouge/lexers/q.rb

@@ -67,7 +67,7 @@ module Rouge
         end
 
         # White space and comments
-        rule(%r{[ \t\r]\/.*$}, Comment::Single)
+        rule(%r{\s+/.*}, Comment::Single)
         rule(/[ \t\r]+/, Text::Whitespace)
         rule(%r{^/$.*?^\\$}m, Comment::Multiline)
         rule(%r{^\/[^\n]*$(\n[^\S\n]+.*$)*}, Comment::Multiline)

data/lib/rouge/lexers/robot_framework.rb

@@ -0,0 +1,249 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    class RobotFramework < RegexLexer
+      tag 'robot_framework'
+      aliases 'robot', 'robot-framework'
+
+      title "Robot Framework"
+      desc 'Robot Framework is a generic open source automation testing framework (robotframework.org)'
+
+      filenames '*.robot'
+      mimetypes 'text/x-robot'
+
+      def initialize(opts = {})
+        super(opts)
+        @col = 0
+        @next = nil
+        @is_template = false
+      end
+
+      def self.settings_with_keywords
+        @settings_with_keywords ||= Set.new [
+          "library", "resource", "setup", "teardown", "template", "suite setup",
+          "suite teardown", "task setup", "task teardown", "task template",
+          "test setup", "test teardown", "test template", "variables"
+        ]
+      end
+      
+      def self.settings_with_args
+        @settings_with_args ||= Set.new [
+          "arguments", "default tags", "documentation", "force tags",
+          "metadata", "return", "tags", "timeout", "task timeout",
+          "test timeout"
+        ]
+      end
+
+      id = %r/(?:\\|[^|$@&% \t\n])+(?: (?:\\.|[^|$@&% \t\n])+)*/
+      bdd = %r/(?:Given|When|Then|And|But) /i
+      sep = %r/ +\| +|[ ]{2,}|\t+/
+
+      start do
+        push :prior_text
+      end
+
+      state :prior_text do
+        rule %r/^[^*].*/, Text
+        rule(//) { pop! }
+      end
+
+      # Mixins
+
+      state :whitespace do
+        rule %r/\s+/, Text::Whitespace
+      end
+
+      state :section_include do
+        mixin :end_section
+        mixin :sep
+        mixin :newline
+      end
+
+      state :end_section do
+        rule(/(?=^(?:\| )?\*)/) { pop! }
+      end
+
+      state :return do
+        rule(//) { pop! }
+      end
+
+      state :sep do
+        rule %r/\| /, Text::Whitespace
+
+        rule sep do
+          token Text::Whitespace
+          @col = @col + 1
+          if @next
+            push @next
+          elsif @is_template
+            push :args
+          elsif @col == 1
+            @next = :keyword
+            push :keyword
+          else
+            push :args
+          end
+          push :cell_start
+        end
+
+        rule %r/\.\.\. */ do
+          token Text::Whitespace
+          @col = @col + 1
+          push :args
+        end
+        
+        rule %r/ ?\|/, Text::Whitespace
+      end
+
+      state :newline do
+        rule %r/\n/ do
+          token Text::Whitespace
+          @col = 0
+          @next = nil
+          push :cell_start
+        end
+      end
+
+      # States
+
+      state :root do
+        mixin :whitespace
+
+        rule %r/^(?:\| )?\*[* ]*([A-Z]+(?: [A-Z]+)?).*/i do |m|
+          token Generic::Heading, m[0]
+          case m[1].chomp("s").downcase
+          when "setting" then push :section_settings
+          when "test case" then push :section_tests
+          when "task" then push :section_tasks
+          when "keyword" then push :section_keywords
+          when "variable" then push :section_variables
+          end
+        end
+      end
+
+      state :section_settings do
+        mixin :section_include
+
+        rule %r/([A-Z]+(?: [A-Z]+)?)(:?)/i do |m|
+          match = m[1].downcase
+          @next = if self.class.settings_with_keywords.include? match
+                    :keyword
+                  elsif self.class.settings_with_args.include? match
+                    :args
+                  end
+          groups Name::Builtin::Pseudo, Punctuation
+        end
+      end
+
+      state :section_tests do
+        mixin :section_include
+        
+        rule %r/[$@&%{}]+/, Name::Label
+        rule %r/( )(?![ |])/, Name::Label
+
+        rule id do
+          @is_template = false
+          token Name::Label
+        end
+      end
+
+      state :section_tasks do
+        mixin :section_tests
+      end
+
+      state :section_keywords do
+        mixin :section_include
+  
+        rule %r/[$@&%]\{/ do
+          token Name::Variable
+          push :var
+        end
+        
+        rule %r/[$@&%{}]+/, Name::Label
+        rule %r/( )(?![ |])/, Name::Label
+        
+        rule id, Name::Label
+      end
+
+      state :section_variables do
+        mixin :section_include
+
+        rule %r/[$@&%]\{/ do
+          token Name::Variable
+          @next = :args
+          push :var
+        end
+      end
+
+      state :cell_start do
+        rule %r/#.*/, Comment
+        mixin :return
+      end
+
+      state :keyword do
+        rule %r/(\[)([A-Z]+(?: [A-Z]+)?)(\])/i do |m|
+          groups Punctuation, Name::Builtin::Pseudo, Punctuation
+          
+          match = m[2].downcase
+          @is_template = true if match == "template"
+          if self.class.settings_with_keywords.include? match
+            @next = :keyword
+          elsif self.class.settings_with_args.include? match
+            @next = :args
+          end
+
+          pop!
+        end
+
+        rule %r/[$@&%]\{/ do
+          token Name::Variable
+          @next = :keyword unless @next.nil?
+          push :var
+        end
+
+        rule %r/FOR/i do
+          token Name::Function
+          @next = :keyword unless @next.nil?
+        end
+
+        rule %r/( )(?![ |])/, Name::Function
+
+        rule bdd, Name::Builtin
+        rule id do
+          token Name::Function
+          @next = nil
+        end
+
+        mixin :return
+      end
+
+      state :args do
+        rule %r/[$@&%]\{/ do
+          token Name::Variable
+          @next = :keyword unless @next.nil?
+          push :var
+        end
+
+        rule %r/[$@&%]+/, Str
+        rule %r/( )(?![ |])/, Str
+        rule id, Str
+        
+        mixin :return
+      end
+
+      state :var do
+        rule %r/(\})( )(=)/ do
+          groups Name::Variable, Text::Whitespace, Punctuation
+          pop!
+        end
+        rule %r/[$@&%]\{/, Name::Variable, :var
+        rule %r/[{\[]/, Name::Variable, :var
+        rule %r/[}\]]/, Name::Variable, :pop!
+        rule %r/[^$@&%{}\[\]]+/, Name::Variable
+        rule %r/\}\[/, Name::Variable
+      end
+    end
+  end
+end

data/lib/rouge/lexers/shell.rb

@@ -9,10 +9,12 @@ module Rouge
 
       tag 'shell'
       aliases 'bash', 'zsh', 'ksh', 'sh'
-      filenames '*.sh', '*.bash', '*.zsh', '*.ksh',
-                '.bashrc', '.zshrc', '.kshrc', '.profile', 'APKBUILD', 'PKGBUILD'
+      filenames '*.sh', '*.bash', '*.zsh', '*.ksh', '.bashrc', '.zshrc',
+                '.kshrc', '.profile', 'APKBUILD', 'PKGBUILD', '*.ebuild',
+                '*.eclass', '*.exheres-0', '*.exlib'
 
-      mimetypes 'application/x-sh', 'application/x-shellscript'
+      mimetypes 'application/x-sh', 'application/x-shellscript', 'text/x-sh',
+                'text/x-shellscript'
 
       def self.detect?(text)
         return true if text.shebang?(/(ba|z|k)?sh/)

data/lib/rouge/lexers/sparql.rb

@@ -0,0 +1,129 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    class SPARQL < RegexLexer
+      title "SPARQL"
+      desc "Semantic Query Language, for RDF data"
+      tag 'sparql'
+      filenames '*.rq'
+      mimetypes 'application/sparql-query'
+
+      def self.builtins
+        @builtins = Set.new %w[
+          ABS AVG BNODE BOUND CEIL COALESCE CONCAT CONTAINS COUNT DATATYPE DAY
+          ENCODE_FOR_URI FLOOR GROUP_CONCAT HOURS IF IRI isBLANK isIRI
+          isLITERAL isNUMERIC isURI LANG LANGMATCHES LCASE MAX MD5 MIN MINUTES
+          MONTH NOW RAND REGEX REPLACE ROUND SAMETERM SAMPLE SECONDS SEPARATOR
+          SHA1 SHA256 SHA384 SHA512 STR STRAFTER STRBEFORE STRDT STRENDS
+          STRLANG STRLEN STRSTARTS STRUUID SUBSTR SUM TIMEZONE TZ UCASE URI
+          UUID YEAR
+        ]
+      end
+
+      def self.keywords
+        @keywords = Set.new %w[
+          ADD ALL AS ASC ASK BASE BIND BINDINGS BY CLEAR CONSTRUCT COPY CREATE
+          DATA DEFAULT DELETE DESC DESCRIBE DISTINCT DROP EXISTS FILTER FROM
+          GRAPH GROUP BY HAVING IN INSERT LIMIT LOAD MINUS MOVE NAMED NOT
+          OFFSET OPTIONAL ORDER PREFIX SELECT REDUCED SERVICE SILENT TO UNDEF
+          UNION USING VALUES WHERE WITH
+        ]
+      end
+
+      state :root do
+        rule %r(\s+)m, Text::Whitespace
+        rule %r(#.*), Comment::Single
+        
+        rule %r("""), Str::Double, :string_double_literal
+        rule %r("), Str::Double, :string_double
+        rule %r('''), Str::Single, :string_single_literal
+        rule %r('), Str::Single, :string_single
+       
+        rule %r([$?]\w+), Name::Variable
+        rule %r((\w*:)(\w+)?) do |m|
+          token Name::Namespace, m[1]
+          token Str::Symbol, m[2]
+        end
+        rule %r(<[^>]*>), Name::Namespace
+        rule %r(true|false)i, Keyword::Constant
+        
+        rule %r([A-Z]\w+\b)i do |m|
+          if self.class.builtins.include? m[0].upcase
+            token Name::Builtin
+          elsif self.class.keywords.include? m[0].upcase
+            token Keyword
+          else
+            token Error
+          end
+        end
+
+        rule %r([+\-]?(?:\d+\.\d*|\.\d+)(?:[e][+\-]?[0-9]+)?)i, Num::Float
+        rule %r([+\-]?\d+), Num::Integer
+        rule %r([\]\[(){}.,;=]), Punctuation
+        rule %r([/?*+=!<>]|&&|\|\||\^\^), Operator
+      end
+
+      state :string_double_common do
+        mixin :string_escapes
+        rule %r(\\), Str::Double
+        rule %r([^"\\]+), Str::Double
+      end
+
+      state :string_double do
+        rule %r(") do
+          token Str::Double
+          goto :string_end
+        end
+        mixin :string_double_common
+      end
+
+      state :string_double_literal do
+        rule %r(""") do
+          token Str::Double
+          goto :string_end
+        end
+        rule %r("), Str::Double
+        mixin :string_double_common
+      end
+
+      state :string_single_common do
+        mixin :string_escapes
+        rule %r(\\), Str::Single
+        rule %r([^'\\]+), Str::Single
+      end
+
+      state :string_single do
+        rule %r(') do
+          token Str::Single
+          goto :string_end
+        end
+        mixin :string_single_common
+      end
+      
+      state :string_single_literal do
+        rule %r(''') do
+          token Str::Single
+          goto :string_end
+        end
+        rule %r('), Str::Single
+        mixin :string_single_common
+      end
+
+      state :string_escapes do
+        rule %r(\\[tbnrf"'\\]), Str::Escape
+        rule %r(\\u\h{4}), Str::Escape
+        rule %r(\\U\h{8}), Str::Escape
+      end
+
+      state :string_end do
+        rule %r((@)([a-zA-Z]+(?:-[a-zA-Z0-9]+)*)) do
+          groups Operator, Name::Property
+        end
+        rule %r(\^\^), Operator
+        rule(//) { pop! }
+      end
+    end
+  end
+end