X7ROOT File Manager
Current Path:
/usr/libexec/webmin/passwd
usr
/
libexec
/
webmin
/
passwd
/
📁
..
📄
CHANGELOG
(648 B)
📄
acl_security.pl
(2.37 KB)
📄
change-passwd.pl
(1.44 KB)
📄
change_passwd.cgi
(1.6 KB)
📄
config
(39 B)
📄
config-openmamba-linux
(57 B)
📄
config.info
(229 B)
📄
config.info.af
(256 B)
📄
config.info.ar
(371 B)
📄
config.info.ca
(285 B)
📄
config.info.cs
(288 B)
📄
config.info.de
(271 B)
📄
config.info.el
(456 B)
📄
config.info.es
(307 B)
📄
config.info.fa
(433 B)
📄
config.info.fi
(261 B)
📄
config.info.fr
(312 B)
📄
config.info.hr
(0 B)
📄
config.info.hu
(310 B)
📄
config.info.it
(250 B)
📄
config.info.ja
(307 B)
📄
config.info.ko
(239 B)
📄
config.info.ms
(259 B)
📄
config.info.nl
(264 B)
📄
config.info.no
(241 B)
📄
config.info.pl
(231 B)
📄
config.info.ru
(498 B)
📄
config.info.tr
(299 B)
📄
config.info.uk
(482 B)
📄
config.info.zh_TW
(175 B)
📄
defaultacl
(71 B)
📄
edit_passwd.cgi
(1.8 KB)
📁
images
📄
index.cgi
(2.74 KB)
📁
lang
📄
log_parser.pl
(423 B)
📄
module.info
(218 B)
📄
module.info.af
(26 B)
📄
module.info.af.auto
(85 B)
📄
module.info.ar
(130 B)
📄
module.info.ar.auto
(19 B)
📄
module.info.be
(0 B)
📄
module.info.be.auto
(148 B)
📄
module.info.bg
(0 B)
📄
module.info.bg.auto
(164 B)
📄
module.info.ca
(97 B)
📄
module.info.ca.auto
(15 B)
📄
module.info.cs
(21 B)
📄
module.info.cs.auto
(78 B)
📄
module.info.da
(0 B)
📄
module.info.da.auto
(104 B)
📄
module.info.de
(96 B)
📄
module.info.de.auto
(15 B)
📄
module.info.el
(0 B)
📄
module.info.el.auto
(197 B)
📄
module.info.es
(31 B)
📄
module.info.es.auto
(86 B)
📄
module.info.eu
(0 B)
📄
module.info.eu.auto
(105 B)
📄
module.info.fa
(0 B)
📄
module.info.fa.auto
(157 B)
📄
module.info.fi
(26 B)
📄
module.info.fi.auto
(87 B)
📄
module.info.fr
(32 B)
📄
module.info.fr.auto
(95 B)
📄
module.info.he
(0 B)
📄
module.info.he.auto
(117 B)
📄
module.info.hr
(0 B)
📄
module.info.hr.auto
(104 B)
📄
module.info.hu
(32 B)
📄
module.info.hu.auto
(92 B)
📄
module.info.it
(24 B)
📄
module.info.it.auto
(79 B)
📄
module.info.ja
(33 B)
📄
module.info.ja.auto
(115 B)
📄
module.info.ko
(22 B)
📄
module.info.ko.auto
(105 B)
📄
module.info.lt
(0 B)
📄
module.info.lt.auto
(112 B)
📄
module.info.lv
(0 B)
📄
module.info.lv.auto
(96 B)
📄
module.info.ms
(88 B)
📄
module.info.ms.auto
(15 B)
📄
module.info.mt
(0 B)
📄
module.info.mt.auto
(105 B)
📄
module.info.nl
(30 B)
📄
module.info.nl.auto
(84 B)
📄
module.info.no
(31 B)
📄
module.info.no.auto
(75 B)
📄
module.info.pl
(22 B)
📄
module.info.pl.auto
(76 B)
📄
module.info.pt
(0 B)
📄
module.info.pt.auto
(98 B)
📄
module.info.pt_BR
(25 B)
📄
module.info.pt_BR.auto
(81 B)
📄
module.info.ro
(0 B)
📄
module.info.ro.auto
(103 B)
📄
module.info.ru
(21 B)
📄
module.info.ru.auto
(114 B)
📄
module.info.sk
(20 B)
📄
module.info.sk.auto
(84 B)
📄
module.info.sl
(0 B)
📄
module.info.sl.auto
(105 B)
📄
module.info.sv
(0 B)
📄
module.info.sv.auto
(106 B)
📄
module.info.th
(0 B)
📄
module.info.th.auto
(190 B)
📄
module.info.tr
(31 B)
📄
module.info.tr.auto
(92 B)
📄
module.info.uk
(0 B)
📄
module.info.uk.auto
(151 B)
📄
module.info.ur
(0 B)
📄
module.info.ur.auto
(160 B)
📄
module.info.vi
(0 B)
📄
module.info.vi.auto
(145 B)
📄
module.info.zh
(0 B)
📄
module.info.zh.auto
(88 B)
📄
module.info.zh_TW
(24 B)
📄
module.info.zh_TW.auto
(73 B)
📄
passwd-lib.pl
(4.76 KB)
📄
prefs.info
(39 B)
📄
rbac-mapping
(73 B)
📄
safeacl
(47 B)
📄
save_passwd.cgi
(2.88 KB)
Editing: save_passwd.cgi
#!/usr/bin/perl # save_passwd.cgi # Change a user's password require './passwd-lib.pl'; &error_setup($text{'passwd_err'}); &ReadParse(); if ($config{'passwd_cmd'}) { # Call the passwd program to do the change @user = getpwnam($in{'user'}); @user || &error($text{'passwd_euser'}); &can_edit_passwd(\@user) || &error($text{'passwd_ecannot'}); if ($access{'repeat'}) { $in{'new'} eq $in{'repeat'} || &error($text{'passwd_erepeat'}); } &foreign_require("proc", "proc-lib.pl"); if ($access{'old'} == 1 || $access{'old'} == 2 && $in{'user'} ne $remote_user) { @cmd = ( $config{'passwd_cmd'}, $user[2], $user[3] ); } else { @cmd = ( "$config{'passwd_cmd'} '$in{'user'}'" ); } &additional_log('exec', undef, $cmd[0]); local ($fh, $fpid) = &foreign_call("proc", "pty_process_exec", @cmd); while(1) { local $rv = &wait_for($fh, '(new|re-enter).*:', '(old|current|login).*:', 'pick a password'); $out .= $wait_for_input; sleep(1); if ($rv == 0) { syswrite($fh, $in{'new'}."\n", length($in{'new'})+1); } elsif ($rv == 1) { syswrite($fh, $in{'old'}."\n", length($in{'old'})+1); } elsif ($rv == 2) { syswrite($fh, "1\n", 2); } else { last; } last if (++$count > 10); } close($fh); waitpid($fpid, 0); &error(&text('passwd_ecmd', "<tt>$config{'passwd_cmd'}</tt>", "<pre>$out</pre>")) if ($? || $count > 10); &webmin_log("passwd", undef, $in{'user'}); } else { # Update the config files directly via the useradmin module &foreign_require("useradmin", "user-lib.pl"); # Find the user, either in local password file or LDAP $user = &find_user($in{'user'}); if ($user) { # Validate inputs if ($access{'old'} == 1 || $access{'old'} == 2 && $user->{'user'} ne $remote_user) { &useradmin::validate_password( $in{'old'}, $user->{'pass'}) || &error($text{'passwd_eold'}); } if ($access{'repeat'}) { $in{'new'} eq $in{'repeat'} || &error($text{'passwd_erepeat'}); } $err = &useradmin::check_password_restrictions( $in{'new'}, $in{'user'}, $user); &error($err) if ($err); &can_edit_passwd([ $user->{'user'}, $user->{'pass'}, $user->{'uid'}, $user->{'gid'} ]) || &error($text{'passwd_ecannot'}); # Actually do the change &change_password($user, $in{'new'}, $access{'others'} == 1 || $access{'others'} == 2 && $in{'others'}); } else { &error($text{'passwd_euser'}); } delete($user->{'plainpass'}); delete($user->{'pass'}); &webmin_log("passwd", undef, $user->{'user'}, $user); } # Show a confirmation message &ui_print_header(undef, $text{'passwd_title'}, ""); if (($user->{'user'} eq $remote_user || $user->{'user'} eq $base_remote_user) && !$main::session_id) { print &text('passwd_ok', "<tt>$user->{'user'}</tt>"),"\n"; } else { print &text('passwd_ok2', "<tt>$user->{'user'}</tt>"),"\n"; } &ui_print_footer($in{'one'} ? ( "/", $text{'index'} ) : ( "", $text{'index_return'} ));
Upload File
Create Folder