#!/usr/local/bin/perl # # postfix-module by Guillaume Cottenceau , # for webmin by Jamie Cameron # # A form for controling ldap lookups. # # << Here are all options seen in Postfix sample-ldap.cf >> require './postfix-lib.pl'; $access{'ldap'} || &error($text{'ldap_ecannot'}); &ui_print_header(undef, $text{'ldap_title'}, ""); $default = $text{'opts_default'}; $none = $text{'opts_none'}; $no_ = $text{'opts_no'}; if (!(&is_existing_parameter($ldap_timeout))) { print "$text{'ldap_non_existent'}

\n"; &ui_print_footer("", $text{'index_return'}); exit; } print "

\n"; print &ui_hidden("_log_form", "ldap"); print "\n"; print "\n"; print "
$text{'ldap_title'}
\n"; print "\n"; &option_freefield($ldap_timeout, 15); print "\n"; print "\n"; &option_radios_freefield("ldap_search_base", 65, $none); print "\n"; print "\n"; &option_radios_freefield("ldap_server_host", 65, $none); print "\n"; print "

\n"; print "

\n"; &ui_print_footer("", $text{'index_return'});