[postfix-es] Falseo de direcciones email

[Salman PSL]

Aprovechando la programacion de SPF en PERL:

Dependiendo del fichero en el que tengas a tus usuarios, puedes necesitar ajustarlo, asi como dependiendo de si usas SASL o no claro.

sub exempt_localhost {
    my %options = @_;
    my $attr = $options{attr};
    my $DireccionAsociada="";
    my $UsuarioValido="";
    my $DireccionEnvia = "";
    my $Correcto = "";
    my $LineaLeida = "";
    my $UsuarioQueAutentifica= "";

    if ($attr->{sasl_username} =~ /\@/) {

  $DireccionEnvia= lc($attr->{sender});
  $UsuarioQueAutentifica= lc($attr->{sasl_username});

  # $attr->{sasl_username} -> nombre_usuario_autentifica@/etc/postfix/dominios.txt
  ($UsuarioQueAutentifica) = split (/\@/, $UsuarioQueAutentifica);

  my $FicheroVirtual= "/etc/postfix/virtual.txt";

  open (Cuentas, "$FicheroVirtual");
   while ($LineaLeida = <Cuentas>) {
       chomp $LineaLeida;
       # direccion_correo en dominio.ext nombre_usuario_autentifica -> $LineaLeida
       ($DireccionAsociada,$UsuarioValido) = split (/\s+/,$LineaLeida);
       if (($UsuarioValido =~ /$UsuarioQueAutentifica/) && ($DireccionEnvia eq $DireccionAsociada)) {
         $Correcto = "SI";
         last;
       }
   }
  close Cuentas;



     if ($VERBOSE == 1) {
      syslog(debug => "X-Comprobacion_Servidor: Interno: Autentificado: $UsuarioQueAutentifica - $DireccionEnvia");
     }
  if ($Correcto eq "SI") {
   # syslog(debug => "X-Comprobacion_Usuario: Correcto: Autentificado: $UsuarioQueAutentifica - $DireccionEnvia");
   return 'PREPEND X-Comprobacion_Servidor: Interno:Autentificado: ';
  }
  else {
   syslog(debug => "X-Comprobacion_Usuario: No autorizado : $UsuarioQueAutentifica - $DireccionEnvia");
   return "553 Usuario ".$UsuarioQueAutentifica." no autorizado para la direccion: " .$DireccionEnvia;
  }
 }
 else {
  return 'DUNNO';
 }
}

-------------------------
  ----- Mensaje original ----- 
  De: TuxIsla 
  Para: Lista Postfix-ES 
  Enviado: jueves, 28 de octubre de 2010 16:08
  Asunto: [postfix-es] Falseo de direcciones email


  Hola lista, 

  Necesito evitar que mis usuarios configuren en sus MUA identidades con direcciones de correo distintas a las de mi dominio, ejmplo: dominio -> midominio.cu, direcciones email -> usuarios en midominio.cu  y quiero que no puedan crearse identidades diferentes de este formato.

  He probado ya varias cosas con smtpd_restriction_classes = y smtp_sender_restrictions = sin resultado alguno. 

  Gracias,


  --
  Lic. Ixen Rodríguez Pérez
  GNU/Linux Proud User #313158

  "La filosofía de Linux es 'Ríete en la cara del peligro'. Ups, no. 'Hazlo tú mismo'. Sí, eso es."
                                                       Linus Benedict Torvalds 



------------------------------------------------------------------------------


  _______________________________________________
  List de correo postfix-es para tratar temas del MTA postfix en español
  postfix-es en lists.wl0.org
  http://lists.wl0.org/mailman/listinfo/postfix-es
Saludos
Salvador Guzman
Salman PSL
Vigo, Galicia, España
+34 986.21.30.27
+34 679-Salman
Correo @Salman.ES
Informaciones @Salman.ES para listas de correo
http://Salman.EU/

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.wl0.org/pipermail/postfix-es/attachments/20101028/3595ed51/attachment.html>