ohloh_scm 2.5.1 → 3.0.1

data/test/unit/git_svn_cat_file_test.rb

@@ -1,57 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-  class GitSvnCatFileTest < OhlohScm::Test
-    def test_cat_file
-      with_git_svn_repository('git_svn') do |git_svn|
-        expected = <<-EXPECTED.gsub(/^\s+/, '')
-          /* Hello, World! */
-          #include <stdio.h>
-          main()
-          {
-            printf("Hello, World!\\n");
-          }
-        EXPECTED
-
-        assert_equal expected.strip, git_svn.cat_file(OhlohScm::Commit.new(token: 1),
-                                                      OhlohScm::Diff.new(path: 'helloworld.c')).gsub(/\t/, '').strip
-      end
-    end
-
-    def test_cat_file_with_non_existent_token
-      with_git_svn_repository('git_svn') do |git_svn|
-        assert git_svn.cat_file(OhlohScm::Commit.new(token: 999), OhlohScm::Diff.new(path: 'helloworld.c'))
-      end
-    end
-
-    def test_cat_file_with_invalid_filename
-      with_git_svn_repository('git_svn') do |git_svn|
-        assert_raise RuntimeError do
-          git_svn.cat_file(OhlohScm::Commit.new(token: 1), OhlohScm::Diff.new(path: 'invalid'))
-        end
-      end
-    end
-
-    def test_cat_file_parent
-      with_git_svn_repository('git_svn') do |git_svn|
-        expected = <<-EXPECTED.gsub(/^\s+/, '')
-          /* Hello, World! */
-          #include <stdio.h>
-          main()
-          {
-            printf("Hello, World!\\n");
-          }
-        EXPECTED
-
-        assert_equal expected.strip, git_svn.cat_file_parent(OhlohScm::Commit.new(token: 2),
-                                                       OhlohScm::Diff.new(path: 'helloworld.c')).gsub(/\t/, '')
-      end
-    end
-
-    def test_cat_file_parent_with_first_token
-      with_git_svn_repository('git_svn') do |git_svn|
-        assert git_svn.cat_file(OhlohScm::Commit.new(token: 1), OhlohScm::Diff.new(path: 'helloworld.c'))
-      end
-    end
-  end
-end

data/test/unit/git_svn_commits_test.rb

@@ -1,37 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-  class GitSvnCommitsTest < OhlohScm::Test
-    def test_commit_tokens
-      with_git_svn_repository('git_svn') do |git_svn|
-        assert_equal [1,2,3,5], git_svn.commit_tokens
-        assert_equal [3,5], git_svn.commit_tokens(after: 2)
-      end
-    end
-
-    def test_commits
-      with_git_svn_repository('git_svn') do |git_svn|
-        assert_equal [1,2,3,5], git_svn.commits.map(&:token)
-        assert_equal [3,5], git_svn.commits(after: 2).map(&:token)
-        assert_equal [], git_svn.commits(after: 7)
-      end
-    end
-
-    def test_each_commit
-      with_git_svn_repository('git_svn') do |git_svn|
-        commits = []
-        git_svn.each_commit { |c| commits << c }
-        assert_equal [1,2,3,5], git_svn.commits.map(&:token)
-      end
-    end
-
-    def test_source_scm_commit_count
-      with_svn_repository('svn', 'trunk') do |src|
-        OhlohScm::ScratchDir.new do |dest_dir|
-          git_svn = GitSvnAdapter.new(:url => dest_dir).normalize
-          assert_equal(git_svn.source_scm_commit_count(source_scm: src), 5)
-        end
-      end
-    end
-  end
-end

data/test/unit/git_svn_pull_test.rb

