chris@37: # -*- coding: utf-8 -*-
Chris@119: require File.expand_path('../../test_helper', __FILE__)
chris@37: 
chris@37: class TimeEntryReportsControllerTest < ActionController::TestCase
Chris@909:   fixtures :projects, :enabled_modules, :roles, :members, :member_roles,
Chris@909:            :issues, :time_entries, :users, :trackers, :enumerations,
Chris@909:            :issue_statuses, :custom_fields, :custom_values
Chris@909: 
Chris@909:   include Redmine::I18n
Chris@909: 
Chris@909:   def setup
Chris@909:     Setting.default_language = "en"
Chris@909:   end
chris@37: 
Chris@441:   def test_report_at_project_level
Chris@441:     get :report, :project_id => 'ecookbook'
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@441:     assert_tag :form,
Chris@441:       :attributes => {:action => "/projects/ecookbook/time_entries/report", :id => 'query_form'}
chris@37:   end
Chris@909: 
chris@37:   def test_report_all_projects
chris@37:     get :report
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@441:     assert_tag :form,
Chris@441:       :attributes => {:action => "/time_entries/report", :id => 'query_form'}
chris@37:   end
Chris@909: 
chris@37:   def test_report_all_projects_denied
chris@37:     r = Role.anonymous
chris@37:     r.permissions.delete(:view_time_entries)
chris@37:     r.permissions_will_change!
chris@37:     r.save
chris@37:     get :report
chris@37:     assert_redirected_to '/login?back_url=http%3A%2F%2Ftest.host%2Ftime_entries%2Freport'
chris@37:   end
Chris@909: 
chris@37:   def test_report_all_projects_one_criteria
chris@37:     get :report, :columns => 'week', :from => "2007-04-01", :to => "2007-04-30", :criterias => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "8.65", "%.2f" % assigns(:total_hours)
chris@37:   end
chris@37: 
chris@37:   def test_report_all_time
chris@37:     get :report, :project_id => 1, :criterias => ['project', 'issue']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "162.90", "%.2f" % assigns(:total_hours)
chris@37:   end
chris@37: 
chris@37:   def test_report_all_time_by_day
chris@37:     get :report, :project_id => 1, :criterias => ['project', 'issue'], :columns => 'day'
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "162.90", "%.2f" % assigns(:total_hours)
chris@37:     assert_tag :tag => 'th', :content => '2007-03-12'
chris@37:   end
Chris@909: 
chris@37:   def test_report_one_criteria
chris@37:     get :report, :project_id => 1, :columns => 'week', :from => "2007-04-01", :to => "2007-04-30", :criterias => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "8.65", "%.2f" % assigns(:total_hours)
chris@37:   end
Chris@909: 
chris@37:   def test_report_two_criterias
chris@37:     get :report, :project_id => 1, :columns => 'month', :from => "2007-01-01", :to => "2007-12-31", :criterias => ["member", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "162.90", "%.2f" % assigns(:total_hours)
chris@37:   end
Chris@909: 
chris@37:   def test_report_one_day
chris@37:     get :report, :project_id => 1, :columns => 'day', :from => "2007-03-23", :to => "2007-03-23", :criterias => ["member", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "4.25", "%.2f" % assigns(:total_hours)
chris@37:   end
Chris@909: 
chris@37:   def test_report_at_issue_level
chris@37:     get :report, :project_id => 1, :issue_id => 1, :columns => 'month', :from => "2007-01-01", :to => "2007-12-31", :criterias => ["member", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "154.25", "%.2f" % assigns(:total_hours)
Chris@441:     assert_tag :form,
Chris@441:       :attributes => {:action => "/projects/ecookbook/issues/1/time_entries/report", :id => 'query_form'}
chris@37:   end
Chris@909: 
chris@37:   def test_report_custom_field_criteria
chris@37:     get :report, :project_id => 1, :criterias => ['project', 'cf_1', 'cf_7']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_not_nil assigns(:criterias)
chris@37:     assert_equal 3, assigns(:criterias).size
chris@37:     assert_equal "162.90", "%.2f" % assigns(:total_hours)
chris@37:     # Custom field column
chris@37:     assert_tag :tag => 'th', :content => 'Database'
chris@37:     # Custom field row
chris@37:     assert_tag :tag => 'td', :content => 'MySQL',
chris@37:                              :sibling => { :tag => 'td', :attributes => { :class => 'hours' },
chris@37:                                                          :child => { :tag => 'span', :attributes => { :class => 'hours hours-int' },
chris@37:                                                                                      :content => '1' }}
chris@37:     # Second custom field column
chris@37:     assert_tag :tag => 'th', :content => 'Billable'
chris@37:   end
Chris@909: 
chris@37:   def test_report_one_criteria_no_result
chris@37:     get :report, :project_id => 1, :columns => 'week', :from => "1998-04-01", :to => "1998-04-30", :criterias => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
chris@37:     assert_not_nil assigns(:total_hours)
chris@37:     assert_equal "0.00", "%.2f" % assigns(:total_hours)
chris@37:   end
Chris@909: 
chris@37:   def test_report_all_projects_csv_export
Chris@909:     get :report, :columns => 'month', :from => "2007-01-01", :to => "2007-06-30",
Chris@909:         :criterias => ["project", "member", "activity"], :format => "csv"
chris@37:     assert_response :success
chris@37:     assert_equal 'text/csv', @response.content_type
chris@37:     lines = @response.body.chomp.split("\n")
chris@37:     # Headers
Chris@909:     assert_equal 'Project,Member,Activity,2007-1,2007-2,2007-3,2007-4,2007-5,2007-6,Total',
Chris@909:                  lines.first
chris@37:     # Total row
chris@37:     assert_equal 'Total,"","","","",154.25,8.65,"","",162.90', lines.last
chris@37:   end
Chris@909: 
chris@37:   def test_report_csv_export
Chris@909:     get :report, :project_id => 1, :columns => 'month',
Chris@909:         :from => "2007-01-01", :to => "2007-06-30",
Chris@909:         :criterias => ["project", "member", "activity"], :format => "csv"
chris@37:     assert_response :success
chris@37:     assert_equal 'text/csv', @response.content_type
chris@37:     lines = @response.body.chomp.split("\n")
chris@37:     # Headers
Chris@909:     assert_equal 'Project,Member,Activity,2007-1,2007-2,2007-3,2007-4,2007-5,2007-6,Total',
Chris@909:                  lines.first
chris@37:     # Total row
chris@37:     assert_equal 'Total,"","","","",154.25,8.65,"","",162.90', lines.last
chris@37:   end
Chris@909: 
Chris@909:   def test_csv_big_5
Chris@909:     Setting.default_language = "zh-TW"
Chris@909:     str_utf8  = "\xe4\xb8\x80\xe6\x9c\x88"
Chris@909:     str_big5  = "\xa4@\xa4\xeb"
Chris@909:     if str_utf8.respond_to?(:force_encoding)
Chris@909:       str_utf8.force_encoding('UTF-8')
Chris@909:       str_big5.force_encoding('Big5')
Chris@909:     end
Chris@909:     user = User.find_by_id(3)
Chris@909:     user.firstname = str_utf8
Chris@909:     user.lastname  = "test-lastname"
Chris@909:     assert user.save
Chris@909:     comments = "test_csv_big_5"
Chris@909:     te1 = TimeEntry.create(:spent_on => '2011-11-11',
Chris@909:                            :hours    => 7.3,
Chris@909:                            :project  => Project.find(1),
Chris@909:                            :user     => user,
Chris@909:                            :activity => TimeEntryActivity.find_by_name('Design'),
Chris@909:                            :comments => comments)
Chris@909: 
Chris@909:     te2 = TimeEntry.find_by_comments(comments)
Chris@909:     assert_not_nil te2
Chris@909:     assert_equal 7.3, te2.hours
Chris@909:     assert_equal 3, te2.user_id
Chris@909: 
Chris@909:     get :report, :project_id => 1, :columns => 'day',
Chris@909:         :from => "2011-11-11", :to => "2011-11-11",
Chris@909:         :criterias => ["member"], :format => "csv"
Chris@909:     assert_response :success
Chris@909:     assert_equal 'text/csv', @response.content_type
Chris@909:     lines = @response.body.chomp.split("\n")    
Chris@909:     # Headers
Chris@909:     s1 = "\xa6\xa8\xad\xfb,2011-11-11,\xc1`\xadp"
Chris@909:     s2 = "\xc1`\xadp"
Chris@909:     if s1.respond_to?(:force_encoding)
Chris@909:       s1.force_encoding('Big5')
Chris@909:       s2.force_encoding('Big5')
Chris@909:     end
Chris@909:     assert_equal s1, lines.first
Chris@909:     # Total row
Chris@909:     assert_equal "#{str_big5} #{user.lastname},7.30,7.30", lines[1]
Chris@909:     assert_equal "#{s2},7.30,7.30", lines[2]
Chris@909: 
Chris@909:     str_tw = "Traditional Chinese (\xe7\xb9\x81\xe9\xab\x94\xe4\xb8\xad\xe6\x96\x87)"
Chris@909:     if str_tw.respond_to?(:force_encoding)
Chris@909:       str_tw.force_encoding('UTF-8')
Chris@909:     end
Chris@909:     assert_equal str_tw, l(:general_lang_name)
Chris@909:     assert_equal 'Big5', l(:general_csv_encoding)
Chris@909:     assert_equal ',', l(:general_csv_separator)
Chris@909:     assert_equal '.', l(:general_csv_decimal_separator)
Chris@909:   end
Chris@909: 
Chris@909:   def test_csv_cannot_convert_should_be_replaced_big_5
Chris@909:     Setting.default_language = "zh-TW"
Chris@909:     str_utf8  = "\xe4\xbb\xa5\xe5\x86\x85"
Chris@909:     if str_utf8.respond_to?(:force_encoding)
Chris@909:       str_utf8.force_encoding('UTF-8')
Chris@909:     end
Chris@909:     user = User.find_by_id(3)
Chris@909:     user.firstname = str_utf8
Chris@909:     user.lastname  = "test-lastname"
Chris@909:     assert user.save
Chris@909:     comments = "test_replaced"
Chris@909:     te1 = TimeEntry.create(:spent_on => '2011-11-11',
Chris@909:                            :hours    => 7.3,
Chris@909:                            :project  => Project.find(1),
Chris@909:                            :user     => user,
Chris@909:                            :activity => TimeEntryActivity.find_by_name('Design'),
Chris@909:                            :comments => comments)
Chris@909: 
Chris@909:     te2 = TimeEntry.find_by_comments(comments)
Chris@909:     assert_not_nil te2
Chris@909:     assert_equal 7.3, te2.hours
Chris@909:     assert_equal 3, te2.user_id
Chris@909: 
Chris@909:     get :report, :project_id => 1, :columns => 'day',
Chris@909:         :from => "2011-11-11", :to => "2011-11-11",
Chris@909:         :criterias => ["member"], :format => "csv"
Chris@909:     assert_response :success
Chris@909:     assert_equal 'text/csv', @response.content_type
Chris@909:     lines = @response.body.chomp.split("\n")    
Chris@909:     # Headers
Chris@909:     s1 = "\xa6\xa8\xad\xfb,2011-11-11,\xc1`\xadp"
Chris@909:     if s1.respond_to?(:force_encoding)
Chris@909:       s1.force_encoding('Big5')
Chris@909:     end
Chris@909:     assert_equal s1, lines.first
Chris@909:     # Total row
Chris@909:     s2 = ""
Chris@909:     if s2.respond_to?(:force_encoding)
Chris@909:       s2 = "\xa5H?"
Chris@909:       s2.force_encoding('Big5')
Chris@909:     elsif RUBY_PLATFORM == 'java'
Chris@909:       s2 = "??"
Chris@909:     else
Chris@909:       s2 = "\xa5H???"
Chris@909:     end
Chris@909:     assert_equal "#{s2} #{user.lastname},7.30,7.30", lines[1]
Chris@909:   end
Chris@909: 
Chris@909:   def test_csv_fr
Chris@909:     with_settings :default_language => "fr" do
Chris@909:       str1  = "test_csv_fr"
Chris@909:       user = User.find_by_id(3)
Chris@909:       te1 = TimeEntry.create(:spent_on => '2011-11-11',
Chris@909:                              :hours    => 7.3,
Chris@909:                              :project  => Project.find(1),
Chris@909:                              :user     => user,
Chris@909:                              :activity => TimeEntryActivity.find_by_name('Design'),
Chris@909:                              :comments => str1)
Chris@909: 
Chris@909:       te2 = TimeEntry.find_by_comments(str1)
Chris@909:       assert_not_nil te2
Chris@909:       assert_equal 7.3, te2.hours
Chris@909:       assert_equal 3, te2.user_id
Chris@909: 
Chris@909:       get :report, :project_id => 1, :columns => 'day',
Chris@909:           :from => "2011-11-11", :to => "2011-11-11",
Chris@909:           :criterias => ["member"], :format => "csv"
Chris@909:       assert_response :success
Chris@909:       assert_equal 'text/csv', @response.content_type
Chris@909:       lines = @response.body.chomp.split("\n")    
Chris@909:       # Headers
Chris@909:       s1 = "Membre;2011-11-11;Total"
Chris@909:       s2 = "Total"
Chris@909:       if s1.respond_to?(:force_encoding)
Chris@909:         s1.force_encoding('ISO-8859-1')
Chris@909:         s2.force_encoding('ISO-8859-1')
Chris@909:       end
Chris@909:       assert_equal s1, lines.first
Chris@909:       # Total row
Chris@909:       assert_equal "#{user.firstname} #{user.lastname};7,30;7,30", lines[1]
Chris@909:       assert_equal "#{s2};7,30;7,30", lines[2]
Chris@909: 
Chris@909:       str_fr = "Fran\xc3\xa7ais"
Chris@909:       if str_fr.respond_to?(:force_encoding)
Chris@909:         str_fr.force_encoding('UTF-8')
Chris@909:       end
Chris@909:       assert_equal str_fr, l(:general_lang_name)
Chris@909:       assert_equal 'ISO-8859-1', l(:general_csv_encoding)
Chris@909:       assert_equal ';', l(:general_csv_separator)
Chris@909:       assert_equal ',', l(:general_csv_decimal_separator)
Chris@909:     end
Chris@909:   end
chris@37: end