1 files changed, 79 insertions, 0 deletions
diff --git a/tests/rep-fetch-git.testscript b/tests/rep-fetch-git.testscript
new file mode 100644
index 0000000..3fe0287
--- /dev/null
+++ b/tests/rep-fetch-git.testscript
@@ -0,0 +1,79 @@
+# file      : tests/rep-fetch-git.testscript
+# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
+# license   : MIT; see accompanying LICENSE file
+
+# All tests use the same repository infrastructure present in the initial and
+# the final states. See tests/common/git/init script for more details.
+#
+
+reason_dumb  = ' (dumb HTTP)'
+reason_unadv = ' (unadvertised commit)'
+
+warn_dumb='
+warning: no progress will be shown (dumb HTTP)'
+
+warn_repo_hist = "warning: fetching whole repository history"
+warn_ref_hist  = "warning: fetching whole reference history"
+
+warn = '%.{0}' # None.
+
+test.cleanups += &cfg/.bpkg/repos/*/***
+
++if ($git_protocol == 'local')
+  rep = "$rep_git_local"
+elif ($git_protocol == 'https-dumb')
+  rep = "$rep_git_https_dumb"
+elif ($git_protocol == 'https-smart')
+  rep = "$rep_git_https_smart"
+elif ($git_protocol == 'https-smart-unadv')
+  rep = "$rep_git_https_smart_unadv"
+elif ($git_protocol == 'git')
+  rep = "$rep_git_git"
+else
+  exit "unexpected git protocol '$git_protocol'"
+end
+
+# Repository URL prefix for use with git commands.
+#
+# Note that git supports none of the standard 'file:' URL notations on Windows,
+# so we produce one that is acceptable for git.
+#
++if ($git_protocol == 'local' && $cxx.target.class == 'windows')
+  rep_git = "$regex.replace($rep, '^file:/', 'file://')"
+else
+  rep_git = "$rep"
+end
+
+: branch
+:
+{
+  fragment = '#master'
+  .include rep-fetch-git-refname.testscript
+}
+
+: ltag
+:
+{
+  fragment = '#ltag'
+  .include rep-fetch-git-refname.testscript
+}
+
+: atag
+:
+{
+  fragment = '#atag'
+  .include rep-fetch-git-refname.testscript
+}
+
+: list
+:
+{
+  fragment = '#master,ltag,atag'
+  .include rep-fetch-git-refname.testscript
+}
+
+: commit
+:
+{
+  .include rep-fetch-git-commit.testscript
+}