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 (либо уже установлен, либо доступен из репозитория чайника).