Re: ayuda con script mutt

2018-08-31 Por tema Gonzalo Rivero
El vie, 31-08-2018 a las 15:58 -0300, federico montaldo escribió:
> Hola list
> 
> Estoy trantando de armar un script para poder borrar el contenido de
> un mailarchive con mutt. Cuando ejecuto el script no borra la mima
> cantidad pero si lo hago de forma manual si. El script es este:
> 
> #!/bin/bash
> #
> #
> # Usage:
> # ~r : DELETE
> # 1y! : 1 year
> # 2y! : 2 years
> # 7d! : 7 days
> # 30d! : 30 days
> #
> 
> mailbox="/path/to/user/mailbox"
> deletePattern="7d!"
> 
> mutt -f $mailbox -F/dev/null -e "push 
> ~r>${deletePattern}yq"

siempre me hago bolas con las sustituciones de cadenas, ¿que pasa si
sacás las llaves y quede r>$deletePattern ?

mi forma de depurar estas cosas es ponerle un echo antes, para saber
que comando se va a ejecutar (quedaría echo mutt -f $mailbox -F/dev...)



ayuda con script mutt

2018-08-31 Por tema federico montaldo
Hola list

Estoy trantando de armar un script para poder borrar el contenido de
un mailarchive con mutt. Cuando ejecuto el script no borra la mima
cantidad pero si lo hago de forma manual si. El script es este:

#!/bin/bash
#
#
# Usage:
# ~r : DELETE
# 1y! : 1 year
# 2y! : 2 years
# 7d! : 7 days
# 30d! : 30 days
#

mailbox="/path/to/user/mailbox"
deletePattern="7d!"

mutt -f $mailbox -F/dev/null -e "push
~r>${deletePattern}yq"

Alguien me podria ayudar. Desde ya muchas gracias.

Saludos



Re: Ayuda con Script Actualizacion A-Virus

2009-06-03 Por tema Adrià
2009/6/3 Leonel Hernández Grandela maxpa...@filialfcm.ssp.sld.cu:
 Saludos a los colegas de la lista, aca ando con un problema que hace tiempo
 ando intentando resolver pero aun no logro conseguir que funcione bien al
 100% , el problema resulta en que el script se ejecuta a las 6.00 AM
 diariamente y el comienza a descargar las actualizaciones normal pero al
 otro dia cuando yo chequeo la actualizacion veo que esta mal o corrompida, y
 ejecuto el script y el sigue descargando donde se quedo la descarga y luego
 cuando termina me dice bad zip y algo mas raro ahi o sea puedo ver que no
 sirve la descarga y se jode la cosa entonces manualmente tengo que eliminar
 los archivos mal descargados y ejecutar manualmente el script de nuevo por
 mi propia cuenta a la hora esa que yo chequee y ahi se descarga normal al
 100% lo que pasa es que ya ando cansado de acer eso :-D y quiero ver la
 forma de dejar eso funcionando al 100% para no tener mas dolores de cabeza
 cuando yo no vaya al trabajo saber que no tendre mas problemas con el AV..
 un saludo a todos y esperando su ayuda, aca les envio adjunto el script que
 ando usando actualmente a ver si algun colega me dice que tengo ma puesto
 por ahi.


Creo que no has enviado el script (por lo menos no lo veo), pero puede
ser que a las 6 tengas algún corte en la conexión?
Podrías cambiarle la hora y hacer que se ejecutara cuando tú
estuvieses en la oficina: de esta forma podrías controlar si de
descarga bien o no de forma automática.
Por cierto, estás descargando con wget? Lo digo porque tienes
parámetros como el -t, -o o -c que quizás te podrían ayudar.

 otra cosa que tengo mal es en esta linea que esta al final que quiero que el
 al descargar el avast lo mueva a la carpeta www/actualizacion/avast pero no
 lo hace se que e sproblema de config tambien saludos y esperando su ayuda de
 los mas expertos en el sistema :) 

Sin ver el script es difícil dar una respuesta concreta, pero quizás
el problema venga de que te falten algunas comillas (``). Puedes
depurar colocando echo's para conocer el contenido de las variables,
etc...

