Linux下FIFO管道可读事件未触发，TCL指定过程未执行

问题根源 #

你的脚本卡在open "pip"步骤了。Linux下FIFO管道默认是阻塞式打开：以只读方式打开FIFO时，会一直阻塞，直到有进程以写方式打开该管道。这导致脚本根本没执行到fconfigure和fileevent的设置，自然不会触发可读事件。

解决方案 #

需要用非阻塞模式打开FIFO管道，同时处理管道写入端关闭后的EOF情况，避免无限触发可读事件。

修改后的完整脚本 #

fconfigure stdout -buffering none
# 以只读+非阻塞模式打开FIFO
set fd [open "pip" RDONLY|NONBLOCK]
fconfigure $fd -buffering line
fileevent $fd readable [list Treading $fd]

proc Treading {desc} {
    if {[gets $desc line] < 0} {
        # 处理EOF：写入端关闭，取消事件监听并关闭文件描述符
        fileevent $desc readable {}
        close $desc
        puts stdout "Pipe closed"
        return
    }
    puts stdout "Got line - $line"
}

# 用vwait替代死循环，符合TCL事件驱动模型的标准写法
vwait forever

关键修改点 #

• 非阻塞打开FIFO：open "pip" RDONLY|NONBLOCK，即使没有写入端，脚本也能继续执行后续的事件注册。
• EOF处理：当gets返回-1时，表示管道写入端已关闭，此时取消fileevent监听并关闭文件描述符，避免持续触发无效的可读事件。
• 事件循环优化：vwait forever是TCL事件驱动模型的标准写法，比while {1}死循环更简洁高效。

验证步骤 #

1. 运行修改后的脚本。
2. 在另一个终端执行cat > pip，输入内容回车后，脚本会立即输出Got line - xxx。
3. 按下Ctrl+D关闭写入端，脚本会输出Pipe closed。

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