使用 CGI+TCL 的 LDAP 身份验证

Question

如何使用 CGI/TCL 堆栈通过 LDAP 对用户进行身份验证？

如果可能，请提供示例代码片段。

---

我在 RHEL 5.0 上使用 Apache Web 服务器； AD 存在于远程 Win2003 服务器上。

Answer 1

下面是一个示例，它将连接到 ldap 服务器并检索 ldap 有关电子邮件地址的所有信息：

package require ldap
set sEmailAddress "[email protected]"

set handle [::ldap::connect example.com 3268]
ldap::bind $handle

set result [::ldap::search $handle "dc=example,dc=com" "(mail=$sEmailAddress)" {sAMAccountName}]

foreach {object attributes} $result {
  foreach {name val} $attributes {
    puts "$name\t$val"
  }
}

Answer 2

这是 ldap 包。 您首先使用一些可以看到每个人的“绑定用户”进行绑定。 然后，您可以根据某些属性（例如电子邮件地址或 sAMAccountName<）搜索用户/a>. 如果用户存在，则使用给定的密码和用户的完整路径再次绑定。