Saludos,


 ---
   Red Telematica de Salud - Cuba
          CNICM - Infomed


 --
 To UNSUBSCRIBE, email to debian-user-spanish-requ...@lists.debian.org
 with a subject of unsubscribe. Trouble? Contact
 listmas...@lists.debian.org





-- 
Adrià García-Alzórriz
adri...@gmail.com

Senior Specialist
Browns  Chickens Dept.


--
To UNSUBSCRIBE, email to debian-user-spanish-requ...@lists.debian.org
with a subject of unsubscribe. Trouble? Contact listmas...@lists.debian.org



Re: Ayuda con Script Actualizacion A-Virus

2009-06-03 Por tema Leonel Hernández Grandela

Adrià wrote:

2009/6/3 Leonel Hernández Grandela maxpa...@filialfcm.ssp.sld.cu:
  

Saludos a los colegas de la lista, aca ando con un problema que hace tiempo
ando intentando resolver pero aun no logro conseguir que funcione bien al
100% , el problema resulta en que el script se ejecuta a las 6.00 AM
diariamente y el comienza a descargar las actualizaciones normal pero al
otro dia cuando yo chequeo la actualizacion veo que esta mal o corrompida, y
ejecuto el script y el sigue descargando donde se quedo la descarga y luego
cuando termina me dice bad zip y algo mas raro ahi o sea puedo ver que no
sirve la descarga y se jode la cosa entonces manualmente tengo que eliminar
los archivos mal descargados y ejecutar manualmente el script de nuevo por
mi propia cuenta a la hora esa que yo chequee y ahi se descarga normal al
100% lo que pasa es que ya ando cansado de acer eso :-D y quiero ver la
forma de dejar eso funcionando al 100% para no tener mas dolores de cabeza
cuando yo no vaya al trabajo saber que no tendre mas problemas con el AV..
un saludo a todos y esperando su ayuda, aca les envio adjunto el script que
ando usando actualmente a ver si algun colega me dice que tengo ma puesto
por ahi.




Creo que no has enviado el script (por lo menos no lo veo), pero puede
ser que a las 6 tengas algún corte en la conexión?
Podrías cambiarle la hora y hacer que se ejecutara cuando tú
estuvieses en la oficina: de esta forma podrías controlar si de
descarga bien o no de forma automática.
Por cierto, estás descargando con wget? Lo digo porque tienes
parámetros como el -t, -o o -c que quizás te podrían ayudar.
  

otra cosa que tengo mal es en esta linea que esta al final que quiero que el
al descargar el avast lo mueva a la carpeta www/actualizacion/avast pero no
lo hace se que e sproblema de config tambien saludos y esperando su ayuda de
los mas expertos en el sistema :) 



Sin ver el script es difícil dar una respuesta concreta, pero quizás
el problema venga de que te falten algunas comillas (``). Puedes
depurar colocando echo's para conocer el contenido de las variables,
etc...

Saludos,

  

---
  Red Telematica de Salud - Cuba
 CNICM - Infomed


--
To UNSUBSCRIBE, email to debian-user-spanish-requ...@lists.debian.org
with a subject of unsubscribe. Trouble? Contact
listmas...@lists.debian.org







  
gracias por responder pero no se por que no llego el script pues lo 
mande aca adjunto al mism mensaje que envié saludos y gracias de 
antemano ;) aca lo pego de nuevo al final de dicho mensaje  y 
respondiendo a una pregunta pus si ando usando el wget saludos


# !/bin/bash

test -d /var/www/actualizacion/kav || mkdir -p /var/actualizacion/kav

cd /var/www/actualizacion

wget -N  -c --tries=0 --retry-connrefused --proxy=off 
ftp://ftp.sld.cu/pub/antivirus/avp/actualizacion/av-i386-cumul.zip

if [ $? != 0 ]; then
echo no se pudo descargar cumul
else
unzip -o av-i386-cumul.zip -d /var/www/actualizacion/kav
fi

wget -N -c --tries=0 --retry-connrefused --proxy=off 
ftp://ftp.sld.cu/pub/antivirus/avp/actualizacion/av-i386-weekly.zip

