require File.expand_path("test/test_helper")

module Payday
  class InvoiceTest < MiniTest::Unit::TestCase
    
    test "that setting values through the options hash on initialization works" do
      i = Invoice.new(:invoice_number => 20, :bill_to => "Here", :ship_to => "There",
          :notes => "These are some notes.",
          :line_items => [LineItem.new(:price => 10, :quantity => 3, :description => "Shirts")],
          :shipping_rate => 15.00, :shipping_description => "USPS Priority Mail:",
          :tax_rate => 0.125, :tax_description => "Local Sales Tax, 12.5%")
          
      assert_equal 20, i.invoice_number
      assert_equal "Here", i.bill_to
      assert_equal "There", i.ship_to
      assert_equal "These are some notes.", i.notes
      assert_equal "Shirts", i.line_items[0].description
      assert_equal BigDecimal.new("15.00"), i.shipping_rate
      assert_equal "USPS Priority Mail:", i.shipping_description
      assert_equal BigDecimal.new("0.125"), i.tax_rate
      assert_equal "Local Sales Tax, 12.5%", i.tax_description
    end
        
    test "that subtotal totals up all of the line items in an invoice correctly" do
      i = Invoice.new
      
      # $100 in Pants
      i.line_items << LineItem.new(:price => 20, :quantity => 5, :description => "Pants")
      
      # $30 in Shirts
      i.line_items << LineItem.new(:price => 10, :quantity => 3, :description => "Shirts")
      
      # $1000 in Hats
      i.line_items << LineItem.new(:price => 5, :quantity => 200, :description => "Hats")
      
      assert_equal BigDecimal.new("1130"), i.subtotal
    end
    
    test "that tax returns the correct tax amount, rounded to two decimal places" do
      i = Invoice.new(:tax_rate => 0.1)
      i.line_items << LineItem.new(:price => 20, :quantity => 5, :description => "Pants")
      
      assert_equal(BigDecimal.new("10"), i.tax)
    end
    
    test "that taxes aren't applied to invoices with a subtotal of 0 or a negative amount" do
      i = Invoice.new(:tax_rate => 0.1)
      i.line_items << LineItem.new(:price => -1, :quantity => 100, :description => "Negative Priced Pants")
      
      assert_equal(BigDecimal.new("0"), i.tax)
    end
    
    test "that the total for this invoice calculates correctly" do
      i = Invoice.new(:tax_rate => 0.1)
      
      # $100 in Pants
      i.line_items << LineItem.new(:price => 20, :quantity => 5, :description => "Pants")
      
      # $30 in Shirts
      i.line_items << LineItem.new(:price => 10, :quantity => 3, :description => "Shirts")
      
      # $1000 in Hats
      i.line_items << LineItem.new(:price => 5, :quantity => 200, :description => "Hats")
      
      assert_equal BigDecimal.new("1243"), i.total
    end
    
    test "overdue? is false when past date and unpaid" do
      i = Invoice.new(:due_at => Date.today - 1)
      assert i.overdue?
    end
    
    test "overdue? is true when past date but paid" do
      i = Invoice.new(:due_at => Date.today - 1, :paid_at => Date.today)
      assert !i.overdue?
    end
    
    test "overdue? when due_at is a time" do
      i = Invoice.new(:due_at => Time.parse("Jan 1 14:33:20 GMT 2011"))
      assert i.overdue?
    end
    
    test "paid is false when not paid" do
      i = Invoice.new
      assert !i.paid?
    end
    
    test "paid is true when paid" do
      i = Invoice.new(:paid_at => Date.today)
      assert i.paid?
    end
    
    test "iterating through invoice_details as two element arrays" do
      i = Invoice.new(:invoice_details => [["Test", "Yes"], ["Awesome", "Absolutely"]])
      details = []
      i.each_detail do |key, value|
        details << [key, value]
      end
      
      assert_equal 2, details.length
      assert details.include?(["Test", "Yes"])
      assert details.include?(["Awesome", "Absolutely"])
    end
    
    test "iterating through invoice_details as a hash" do
      i = Invoice.new(:invoice_details => {"Test" => "Yes", "Awesome" => "Absolutely"})
      details = []
      i.each_detail do |key, value|
        details << [key, value]
      end
      
      assert_equal 2, details.length
      assert details.include?(["Test", "Yes"])
      assert details.include?(["Awesome", "Absolutely"])
    end
    
    test "rendering to file" do
      File.unlink("tmp/testing.pdf") if File.exists?("tmp/testing.pdf")
      assert !File.exists?("tmp/testing.pdf")
      
      i = Invoice.new(:tax_rate => 0.1, :notes => "These are some crazy awesome notes!", :invoice_number => 12,
          :due_at => Date.civil(2011, 1, 22), #:paid_at => Date.civil(2012, 2, 22),
          :bill_to => "Alan Johnson\n101 This Way\nSomewhere, SC 22222", 
          :ship_to => "Frank Johnson\n101 That Way\nOther, SC 22229",
          :invoice_details => {"Ordered By:" => "Alan Johnson", "Paid By:" => "Dude McDude"})
      
      Payday::Config.default.company_details = "10 This Way\nManhattan, NY 10001\n800-111-2222\nawesome@awesomecorp.com"
      
      3.times do
        i.line_items << LineItem.new(:price => 20, :quantity => 5, :description => "Pants")
        i.line_items << LineItem.new(:price => 10, :quantity => 3, :description => "Shirts")
        i.line_items << LineItem.new(:price => 5, :quantity => 200, :description => "Hats")
      end

      i.render_pdf_to_file("tmp/testing.pdf")
      
      assert File.exists?("tmp/testing.pdf")
    end
    
    test "rendering to string" do
      i = Invoice.new(:tax_rate => 0.1, :notes => "These are some crazy awesome notes!", :invoice_number => 12,
          :due_at => Date.civil(2011, 1, 22), :paid_at => Date.civil(2012, 2, 22),
          :bill_to => "Alan Johnson\n101 This Way\nSomewhere, SC 22222", :ship_to => "Frank Johnson\n101 That Way\nOther, SC 22229")

      3.times do
        i.line_items << LineItem.new(:price => 20, :quantity => 5, :description => "Pants")
        i.line_items << LineItem.new(:price => 10, :quantity => 3, :description => "Shirts")
        i.line_items << LineItem.new(:price => 5, :quantity => 200.0, :description => "Hats")
      end

      refute_nil i.render_pdf
    end
  end
end