????
Current Path : /proc/335989/root/scripts/ |
Current File : //proc/335989/root/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; }