Chris@441: # Redmine - project management software
Chris@1115: # Copyright (C) 2006-2012  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@909: class ScmFetchError < Exception; end
Chris@909: 
Chris@0: class Repository < ActiveRecord::Base
Chris@245:   include Redmine::Ciphering
Chris@1115:   include Redmine::SafeAttributes
Chris@1115: 
Chris@1115:   # Maximum length for repository identifiers
Chris@1115:   IDENTIFIER_MAX_LENGTH = 255
Chris@441: 
Chris@0:   belongs_to :project
Chris@0:   has_many :changesets, :order => "#{Changeset.table_name}.committed_on DESC, #{Changeset.table_name}.id DESC"
Chris@1115:   has_many :filechanges, :class_name => 'Change', :through => :changesets
Chris@441: 
Chris@441:   serialize :extra_info
Chris@441: 
Chris@1115:   before_save :check_default
Chris@1115: 
Chris@0:   # Raw SQL to delete changesets and changes in the database
Chris@0:   # has_many :changesets, :dependent => :destroy is too slow for big repositories
Chris@0:   before_destroy :clear_changesets
Chris@441: 
Chris@245:   validates_length_of :password, :maximum => 255, :allow_nil => true
Chris@1115:   validates_length_of :identifier, :maximum => IDENTIFIER_MAX_LENGTH, :allow_blank => true
Chris@1115:   validates_presence_of :identifier, :unless => Proc.new { |r| r.is_default? || r.set_as_default? }
Chris@1115:   validates_uniqueness_of :identifier, :scope => :project_id, :allow_blank => true
Chris@1115:   validates_exclusion_of :identifier, :in => %w(show entry raw changes annotate diff show stats graph)
Chris@1115:   # donwcase letters, digits, dashes, underscores but not digits only
Chris@1115:   validates_format_of :identifier, :with => /^(?!\d+$)[a-z0-9\-_]*$/, :allow_blank => true
Chris@0:   # Checks if the SCM is enabled when creating a repository
Chris@909:   validate :repo_create_validation, :on => :create
Chris@909: 
Chris@1115:   safe_attributes 'identifier',
Chris@1115:     'login',
Chris@1115:     'password',
Chris@1115:     'path_encoding',
Chris@1115:     'log_encoding',
Chris@1115:     'is_default'
Chris@1115: 
Chris@1115:   safe_attributes 'url',
Chris@1115:     :if => lambda {|repository, user| repository.new_record?}
Chris@1115: 
Chris@909:   def repo_create_validation
Chris@909:     unless Setting.enabled_scm.include?(self.class.name.demodulize)
Chris@909:       errors.add(:type, :invalid)
Chris@909:     end
Chris@909:   end
Chris@245: 
Chris@1115:   def self.human_attribute_name(attribute_key_name, *args)
Chris@1115:     attr_name = attribute_key_name.to_s
Chris@441:     if attr_name == "log_encoding"
Chris@441:       attr_name = "commit_logs_encoding"
Chris@441:     end
Chris@1115:     super(attr_name, *args)
Chris@441:   end
Chris@441: 
Chris@0:   # Removes leading and trailing whitespace
Chris@0:   def url=(arg)
Chris@0:     write_attribute(:url, arg ? arg.to_s.strip : nil)
Chris@0:   end
Chris@245: 
Chris@0:   # Removes leading and trailing whitespace
Chris@0:   def root_url=(arg)
Chris@0:     write_attribute(:root_url, arg ? arg.to_s.strip : nil)
Chris@0:   end
Chris@441: 
Chris@245:   def password
Chris@245:     read_ciphered_attribute(:password)
Chris@245:   end
Chris@441: 
Chris@245:   def password=(arg)
Chris@245:     write_ciphered_attribute(:password, arg)
Chris@245:   end
Chris@245: 
Chris@245:   def scm_adapter
Chris@245:     self.class.scm_adapter_class
Chris@245:   end
Chris@0: 
Chris@0:   def scm
Chris@1115:     unless @scm
Chris@1115:       @scm = self.scm_adapter.new(url, root_url,
Chris@245:                                   login, password, path_encoding)
Chris@1115:       if root_url.blank? && @scm.root_url.present?
Chris@1115:         update_attribute(:root_url, @scm.root_url)
Chris@1115:       end
Chris@1115:     end
Chris@0:     @scm
Chris@0:   end
Chris@245: 
Chris@0:   def scm_name
Chris@0:     self.class.scm_name
Chris@0:   end
Chris@245: 
Chris@1115:   def name
Chris@1115:     if identifier.present?
Chris@1115:       identifier
Chris@1115:     elsif is_default?
Chris@1115:       l(:field_repository_is_default)
Chris@1115:     else
Chris@1115:       scm_name
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@1115:   def identifier=(identifier)
Chris@1115:     super unless identifier_frozen?
Chris@1115:   end
Chris@1115: 
Chris@1115:   def identifier_frozen?
Chris@1115:     errors[:identifier].blank? && !(new_record? || identifier.blank?)
Chris@1115:   end
Chris@1115: 
Chris@1115:   def identifier_param
Chris@1115:     if is_default?
Chris@1115:       nil
Chris@1115:     elsif identifier.present?
Chris@1115:       identifier
Chris@1115:     else
Chris@1115:       id.to_s
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@1115:   def <=>(repository)
Chris@1115:     if is_default?
Chris@1115:       -1
Chris@1115:     elsif repository.is_default?
Chris@1115:       1
Chris@1115:     else
Chris@1115:       identifier.to_s <=> repository.identifier.to_s
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@1115:   def self.find_by_identifier_param(param)
Chris@1115:     if param.to_s =~ /^\d+$/
Chris@1115:       find_by_id(param)
Chris@1115:     else
Chris@1115:       find_by_identifier(param)
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@441:   def merge_extra_info(arg)
Chris@441:     h = extra_info || {}
Chris@441:     return h if arg.nil?
Chris@441:     h.merge!(arg)
Chris@441:     write_attribute(:extra_info, h)
Chris@441:   end
Chris@441: 
Chris@441:   def report_last_commit
Chris@441:     true
Chris@441:   end
Chris@441: 
Chris@0:   def supports_cat?
Chris@0:     scm.supports_cat?
Chris@0:   end
Chris@0: 
Chris@0:   def supports_annotate?
Chris@0:     scm.supports_annotate?
Chris@0:   end
Chris@441: 
Chris@441:   def supports_all_revisions?
Chris@441:     true
Chris@441:   end
Chris@441: 
Chris@441:   def supports_directory_revisions?
Chris@441:     false
Chris@441:   end
Chris@441: 
Chris@909:   def supports_revision_graph?
Chris@909:     false
Chris@909:   end
Chris@909: 
Chris@0:   def entry(path=nil, identifier=nil)
Chris@0:     scm.entry(path, identifier)
Chris@0:   end
Chris@441: 
Chris@0:   def entries(path=nil, identifier=nil)
Chris@1115:     entries = scm.entries(path, identifier)
Chris@1115:     load_entries_changesets(entries)
Chris@1115:     entries
Chris@0:   end
Chris@0: 
Chris@0:   def branches
Chris@0:     scm.branches
Chris@0:   end
Chris@0: 
Chris@0:   def tags
Chris@0:     scm.tags
Chris@0:   end
Chris@0: 
Chris@0:   def default_branch
Chris@507:     nil
Chris@0:   end
Chris@441: 
Chris@0:   def properties(path, identifier=nil)
Chris@0:     scm.properties(path, identifier)
Chris@0:   end
Chris@441: 
Chris@0:   def cat(path, identifier=nil)
Chris@0:     scm.cat(path, identifier)
Chris@0:   end
Chris@441: 
Chris@0:   def diff(path, rev, rev_to)
Chris@0:     scm.diff(path, rev, rev_to)
Chris@0:   end
Chris@119: 
Chris@119:   def diff_format_revisions(cs, cs_to, sep=':')
Chris@119:     text = ""
Chris@119:     text << cs_to.format_identifier + sep if cs_to
Chris@119:     text << cs.format_identifier if cs
Chris@119:     text
Chris@119:   end
Chris@119: 
Chris@0:   # Returns a path relative to the url of the repository
Chris@0:   def relative_path(path)
Chris@0:     path
Chris@0:   end
Chris@128: 
Chris@0:   # Finds and returns a revision with a number or the beginning of a hash
Chris@0:   def find_changeset_by_name(name)
Chris@128:     return nil if name.blank?
Chris@1115:     s = name.to_s
Chris@1115:     changesets.find(:first, :conditions => (s.match(/^\d*$/) ?
Chris@1115:           ["revision = ?", s] : ["revision LIKE ?", s + '%']))
Chris@0:   end
Chris@128: 
Chris@0:   def latest_changeset
Chris@0:     @latest_changeset ||= changesets.find(:first)
Chris@0:   end
Chris@0: 
Chris@0:   # Returns the latest changesets for +path+
Chris@0:   # Default behaviour is to search in cached changesets
Chris@0:   def latest_changesets(path, rev, limit=10)
Chris@0:     if path.blank?
Chris@441:       changesets.find(
Chris@441:          :all,
Chris@441:          :include => :user,
Chris@441:          :order => "#{Changeset.table_name}.committed_on DESC, #{Changeset.table_name}.id DESC",
Chris@441:          :limit => limit)
Chris@0:     else
Chris@1115:       filechanges.find(
Chris@441:          :all,
Chris@441:          :include => {:changeset => :user},
Chris@441:          :conditions => ["path = ?", path.with_leading_slash],
Chris@441:          :order => "#{Changeset.table_name}.committed_on DESC, #{Changeset.table_name}.id DESC",
Chris@441:          :limit => limit
Chris@441:        ).collect(&:changeset)
Chris@0:     end
Chris@0:   end
Chris@441: 
Chris@0:   def scan_changesets_for_issue_ids
Chris@0:     self.changesets.each(&:scan_comment_for_issue_ids)
Chris@0:   end
Chris@0: 
Chris@0:   # Returns an array of committers usernames and associated user_id
Chris@0:   def committers
Chris@441:     @committers ||= Changeset.connection.select_rows(
Chris@441:          "SELECT DISTINCT committer, user_id FROM #{Changeset.table_name} WHERE repository_id = #{id}")
Chris@0:   end
Chris@441: 
Chris@0:   # Maps committers username to a user ids
Chris@0:   def committer_ids=(h)
Chris@0:     if h.is_a?(Hash)
Chris@0:       committers.each do |committer, user_id|
Chris@0:         new_user_id = h[committer]
Chris@0:         if new_user_id && (new_user_id.to_i != user_id.to_i)
Chris@0:           new_user_id = (new_user_id.to_i > 0 ? new_user_id.to_i : nil)
Chris@441:           Changeset.update_all(
Chris@441:                "user_id = #{ new_user_id.nil? ? 'NULL' : new_user_id }",
Chris@441:                ["repository_id = ? AND committer = ?", id, committer])
Chris@0:         end
Chris@0:       end
Chris@441:       @committers            = nil
Chris@0:       @found_committer_users = nil
Chris@0:       true
Chris@0:     else
Chris@0:       false
Chris@0:     end
Chris@0:   end
Chris@441: 
Chris@0:   # Returns the Redmine User corresponding to the given +committer+
Chris@0:   # It will return nil if the committer is not yet mapped and if no User
Chris@0:   # with the same username or email was found
Chris@0:   def find_committer_user(committer)
Chris@0:     unless committer.blank?
Chris@0:       @found_committer_users ||= {}
Chris@0:       return @found_committer_users[committer] if @found_committer_users.has_key?(committer)
Chris@441: 
Chris@0:       user = nil
Chris@0:       c = changesets.find(:first, :conditions => {:committer => committer}, :include => :user)
Chris@0:       if c && c.user
Chris@0:         user = c.user
Chris@0:       elsif committer.strip =~ /^([^<]+)(<(.*)>)?$/
Chris@0:         username, email = $1.strip, $3
Chris@0:         u = User.find_by_login(username)
Chris@0:         u ||= User.find_by_mail(email) unless email.blank?
Chris@0:         user = u
Chris@0:       end
Chris@0:       @found_committer_users[committer] = user
Chris@0:       user
Chris@0:     end
Chris@0:   end
Chris@245: 
Chris@245:   def repo_log_encoding
Chris@245:     encoding = log_encoding.to_s.strip
Chris@245:     encoding.blank? ? 'UTF-8' : encoding
Chris@245:   end
Chris@245: 
Chris@0:   # Fetches new changesets for all repositories of active projects
Chris@0:   # Can be called periodically by an external script
Chris@0:   # eg. ruby script/runner "Repository.fetch_changesets"
Chris@0:   def self.fetch_changesets
Chris@1115:     Project.active.has_module(:repository).all.each do |project|
Chris@1115:       project.repositories.each do |repository|
Chris@245:         begin
Chris@1115:           repository.fetch_changesets
Chris@245:         rescue Redmine::Scm::Adapters::CommandFailed => e
Chris@245:           logger.error "scm: error during fetching changesets: #{e.message}"
Chris@245:         end
Chris@0:       end
Chris@0:     end
Chris@0:   end
Chris@245: 
Chris@0:   # scan changeset comments to find related and fixed issues for all repositories
Chris@0:   def self.scan_changesets_for_issue_ids
Chris@0:     find(:all).each(&:scan_changesets_for_issue_ids)
Chris@0:   end
Chris@0: 
Chris@0:   def self.scm_name
Chris@0:     'Abstract'
Chris@0:   end
Chris@441: 
Chris@0:   def self.available_scm
Chris@0:     subclasses.collect {|klass| [klass.scm_name, klass.name]}
Chris@0:   end
Chris@245: 
Chris@0:   def self.factory(klass_name, *args)
Chris@0:     klass = "Repository::#{klass_name}".constantize
Chris@0:     klass.new(*args)
Chris@0:   rescue
Chris@0:     nil
Chris@0:   end
Chris@245: 
chris@437:   def clear_cache
chris@437:     clear_changesets
chris@437:   end
Chris@443:     
Chris@245:   def self.scm_adapter_class
Chris@245:     nil
Chris@245:   end
Chris@245: 
Chris@245:   def self.scm_command
Chris@245:     ret = ""
Chris@245:     begin
Chris@245:       ret = self.scm_adapter_class.client_command if self.scm_adapter_class
Chris@441:     rescue Exception => e
Chris@245:       logger.error "scm: error during get command: #{e.message}"
Chris@245:     end
Chris@245:     ret
Chris@245:   end
Chris@245: 
Chris@245:   def self.scm_version_string
Chris@245:     ret = ""
Chris@245:     begin
Chris@245:       ret = self.scm_adapter_class.client_version_string if self.scm_adapter_class
Chris@441:     rescue Exception => e
Chris@245:       logger.error "scm: error during get version string: #{e.message}"
Chris@245:     end
Chris@245:     ret
Chris@245:   end
Chris@245: 
Chris@245:   def self.scm_available
Chris@245:     ret = false
Chris@245:     begin
Chris@441:       ret = self.scm_adapter_class.client_available if self.scm_adapter_class
Chris@441:     rescue Exception => e
Chris@245:       logger.error "scm: error during get scm available: #{e.message}"
Chris@245:     end
Chris@245:     ret
Chris@245:   end
Chris@245: 
Chris@1115:   def set_as_default?
Chris@1115:     new_record? && project && !Repository.first(:conditions => {:project_id => project.id})
Chris@1115:   end
Chris@1115: 
Chris@1115:   protected
Chris@1115: 
Chris@1115:   def check_default
Chris@1115:     if !is_default? && set_as_default?
Chris@1115:       self.is_default = true
Chris@1115:     end
Chris@1115:     if is_default? && is_default_changed?
Chris@1115:       Repository.update_all(["is_default = ?", false], ["project_id = ?", project_id])
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@1115:   def load_entries_changesets(entries)
Chris@1115:     if entries
Chris@1115:       entries.each do |entry|
Chris@1115:         if entry.lastrev && entry.lastrev.identifier
Chris@1115:           entry.changeset = find_changeset_by_name(entry.lastrev.identifier)
Chris@1115:         end
Chris@1115:       end
Chris@1115:     end
Chris@1115:   end
Chris@1115: 
Chris@0:   private
Chris@245: 
Chris@1115:   # Deletes repository data
Chris@0:   def clear_changesets
Chris@1115:     cs = Changeset.table_name
Chris@1115:     ch = Change.table_name
Chris@1115:     ci = "#{table_name_prefix}changesets_issues#{table_name_suffix}"
Chris@1115:     cp = "#{table_name_prefix}changeset_parents#{table_name_suffix}"
Chris@1115: 
Chris@0:     connection.delete("DELETE FROM #{ch} WHERE #{ch}.changeset_id IN (SELECT #{cs}.id FROM #{cs} WHERE #{cs}.repository_id = #{id})")
Chris@0:     connection.delete("DELETE FROM #{ci} WHERE #{ci}.changeset_id IN (SELECT #{cs}.id FROM #{cs} WHERE #{cs}.repository_id = #{id})")
Chris@1115:     connection.delete("DELETE FROM #{cp} WHERE #{cp}.changeset_id IN (SELECT #{cs}.id FROM #{cs} WHERE #{cs}.repository_id = #{id})")
Chris@0:     connection.delete("DELETE FROM #{cs} WHERE #{cs}.repository_id = #{id}")
Chris@1115:     clear_extra_info_of_changesets
Chris@1115:   end
Chris@1115: 
Chris@1115:   def clear_extra_info_of_changesets
Chris@0:   end
Chris@0: end