module Rwiki
  class Page
    include Rwiki::Utils

    class Error < StandardError; end

    attr_reader :file_helper
    attr_reader :textile_helper

    def self.root
      self.new
    end

    def initialize(path = Rwiki.configuration.root_page_name)
      @file_helper = FileHelper.new(path)
      raise Error.new("Cannot find the #{path} page") unless file_helper.exists?
    end

    def textile_helper
      @textile_helper ||= TextileHelper.new(file_content)
    end

    def is_root?
      file_helper.path == Rwiki.configuration.root_page_path
    end

    def path
      file_helper.path
    end

    def full_path
      file_helper.full_path
    end

    def full_file_path
      file_helper.full_file_path
    end

    def title
      file_helper.basename
    end

    def parent
      return if is_root?
      @parent ||= Page.new(file_helper.full_parent_path)
    end

    def children
      @children ||= fetch_children
    end

    def leaf?
      children.size == 0
    end

    def has_children?
      !leaf?
    end

    def tree
      result = []

      children.each do |child|
        tree_node = child.to_tree_node_hash

        if child.has_children?
          tree_node[:children] = child.tree
        end

        result << tree_node
      end

      result
    end

    def add_page(name)
      Page.new(file_helper.add_page(name))
    end

    def file_content
      @file_content ||= file_helper.read_file_content
    end

    def html_content
      @html_content ||= textile_helper.parsed_content
    end

    def html_toc
      @html_toc ||= textile_helper.parsed_toc
    end

    def update_file_content(file_content)
      file_helper.update_file_content(file_content)
      reload!
    end

    def rename_to(new_name)
      raise Error.new("Cannot rename the #{Rwiki.configuration.root_page_name} page") if is_root?
      file_helper.rename_to(new_name)
    end

    def move_to(node)
      raise Error.new("Cannot move the #{Rwiki.configuration.root_page_name} page") if is_root?
      file_helper.move_to(node.path)
    end

    def delete
      raise Error.new("Cannot delete the #{Rwiki.configuration.root_page_name} page") if is_root?
      file_helper.delete
    end

    def to_tree_node_hash
      {
        :text => title,
        :leaf => false
      }
    end

    def to_hash
      {
        :path => path,
        :rawContent => file_content,
        :htmlContent => html_content,
        :htmlToc => html_toc
      }
    end

    def to_json(extra_attrs = {})
      to_hash.merge(extra_attrs).to_json
    end

    # TODO cleanup and write tests
    def self.fuzzy_finder(query)
      @finder ||= FuzzyFileFinder.new(Rwiki.configuration.rwiki_path)
      @finder.rescan!

      matches = @finder.find(query).sort_by { |m| [-m[:score], m[:path]] }
      matches.each do |m|
        m[:path] = m[:path].gsub(Rwiki.configuration.rwiki_path, '').gsub(/\.#{Rwiki.configuration.page_file_extension}$/, '')
        m[:highlighted_path] = m[:highlighted_path].gsub(/\.#{Rwiki.configuration.page_file_extension}$/, '')
      end

      matches
    end

    def findgrep(pattern, matches = [])
      pattern = /#{Regexp.escape(pattern)}/i if pattern.kind_of?(String)

      children.each do |child|
        child.file_content.lines.grep(pattern) do |line|
          matches << { :path => child.path, :line => line.strip }
        end

        if child.has_children?
          child.findgrep(pattern, matches)
        end
      end

      matches
    end

    protected

    def fetch_children
      self.class.fetch_children(full_path)
    end

    def self.fetch_children(full_path)
      children = []

      if Dir.exists?(full_path)
        files = Dir.glob("#{full_path}/*.txt").sort
        files.each do |file|
          children << Page.new(file)
        end
      end

      children
    end

    def reload!
      @parent = nil
      @children = nil

      @file_content = nil
      @html_content = nil
    end

  end
end