if [ $? != 0 ]; then
echo no se pudo descargar weekly
else
unzip -o av-i386-weekly.zip -d /var/www/actualizacion/kav
fi

wget -N -c --tries=0 --retry-connrefused --proxy=off 
ftp://ftp.sld.cu/pub/antivirus/avp/actualizacion/av-i386-daily.zip

if [ $? != 0 ]; then
echo no se pudo descargar daily
else
unzip -o av-i386-daily.zip -d /var/www/actualizacion/kav
fi

wget -N -c --tries=0 --retry-connrefused --proxy=off 
ftp://ftp.sld.cu/pub/minsap/actualizaciones/AVAST/vpsupd.exe

if [ $? != 0 ]; then
echo no se pudo descargar VPSUPD
else
-o vpsupd.exe -d /var/www/actualizacion/avast
fi


exit $?


---
   Red Telematica de Salud - Cuba
  CNICM - Infomed


--
To UNSUBSCRIBE, email to debian-user-spanish-requ...@lists.debian.org
with a subject of unsubscribe. Trouble? Contact listmas...@lists.debian.org



Ayuda con Script Actualizacion A-Virus

2009-06-02 Por tema Leonel Hernández Grandela
Saludos a los colegas de la lista, aca ando con un problema que hace 
tiempo ando intentando resolver pero aun no logro conseguir que funcione 
bien al 100% , el problema resulta en que el script se ejecuta a las 
6.00 AM diariamente y el comienza a descargar las actualizaciones normal 
pero al otro dia cuando yo chequeo la actualizacion veo que esta mal o 
corrompida, y ejecuto el script y el sigue descargando donde se quedo la 
descarga y luego cuando termina me dice bad zip y algo mas raro ahi o 
sea puedo ver que no sirve la descarga y se jode la cosa entonces 
manualmente tengo que eliminar los archivos mal descargados y ejecutar 
manualmente el script de nuevo por mi propia cuenta a la hora esa que yo 
chequee y ahi se descarga normal al 100% lo que pasa es que ya ando 
cansado de acer eso :-D y quiero ver la forma de dejar eso funcionando 
al 100% para no tener mas dolores de cabeza cuando yo no vaya al trabajo 
saber que no tendre mas problemas con el AV.. un saludo a todos y 
esperando su ayuda, aca les envio adjunto el script que ando usando 
actualmente a ver si algun colega me dice que tengo ma puesto por ahi.



otra cosa que tengo mal es en esta linea que esta al final que quiero 
que el al descargar el avast lo mueva a la carpeta 
www/actualizacion/avast pero no lo hace se que e sproblema de config 
tambien saludos y esperando su ayuda de los mas expertos en el sistema 
:) 


---
   Red Telematica de Salud - Cuba
  CNICM - Infomed


--
To UNSUBSCRIBE, email to debian-user-spanish-requ...@lists.debian.org
with a subject of unsubscribe. Trouble? Contact listmas...@lists.debian.org



Ayuda con script hecho en perl....

2003-06-12 Por tema Orvil Juárez

Hola que tal listeros.

Otra vez molestando...

  La vez pasada pedi ayuda ya que quiero mandar a /dev/null todos 
aquellos e-mails que traigan atachados archivos .exe .com .bat etc
sin embargo el procmail de mi servidor por alguna razon que no he 
encontrado NUNCA hace match con las reglas que se le pongan en el 
.procmailrc, por lo tanto despues de varios dias de preguntar por alla y 
por aca, me decidi a crear un pequeño script en perl que haga lo que 
quiero, tengo el siguiente script al que le faltan unas cosillas:


