File Manager

X7ROOT File Manager

Current Path: /usr/local/cpanel/scripts

📁 ..
📄 MirrorSearch_pingtest(2.38 KB)
📄 activesync-invite-reply(1.69 KB)
📄 add_dns(2.36 KB)
📄 adddns(2.36 KB)
📄 addpop(6.08 KB)
📄 addsystemuser(3.27 KB)
📄 adduser(92 B)
📄 apachelimits(4.31 KB)
📄 archive_sync_zones(3.02 KB)
📄 auto-adjust-mysql-limits(1.81 KB)
📄 autorepair(1.24 KB)
📄 backups_clean_metadata_for_missing_backups(1.57 KB)
📄 backups_create_metadata(15.75 KB)
📄 backups_list_user_files(4.56 KB)
📄 balance_linked_node_quotas(2.58 KB)
📄 biglogcheck(1.69 KB)
📄 build_bandwidthdb_root_cache_in_background(1.52 KB)
📄 build_cpnat(3.41 KB)
📄 build_mail_sni(3.87 KB)
📄 build_maxemails_config(1.14 KB)
📄 builddovecotconf(6.76 KB)
📄 buildeximconf(7 KB)
📄 buildhttpdconf(2.6 KB)
📄 buildnsdconf(1.01 KB)
📄 buildpureftproot(539 B)
📄 ccs-check(4.91 KB)
📄 check_cpanel_pkgs(10.75 KB)
📄 check_cpanel_rpms(218 B)
📄 check_domain_tls_service_domains.pl(6.68 KB)
📄 check_immutable_files(5.49 KB)
📄 check_mail_spamassassin_compiledregexps_body_0(187 B)
📄 check_maxmem_against_domains_count(3.57 KB)
📄 check_mount_procfs(2.02 KB)
📄 check_mysql(5.55 KB)
📄 check_security_advice_changes(8.28 KB)
📄 check_unmonitored_enabled_services(4.56 KB)
📄 check_unreliable_resolvers(3.59 KB)
📄 check_users_my_cnf(6.05 KB)
📄 check_valid_server_hostname(7.66 KB)
📄 checkalldomainsmxs(2.4 KB)
📄 checkbashshell(1.18 KB)
📄 checkccompiler(1.22 KB)
📄 checkexim.pl(3.1 KB)
📄 checklink(1.29 KB)
📄 checknsddirs(1014 B)
📄 checkusers(856 B)
📄 chkmydns(561 B)
📄 chkpaths(141 B)
📄 chpass(416 B)
📄 ckillall(1.11 KB)
📄 clean_dead_mailman_locks(2.09 KB)
📄 clean_up_temp_wheel_users(2.44 KB)
📄 clean_user_php_sessions(4.76 KB)
📄 cleandns(13.09 KB)
📄 cleandns8(417 B)
📄 cleanmsglog(735 B)
📄 cleanphpsessions(932 B)
📄 cleanphpsessions.php(658 B)
📄 cleanquotas(1.61 KB)
📄 cleansessions(5.91 KB)
📄 cleanupinterchange(2.64 KB)
📄 cleanupmysqlprivs(533 B)
📄 clear_cpaddon_ui_caches(1.27 KB)
📄 clear_orphaned_virtfs_mounts(3.56 KB)
📄 comparecdb(1.52 KB)
📄 compilers(2.86 KB)
📄 compilerscheck(999 B)
📄 configure_firewall_for_cpanel(520 B)
📄 configure_rh_firewall_for_cpanel(520 B)
📄 configure_rh_ipv6_firewall_for_cpanel(520 B)
📄 convert2dovecot(682 B)
📄 convert_accesshash_to_token(4.07 KB)
📄 convert_and_migrate_from_legacy_backup(1.97 KB)
📄 convert_maildir_to_mdbox(1.66 KB)
📄 convert_mdbox_to_maildir(1.66 KB)
📄 convert_roundcube_mysql2sqlite(25.28 KB)
📄 convert_to_dovecot_delivery(4.33 KB)
📄 convert_whmxfer_to_sqlite(1.46 KB)
📄 copy_user_mail_as_root(1.25 KB)
📄 copy_user_mail_as_user(1.34 KB)
📄 cpaddonsup(3.25 KB)
📄 cpan_config(2.8 KB)
📁 cpan_sandbox
📄 cpanel_initial_install(67.36 KB)
📄 cpanelsync(28.31 KB)
📄 cpanelsync_postprocessor(1.62 KB)
📄 cpanpingtest(965 B)
📄 cpbackup(44.77 KB)
📄 cpbackup_transport_file(5.65 KB)
📄 cpdig(1.81 KB)
📄 cpfetch(1.23 KB)
📄 cphulkdblacklist(433 B)
📄 cphulkdwhitelist(1.3 KB)
📄 cpservice(2.87 KB)
📄 cpuser_port_authority(19.29 KB)
📄 cpuser_service_manager(10.85 KB)
📄 createacct(24.57 MB)
📄 custom_backup_destination.pl.sample(5.06 KB)
📄 custom_backup_destination.pl.skeleton(2.84 KB)
📄 dav_change_hostname(3.57 KB)
📄 dcpumon-wrapper(850 B)
📄 delpop(6.2 KB)
📄 detect_env_capabilities(508 B)
📄 disable_prelink(2.77 KB)
📄 disable_sqloptimizer(1.49 KB)
📄 disablefileprotect(2.09 KB)
📄 distro_changed_hook(1.16 KB)
📄 dnscluster(4.44 KB)
📄 dnsqueuecron(1.29 KB)
📄 dnssec-cluster-keys(3.75 KB)
📄 dovecot_maintenance(7.93 KB)
📄 dovecot_set_defaults.pl(984 B)
📄 dumpcdb(866 B)
📄 dumpinodes(687 B)
📄 dumpquotas(616 B)
📄 dumpstor(913 B)
📄 ea4_fresh_install(2.64 KB)
📄 edit_cpanelsync_exclude_list(2.58 KB)
📄 editquota(3.44 KB)
📄 elevate-cpanel(377.87 KB)
📄 email_archive_maintenance(6.15 KB)
📄 email_hold_maintenance(1.46 KB)
📄 enable_spf_dkim_globally(8.83 KB)
📄 enable_sqloptimizer(1.57 KB)
📄 enablefileprotect(2.1 KB)
📄 ensure_autoenabled_features(2.5 MB)
📄 ensure_conf_dir_crt_key(4.82 KB)
📄 ensure_cpuser_file_ip(2.55 KB)
📄 ensure_crontab_permissions(1.08 KB)
📄 ensure_dovecot_memory_limits_meet_minimum(3.13 KB)
📄 ensure_hostname_resolves(2.57 KB)
📄 ensure_includes(601 B)
📄 ensure_vhost_includes(13.53 KB)
📄 exim_tidydb(2.96 KB)
📄 eximconfgen(1.32 KB)
📄 eximstats_spam_check(867 B)
📄 export_horde_calendars_to_ics(15.07 KB)
📄 export_horde_contacts_to_vcf(13.94 KB)
📄 exportmydnsdb(3.47 KB)
📄 expunge_expired_certificates_from_sslstorage(3.56 KB)
📄 expunge_expired_pkgacct_sessions(852 B)
📄 expunge_expired_transfer_sessions(1.06 KB)
📄 fastmail(5.16 KB)
📄 featuremod(1.92 KB)
📄 fetchfile(422 B)
📄 find_and_fix_rpm_issues(6.99 KB)
📄 find_outdated_services(5.41 KB)
📄 find_pids_with_inotify_watch_on_path(3.66 KB)
📄 fix-cpanel-perl(28.82 KB)
📄 fix-listen-on-localhost(3.52 KB)
📄 fix-web-vhost-configuration(6.15 KB)
📄 fix_addon_permissions(7.68 KB)
📄 fix_dns_zone_ttls(1.34 KB)
📄 fix_innodb_tables(4.05 KB)
📄 fix_pear_registry(4.07 KB)
📄 fix_reseller_acls(10.88 KB)
📄 fixetchosts(4.32 KB)
📄 fixheaders(572 B)
📄 fixmailinglistperms(1008 B)
📄 fixmailman(2.09 KB)
📄 fixnamedviews(1.22 KB)
📄 fixndc(413 B)
📄 fixquotas(17.45 KB)
📄 fixrelayd(1.74 KB)
📄 fixrndc(16.48 KB)
📄 fixtar(503 B)
📄 fixtlsversions(4.7 KB)
📄 fixvaliases(2 KB)
📄 fixwebalizer(966 B)
📄 forcelocaldomain(895 B)
📄 ftpfetch(2.2 KB)
📄 ftpquotacheck(8.31 KB)
📄 ftpsfetch(2.36 KB)
📄 ftpupdate(261 B)
📄 gather_update_log_stats(4.25 KB)
📄 gather_update_logs_setupcrontab(5.45 KB)
📄 gemwrapper(1.74 KB)
📄 gencrt(6.26 KB)
📄 generate_account_suspension_include(5.7 KB)
📄 generate_google_drive_credentials(1.11 KB)
📄 generate_google_drive_oauth_uri(984 B)
📄 generate_maildirsize(13.94 KB)
📄 gensysinfo(1.16 KB)
📄 get_locale_from_legacy_name_info(1.99 KB)
📄 getremotecpmove(12.67 KB)
📄 grpck(1.19 KB)
📄 hackcheck(3.02 KB)
📄 hook(1.45 KB)
📄 httpspamdetect(2.66 KB)
📄 hulk-unban-ip(3.93 MB)
📄 import_exim_data(8.39 KB)
📄 importmydnsdb(11.34 KB)
📄 increase_filesystem_limits(891 B)
📄 initacls(4.99 KB)
📄 initfpsuexec(444 B)
📄 initquotas(19.47 KB)
📄 initsuexec(4.03 KB)
📄 install_cpanel_analytics(1.93 KB)
📄 install_dovecot_fts(1.57 KB)
📄 install_plugin(2.8 KB)
📄 installpkg(575 B)
📄 installpostgres(6.56 KB)
📄 installsqlite3(1.82 KB)
📄 ipcheck(3.93 KB)
📄 ipusage(7.45 KB)
📄 isdedicatedip(602 B)
📄 jetbackup-check(3.69 KB)
📄 killdns(422 B)
📄 killdns-dnsadmin(1.15 KB)
📄 killmysqluserprivs(433 B)
📄 killmysqlwildcard(1.15 KB)
📄 killpvhost(853 B)
📄 killspamkeys(937 B)
📄 link_3rdparty_binaries(1.24 KB)
📄 linksubemailtomainacct(3.17 KB)
📄 listcheck(538 B)
📄 listsubdomains(1.05 KB)
📄 litespeed-check(3.86 KB)
📄 locale_export(4.82 KB)
📄 locale_import(4.35 KB)
📄 locale_info(3.99 KB)
📄 logo.dat(205 B)
📄 magicloader(1.94 KB)
📄 maildir_converter(6.08 KB)
📄 mailperm(16.58 KB)
📄 mailscannerupdate(2.42 KB)
📄 mainipcheck(10 KB)
📄 maintenance(46.62 KB)
📄 make_config(407 B)
📄 make_hostname_unowned(1.16 KB)
📄 manage_extra_marketing(12.41 KB)
📄 manage_greylisting(16.19 KB)
📄 manage_mysql_profiles(20.02 KB)
📄 migrate-pdns-conf(9.83 KB)
📄 migrate_local_ini_to_php_ini(7.41 KB)
📄 migrate_whmtheme_file_to_userdata(2.95 KB)
📄 mkwwwacctconf(2.33 KB)
📄 modify_accounts(4.09 KB)
📄 modify_featurelist(9.2 KB)
📄 modify_packages(3.65 KB)
📄 modsec_vendor(15.63 KB)
📄 mysqlconnectioncheck(6.55 KB)
📄 mysqlpasswd(4.09 KB)
📄 named.ca(1.57 KB)
📄 named.rfc1912.zones(774 B)
📄 nixstatsagent.sh(58.67 KB)
📄 notify_expiring_certificates(9.37 KB)
📄 notify_expiring_certificates_on_linked_nodes(1.33 KB)
📄 oopscheck(1.12 KB)
📄 optimize_eximstats(3.88 KB)
📄 patch_mail_spamassassin_compiledregexps_body_0(2.39 KB)
📄 patchfdsetsize(2.72 KB)
📄 pedquota(2.26 KB)
📄 perform_sqlite_auto_rebuild_db_maintenance(2.2 KB)
📄 perlinstaller(528 B)
📄 perlmods(1.18 KB)
📄 php_fpm_config(9.73 KB)
📁 php_sandbox
📄 phpini_tidy(687 B)
📄 pkgacct(87.82 KB)
📄 post_snapshot(3.16 KB)
📄 post_sync_cleanup(6.09 KB)
📄 primary_virtual_host_migration(2.44 KB)
📄 process_pending_cpanel_php_pear_registration(3.49 KB)
📄 process_site_templates(7.27 KB)
📄 proxydomains(9.34 KB)
📄 ptycheck(724 B)
📄 purge_modsec_log(1.53 KB)
📄 purge_old_config_caches(2.08 KB)
📄 pwck(708 B)
📄 quickdnslookup(1.13 KB)
📄 quickwhoisips(2.29 KB)
📄 quota_auto_fix(1.41 KB)
📄 quotacheck(22.36 KB)
📄 rawchpass(460 B)
📄 rdate(4.8 KB)
📄 realadduser(5.61 KB)
📄 realchpass(3.26 KB)
📄 realperlinstaller(5.67 KB)
📄 realrawchpass(425 B)
📄 rebuild_available_addons_packages_cache(1.27 KB)
📄 rebuild_available_rpm_addons_cache(1.27 KB)
📄 rebuild_bandwidthdb_root_cache(1.45 KB)
📄 rebuild_dbmap(5.8 KB)
📄 rebuild_provider_openid_connect_links_db(1.01 KB)
📄 rebuild_whm_chrome(2.22 KB)
📄 rebuilddnsconfig(26.21 KB)
📄 rebuildhttpdconf(2.6 KB)
📄 rebuildinstalledssldb(2.85 KB)
📄 rebuildippool(509 B)
📄 rebuildnsdzones(1.14 KB)
📄 rebuilduserssldb(948 B)
📄 refresh-dkim-validity-cache(5.97 KB)
📄 regenerate_tokens(2.18 KB)
📄 reloadnsd(821 B)
📄 remote_log_transfer(11.6 KB)
📄 remove_dovecot_index_files(5.89 KB)
📄 removeacct(20.91 MB)
📄 rescan_user_dovecot_fts(2.98 KB)
📄 reset_mail_quotas_to_sane_values(6.82 KB)
📄 resetmailmanurls(2.03 KB)
📄 resetquotas(4.68 KB)
📄 restartsrv(3.23 KB)
📄 restartsrv_apache(422 B)
📄 restartsrv_apache_php_fpm(9.9 MB)
📄 restartsrv_base(9.9 MB)
📄 restartsrv_bind(9.9 MB)
📄 restartsrv_chkservd(427 B)
📄 restartsrv_clamd(9.9 MB)
📄 restartsrv_cpanalyticsd(9.9 MB)
📄 restartsrv_cpanel_php_fpm(9.9 MB)
📄 restartsrv_cpanellogd(9.9 MB)
📄 restartsrv_cpdavd(9.9 MB)
📄 restartsrv_cpgreylistd(9.9 MB)
📄 restartsrv_cphulkd(9.9 MB)
📄 restartsrv_cpipv6(9.9 MB)
📄 restartsrv_cpsrvd(9.9 MB)
📄 restartsrv_crond(9.9 MB)
📄 restartsrv_dnsadmin(9.9 MB)
📄 restartsrv_dovecot(9.9 MB)
📄 restartsrv_exim(9.9 MB)
📄 restartsrv_eximstats(504 B)
📄 restartsrv_ftpd(426 B)
📄 restartsrv_ftpserver(911 B)
📄 restartsrv_httpd(9.9 MB)
📄 restartsrv_imap(437 B)
📄 restartsrv_inetd(2.47 KB)
📄 restartsrv_ipaliases(9.9 MB)
📄 restartsrv_lmtp(437 B)
📄 restartsrv_mailman(9.9 MB)
📄 restartsrv_mydns(9.9 MB)
📄 restartsrv_mysql(9.9 MB)
📄 restartsrv_named(777 B)
📄 restartsrv_nscd(9.9 MB)
📄 restartsrv_nsd(9.9 MB)
📄 restartsrv_p0f(9.9 MB)
📄 restartsrv_pdns(9.9 MB)
📄 restartsrv_pop3(437 B)
📄 restartsrv_postgres(427 B)
📄 restartsrv_postgresql(9.9 MB)
📄 restartsrv_powerdns(442 B)
📄 restartsrv_proftpd(9.9 MB)
📄 restartsrv_pureftpd(9.9 MB)
📄 restartsrv_queueprocd(9.9 MB)
📄 restartsrv_rsyslog(9.9 MB)
📄 restartsrv_rsyslogd(437 B)
📄 restartsrv_spamd(9.9 MB)
📄 restartsrv_sshd(9.9 MB)
📄 restartsrv_syslogd(2.4 KB)
📄 restartsrv_tailwatchd(9.9 MB)
📄 restartsrv_unknown(9.9 MB)
📄 restartsrv_xinetd(422 B)
📄 restorecpuserfromcache(1.96 KB)
📄 restorepkg(36.49 MB)
📄 rfc1912_zones.tar(10 KB)
📄 rpmup(4.77 KB)
📄 rsync-user-homedir.pl(5.76 KB)
📄 run_if_exists(512 B)
📄 run_plugin_lifecycle(3.53 KB)
📄 runstatsonce(440 B)
📄 runweblogs(1.02 KB)
📄 sa-update_wrapper(3.34 KB)
📄 safetybits.pl(844 B)
📄 secureit(4.72 KB)
📄 securemysql(4.54 KB)
📄 securerailsapps(3.58 KB)
📄 securetmp(15.99 KB)
📄 sendicq(474 B)
📄 servicedomains(9.34 KB)
📄 set_mailman_archive_perms(1.75 KB)
📄 set_php_memory_limits(3.67 KB)
📄 setpostgresconfig(6.04 KB)
📄 setup_greylist_db(16.19 KB)
📄 setup_modsec_db(1.3 KB)
📄 setup_systemd_timer_for_plugins(3.92 KB)
📄 setupftpserver(10.47 KB)
📄 setupmailserver(9.55 KB)
📄 setupnameserver(13.75 KB)
📄 shrink_modsec_ip_database(12.97 KB)
📄 simpleps(3.05 KB)
📄 slurp_exim_mainlog(5.78 KB)
📄 smartcheck(15.13 KB)
📄 smtpmailgidonly(8.15 KB)
📄 snapshot_prep(5.88 KB)
📄 spamassassin_dbm_cleaner(5.85 KB)
📄 spamassassindisable(3.74 KB)
📄 spamboxdisable(2.27 KB)
📄 sshcontrol(14.38 KB)
📄 ssl_crt_status(3.84 KB)
📄 suspendacct(18.01 KB)
📄 suspendmysqlusers(4.42 KB)
📄 swapip(3.82 KB)
📄 sync-mysql-users-from-grants(1.2 KB)
📄 sync_child_accounts(1.77 KB)
📄 sync_contact_emails_to_cpanel_users_files(1.14 KB)
📄 synccpaddonswithsqlhost(6.59 KB)
📄 synctransfers(1.92 KB)
📄 syslog_check(1.36 KB)
📄 sysup(645 B)
📄 test_sa_compiled(1.07 KB)
📄 transfer_account_as_user(2.34 KB)
📄 transfer_accounts_as_root(4.76 KB)
📄 transfer_in_progress(3.08 KB)
📄 transfer_in_progress.pod(312 B)
📄 transfermysqlusers(9.53 MB)
📄 try-later(7.95 KB)
📄 unblockip(667 B)
📄 uninstall_cpanel_analytics(1.2 KB)
📄 uninstall_dovecot_fts(562 B)
📄 uninstall_plugin(2.84 KB)
📄 unlink_service_account(2.62 KB)
📄 unpkgacct(4.6 KB)
📄 unslavenamedconf(863 B)
📄 unsuspendacct(17.8 KB)
📄 unsuspendmysqlusers(6.71 KB)
📄 upcp(31.56 KB)
📄 upcp-running(2.7 KB)
📄 upcp.static(708.6 KB)
📄 update-packages(4.77 KB)
📄 update_apachectl(480 B)
📄 update_db_cache(430 B)
📄 update_dkim_keys(1.45 KB)
📄 update_exim_rejects(1.21 KB)
📄 update_existing_mail_quotas_for_account(4.78 KB)
📄 update_known_proxy_ips(1002 B)
📄 update_local_rpm_versions(4.56 KB)
📄 update_mailman_cache(8.34 KB)
📄 update_mysql_systemd_config(1.25 KB)
📄 update_neighbor_netblocks(487 B)
📄 update_sa_config(2.14 KB)
📄 update_spamassassin_config(10.73 KB)
📄 update_users_jail(691 B)
📄 update_users_vhosts(801 B)
📄 updatedomainips(605 B)
📄 updatenameserverips(1.66 KB)
📄 updatenow(5.18 KB)
📄 updatenow.static(1.91 MB)
📄 updatesigningkey(1.95 KB)
📄 updatessldomains(1.81 KB)
📄 updatesupportauthorizations(2.49 KB)
📄 updateuserdatacache(2.47 KB)
📄 updateuserdomains(774 B)
📄 upgrade_bandwidth_dbs(2.22 KB)
📄 upgrade_subaccount_databases(2.73 KB)
📄 userdata_wildcard_cleanup(5.74 KB)
📄 userdirctl(5.01 KB)
📄 validate_sshkey_passphrase(1.21 KB)
📄 verify_api_spec_files(757 B)
📄 verify_pidfile(1.96 KB)
📄 verify_vhost_includes(7.34 KB)
📄 vps_optimizer(7.82 KB)
📄 vzzo-fixer(725 B)
📄 whmlogin(2.33 KB)
📄 whoowns(1.13 KB)
📄 wpt_license(6.27 MB)
📄 wwwacct(24.57 MB)
📄 wwwacct2(88 B)
📄 xfer_rcube_schema_migrate.pl(2.4 KB)
📄 xfer_rcube_uid_resolver.pl(1.8 KB)
📄 xferpoint(3.13 KB)
📄 xfertool(16.14 KB)
📄 zoneexists(800 B)

