????JFIF??x?x????'
| Server IP : 104.21.30.238  /  Your IP : 216.73.216.113 Web Server : LiteSpeed System : Linux premium151.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64 User : tempvsty ( 647) PHP Version : 8.0.30 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : OFF | Pkexec : OFF Directory : /proc/./self/root/opt/imunify360/venv/share/imunify360/cpanel/packages/extensions/ | 
| Upload File : | 
# Package this module.
package ImunifyHook;
# Deployment instructions are here:
# https://documentation.cpanel.net/display/DD/Guide+to+Standardized+Hooks+-+Hook+Action+Code#fcc4f1c5879a444aaa81888aff4fe4f4
# This file is used by Imunify360 to process events such as package change
# It should be located at /usr/local/cpanel/ImunifyHook.pm
# Return errors if Perl experiences problems.
use strict;
use warnings;
# Properly decode JSON.
use JSON;
# Use unix timestamp with milliseconds
use Time::HiRes qw/time/;
BEGIN { unshift @INC, '/usr/local/cpanel'; }
# Embed hook attributes alongside the action code.
sub describe {
    my $create = {
        'category' => 'Whostmgr',
        'event'    => 'Accounts::Create',
        'stage'    => 'post',
        'hook'     => 'ImunifyHook::hook_processing',
        'exectype' => 'module',
    };
    my $change_package = {
        'category' => 'Whostmgr',
        'event'    => 'Accounts::change_package',
        'stage'    => 'post',
        'hook'     => 'ImunifyHook::hook_processing',
        'exectype' => 'module',
    };
    my $modify = {
        'category' => 'Whostmgr',
        'event'    => 'Accounts::Modify',
        'stage'    => 'post',
        'hook'     => 'ImunifyHook::hook_processing',
        'exectype' => 'module',
    };
    my $delete = {
        'category' => 'Whostmgr',
        'event'    => 'Accounts::Remove',
        'stage'    => 'post',
        'hook'     => 'ImunifyHook::hook_processing',
        'exectype' => 'module',
    };
    return [ $create, $change_package, $modify, $delete ];
}
sub print_error {
    my ($hook_name, $msg) = @_;
    print STDERR "ImunifyHook:$hook_name: $msg\n";
}
sub write_data {
    my ($hook_name, $data) = @_;
    my $user;
    if (exists $data->{newuser}) {
        $user = $data->{newuser};
    } else {
        $user = $data->{user};
    }
    my $timestamp = time();
    my $result = 0;
    my $file_name = "/var/imunify360/hooks/$user.$hook_name.$timestamp";
    my $fr = open(my $fh, '>', "$file_name.json.tmp");
    unless ($fr) {
        print_error($hook_name, "Unable to open $file_name.json.tmp to save data for Imunify\n");
        return 0;
    }
    $result = print $fh encode_json($data);
    unless ($result) {
        print_error($hook_name, "Unable to write to $file_name.json.tmp\n");
    } else {
        $result = close $fh;
        unless ($result) {
            print_error($hook_name, "Unable to ends write to $file_name.json.tmp\n");
        } else {
            $result = rename "$file_name.json.tmp", "$file_name.json";
        }
    }
    unless ($result) {
        unlink "$file_name.json.tmp"
    }
    return $result;
}
sub hook_processing {
    # Get the data that the system passes to the hook.
    my ( $context, $data ) = @_;
    # Set success and failure messages.
    my $result  = 0;  # This boolean value is set to fail.
    my $message = "Applying Imunify settings";
    # write $data to temporary file
    my ($module, $method) = split(/\s*::\s*/, $context->{event});
    $result = write_data($method, $data);
    unless ($result)
    {
        $message = 'Unable to apply Imunify settings';
    }
    # Return the hook's result and message.
    return $result, $message;
}
1;