Haut gauche
Spacer
Sommaire
Services
Aide
Aide générale
Aide création
Aide CGI
Aide recherche
Références
Spacer
Spacer
English version
Logo Serveurs.Net Haut droit

Poprelayd et Dovecot

Un parser poprelayd pour dovecot :

Code à inserer dans le fichier poprelay.conf situé dans /etc/mail

# Dovecot maillog parser: 
sub log_parse_dovecot ($) {
  my $s = $_[0]; 

  my @paddrs; # Packed IP addresses. 
  my @addrs; # ASCII addresses. 
  my ($junk,$info,$string,$service,$ip,$host); 
  ($info, $string)=split(/\: /,$line); 
  ($service) = $info=~/(\S+)$/; 
  $service=~s/\[\d+\]//; 
  return () unless $service=~/^(pop2|pop3|imap)-login$/; 
  return () unless $string=~/^(Login|Authenticated)/; 
  ($ip) = $line=~/.*\:\:ffff\:(\d+\.\d+\.\d+\.\d+)\]/; 
  if ($ip) { 
    print "$service: $ip\n"; 
    return ($ip); 
  } else { 
    ($host) = $string=~/^(\S+)/; 
    print "$service: $host\n"; 
    ($junk, $junk, $junk, $junk, @paddrs) = gethostbyname($host); 
    while (@paddrs) { 
      push(@addrs, join('.', unpack('C4', shift(@paddrs)))); 
    } 
  return (@addrs); 
  } 
}

Il faut aussi prendre soin de changer au début du fichier le parser qui est utilisé.

  1. Commenter la ligne qui indique le parser à utiliser :
    #$log_parser = \&log_parse_standard;
  2. Ajouter la ligne suivante :
    $log_parser = \&log_parse_dovecot;

Redémarrer le service poprelayd, et le tour est joué ;-)

Pour vérifier :

#/sbin/poprelayd -p

#

Ensuite faire un accès POP.

#/sbin/poprelayd -p
w.x.y.z       t
#

Ou w.x.y.z est votre adresse IP.

 

 

Spacer
Bas
© 1999-2016 Serveurs.Net Un service Serveurs.Net.