Editing: reset_mail_quotas_to_sane_values

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

# cpanel - scripts/reset_mail_quotas_to_sane_values
#                                                  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

use strict;
use warnings;

use Cpanel::LoadFile                ();
use Cpanel::PwCache::Helpers        ();
use Cpanel::PwCache::Build          ();
use Cpanel::Usage                   ();
use Cpanel::PwCache                 ();
use Cpanel::AccessIds::SetUids      ();
use Cpanel::Config::LoadCpUserFile  ();
use Cpanel::Config::HasCpUserFile   ();
use Cpanel::Config::Users           ();
use Cpanel::Config::LoadUserDomains ();
use Cpanel::SafeFile                ();
use Cpanel::Email::Maildir          ();

my $version = '1.1';
my $verbose = 0;
my $confirm = 0;
my $force   = 0;

# Max quota is actually 1 byte less than get_max_email_quota
# but we'll silently fix the 1 byte issue below
my $max_quota = Cpanel::Email::Maildir::get_max_email_quota();

# Argument processing
my %opts = (
    'verbose' => \$verbose,
    'confirm' => \$confirm,
    'force'   => \$force,
);

Cpanel::Usage::wrap_options( \@ARGV, \&usage, \%opts );

if ( $> == 0 && !$confirm ) {
    print "Must specify \"--confirm\" to begin. Please read and understand the usage.\n\n";
    usage(1);
}
umask(0077);    # Keep maildirsize file perms consistent with Exim

