SoundSoftware Code Site

# Redmine - project management software

# Copyright (C) 2006-2011  Jean-Philippe Lang

#

# 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.

require File.expand_path('../../test_helper', __FILE__)

class RepositoryTest < ActiveSupport::TestCase

  fixtures :projects,

           :trackers,

           :projects_trackers,

           :enabled_modules,

           :repositories,

           :issues,

           :issue_statuses,

           :issue_categories,

           :changesets,

           :changes,

           :users,

           :members,

           :member_roles,

           :roles,

           :enumerations

  def setup

    @repository = Project.find(1).repository

  end

  def test_create

    repository = Repository::Subversion.new(:project => Project.find(3))

    assert !repository.save

    repository.url = "svn://localhost"

    assert repository.save

    repository.reload

    project = Project.find(3)

    assert_equal repository, project.repository

  end

  def test_destroy

    changesets = Changeset.count(:all, :conditions => "repository_id = 10")

    changes = Change.count(:all, :conditions => "repository_id = 10",

                           :include => :changeset)

    assert_difference 'Changeset.count', -changesets do

      assert_difference 'Change.count', -changes do

        Repository.find(10).destroy

      end

    end

  end

  def test_should_not_create_with_disabled_scm

    # disable Subversion

    with_settings :enabled_scm => ['Darcs', 'Git'] do

      repository = Repository::Subversion.new(

                      :project => Project.find(3), :url => "svn://localhost")

      assert !repository.save

      assert_equal I18n.translate('activerecord.errors.messages.invalid'),

                                  repository.errors.on(:type)

    end

  end

  def test_scan_changesets_for_issue_ids

    Setting.default_language = 'en'

    Setting.notified_events = ['issue_added','issue_updated']

    # choosing a status to apply to fix issues

    Setting.commit_fix_status_id = IssueStatus.find(

                                     :first,

                                     :conditions => ["is_closed = ?", true]).id

    Setting.commit_fix_done_ratio = "90"

    Setting.commit_ref_keywords = 'refs , references, IssueID'

    Setting.commit_fix_keywords = 'fixes , closes'

    Setting.default_language = 'en'

    ActionMailer::Base.deliveries.clear

    # make sure issue 1 is not already closed

    fixed_issue = Issue.find(1)

    assert !fixed_issue.status.is_closed?

    old_status = fixed_issue.status

    Repository.scan_changesets_for_issue_ids

    assert_equal [101, 102], Issue.find(3).changeset_ids

    # fixed issues

    fixed_issue.reload

    assert fixed_issue.status.is_closed?

    assert_equal 90, fixed_issue.done_ratio

    assert_equal [101], fixed_issue.changeset_ids

    # issue change

    journal = fixed_issue.journals.find(:first, :order => 'created_on desc')

    assert_equal User.find_by_login('dlopper'), journal.user

    assert_equal 'Applied in changeset r2.', journal.notes

    # 2 email notifications

    assert_equal 2, ActionMailer::Base.deliveries.size

    mail = ActionMailer::Base.deliveries.first

    assert_kind_of TMail::Mail, mail

    assert mail.subject.starts_with?(

        "[#{fixed_issue.project.name} - #{fixed_issue.tracker.name} ##{fixed_issue.id}]")

    assert mail.body.include?(

        "Status changed from #{old_status} to #{fixed_issue.status}")

    # ignoring commits referencing an issue of another project

    assert_equal [], Issue.find(4).changesets

  end

  def test_for_changeset_comments_strip

    repository = Repository::Mercurial.create(

                    :project => Project.find( 4 ),

                    :url => '/foo/bar/baz' )

    comment = <<-COMMENT

    This is a loooooooooooooooooooooooooooong comment                                                   

    COMMENT

    changeset = Changeset.new(

      :comments => comment, :commit_date => Time.now,

      :revision => 0, :scmid => 'f39b7922fb3c',

      :committer => 'foo <foo@example.com>',

      :committed_on => Time.now, :repository => repository )

    assert( changeset.save )

    assert_not_equal( comment, changeset.comments )

    assert_equal( 'This is a loooooooooooooooooooooooooooong comment',

                  changeset.comments )

  end

  def test_for_urls_strip_cvs

    repository = Repository::Cvs.create(

        :project => Project.find(4),

        :url => ' :pserver:login:password@host:/path/to/the/repository',

        :root_url => 'foo  ',

        :log_encoding => 'UTF-8')

    assert repository.save

    repository.reload

    assert_equal ':pserver:login:password@host:/path/to/the/repository',

                  repository.url

    assert_equal 'foo', repository.root_url

  end

  def test_for_urls_strip_subversion

    repository = Repository::Subversion.create(

        :project => Project.find(4),

        :url => ' file:///dummy   ')

    assert repository.save

    repository.reload

    assert_equal 'file:///dummy', repository.url

  end

  def test_for_urls_strip_git

    repository = Repository::Git.create(

        :project => Project.find(4),

        :url => ' c:\dummy   ')

    assert repository.save

    repository.reload

    assert_equal 'c:\dummy', repository.url

  end

  def test_manual_user_mapping

    assert_no_difference "Changeset.count(:conditions => 'user_id <> 2')" do

      c = Changeset.create!(

              :repository => @repository,

              :committer => 'foo',

              :committed_on => Time.now,

              :revision => 100,

              :comments => 'Committed by foo.'

            )

      assert_nil c.user

      @repository.committer_ids = {'foo' => '2'}

      assert_equal User.find(2), c.reload.user

      # committer is now mapped

      c = Changeset.create!(

              :repository => @repository,

              :committer => 'foo',

              :committed_on => Time.now,

              :revision => 101,

              :comments => 'Another commit by foo.'

            )

      assert_equal User.find(2), c.user

    end

  end

  def test_auto_user_mapping_by_username

    c = Changeset.create!(

          :repository   => @repository,

          :committer    => 'jsmith',

          :committed_on => Time.now,

          :revision     => 100,

          :comments     => 'Committed by john.'

        )

    assert_equal User.find(2), c.user

  end

  def test_auto_user_mapping_by_email

    c = Changeset.create!(

          :repository   => @repository,

          :committer    => 'john <jsmith@somenet.foo>',

          :committed_on => Time.now,

          :revision     => 100,

          :comments     => 'Committed by john.'

        )

    assert_equal User.find(2), c.user

  end

  def test_filesystem_avaialbe

    klass = Repository::Filesystem

    assert klass.scm_adapter_class

    assert_equal true, klass.scm_available

  end

  def test_merge_extra_info

    repo = Repository::Subversion.new(:project => Project.find(3))

    assert !repo.save

    repo.url = "svn://localhost"

    assert repo.save

    repo.reload

    project = Project.find(3)

    assert_equal repo, project.repository

    assert_nil repo.extra_info

    h1 = {"test_1" => {"test_11" => "test_value_11"}}

    repo.merge_extra_info(h1)

    assert_equal h1, repo.extra_info

    h2 = {"test_2" => {

                   "test_21" => "test_value_21",

                   "test_22" => "test_value_22",

                  }}

    repo.merge_extra_info(h2)

    assert_equal (h = {"test_11" => "test_value_11"}),

                 repo.extra_info["test_1"]

    assert_equal "test_value_21",

                 repo.extra_info["test_2"]["test_21"]

    h3 = {"test_2" => {

                   "test_23" => "test_value_23",

                   "test_24" => "test_value_24",

                  }}

    repo.merge_extra_info(h3)

    assert_equal (h = {"test_11" => "test_value_11"}),

                 repo.extra_info["test_1"]

    assert_nil repo.extra_info["test_2"]["test_21"]

    assert_equal "test_value_23",

                 repo.extra_info["test_2"]["test_23"]

  end

