Anterior Siguiente Indice

5. Mensajes-colaboraciones-trucos

A partir de aquí pongo cosas que me han mandado los propios usuarios de fido.

5.1 futility


------------------------------------------------------------------------------
Message Number 1 from area R34.LINUX
------------------------------------------------------------------------------
From: Jesus Gambero (2:345/201.3)
From: All
Subj: FEddi
Send: 25 Nov 95  15:43:57
------------------------------------------------------------------------------
Hola All.

De momento el FEddi no viene demasiado documentado, asi que, despues de
algunas pruebas, por fin puedo hacer el mantenimiento de la base de mensajes.

        futility tool delete "age+15&&protect-&&new-" R34.LINUX
        futility pack

Con esto estamos borrando los mensajes con mas de 15 dias que no esten
protegidos y que ademas ya hayan sido leidos.
Si no poneis el nombre del area se tratarian todas. Lo que ocurre es que hay
algunas areas que dejo mas dias, lo que me obliga a poner una linea por cada
una, personalizandola a mi gusto.

Saludos.

--- FEddi 0.9pl5 via BinkleyTerm
 * Origin: Mensaje escrito y enviado bajo Linux, ¡¡NATURALMENTE!!
(2:345/201.3)

5.2 Petición de ficheros (FREQ).


------------------------------------------------------------------------------
Message Number 4 from area R34.LINUX
------------------------------------------------------------------------------
From: Javier Hernandez (2:346/207.48)
From: ALL
Subj: FILE REQUEST
Send: 07 Dec 95  06:15:45
------------------------------------------------------------------------------
Hola ALL!

He estando haciendo pruebas para conseguir lo del RE: con el soft de Linux y
ya he bajado mi primer fichero. Paso a explicar como lo he hecho por si sirve
para alguien y ademas por si lo hago mal que alguien me pueda corregir.

Primero escribo un Net normalmente a mi Sysop. Cuando he terminado de escribir
el mensaje salgo de el (Alt+x).
Estando sobre el mensaje, pulso (Alt+g) y se me abre una ventanita que
presenta unos datos. Una vez ahi pulso "Ins" y escribo el nombre del fichero
que deseo bajar; cuando termino pulso "Esc".
Con esto ya debe funcionar, la proxima vez que llames te bajara el fichero.
Al menos a mi me ha funcionado asi.

¿Algun comentario?

Bye,
  Javier

                    [email protected]                    _\|/_
    ***********************************************-----(O)---****
    * Javi(Canary)                              * Valencia/Spain *

--- FEddi 0.9pl5 via BinkleyTerm
 * Origin: RAMERA: persona que comercia con su RAM. (2:346/207.48)

5.3 Direcciones usuales.


------------------------------------------------------------------------------
Message Number 6 from area R34.LINUX
------------------------------------------------------------------------------
From: Javier Hernandez (2:346/207.48)
From: Manuel Soriano
Subj: Prueba de envio.
Send: 11 Dec 95  23:58:55
------------------------------------------------------------------------------
Hola Manuel!

El 07 Dec 95 Escribia Manuel Soriano a Javier Hernandez
acerca de "Prueba de envio.":

 MS> Pues me ha llegado correctamente, al area correcta, ya nos diras
 MS> como lo has realizado, a ver si al final nos escribes un
 MS> feddi.como :-)
 Pues mira he puesto un fichero llamado "names" en el /home/fido/fnet/msgbase,
que en tu caso puede ser parecido. El fichero de amarras contiene lo
siguiente:
-------------------------empieza aqui-------------------------------------
*fj,Javier Hernandez,2:346/207.48
*fm,Francisco Moreno,2:346/207.1
*ap,Alfonso Perez-Almazan,2:346/207.2
*vk,Viktor Martinez,2:346/207.4
*sz,Salvador Zarzo,2:346/207.6
*el,Eduardo Lluna Gil,2:346/207.8
*bs,Bernardino Soldan,2:346/207.10
*ms,Manuel Soriano,2:346/207.14
*js,Jose Luis Sanchez,2:346/207.17
*jv,Jose Villanueva,2:346/207.28
*am,Alberto Mendoza,2:346/207.44
*pe,[email protected],2:342/3
*am,areamgr,2:346/207
*rt,[email protected],2:342/3
----------------------------corta aqui-----------------------------------
con esto lo que ocurre es que al insertar un net, en lugar de escribir el To:
apretas el "Avpg" o "Repg" y te van saliendo los distintos nombres. Como veras
yo incluso he añadido alguna direccion de internet que uso a veces. el primer
campo creo que son como teclas abreviadas para hacer una llamada directa a esa
linea. No recuerdo ahora como se hace pero es facil y esta en el man feddi.

