jro_apps/redmine Files · app/controllers/repositories_controller.rb

added simple svn statistics graphs, rendered using SVG::Graph...

added simple svn statistics graphs, rendered using SVG::Graph git-svn-id: http://redmine.rubyforge.org/svn/trunk@380 e93f8b46-1217-0410-a6f0-8f06a7374b81

Jean-Philippe Lang - - Load All Authors

File last commit:

r377:0ef114e00641


                r377:0ef114e00641

Download file

             repositories_controller.rb
        
                    187 lines
            
             | 5.7 KiB
            
                | text/x-ruby
            
             |
                RubyLexer
            
             / app / controllers / repositories_controller.rb
          
                    History
                
                 |
                  Source
                 | Raw
                 |Copy content
                 |Copy permalink

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
      # redMine - project management software

        Jean-Philippe Lang
    
SVN commits are now stored in the database, and added to the activity view and the search engine....

              r374
            
      # Copyright (C) 2006-2007  Jean-Philippe Lang

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
      #

      # This program is free software; you can redistribute it and/or

      # modify it under the terms of the GNU General Public License

      # as published by the Free Software Foundation; either version 2

      # of the License, or (at your option) any later version.

      # 

      # This program is distributed in the hope that it will be useful,

      # but WITHOUT ANY WARRANTY; without even the implied warranty of

      # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

      # GNU General Public License for more details.

      # 

      # You should have received a copy of the GNU General Public License

      # along with this program; if not, write to the Free Software

      # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
      require 'SVG/Graph/Bar'

      require 'SVG/Graph/BarHorizontal'

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
      class RepositoriesController < ApplicationController

        layout 'base'

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
        before_filter :find_project

        before_filter :authorize, :except => [:stats, :graph]

        before_filter :check_project_privacy, :only => [:stats, :graph]

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
        def show

        Jean-Philippe Lang
    
SVN commits are now stored in the database, and added to the activity view and the search engine....

              r374
            
          # get entries for the browse frame

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
          @entries = @repository.scm.entries('')

          show_error and return unless @entries

        Jean-Philippe Lang
    
SVN commits are now stored in the database, and added to the activity view and the search engine....

              r374
            
          # check if new revisions have been committed in the repository

          scm_latestrev = @entries.revisions.latest

          if Setting.autofetch_changesets? && scm_latestrev && ((@repository.latest_changeset.nil?) || (@repository.latest_changeset.revision < scm_latestrev.identifier.to_i))

            @repository.fetch_changesets

            @repository.reload

          end

          @changesets = @repository.changesets.find(:all, :limit => 5, :order => "committed_on DESC")

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
        end

        def browse

          @entries = @repository.scm.entries(@path, @rev)

          show_error and return unless @entries

        end

        def revisions

        Jean-Philippe Lang
    
SVN commits are now stored in the database, and added to the activity view and the search engine....

              r374
            
          unless @path == ''

            @entry = @repository.scm.entry(@path, @rev)  

            show_error and return unless @entry

          end

          @changesets = @repository.changesets_for_path(@path)

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
        end

        def entry

          if 'raw' == params[:format]

            content = @repository.scm.cat(@path, @rev)

            show_error and return unless content

            send_data content, :filename => @path.split('/').last

          end

        end

        def revision

        Jean-Philippe Lang
    
SVN commits are now stored in the database, and added to the activity view and the search engine....

              r374
            
          @changeset = @repository.changesets.find_by_revision(@rev)

          show_error and return unless @changeset

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
        end

        def diff

          @rev_to = params[:rev_to] || (@rev-1)

          @diff = @repository.scm.diff(params[:path], @rev, @rev_to)

          show_error and return unless @diff

        end

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
        def stats  

        end

        def graph

          data = nil    

          case params[:graph]

          when "commits_per_month"

            data = graph_commits_per_month(@repository)

          when "commits_per_author"

            data = graph_commits_per_author(@repository)

          end

          if data

            headers["Content-Type"] = "image/svg+xml"

            send_data(data, :type => "image/svg+xml", :disposition => "inline")

          else

            render_404

          end

        end

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
      private

        def find_project

          @project = Project.find(params[:id])

          @repository = @project.repository

        Jean-Philippe Lang
    
