0

我想知道如何最好地解析 ldif 文件（和类似 ldif 的文件），以便我可以将每个 DN 条目及其相关属性导入变量，而无需交叉到其他 DN 及其属性中，因为所有内容都在一个文件中。

请问这怎么做？

谢谢你帮助一个菜鸟。

编辑：类似 ldif 的文件示例如下所示：

    dn: cn=admins,cn=groups,cn=accounts,dc=mydom,dc=com
    Group name: admins
    Description: Account administrators group
    GID: 721800000
    Member users: admin, user2, user1
    ipauniqueid: 2dafa3a2-b903-11e2-8a28-525400a60ac3
    objectclass: top, groupofnames, posixgroup, ipausergroup, ipaobject, nestedGroup

    dn: cn=editors,cn=groups,cn=accounts,dc=mydom,dc=com
    Group name: editors
    Description: Limited admins who can edit other users
    GID: 721800002
    Member users: user1
    ipauniqueid: 2dc4446a-b903-11e2-a2fa-525400a60ac3
    objectclass: top, groupofnames, posixgroup, ipausergroup, ipaobject, nestedGroup

    dn: cn=employees,cn=groups,cn=accounts,dc=mydom,dc=com
    Group name: employees
    Description: Default group for all Qrios employees
    GID: 721800006
    Member users: user2, user3
    ipauniqueid: 134ae6e0-b910-11e2-a7f3-525400a60ac3
    objectclass: top, groupofnames, nestedgroup, ipausergroup, ipaobject, posixgroup

我希望能够根据第一个关键字 (dn) 选择文件的各个部分，并将行的值导入到变量中，以便我可以使用它们，然后转到下一部分。

4

1 回答 1

0

sina，我经常使用 LDIF 格式，而 bash 并没有削减它。我强烈建议您开始将 perl 或 python 与它们各自的 LDAP 模块一起使用：

只是一个带有 LDAP 模块的 perl 小例子：

# Read in the LDIF file specified in $input_file
my $ldif = Net::LDAP::LDIF->new($input_file, "r", onerror => 'warn', change => 1);
#
# Process the LDIF input file
#
while($entry = $ldif->read()) 
{
        # Get the Member attribute
        my @mbr = $entry->get_value('Member');
        foreach my $value (@mbr)
        {
               # Here you have a 'Member' value in $value, do what you want
        }
}

如您所见，这使事情变得非常简单。此外，这些模块还考虑了 LDIF 中的所有不同约定，例如缩写行、更改类型等。

于 2015-06-04T19:43:47.663 回答