ÿØÿà JFIF ÿþ; %PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
Server IP : 157.90.209.209 / Your IP : 216.73.216.129 [ Web Server : Apache System : Linux hcomm124.dns-wk.info 4.18.0-553.64.1.el8_10.x86_64 #1 SMP Mon Jul 28 12:01:56 EDT 2025 x86_64 User : evidenciarevista ( 1049) PHP Version : 7.2.34 Disable Function : exec,passthru,shell_exec,system Domains : 216 Domains MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/src/csf/ |
Upload File : |
#!/usr/bin/perl use strict; use warnings; my @cmd = @ARGV; if ($cmd[0] eq "-a" or $cmd[0] eq "--allow") { $cmd[0] = "--add"; system("csf",@cmd); } elsif ($cmd[0] eq "-d" or $cmd[0] eq "--deny") { $cmd[0] = "--deny"; system("csf",@cmd); } elsif ($cmd[0] eq "-u" or $cmd[0] eq "--remove" or $cmd[0] eq "--unban") { $cmd[1] =~ s/\^|\$//g; $cmd[0] = "--addrm"; system("csf",@cmd); $cmd[0] = "--denyrm"; system("csf",@cmd); $cmd[0] = "--temprm"; system("csf",@cmd); } elsif ($cmd[0] eq "-s" or $cmd[0] eq "--start") { $cmd[0] = "--start"; system("csf",@cmd); } elsif ($cmd[0] eq "-f" or $cmd[0] eq "--flush" or $cmd[0] eq "--stop") { $cmd[0] = "--stop"; system("csf",@cmd); } elsif ($cmd[0] eq "-r" or $cmd[0] eq "--restart") { $cmd[0] = "--restart"; system("csf",@cmd); } elsif ($cmd[0] eq "-l" or $cmd[0] eq "--list") { $cmd[0] = "--status"; system("csf",@cmd); } else { print "Unknown command, please use csf directly instead of this apf stub\n"; } exit;