class CommentService
  include MechanizeContext

  def get_comments(page_url)
    comments = []
    last   = comments
    current_level = -1
    page = agent.get(page_url)
    page.search("//table")[3].search("table/tr").select do |tr|
      tr.search("span.comment").inner_html != "[deleted]"
    end.each do |tr|
      comment = parse_comment(tr)
      level = tr.search("img[@src='http://ycombinator.com/images/s.gif']").first['width'].to_i / 40
      difference = current_level - level
      target = last
      (difference + 1).times do
        target = target.parent || comments
      end
      target << comment
      last = comment
      current_level = level
    end
    return comments
  end

  def get_new_comments(pages = 1)
    parser = EntryPageParser.new(agent.get(ConfigurationService.comments_url))
    comments = []
    pages.times do
      lines = parser.get_lines
      lines.each do |line|
        comments << parse_comment(line)
      end
      next_url = parser.get_next_url || break
      parser = EntryPageParser.new(agent.get(next_url))
    end
    return comments
  end

  def parse_comment(element)
    text = ""
    element.search("span.comment").first.children.each do |ch|
      text = ch.inner_html.gsub(/<.{1,2}>/,"")
    end
    header = element.search("span.comhead").first
    voting = VotingInfoParser.new(element.search("td/center/a"), header).parse
    user_info = UserInfoParser.new(header).parse
    reply_link = element.search("td[@class='default']/p//u//a").first
    reply_url = reply_link['href'] if reply_link       
    return Comment.new(text, voting, user_info, reply_url)
  end

  def write_comment(page_url, comment)
    require_authentication
    form = agent.get(page_url).forms.first
    form.text = comment
    form.submit
    return true
  end
  
end