File Manager
Upload
Current Directory: /home/lartcid/public_html/journal.lartc.id
[Back]
..
[Open]
Hapus
Rename
.htaccess
[Edit]
Hapus
Rename
.well-known
[Open]
Hapus
Rename
README.md
[Edit]
Hapus
Rename
api
[Open]
Hapus
Rename
cache
[Open]
Hapus
Rename
cgi-bin
[Open]
Hapus
Rename
classes
[Open]
Hapus
Rename
config.TEMPLATE.inc.php
[Edit]
Hapus
Rename
config.inc.php
[Edit]
Hapus
Rename
controllers
[Open]
Hapus
Rename
cypress.json
[Edit]
Hapus
Rename
dbscripts
[Open]
Hapus
Rename
docs
[Open]
Hapus
Rename
error_log
[Edit]
Hapus
Rename
favicon.ico
[Edit]
Hapus
Rename
index.php
[Edit]
Hapus
Rename
js
[Open]
Hapus
Rename
lib
[Open]
Hapus
Rename
locale
[Open]
Hapus
Rename
mini.php
[Edit]
Hapus
Rename
pages
[Open]
Hapus
Rename
php.ini
[Edit]
Hapus
Rename
plugins
[Open]
Hapus
Rename
public
[Open]
Hapus
Rename
registry
[Open]
Hapus
Rename
scheduledTaskLogs
[Open]
Hapus
Rename
schemas
[Open]
Hapus
Rename
styles
[Open]
Hapus
Rename
templates
[Open]
Hapus
Rename
tools
[Open]
Hapus
Rename
Edit 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;
Simpan