#!/usr/bin/perl
my $intVeces=0;
while()
{
  if (/.*filename=.*(.bat|.exe|.vbs).*/)
{
  $intVeces++;
}
}
if ($intVeces  0)
{
## Aqui mandaria el e-mail a /dev/null
## la pregunta es como le hago??? }
else
{
## Aqui agregaria al e-mail al archivo correspondiente al usuario, en 
este caso

## /var/spool/mail/orvux   la pregunta es como le hago??? }

Otra cosilla, cuando en el .forward pongo

|/usr/bin/filtro.pl

el mail se regresa con el siguiente texto:

...
- The following addresses had permanent fatal errors -
|/usr/bin/filtro.pl
  (reason: service unavailable)
  (expanded from: [EMAIL PROTECTED])

Reporting-MTA: dns; ipsgroup1.com
Received-From-MTA: DNS; [10.10.10.17]
Arrival-Date: Wed, 11 Jun 2003 18:56:00 -0700

Final-Recipient: RFC822; [EMAIL PROTECTED]
X-Actual-Recipient: X-Unix; |/usr/bin/filtro.pl
Action: failed
Status: 5.5.0
Diagnostic-Code: X-Unix; 69
Last-Attempt-Date: Wed, 11 Jun 2003 18:56:00 -0700


Si quiero que el mail se pase al script que puedo hacer?  ya que por 
ejemplo cuando se configura con vacation en el .forward el software de 
configuracion pone lo siguiente:


\orvux, |/usr/local/sbin/vacation.pl /home/users/orvux/.vacation_msg 
orvux


Donde orvux es el usuario, intente cambiarle la instruccion detras del 
pipe con

\orvux, |/usr/local/sbin/filtro.pl

llega un mail al inbox y me regresa un mensaje con :

- The following addresses had permanent fatal errors -
|/user/local/sbin/filtro.pl
  (reason: service unavailable)
  (expanded from: [EMAIL PROTECTED])

 - Transcript of session follows -
smrsh: filtro.pl not available for sendmail programs
554 5.0.0 |/user/local/sbin/filtro.pl... Service unavailable



Reporting-MTA: dns; ipsgroup1.com
Received-From-MTA: DNS; [10.10.10.17]
Arrival-Date: Thu, 12 Jun 2003 08:00:46 -0700

Final-Recipient: RFC822; [EMAIL PROTECTED]
Action: expanded (to multi-recipient alias)
Status: 2.0.0
Last-Attempt-Date: Thu, 12 Jun 2003 08:00:46 -0700

Final-Recipient: RFC822; [EMAIL PROTECTED]
X-Actual-Recipient: X-Unix; |/user/local/sbin/filtro.pl
Action: failed
Status: 5.5.0
Diagnostic-Code: X-Unix; 69
Last-Attempt-Date: Thu, 12 Jun 2003 08:00:46 -0700



Que puedo hacer
Gracias.

OrvUx
Making the Hard...Soft with Linux.





Re: Ayuda con script hecho en perl....

2003-06-12 Por tema Santiago Vila
Orvil Juárez escribió:
La vez pasada pedi ayuda ya que quiero mandar a /dev/null todos
 aquellos e-mails que traigan atachados archivos .exe .com .bat etc
 sin embargo el procmail de mi servidor por alguna razon que no he
 encontrado NUNCA hace match con las reglas que se le pongan en el
 .procmailrc,

* Averigua el motivo. Pon

LOGFILE=procmail.log
VERBOSE=yes

en tu .procmailrc para diagnosticar el problema.


* Consulta los archivos de la lista de procmail:

http://MailMan.RWTH-Aachen.DE/pipermail/procmail/

Es casi seguro que lo que quieres hacer ya lo ha hecho alguien antes.



Ayuda con script

2003-04-15 Por tema Wcom
Lista tengo mi script de iptables que funcionaba bien..hasta que pase a
iptables 1.27a7 para poder tener newnat y no me funciona ninguna de las 2
cosas y hace 2 dias que me estoy quemando el bocho me dan una
mano por favor

64.116.229.30  192.168.1.1
IP Publica Eth0 -Eth1 IP privada


#!/bin/bash
Mod='modprobe'

$Mod ip_conntrack
$Mod ip_tables
$Mod iptable_filter
$Mod iptable_mangle
$Mod iptable_nat
$Mod ip_conntrack_h323

iptables -F
iptables -t nat -F


# arranco IP forwarding
echo 1  /proc/sys/net/ipv4/ip_forward

iptables -t nat -A POSTROUTING -o eth0 -j MASQUERADE

# Permitimos el trafico por puertos no privilegiados (necesario para
quefuncione ssh)
#echo -n Permitimos el trafico por puertos no privilegiados ... 
iptables -A INPUT -p tcp --dport 1024: -j ACCEPT
iptables -A INPUT -p udp --dport 1024: -j ACCEPT

# ruteo 192.168.x.x'
iptables -t nat -A POSTROUTING -d ! 192.168.1.0/24 -j MASQUERADE
iptables -t nat -A POSTROUTING -d ! 192.168.6.0/24 -j MASQUERADE
iptables -t nat -A POSTROUTING -d ! 192.168.7.0/24 -j MASQUERADE

iptables -A FORWARD -s 192.168.1.0/24 -j ACCEPT
iptables -A FORWARD -d 192.168.1.0/24 -j ACCEPT
#iptables -A FORWARD -s ! 192.168.1.0/24 -j DROP

iptables -A FORWARD -s 192.168.6.0/24 -j ACCEPT
iptables -A FORWARD -d 192.168.6.0/24 -j ACCEPT

iptables -A FORWARD -s 192.168.7.0/24 -j ACCEPT
iptables -A FORWARD -d 192.168.7.0/24 -j ACCEPT

iptables -A FORWARD -i eth0 -m state --state NEW,INVALID -j DROP

iptables -t nat -A PREROUTING -i eth1 -s 192.168.1.0/24 -p tcp --dport 80 -j
REDIRECT --to-port 3128

iptables -A INPUT -i eth0 -p icmp  -j DROP

iptables -A PREROUTING -t nat -p tcp -i eth0 --dport 1121 -j DNAT --to
192.168.1.100:21
iptables -A PREROUTING -t nat -p tcp -i eth0 --dport 1123 -j DNAT --to
192.168.1.100:23
iptables -A PREROUTING -t nat -p tcp -i eth0 --dport 3000 -j DNAT --to
192.168.1.100:3000
iptables -A PREROUTING -t nat -p tcp -i eth0 --dport 3 -j DNAT --to
192.168.1.100:3


iptables -A FORWARD -m state --state RELATED,ESTABLISHED -j ACCEPT
iptables -A FORWARD -i eth0 -o eth1 -p tcp --dport 1720 --syn -j ACCEPT
iptables -t nat -A PREROUTING -i eth0 -p tcp --dport 1720 --syn -j DNAT --to
192.168.1.4
iptables -A FORWARD -i eth0 -o eth1 -p tcp --dport 1720 --syn -j ACCEPT

# tiro todo lo que llega al port 9
iptables -A INPUT -i eth0 --protocol udp --source-port 9 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 9 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 9 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 9 -j DROP

# tiro todo lo que llega al port 13
iptables -A INPUT -i eth0 --protocol udp --source-port 13 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 13 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 13 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 13 -j DROP

# tiro todo lo que llega al port 37
iptables -A INPUT -i eth0 --protocol udp --source-port 37 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 37 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 37 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 37 -j DROP

# tiro todo lo que llega al port 111
iptables -A INPUT -i eth0 --protocol udp --source-port 111 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 111 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 111 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 111 -j DROP

# tiro todo lo que llega al port 113
iptables -A INPUT -i eth0 --protocol udp --source-port 113 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 113 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 113 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 113 -j DROP

# tiro todo lo que llega al port 119
iptables -A INPUT -i eth0 --protocol udp --source-port 119 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 119 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 119 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 119 -j DROP

# tiro todo lo que llega al port 139
iptables -A INPUT -i eth0 --protocol udp --source-port 139 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 139 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 139 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 139 -j DROP
# tiro todo lo que llega al port 143
iptables -A INPUT -i eth0 --protocol udp --source-port 143 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 143 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --source-port 143 -j DROP
iptables -A INPUT -i eth0 --protocol tcp --destination-port 143 -j DROP

# tiro todo lo que llega al port 220
iptables -A INPUT -i eth0 --protocol udp --source-port 220 -j DROP
iptables -A INPUT -i eth0 --protocol udp --destination-port 220 -j DROP