NAME
Gtk2::Net::LDAP::Widgets::LdapEntrySelector - LDAP entry selection window
SYNOPSIS
use Gtk2::Net::LDAP::Widgets;
my $entryPopup = Gtk2::Net::LDAP::Widgets::LdapEntrySelector->new ($parent_window,
$ldap_source,
'dc=example,dc=com',
'objectClass=inetorgperson',
'init_interactive_filter' => 'smith',
'single_selection' => 1,
'interactive_filter_type' => 'simple'
);
$entryPopup->signal_connect (response => sub {
my ($popup, $response) = @_;
if($response =~ 'accept') {
print "Selected entry DN: ".$entryPopup->get_dn;
} else {
print "No existing entry selected.\n";
}
$_[0]->destroy;
});
$entryPopup->show_all;
ABSTRACT
Gtk2::Net::LDAP::Widgets::LdapEntrySelector is a child class to Gtk2::Dialog and is used to create a Gtk2 dialog which lets the user search for a LDAP entry and select it.
The dialog is equipped with a search/filter box.
CONSTRUCTOR
- new ( parent, ldap_source, base_dn, static_filter, named parameters )
-
Creates a new Gtk2::Net::LDAP::Widgets::LdapEntrySelector object.
parent
the Gtk2::Window which will be parent of this Gtk2::Dialogldap_source
the Net::LDAP object which is an active connection to an LDAP serverbase_dn
the base DN of LDAP search operationsstatic_filter
the static filter that will be logically AND-ed with all filters executed by this selector
named parameters
- init_interactive_filter => 'some ldap filter'
-
The string to be initially put in the filter box
- single_selection => 0 | 1
-
Whether to use single selection mode (otherwise multiple selection is posible)
- interactive_filter_type => 'ldap' | 'simple' | 'none'
-
The type of filter box: 'ldap' supports full LDAP filter syntax, 'simple' does a substring search against the "cn" attribute, 'none' disables the search/filter box.
refresh_list
Refresh the entries list - re-execute the search with the filter determined by the search/filter box.
get_dn
Return the list of selected entries' Distinguished Names.
The list has at most one entry if single_selection is set to 1.
SEE ALSO
Gtk2::Net::LDAP::Widgets Gtk2 Net::LDAP
AUTHOR
Aleksander Adamowski, <aleksander.adamowski@gmail.com>
COPYRIGHT AND LICENSE
Copyright 2005,2008 by Aleksander Adamowski
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.