require File.dirname(__FILE__) + '/../test_helper'

require 'http_mock'

class ArticleTest < Test::Unit::TestCase
  fixtures :blogs, :contents, :articles_tags, :tags, :resources, :categories, :categorizations, :users, :notifications, :text_filters

  def setup
    @articles = []
  end

  def assert_results_are(*expected)
    assert_equal expected.size, @articles.size
    expected.each do |i|
      assert @articles.include?(i.is_a?(Symbol) ? contents(i) : i)
    end
  end

  def test_content_fields
    a = Article.new
    assert_equal [:body, :extended], a.content_fields
  end

  def test_permalink_url
    a = contents(:article3)
    assert_equal 'http://myblog.net/articles/2004/06/01/article-3', a.permalink_url
  end

  def test_edit_url
    a = contents(:article3)
    assert_equal 'http://myblog.net/admin/content/edit/3', a.edit_url
  end

  def test_delete_url
    a = contents(:article3)
    assert_equal 'http://myblog.net/admin/content/destroy/3', a.delete_url
  end

  def test_feed_url
    a = contents(:article3)
    assert_equal 'http://myblog.net/xml/atom10/article/3/feed.xml', a.feed_url(:atom10)
    assert_equal 'http://myblog.net/xml/rss20/article/3/feed.xml', a.feed_url(:rss20)
  end

  def test_blog
    a = Article.new

    assert_equal(1, a.blog_id)
    assert_kind_of(Blog, a.blog)
  end

  def test_create
    a = Article.new
    a.user_id = 1
    a.body = "Foo"
    a.title = "Zzz"
    assert a.save

    a.categories << Category.find(1)
    assert_equal 1, a.categories.size

    b = Article.find(a.id)
    assert_equal 1, b.categories.size
  end

  def test_permalink
    assert_equal( contents(:article3), this_blog.articles.find_by_date(2004,06,01) )
    assert_equal( [contents(:article2), contents(:article1)],
                  this_blog.articles.find_all_by_date(2.days.ago.year) )
  end

  def test_permalink_with_title
    assert_equal( contents(:article3),
                  this_blog.articles.find_by_permalink(2004, 06, 01, "article-3") )
    assert_nil this_blog.articles.find_by_permalink(2005, 06, 01, "article-5")
  end

  def test_strip_title
    assert_equal "article-3", "Article-3".to_url
    assert_equal "article-3", "Article 3!?#".to_url
    assert_equal "there-is-sex-in-my-violence", "There is Sex in my Violence!".to_url
    assert_equal "article", "-article-".to_url
    assert_equal "lorem-ipsum-dolor-sit-amet-consectetaur-adipisicing-elit", "Lorem ipsum dolor sit amet, consectetaur adipisicing elit".to_url
    assert_equal "my-cats-best-friend", "My Cat's Best Friend".to_url
  end

  def test_perma_title
    assert_equal "article-1", contents(:article1).stripped_title
    assert_equal "article-2", contents(:article2).stripped_title
    assert_equal "article-3", contents(:article3).stripped_title
  end

  def test_html_title
    a = Article.new
    a.title = "This <i>is</i> a <b>test</b>"
    assert a.save

    assert_equal 'this-is-a-test', a.permalink
  end

  def test_urls
    urls = contents(:article4).html_urls
    assert_equal ["http://www.example.com/public"], urls
  end

  ### XXX: Should we have a test here?
  def test_send_pings
  end

  ### XXX: Should we have a test here?
  def test_send_multiple_pings
  end

  def test_tags
    a = Article.new(:title => 'Test tag article',
                    :keywords => 'test tag tag stuff');

    assert_kind_of Article, a
    assert_equal 0, a.tags.size

    a.keywords_to_tags

    assert_equal 3, a.tags.size
    assert_equal ["test", "tag", "stuff"].sort , a.tags.collect {|t| t.name}.sort
    assert a.save

    a.keywords = 'tag bar stuff foo'
    a.keywords_to_tags

    assert_equal 4, a.tags.size
    assert_equal ["foo", "bar", "tag", "stuff"].sort , a.tags.collect {|t| t.name}.sort

    a.keywords='tag bar'
    a.keywords_to_tags

    assert_equal 2, a.tags.size

    a.keywords=''
    a.keywords_to_tags

    assert_equal 0, a.tags.size

    b = Article.new(:title => 'Tag Test 2',
                    :keywords => 'tag test article one two three')

    assert_kind_of Article,b
    assert_equal 0, b.tags.size

    c = Article.new(:title => 'Foo', :keywords => 'test "tag test" web2.0')
    c.keywords_to_tags

    assert_equal 3, c.tags.size
    assert_equal ['test', 'tagtest', 'web2.0'].sort, c.tags.collect(&:name).sort
  end

  def test_find_published_by_tag_name
    @articles = Tag.find_by_name(tags(:foo_tag).name).published_articles

    assert_results_are(:article1, :article2)
  end


  def test_find_published
    @articles = this_blog.articles.find_published
    assert_results_are(:search_target, :article1, :article2,
                       :article3, :inactive_article,:xmltest,
                       :spammed_article)

    @articles = this_blog.articles.find_published(:all,
                                                  :conditions => "title = 'Article 1!'")
    assert_results_are :article1
  end

  def test_just_published_flag
    art = this_blog.articles.build(:title => 'title',
                                   :body => 'body',
                                   :published => true)
    assert art.just_published?
    assert art.save
    art.reload
    assert !art.just_published?

    art = Article.create!(:title => 'title2',
                          :body => 'body',
                          :published => false)

    assert ! art.just_published?
  end

  def test_future_publishing
    assert_sets_trigger(Article.create!(:title => 'title', :body => 'body',
                                        :published => true,
                                        :published_at => Time.now + 4.seconds))
  end

  def test_future_publishing_without_published_flag
    assert_sets_trigger Article.create!(:title => 'title', :body => 'body',
                                        :published_at => Time.now + 4.seconds)
  end

  def test_triggers_are_dependent
    art = Article.create!(:title => 'title', :body => 'body',
                          :published_at => Time.now + 1.hour)
    assert_equal 1, Trigger.count
    art.destroy
    assert_equal 0, Trigger.count
  end

  def assert_sets_trigger(art)
    assert_equal 1, Trigger.count
    assert Trigger.find(:first, :conditions => ['pending_item_id = ?', art.id])
    sleep 4
    Trigger.fire
    art.reload
    assert art.published
  end

  def test_find_published_by_category
    Article.create!(:title      => "News from the future!",
                    :body       => "The future is cool!",
                    :keywords   => "future",
                    :published_at => Time.now + 12.minutes)

    @articles = Category.find_by_permalink('personal').published_articles
    assert_results_are :article1, :article2, :article3

    @articles = Category.find_by_permalink('foobar').published_articles
    assert @articles.empty?

    @articles = Category.find_by_permalink('software').published_articles
    assert_results_are :article1
  end

  def test_destroy_file_upload_associations
    assert_equal 2, contents(:article1).resources.size
    contents(:article1).resources << resources(:resource1) << resources(:resource2)
    assert_equal 4, contents(:article1).resources.size
    contents(:article1).destroy
    assert_equal 0, Resource.find(:all, :conditions => "article_id = #{contents(:article1).id}").size
  end

  def test_notifications
    a = Article.new(:title => 'New Article', :body => 'Foo', :author => 'Tobi', :user => users(:tobi))
    assert a.save

    assert_equal 2, a.notify_users.size
    assert_equal ['bob', 'randomuser'], a.notify_users.collect {|u| u.login }.sort
  end

  def test_tags_on_update
    contents(:article3).update_attribute :keywords, "my new tags"
    assert_equal 3, contents(:article3).reload.tags.size
    assert contents(:article3).tags.include?(Tag.find_by_name("new"))
  end

  # this also tests time_delta, indirectly
  def test_find_all_by_date
    feb28 = this_blog.articles.build(:published => true)
    mar1  = this_blog.articles.build(:published => true)
    mar2  = this_blog.articles.build(:published => true)

    feb28.title = "February 28"
    mar1.title  = "March 1"
    mar2.title  = "March 2"

    feb28.created_at = feb28.published_at = "2004-02-28"
    mar1.created_at  = mar1.published_at = "2004-03-01"
    mar2.created_at  = mar2.published_at = "2004-03-02"

    [feb28, mar1, mar2].each do |x|
      x.state = ContentState::Published.instance
      x.save
    end

    assert_equal(1, Article.find_all_by_date(2004,02).size)
    assert_equal(2, Article.find_all_by_date(2004,03).size)
    assert_equal(1, Article.find_all_by_date(2004,03,01).size)
  end

  def test_withdrawal
    art = Article.find(contents(:article1).id)
    assert   art.published?
    assert ! art.withdrawn?
    art.withdraw!
    assert ! art.published?
    assert   art.withdrawn?
    art.reload
    assert ! art.published?
    assert   art.withdrawn?
  end

  def test_default_filter
    a = Article.find(1)
    assert_equal 'textile', a.default_text_filter.name
  end
end