end

module CodeRay

module Scanners

  # Scanner for JSON (JavaScript Object Notation).

  class JSON < Scanner

    register_for :json

    file_extension 'json'

    KINDS_NOT_LOC = [

      :float, :char, :content, :delimiter,

      :error, :integer, :operator, :value,

    ]  # :nodoc:

    ESCAPE = / [bfnrt\\"\/] /x  # :nodoc:

    UNICODE_ESCAPE = / u[a-fA-F0-9]{4} /x  # :nodoc:

  protected

    # See http://json.org/ for a definition of the JSON lexic/grammar.

    def scan_tokens encoder, options

      state = :initial

      stack = []

      key_expected = false

      until eos?

        case state

        when :initial

          if match = scan(/ \s+ /x)

            encoder.text_token match, :space

          elsif match = scan(/"/)

            state = key_expected ? :key : :string

            encoder.begin_group state

            encoder.text_token match, :delimiter

          elsif match = scan(/ [:,\[{\]}] /x)

            encoder.text_token match, :operator

            case match

            when ':' then key_expected = false

            when ',' then key_expected = true if stack.last == :object

            when '{' then stack << :object; key_expected = true

            when '[' then stack << :array

            when '}', ']' then stack.pop  # no error recovery, but works for valid JSON

            end

          elsif match = scan(/ true | false | null /x)

            encoder.text_token match, :value

          elsif match = scan(/ -? (?: 0 | [1-9]\d* ) /x)

            if scan(/ \.\d+ (?:[eE][-+]?\d+)? | [eE][-+]? \d+ /x)

              match << matched

              encoder.text_token match, :float

            else

              encoder.text_token match, :integer

            end

          else

            encoder.text_token getch, :error

          end

        when :string, :key

          if match = scan(/[^\\"]+/)

            encoder.text_token match, :content

          elsif match = scan(/"/)

            encoder.text_token match, :delimiter

            encoder.end_group state

            state = :initial

          elsif match = scan(/ \\ (?: #{ESCAPE} | #{UNICODE_ESCAPE} ) /mox)

            encoder.text_token match, :char

          elsif match = scan(/\\./m)

            encoder.text_token match, :content

          elsif match = scan(/ \\ | $ /x)

            encoder.end_group state

            encoder.text_token match, :error

            state = :initial

          else

            raise_inspect "else case \" reached; %p not handled." % peek(1), encoder

          end

        else

          raise_inspect 'Unknown state: %p' % [state], encoder

        end

      end

      if [:string, :key].include? state

        encoder.end_group state

      end

      encoder

    end

  end

end

end

<%= TestHelper.view_path_for __FILE__ %>

api.array :time_entries, api_meta(:total_count => @entry_count, :offset => @offset, :limit => @limit) do

  @entries.each do |time_entry|

    api.time_entry do

      api.id time_entry.id

      api.project(:id => time_entry.project_id, :name => time_entry.project.name) unless time_entry.project.nil?

      api.issue(:id => time_entry.issue_id) unless time_entry.issue.nil?

      api.user(:id => time_entry.user_id, :name => time_entry.user.name) unless time_entry.user.nil?

      api.activity(:id => time_entry.activity_id, :name => time_entry.activity.name) unless time_entry.activity.nil?

      api.hours time_entry.hours

      api.comments time_entry.comments

      api.spent_on time_entry.spent_on

      api.created_on time_entry.created_on

      api.updated_on time_entry.updated_on

    end

  end

end