One Hat Cyber Team

Your IP: 216.73.216.19
Server IP: 178.33.27.10
Server: Linux cpanel.dev-unit.com 3.10.0-1160.108.1.el7.x86_64 #1 SMP Thu Jan 25 16:17:31 UTC 2024 x86_64
Server Software: Apache/2.4.57 (Unix) OpenSSL/1.0.2k-fips
PHP Version: 8.2.11
Buat File | Buat Folder

Dir : ~/usr/lib64/cbpolicyd-2.1/cbp/modules/

View File Name : Core.pm

# Core module
# Copyright (C) 2009-2011, AllWorldIT
# Copyright (C) 2008, LinuxRulz
# 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.


package cbp::modules::Core;

use strict;
use warnings;


use cbp::logging;
use awitpt::db::dblayer;
use cbp::system;


# User plugin info
our $pluginInfo = {
	name 			=> "Core",
	priority		=> 100,
	cleanup		 	=> \&cleanup,
};


# Cleanup function
sub cleanup
{
	my ($server) = @_;

	# Get yesterday's time
	my $yesterday = time() - 86400;

	# Remove old tracking info from database
	my $sth = DBDo('
		DELETE FROM 
			@TP@session_tracking
		WHERE
			UnixTimestamp < ?
		',
		$yesterday
	);
	if (!$sth) {
		$server->log(LOG_ERR,"[CORE] Failed to remove old session tracking records: ".awitpt::db::dblayer::Error());
		return -1;
	}
	$server->log(LOG_INFO,"[CORE] Removed ".( $sth ne "0E0" ? $sth : 0)." records from session tracking table");
}


1;
# vim: ts=4