sysopen 权限被拒绝

Question

我正在尝试修复 git-svn。该问题仅发生在 Windows XP 中，同时使用 Cygwin git (perl v5.10.1) 和 msysGit (perl v5.8.8)。

对于任何涉及获取的操作，我都可以完成一半，然后操作就会终止，并显示类似于以下内容的消息

无法打开 .git/svn/refs/remotes/trunk/.rev_map.cc05479a-e8ea-436f-8d71-e07493b7796c.lock：设备或资源繁忙

位于 /usr/lib/git-core/git-svn 第 5240 行

繁忙但是，确切的锁定文件和行号并不总是相同。我已将实际问题跟踪到第 3679 行

sysopen(my $fh, $db_lock, O_RDWR | O_CREAT)

This is 创建一个新的 .lock 文件，我尝试了等效的方法但无济于事。

open(my $fh, ">", $db_lock)

我检查了该目录的权限，是drwxr-xr-x，所以应该不会有问题，或者如果有的话也不会这么不一致。

这是否是因为脚本快速连续多次创建和重命名该文件，导致 XP 无法处理它？编辑：我怀疑情况确实如此，因为当我使用 perl 调试器并手动启动每个 sysopen 的执行时，我获取的 100 个修订版没有问题。

编辑：一些 Git 开发人员更愿意找出根本原因，而不是采用恰好有效的 hack（我认为这是正确的方法）。那么，任何人都可以帮我找到拒绝我打开这些 .lock 文件的权限的罪魁祸首吗？我有很多理论上可以用于此目的的工具，但它们并不能完全发挥作用：

• Process Explorer - 显示进程拥有的所有句柄，并且还可以搜索拥有给定句柄的所有进程。但是，它对于短期进程或句柄（这就是 git svn clone/fetch 所做的）效果不佳。
• Unlocker - 检测何时出现通用“权限被拒绝”对话框，并找到有问题的句柄并提供处理他们。但是，当非资源管理器程序遇到基于文件的错误时，它不会出现。

简而言之，有什么方法可以让我在不成为 Microsoft 员工的情况下获得更多信息吗？

编辑2：这可能不是赛门铁克，而是我们在联网计算机上运行的另一个程序。我有人在调查这个问题，他们至少应该能够缩小问题的范围。

Answer 1

此类行为通常可归因于防病毒组件使文件保持打开状态并延迟删除。

Answer 2

我目前的解决方案是用这个替换 sysopen

my $fh;
if ($^O eq 'MSWin32' or $^O eq 'cygwin') {
   for my $try (1..10) { # Retry up to 10 times on problematic systems
       sysopen($fh, $db_lock, O_RDWR | O_CREAT);
       last if $fh;
   }
} else {
   sysopen($fh, $db_lock, O_RDWR | O_CREAT);
}

croak "Couldnt open $db_lock: $!\n" unless $fh;'

到目前为止，它运行得很好。大多数时候它不会打印任何 . ，偶尔会打印一个 . ，而且我还没有看到它连续打印多个 . 。这个解决方案是不是太hacky了？

编辑：我的代码被 Ævar Arnfjörð Bjarmason 的清理版本替换。

Answer 3

我会使用进程监视器并让它运行，直到故障再次发生。然后，在进程监视器中，当程序访问文件时，您应该会看到错误（很可能是 ACCESS_DENIED 或 SHARING_VIOLATION）。然后您可以按该文件名进行过滤并查看其他进程（如果有）打开了它。

Answer 4

如果您的程序在任何地方调用“fork()”或“system()”或“exec()”，这很可能是问题的根源。