File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/squid

📁 ..
📄 CHANGELOG(2.59 KB)
📄 acl.cgi(10.91 KB)
📄 acl_save.cgi(8.13 KB)
📄 acl_security.pl(1.72 KB)
📄 always.cgi(1.76 KB)
📄 always_save.cgi(1.17 KB)
📄 backup_config.pl(732 B)
📄 cachemgr.cgi(1.03 KB)
📄 calamaris.cgi(3.09 KB)
📄 cgi_args.pl(2.23 KB)
📄 chown.cgi(1.42 KB)
📄 clear.cgi(2.87 KB)
📄 config-AlmaLinux-7.0-ALL(439 B)
📄 config-Amazon-Linux-2-ALL(398 B)
📄 config-CentOS-Linux-7.0-ALL(398 B)
📄 config-CentOS-Stream-Linux-8.0-ALL(439 B)
📄 config-Oracle-Linux-8.0-ALL(439 B)
📄 config-Redhat-Enterprise-Linux-7.0-ALL(439 B)
📄 config-Rocky-Linux-7.0-ALL(439 B)
📄 config-Scientific-Linux-7.0-ALL(398 B)
📄 config-Ubuntu-Linux-16.0-ALL(447 B)
📄 config-aix(365 B)
📄 config-cobalt-linux(364 B)
📄 config-coherent-linux(422 B)
📄 config-corel-linux(338 B)
📄 config-debian-linux(338 B)
📄 config-debian-linux-10.0-ALL(447 B)
📄 config-debian-linux-3.0-4.9(344 B)
📄 config-debian-linux-5.0-5.9(454 B)
📄 config-debian-linux-6.0-6.9(442 B)
📄 config-debian-linux-7.0-9.0(449 B)
📄 config-freebsd(395 B)
📄 config-freebsd-8-ALL(484 B)
📄 config-generic-linux(405 B)
📄 config-gentoo-linux(412 B)
📄 config-hpux(405 B)
📄 config-irix(405 B)
📄 config-lfs-linux(374 B)
📄 config-macos(405 B)
📄 config-mandrake-linux(409 B)
📄 config-mandrake-linux-8.0-ALL(406 B)
📄 config-msc-linux(422 B)
📄 config-netbsd(360 B)
📄 config-open-linux(429 B)
📄 config-open-linux-3.1e(431 B)
📄 config-openbsd(395 B)
📄 config-openmamba-linux(347 B)
📄 config-openserver(405 B)
📄 config-osf1(405 B)
📄 config-pardus-linux(416 B)
📄 config-redhat-linux(341 B)
📄 config-redhat-linux-24.0-ALL(439 B)
📄 config-redhat-linux-6.0(427 B)
📄 config-redhat-linux-6.1-23.0(420 B)
📄 config-slackware-linux(405 B)
📄 config-sol-linux(401 B)
📄 config-solaris(405 B)
📄 config-solaris-11-ALL(461 B)
📄 config-suse-linux(332 B)
📄 config-suse-linux-8.0(359 B)
📄 config-suse-linux-8.2-ALL(435 B)
📄 config-trustix-linux(412 B)
📄 config-turbo-linux(341 B)
📄 config-united-linux(435 B)
📄 config-unixware(405 B)
📄 config.info(1.16 KB)
📄 config.info.ca(1.42 KB)
📄 config.info.cs(924 B)
📄 config.info.de(1.4 KB)
📄 config.info.es(1.36 KB)
📄 config.info.fa(1.57 KB)
📄 config.info.fr(538 B)
📄 config.info.it(570 B)
📄 config.info.ja(1.34 KB)
📄 config.info.nl(1.35 KB)
📄 config.info.no(1.22 KB)
📄 config.info.pl(737 B)
📄 config.info.pt_BR(1.44 KB)
📄 config.info.ru(1.39 KB)
📄 config.info.sv(569 B)
📄 config.info.tr(369 B)
📄 config.info.uk(1.41 KB)
📄 config.info.zh(450 B)
📄 config.info.zh_TW(355 B)
📄 defaultacl(228 B)
📄 delete_http_accesses.cgi(848 B)
📄 delete_http_reply_accesses.cgi(913 B)
📄 delete_https.cgi(838 B)
📄 delete_icp_accesses.cgi(836 B)
📄 delete_icps.cgi(1.14 KB)
📄 delete_pools.cgi(1.42 KB)
📄 delete_refreshes.cgi(840 B)
📄 edit_acl.cgi(6.99 KB)
📄 edit_admin.cgi(2.44 KB)
📄 edit_authparam.cgi(4.62 KB)
📄 edit_cache.cgi(7.39 KB)
📄 edit_cache_host.cgi(4.76 KB)
📄 edit_cachemgr.cgi(1.82 KB)
📄 edit_delay.cgi(2.86 KB)
📄 edit_ext.cgi(1.53 KB)
📄 edit_headeracc.cgi(1.96 KB)
📄 edit_icp.cgi(5.28 KB)
📄 edit_iptables.cgi(1.91 KB)
📄 edit_logs.cgi(4.74 KB)
📄 edit_manual.cgi(919 B)
📄 edit_mem.cgi(2.48 KB)
📄 edit_misc.cgi(3.92 KB)
📄 edit_nauth.cgi(1.26 KB)
📄 edit_nuser.cgi(1.46 KB)
📄 edit_pool.cgi(4.18 KB)
📄 edit_ports.cgi(3.28 KB)
📄 edit_progs.cgi(3.06 KB)
📄 edit_refresh.cgi(1.91 KB)
📁 help
📄 http_access.cgi(2 KB)
📄 http_access_save.cgi(1.37 KB)
📄 http_reply_access.cgi(1.81 KB)
📄 http_reply_access_save.cgi(1.25 KB)
📄 icp_access.cgi(1.98 KB)
📄 icp_access_save.cgi(1.35 KB)
📁 images
📄 index.cgi(5.54 KB)
📄 init_cache.cgi(3.03 KB)
📄 install_check.pl(615 B)
📁 lang
📄 list_headeracc.cgi(1.71 KB)
📄 list_refresh.cgi(1.63 KB)
📄 log_parser.pl(1.27 KB)
📄 module.info(496 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(122 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(191 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(231 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(249 B)
📄 module.info.ca(112 B)
📄 module.info.ca.auto(16 B)
📄 module.info.cs(27 B)
📄 module.info.cs.auto(105 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(134 B)
📄 module.info.de(110 B)
📄 module.info.de.auto(20 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(230 B)
📄 module.info.es(31 B)
📄 module.info.es.auto(124 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(138 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(231 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(159 B)
📄 module.info.fr(28 B)
📄 module.info.fr.auto(127 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(194 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(143 B)
📄 module.info.hu(0 B)
📄 module.info.hu.auto(170 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(142 B)
📄 module.info.ja(37 B)
📄 module.info.ja.auto(147 B)
📄 module.info.ko(31 B)
📄 module.info.ko.auto(121 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(151 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(159 B)
📄 module.info.ms(116 B)
📄 module.info.ms.auto(15 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(144 B)
📄 module.info.nl(27 B)
📄 module.info.nl.auto(98 B)
📄 module.info.no(0 B)
📄 module.info.no.auto(131 B)
📄 module.info.pl(27 B)
📄 module.info.pl.auto(115 B)
📄 module.info.pt(29 B)
📄 module.info.pt.auto(103 B)
📄 module.info.pt_BR(32 B)
📄 module.info.pt_BR.auto(109 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(147 B)
📄 module.info.ru(40 B)
📄 module.info.ru.auto(171 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(181 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(146 B)
📄 module.info.sv(26 B)
📄 module.info.sv.auto(111 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(231 B)
📄 module.info.tr(29 B)
📄 module.info.tr.auto(132 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(243 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(205 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(147 B)
📄 module.info.zh(30 B)
📄 module.info.zh.auto(84 B)
📄 module.info.zh_TW(33 B)
📄 module.info.zh_TW.auto(90 B)
📄 move_always.cgi(762 B)
📄 move_headeracc.cgi(777 B)
📄 move_http.cgi(748 B)
📄 move_http_reply.cgi(797 B)
📄 move_icp.cgi(736 B)
📄 move_never.cgi(751 B)
📄 move_pool.cgi(831 B)
📄 move_refresh.cgi(822 B)
📄 nat(34.84 KB)
📄 never.cgi(1.75 KB)
📄 never_save.cgi(1.15 KB)
📄 parser-lib.pl(6.39 KB)
📄 pool_access.cgi(1.82 KB)
📄 pool_access_save.cgi(1.17 KB)
📄 purge.cgi(1.11 KB)
📄 restart.cgi(381 B)
📄 save_admin.cgi(2.23 KB)
📄 save_authparam.cgi(5.29 KB)
📄 save_cache.cgi(6.03 KB)
📄 save_cache_host.cgi(3.8 KB)
📄 save_cachemgr.cgi(1.15 KB)
📄 save_delay.cgi(656 B)
📄 save_ext.cgi(2.32 KB)
📄 save_headeracc.cgi(1.26 KB)
📄 save_icp.cgi(1.18 KB)
📄 save_iptables.cgi(2.9 KB)
📄 save_logs.cgi(3.14 KB)
📄 save_manual.cgi(493 B)
📄 save_mem.cgi(1.72 KB)
📄 save_misc.cgi(2.65 KB)
📄 save_nuser.cgi(1.89 KB)
📄 save_pool.cgi(3.19 KB)
📄 save_ports.cgi(2.59 KB)
📄 save_progs.cgi(2.55 KB)
📄 save_refresh.cgi(1.46 KB)
📄 squid-auth.pl(446 B)
📄 squid-lib.pl(16.15 KB)
📄 start.cgi(1.16 KB)
📄 stop.cgi(881 B)
📄 syslog_logs.pl(715 B)
📄 useradmin_update.pl(2.8 KB)

Editing: edit_pool.cgi

#!/usr/bin/perl
# edit_pool.cgi
# A form for editing or creating a delay pool

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
our (%text, %in, %access, $squid_version, %config);
require './squid-lib.pl';
&ReadParse();
$access{'delay'} || &error($text{'delay_ecannot'});
my $conf = &get_config();

my $pool;
my @access;
my $param;
if ($in{'new'}) {
	&ui_print_header(undef, $text{'pool_title1'}, "", "edit_pool", 0, 0, 0,
		&restart_button());
	$pool = { 'values' => [] };
	$param = { 'values' => [] };
	}
else {
	&ui_print_header(undef, $text{'pool_title2'}, "", "edit_pool", 0, 0, 0,
		&restart_button());
	my @pools = &find_config("delay_class", $conf);
	($pool) = grep { $_->{'values'}->[0] == $in{'idx'} } @pools;
	my @params = &find_config("delay_parameters", $conf);
	($param) = grep { $_->{'values'}->[0] == $in{'idx'} } @params;
	@access = &find_config("delay_access", $conf);
	@access = grep { $_->{'values'}->[0] == $in{'idx'} } @access;
	}

print &ui_form_start("save_pool.cgi", "post");
print &ui_hidden("new", $in{'new'});
print &ui_hidden("idx", $in{'idx'});
print &ui_table_start($text{'pool_header'}, "width=100%", 2);

if ($in{'new'}) {
	my $pools = &find_value("delay_pools", $conf);
	print &ui_table_row($text{'pool_num'}, $pools + 1);
	}
else {
	print &ui_table_row($text{'pool_num'}, $in{'idx'});
	}

my $cls = $pool->{'values'}->[1] || 1;
print &ui_table_row($text{'pool_class'},
	&ui_select("class", $cls,
		[ map { [ $_, $_." - ".$text{"delay_class_".$_} ] }
		      (1 .. ($squid_version >= 3 ? 5 : 3)) ]));

print &ui_table_row($text{'pool_agg'},
	&limit_field("agg", $cls == 5 ? undef : $param->{'values'}->[1]), 3);

print &ui_table_row($text{'pool_ind'},
	&limit_field("ind", $param->{'values'}->[$cls == 2 ? 2 : 3]), 3);

print &ui_table_row($text{'pool_net'},
	&limit_field("net", $cls == 3 || $cls == 4 ?
				$param->{'values'}->[2] : undef), 3);

if ($squid_version >= 3) {
	print &ui_table_row($text{'pool_user'},
		&limit_field("user", $cls == 4 ?
			$param->{'values'}->[4] : undef), 3);

print &ui_table_row($text{'pool_tag'},
		&limit_field("tag", $cls == 5 ?
			$param->{'values'}->[1] : undef), 3);

}

print &ui_table_end();

if (!$in{'new'}) {
	print &ui_subheading($text{'pool_aclheader'});

if (@access) {
		my $table = &ui_columns_start([
				$text{'eacl_act'},
				$text{'eacl_acls1'},
				$text{'eacl_move'},
				], 100, 0, [ undef, undef, "width=5%" ]);
		my $hc = 0;
		foreach my $h (@access) {
			my @v = @{$h->{'values'}};
			if ($v[1] eq "allow") {
				$v[1] = $text{'eacl_allow'};
				}
			else {
				$v[1] = $text{'eacl_deny'};
				}
			my $mover = &ui_up_down_arrows(
				"move_pool.cgi?$hc+-1",
				"move_pool.cgi?$hc+1",
				$hc != 0,
				$hc != @access-1
				);
			$table .= &ui_columns_row([
				&ui_link("pool_access.cgi?index=".
					   "$h->{'index'}&idx=$in{'idx'}",
					 $v[1]),
				&html_escape(join(' ', @v[2..$#v])),
				$mover,
				]);
			$hc++;
			}
		$table .= &ui_columns_end();
		print $table;
		}
	else {
		print "<b>$text{'pool_noacl'}</b><p>\n";
		}
	print &ui_links_row([ &ui_link("pool_access.cgi?new=1&idx=$in{'idx'}",
				       $text{'pool_add'}) ]);
	}
if ($in{'new'}) {
	print &ui_form_end([ [ undef, $text{'create'} ] ]);
	}
else {
	print &ui_form_end([ [ undef, $text{'save'} ],
			     [ 'delete', $text{'delete'} ] ]);
	}

&ui_print_footer("edit_delay.cgi", $text{'delay_return'},
	"", $text{'index_return'});

# limit_field(name, value)
sub limit_field
{
my ($name, $value) = @_;
my ($v1, $v2) = $value =~ /^([0-9\-]+)\/([0-9\-]+)$/ ? ($1, $2) : ( -1, -1 );
my $unl = $v1 == -1 && $v2 == -1;
return &ui_radio($name."_def", $unl ? 1 : 0,
		   [ [ 1, $text{'delay_unlimited'} ],
		     [ 0, &unit_field($name."_1", $unl ? "" : $v1).
			  $text{'pool_limit1'}."&nbsp;&nbsp;".
			  &unit_field($name."_2", $unl ? "" : $v2).
			  $text{'pool_limit2'} ] ]);
}

# unit_field(name, value)
sub unit_field
{
my ($name, $value) = @_;
my @ud = ( .125, 1, 125, 1000, 125000, 1000000 );
my $u;
if ($value > 0) {
	for($u=@ud-1; $u>=1; $u--) {
		last if (!($value%$ud[$u]));
		}
	}
else {
	$u = 1;
	}
return &ui_textbox($name."_n", $value > 0 ? $value/$ud[$u] : $value, 8)." ".
       &ui_select($name."_u", $u,
		  [ map { [ $_, $text{'pool_unit'.$_} ] } (0..$#ud) ]);
}

X7ROOT File Manager

Editing: edit_pool.cgi

Upload File

Create Folder