send a 404 when trying to access an unexisting repository...

              r325
            
          render_404 and return false unless @repository

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
          @path = params[:path].squeeze('/').gsub(/^\//, '') if params[:path]

          @path ||= ''

          @rev = params[:rev].to_i if params[:rev] and params[:rev].to_i > 0

        Jean-Philippe Lang
    
ActiveRecord::RecordNotFound exceptions handled more gracefully...

              r130
            
        rescue ActiveRecord::RecordNotFound

          render_404

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
        end

        def show_error

          flash.now[:notice] = l(:notice_scm_error)

          render :nothing => true, :layout => true

        end

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
        def graph_commits_per_month(repository)

          @date_to = Date.today

          @date_from = @date_to << 12

          commits_by_day = repository.changesets.count(:all, :group => :commit_date, :conditions => ["commit_date BETWEEN ? AND ?", @date_from, @date_to])

          commits_by_month = [0] * 12

          commits_by_day.each {|c| commits_by_month[c.first.to_date.months_ago] += c.last }

          changes_by_day = repository.changes.count(:all, :group => :commit_date)

          changes_by_month = [0] * 12

          changes_by_day.each {|c| changes_by_month[c.first.to_date.months_ago] += c.last }

          fields = []

          month_names = l(:actionview_datehelper_select_month_names_abbr).split(',')

          12.times {|m| fields << month_names[((Date.today.month - 1 - m) % 12)]}

          graph = SVG::Graph::Bar.new(

            :height => 300,

            :width => 500,

            :fields => fields.reverse,

            :stack => :side,

            :scale_integers => true,

            :step_x_labels => 2,

            :show_data_values => false,

            :graph_title => l(:label_commits_per_month),

            :show_graph_title => true

          )

          graph.add_data(

            :data => commits_by_month[0..11].reverse,

            :title => l(:label_revision_plural)

          )

          graph.add_data(

            :data => changes_by_month[0..11].reverse,

            :title => l(:label_change_plural)

          )

          graph.burn

        end

        def graph_commits_per_author(repository)

          commits_by_author = repository.changesets.count(:all, :group => :committer)

          commits_by_author.sort! {|x, y| x.last <=> y.last}

          fields = commits_by_author.collect {|r| r.first}

          data = commits_by_author.collect {|r| r.last}

          fields = fields + [""]*(10 - fields.length) if fields.length<10

          data = data + [0]*(10 - data.length) if data.length<10

          graph = SVG::Graph::BarHorizontal.new(

            :height => 300,

            :width => 500,

            :fields => fields,

            :stack => :side,

            :scale_integers => true,

            :show_data_values => false,

            :rotate_y_labels => false,

            :graph_title => l(:label_commits_per_author),

            :show_graph_title => true

          )

          graph.add_data(

            :data => data,

            :title => l(:label_revision_plural)

          )

          graph.burn

        end

        Jean-Philippe Lang
    
svn browser merged in trunk...

              r103
            
      end

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
      class Date

        def months_ago(date = Date.today)

          (date.year - self.year)*12 + (date.month - self.month)

        end

        def weeks_ago(date = Date.today)

          (date.year - self.year)*52 + (date.cweek - self.cweek)

        end

      end

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

Jean-Philippe Lang svn browser merged in trunk...	r103	# redMine - project management software
Jean-Philippe Lang SVN commits are now stored in the database, and added to the activity view and the search engine....	r374	# Copyright (C) 2006-2007 Jean-Philippe Lang
Jean-Philippe Lang svn browser merged in trunk...	r103	#
		# This program is free software; you can redistribute it and/or
		# modify it under the terms of the GNU General Public License
		# as published by the Free Software Foundation; either version 2
		# of the License, or (at your option) any later version.
		#
		# This program is distributed in the hope that it will be useful,
		# but WITHOUT ANY WARRANTY; without even the implied warranty of
		# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
		# GNU General Public License for more details.
		#
		# You should have received a copy of the GNU General Public License
		# along with this program; if not, write to the Free Software
		# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377	require 'SVG/Graph/Bar'
		require 'SVG/Graph/BarHorizontal'

Jean-Philippe Lang svn browser merged in trunk...	r103	class RepositoriesController < ApplicationController
		layout 'base'
Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377	before_filter :find_project
		before_filter :authorize, :except => [:stats, :graph]
		before_filter :check_project_privacy, :only => [:stats, :graph]

Jean-Philippe Lang svn browser merged in trunk...	r103	def show
Jean-Philippe Lang SVN commits are now stored in the database, and added to the activity view and the search engine....	r374	# get entries for the browse frame
Jean-Philippe Lang svn browser merged in trunk...	r103	@entries = @repository.scm.entries('')
		show_error and return unless @entries
Jean-Philippe Lang SVN commits are now stored in the database, and added to the activity view and the search engine....	r374	# check if new revisions have been committed in the repository
		scm_latestrev = @entries.revisions.latest
		if Setting.autofetch_changesets? && scm_latestrev && ((@repository.latest_changeset.nil?) \|\| (@repository.latest_changeset.revision < scm_latestrev.identifier.to_i))
		@repository.fetch_changesets
		@repository.reload
		end
		@changesets = @repository.changesets.find(:all, :limit => 5, :order => "committed_on DESC")
Jean-Philippe Lang svn browser merged in trunk...	r103	end

		def browse
		@entries = @repository.scm.entries(@path, @rev)
		show_error and return unless @entries
		end

		def revisions
Jean-Philippe Lang SVN commits are now stored in the database, and added to the activity view and the search engine....	r374	unless @path == ''
		@entry = @repository.scm.entry(@path, @rev)
		show_error and return unless @entry
		end
		@changesets = @repository.changesets_for_path(@path)
Jean-Philippe Lang svn browser merged in trunk...	r103	end

		def entry
		if 'raw' == params[:format]
		content = @repository.scm.cat(@path, @rev)
		show_error and return unless content
		send_data content, :filename => @path.split('/').last
		end
		end

		def revision
Jean-Philippe Lang SVN commits are now stored in the database, and added to the activity view and the search engine....	r374	@changeset = @repository.changesets.find_by_revision(@rev)
		show_error and return unless @changeset
Jean-Philippe Lang svn browser merged in trunk...	r103	end

		def diff
		@rev_to = params[:rev_to] \|\| (@rev-1)
		@diff = @repository.scm.diff(params[:path], @rev, @rev_to)
		show_error and return unless @diff
		end

Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377	def stats
		end

		def graph
		data = nil
		case params[:graph]
		when "commits_per_month"
		data = graph_commits_per_month(@repository)
		when "commits_per_author"
		data = graph_commits_per_author(@repository)
		end
		if data
		headers["Content-Type"] = "image/svg+xml"
		send_data(data, :type => "image/svg+xml", :disposition => "inline")
		else
		render_404
		end
		end

Jean-Philippe Lang svn browser merged in trunk...	r103	private
		def find_project
		@project = Project.find(params[:id])
		@repository = @project.repository
Jean-Philippe Lang send a 404 when trying to access an unexisting repository...	r325	render_404 and return false unless @repository
Jean-Philippe Lang svn browser merged in trunk...	r103	@path = params[:path].squeeze('/').gsub(/^\//, '') if params[:path]
		@path \|\|= ''
		@rev = params[:rev].to_i if params[:rev] and params[:rev].to_i > 0
Jean-Philippe Lang ActiveRecord::RecordNotFound exceptions handled more gracefully...	r130	rescue ActiveRecord::RecordNotFound
		render_404
Jean-Philippe Lang svn browser merged in trunk...	r103	end

		def show_error
		flash.now[:notice] = l(:notice_scm_error)
		render :nothing => true, :layout => true
		end
Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377
		def graph_commits_per_month(repository)
		@date_to = Date.today
		@date_from = @date_to << 12
		commits_by_day = repository.changesets.count(:all, :group => :commit_date, :conditions => ["commit_date BETWEEN ? AND ?", @date_from, @date_to])
		commits_by_month = [0] * 12
		commits_by_day.each {\|c\| commits_by_month[c.first.to_date.months_ago] += c.last }

		changes_by_day = repository.changes.count(:all, :group => :commit_date)
		changes_by_month = [0] * 12
		changes_by_day.each {\|c\| changes_by_month[c.first.to_date.months_ago] += c.last }

		fields = []
		month_names = l(:actionview_datehelper_select_month_names_abbr).split(',')
		12.times {\|m\| fields << month_names[((Date.today.month - 1 - m) % 12)]}

		graph = SVG::Graph::Bar.new(
		:height => 300,
		:width => 500,
		:fields => fields.reverse,
		:stack => :side,
		:scale_integers => true,
		:step_x_labels => 2,
		:show_data_values => false,
		:graph_title => l(:label_commits_per_month),
		:show_graph_title => true
		)

		graph.add_data(
		:data => commits_by_month[0..11].reverse,
		:title => l(:label_revision_plural)
		)

		graph.add_data(
		:data => changes_by_month[0..11].reverse,
		:title => l(:label_change_plural)
		)

		graph.burn
		end

		def graph_commits_per_author(repository)
		commits_by_author = repository.changesets.count(:all, :group => :committer)
		commits_by_author.sort! {\|x, y\| x.last <=> y.last}

		fields = commits_by_author.collect {\|r\| r.first}
		data = commits_by_author.collect {\|r\| r.last}

		fields = fields + [""]*(10 - fields.length) if fields.length<10
		data = data + [0]*(10 - data.length) if data.length<10

		graph = SVG::Graph::BarHorizontal.new(
		:height => 300,
		:width => 500,
		:fields => fields,
		:stack => :side,
		:scale_integers => true,
		:show_data_values => false,
		:rotate_y_labels => false,
		:graph_title => l(:label_commits_per_author),
		:show_graph_title => true
		)

		graph.add_data(
		:data => data,
		:title => l(:label_revision_plural)
		)

		graph.burn
		end

Jean-Philippe Lang svn browser merged in trunk...	r103	end
Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377
		class Date
		def months_ago(date = Date.today)
		(date.year - self.year)*12 + (date.month - self.month)
		end

		def weeks_ago(date = Date.today)
		(date.year - self.year)*52 + (date.cweek - self.cweek)
		end
		end