rouge 3.17.0

data/lib/rouge/lexers/nix.rb

@@ -0,0 +1,211 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    class Nix < RegexLexer
+      title 'Nix'
+      desc 'The Nix expression language (https://nixos.org/nix/manual/#ch-expression-language)'
+      tag 'nix'
+      aliases 'nixos'
+      filenames '*.nix'
+
+      state :whitespaces do
+        rule %r/^\s*\n\s*$/m, Text
+        rule %r/\s+/, Text
+      end
+
+      state :comment do
+        rule %r/#.*$/, Comment
+        rule %r(/\*), Comment, :multiline_comment
+      end
+
+      state :multiline_comment do
+        rule %r(\*/), Comment, :pop!
+        rule %r/./, Comment
+      end
+
+      state :number do
+        rule %r/[0-9]/, Num::Integer
+      end
+
+      state :null do
+        rule %r/(null)/, Keyword::Constant
+      end
+
+      state :boolean do
+        rule %r/(true|false)/, Keyword::Constant
+      end
+
+      state :binding do
+        rule %r/[a-zA-Z_][a-zA-Z0-9-]*/, Name::Variable
+      end
+
+      state :path do
+        word = "[a-zA-Z0-9\._-]+"
+        section = "(\/#{word})"
+        prefix = "[a-z\+]+:\/\/"
+        root = /#{section}+/.source
+        tilde = /~#{section}+/.source
+        basic = /#{word}(\/#{word})+/.source
+        url = /#{prefix}(\/?#{basic})/.source
+        rule %r/(#{root}|#{tilde}|#{basic}|#{url})/, Str::Other
+      end
+
+      state :string do
+        rule %r/"/, Str::Double, :double_quoted_string
+        rule %r/''/, Str::Double, :indented_string
+      end
+
+      state :string_content do
+        rule %r/\\./, Str::Escape
+        rule %r/\$\$/, Str::Escape
+        rule %r/\${/, Str::Interpol, :string_interpolated_arg
+      end
+
+      state :indented_string_content do
+        rule %r/'''/, Str::Escape
+        rule %r/''\$/, Str::Escape
+        rule %r/\$\$/, Str::Escape
+        rule %r/''\\./, Str::Escape
+        rule %r/\${/, Str::Interpol, :string_interpolated_arg
+      end
+
+      state :string_interpolated_arg do
+        mixin :expression
+        rule %r/}/, Str::Interpol, :pop!
+      end
+
+      state :indented_string do
+        mixin :indented_string_content
+        rule %r/''/, Str::Double, :pop!
+        rule %r/./, Str::Double
+      end
+
+      state :double_quoted_string do
+        mixin :string_content
+        rule %r/"/, Str::Double, :pop!
+        rule %r/./, Str::Double
+      end
+
+      state :operator do
+        rule %r/(\.|\?|\+\+|\+|!=|!|\/\/|\=\=|&&|\|\||->|\/|\*|-|<|>|<=|=>)/, Operator
+      end
+
+      state :assignment do
+        rule %r/(=)/, Operator
+        rule %r/(@)/, Operator
+      end
+
+      state :accessor do
+        rule %r/(\$)/, Punctuation
+      end
+
+      state :delimiter do
+        rule %r/(;|,|:)/, Punctuation
+      end
+
+      state :atom_content do
+        mixin :expression
+        rule %r/\)/, Punctuation, :pop!
+      end
+
+      state :atom do
+        rule %r/\(/, Punctuation, :atom_content
+      end
+
+      state :list do
+        rule %r/\[/, Punctuation, :list_content
+      end
+
+      state :list_content do
+        rule %r/\]/, Punctuation, :pop!
+        mixin :expression
+      end
+
+      state :set do
+        rule %r/{/, Punctuation, :set_content
+      end
+
+      state :set_content do
+        rule %r/}/, Punctuation, :pop!
+        mixin :expression
+      end
+
+      state :expression do
+        mixin :ignore
+        mixin :comment
+        mixin :boolean
+        mixin :null
+        mixin :number
+        mixin :path
+        mixin :string
+        mixin :keywords
+        mixin :operator
+        mixin :accessor
+        mixin :assignment
+        mixin :delimiter
+        mixin :binding
+        mixin :atom
+        mixin :set
+        mixin :list
+      end
+
+      state :keywords do
+        mixin :keywords_namespace
+        mixin :keywords_declaration
+        mixin :keywords_conditional
+        mixin :keywords_reserved
+        mixin :keywords_builtin
+      end
+
+      state :keywords_namespace do
+        keywords = %w(with in inherit)
+        rule %r/(?:#{keywords.join('|')})\b/, Keyword::Namespace
+      end
+
+      state :keywords_declaration do
+        keywords = %w(let)
+        rule %r/(?:#{keywords.join('|')})\b/, Keyword::Declaration
+      end
+
+      state :keywords_conditional do
+        keywords = %w(if then else)
+        rule %r/(?:#{keywords.join('|')})\b/, Keyword
+      end
+
+      state :keywords_reserved do
+        keywords = %w(rec assert map)
+        rule %r/(?:#{keywords.join('|')})\b/, Keyword::Reserved
+      end
+
+      state :keywords_builtin do
+        keywords = %w(
+          abort
+          baseNameOf
+          builtins
+          derivation
+          fetchTarball
+          import
+          isNull
+          removeAttrs
+          throw
+          toString
+        )
+        rule %r/(?:#{keywords.join('|')})\b/, Keyword::Reserved
+      end
+
+      state :ignore do
+        mixin :whitespaces
+      end
+
+      state :root do
+        mixin :ignore
+        mixin :expression
+      end
+
+      start do
+      end
+    end
+  end
+end

data/lib/rouge/lexers/objective_c.rb

@@ -0,0 +1,21 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    load_lexer 'c.rb'
+    load_lexer 'objective_c/common.rb'
+
+    class ObjectiveC < C
+      extend ObjectiveCCommon
+
+      tag 'objective_c'
+      title "Objective-C"
+      desc 'an extension of C commonly used to write Apple software'
+      aliases 'objc', 'obj-c', 'obj_c', 'objectivec'
+      filenames '*.m', '*.h'
+
+      mimetypes 'text/x-objective_c', 'application/x-objective_c'
+    end
+  end
+end

data/lib/rouge/lexers/objective_c/common.rb

@@ -0,0 +1,184 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    module ObjectiveCCommon
+      id = /[a-z$_][a-z0-9$_]*/i
+
+      def at_keywords
+        @at_keywords ||= %w(
+          selector private protected public encode synchronized try
+          throw catch finally end property synthesize dynamic optional
+          interface implementation import autoreleasepool
+        )
+      end
+
+      def at_builtins
+        @at_builtins ||= %w(true false YES NO)
+      end
+
+      def builtins
+        @builtins ||= %w(YES NO nil)
+      end
+
+      def self.extended(base)
+        base.prepend :statements do
+          rule %r/@"/, base::Str, :string
+          rule %r/@'(\\[0-7]{1,3}|\\x[a-fA-F0-9]{1,2}|\\.|[^\\'\n]')/,
+            base::Str::Char
+          rule %r/@(\d+[.]\d*|[.]\d+|\d+)e[+-]?\d+l?/i,
+            base::Num::Float
+          rule %r/@(\d+[.]\d*|[.]\d+|\d+f)f?/i, base::Num::Float
+          rule %r/@0x\h+[lL]?/, base::Num::Hex
+          rule %r/@0[0-7]+l?/i, base::Num::Oct
+          rule %r/@\d+l?/, base::Num::Integer
+          rule %r/\bin\b/, base::Keyword
+
+          rule %r/@(?:interface|implementation)\b/, base::Keyword, :objc_classname
+          rule %r/@(?:class|protocol)\b/, base::Keyword, :forward_classname
+
+          rule %r/@([[:alnum:]]+)/ do |m|
+            if base.at_keywords.include? m[1]
+              token base::Keyword
+            elsif base.at_builtins.include? m[1]
+              token base::Name::Builtin
+            else
+              token base::Error
+            end
+          end
+
+          rule %r/[?]/, base::Punctuation, :ternary
+          rule %r/\[/,  base::Punctuation, :message
+          rule %r/@\[/, base::Punctuation, :array_literal
+          rule %r/@\{/, base::Punctuation, :dictionary_literal
+        end
+
+        id = /[a-z$_][a-z0-9$_]*/i
+
+        base.state :ternary do
+          rule %r/:/, base::Punctuation, :pop!
+          mixin :statements
+        end
+
+        base.state :message_shared do
+          rule %r/\]/, base::Punctuation, :pop!
+          rule %r/\{/, base::Punctuation, :pop!
+          rule %r/;/, base::Error
+
+          mixin :statements
+        end
+
+        base.state :message do
+          rule %r/(#{id})(\s*)(:)/ do
+            groups(base::Name::Function, base::Text, base::Punctuation)
+            goto :message_with_args
+          end
+
+          rule %r/(#{id})(\s*)(\])/ do
+            groups(base::Name::Function, base::Text, base::Punctuation)
+            pop!
+          end
+
+          mixin :message_shared
+        end
+
+        base.state :message_with_args do
+          rule %r/\{/, base::Punctuation, :function
+          rule %r/(#{id})(\s*)(:)/ do
+            groups(base::Name::Function, base::Text, base::Punctuation)
+            pop!
+          end
+
+          mixin :message_shared
+        end
+
+        base.state :array_literal do
+          rule %r/]/, base::Punctuation, :pop!
+          rule %r/,/, base::Punctuation
+          mixin :statements
+        end
+
+        base.state :dictionary_literal do
+          rule %r/}/, base::Punctuation, :pop!
+          rule %r/,/, base::Punctuation
+          mixin :statements
+        end
+
+        base.state :objc_classname do
+          mixin :whitespace
+
+          rule %r/(#{id})(\s*)(:)(\s*)(#{id})/ do
+            groups(base::Name::Class, base::Text,
+                   base::Punctuation, base::Text,
+                   base::Name::Class)
+            pop!
+          end
+
+          rule %r/(#{id})(\s*)([(])(\s*)(#{id})(\s*)([)])/ do
+            groups(base::Name::Class, base::Text,
+                   base::Punctuation, base::Text,
+                   base::Name::Label, base::Text,
+                   base::Punctuation)
+            pop!
+          end
+
+          rule id, base::Name::Class, :pop!
+        end
+
+        base.state :forward_classname do
+          mixin :whitespace
+
+          rule %r/(#{id})(\s*)(,)(\s*)/ do
+            groups(base::Name::Class, base::Text, base::Punctuation, base::Text)
+            push
+          end
+
+          rule %r/(#{id})(\s*)(;?)/ do
+            groups(base::Name::Class, base::Text, base::Punctuation)
+            pop!
+          end
+        end
+
+        base.prepend :root do
+          rule %r(
+            ([-+])(\s*)
+            ([(].*?[)])?(\s*)
+            (?=#{id}:?)
+          )ix do |m|
+            token base::Keyword, m[1]
+            token base::Text, m[2]
+            recurse(m[3]) if m[3]
+            token base::Text, m[4]
+            push :method_definition
+          end
+        end
+
+        base.state :method_definition do
+          rule %r/,/, base::Punctuation
+          rule %r/[.][.][.]/, base::Punctuation
+          rule %r/([(].*?[)])(#{id})/ do |m|
+            recurse m[1]; token base::Name::Variable, m[2]
+          end
+
+          rule %r/(#{id})(\s*)(:)/m do
+            groups(base::Name::Function, base::Text, base::Punctuation)
+          end
+
+          rule %r/;/, base::Punctuation, :pop!
+
+          rule %r/{/ do
+            token base::Punctuation
+            goto :function
+          end
+
+          mixin :inline_whitespace
+          rule %r(//.*?\n), base::Comment::Single
+          rule %r/\s+/m, base::Text
+
+          rule(//) { pop! }
+        end
+      end
+    end
+  end
+end

data/lib/rouge/lexers/objective_cpp.rb

@@ -0,0 +1,31 @@
+# -*- coding: utf-8 -*- #
+# frozen_string_literal: true
+
+module Rouge
+  module Lexers
+    load_lexer 'cpp.rb'
+    load_lexer 'objective_c/common.rb'
+
+    class ObjectiveCpp < Cpp
+      extend ObjectiveCCommon
+
+      tag 'objective_cpp'
+      title "Objective-C++"
+      desc 'an extension of C++ uncommonly used to write Apple software'
+      aliases 'objcpp', 'obj-cpp', 'obj_cpp', 'objectivecpp',
+              'objc++', 'obj-c++', 'obj_c++', 'objectivec++'
+      filenames '*.mm', '*.h'
+
+      mimetypes 'text/x-objective-c++', 'application/x-objective-c++'
+
+      prepend :statements do
+        rule %r/(\.)(class)/ do
+          groups(Operator, Name::Builtin::Pseudo)
+        end
+        rule %r/(@selector)(\()(class)(\))/ do
+          groups(Keyword, Punctuation, Name::Builtin::Pseudo, Punctuation)
+        end
+      end
+    end
+  end
+end