Re: [Sop.Tec.LinuxPPP] Del Puerto Serial a Base de Datos.

[Carlos Miranda <c9025741 en yahoo com>]

Gracias Edgar, lo voy a checar a ver si me funciona.

Saludos,  :)

 --- Edgar <jevb en excite com> escribió: > Te mando un
script en perl, segun yo es la mejor
> solucion.
> 
> Checalo a ver si te sirve.
> 
> Saludos !!!
> 
> 
> 
> 
> 
> 
>  --- On Thu 01/30, =?iso-8859-1?q?Carlos=20Miranda?=
> < c9025741 en yahoo com > wrote:
> From: =?iso-8859-1?q?Carlos=20Miranda?= [mailto:
> c9025741 en yahoo com]
> To: linux en linuxppp net
> Date: Thu, 30 Jan 2003 15:48:19 -0600 (CST)
> Subject: Re: [Sop.Tec.LinuxPPP] Del Puerto Serial a
> Base de Datos.
> 
> Hola, yo me encuentro en la misma situación que
> Edgar,
> estoy a punto de iniciar la captura de los datos que
> suelta el PBX pero estoy tratando de que sea algo
> que
> pueda ser confiable y que pueda en adelante
> consultar
> o desmenuzar con algún programita, qué mas
> recomiendan?
> 
> Saludos,
> Juan Carlos M.
> 
>  --- Sergio Vergara Ganado
> <svergara en telereunion com mx> escribió: > Primero
> checa con minicom la comunicacion entre el
> > puerto serial de PBX
> > con el puerto serial de la PC (o lo que tengas).
> > Cuando veas que envia
> > informacion puedes hacer un programa en C para que
> > este cachando todo lo
> > que pasa por el puerto serial del PC. Otra forma
> de
> > cachar lo que se
> > encuentra en el puerto serial del PC es ejecutar
> > algo como esto:
> > cat /dev/ttyS1 > /home/info/pbx.txt
> > Este metodo no es de lo mas recomendable, yo diria
> > que es un Bill Gates
> > (al ahi se va) pero te funciona de entrada en lo
> que
> > tienes el programa
> > en C o en perl.
> > Ya teniendo toda la informacion en el archivo la
> > analizas para checar
> > sus campos y de ahi unicamente formateas y suber
> la
> > informacion a la DB.
> > Realmente no necesitas PHP para manejar la
> > informacion.
> > 
> > Espero esto te ayude. Recuerdo que tenia por ahi
> el
> > programa en C para
> > estar escuchando el puerto, pero no recuerdo donde
> > lo deje. Si lo
> > encuentro te lo envio a tu cuenta personal.
> > 
> > Estamos en contacto.
> > 
> > 
> > El lun, 27-01-2003 a las 18:15, Edgar escribió:
> > > 
> > > Que tal a todos!!
> > > 
> > > Tengo la siguiente situacion:
> > > 
> > > Una equipo PBX envia informacion valiosa por el
> > puerto serial a la computadora que tiene linux.
> > Necesito tomar la informacion que llega al puerto
> > serial y guardarla en la base de datos. Segun debo
> > poner un proceso que lea el puerto serial y guarde
> a
> > un archivo texto/ascii y con php leerlo y
> guardarlo
> > en mysql.  Pero no tengo idea de como hacer ese
> > proceso ? Que me aconsejan hacer ? Tienen otra
> forma
> > de hacerlo ? 
> > > 
> > > Gracias.
> > > 
> > > Saludos !!
> > > 
> > > 
> > > 
> > > _______________________________________________
> > > <font size=2 face=geneva><b>Join Excite! - <a
> > href=http://www.excite.com
> > target=_blank>http://www.excite.com</a></b>
> > > The most personalized portal on the Web!</font>
> > > -- 
> > > Lista de soporte de LinuxPPP
> > > Dirección email: Linux en linuxppp net
> > > Dirección web:
> > http://mail.linuxppp.net/mailman/listinfo/linux
> > > Reglas de la lista:
> > http://linuxppp.net/reglas.html
> > -- 
> > Sergio Vergara Ganado
> > Coordinador Network Support System
> > Telereunion Mexico, Moras #430 Col del Valle
> > Tel: 91718737
> > ICQ: 75874968
> > --------------------------------------------
> > "La felicidad no se produce por grandes golpes de
> > fortuna, que ocurren
> > raras veces, sino por pequeñas ventajas que
> ocurren
> > todos los días."
> > -Benjamin Franklin
> > 
> > -- 
> > Lista de soporte de LinuxPPP
> > Dirección email: Linux en linuxppp net
> > Dirección web:
> > http://mail.linuxppp.net/mailman/listinfo/linux
> > Reglas de la lista:
> http://linuxppp.net/reglas.html 
> 
>
_________________________________________________________
> Do You Yahoo!?
> Información de Estados Unidos y América Latina, en
> Yahoo! Noticias.
> Visítanos en http://noticias.espanol.yahoo.com
> -- 
> Lista de soporte de LinuxPPP
> Dirección email: Linux en linuxppp net
> Dirección web:
> http://mail.linuxppp.net/mailman/listinfo/linux
> Reglas de la lista: http://linuxppp.net/reglas.html
> 
> 
> _______________________________________________
> <font size=2 face=geneva><b>Join Excite! - <a
> href=http://www.excite.com
> target=_blank>http://www.excite.com</a></b>
> The most personalized portal on the Web!</font>
> > #!/usr/bin/perl
> #
> #
> # Author: Bruce S. Garlock
> # Date:   2002-09-11
> # Requirements: Device::SerialPort 0.12 (from cpan)
> #
> # Version: 0.1
> #
> #
> # Description:  This perl script is for logging of
> data from a serial
> # port, to a specified logfile.  The logfile can
> then be parsed with
> # other programs for reporting purposes.
> # 
> # This program was written for specifically logging
> Multitech's
> # MTASR2-203 T1 Router.  The router outputs text to
> the command
> # port with 57.6k, 8-1-N, and No flow control.
> #
> #
> $getdate="/bin/date";
> 
> 
> use Device::SerialPort 0.12;
> 
> $LOGDIR    = ".";              # path to data file
> $LOGFILE   = "router.log";            # file name to
> output to
> $PORT      = "/dev/ttyS0";          # port to watch
> 
> #
> #
> # Serial Settings
> #
> #
> 
> $ob = Device::SerialPort->new ($PORT) || die "Can't
> Open $PORT: $!";
> $ob->baudrate(1200)   || die "failed setting
> baudrate";
> $ob->parity("none")    || die "failed setting
> parity";
> $ob->databits(8)       || die "failed setting
> databits";
> $ob->handshake("none") || die "failed setting
> handshake";
> $ob->write_settings    || die "no settings";
> 
> #
> # Send a string to the port
> #
> #
> 
> $pass=$ob->write("AT");
> sleep 1;
> 
> #
> # open the logfile, and Port
> #
> 
> open(LOG,">>${LOGDIR}/${LOGFILE}")
>     ||die "can't open smdr file $LOGDIR/$LOGFILE for
> append: $SUB $!\n";
> 
> open(DEV, "<$PORT") 
>     || die "Cannot open $PORT: $_";
> 
> select(LOG), $| = 1;      # set nonbufferd mode
> 
> #
> # Loop forver, logging data to the log file
> #
> while($_ = <DEV>)
> {
> 	#print LOG $_;
> 
> 	print $_;
> }
> 
> 
> undef $ob;
> 
> 

_________________________________________________________
Do You Yahoo!?
Información de Estados Unidos y América Latina, en Yahoo! Noticias.
Visítanos en http://noticias.espanol.yahoo.com
-- 
Lista de soporte de LinuxPPP
Dirección email: Linux en linuxppp net
Dirección web: http://mail.linuxppp.net/mailman/listinfo/linux
Reglas de la lista: http://linuxppp.net/reglas.html