PDF de programación - Correo automático en fli4l

LinuxFocus article number 308
http://linuxfocus.org

Correo automático en fli4l

by Stefan Blechschmidt.
<sb(at)sbsbavaria.de>

About the author:

Siendo un ingeniero
eléctrico me encontré un
buen dÃ-a, allá por 1990,
frente a una estación de
trabajo CAD para desarrollar
un interruptor y una estación
de control. Obviamente fui
infectado por un nuevo
'virus', y fue lo
suficientemente bueno.

Abstract:

¿Quién no ha usado un disco flexible como ruteador de
http://www.fli4l.de. La mayorÃ-a de los que lo han usado saben de lo
problemático que es cuando una distribución asÃ- está siendo usada en
el modo de llamada en demanda en un sistema en red existente con un
servidor de correo interno. Cuando el ruteador establece una conexión al
servidor de correo, este debe estar activo para poder enviar y recibir correo.
Este artÃ-culo describe una de las opciones para poder resolver este
problema.

_________________ _________________ _________________

Pequeña descripción del entorno

Nuestra ilustración muestra el concepto de la red a la cual nos referimos y que usaremos como ejemplo para
este artÃ-culo. WS1 a WS3 representan las estaciones de trabajo conectadas a la Internet a través del
ruteador. El service−host es responsable del correo interno y externo. El envÃ-o de correo está siendo
manejado por el MTA. Los correos se recibirán con fetchmail y se realizará el procesamiento y
ordenamiento con procmail. Las cuentas de correo en el servidor huésped son accedidas por las estaciones
de trabajo vÃ-a POP3 o IMAP.

1/5

El problema

Si una de las estaciones de trabajo está estableciendo una conexión a la Internet, el servidor huésped no
obtendrá noticia de esto. Debe ser posible indicarle al servidor huésped a través de un trabajo en cron
para que pueda enviar o recibir correo electrónico en un momento especÃ-fico. Algo más elegante serÃ-a
poderle informar al servidor huésped cuando la conexión está siendo establecida, activando con esto el
envÃ-o del mensaje de correo.

Dado que el ruteador está siendo ejecutado desde un disco flexible, no existe ningún archivo de comandos
o programa alguno para poder controlar el servidor del correo.

La idea

Mientras se le informa al servidor huésped acerca de la conexión, será posible enviar una petición para
iniciar el proceso para que el correo pueda ser enviado o recibido.

La solución

Para fli4l existe un programa llamado wget de alrededor de 100Kb, cabe perfectamente en un disco flexible.
Con wget podemos establecer una conexión al servidor huésped mientras se está llamando. Esto es
posible gracias a que inetd está abriendo un puerto en el servidor huésped que espera por una conexión
del ruteador. Con el archivo de comandos para la conexión, se pueden iniciar procesos adicionales para el
envio y recepción de correo electrónico.

El archivo de comandos está escrito en Perl y puedes obtenerlo desde aquÃ- (mailstart.pl.gz).

Ajustes al ruteador

El proceso de conexión activa el archivo de comandos .../opt/etc/ppp/ip−up. Este es el lugar
indicado para establecer una conexión con nuestro servidor huésped. Agreguemos la lÃ-nea:

wget −t 1 −−spider
MAILSERVER:PORT/xyz & > /dev/null

con eso lo conseguiremos.

Explicación a los comandos de wget

•

•

•

Opción −t 1
Con esta opción, intentamos encontrar el programa mailstart en el servidor de correo.
Opción −−spider
Esta opción revisa si la página existe pero no la baja.
MAILSERVER:PORT/xyz
Corresponde al nombre del servidor y al puerto por el cual el programa está siendo accedido. xyz
denomina el nombre del archivo que será bajado. Esta no es una definición necesaria, sin ella wget

2/5

•

buscará el archivo index.html por defecto.
/dev/null
Se refiere a la salida de wget, la cual está siendo enviada hacia la nada. Esta sentencia puede
omitirse a fin de saber qué página está bajando wget

