如何使用 NAnt 创建 Visual Source Safe 分支

Question

总结
我目前有一个 NAnt 构建脚本，可以在最新源代码或特定分支（使用 ${branch}）上执行 vssget范围）。

每当我们进行生产构建/部署时，构建的代码树都会创建一个分支，（这样我们就可以继续开发，并且仍然知道生产中的代码库，非常标准的东西......）

问题
创建该分支的过程仍然是手动过程，由进入 Visual Source Safe Explorer 并执行分支过程的人员执行。我想知道 NAnt 中是否有任何方法可以创建 VSS 分支。

当前计划
我已经知道如何使用 并试图避免这种情况，但在没有任何更好的解决方案的情况下，这是我最有可能采取的路线。

有谁知道是否有一个 NAnt 或 NAntContrib 目标，或者是否有人有一个他们过去用来执行此操作的脚本任务并且可以提供代码为此，我们将非常感激。

免责声明
我了解 cvs、svn、git 和所有其他源代码控制解决方案，目前无法更改工具

Answer 1

我工作的地方实际上需要这个。我整理了一个名为“vssbranch”的小任务（不是特别有创意，但这里是代码......示例构建文件及其执行的输出：

代码：

using System;
using System.Collections.Generic;
using System.IO;
using System.Text;

using SourceSafeTypeLib;

using NAnt.Core;
using NAnt.Core.Attributes;

namespace NAnt.Contrib.Tasks.SourceSafe
{
    [TaskName("vssbranch")]
    public sealed class BranchTask : BaseTask
    {
        /// <summary>
        /// The label comment.
        /// </summary>
        [TaskAttribute("comment")]
        public String Comment { get; set; }

        /// <summary>
        /// Determines whether to perform the branch recursively.
        /// The default is <see langword="true"/>
        /// </summary>
        [TaskAttribute("recursive"),
        BooleanValidator()]
        public Boolean Recursive { get; set; }

        [TaskAttribute("branchname", Required = true)]
        public String BranchName { get; set; }


        protected override void ExecuteTask()
        {
            this.Open();
            try
            {
                if (VSSItemType.VSSITEM_PROJECT != (VSSItemType)this.Item.Type)
                    throw new BuildException("Only vss projects can be branched", this.Location);

                IVSSItem newShare = null;
                this.Comment = String.IsNullOrEmpty(this.Comment) ? String.Empty : this.Comment;
                if (null != this.Item.Parent)
                    newShare = this.Item.Parent.NewSubproject(this.BranchName, this.Comment);

                if (null != newShare)
                {
                    newShare.Share(this.Item as VSSItem, this.Comment,
                        (this.Recursive) ?
                            (int)VSSFlags.VSSFLAG_RECURSYES : 0);
                    foreach (IVSSItem item in newShare.get_Items(false))
                        this.BranchItem(item, this.Recursive);
                }
            }
            catch (Exception ex)
            {
                throw new BuildException(String.Format("Failed to branch '{0}' to '{1}'", this.Item.Name, this.BranchName), this.Location, ex);
            }
        }

        private void BranchItem(IVSSItem itemToBranch, Boolean recursive)
        {
            if (null == itemToBranch) return;

            if (this.Verbose)
                this.Log(Level.Info, String.Format("Branching {0} path: {1}", itemToBranch.Name, itemToBranch.Spec));

            if (VSSItemType.VSSITEM_FILE == (VSSItemType)itemToBranch.Type)
                itemToBranch.Branch(this.Comment, 0);
            else if (recursive)
            {
                foreach (IVSSItem item in itemToBranch.get_Items(false))
                    this.BranchItem(item, recursive);
            }
        }
    }
}

构建文件：

        <echo message="About to execute: VSS Branch" />

        <echo message="Source Safe Path: ${SourceSafeRootPath}/${CURRENT_FILE}" />

        <vssbranch
              username="my_user_name"
              password="my_password"
              recursive="true"
              comment="attempt to make a branch"
              branchname="test-branch"
              dbpath="${SourceSafeDBPath}"
              path="${SourceSafeRootPath}/${CURRENT_FILE}"
              verbose="true"
            />

    </foreach>
</target>

输出：

NAnt 0.85（内部版本 0.85.2478.0；发布；2006 年 10 月 14 日）
版权所有 (C) 2001-2006 Gerry Shaw
http://nant.sourceforge.net

构建文件：file:///C:/scm/custom/src /VssBranch/bin/Debug/test.build
目标框架：Microsoft .NET Framework 2.0
指定目标： run

run:

[loadtasks] 扫描程序集“NAnt.Contrib.Tasks”以获取扩展。
[loadtasks] 扫描程序集“VssBranch”以获取扩展。
[echo] 即将执行：VSS Branch

....

[vssbranch] 分支 SecurityProto 路径：$/VSS/Endur's Source/C#/DailyLive/proto/test-branch/SecurityProto

....

BUILD SUCCEEDED

总时间：12.9 秒。

显然，输出会有所不同，我从名为“params.txt”的文本文件中提取要分支的项目。此任务执行 VSS 世界中所谓的“共享和分支”（共享后立即分支）...其他源代码控制系统不需要在分支之前共享，呃...那是另一天的事情

Answer 2

vss 任务位于 NAntContrib 项目中，目前没有支持分支的任务。不过，按照 NAntContrib 中现有 vss 任务（添加、签出、签入等）的模型，您可以 获取源代码并自行扩展。也就是说，如果VSS API 支持分支。