# -*- encoding: utf-8 -*-

require 'test/unit'
require 'helper'
require 'webgen/tree'
require 'webgen/node'
require 'webgen/path'
require 'webgen/sourcehandler'
require 'time'

class TestSourceHandlerBase < Test::Unit::TestCase

  class TestSH; include Webgen::SourceHandler::Base; end

  include Test::WebsiteHelper

  def setup
    super
    @obj = Object.new
    @obj.extend(Webgen::SourceHandler::Base)
  end

  def test_create_node
    path = path_with_meta_info('/path.html')
    count = 0

    path.instance_eval { @source_path = '/path'}
    node = @obj.create_node(path, :parent => @website.tree.dummy_root) {|n| count +=1 }
    assert_equal('/path', node.node_info[:src])
    assert_equal('Object', node.node_info[:processor])
    assert_kind_of(Time, node['modified_at'])
    assert_equal(1, count)

    other_node = @obj.create_node(path, :parent => @website.tree.dummy_root) {|n| count +=1 }
    assert_equal(node, other_node)
    assert_equal(1, count)

    node.flag(:reinit)
    other_node = @obj.create_node(path, :parent => @website.tree.dummy_root) {|n| count +=1 }
    assert_equal(node, other_node)
    assert_equal(2, count)

    path.instance_eval { @source_path = '/other' }
    other_node = @obj.create_node(path, :parent => @website.tree.dummy_root) {|n| count +=1 }
    assert_equal(node, other_node)
    assert_equal(2, count)
  end

  def test_node_exists
    node = Webgen::Node.new(@website.tree.dummy_root, '/', '/', {'lang' => 'de', :test => :value})
    child_de = Webgen::Node.new(node, '/somename.html', 'somename.html', {'lang' => 'de'})
    frag_de = Webgen::Node.new(child_de, '/somename.html#data1', '#othertest')

    assert_equal(child_de, @obj.node_exists?(path_with_meta_info('/somename.de.html')))
    assert_equal(child_de, @obj.node_exists?(path_with_meta_info('/other.page'), @obj.output_path(node, path_with_meta_info('/somename.html'))))
    assert_equal(false, @obj.node_exists?(path_with_meta_info('/somename.en.html', {'no_output' => true}),
                                          @obj.output_path(node, path_with_meta_info('/somename.html'))))
    assert_equal(frag_de, @obj.node_exists?(path_with_meta_info('/somename.de.html#othertest')))
    assert_equal(nil, @obj.node_exists?(path_with_meta_info('/unknown')))
  end

  def test_output_path
    node = Webgen::Node.new(Webgen::Tree.new.dummy_root, '/', '/')
    assert_raise(Webgen::NodeCreationError) { @obj.output_path(node, path_with_meta_info('/test.page', 'output_path' => 'non'))}
  end

  def test_standard_output_path
    node = Webgen::Node.new(@website.tree.dummy_root, '/', '/', {'lang' => 'de', :test => :value})

    path = path_with_meta_info('/path.html')
    assert_equal('/path.html', @obj.output_path(node, path))
    path = path_with_meta_info('/path.en.html')
    assert_equal('/path.html', @obj.output_path(node, path))
    path = path_with_meta_info('/path.eo.html')
    assert_equal('/path.eo.html', @obj.output_path(node, path))
    path = path_with_meta_info('/dir/')
    assert_equal('/dir/', @obj.output_path(node, path))

    other = Webgen::Node.new(node, '/path.html', 'other.page')
    path = path_with_meta_info('/path.html')
    assert_equal('/path.html', @obj.output_path(node, path))
    path = path_with_meta_info('/path.en.html')
    assert_equal('/path.en.html', @obj.output_path(node, path))

    path = path_with_meta_info('/path.html#frag')
    assert_equal('/path.html#frag', @obj.output_path(other, path))
    frag = Webgen::Node.new(other, '/path.html#frag', '#frag')
    path = path_with_meta_info('/path.html#frag1')
    assert_equal('/path.html#frag1', @obj.output_path(frag, path))

    path = path_with_meta_info('/')
    assert_equal('/', @obj.output_path(@website.tree.dummy_root, path))
    path = path_with_meta_info('/test/', 'output_path_style' => [:parent, 'hallo', 56])
    assert_equal('hallo/', @obj.output_path(@website.tree.dummy_root, path))

    path = path_with_meta_info('/index.en.html')
    assert_equal('/index.html', @obj.output_path(node, path))
    index_en = Webgen::Node.new(node, '/index.html', 'index.page', {'lang' => 'en'})
    assert_equal('/index.html', @obj.output_path(node, path))
    path = path_with_meta_info('/index.en.html', 'output_path_style' => [:parent, 'hallo.html'])
    assert_equal('/hallo.html', @obj.output_path(node, path))
    path = path_with_meta_info('/other.de.html', 'output_path_style' => [:parent, 'index', ['.', :lang], :ext])
    assert_equal('/index.de.html', @obj.output_path(node, path))

    assert_raise(Webgen::NodeCreationError) do
      path = path_with_meta_info('/path.html', 'output_path_style' => [:parent, :year, '/', :month, '/', :basename, :ext])
      @obj.output_path(node, path)
    end
    time = Time.parse('2008-09-04 08:15')
    path = path_with_meta_info('/path.html', 'output_path_style' => [:parent, :year, '/', :month, '/', :day, '-', :basename, :ext],
                               'created_at' => time)
    assert_equal('/2008/09/04-path.html', @obj.output_path(node, path))
  end

  def test_content
    assert_nil(@obj.content(nil))
  end

  def test_page_from_path
    path = path_with_meta_info('/other.page', {'key' => 'value'}) { StringIO.new("---\nkey: value1\n---\ncontent")}
    page = @obj.page_from_path(path)
    assert_equal('content', page.blocks['content'].content)
    assert_equal('value1', path.meta_info['key'])

    path = path_with_meta_info('/other.page') { StringIO.new("---\:dfk")}
    assert_raise(Webgen::NodeCreationError) { @obj.page_from_path(path) }
  end

  def test_parent_node
    assert_equal(@website.tree.dummy_root, @obj.parent_node(path_with_meta_info('/')))
    root = Webgen::Node.new(@website.tree.dummy_root, '/', '/')
    assert_equal(root, @obj.parent_node(path_with_meta_info('/test/')))
    assert_raise(Webgen::NodeCreationError) { @obj.parent_node(path_with_meta_info('/hallo/other.page')) }
  end

end