chris@37: # -*- coding: utf-8 -*-
Chris@1464: # Redmine - project management software
Chris@1494: # Copyright (C) 2006-2014  Jean-Philippe Lang
Chris@1464: #
Chris@1464: # This program is free software; you can redistribute it and/or
Chris@1464: # modify it under the terms of the GNU General Public License
Chris@1464: # as published by the Free Software Foundation; either version 2
Chris@1464: # of the License, or (at your option) any later version.
Chris@1464: #
Chris@1464: # This program is distributed in the hope that it will be useful,
Chris@1464: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@1464: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@1464: # GNU General Public License for more details.
Chris@1464: #
Chris@1464: # You should have received a copy of the GNU General Public License
Chris@1464: # along with this program; if not, write to the Free Software
Chris@1464: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@1464: 
Chris@119: require File.expand_path('../../test_helper', __FILE__)
chris@37: 
chris@37: class TimeEntryReportsControllerTest < ActionController::TestCase
Chris@1115:   tests TimelogController
Chris@1115: 
Chris@909:   fixtures :projects, :enabled_modules, :roles, :members, :member_roles,
Chris@909:            :issues, :time_entries, :users, :trackers, :enumerations,
Chris@1517:            :issue_statuses, :custom_fields, :custom_values,
Chris@1517:            :projects_trackers, :custom_fields_trackers,
Chris@1517:            :custom_fields_projects
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@1115:     get :report, :columns => 'week', :from => "2007-04-01", :to => "2007-04-30", :criteria => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "8.65", "%.2f" % assigns(:report).total_hours
chris@37:   end
chris@37: 
chris@37:   def test_report_all_time
Chris@1115:     get :report, :project_id => 1, :criteria => ['project', 'issue']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "162.90", "%.2f" % assigns(:report).total_hours
chris@37:   end
chris@37: 
chris@37:   def test_report_all_time_by_day
Chris@1115:     get :report, :project_id => 1, :criteria => ['project', 'issue'], :columns => 'day'
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "162.90", "%.2f" % assigns(:report).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@1115:     get :report, :project_id => 1, :columns => 'week', :from => "2007-04-01", :to => "2007-04-30", :criteria => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "8.65", "%.2f" % assigns(:report).total_hours
chris@37:   end
Chris@909: 
Chris@1115:   def test_report_two_criteria
Chris@1464:     get :report, :project_id => 1, :columns => 'month', :from => "2007-01-01", :to => "2007-12-31", :criteria => ["user", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "162.90", "%.2f" % assigns(:report).total_hours
Chris@1115:   end
Chris@1115: 
Chris@1517:   def test_report_custom_field_criteria_with_multiple_values_on_single_value_custom_field_should_not_fail
Chris@1115:     field = TimeEntryCustomField.create!(:name => 'multi', :field_format => 'list', :possible_values => ['value1', 'value2'])
Chris@1115:     entry = TimeEntry.create!(:project => Project.find(1), :hours => 1, :activity_id => 10, :user => User.find(2), :spent_on => Date.today)
Chris@1115:     CustomValue.create!(:customized => entry, :custom_field => field, :value => 'value1')
Chris@1115:     CustomValue.create!(:customized => entry, :custom_field => field, :value => 'value2')
Chris@1115: 
Chris@1115:     get :report, :project_id => 1, :columns => 'day', :criteria => ["cf_#{field.id}"]
Chris@1115:     assert_response :success
chris@37:   end
Chris@909: 
Chris@1517:   def test_report_multiple_values_custom_fields_should_not_be_proposed
Chris@1517:     TimeEntryCustomField.create!(:name => 'Single', :field_format => 'list', :possible_values => ['value1', 'value2'])
Chris@1517:     TimeEntryCustomField.create!(:name => 'Multi', :field_format => 'list', :multiple => true, :possible_values => ['value1', 'value2'])
Chris@1517: 
Chris@1517:     get :report, :project_id => 1
Chris@1517:     assert_response :success
Chris@1517:     assert_select 'select[name=?]', 'criteria[]' do
Chris@1517:       assert_select 'option', :text => 'Single'
Chris@1517:       assert_select 'option', :text => 'Multi', :count => 0
Chris@1517:     end
Chris@1517:   end
Chris@1517: 
chris@37:   def test_report_one_day
Chris@1464:     get :report, :project_id => 1, :columns => 'day', :from => "2007-03-23", :to => "2007-03-23", :criteria => ["user", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "4.25", "%.2f" % assigns(:report).total_hours
chris@37:   end
Chris@909: 
chris@37:   def test_report_at_issue_level
Chris@1464:     get :report, :project_id => 1, :issue_id => 1, :columns => 'month', :from => "2007-01-01", :to => "2007-12-31", :criteria => ["user", "activity"]
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "154.25", "%.2f" % assigns(:report).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@1464:   def test_report_by_week_should_use_commercial_year
Chris@1464:     TimeEntry.delete_all
Chris@1464:     TimeEntry.generate!(:hours => '2', :spent_on => '2009-12-25') # 2009-52
Chris@1464:     TimeEntry.generate!(:hours => '4', :spent_on => '2009-12-31') # 2009-53
Chris@1464:     TimeEntry.generate!(:hours => '8', :spent_on => '2010-01-01') # 2009-53
Chris@1464:     TimeEntry.generate!(:hours => '16', :spent_on => '2010-01-05') # 2010-1
Chris@1464: 
Chris@1464:     get :report, :columns => 'week', :from => "2009-12-25", :to => "2010-01-05", :criteria => ["project"]
Chris@1464:     assert_response :success
Chris@1464: 
Chris@1464:     assert_select '#time-report thead tr' do
Chris@1464:       assert_select 'th:nth-child(1)', :text => 'Project'
Chris@1464:       assert_select 'th:nth-child(2)', :text => '2009-52'
Chris@1464:       assert_select 'th:nth-child(3)', :text => '2009-53'
Chris@1464:       assert_select 'th:nth-child(4)', :text => '2010-1'
Chris@1464:       assert_select 'th:nth-child(5)', :text => 'Total time'
Chris@1464:     end
Chris@1464:     assert_select '#time-report tbody tr' do
Chris@1464:       assert_select 'td:nth-child(1)', :text => 'eCookbook'
Chris@1464:       assert_select 'td:nth-child(2)', :text => '2.00'
Chris@1464:       assert_select 'td:nth-child(3)', :text => '12.00'
Chris@1464:       assert_select 'td:nth-child(4)', :text => '16.00'
Chris@1464:       assert_select 'td:nth-child(5)', :text => '30.00' # Total
Chris@1464:     end
Chris@1464:   end
Chris@1464: 
Chris@1464:   def test_report_should_propose_association_custom_fields
Chris@1464:     get :report
Chris@1464:     assert_response :success
Chris@1464:     assert_template 'report'
Chris@1464: 
Chris@1464:     assert_select 'select[name=?]', 'criteria[]' do
Chris@1464:       assert_select 'option[value=cf_1]', {:text => 'Database'}, 'Issue custom field not found'
Chris@1464:       assert_select 'option[value=cf_3]', {:text => 'Development status'}, 'Project custom field not found'
Chris@1464:       assert_select 'option[value=cf_7]', {:text => 'Billable'}, 'TimeEntryActivity custom field not found'
Chris@1464:     end
Chris@1464:   end
Chris@1464: 
Chris@1464:   def test_report_with_association_custom_fields
Chris@1464:     get :report, :criteria => ['cf_1', 'cf_3', 'cf_7']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal 3, assigns(:report).criteria.size
Chris@1115:     assert_equal "162.90", "%.2f" % assigns(:report).total_hours
Chris@1464: 
Chris@1464:     # Custom fields columns
Chris@1464:     assert_select 'th', :text => 'Database'
Chris@1464:     assert_select 'th', :text => 'Development status'
Chris@1464:     assert_select 'th', :text => 'Billable'
Chris@1464: 
chris@37:     # Custom field row
Chris@1464:     assert_select 'tr' do
Chris@1464:       assert_select 'td', :text => 'MySQL'
Chris@1464:       assert_select 'td.hours', :text => '1.00'
Chris@1464:     end
chris@37:   end
Chris@909: 
chris@37:   def test_report_one_criteria_no_result
Chris@1115:     get :report, :project_id => 1, :columns => 'week', :from => "1998-04-01", :to => "1998-04-30", :criteria => ['project']
chris@37:     assert_response :success
chris@37:     assert_template 'report'
Chris@1115:     assert_not_nil assigns(:report)
Chris@1115:     assert_equal "0.00", "%.2f" % assigns(:report).total_hours
Chris@1115:   end
Chris@1115: 
Chris@1115:   def test_report_status_criterion
Chris@1115:     get :report, :project_id => 1, :criteria => ['status']
Chris@1115:     assert_response :success
Chris@1115:     assert_template 'report'
Chris@1115:     assert_tag :tag => 'th', :content => 'Status'
Chris@1115:     assert_tag :tag => 'td', :content => 'New'
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@1464:         :criteria => ["project", "user", "activity"], :format => "csv"
chris@37:     assert_response :success
Chris@1115:     assert_equal 'text/csv; header=present', @response.content_type
chris@37:     lines = @response.body.chomp.split("\n")
chris@37:     # Headers
Chris@1464:     assert_equal 'Project,User,Activity,2007-3,2007-4,Total time', lines.first
chris@37:     # Total row
Chris@1464:     assert_equal 'Total time,"","",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@1464:         :criteria => ["project", "user", "activity"], :format => "csv"
chris@37:     assert_response :success
Chris@1115:     assert_equal 'text/csv; header=present', @response.content_type
chris@37:     lines = @response.body.chomp.split("\n")
chris@37:     # Headers
Chris@1464:     assert_equal 'Project,User,Activity,2007-3,2007-4,Total time', lines.first
chris@37:     # Total row
Chris@1464:     assert_equal 'Total time,"","",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@1464:         :criteria => ["user"], :format => "csv"
Chris@909:     assert_response :success
Chris@1115:     assert_equal 'text/csv; header=present', @response.content_type
Chris@909:     lines = @response.body.chomp.split("\n")    
Chris@909:     # Headers
Chris@1464:     s1 = "\xa5\xce\xa4\xe1,2011-11-11,\xa4u\xae\xc9\xc1`\xadp"
Chris@1464:     s2 = "\xa4u\xae\xc9\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@1464:         :criteria => ["user"], :format => "csv"
Chris@909:     assert_response :success
Chris@1115:     assert_equal 'text/csv; header=present', @response.content_type
Chris@909:     lines = @response.body.chomp.split("\n")    
Chris@909:     # Headers
Chris@1464:     s1 = "\xa5\xce\xa4\xe1,2011-11-11,\xa4u\xae\xc9\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@1464:           :criteria => ["user"], :format => "csv"
Chris@909:       assert_response :success
Chris@1115:       assert_equal 'text/csv; header=present', @response.content_type
Chris@909:       lines = @response.body.chomp.split("\n")    
Chris@909:       # Headers
Chris@1464:       s1 = "Utilisateur;2011-11-11;Temps total"
Chris@1464:       s2 = "Temps 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