Ajustes al servidor de correo

Con la ayuda del superdemonio inetd, el programa mailstart [1] necesita ser activado. Para que esto suceda,
tenemos que modificar algunos archivos:

/etc/inetd.conf

/etc/services

En este archivo asignamos el puerto por el cual wget tendrá acceso:

mailstart 4000/tcp # Mailstart

con eso lo lograremos.

/etc/inetd.conf

En este archivo, definiremos cuál programa será iniciado. inetd monitoreará su ejecución y generará
bitácoras en /var/log/syslog.

La lÃ-nea:

mailstart stream tcp nowait root /usr/sbin/tcpd /root/bin/mailstart

va a dar por terminado este paso. El primer nombre debe ser el mismo que se usó en el archivo /etc/services.

Ajustes a mailstart.pl

El programa puede ser ajustado a través de variables para cada servidor en particular.

$protokoll

Con la variable $protokoll podemos definir si las llamadas serán registradas. Estableciendo esta variable a 1
registraremos las llamadas en /var/log/mailstart.log. Si la variable es definida a 0 no se creará ningún
registro.

Default: 1 crear registro

$protokoll_ziel

Con esta variable determinaremos el lugar al que se enviará el registro.

Default: /var/log/mailstart.log

3/5

$mailholen

AquÃ- pondremos el nombre del programa que obtendrá el correo. Para iniciar el programa el usuario debe
ser root o el nombre de usuario que fue usado en /etc/inetd.conf. Si alguien más desea hacer uso del
programa, el comando usado debe ser: su USER −c \"COMMAND PARAMETER\", en caso de que el
comando contenga varias letras, deben ser entrecomilladas y deben usarse caracteres de escape \.

Default (en una sola lÃ-nea):

su postmaster −c \"fetchmail −t
40 −a −L /var/log/fetchmail/fetchmail.log −f
/home/postmaster/.fetchmailrc\"

$mailsenden

Esta es la ubicación del programa usado para el envÃ-o de correo. Para iniciar el prgrama deber ser root o
el nombre del usuario que usaste en /etc/inetd.conf. Si alguien más desea hacer uso del programa, el
comando usado debe ser: su USER −c \"BEFEHL PARAMETER\", en caso de que el comando contenga
varias letras, deben ser entrecomilladas y deben usarse caracteres de escape \.

Default: sendmail −q

A propósito, parte del programa está descrita con una breve documentación que provee una descripción.
Puedes verla usando perdoc mailstart.

Prueba

Antes de probar el súper servidor, necesitas reiniciarlo, /etc/init.d/inetd restart lo hará.
Ahora puedes probar contelnet localhost mailstart, si el servidor responde verás algo similar a
esto:

Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
HTTP/1.1 220 OK
Date: Sun, 20 Jul 2003 10:45:46 GMT
Server: mailstart/perl (sbsbavaria)
Last−Modified: Sun, 20 Jul 2003 10:45:46 GMT
Content−Type: text/txt
Content−Length: 11
1234567890
Connection closed by foreign host.

Bueno, eso es todo. Espero que hayas obtenido lo necesario con mi descripción. Si no es este el caso,
entonces tenemos un problema. − Tú, porque no lo hiciste funcionar.
− Yo, porque no pude hacer una descripción decente.:−).

Transferencias

•

[1] mailstart.pl.gz − Programa para controlar los servicios, en Perl

4/5

VÃ-nculos y referencias

•
•

www.fli4l.de − Página de fli4l.
www.perl.org − Página de Perl

Webpages maintained by the LinuxFocus Editor

team

© Stefan Blechschmidt.

"some rights reserved" see linuxfocus.org/license/

http://www.LinuxFocus.org

Translation information:
en −−> −− : Stefan Blechschmidt. <sb(at)sbsbavaria.de>
en −−> es: Edgar Hernández Zúñiga.
<edgar(en)linuxfocus.org>

2005−01−10, generated by lfparser_pdf version 2.51

5/5