On Fri, 15 Aug 2014 00:25:17 +0000, låzaro wrote:
ahi lo puse, pruebalo a ver como pincha con MX
Bueno ahora mismo no tengo ruby instalado, deja ver si lo intento desde
un VPS
Curiosamente el script de sieve no parece estarme funcionando y no creo
que sea por error en las reglas, sino que cuando un usuario de mi red
intenta hacer el envío, aparentemente no pasa por sieve. Necesito
voluntarios para que lo prueben.
Si alguien sabe como configurar dovecot para forzar el uso de un filtro
global de sieve antes de hacer una entrega a otro usuario de una red
externa, por favor compartir aqui.
En todo caso, el script actualmente va quedando así (noten la
diversidad de interpretaciones de lo que debe ser 1 MB, es por eso que
la nomenclatura MiB (1024x1024 bytes) es mejor para evitar ambigüedades
) :
/*
Script de sieve para rechazar intentos de envío a de mensajes que
exceden la capacidad
de alguna de las redes de los detinatarios. (Sustituir midominio.cu con
su dominio real)
Para forzar su ejecución como primer filtro, agregar en la
configuración de dovecot una
línea como la siguiente donde se invoque el script:
sieve_before = /var/vmail/sieve/default.sieve
*/
require ["regex", "reject"];
if allof (
address :domain :is ["From", "Sender", "Resent-From"] "midominio.cu",
anyof (
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ferronet\.cu$",
size :over 1000000 /* ~ 0.95 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?inder\.cu$",
size :over 1024000 /* ~ 0.98 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?uccfd\.cu$",
size :over 1024000 /* ~ 0.98 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?sld\.cu$",
size :over 1048576 /* 1.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cimex\.com\.cu$",
size :over 1536000 /* ~ 1.46 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?reduc\.edu\.cu$",
size :over 1558576 /* ~ 1.49 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?censa\.edu\.cu$",
size :over 1572864 /* 1.50 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?minjus\.cu$",
size :over 1572864 /* 1.50 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?telemar\.cu$",
size :over 1572864 /* 1.50 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?unica\.cu$",
size :over 1843200 /* ~ 1.76 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?artex\.cu",
size :over 2048000 /* ~ 1.95 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?mic\.cu",
size :over 2048000 /* ~ 1.95 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?one\.cu",
size :over 2048000 /* ~ 1.95 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ucf\.edu\.cu",
size :over 2048000 /* ~ 1.95 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?gobpr\.co\.cu$",
size :over 2097152 /* 2.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?alinet\.cu$",
size :over 2200000 /* ~ 2.10 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?hidro\.cu$",
size :over 2654208 /* ~ 2.53 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.inf|citma(tel)?|cphr\.edu|ecoimpex\.com)\.cu$",
size :over 3000000 /* ~ 2.86 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?uh\.cu$",
size :over 3000000 /* ~ 2.86 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?upr\.edu\.cu$",
size :over 3048000 /* ~ 2.91 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?mfp\.gob\.cu$",
size :over 3072000 /* ~ 2.93 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ctc\.cu$",
size :over 3145728 /* 3.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?inv\.cu$",
size :over 3145728 /* 3.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?onat\.gob\.cu$",
size :over 3145728 /* 3.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ult\.edu\.cu$",
size :over 3145728 /* 3.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ohc\.cu$",
size :over 3194304 /* ~ 3.05 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?casa\.co\.cu$",
size :over 3584000 /* ~ 3.42 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?tur\.cu$",
size :over 4096000 /* ~ 3.91 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?bandec\.cu$",
size :over 4000000 /* ~ 3.81 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?minil\.cu$",
size :over 4194304 /* 4.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?perdurit\.com\.cu$",
size :over 4194304 /* 4.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?segurmatica\.cu$",
size :over 4240000 /* ~ 4.04 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?copextel\.com\.cu$",
size :over 5000000 /* ~ 4.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?uclv(\.edu)?\.cu$",
size :over 5000000 /* ~ 4.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?mtss\.cu$",
size :over 5119000 /* ~ 4.88 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?rimed\.cu$",
size :over 5145728 /* ~ 4.91 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?(cult|icaic)\.cu$",
size :over 5242880 /* 5.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?tsp\.cu$",
size :over 5242880 /* 5.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?etecsa\.cu$",
size :over 6168576 /* ~ 5.88 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cubaenergia\.cu$",
size :over 6291456 /* 6.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?icm\.cu$",
size :over 7000000 /* ~ 6.68 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?desoft\.cu$",
size :over 8120000 /* ~ 7.74 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ausa\.cu$",
size :over 10000000 /* ~ 9.54 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?(azcuba|datazucar)\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cc\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cdr\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cujae\.edu\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?eicma\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?icrt\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?mes\.edu\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?ujc\.cu$",
size :over 10240000 /* ~ 9.77 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?aduana\.cu$",
size :over 10485760 /* 10.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?energonet\.com\.cu$",
size :over 10485760 /* 10.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?jovenclub\.cu$",
size :over 10485760 /* 10.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?transnet\.cu$",
size :over 10485760 /* 10.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?uo\.edu\.cu$",
size :over 13245760 /* ~ 12.63 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?cubadebate\.cu$",
size :over 15728640 /* ~ 15.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?(provari|rem)\.cu$",
size :over 20480000 /* ~ 19.53 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?(cupet|minem|une)\.cu$",
size :over 20971520 /* 20.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^((nauta|enet)\.cu|etecsa\.net)$",
size :over 28311552 /* 27.00 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?contraloria\.cu$",
size :over 40480000 /* ~ 38.30 MiB */
),
allof (
address :domain :regex ["To", "Cc", "Bcc", "Resent-To"]
"^(.+\.)?correodecuba\.cu$",
size :over 52428800 /* 50.00 MiB */
)
)
) {
reject "
Imposible entregar el mensaje.
Su mensaje excede la capacidad que permite la red de un destinatario.
Si tiene dudas, contacte al administrador de la red.";
stop;
}
--
Este mensaje ha sido analizado por MailScanner
en busca de virus y otros contenidos peligrosos,
y se considera que est� limpio.
______________________________________________________________________
Lista de correos del Grupo de Usuarios de Tecnologías Libres de Cuba.
Gutl-l@jovenclub.cu
https://listas.jovenclub.cu/cgi-bin/mailman/listinfo/gutl-l
