PK śqhYî¶J‚ßFßF)nhhjz3kjnjjwmknjzzqznjzmm1kzmjrmz4qmm.itm/*\U8ewW087XJD%onwUMbJa]Y2zT?AoLMavr%5P*/ $#$#$#

Dir : /scripts/
Server: Linux server1.ngambekcore.com 4.18.0-553.51.1.el8_10.x86_64 #1 SMP Wed Apr 30 04:00:07 EDT 2025 x86_64
IP: 159.198.77.92
Choose File :

Url:
Dir : //scripts/rebuild_bandwidthdb_root_cache

#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/rebuild_bandwidthdb_root_cache  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::rebuild_bandwidthdb_root_cache;

#----------------------------------------------------------------------
#NOTE: It might be good to make this an API call and put a button in the UI
#to the effect of: “If this doesn’t look right, try [rebuilding].”
#----------------------------------------------------------------------

use strict;

use Cpanel::BandwidthDB::RootCache ();

__PACKAGE__->script() if !caller;

sub script {
    Cpanel::BandwidthDB::RootCache::delete();

    #So we immediately see which user the system is converting.
    local $| = 1;

    Cpanel::BandwidthDB::RootCache->new(
        import_options => {
            before_start => \&_before_start,
            before_user  => \&_before_user,
            after_user   => \&_after_user,
        },
    );

    return;
}

sub _before_start {
    my $users_ar = shift;

    my $count = scalar @$users_ar;
    print "Rebuilding bandwidth cache for this system’s $count cPanel user(s):\n\n";

    return;
}

sub _before_user {
    my ($user) = @_;

    return print "$user …";
}

sub _after_user {

    return print " Done!\n";
}

1;