I want to configure the mail alert. Configuration is as follows:

1. pkg install perl5 , install Authen::SASL  Modular
outbound_adsl_j160:/usr/local/lib/perl5@[10:30] #perldoc perllocal 
You have an old groff. Update to version 1.20.1 for good Unicode support.
If you don't upgrade, wide characters may come out oddly.

 at /usr/local/lib/perl5/5.16/Pod/Perldoc.pm line 1346.
You have an old groff. Update to version 1.20.1 for good Unicode support.
If you don't upgrade, wide characters may come out oddly.

 at /usr/local/lib/perl5/5.16/Pod/Perldoc.pm line 1346.
PERLLOCAL(1)          User Contributed Perl Documentation         PERLLOCAL(1)

   ESC[1mWed Apr  5 11:37:57 2017: "Module" Authen::SASLESC[0m
       <B7>   "installed into: /usr/local/lib/perl5/site_perl/5.16"

       <B7>   "LINKTYPE: dynamic"

       <B7>   "VERSION: 2.16"

       <B7>   "EXE_FILES: "

perl v5.16.3                      2017-04-05                      PERLLOCAL(1)


2. Configuration Smokeping.pm 

outbound_adsl_j160:/usr/local/smokeping/lib@[16:32] #more Smokeping.pm 

use Authen::SASL;     #This line increase 

sub sendmail ($$$){
    my $from = shift;
    my $to = shift;
    $to = $1 if $to =~ /<(.*?)>/;
    my $body = shift;
    if ($cfg->{General}{mailhost} and  
        my $smtp = Net::SMTP->new([split /\s*,\s*/, 
$cfg->{General}{mailhost}],Timeout=>5) ){                 
        $smtp->auth(split(/\s*,\s*/, $cfg->{General}{mailusr}),split(/\s*,\s*/, 
$cfg->{General}{mailpwd}));     #This line increase 
        $smtp->mail($from);
        $smtp->to(split(/\s*,\s*/, $to));
        $smtp->data();
        $smtp->datasend($body);
        $smtp->dataend();
        $smtp->quit;
    } elsif ($cfg->{General}{sendmail} or -x "/usr/lib/sendmail"){
        open (M, "|-") || exec (($cfg->{General}{sendmail} || 
"/usr/lib/sendmail"),"-f",$from,$to);
        print M $body;
        close M;
    } else {
        warn "ERROR: not sending mail to $to, as all methodes failed\n";
    }
}

#find  '_vars =>' , increase mailusr mailpwd 
DOC
         _vars =>
         [ qw(owner imgcache imgurl datadir dyndir pagedir piddir sendmail 
offset
              smokemail cgiurl mailhost mailusr mailpwd snpphost contact 
display_name
              syslogfacility syslogpriority concurrentprobes changeprocessnames 
tmail
              changecgiprogramname linkstyle precreateperms ) ],


3. Configuration General Alerts 

outbound_adsl_j160:/usr/local/etc/smokeping/conf.d@[16:37] #more General 
*** General ***

owner    = Peter Random
contact  = [email protected]
#mailhost = my.mail.host
mailhost = smtp.qq.com
mailusr = [email protected]
mailpwd = ZDHT#cetc2016

outbound_adsl_j160:/usr/local/etc/smokeping/conf.d@[13:35] #more Alerts 
*** Alerts ***
to = [email protected] 
from = [email protected]

   
    The above configuration is not normal mail alert.
    

     


370767686
_______________________________________________
smokeping-users mailing list
[email protected]
https://lists.oetiker.ch/cgi-bin/listinfo/smokeping-users

Reply via email to