@@ -1,51 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-  class GitSvnPullTest < OhlohScm::Test
-    def test_svn_conversion_on_pull
-      with_svn_repository('svn', 'trunk') do |src|
-        OhlohScm::ScratchDir.new do |dest_dir|
-          dest = GitSvnAdapter.new(:url => dest_dir).normalize
-
-          dest.pull(src)
-
-          dest_commits = dest.commits
-          assert_equal dest_commits.map(&:diffs).flatten.map(&:path),
-            ["helloworld.c", "makefile", "README", "helloworld.c", "COPYING"]
-          assert_equal dest_commits.map(&:committer_date).map(&:to_s),
-            ['2006-06-11 18:28:00 UTC', '2006-06-11 18:32:13 UTC', '2006-06-11 18:34:17 UTC', '2006-07-14 23:07:15 UTC']
-
-          src.commits.each_with_index do |c, i|
-            assert_equal c.committer_name, dest_commits[i].committer_name
-            assert_equal c.message.strip, dest_commits[i].message.strip
-          end
-        end
-      end
-    end
-
-    def test_updated_branch_on_fetch
-      branch_name = 'trunk'
-
-      with_svn_repository('svn', branch_name) do |source_scm|
-        OhlohScm::ScratchDir.new do |dest_dir|
-          OhlohScm::ScratchDir.new do |svn_working_folder|
-            git_svn = GitSvnAdapter.new(:url => dest_dir).normalize
-            git_svn.pull(source_scm)
-            assert_equal 4, git_svn.commit_count
-
-            message = 'new commit'
-            source_scm_db_path = source_scm.path.sub('trunk', 'db')
-            system "cd #{ svn_working_folder } && svn co #{ source_scm.url } && cd #{ branch_name } &&
-                    mkdir -p #{ source_scm_db_path }/transactions &&
-                    touch one && svn add one && svn commit -m '#{ message }' && svn update"
-
-            git_svn.pull(source_scm)
-
-            assert_equal 5, git_svn.commit_count
-            assert_equal message, git_svn.commits.last.message.chomp
-          end
-        end
-      end
-    end
-  end
-end

data/test/unit/git_token_test.rb

@@ -1,45 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-	class GitTokenTest < OhlohScm::Test
-
-		def test_no_token_returns_nil
-			OhlohScm::ScratchDir.new do |dir|
-				git = GitAdapter.new(:url => dir).normalize
-				assert !git.read_token
-				git.init_db
-				assert !git.read_token
-			end
-		end
-
-		def test_write_and_read_token
-			OhlohScm::ScratchDir.new do |dir|
-				git = GitAdapter.new(:url => dir).normalize
-				git.init_db
-				git.write_token("FOO")
-				assert !git.read_token # Token not valid until committed
-				git.commit_all(OhlohScm::Commit.new)
-				assert_equal "FOO", git.read_token
-			end
-		end
-
-		def test_commit_all_includes_write_token
-			OhlohScm::ScratchDir.new do |dir|
-				git = GitAdapter.new(:url => dir).normalize
-				git.init_db
-				c = OhlohScm::Commit.new
-				c.token = "BAR"
-				git.commit_all(c)
-				assert_equal c.token, git.read_token
-			end
-		end
-
-    def test_read_token_encoding
-      with_git_repository('git_with_invalid_encoding') do |git|
-        assert_nothing_raised do
-          git.read_token
-        end
-      end
-    end
-	end
-end

data/test/unit/git_validation_test.rb

