当我的文件和/或他们的文件发生更改时，安装程​​序/SVN 用于部署应用程序数据文件

Question

我对 Tortoise SVN / Innosetup 的使用感到一团糟，并且我自己对尝试保留客户数据更改感到自豪，并且希望得到一些建议。问题是：

我部署了一个安装其数据文件的应用程序，并且作为安装的一部分，我让安装程序将这些文件标记为“神奇”日期时间（01-01-1991 00:00:00）。我的客户随后会修改一些数据文件，导致它们的日期比我的“神奇”日期更新。因为我不想丢弃客户更改，所以我在 Innosetup 中使用“COMPARETIMESTAMP”（尽管“不推荐”）。这一直很有效，直到我必须将更改部署到我的一个文件，在这种情况下，除非客户更改了时间戳，否则我需要忽略时间戳。

这种情况适用于所有文件类型，例如没有版本功能、只有日期时间的文本文件。

作为进一步的限制，我的日期时间标记必须发生在安装程序脚本中，因为 SVN 不（也不应该）保证稍后的文件日期时间。

我在这里缺少更好的方法吗？其他人对此做了什么？ 谢谢

Answer 1

好吧，我寻求这个问题的答案，并提出了这个方法，我在这里复制了它，以防它有一些用处。它的作用是：

1. 如果目标文件已被最终用户修改，则显示一条消息，默认情况下不理会它。

2. 如果最终用户未修改目标文件，请始终替换它。

要实现此目的，您需要使用脚本设置：

[Setup]

; A 'magic' date time
TouchDate=1991-01-01
TouchTime=01:01

安装时，所有“我的”文件都被标记为 1/1/1991 01:01，这对于检查很有用，并允许我使用以下两行在最终用户可以编辑的任何文件的 [Files] 部分中，例如：

[Files]
Source: "...\*.*"; DestDir: <DestDir>; Flags: touch recursesubdirs createallsubdirs overwritereadonly comparetimestamp promptifolder;
Source: "...\*.*"; DestDir: <DestDir>; Flags: touch recursesubdirs  createallsubdirs overwritereadonly; Check: IsMagic;

两行都尝试安装该文件，但如果使用检查功能该文件仍然是“我的一个”，则第二行将使用差异标志安装该文件“是魔法”。 'IsMagic 函数在代码中声明如下：

[Code]

// ------------------------------------------------------------------------------------

function FileNameToLastWriteTime( const AFileName : string ) : TFileTime;
// Returns the file time of the last write to this file
var
  FindRec : TFindRec;
begin
  Result.dwLowDateTime := 0;
  Result.dwHighDateTime := 0;
  try
    If FindFirst( AFileName, FindRec ) then
      Result := FindRec.LastWriteTime;
  finally
    FindClose(FindRec);
  end;
end;

// ------------------------------------------------------------------------------------



// ------------------------------------------------------------------------------------

function IsMagic : boolean;
// This returns TRUE if the file date/time shows it to be an 'ART magic' file, i.e it
// has a date/time stamp that has not been changed by the customer. Typically an ART magic
// file is stamped to '1-1-1991 01:01'. This routine returns TRUE if the current file
// date/time is no later than 31/12/1991 23:59:42.569 corresponding to file time of
// H=28728269, L=0.
var
  Time : TFileTime;
  S : string;
begin
  S := CurrentFileName;
  Time := FileNameToLastWriteTime( S );
  Result := Time.dwHighDateTime <= 28728269;
end;
// ------------------------------------------------------------------------------------

我希望这有一些用处。