summaryrefslogtreecommitdiff
path: root/lib/coderay/scanners/raydebug.rb
blob: 7a21354cfc45af7e44b2c9674d2091a8beb6d74c (plain)
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
module CodeRay
module Scanners

  # = Debug Scanner
  # 
  # Parses the output of the Encoders::Debug encoder.
  class Raydebug < Scanner

    register_for :raydebug
    file_extension 'raydebug'
    title 'CodeRay Token Dump'
    
  protected
    
    def scan_tokens encoder, options

      opened_tokens = []

      until eos?

        if match = scan(/\s+/)
          encoder.text_token match, :space
          
        elsif match = scan(/ (\w+) \( ( [^\)\\]* ( \\. [^\)\\]* )* ) /x)
          kind = self[1]
          encoder.text_token kind, :class
          encoder.text_token '(', :operator
          match = self[2]
          encoder.text_token match, kind.to_sym
          encoder.text_token match, :operator if match = scan(/\)/)
          
        elsif match = scan(/ (\w+) ([<\[]) /x)
          kind = self[1]
          case self[2]
          when '<'
            encoder.text_token kind, :class
          when '['
            encoder.text_token kind, :class
          else
            raise 'CodeRay bug: This case should not be reached.'
          end
          kind = kind.to_sym
          opened_tokens << kind
          encoder.begin_group kind
          encoder.text_token self[2], :operator
          
        elsif !opened_tokens.empty? && match = scan(/ [>\]] /x)
          encoder.text_token match, :operator
          encoder.end_group opened_tokens.pop
          
        else
          encoder.text_token getch, :space
          
        end
        
      end
      
      encoder.end_group opened_tokens.pop until opened_tokens.empty?
      
      encoder
    end

  end

end
end