当组包含嵌套组时，如何使用 Perl 测试 Win32 组成员资格？

Question

我正在尝试使用 Perl 来确定 Windows 用户是否是 Windows 组的成员，该组是否包含嵌套组。

我尝试过使用Win32::NetAdmin::GroupIsMember()，但它只有在用户是该组的直接成员时才有效。

我不是 AD 或 LDAP 专家，但我在 Google 上搜索的示例表现出相同的行为。

例如，用户“joe”是组“A”的成员。组“A”是组“B”的成员。我想测试一下 joe 是否是“B”的成员。

Answer 1

您可以使用递归扫描 AD 或（更好地）通过 SID 枚举组成员身份。请参阅以下示例：http://explodingcoder.com/blog/content/how-query-active-directory-security-group-membership