%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
Server IP : 49.231.201.246 / Your IP : 216.73.216.248 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/passwd/ |
Upload File : |
#!/usr/bin/perl # Show password change form require './passwd-lib.pl'; &ReadParse(); &error_setup($text{'passwd_err'}); @user = getpwnam($in{'user'}); @user || &error($text{'passwd_euser'}); &can_edit_passwd(\@user) || &error($text{'passwd_ecannot'}); &ui_print_header(undef, $text{'passwd_title'}, ""); print &ui_form_start("save_passwd.cgi", "post"); print &ui_hidden("user", $user[0]); print &ui_hidden("one", $in{'one'}); print &ui_table_start($text{'passwd_header'}, undef, 2); # Login and real name %uconfig = &foreign_config("useradmin"); $user[6] =~ s/,.*$// if ($uconfig{'extra_real'}); $user[6] =~ s/,+$//; print &ui_table_row($text{'passwd_for'}, &html_escape($user[0].( $user[6] ? " ($user[6])" : "" ))); # Old password field if ($access{'old'} == 1 || $access{'old'} == 2 && $user[0] ne $remote_user) { print &ui_table_row($text{'passwd_old'}, &ui_password("old", undef, 30)); } # New password print &ui_table_row($text{'passwd_new'}, &ui_password("new", undef, 30)); # New password again if ($access{'repeat'}) { print &ui_table_row($text{'passwd_repeat'}, &ui_password("repeat", undef, 30)); } # Force change at next login if (!$config{'passwd_cmd'} && $access{'expire'}) { &foreign_require("useradmin", "user-lib.pl"); $pft = &useradmin::passfiles_type(); ($uuser) = grep { $_->{'user'} eq $in{'user'} } &useradmin::list_users(); if ($uuser->{'max'} && ($pft == 2 || $pft == 5)) { print &ui_table_row(" ", &ui_checkbox("expire", 1, $text{'passwd_expire'}, 0)); } } # Change in other modules if ($access{'others'} == 2) { print &ui_table_row(" ", &ui_checkbox("others", 1, $text{'passwd_others'}, 1)); } print &ui_table_end(); print &ui_form_end([ [ undef, $text{'passwd_change'} ] ]); &ui_print_footer($in{'one'} ? ( "/", $text{'index'} ) : ( "", $text{'index_return'} ));