Chris@909: class TimeEntryReportsController < ApplicationController
Chris@909:   menu_item :issues
Chris@909:   before_filter :find_optional_project
Chris@909:   before_filter :load_available_criterias
Chris@909: 
Chris@909:   helper :sort
Chris@909:   include SortHelper
Chris@909:   helper :issues
Chris@909:   helper :timelog
Chris@909:   include TimelogHelper
Chris@909:   helper :custom_fields
Chris@909:   include CustomFieldsHelper
Chris@909: 
Chris@909:   def report
Chris@909:     @criterias = params[:criterias] || []
Chris@909:     @criterias = @criterias.select{|criteria| @available_criterias.has_key? criteria}
Chris@909:     @criterias.uniq!
Chris@909:     @criterias = @criterias[0,3]
Chris@909: 
Chris@909:     @columns = (params[:columns] && %w(year month week day).include?(params[:columns])) ? params[:columns] : 'month'
Chris@909: 
Chris@909:     retrieve_date_range
Chris@909: 
Chris@909:     unless @criterias.empty?
Chris@909:       sql_select = @criterias.collect{|criteria| @available_criterias[criteria][:sql] + " AS " + criteria}.join(', ')
Chris@909:       sql_group_by = @criterias.collect{|criteria| @available_criterias[criteria][:sql]}.join(', ')
Chris@909:       sql_condition = ''
Chris@909: 
Chris@909:       if @project.nil?
Chris@909:         sql_condition = Project.allowed_to_condition(User.current, :view_time_entries)
Chris@909:       elsif @issue.nil?
Chris@909:         sql_condition = @project.project_condition(Setting.display_subprojects_issues?)
Chris@909:       else
Chris@909:         sql_condition = "#{Issue.table_name}.root_id = #{@issue.root_id} AND #{Issue.table_name}.lft >= #{@issue.lft} AND #{Issue.table_name}.rgt <= #{@issue.rgt}"
Chris@909:       end
Chris@909: 
Chris@909:       sql = "SELECT #{sql_select}, tyear, tmonth, tweek, spent_on, SUM(hours) AS hours"
Chris@909:       sql << " FROM #{TimeEntry.table_name}"
Chris@909:       sql << time_report_joins
Chris@909:       sql << " WHERE"
Chris@909:       sql << " (%s) AND" % sql_condition
Chris@909:       sql << " (spent_on BETWEEN '%s' AND '%s')" % [ActiveRecord::Base.connection.quoted_date(@from), ActiveRecord::Base.connection.quoted_date(@to)]
Chris@909:       sql << " GROUP BY #{sql_group_by}, tyear, tmonth, tweek, spent_on"
Chris@909: 
Chris@909:       @hours = ActiveRecord::Base.connection.select_all(sql)
Chris@909: 
Chris@909:       @hours.each do |row|
Chris@909:         case @columns
Chris@909:         when 'year'
Chris@909:           row['year'] = row['tyear']
Chris@909:         when 'month'
Chris@909:           row['month'] = "#{row['tyear']}-#{row['tmonth']}"
Chris@909:         when 'week'
Chris@909:           row['week'] = "#{row['tyear']}-#{row['tweek']}"
Chris@909:         when 'day'
Chris@909:           row['day'] = "#{row['spent_on']}"
Chris@909:         end
Chris@909:       end
Chris@909: 
Chris@909:       @total_hours = @hours.inject(0) {|s,k| s = s + k['hours'].to_f}
Chris@909: 
Chris@909:       @periods = []
Chris@909:       # Date#at_beginning_of_ not supported in Rails 1.2.x
Chris@909:       date_from = @from.to_time
Chris@909:       # 100 columns max
Chris@909:       while date_from <= @to.to_time && @periods.length < 100
Chris@909:         case @columns
Chris@909:         when 'year'
Chris@909:           @periods << "#{date_from.year}"
Chris@909:           date_from = (date_from + 1.year).at_beginning_of_year
Chris@909:         when 'month'
Chris@909:           @periods << "#{date_from.year}-#{date_from.month}"
Chris@909:           date_from = (date_from + 1.month).at_beginning_of_month
Chris@909:         when 'week'
Chris@909:           @periods << "#{date_from.year}-#{date_from.to_date.cweek}"
Chris@909:           date_from = (date_from + 7.day).at_beginning_of_week
Chris@909:         when 'day'
Chris@909:           @periods << "#{date_from.to_date}"
Chris@909:           date_from = date_from + 1.day
Chris@909:         end
Chris@909:       end
Chris@909:     end
Chris@909: 
Chris@909:     respond_to do |format|
Chris@909:       format.html { render :layout => !request.xhr? }
Chris@909:       format.csv  { send_data(report_to_csv(@criterias, @periods, @hours), :type => 'text/csv; header=present', :filename => 'timelog.csv') }
Chris@909:     end
Chris@909:   end
Chris@909: 
Chris@909:   private
Chris@909: 
Chris@909:   # TODO: duplicated in TimelogController
Chris@909:   def find_optional_project
Chris@909:     if !params[:issue_id].blank?
Chris@909:       @issue = Issue.find(params[:issue_id])
Chris@909:       @project = @issue.project
Chris@909:     elsif !params[:project_id].blank?
Chris@909:       @project = Project.find(params[:project_id])
Chris@909:     end
Chris@909:     deny_access unless User.current.allowed_to?(:view_time_entries, @project, :global => true)
Chris@909:   end
Chris@909: 
Chris@909:   # Retrieves the date range based on predefined ranges or specific from/to param dates
Chris@909:   # TODO: duplicated in TimelogController
Chris@909:   def retrieve_date_range
Chris@909:     @free_period = false
Chris@909:     @from, @to = nil, nil
Chris@909: 
Chris@909:     if params[:period_type] == '1' || (params[:period_type].nil? && !params[:period].nil?)
Chris@909:       case params[:period].to_s
Chris@909:       when 'today'
Chris@909:         @from = @to = Date.today
Chris@909:       when 'yesterday'
Chris@909:         @from = @to = Date.today - 1
Chris@909:       when 'current_week'
Chris@909:         @from = Date.today - (Date.today.cwday - 1)%7
Chris@909:         @to = @from + 6
Chris@909:       when 'last_week'
Chris@909:         @from = Date.today - 7 - (Date.today.cwday - 1)%7
Chris@909:         @to = @from + 6
Chris@909:       when '7_days'
Chris@909:         @from = Date.today - 7
Chris@909:         @to = Date.today
Chris@909:       when 'current_month'
Chris@909:         @from = Date.civil(Date.today.year, Date.today.month, 1)
Chris@909:         @to = (@from >> 1) - 1
Chris@909:       when 'last_month'
Chris@909:         @from = Date.civil(Date.today.year, Date.today.month, 1) << 1
Chris@909:         @to = (@from >> 1) - 1
Chris@909:       when '30_days'
Chris@909:         @from = Date.today - 30
Chris@909:         @to = Date.today
Chris@909:       when 'current_year'
Chris@909:         @from = Date.civil(Date.today.year, 1, 1)
Chris@909:         @to = Date.civil(Date.today.year, 12, 31)
Chris@909:       end
Chris@909:     elsif params[:period_type] == '2' || (params[:period_type].nil? && (!params[:from].nil? || !params[:to].nil?))
Chris@909:       begin; @from = params[:from].to_s.to_date unless params[:from].blank?; rescue; end
Chris@909:       begin; @to = params[:to].to_s.to_date unless params[:to].blank?; rescue; end
Chris@909:       @free_period = true
Chris@909:     else
Chris@909:       # default
Chris@909:     end
Chris@909: 
Chris@909:     @from, @to = @to, @from if @from && @to && @from > @to
Chris@909:     @from ||= (TimeEntry.earilest_date_for_project(@project) || Date.today)
Chris@909:     @to   ||= (TimeEntry.latest_date_for_project(@project) || Date.today)
Chris@909:   end
Chris@909: 
Chris@909:   def load_available_criterias
Chris@909:     @available_criterias = { 'project' => {:sql => "#{TimeEntry.table_name}.project_id",
Chris@909:                                           :klass => Project,
Chris@909:                                           :label => :label_project},
Chris@909:                              'version' => {:sql => "#{Issue.table_name}.fixed_version_id",
Chris@909:                                           :klass => Version,
Chris@909:                                           :label => :label_version},
Chris@909:                              'category' => {:sql => "#{Issue.table_name}.category_id",
Chris@909:                                             :klass => IssueCategory,
Chris@909:                                             :label => :field_category},
Chris@909:                              'member' => {:sql => "#{TimeEntry.table_name}.user_id",
Chris@909:                                          :klass => User,
Chris@909:                                          :label => :label_member},
Chris@909:                              'tracker' => {:sql => "#{Issue.table_name}.tracker_id",
Chris@909:                                           :klass => Tracker,
Chris@909:                                           :label => :label_tracker},
Chris@909:                              'activity' => {:sql => "#{TimeEntry.table_name}.activity_id",
Chris@909:                                            :klass => TimeEntryActivity,
Chris@909:                                            :label => :label_activity},
Chris@909:                              'issue' => {:sql => "#{TimeEntry.table_name}.issue_id",
Chris@909:                                          :klass => Issue,
Chris@909:                                          :label => :label_issue}
Chris@909:                            }
Chris@909: 
Chris@909:     # Add list and boolean custom fields as available criterias
Chris@909:     custom_fields = (@project.nil? ? IssueCustomField.for_all : @project.all_issue_custom_fields)
Chris@909:     custom_fields.select {|cf| %w(list bool).include? cf.field_format }.each do |cf|
Chris@909:       @available_criterias["cf_#{cf.id}"] = {:sql => "(SELECT c.value FROM #{CustomValue.table_name} c WHERE c.custom_field_id = #{cf.id} AND c.customized_type = 'Issue' AND c.customized_id = #{Issue.table_name}.id)",
Chris@909:                                              :format => cf.field_format,
Chris@909:                                              :label => cf.name}
Chris@909:     end if @project
Chris@909: 
Chris@909:     # Add list and boolean time entry custom fields
Chris@909:     TimeEntryCustomField.find(:all).select {|cf| %w(list bool).include? cf.field_format }.each do |cf|
Chris@909:       @available_criterias["cf_#{cf.id}"] = {:sql => "(SELECT c.value FROM #{CustomValue.table_name} c WHERE c.custom_field_id = #{cf.id} AND c.customized_type = 'TimeEntry' AND c.customized_id = #{TimeEntry.table_name}.id)",
Chris@909:                                              :format => cf.field_format,
Chris@909:                                              :label => cf.name}
Chris@909:     end
Chris@909: 
Chris@909:     # Add list and boolean time entry activity custom fields
Chris@909:     TimeEntryActivityCustomField.find(:all).select {|cf| %w(list bool).include? cf.field_format }.each do |cf|
Chris@909:       @available_criterias["cf_#{cf.id}"] = {:sql => "(SELECT c.value FROM #{CustomValue.table_name} c WHERE c.custom_field_id = #{cf.id} AND c.customized_type = 'Enumeration' AND c.customized_id = #{TimeEntry.table_name}.activity_id)",
Chris@909:                                              :format => cf.field_format,
Chris@909:                                              :label => cf.name}
Chris@909:     end
Chris@909: 
Chris@909:     call_hook(:controller_timelog_available_criterias, { :available_criterias => @available_criterias, :project => @project })
Chris@909:     @available_criterias
Chris@909:   end
Chris@909: 
Chris@909:   def time_report_joins
Chris@909:     sql = ''
Chris@909:     sql << " LEFT JOIN #{Issue.table_name} ON #{TimeEntry.table_name}.issue_id = #{Issue.table_name}.id"
Chris@909:     sql << " LEFT JOIN #{Project.table_name} ON #{TimeEntry.table_name}.project_id = #{Project.table_name}.id"
Chris@909:     # TODO: rename hook
Chris@909:     call_hook(:controller_timelog_time_report_joins, {:sql => sql} )
Chris@909:     sql
Chris@909:   end
Chris@909: 
Chris@909: end