| Server IP : 157.90.209.209 / Your IP : 216.73.216.129 [ Web Server : Apache System : Linux hcomm124.dns-wk.info 4.18.0-553.64.1.el8_10.x86_64 #1 SMP Mon Jul 28 12:01:56 EDT 2025 x86_64 User : evidenciarevista ( 1049) PHP Version : 7.2.34 Disable Function : exec,passthru,shell_exec,system Domains : 216 Domains MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /scripts/ |
Upload File : |
#!/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;