X7ROOT File Manager
Current Path:
/usr/libexec/webmin/virtualmin-htpasswd
usr
/
libexec
/
webmin
/
virtualmin-htpasswd
/
📁
..
📄
CHANGELOG
(404 B)
📄
LICENSE
(34.32 KB)
📄
add.cgi
(3.14 KB)
📄
add_form.cgi
(1.52 KB)
📄
cgi_args.pl
(279 B)
📄
create-protected-directory.pl
(4.78 KB)
📄
create-protected-user.pl
(3.63 KB)
📄
delete-protected-directory.pl
(3.35 KB)
📄
delete-protected-user.pl
(2.64 KB)
📄
delete.cgi
(1.82 KB)
📄
find.cgi
(1.79 KB)
📁
help
📄
index.cgi
(2.42 KB)
📄
install-type
(4 B)
📁
lang
📄
list-protected-directories.pl
(3.01 KB)
📄
list-protected-users.pl
(2.99 KB)
📄
module.info
(147 B)
📄
module.info.af.auto
(34 B)
📄
module.info.ar.auto
(49 B)
📄
module.info.be.auto
(41 B)
📄
module.info.bg.auto
(65 B)
📄
module.info.ca.auto
(44 B)
📄
module.info.cs.auto
(42 B)
📄
module.info.da.auto
(40 B)
📄
module.info.de.auto
(45 B)
📄
module.info.el.auto
(79 B)
📄
module.info.es.auto
(45 B)
📄
module.info.eu.auto
(43 B)
📄
module.info.fa.auto
(58 B)
📄
module.info.fi
(40 B)
📄
module.info.fr.auto
(47 B)
📄
module.info.he.auto
(45 B)
📄
module.info.hr.auto
(41 B)
📄
module.info.hu.auto
(40 B)
📄
module.info.it.auto
(41 B)
📄
module.info.ja.auto
(43 B)
📄
module.info.ko.auto
(39 B)
📄
module.info.lt.auto
(45 B)
📄
module.info.lv.auto
(41 B)
📄
module.info.ms.auto
(40 B)
📄
module.info.mt.auto
(43 B)
📄
module.info.nl
(42 B)
📄
module.info.no
(40 B)
📄
module.info.pl.auto
(39 B)
📄
module.info.pt.auto
(45 B)
📄
module.info.pt_BR.auto
(48 B)
📄
module.info.ro.auto
(40 B)
📄
module.info.ru.auto
(57 B)
📄
module.info.sk.auto
(40 B)
📄
module.info.sl.auto
(41 B)
📄
module.info.sv.auto
(38 B)
📄
module.info.th.auto
(111 B)
📄
module.info.tr.auto
(38 B)
📄
module.info.uk.auto
(63 B)
📄
module.info.ur.auto
(72 B)
📄
module.info.vi.auto
(41 B)
📄
module.info.zh.auto
(37 B)
📄
module.info.zh_TW.auto
(40 B)
📄
virtual_feature.pl
(7.38 KB)
📄
virtualmin-htpasswd-lib.pl
(2.03 KB)
Editing: add.cgi
#!/usr/bin/perl # Add protection use strict; use warnings; our (%text, %in); require './virtualmin-htpasswd-lib.pl'; &ReadParse(); &error_setup($text{'add_err'}); # Validate inputs my $d = &virtual_server::get_domain($in{'dom'}); $d && &virtual_server::can_edit_domain($d) || &error($text{'index_ecannot'}); my $pub = &virtual_server::public_html_dir($d); my $cgi = &virtual_server::cgi_bin_dir($d); my $dir; my $tdir_escaped = $in{'dir_def'} == 1 ? "<em>".&html_escape($text{'add_all'})."</em>" : $in{'cgi'} ? "<tt>".&html_escape("$d->{'cgi_bin_dir'}/$in{'cgi'}")."</tt>" : $in{'dir'} ? "<tt>".&html_escape("$d->{'public_html_dir'}/$in{'dir'}")."</tt>" : ""; if ($in{'dir_def'} == 1) { # Whole website $dir = $pub; } else { my $dirname = $in{'dir_def'} == 2 ? $in{'cgi'} : $in{'dir'}; $dirname =~ /\S/ || &error($text{'add_edir'}); $dirname !~ /\.\./ && $dirname !~ /\0/ || &error($text{'add_edir2'}); $dirname !~ /^\// || &error($text{'add_edir3'}); if ($in{'dir_def'} == 2) { # Under cgi-bin $dir = $cgi."/".$in{'cgi'}; } else { # Under public_html $dir = $pub."/".$in{'dir'}; } -d $dir || &error($text{'add_edir4'}); } $in{'desc'} =~ /\S/ && $in{'desc'} !~ /["\0\r\n]/ || &error($text{'add_edesc'}); # Check for existing files my $file = "$dir/$htaccess_htpasswd::config{'htaccess'}"; my $conf = &apache::get_htaccess_config($file); my $htusers = $htaccess_htpasswd::config{'htpasswd'} || "htusers"; my $usersfile = "$dir/$htusers"; foreach my $clash ("AuthUserFile", "AuthType", "AuthName") { my $dirclash = &apache::find_directive($clash, $conf); if ($dirclash) { &error(&text('add_eclash3', $file, $clash)); } } -r $usersfile && &error(&text('add_eclash2', $usersfile)); -l $file && &error(&text('add_esymlink', $file)); # Create .htaccess (as domain owner) &lock_file($file); &apache::save_directive("AuthUserFile", [ "\"$usersfile\"" ], $conf, $conf); &apache::save_directive("AuthType", [ "Basic" ], $conf, $conf); &apache::save_directive("AuthName", [ "\"$in{'desc'}\"" ], $conf, $conf); &apache::save_directive("require", [ "valid-user" ], $conf, $conf); &apache::save_directive_struct(undef, { 'name' => 'Files', 'value' => $htusers, 'type' => 1, 'members' => [ { 'name' => 'deny', 'value' => 'from all' }, ], }, $conf, $conf); &virtual_server::write_as_domain_user($d, sub { &flush_file_lines($file) }); &unlock_file($file); &virtual_server::set_permissions_as_domain_user($d, 0755, $file); # Create users file &lock_file($usersfile); no strict "subs"; # XXX Lexical? &virtual_server::open_tempfile_as_domain_user($d, USERS, ">$usersfile"); &virtual_server::close_tempfile_as_domain_user($d, USERS); use strict "subs"; my $perms = &virtual_server::apache_in_domain_group($d) ? 0750 : 0755; &virtual_server::set_permissions_as_domain_user($d, $perms, $usersfile); &unlock_file($usersfile); # Add to protected dirs list my @dirs = &htaccess_htpasswd::list_directories(); my $dirstr = [ $dir, $usersfile, 0, 0, undef ]; push(@dirs, $dirstr); &htaccess_htpasswd::save_directories(\@dirs); &redirect("index.cgi?dom=$in{'dom'}&added=1&site=".&urlize($in{'dir_def'})."&type=".&urlize($tdir_escaped));
Upload File
Create Folder