nameserv, by aku, and found in tcllib, provides a nameservice facility, including a client and a server.