Chris@0: # Redmine - project management software
Chris@441: # Copyright (C) 2006-2011  Jean-Philippe Lang
Chris@0: #
Chris@0: # This program is free software; you can redistribute it and/or
Chris@0: # modify it under the terms of the GNU General Public License
Chris@0: # as published by the Free Software Foundation; either version 2
Chris@0: # of the License, or (at your option) any later version.
Chris@441: #
Chris@0: # This program is distributed in the hope that it will be useful,
Chris@0: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@0: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@0: # GNU General Public License for more details.
Chris@441: #
Chris@0: # You should have received a copy of the GNU General Public License
Chris@0: # along with this program; if not, write to the Free Software
Chris@0: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@0: 
Chris@0: require 'SVG/Graph/Bar'
Chris@0: require 'SVG/Graph/BarHorizontal'
Chris@0: require 'digest/sha1'
Chris@0: 
Chris@0: class ChangesetNotFound < Exception; end
Chris@0: class InvalidRevisionParam < Exception; end
Chris@0: 
Chris@0: class RepositoriesController < ApplicationController
Chris@0:   menu_item :repository
Chris@0:   menu_item :settings, :only => :edit
Chris@0:   default_search_scope :changesets
Chris@441: 
Chris@0:   before_filter :find_repository, :except => :edit
Chris@0:   before_filter :find_project, :only => :edit
Chris@0:   before_filter :authorize
Chris@507:   accept_rss_auth :revisions
Chris@441: 
Chris@0:   rescue_from Redmine::Scm::Adapters::CommandFailed, :with => :show_error_command_failed
Chris@441: 
Chris@0:   def edit
Chris@0:     @repository = @project.repository
Chris@441:     if !@repository && !params[:repository_scm].blank?
Chris@0:       @repository = Repository.factory(params[:repository_scm])
Chris@0:       @repository.project = @project if @repository
Chris@0:     end
Chris@0:     if request.post? && @repository
Chris@441:       p1 = params[:repository]
Chris@441:       p       = {}
Chris@441:       p_extra = {}
Chris@441:       p1.each do |k, v|
Chris@441:         if k =~ /^extra_/
Chris@441:           p_extra[k] = v
Chris@441:         else
Chris@441:           p[k] = v
Chris@441:         end
Chris@441:       end
Chris@441:       @repository.attributes = p
Chris@441:       @repository.merge_extra_info(p_extra)
Chris@0:       @repository.save
Chris@0:     end
Chris@0:     render(:update) do |page|
Chris@441:       page.replace_html "tab-content-repository",
Chris@441:                         :partial => 'projects/settings/repository'
Chris@0:       if @repository && !@project.repository
Chris@441:         @project.reload # needed to reload association
Chris@0:         page.replace_html "main-menu", render_main_menu(@project)
Chris@0:       end
Chris@0:     end
Chris@0:   end
Chris@441: 
Chris@0:   def committers
Chris@0:     @committers = @repository.committers
Chris@0:     @users = @project.users
Chris@0:     additional_user_ids = @committers.collect(&:last).collect(&:to_i) - @users.collect(&:id)
Chris@0:     @users += User.find_all_by_id(additional_user_ids) unless additional_user_ids.empty?
Chris@0:     @users.compact!
Chris@0:     @users.sort!
Chris@0:     if request.post? && params[:committers].is_a?(Hash)
Chris@0:       # Build a hash with repository usernames as keys and corresponding user ids as values
Chris@0:       @repository.committer_ids = params[:committers].values.inject({}) {|h, c| h[c.first] = c.last; h}
Chris@0:       flash[:notice] = l(:notice_successful_update)
Chris@0:       redirect_to :action => 'committers', :id => @project
Chris@0:     end
Chris@0:   end
Chris@245: 
Chris@0:   def destroy
Chris@0:     @repository.destroy
Chris@441:     redirect_to :controller => 'projects',
Chris@441:                 :action     => 'settings',
Chris@441:                 :id         => @project,
Chris@441:                 :tab        => 'repository'
Chris@0:   end
Chris@245: 
Chris@245:   def show
Chris@0:     @repository.fetch_changesets if Setting.autofetch_changesets? && @path.empty?
Chris@0: 
Chris@0:     @entries = @repository.entries(@path, @rev)
Chris@441:     @changeset = @repository.find_changeset_by_name(@rev)
Chris@0:     if request.xhr?
Chris@0:       @entries ? render(:partial => 'dir_list_content') : render(:nothing => true)
Chris@0:     else
Chris@0:       (show_error_not_found; return) unless @entries
Chris@0:       @changesets = @repository.latest_changesets(@path, @rev)
Chris@0:       @properties = @repository.properties(@path, @rev)
Chris@0:       render :action => 'show'
Chris@0:     end
Chris@0:   end
Chris@0: 
Chris@0:   alias_method :browse, :show
Chris@245: 
Chris@0:   def changes
Chris@0:     @entry = @repository.entry(@path, @rev)
Chris@0:     (show_error_not_found; return) unless @entry
Chris@0:     @changesets = @repository.latest_changesets(@path, @rev, Setting.repository_log_display_limit.to_i)
Chris@0:     @properties = @repository.properties(@path, @rev)
Chris@210:     @changeset = @repository.find_changeset_by_name(@rev)
Chris@0:   end
Chris@245: 
Chris@0:   def revisions
Chris@0:     @changeset_count = @repository.changesets.count
Chris@0:     @changeset_pages = Paginator.new self, @changeset_count,
Chris@245:                                      per_page_option,
Chris@245:                                      params['page']
Chris@0:     @changesets = @repository.changesets.find(:all,
Chris@245:                        :limit  =>  @changeset_pages.items_per_page,
Chris@245:                        :offset =>  @changeset_pages.current.offset,
Chris@245:                        :include => [:user, :repository])
Chris@0: 
Chris@0:     respond_to do |format|
Chris@0:       format.html { render :layout => false if request.xhr? }
Chris@0:       format.atom { render_feed(@changesets, :title => "#{@project.name}: #{l(:label_revision_plural)}") }
Chris@0:     end
Chris@0:   end
Chris@245: 
Chris@0:   def entry
Chris@0:     @entry = @repository.entry(@path, @rev)
Chris@0:     (show_error_not_found; return) unless @entry
Chris@0: 
Chris@0:     # If the entry is a dir, show the browser
Chris@0:     (show; return) if @entry.is_dir?
Chris@0: 
Chris@0:     @content = @repository.cat(@path, @rev)
Chris@0:     (show_error_not_found; return) unless @content
Chris@441:     if 'raw' == params[:format] ||
Chris@441:          (@content.size && @content.size > Setting.file_max_size_displayed.to_i.kilobyte) ||
Chris@441:          ! is_entry_text_data?(@content, @path)
Chris@0:       # Force the download
Chris@441:       send_opt = { :filename => filename_for_content_disposition(@path.split('/').last) }
Chris@441:       send_type = Redmine::MimeType.of(@path)
Chris@441:       send_opt[:type] = send_type.to_s if send_type
Chris@441:       send_data @content, send_opt
Chris@0:     else
Chris@0:       # Prevent empty lines when displaying a file with Windows style eol
Chris@441:       # TODO: UTF-16
Chris@441:       # Is this needs? AttachmentsController reads file simply.
Chris@0:       @content.gsub!("\r\n", "\n")
Chris@210:       @changeset = @repository.find_changeset_by_name(@rev)
Chris@441:     end
Chris@0:   end
Chris@210: 
Chris@441:   def is_entry_text_data?(ent, path)
Chris@441:     # UTF-16 contains "\x00".
Chris@441:     # It is very strict that file contains less than 30% of ascii symbols
Chris@441:     # in non Western Europe.
Chris@441:     return true if Redmine::MimeType.is_type?('text', path)
Chris@441:     # Ruby 1.8.6 has a bug of integer divisions.
Chris@441:     # http://apidock.com/ruby/v1_8_6_287/String/is_binary_data%3F
Chris@441:     return false if ent.is_binary_data?
Chris@441:     true
Chris@441:   end
Chris@441:   private :is_entry_text_data?
Chris@441: 
Chris@0:   def annotate
Chris@0:     @entry = @repository.entry(@path, @rev)
Chris@0:     (show_error_not_found; return) unless @entry
Chris@245: 
Chris@0:     @annotate = @repository.scm.annotate(@path, @rev)
Chris@0:     (render_error l(:error_scm_annotate); return) if @annotate.nil? || @annotate.empty?
Chris@210:     @changeset = @repository.find_changeset_by_name(@rev)
Chris@0:   end
Chris@210: 
Chris@0:   def revision
Chris@128:     raise ChangesetNotFound if @rev.blank?
Chris@0:     @changeset = @repository.find_changeset_by_name(@rev)
Chris@0:     raise ChangesetNotFound unless @changeset
Chris@0: 
Chris@0:     respond_to do |format|
Chris@0:       format.html
Chris@0:       format.js {render :layout => false}
Chris@0:     end
Chris@0:   rescue ChangesetNotFound
Chris@0:     show_error_not_found
Chris@0:   end
Chris@245: 
Chris@0:   def diff
Chris@0:     if params[:format] == 'diff'
Chris@0:       @diff = @repository.diff(@path, @rev, @rev_to)
Chris@0:       (show_error_not_found; return) unless @diff
Chris@0:       filename = "changeset_r#{@rev}"
Chris@0:       filename << "_r#{@rev_to}" if @rev_to
Chris@0:       send_data @diff.join, :filename => "#{filename}.diff",
Chris@0:                             :type => 'text/x-patch',
Chris@0:                             :disposition => 'attachment'
Chris@0:     else
Chris@0:       @diff_type = params[:type] || User.current.pref[:diff_type] || 'inline'
Chris@0:       @diff_type = 'inline' unless %w(inline sbs).include?(@diff_type)
Chris@441: 
Chris@0:       # Save diff type as user preference
Chris@0:       if User.current.logged? && @diff_type != User.current.pref[:diff_type]
Chris@0:         User.current.pref[:diff_type] = @diff_type
Chris@0:         User.current.preference.save
Chris@0:       end
Chris@441:       @cache_key = "repositories/diff/#{@repository.id}/" + 
Chris@507:                       Digest::MD5.hexdigest("#{@path}-#{@rev}-#{@rev_to}-#{@diff_type}-#{current_language}")
Chris@0:       unless read_fragment(@cache_key)
Chris@0:         @diff = @repository.diff(@path, @rev, @rev_to)
Chris@0:         show_error_not_found unless @diff
Chris@0:       end
Chris@119: 
Chris@119:       @changeset = @repository.find_changeset_by_name(@rev)
Chris@119:       @changeset_to = @rev_to ? @repository.find_changeset_by_name(@rev_to) : nil
Chris@119:       @diff_format_revisions = @repository.diff_format_revisions(@changeset, @changeset_to)
Chris@0:     end
Chris@0:   end
Chris@119: 
Chris@245:   def stats
Chris@0:   end
Chris@245: 
Chris@0:   def graph
Chris@245:     data = nil
Chris@0:     case params[:graph]
Chris@0:     when "commits_per_month"
Chris@0:       data = graph_commits_per_month(@repository)
Chris@0:     when "commits_per_author"
Chris@0:       data = graph_commits_per_author(@repository)
Chris@0:     end
Chris@0:     if data
Chris@0:       headers["Content-Type"] = "image/svg+xml"
Chris@0:       send_data(data, :type => "image/svg+xml", :disposition => "inline")
Chris@0:     else
Chris@0:       render_404
Chris@0:     end
Chris@0:   end
Chris@441: 
Chris@119:   private
Chris@119: 
Chris@119:   REV_PARAM_RE = %r{\A[a-f0-9]*\Z}i
Chris@119: 
Chris@0:   def find_repository
Chris@0:     @project = Project.find(params[:id])
Chris@0:     @repository = @project.repository
Chris@0:     (render_404; return false) unless @repository
Chris@0:     @path = params[:path].join('/') unless params[:path].nil?
Chris@0:     @path ||= ''
Chris@0:     @rev = params[:rev].blank? ? @repository.default_branch : params[:rev].strip
Chris@0:     @rev_to = params[:rev_to]
Chris@441: 
Chris@245:     unless @rev.to_s.match(REV_PARAM_RE) && @rev_to.to_s.match(REV_PARAM_RE)
Chris@119:       if @repository.branches.blank?
Chris@119:         raise InvalidRevisionParam
Chris@119:       end
Chris@119:     end
Chris@0:   rescue ActiveRecord::RecordNotFound
Chris@0:     render_404
Chris@0:   rescue InvalidRevisionParam
Chris@0:     show_error_not_found
Chris@0:   end
Chris@0: 
Chris@0:   def show_error_not_found
Chris@128:     render_error :message => l(:error_scm_not_found), :status => 404
Chris@0:   end
Chris@441: 
Chris@0:   # Handler for Redmine::Scm::Adapters::CommandFailed exception
Chris@0:   def show_error_command_failed(exception)
Chris@0:     render_error l(:error_scm_command_failed, exception.message)
Chris@0:   end
Chris@441: 
Chris@0:   def graph_commits_per_month(repository)
Chris@0:     @date_to = Date.today
Chris@0:     @date_from = @date_to << 11
Chris@0:     @date_from = Date.civil(@date_from.year, @date_from.month, 1)
Chris@441:     commits_by_day = repository.changesets.count(
Chris@441:                           :all, :group => :commit_date,
Chris@441:                           :conditions => ["commit_date BETWEEN ? AND ?", @date_from, @date_to])
Chris@0:     commits_by_month = [0] * 12
Chris@0:     commits_by_day.each {|c| commits_by_month[c.first.to_date.months_ago] += c.last }
Chris@0: 
Chris@441:     changes_by_day = repository.changes.count(
Chris@441:                           :all, :group => :commit_date,
Chris@441:                           :conditions => ["commit_date BETWEEN ? AND ?", @date_from, @date_to])
Chris@0:     changes_by_month = [0] * 12
Chris@0:     changes_by_day.each {|c| changes_by_month[c.first.to_date.months_ago] += c.last }
Chris@441: 
Chris@0:     fields = []
Chris@0:     12.times {|m| fields << month_name(((Date.today.month - 1 - m) % 12) + 1)}
Chris@441: 
Chris@0:     graph = SVG::Graph::Bar.new(
Chris@0:       :height => 300,
Chris@0:       :width => 800,
Chris@0:       :fields => fields.reverse,
Chris@0:       :stack => :side,
Chris@0:       :scale_integers => true,
Chris@0:       :step_x_labels => 2,
Chris@0:       :show_data_values => false,
Chris@0:       :graph_title => l(:label_commits_per_month),
Chris@0:       :show_graph_title => true
Chris@0:     )
Chris@441: 
Chris@0:     graph.add_data(
Chris@0:       :data => commits_by_month[0..11].reverse,
Chris@0:       :title => l(:label_revision_plural)
Chris@0:     )
Chris@0: 
Chris@0:     graph.add_data(
Chris@0:       :data => changes_by_month[0..11].reverse,
Chris@0:       :title => l(:label_change_plural)
Chris@0:     )
Chris@441: 
Chris@0:     graph.burn
Chris@0:   end
Chris@0: 
Chris@0:   def graph_commits_per_author(repository)
Chris@0:     commits_by_author = repository.changesets.count(:all, :group => :committer)
Chris@0:     commits_by_author.to_a.sort! {|x, y| x.last <=> y.last}
Chris@0: 
Chris@0:     changes_by_author = repository.changes.count(:all, :group => :committer)
Chris@0:     h = changes_by_author.inject({}) {|o, i| o[i.first] = i.last; o}
Chris@441: 
Chris@0:     fields = commits_by_author.collect {|r| r.first}
Chris@0:     commits_data = commits_by_author.collect {|r| r.last}
Chris@0:     changes_data = commits_by_author.collect {|r| h[r.first] || 0}
Chris@441: 
Chris@0:     fields = fields + [""]*(10 - fields.length) if fields.length<10
Chris@0:     commits_data = commits_data + [0]*(10 - commits_data.length) if commits_data.length<10
Chris@0:     changes_data = changes_data + [0]*(10 - changes_data.length) if changes_data.length<10
Chris@441: 
Chris@0:     # Remove email adress in usernames
Chris@0:     fields = fields.collect {|c| c.gsub(%r{<.+@.+>}, '') }
Chris@441: 
Chris@0:     graph = SVG::Graph::BarHorizontal.new(
Chris@0:       :height => 400,
Chris@0:       :width => 800,
Chris@0:       :fields => fields,
Chris@0:       :stack => :side,
Chris@0:       :scale_integers => true,
Chris@0:       :show_data_values => false,
Chris@0:       :rotate_y_labels => false,
Chris@0:       :graph_title => l(:label_commits_per_author),
Chris@0:       :show_graph_title => true
Chris@0:     )
Chris@0:     graph.add_data(
Chris@0:       :data => commits_data,
Chris@0:       :title => l(:label_revision_plural)
Chris@0:     )
Chris@0:     graph.add_data(
Chris@0:       :data => changes_data,
Chris@0:       :title => l(:label_change_plural)
Chris@0:     )
Chris@0:     graph.burn
Chris@0:   end
Chris@441: end
Chris@0: 
Chris@0: class Date
Chris@0:   def months_ago(date = Date.today)
Chris@0:     (date.year - self.year)*12 + (date.month - self.month)
Chris@0:   end
Chris@0: 
Chris@0:   def weeks_ago(date = Date.today)
Chris@0:     (date.year - self.year)*52 + (date.cweek - self.cweek)
Chris@0:   end
Chris@0: end
Chris@0: 
Chris@0: class String
Chris@0:   def with_leading_slash
Chris@0:     starts_with?('/') ? self : "/#{self}"
Chris@0:   end
Chris@0: end