RDoc::Parser::Rake

# File lib/rdoc/parser/rake.rb, line 43
def initialize(top_level, file_name, content, options, stats)
  super

  @size = 0
  @token_listeners = nil
  @scanner = RDoc::RubyLex.new content, @options
  @scanner.exception_on_syntax_error = false
  @rake_tasks = @top_level.add_module RDoc::RakeNamespace, 'Rake Tasks'
  @prev_seek = nil

  reset
end

# File lib/rdoc/parser/rake.rb, line 59
def consume_array
  tokens = get_tk_until TkRBRACK
  tokens << get_tk
  tokens
end

# File lib/rdoc/parser/rake.rb, line 68
def consume_body
  seen_nest = false
  nest = 0

  body = []

  while tk = get_tk do
    body << tk

    case tk
    when TkDO, TkCLASS, TkMODULE, TkDEF, TkBEGIN, TkIF, TkUNLESS, TkCASE,
         TkWHILE, TkUNTIL, TkFOR then
      nest += 1
      seen_nest = true
    when TkEND then
      nest -= 1
    when TkNL then
      break unless seen_nest
    end

    break if nest == 0 and seen_nest
  end

  body
end

# File lib/rdoc/parser/rake.rb, line 97
def consume_task_arguments
  skip_tkspace false

  tk = get_tk

  case tk
  when TkNL, TkDO then
    unget_tk tk
  when TkASSIGN then
    get_tk # finish assoc, lexer bug
    skip_tkspace

    case tk = get_tk
    when TkLBRACK then
      tokens = consume_array
      tokens = tokens.select do |token| TkSYMBOL === token end
      tokens = tokens.map do |token| token.to_sym end
      @task.dependencies.push(*tokens)
    when TkSYMBOL then # ok
      @task.dependencies << tk.to_sym
    else
      puts :task_arg => tk
    end
  end
end

# File lib/rdoc/parser/rake.rb, line 128
def parse_description
  skip_tkspace

  tk = get_tk

  @desc = tk.text[1..-2]
end

# File lib/rdoc/parser/rake.rb, line 141
def parse_namespace
  skip_tkspace

  tk = get_tk

  namespace = @container.add_module RDoc::RakeNamespace, tk.text[1..-1]

  skip_tkspace

  old_namespace = @container

  begin
    @nest += 1
    @container = namespace

    parse_rakefile
  ensure
    @container = old_namespace
    @nest -= 1
  end
end

# File lib/rdoc/parser/rake.rb, line 232
def parse_rakefile
  current_nest = @nest

  while tk = get_tk do
    case tk
    when TkCONSTANT then
      parse_task_builder tk
    when TkDO then
      @nest += 1
    when TkEND then
      @nest -= 1
      break if current_nest > 0 and @nest <= current_nest
    when TkIDENTIFIER then
      case tk.name
      when 'desc' then
        parse_description
      when 'task' then
        parse_task(tk)
      when 'namespace' then
        parse_namespace
      when 'require' then
        parse_require
      #else
      #  p :ident => tk
      end
    when TkNL, TkSPACE then # ignore
    #else
    #  p :unhandled => tk
    end
  end
end

# File lib/rdoc/parser/rake.rb, line 267
def parse_require
  skip_tkspace false

  tk = get_tk

  name = tk.text if TkSTRING === tk

  if name then
    @container.add_require RDoc::Require.new(name, '')
  else
    unget_tk tk
  end
end

# File lib/rdoc/parser/rake.rb, line 168
def parse_task(tk)
  collect_tokens
  add_token tk

  token_listener self do
    skip_tkspace false

    tk = get_tk
    name = tk.text

    @task = @container.find_instance_method_named name

    unless @task then
      @task = RDoc::RakeTask.new tokens_to_s, name
      @container.add_method @task
      @stats.add_method @task
    end

    @task.comment += use_desc

    consume_task_arguments
  end

  @task.collect_tokens
  @task.add_tokens token_stream

  token_listener @task do
    consume_body
  end

  @task
end

# File lib/rdoc/parser/rake.rb, line 206
def parse_task_builder(tk)
  name = tk.name

  if 'ENV' == name then
    get_tk_until TkNL
    return
  end

  get_tk_until TkDO, TkNL

  tk = get_tk

  case tk
  when TkDO then
    unget_tk tk
    consume_body
  end

  builder = RDoc::RakeBuilder.new name, ''

  @container.add_include builder
end

# File lib/rdoc/parser/rake.rb, line 284
def scan
  reset

  @container = @rake_tasks

  @stats.add_module @container

  catch :eof do
    catch :enddoc do
      parse_rakefile
    end
  end

  @top_level
end

# File lib/rdoc/parser/rake.rb, line 303
def use_desc
  desc = @desc
  @desc = nil
  desc || ''
end