3
     !�Ã¿Ä      !File not found.
     #�Ã¿Ä      #File not found.
  "   %ˆl–Ðz¾”Jj"TÒ�zàœ¸”Å£Âƒ^oÀÅ ¡    %#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/distro_changed_hook             Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

package scripts::distro_changed_hook;

use cPstrict;

=encoding utf-8

=head1 NAME

F<distro_changed_hook>

=head1 USAGE

    distro_changed_hook [--help]

=head1 DESCRIPTION

This is executed by RPM triggers in the cpanel-trigger-os-release
package when one of the supported OS release packages is changed.

=cut

#----------------------------------------------------------------------

use parent qw( Cpanel::HelpfulScript );
use constant _OPTIONS => ();

use Cpanel::OS          ();
use Cpanel::ServerTasks ();

exit( __PACKAGE__->new(@ARGV)->run() ) if !caller;

#----------------------------------------------------------------------

sub run ($self) {
    Cpanel::OS::flush_disk_caches();
    Cpanel::ServerTasks::schedule_task( ['CpServicesTasks'], 1, 'restartsrv cpsrvd' );

    return 0;    # exit() value
}

1;
     '�ÄÀÅ      'File not found.
  9   )ˆl–Ým_J*j"Tâ€zàY¸ÛJbÑ¿Ãƒh¹a–Ým_J*j"Tâ€zà[¸ )‹FÿÇ      )0x00000000fe000000 0x00000000fe7fffff 0x0000000000042208
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000380000000000 0x0000380000003fff 0x000000000014220c
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x00000000febd0000 0x00000000febd0fff 0x0000000000040200
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x00000000000c0000 0x00000000000dffff 0x0000000000000212
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
     +�Æ¾Ç      +File not found.
     -�Æ¾Ç      -File not found.
     /�Æ¾Ç      /File not found.
     1ˆÀÄ„"y¿¾Ç 3å    1#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/shrink_modsec_ip_database       Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

package scripts::shrink_modsec_ip_database;

use strict;
use warnings;
use File::Temp                ();
use Cpanel::PwCache           ();
use Cpanel::FileUtils::Move   ();
use Cpanel::SafetyBits        ();
use Cpanel::SafetyBits::Chown ();
use Cpanel::AccessIds         ();
use Cpanel::SafeRun::Object   ();
use Cpanel::Imports;

our $MODSEC_SDBM_UTIL    = '/usr/sbin/modsec-sdbm-util';
our $DEFAULT_SECDATADIR  = '/var/cpanel/secdatadir';
our @DB_FILE_SUFFIXES    = qw( .pag .dir );                # Database file suffixes used by modsec-sdbm-util
our $NEW_DB_NAME         = 'new_db';                       # This name is hard-coded in modsec-sdbm-util
our $DB_PERMS            = 0640;                           # S_IRUSR | S_IWUSR | S_IRGRP
our $OTHER_EXECUTE_PERMS = 01;                             # S_IXOTH

sub new {
    my ( $pkg, $opts ) = @_;
    my $self = ref($opts) eq 'HASH' ? { %{$opts} } : {};
    bless $self, $pkg;
    return $self;
}

sub as_script {
    my $self = shift;
    logger->die('as_script() is a method call.') unless ref $self eq __PACKAGE__;

    if ( not $ARGV[0] or $ARGV[0] ne '-x' ) {
        my $msg = 'To execute, use the -x flag.';
        logger()->die($msg);
    }

    $self->run();

    return 1;
}

sub run {
    my $self = shift;
    logger->die('run() is a method call.') unless ref $self eq __PACKAGE__;

    return 0 unless $self->_bin_check;    # Bail out early and sile