#!/usr/bin/perl # Display the forgotten password form BEGIN { push(@INC, "."); }; use WebminCore; $no_acl_check++; $trust_unknown_referers = 1; &init_config(); &ReadParse(); &load_theme_library(); &theme_forgot_handler($0) if (defined(&theme_forgot_handler)); &error_setup($text{'forgot_err'}); $gconfig{'forgot_pass'} || &error($text{'forgot_ecannot'}); $remote_user && &error($text{'forgot_elogin'}); $ENV{'HTTPS'} eq 'ON' || $gconfig{'forgot_pass'} == 2 || &error($text{'forgot_essl'}); $ENV{'SSL_CN_CERT'} == 1 || &error(&text('forgot_esslhost', &html_escape($ENV{'HTTP_HOST'} || $ENV{'SSL_CN'}))) if ($ENV{'HTTPS'} eq 'ON'); &ui_print_header(undef, $text{'forgot_title'}, "", undef, undef, 1, 1); print &ui_alert_box(" ⚠ ".$text{'forgot_nossl_warn'}, 'warn') if ($gconfig{'forgot_pass'} == 2 && $ENV{'HTTPS'} ne 'ON'); print "
\n"; print $text{'forgot_desc'},"

\n"; print &ui_form_start("forgot_send.cgi", "post"); print "$text{'forgot_user'}\n", &ui_textbox("forgot", $in{'failed'}, 40),"
\n"; print &ui_form_end([ [ undef, $text{'forgot_go'} ] ]); print "

\n"; &ui_print_footer();