No se si me falta por decir algo. Si te parece buena la informacion pon algo
en el feddi.como; si crees que falta algo dimelo y te paso lo que haga falta.

Talavista.

Bye,
  Javier

             [email protected]
             [email protected]         _\|/_
    ***********************************************-----(O)---****
    * Javi(Canary)                              * Valencia/Spain *

--- FEddi 0.9pl5 via BinkleyTerm
 * Origin: RAMERA: persona que comercia con su RAM. (2:346/207.48)

5.4 Scripts y útiles.


------------------------------------------------------------------------------
Message Number 11 from area R34.LINUX
------------------------------------------------------------------------------
From: Jose Carlos Gutierrez (2:341/45.17)
From: all
Subj: Feddi-como, Scripts
Send: 26 Dec 95  11:42:31
------------------------------------------------------------------------------
Hola all!

        Estos son los ficheros que uso para la automatizacion del correo.

fichero /usr/local/bin/fido
#!/bin/bash
pushd ~/fnet/inbound
.minusculas
if [ -f snetlist.a* ] ||
   [ -f subptlst.a* ] || [ -f region34.l* ] || [ -f ptlstr34.l* ]; then
      ~/fnet/nodelist/compilar
fi
ftoss
futility link
fmbedit
fscan
futility pack
popd

 |------------|
fichero ~/fnet/inbound/.minusculas
(lo del punto es para que no se pase asi mismo a minusculas)

#!/usr/bin/perl
while ($nombre = <*>) {
   $nuevo_nombre = $nombre;
   $nuevo_nombre=~ tr/A-Z,Ñ/a-z,ñ/;
   print "$nombre -> $nuevo_nombre \n";
   rename($nombre,"$nuevo_nombre"); }
 |------------|
fichero ~/fnet/nodelist/compilar

#!/bin/bash
# fichero para compilar la nodelist
pushd ~/fnet/nodelist
if [ -f ~/fnet/inbound/ptlstr34.l* ]; then
        rm ptlstr34*
        unpack ~/fnet/inbound/ptlstr34.l*
fi
if [ -f ~/fnet/inbound/region34.l* ]; then
        rm region34*
        unpack ~/fnet/inbound/region34.l*
fi
if [ -f ~/fnet/inbound/snetlist.a* ]; then
        rm snetlist*
        unpack ~/fnet/inbound/snetlist.a*
fi
if [ -f ~/fnet/inbound/subptlst.a* ]; then
        rm subptlst*
        unpack ~/fnet/inbound/subptlst.a*
fi
# aqui lo que hago es insertar la linea de mi Boss para que llame el bt con
# ctrl + y (¡ seguro que es la forma mas dificil de hacerlo! pero no se otra)
grep -i -B 4000  'Boss,2:341/45' ptlstr34.* > /tmp/file1
grep -i -A 4000  'Boss,2:341/45' ptlstr34.* > /tmp/file2
grep -v 'Boss,2:341/45' /tmp/file2 > /tmp/file3
rm ptlstr34.*
cat /tmp/file1 > ptlstr34
# esta linea la teneis que ajustar a vuestro sistema
echo ",0,Ma~ana_Remoto,Madrid,Rafa,34-1-6463023,9600,CM,V34,VFC" >> ptlstr34
cat /tmp/file3 >> ptlstr34
rm /tmp/file1
rm /tmp/file2
rm /tmp/file3
#
rm -f ~/fnet/inbound/ptlstr34*
rm -f ~/fnet/inbound/region34*
rm -f ~/fnet/inbound/snetlist*
rm -f ~/fnet/inbound/subptlst*
rm fnlc.*
fnlc
popd



Saludos,
                Guti.

--- FEddi 0.9pl5 via BinkleyTerm
 * Origin: THE GANG TM (2:341/45.17)

5.5 Automatización: El área personal.


