Server IP : 103.119.228.120 / Your IP : 18.189.170.227 Web Server : Apache System : Linux v8.techscape8.com 3.10.0-1160.119.1.el7.tuxcare.els2.x86_64 #1 SMP Mon Jul 15 12:09:18 UTC 2024 x86_64 User : nobody ( 99) PHP Version : 5.6.40 Disable Function : shell_exec,symlink,system,exec,proc_get_status,proc_nice,proc_terminate,define_syslog_variables,syslog,openlog,closelog,escapeshellcmd,passthru,ocinum cols,ini_alter,leak,listen,chgrp,apache_note,apache_setenv,debugger_on,debugger_off,ftp_exec,dl,dll,myshellexec,proc_open,socket_bind,proc_close,escapeshellarg,parse_ini_filepopen,fpassthru,exec,passthru,escapeshellarg,escapeshellcmd,proc_close,proc_open,ini_alter,popen,show_source,proc_nice,proc_terminate,proc_get_status,proc_close,pfsockopen,leak,apache_child_terminate,posix_kill,posix_mkfifo,posix_setpgid,posix_setsid,posix_setuid,dl,symlink,shell_exec,system,dl,passthru,escapeshellarg,escapeshellcmd,myshellexec,c99_buff_prepare,c99_sess_put,fpassthru,getdisfunc,fx29exec,fx29exec2,is_windows,disp_freespace,fx29sh_getupdate,fx29_buff_prepare,fx29_sess_put,fx29shexit,fx29fsearch,fx29ftpbrutecheck,fx29sh_tools,fx29sh_about,milw0rm,imagez,sh_name,myshellexec,checkproxyhost,dosyayicek,c99_buff_prepare,c99_sess_put,c99getsource,c99sh_getupdate,c99fsearch,c99shexit,view_perms,posix_getpwuid,posix_getgrgid,posix_kill,parse_perms,parsesort,view_perms_color,set_encoder_input,ls_setcheckboxall,ls_reverse_all,rsg_read,rsg_glob,selfURL,dispsecinfo,unix2DosTime,addFile,system,get_users,view_size,DirFiles,DirFilesWide,DirPrintHTMLHeaders,GetFilesTotal,GetTitles,GetTimeTotal,GetMatchesCount,GetFileMatchesCount,GetResultFiles,fs_copy_dir,fs_copy_obj,fs_move_dir,fs_move_obj,fs_rmdir,SearchText,getmicrotime MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /scripts/ |
Upload File : |
#!/usr/local/cpanel/3rdparty/bin/perl # cpanel - scripts/check_unreliable_resolvers 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::check_unreliable_resolvers; use strict; use Getopt::Long (); use Pod::Usage (); use Cpanel::Resolvers::Check (); my $ONE_DAY_IN_SECONDS = 86400; our $NOTIFICATION_INTERVAL = $ONE_DAY_IN_SECONDS; sub script { my ( $class, $argv ) = @_; my %opts = ( notify => 0, quiet => 0, ); my $self = bless {}, $class; my $help; Getopt::Long::GetOptionsFromArray( $argv, help => \$help, notify => \$opts{'notify'}, quiet => \$opts{'quiet'}, ); if ($help) { Pod::Usage::pod2usage( -exitval => 'NOEXIT', -verbose => 2, -noperldoc => 1, ); return 0; } $self->{'notify'} = $opts{'notify'}; $self->{'quiet'} = $opts{'quiet'}; my $resolver_state = Cpanel::Resolvers::Check::check_resolvers_performance(); if ( !$resolver_state->{'state'}->is_ok() ) { $self->send_notification($resolver_state); return 1; } print $self->_locale()->maketext(q{OK}), "\n" unless $self->{'quiet'}; return 0; } sub send_notification { my ( $self, $resolvers_ref ) = @_; require Cpanel::Locale; my $old = $self->_locale()->set_context_plain(); require Cpanel::Notify; my $ic_obj = Cpanel::Notify::notification_class( 'class' => 'Check::Resolvers', 'application' => 'Check::Resolvers', 'status' => $resolvers_ref->{'state'}, 'interval' => $NOTIFICATION_INTERVAL, 'constructor_args' => [ 'origin' => 'check_unreliable_resolvers', resolver_state => $resolvers_ref->{'resolver_state'}, overall_state => $resolvers_ref->{'state'}, 'skip_send' => 1, ] ); unless ( $self->{'quiet'} ) { print $ic_obj->render_template_include_as_text( 'template' => 'subject', 'type' => 'text' ) . "\n\n" . $ic_obj->render_template_include_as_text( 'template' => 'body', 'type' => 'html' ) . "\n"; } if ( $self->{'notify'} ) { my %notify_check_args = ( app => 'Check::Resolvers', status => $resolvers_ref->{'state'}, interval => $NOTIFICATION_INTERVAL, ); return 0 if Cpanel::Notify::notify_blocked(%notify_check_args); Cpanel::Notify::update_notification_time_if_interval_reached(%notify_check_args); $ic_obj->send(); } $self->_locale()->set_context($old); return 1; } sub _locale { my ($self) = @_; require Cpanel::Locale; return ( $self->{'_locale'} ||= Cpanel::Locale->get_handle() ); } exit( __PACKAGE__->script( \@ARGV ) ) unless caller; __END__ =pod =encoding utf-8 =head1 NAME check_unreliable_resolvers - Checks for resolvers in /etc/resolv.conf that are not reliable or missing =head1 SYNOPSIS check_unreliable_resolvers OPTIONS Options: --quiet Do not display output. --notify Send notification to the system administrator. --help Print this message. =head1 DESCRIPTION This script checks the state of /etc/resolv.conf and can notify when one or more of the nameservers is responding slowly, not responding, unreliable, or otherwise problematic. =cut