Viewing File: /usr/local/cpanel/whostmgr/docroot/cgi/cwaf_main.cgi

#!/bin/sh
eval 'if [ -x /usr/local/cpanel/3rdparty/bin/perl ]; then exec /usr/local/cpanel/3rdparty/bin/perl -x -- $0 ${1+"$@"}; else exec /usr/bin/perl -x $0 ${1+"$@"}; fi;'
  if 0;
  
#!/usr/bin/perl -w
use lib '/usr/local/cpanel', '/usr/local/cpanel/whostmgr/docroot/cgi';

BEGIN { require '/etc/cwaf/use_lib.pl' if -f '/etc/cwaf/use_lib.pl'; }
## load Comodo modules
use Comodo::CWAF::Main;
use Comodo::CWAF::ClientAPI;
use Comodo::CWAF::ModSecurity;
use Comodo::CWAF::Excludes;
use Comodo::CWAF::Platform;


require "/usr/local/cpanel/whostmgr/cgi/cwaf_sharedlib.pl";

use Whostmgr::ACLS;
eval ('use Cpanel::Rlimit;');
unless ($@) {Cpanel::Rlimit::set_rlimit_to_infinity()}

use strict;
no warnings "once";
no warnings "redefine";

our (%conf, %msconf, $pr_name);

# init ACL 
Whostmgr::ACLS::init_acls();

##################################### BEGIN ##################################
#redefine log function
$pr_name = get_name();

local *do_log = \&do_log_stderr;
open(LOGFILE, ">&STDERR");

&print_cgi_main();

####################################### END ######################################