@@ -1,93 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-	class GitValidationTest < OhlohScm::Test
-		def test_rejected_urls
-			[	nil, "", "foo", "http:/", "http:://", "http://", "http://a",
-			"kernel.org/linux/linux.git", # missing a protocol prefix
-			"http://kernel.org/linux/lin%32ux.git", # no encoded strings allowed
-			"http://kernel.org/linux/linux.git malicious code", # no spaces allowed
-			"svn://svn.mythtv.org/svn/trunk", # svn protocol is not allowed
-			"/home/robin/cvs", # local file paths not allowed
-			"file:///home/robin/cvs", # file protocol is not allowed
-			":pserver:anonymous:@juicereceiver.cvs.sourceforge.net:/cvsroot/juicereceiver" # pserver is just wrong
-			].each do |url|
-				git = GitAdapter.new(:url => url)
-				assert git.validate_url.any?
-			end
-		end
-
-		def test_accepted_urls
-			[ "http://kernel.org/pub/scm/git/git.git",
-			"git://kernel.org/pub/scm/git/git.git",
-			"https://kernel.org/pub/scm/git/git.git",
-			"https://kernel.org:8080/pub/scm/git/git.git",
-			"git://kernel.org/~foo/git.git",
-			"http://git.onerussian.com/pub/deb/impose+.git",
-      "https://Person@github.com/Person/some_repo.git",
-      "http://Person@github.com/Person/some_repo.git",
-      "https://github.com/Person/some_repo",
-      "http://github.com/Person/some_repo"
-			].each do |url|
-				git = GitAdapter.new(:url => url)
-				assert !git.validate_url
-			end
-		end
-
-		def test_guess_forge
-			git = GitAdapter.new(:url => nil)
-			assert_equal nil, git.guess_forge
-
-			git = GitAdapter.new(:url => 'git://methabot.git.sourceforge.net/gitroot/methabot')
-			assert_equal 'sourceforge.net', git.guess_forge
-
-			git = GitAdapter.new( :url => 'http://kernel.org/pub/scm/linux/kernel/git/stable/linux-2.6.17.y.git')
-			assert_equal 'kernel.org', git.guess_forge
-		end
-
-    def test_normalize_url
-      assert_equal nil, GitAdapter.new(:url => nil).normalize_url
-      assert_equal '', GitAdapter.new(:url => '').normalize_url
-      assert_equal 'foo', GitAdapter.new(:url => 'foo').normalize_url
-
-      # A non-Github URL: no change
-			assert_equal 'git://kernel.org/pub/scm/git/git.git',
-        GitAdapter.new(:url => 'git://kernel.org/pub/scm/git/git.git').normalize_url
-
-      # A Github read-write URL: converted to read-only
-      assert_equal 'git://github.com/robinluckey/ohcount.git',
-        GitAdapter.new(:url => 'https://robinluckey@github.com/robinluckey/ohcount.git').normalize_url
-
-      # A Github read-write URL: converted to read-only
-      assert_equal 'git://github.com/robinluckey/ohcount.git',
-        GitAdapter.new(:url => 'git@github.com:robinluckey/ohcount.git').normalize_url
-
-      # A Github read-only URL: no change
-      assert_equal 'git://github.com/robinluckey/ohcount.git',
-        GitAdapter.new(:url => 'git@github.com:robinluckey/ohcount.git').normalize_url
-    end
-
-    def test_normalize_converts_to_read_only
-      normalize_url_test('https://robinluckey@github.com/robinluckey/ohcount.git', 'git://github.com/robinluckey/ohcount.git')
-    end
-
-    def test_normalize_handles_https_with_user_at_github_format
-      normalize_url_test('http://Person@github.com/Person/something.git', 'git://github.com/Person/something.git')
-    end
-
-    def test_normalize_handles_https_web_url
-      normalize_url_test('https://github.com/Person/something', 'git://github.com/Person/something')
-    end
-
-    def test_normalize_handles_http_web_url
-      normalize_url_test('http://github.com/Person/something', 'git://github.com/Person/something')
-    end
-
-  private
-    def normalize_url_test(url, result_url)
-      git = GitAdapter.new(:url => url)
-      git.normalize
-      assert_equal result_url, git.url
-     end
-	end
-end

data/test/unit/hg_cat_file_test.rb