my $pwcache_ref;
my %CPUSERS;
my $saveversion     = 0;
my $suid            = 0;
my $userdomains_ref = {};

if ( $> == 0 ) {
    $suid = 1;
    Cpanel::PwCache::Helpers::no_uid_cache();    #uid cache only needed if we are going to make lots of getpwuid calls

Cpanel::PwCache::Build::init_passwdless_pwcache();
    $pwcache_ref = Cpanel::PwCache::Build::fetch_pwcache();
    my $users_arr_ref = Cpanel::Config::Users::getcpusers();
    $userdomains_ref = Cpanel::Config::LoadUserDomains::loaduserdomains( {}, 0, 1 );

%CPUSERS = map { $_ => undef } @{$users_arr_ref};
    if ( @ARGV && $ARGV[$#ARGV] !~ m/^-/ ) {
        if ( exists $CPUSERS{ $ARGV[$#ARGV] } ) {
            %CPUSERS = ( $ARGV[$#ARGV] => 1 );    #only do one user
        }
        else {
            %CPUSERS = ();
        }
    }
    my $last_version = Cpanel::LoadFile::loadfile('/var/cpanel/version/reset_mail_quotas_to_sane_values') || '';
    if ( $last_version eq $version && !$force ) {
        print "You must use --force to run this utility once it has already been run.\n";
        exit 1;
    }
    $saveversion = 1;
}
else {
    $confirm = 1;
    my @PW = Cpanel::PwCache::getpwuid($>);
    $pwcache_ref = [ \@PW ];
    %CPUSERS     = ( $PW[0] => 1 );

my @DOMAINS;
    if ( Cpanel::Config::HasCpUserFile::has_cpuser_file( $PW[0] ) ) {
        my $user_info = Cpanel::Config::LoadCpUserFile::loadcpuserfile( $PW[0] );    #we want to load the default so we can use the storable cache
        @DOMAINS = ( $user_info->{'DOMAIN'} );
        if ( ref $user_info->{'DOMAINS'} ) {
            push @DOMAINS, @{ $user_info->{'DOMAINS'} };
        }
    }
    $userdomains_ref->{ $PW[0] } = \@DOMAINS;
}

my ( $user, $useruid, $usergid, $homedir );
foreach my $pwref (@$pwcache_ref) {
    ( $user, $useruid, $usergid, $homedir ) = (@$pwref)[ 0, 2, 3, 7 ];
    next if ( !exists $CPUSERS{$user} );
    if ( !$homedir || !-d $homedir ) {
        print "Skipping $user\n (no home directory)\n";
        next;
    }

#All the domains
    my @DOMAINS = ref $userdomains_ref->{$user} ? @{ $userdomains_ref->{$user} } : ();
    my @needs_cleanup;
    foreach my $domain (@DOMAINS) {
        if ( -f $homedir . '/etc/' . $domain . '/quota' && -s _ ) {
            push @needs_cleanup, $domain;
        }
    }

if ( !@needs_cleanup ) {
        if ($verbose) {
            print "Skipping $user as no domains have a quota file.\n";
        }
        next;
    }

#only fork+setuid if we have something do to
    if ( my $pid = fork() ) {
        waitpid( $pid, 0 );
    }
    else {
        if ($suid) {
            Cpanel::PwCache::Build::pwclearcache();
            Cpanel::AccessIds::SetUids::setuids( $useruid, $usergid ) || die "Could not setuid to $user";
        }

foreach my $domain (@needs_cleanup) {
            next if ( !$domain );
            normalize_domain_quota( $homedir, $domain, 1 );
        }
        exit;
    }
}

if ($saveversion) {
    if ( open( my $v_fh, '>', '/var/cpanel/version/reset_mail_quotas_to_sane_values' ) ) {
        print {$v_fh} $version;
        close($v_fh);
    }
}

sub normalize_domain_quota {
    my ( $homedir, $domain, $skip_check_existance ) = @_;
    my $dir = $homedir . '/etc/' . $domain;

if ( !$skip_check_existance ) {
        return 0 if !-f $dir . '/quota' || -z _;
    }
    my %quota_by_user;
    my $altered  = 0;
    my $safelock = Cpanel::SafeFile::safeopen( \*QUOTAFH, '+<', $dir . '/quota' );
    if ($safelock) {
        while ( my $line = readline( \*QUOTAFH ) ) {
            chomp $line;
            my ( $user, $quota ) = split( /:/, $line, 2 );

next if !$user || !$quota;

# Quota values above 2GB will be converted to unlimited
            if ( ( int $quota ) > $max_quota ) {
                print "Quota for user $user\@$domain exceedes maximum of $max_quota.  Quota removed.\n" if $verbose;
                $altered = 1;
                next;
            }

# Remove 1 byte for quota values equal to 2GB
            if ( ( int $quota ) == $max_quota ) {
                $quota   = $max_quota - 1;
                $altered = 1;
            }
            $quota_by_user{$user} = $quota;
        }
        seek( QUOTAFH, 0, 0 );

if ($altered) {
            print "Updated quota file for $domain.\n" if $verbose;
            if ( scalar keys %quota_by_user ) {
                print QUOTAFH join( "\n", map { $_ . ':' . $quota_by_user{$_} } keys %quota_by_user ) . "\n";
            }
            truncate( QUOTAFH, tell(QUOTAFH) );
        }
        Cpanel::SafeFile::safeclose( \*QUOTAFH, $safelock );
        return 1;
    }
    return 0;
}

sub usage {
    my ($exit) = @_;
    $exit = $exit ? 1 : 0;

print <<'EOM';
Usage: reset_mail_quotas_to_sane_values <modifier> <user>

This utility regenerates quota files and removes any quotas
above the maximum allowed size of : $max_size

Modifier Flags:
    --force - This required flag indicates that the utility
        should be run even if it has already been run in the past

--confirm - This required flag indicates that the utility
        should proceed to regenerate the quota files
        based upon the provided options. It is required for
        normal operation.

--verbose - This optional flag turns on verbose mode for
        enhanced activity reporting to STDOUT.

--help - display this message and exit.

EOM
    exit $exit;
}

X7ROOT File Manager

Editing: reset_mail_quotas_to_sane_values

Upload File

Create Folder