⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.93
Server IP:
65.108.141.171
Server:
Linux server.heloix.com 5.4.0-214-generic #234-Ubuntu SMP Fri Mar 14 23:50:27 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
7.4.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
webmin
/
squid
/
View File Name :
delete_refreshes.cgi
#!/usr/bin/perl # Delete several refresh rules at once use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; our (%text, %in, %access, $squid_version, %config); require './squid-lib.pl'; &error_setup($text{'drefresh_err'}); $access{'refresh'} || &error($text{'refresh_ecannot'}); &ReadParse(); my @d = split(/\0/, $in{'d'}); @d || &error($text{'drefesh_enone'}); # Do the delete &lock_file($config{'squid_conf'}); my $conf = &get_config(); my @refresh = &find_config("refresh_pattern", $conf); foreach my $d (sort { $b <=> $a } @d) { my $h = $conf->[$d]; splice(@refresh, &indexof($h, @refresh), 1); } # Write it out &save_directive($conf, "refresh_pattern", \@refresh); &flush_file_lines(); &unlock_file($config{'squid_conf'}); &webmin_log("delete", "refreshes", scalar(@d)); &redirect("list_refresh.cgi");