@@ -1,47 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-	class HgCatFileTest < OhlohScm::Test
-
-		def test_cat_file
-			with_hg_repository('hg') do |hg|
-expected = <<-EXPECTED
-/* Hello, World! */
-
-/*
- * This file is not covered by any license, especially not
- * the GNU General Public License (GPL). Have fun!
- */
-
-#include <stdio.h>
-main()
-{
-	printf("Hello, World!\\n");
-}
-EXPECTED
-
-				# The file was deleted in revision 468336c6671c. Check that it does not exist now, but existed in parent.
-				assert_equal nil, hg.cat_file(OhlohScm::Commit.new(:token => '75532c1e1f1d'), OhlohScm::Diff.new(:path => 'helloworld.c'))
-				assert_equal expected, hg.cat_file_parent(OhlohScm::Commit.new(:token => '75532c1e1f1d'), OhlohScm::Diff.new(:path => 'helloworld.c'))
-				assert_equal expected, hg.cat_file(OhlohScm::Commit.new(:token => '468336c6671c'), OhlohScm::Diff.new(:path => 'helloworld.c'))
-			end
-		end
-
-		# Ensure that we escape bash-significant characters like ' and & when they appear in the filename
-		def test_funny_file_name_chars
-			OhlohScm::ScratchDir.new do |dir|
-				# Make a file with a problematic filename
-				funny_name = '#|file_name` $(&\'")#'
-				File.open(File.join(dir, funny_name), 'w') { |f| f.write "contents" }
-
-				# Add it to an hg repository
-				`cd #{dir} && hg init && hg add * && hg commit -u tester -m test`
-
-				# Confirm that we can read the file back
-				hg = HgAdapter.new(:url => dir).normalize
-				assert_equal "contents", hg.cat_file(hg.head, OhlohScm::Diff.new(:path => funny_name))
-			end
-		end
-
-	end
-end

data/test/unit/hg_commits_test.rb

