tcl - 如何在 tcl 中执行 getpwnam/getpwuid 等

Question

tcl 是否有进行 NSS 查找的标准方法（getpwnam，setpwent，...）

Answer 1

Tcl 没有将它们公开为 API（它也没有真正在内部使用它们）但是TclX扩展包确实支持你想要的我相信。例如：

package require TclX

set uid [id convert user $tcl_platform(user)]
puts "Your userid is $uid and you are a member of these groups: [id groups]"

如果您正在使用 ActiveTcl，那么您肯定已经获得了可用的 TclX 包（已经安装或可从 teapot 存储库获得）。