------------------------------------------------------------------------------
Message Number 1358 from area R34.LINUX
------------------------------------------------------------------------------
From: Pablo Gomez (2:341/43.40)
From: All
Subj: Area personal en FEDDI, la refinitiva ;-)
Send: 24 Jun 96  00:35:31
------------------------------------------------------------------------------
Hola All!

Bien, desde hace un tiempo estamos venga a darle vueltas a la posibilidad de
disponer en  FEDDI de un area personal que permita recibir en ella los
mensajes dirigidos a nosotros, recibidos en cualquier area, y sobre todo (ya
que lo anterior no es complicado) el poderlos responder comodamente,
enviandolos 'de regreso' a sus areas originales.

Con estos script que siguen, al menos Francisco Jose Montilla y el que
suscribe lo hemos conseguido. 

En primer lugar, se trata de crear el area que luego va a servir como
PERSONAL. Esto se puede hacer del siguiente modo:

(Como usuario fido)

$ cd ~/msgbase
$ mkdir +PERSONAL
$ cp +R34.LINUX/* +PERSONAL/

(PERSONAL es el nombre que quereis dar al area personal) Comprobad que los
permisos y dueños del nuevo directorio y los archivos que contiene son
iguales a los que teneis en otras areas. Corregidlo si no es asi.

Despues, de cara a vaciarla de mensajes, haced:

$ futility "+delete" "all+" PERSONAL
$ futility pack PERSONAL

Si volveis a invocar fmbedit, vereis que teneis un nuevo area, llamado...
PERSONAL! :-) Magia? :-)

Ahora ya tenemos la base. Siguiente parte: Copiar los mensajes que llegan al
sistema, nuevos, y a nuestro nombre. Esto se hace (casi) automaticamente.

Si creamos un archivo asi:

                                      ,,,
                                     (o o)  File: ~/msgbase/tosspath
---*reiss*------*schnippel*------oOO--(_)--OOo-------*knabber*-----*fetz*---

copy    t"Pablo Gomez" PERSONAL

---*reiss*------*schnippel*--------------------------*knabber*-----*fetz*---

Ya estaria. Evidentemente, habreis de sustituir mi nombre (Pablo Gomez) por el
vuestro y PERSONAL por el nombre de vuestro area personal. Cada vez que
corramos ftoss, este se va a encargar de copiar al area personal los mensajes
dirigidos a nosotros.

Aqui merece la pena hacer un comentario. Y es que esto va a copiar tambien los
mensajes a nuestro nombre recibidos en NETMAIL. A mi parecer, esto es un
absurdo, ya que realmente el area NETMAIL ya es un area personal. Hasta donde
se, no es posible modificar el comando para que no los copie. Por ello mas
adelante tendremos que hacer un pequeño ajuste.

Esto es un trozo (el importante ;-)) del script que corro al recibir correo.
                                      ,,,
                                     (o o)  File: ~/bin/mimport
---*reiss*------*schnippel*------oOO--(_)--OOo-------*knabber*-----*fetz*---
#!/bin/sh

# Para la gestion del area personal
PERSAREA=PERSONAL

# Importar correo
ftoss

#
# Feeding area personal
# Acabamos de repartir los mensajes, generando los duplicados necesarios
# en PERSONAL. Sin embargo, deseamos borrar los mensajes recién copiados al
# area PERSONAL que provienen del area de NETMAIL
#
futility tool "+delete" \
  "new+&&text+\*\*\* ftoss: copied from NETMAIL" $PERSAREA


# reconstruir threads
futility pack
futility link

#[...]
---*reiss*------*schnippel*--------------------------*knabber*-----*fetz*---

Tened cuidado: la linea 'futility tool ...' y la "new..." son una sola. El
cometido es borrar esos mensajes de NETMAIL innecesarios.

Seguimos. Ahora el modo de manejo. En el area PERSONAL tengo mensajes que
contienen una linea tal que:

*** ftoss: copied from R34.LINUX

(por ejemplo) :-)

Contesto (sobre el mismo area PERSONAL) el mensaje sin preocuparme de nada,
_EXCEPTO_ de no borrar esa linea, que posteriormente servira de 'testigo' para
que el mensaje se conteste en el area adecuada.

Luego, cuando exporto correo, corro el siguiente script:
                                      ,,,
                                     (o o)  File: ~/bin/mexport
---*reiss*------*schnippel*------oOO--(_)--OOo-------*knabber*-----*fetz*---
#!/bin/sh

USER_BIN_DIR=/home/fido/bin
LOCAL_BIN_DIR=/usr/local/bin
# Nombre del area personal
PERSAREA=PERSONAL

# Nombre del usuario
USERNOM="Pablo Gomez"

# Archivo temporal de salida
OUTFILE=/tmp/persanswr




# Extraccion de mensajes del area personal que esten pendientes de proceso
# y posterior marcado como 'sent'
#
futility tool "display" "attribute-se&&from+Pablo Gomez" $PERSAREA > $OUTFILE
futility tool "+se" "attribute-se&&from+Pablo Gomez" $PERSAREA

# distribucion a las nuevas areas...
awk -f $USER_BIN_DIR/persreply.awk < $OUTFILE

# scan de la base de mensajes
#
$LOCAL_BIN_DIR/fscan
---*reiss*------*schnippel*--------------------------*knabber*-----*fetz*---

Y la linea del 'awk' incluye un fichero persreply.awk que es este:

                                      ,,,
                                     (o o)  File: ~/bin/persreply.awk
---*reiss*------*schnippel*------oOO--(_)--OOo-------*knabber*-----*fetz*---

BEGIN   {
#
# Tocar aqui si es necesario
# ATENCION: Vigilar tambien las instrucciones de los bloques marcados con
# "####":
#  necesitaran configuracion igualmente.
#
        outputfile="/tmp/tmpreply"
#
#
# de aqui en adelante, se supone que no sera necesario, mas que en el bloque
# marcado con "###
#
        borracmd=sprintf("rm -f %s", outputfile)
        replyarea=""
        estado=1
        system(borracmd)
        }

# Solo es valido la primera vez que se encuentra en cada mensaje
# Evitamos que se copie, para que no llegue a otro sistema que
# pudiera estar usando el mismo sistema
/\*\*\* ftoss: copied from /{
        if (estado==1) {
                viejoestado=2
                estado=3
                replyarea=$NF
### Modificar:

        print "*** pers_area: Copiado desde area PERSONAL" >> "/tmp/tmpreply"
        }
        }

/^#To: / {
        user=""
        for (n=2; n <= NF; n++)  {
                user=sprintf("%s %s ",user,$n)
        }
        }
# Evitaremos que se escriban las lineas siguientes:
/^#Area: / {
        viejoestado=estado
        estado=3
        }

/^#@To: / {
        viejoestado=estado
        estado=3
        }



# siempre, excepto en los casos descritos arriba...
estado != 3{
#####
#
# ATENCION!: Modificar igual que arriba.
#  Siento la chapucilla, pero no he conseguido resolverlo.
#
        print $0 >> "/tmp/tmpreply"
        }
# Reponer el estado anterior
estado==3 { estado=viejoestado }


/^###MESSAGE_END###/{
        if (estado==2) {
                close (outputfile)
                comando=sprintf("cat %s | futility addmsg %s",outputfile,
replyarea)
                system(comando)
                system(borracmd)
                estado=1
                replyarea=""
        }
        }

END     {
        system(borracmd)
        }
---*reiss*------*schnippel*--------------------------*knabber*-----*fetz*---

Tened cuidado: hay lineas cortadas (se ven) y hay una doble chapucilla que no
he sabido resolver. En vez de definir arriba todas las variables, hay una,
outputfile, que he tenido que redefinir a mitad de script, como constante, ya
que no he sabido hacerlo mejor. He intentado pasar una variable,
entrecomillada de distintas formas o no... y no lo consigo. Quiza alguno nos
eche una mano.

Esta probado con varios mensajes simultaneos, aunque creo que de momento no he
fallado nunca cargandome la linea del ***ftoss...

Para la proxima. Espero que os sea util. Estare encantado de recibir
comentarios, mejoras, etc.



Saludos,
Pablo GOMEZ
[email protected]

--- FEddi 0.9pl5 via BinkleyTerm
 * Origin: Puntomatico Remoto. Linux en Hoyo de Manzanares (2:341/43.40)

5.6 Unos cuantos `trucos' para los que no gustan de RTFM o no saben inglés.

Respondiendo correo.

``Navegando'' por la base de mensajes.

Operaciones con ficheros

Para adecentar el aspectillo del Binkley:


Anterior Siguiente Indice