@@ -1,220 +0,0 @@
-require_relative '../test_helper'
-
-module OhlohScm::Adapters
-	class HgCommitsTest < OhlohScm::Test
-
-		def test_commit_count
-			with_hg_repository('hg') do |hg|
-				assert_equal 5, hg.commit_count
-				assert_equal 3, hg.commit_count(:after => 'b14fa4692f949940bd1e28da6fb4617de2615484')
-				assert_equal 0, hg.commit_count(:after => '655f04cf6ad708ab58c7b941672dce09dd369a18')
-			end
-		end
-
-		def test_commit_count_with_empty_branch
-          	with_hg_repository('hg', '') do |hg|
-        		assert_equal nil, hg.branch_name
-        		assert_equal 5, hg.commit_count
-        		assert_equal 3, hg.commit_count(:after => 'b14fa4692f949940bd1e28da6fb4617de2615484')
-        		assert_equal 0, hg.commit_count(:after => '655f04cf6ad708ab58c7b941672dce09dd369a18')
-      		end
-    	end
-
-
-		def test_commit_tokens
-			with_hg_repository('hg') do |hg|
-				assert_equal ['01101d8ef3cea7da9ac6e9a226d645f4418f05c9',
-											'b14fa4692f949940bd1e28da6fb4617de2615484',
-											'468336c6671cbc58237a259d1b7326866afc2817',
-                      '75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-											'655f04cf6ad708ab58c7b941672dce09dd369a18'], hg.commit_tokens
-
-        assert_equal ['b14fa4692f949940bd1e28da6fb4617de2615484',
-                      '468336c6671cbc58237a259d1b7326866afc2817',
-                      '75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-                      '655f04cf6ad708ab58c7b941672dce09dd369a18'],
-          hg.commit_tokens(after: '01101d8ef3cea7da9ac6e9a226d645f4418f05c9')
-
-				assert_equal ['655f04cf6ad708ab58c7b941672dce09dd369a18'],
-					hg.commit_tokens(:after => '75532c1e1f1de55c2271f6fd29d98efbe35397c4')
-
-				assert_equal [], hg.commit_tokens(:after => '655f04cf6ad708ab58c7b941672dce09dd369a18')
-			end
-		end
-
-		def test_commits
-			with_hg_repository('hg') do |hg|
-				assert_equal ['01101d8ef3cea7da9ac6e9a226d645f4418f05c9',
-											'b14fa4692f949940bd1e28da6fb4617de2615484',
-											'468336c6671cbc58237a259d1b7326866afc2817',
-                      '75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-											'655f04cf6ad708ab58c7b941672dce09dd369a18'], hg.commits.collect { |c| c.token }
-
-				assert_equal ['655f04cf6ad708ab58c7b941672dce09dd369a18'],
-					hg.commits(:after => '75532c1e1f1de55c2271f6fd29d98efbe35397c4').collect { |c| c.token }
-
-				# Check that the diffs are not populated
-				assert_equal [], hg.commits(:after => '75532c1e1f1de55c2271f6fd29d98efbe35397c4').first.diffs
-
-				assert_equal [], hg.commits(:after => '655f04cf6ad708ab58c7b941672dce09dd369a18')
-			end
-		end
-
-		def test_commits_with_branch
-			with_hg_repository('hg', 'develop') do |hg|
-				assert_equal ['01101d8ef3cea7da9ac6e9a226d645f4418f05c9',
-											'b14fa4692f949940bd1e28da6fb4617de2615484',
-											'468336c6671cbc58237a259d1b7326866afc2817',
-                      '75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-											'4d54c3f0526a1ec89214a70615a6b1c6129c665c'], hg.commits.collect { |c| c.token }
-
-				assert_equal ['4d54c3f0526a1ec89214a70615a6b1c6129c665c'],
-					hg.commits(:after => '75532c1e1f1de55c2271f6fd29d98efbe35397c4').collect { |c| c.token }
-
-				# Check that the diffs are not populated
-				assert_equal [], hg.commits(:after => '75532c1e1f1de55c2271f6fd29d98efbe35397c4').first.diffs
-
-				assert_equal [], hg.commits(:after => '4d54c3f0526a1ec89214a70615a6b1c6129c665c')
-			end
-		end
-
-		def test_trunk_only_commit_count
-			with_hg_repository('hg_dupe_delete') do |hg|
-				assert_equal 4, hg.commit_count(:trunk_only => false)
-				assert_equal 3, hg.commit_count(:trunk_only => true)
-			end
-		end
-
-		def test_trunk_only_commit_tokens
-			with_hg_repository('hg_dupe_delete') do |hg|
-				assert_equal ['73e93f57224e3fd828cf014644db8eec5013cd6b',
-											'732345b1d5f4076498132fd4b965b1fec0108a50',
-											'525de321d8085bc1d4a3c7608fda6b4020027985', # On branch
-											'72fe74d643bdcb30b00da3b58796c50f221017d0'],
-					hg.commit_tokens(:trunk_only => false)
-
-				assert_equal ['73e93f57224e3fd828cf014644db8eec5013cd6b',
-											'732345b1d5f4076498132fd4b965b1fec0108a50',
-											# '525de321d8085bc1d4a3c7608fda6b4020027985', # On branch
-											'72fe74d643bdcb30b00da3b58796c50f221017d0'],
-					hg.commit_tokens(:trunk_only => true)
-			end
-		end
-
-		def test_trunk_only_commit_tokens_using_after
-			with_hg_repository('hg_dupe_delete') do |hg|
-				assert_equal ['732345b1d5f4076498132fd4b965b1fec0108a50',
-											'525de321d8085bc1d4a3c7608fda6b4020027985', # On branch
-											'72fe74d643bdcb30b00da3b58796c50f221017d0'],
-					hg.commit_tokens(
-						:after => '73e93f57224e3fd828cf014644db8eec5013cd6b',
-						:trunk_only => false)
-
-				assert_equal ['732345b1d5f4076498132fd4b965b1fec0108a50',
-											# '525de321d8085bc1d4a3c7608fda6b4020027985', # On branch
-											'72fe74d643bdcb30b00da3b58796c50f221017d0'],
-					hg.commit_tokens(
-						:after => '73e93f57224e3fd828cf014644db8eec5013cd6b',
-						:trunk_only => true)
-
-				assert_equal [], hg.commit_tokens(
-					:after => '72fe74d643bdcb30b00da3b58796c50f221017d0',
-					:trunk_only => true)
-			end
-		end
-
-		def test_trunk_only_commits
-			with_hg_repository('hg_dupe_delete') do |hg|
-				assert_equal ['73e93f57224e3fd828cf014644db8eec5013cd6b',
-											'732345b1d5f4076498132fd4b965b1fec0108a50',
-											# '525de321d8085bc1d4a3c7608fda6b4020027985', # On branch
-											'72fe74d643bdcb30b00da3b58796c50f221017d0'],
-					hg.commits(:trunk_only => true).collect { |c| c.token }
-			end
-		end
-
-		def test_each_commit
-			commits = []
-			with_hg_repository('hg') do |hg|
-				hg.each_commit do |c|
-					assert c.token.length == 40
-					assert c.committer_name
-					assert c.committer_date.is_a?(Time)
-					assert c.message.length > 0
-					assert c.diffs.any?
-					# Check that the diffs are populated
-					c.diffs.each do |d|
-						assert d.action =~ /^[MAD]$/
-						assert d.path.length > 0
-					end
-					commits << c
-				end
-				assert !FileTest.exist?(hg.log_filename) # Make sure we cleaned up after ourselves
-
-				# Verify that we got the commits in forward chronological order
-				assert_equal ['01101d8ef3cea7da9ac6e9a226d645f4418f05c9',
-											'b14fa4692f949940bd1e28da6fb4617de2615484',
-											'468336c6671cbc58237a259d1b7326866afc2817',
-											'75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-                      '655f04cf6ad708ab58c7b941672dce09dd369a18'], commits.collect { |c| c.token }
-			end
-		end
-
-    def test_each_commit_for_branch
-      commits = []
-
-			with_hg_repository('hg', 'develop') do |hg|
-        commits = hg.each_commit
-      end
-
-      assert_equal ['01101d8ef3cea7da9ac6e9a226d645f4418f05c9',
-                    'b14fa4692f949940bd1e28da6fb4617de2615484',
-                    '468336c6671cbc58237a259d1b7326866afc2817',
-                    '75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-                    '4d54c3f0526a1ec89214a70615a6b1c6129c665c'], commits.collect { |c| c.token }
-    end
-
-
-		def test_each_commit_after
-			commits = []
-			with_hg_repository('hg') do |hg|
-				hg.each_commit(:after => '468336c6671cbc58237a259d1b7326866afc2817') do |c|
-					commits << c
-				end
-				assert_equal ['75532c1e1f1de55c2271f6fd29d98efbe35397c4',
-											'655f04cf6ad708ab58c7b941672dce09dd369a18'], commits.collect { |c| c.token }
-			end
-		end
-
-    def test_open_log_file_encoding
-      with_hg_repository('hg_with_invalid_encoding') do |hg|
-        hg.open_log_file do |io|
-          assert_equal true, io.read.valid_encoding?
-        end
-      end
-    end
-
-    def test_log_encoding
-      with_hg_repository('hg_with_invalid_encoding') do |hg|
-        assert_equal true, hg.log.valid_encoding?
-      end
-    end
-
-    def test_commits_encoding
-      with_hg_repository('hg_with_invalid_encoding') do |hg|
-        assert_nothing_raised do
-          hg.commits
-        end
-      end
-    end
-
-    def test_verbose_commit_encoding
-      with_hg_repository('hg_with_invalid_encoding') do |hg|
-        assert_nothing_raised do
-          hg.verbose_commit('51ea5277ca27')
-        end
-      end
-    end
-	end
-end
-