为何Tcl在esbuild的watch/serve模式下无法检测readable事件？

问题核心 #

在跨平台构建脚本中用Tcl事件循环驱动esbuild时，非watch/serve模式下能正常捕获子进程输出，但开启--watch或--servedir参数后，Tcl始终触发不了readable事件，脚本卡在"entering event loop..."环节，调整open命令访问模式、chan configure的缓冲参数均无效。

原因分析 #

esbuild在watch/serve模式下会长期保持进程存活，且默认会检测终端环境（TTY），将输出设置为行缓冲或交互缓冲模式。当通过Tcl管道调用时，esbuild可能误判环境，导致输出未主动flush到管道；此外，未捕获标准错误输出（stderr）可能导致子进程因缓冲溢出而阻塞，进一步触发不了Tcl的可读事件。

解决方案 #

1. 强制esbuild禁用终端交互特性 #

给esbuild添加--no-color参数，或设置环境变量FORCE_COLOR=0，让esbuild跳过TTY检测，直接将输出flush到管道：

# 强制esbuild不使用终端颜色输出
set ::env(FORCE_COLOR) 0

set cid [open "|esbuild init.js --bundle --outdir=$dev --watch --servedir=$dev --no-color" r]

2. 合并标准错误输出到标准输出 #

esbuild的部分运行日志会输出到stderr，将其重定向到stdout，避免子进程因stderr缓冲满而挂起：

set cid [open "|esbuild init.js --bundle --outdir=$dev --watch --servedir=$dev --no-color 2>&1" r]

3. 调整Tcl管道的缓冲配置 #

将缓冲设置为none，确保输出一产生就被Tcl捕获：

chan configure $cid \
    -translation lf \
    -buffering none \
    -blocking 0

4. 修改输出处理逻辑适配长期进程 #

watch模式下esbuild不会主动退出，因此不需要在检测到eof时立即终止事件循环，而是持续监听输出：

proc read_output {cid} {
    global loopdone

    if {[catch {read $cid} content]} {
        puts "读取子进程输出出错"
        set loopdone 1
        return
    }

    if {$content ne ""} {
        puts $content
    }

    # 仅当子进程真正退出时终止循环
    if {[chan eof $cid]} {
        puts "子进程已退出"
        catch {close $cid} msg
        puts $msg
        set loopdone 1
    }
}

修改后的完整脚本 #

proc read_output {cid} {
    global loopdone

    if {[catch {read $cid} content]} {
        puts "读取子进程输出出错"
        set loopdone 1
        return
    }

    if {$content ne ""} {
        puts $content
    }

    if {[chan eof $cid]} {
        puts "子进程已退出"
        catch {close $cid} msg
        puts $msg
        set loopdone 1
    }
}

set dev build/dev

# 禁用esbuild终端交互特性
set ::env(FORCE_COLOR) 0

# 合并stderr到stdout，避免子进程阻塞
set cid [open "|esbuild init.js --bundle --outdir=$dev --watch --servedir=$dev --no-color 2>&1" r]

chan configure $cid \
    -translation lf \
    -buffering none \
    -blocking 0

chan event $cid readable "read_output $cid"

puts "entering event loop..."

vwait loopdone

puts "loop ended"

验证效果 #

运行修改后的脚本，esbuild的watch/serve模式输出会被Tcl实时捕获，脚本不再卡在事件循环环节，可正常接收构建日志和服务状态信息。

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