| Current Path : /scripts/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //scripts/fixetchosts |
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/fixetchosts 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::fixetchosts;
use strict;
use Cpanel::SafeFile ();
use Cpanel::Validate::Hostname ();
use Cpanel::IP::Loopback ();
use Cpanel::DIp::MainIP ();
use Cpanel::Sys::Hostname::FQDN ();
use Cpanel::FileUtils::TouchFile ();
use IO::Handle ();
exit script(@ARGV) unless caller;
sub script {
return run('/etc/hosts');
}
sub run {
my ($file) = @_;
my $mainip = Cpanel::DIp::MainIP::getmainserverip();
my $hostname = Cpanel::Sys::Hostname::FQDN::get_fqdn_hostname();
my $shorthostname = Cpanel::Sys::Hostname::FQDN::get_short_hostname();
# CPANEL-36014: If the returned hostname ends with a trailing dot, strip it.
$hostname =~ s/\.$//;
Cpanel::FileUtils::TouchFile::touchfile($file);
die "The hostname $hostname is not valid.\n" unless Cpanel::Validate::Hostname::is_valid($hostname);
update( $file, $mainip, $hostname, $shorthostname );
return 0;
}
sub update {
my ( $file, $mainip, $hostname, $shorthostname ) = @_;
my $hosts_fh = IO::Handle->new();
my $hosts_lock = Cpanel::SafeFile::safeopen( $hosts_fh, '+<', $file );
if ($hosts_lock) {
my %SEENIP;
my @ETCHOSTS;
while ( my $line = readline $hosts_fh ) {
chomp $line;
if ( $line =~ m/^\s*#/ || $line =~ m/^\s*$/ ) {
push @ETCHOSTS, { 'raw' => $line };
}
else {
my ( $ip, $hosts ) = split( /\s+/, $line, 2 );
my @line_hosts;
foreach my $host ( split( /\s+/, $hosts ) ) {
next if ( $ip ne $mainip && $host eq $hostname ); # Drop mismatch hostnames for the main IP
next if ( $ip eq $mainip && ( $host eq $hostname || $host eq $shorthostname ) ); # These will be re-added
push @line_hosts, $host if ( !grep { $_ eq $host } @line_hosts ); # Drop duplicates while preserving order
}
if ( !@line_hosts ) { ## Drop empty lines
next if $ip eq $mainip; # Prevent duplicate commented lines for the main IP
push @ETCHOSTS, { 'raw' => '# ' . $line }; # Preserve lines that were commented out in full
}
else { ## Save valid entries
push @ETCHOSTS, { 'ip' => $ip, 'hosts' => \@line_hosts };
$SEENIP{$ip} = 1;
}
}
}
seek( $hosts_fh, 0, 0 );
my $added_hostname = 0;
foreach my $line_ref (@ETCHOSTS) {
if ( exists $line_ref->{'raw'} ) {
print {$hosts_fh} $line_ref->{'raw'} . "\n";
}
else {
my $ip = $line_ref->{'ip'};
my $hosts_ref = $line_ref->{'hosts'};
if ( $ip eq $mainip && !$added_hostname ) {
$added_hostname = 1;
unshift @{$hosts_ref}, $hostname, $shorthostname;
}
elsif ( Cpanel::IP::Loopback::is_loopback($ip) ) {
if ( !grep { $_ eq 'localhost' } @{$hosts_ref} ) {
unshift @{$hosts_ref}, 'localhost';
}
}
print {$hosts_fh} $ip . "\t\t" . join( ' ', @{$hosts_ref} ) . "\n";
}
}
if ( !exists $SEENIP{'127.0.0.1'} ) {
print {$hosts_fh} "127.0.0.1\t\tlocalhost\n";
}
if ( !exists $SEENIP{$mainip} ) {
print {$hosts_fh} $mainip . "\t\t" . $hostname . ' ' . $shorthostname . "\n";
}
truncate( $hosts_fh, tell($hosts_fh) );
Cpanel::SafeFile::safeclose( $hosts_fh, $hosts_lock );
}
return;
}