NFS v3下Tcl file mkdir并行执行的原子性问题及方案咨询

先明确你的场景：在NFS v3环境下，两个进程并行执行带前置目录检查的Tcl代码，频繁触发“can't create directory: file already exists”错误，但你确认没有其他进程创建非目录文件——这个问题的核心其实是Tcl的file mkdir实现逻辑+NFS的元数据特性共同导致的，而非系统mkdir调用的原子性问题。

1. file mkdir 是否存在原子性问题？ #

先给结论：系统级的mkdir调用是原子的——POSIX标准保证，当目标不存在时，创建目录的操作是原子完成的，不会出现“目录节点短暂以非目录形式存在”的中间状态。

那问题出在哪？是Tcl的file mkdir（默认带-p递归创建逻辑）的上层实现：

• Tcl的file mkdir不是单一系统调用，它会先递归检查各级父目录，再逐个调用系统mkdir
• 当两个进程并行执行时，会出现典型的竞态：
  1. 进程A检查$dir不存在，进入创建流程
  2. 进程B同时检查$dir不存在，也进入创建流程
  3. 进程A先完成$dir的创建
  4. 进程B执行系统mkdir时，系统返回EEXIST（目标已存在）
     而旧版本的Tcl在捕获到EEXIST错误时，没有检查目标是否已经是目录，直接抛出了“file already exists”的错误——但实际上此时目标是合法的目录，本应该被视为创建成功。

NFS在这里起到了“放大”竞态的作用：NFS v3的目录元数据缓存（比如lookup缓存）会让进程B无法立刻看到进程A刚创建的目录，导致进程B的前置检查和后续mkdir调用之间的窗口被拉长，触发错误的概率大大提升。

2. 如何实现原子性的目录创建？ #

你的核心需求是“不介意两个进程都成功，只希望不抛出错误”，这里有两个简单的临时修复方案：

方案一：去掉前置检查，捕获错误后验证目录状态 #

直接跳过file isdirectory的前置检查，调用file mkdir后，捕获错误并判断目标是否已经是目录，如果是则忽略错误：

if {[catch { file mkdir $dir} err]} {
    # 只有当目标不是目录时，才抛出错误
    if {![file isdirectory $dir]} {
        error "-E- failed to mkdir $dir: $err"
    }
    # 已经是目录，视为创建成功，不做处理
}

这个方案利用了系统mkdir的原子性，即使两个进程并行调用，第二个进程捕获到EEXIST后，验证目标是目录就跳过错误，完全符合你的需求。

方案二：直接调用系统mkdir -p #

系统的mkdir -p命令在实现上，当目标已经是目录时会静默返回成功，不会报错。你可以用Tcl的exec调用它：

if {[catch { exec mkdir -p -- $dir } err]} {
    # 仅当确实无法创建（比如权限问题、目标是文件）时抛出错误
    error "-E- failed to mkdir $dir: $err"
}

注意加上--是为了避免路径以-开头时被当成命令参数，如果需要排查权限问题，建议保留错误输出。

补充：问题的最终根源与修复 #

你后来确认这是Tcl的Bug，并且已经提交修复，这个判断非常准确。旧版本Tcl的file mkdir逻辑存在缺陷：在处理EEXIST错误时，没有验证目标的类型，直接抛出错误。现在Tcl核心团队已经修复了这个问题，修正后的代码会在捕获EEXIST后检查目标是否为目录，如果是则视为创建成功，不再抛出错误——这也和我们方案一的思路一致。

内容的提问来源于stack exchange，提问作者kabanus