Mailinglist Archive: opensuse-es (678 mails)

[francisco f <admin-listas@xxxxxxxxxxxx>]

On Tuesday 06 October 2009 18:07:26 Camaleón wrote:
> El 2009-10-06 a las 17:34 +0200, francisco f escribió:
> > Me aburro.
>
> Je :-)
>
> > Tengo algunos servidores preparados para que manden avisos por medio de
> > gtalk. El caso es que solo me llegan cuando el receptor esta en linea.
> > Sabeis si eso es asi o se puede configurar de alguna forma, para que
> > aunque no estes en linea se guarden los mensajes y los muestre cuando te
> > conectes.
>
> Eso no tiene mucho sentido:
>
> ***
> http://en.wikipedia.org/wiki/Google_Talk
>
> Offline messaging
> On October 31, 2006, Google introduced offline messaging to Google
> Talk. This allows users to send messages to their contacts, even if
> they are not signed in. They will receive the messages when they next
> go online even if the user who has sent it is offline.
> ***
>
> hpc02@stthpc:~> date
> mar oct  6 18:05:59 CEST 2009
>
> Sí, ya hemos pasado el 2006, luego... algo estarás haciendo mal :-P
>
> Haz una prueba sencilla con dos clientes gtalk, envía desde uno con el
> otro apagado a ver si recibe el mensaje cuando conecte.

Prueba hecha, parece que es el que uso yo, si el otro no esta en linea no lo 
manda, ¿por que?

aqui va el suso dicho


#!/usr/bin/perl -w
# script to send jabber message to Google Talk Instant Messaging
# using XMPP protocol and SASL PLAIN authentication.
# author: Thus0
# Copyright (c) 2005, Thus0 . All rights reserved.
# released under the terms of the GNU General Public License v2
use strict;
use Net::XMPP;
if($#ARGV<0) { exit(); }
## Configuration
my $username = "usuario" ; usuario de envio
my $password = "lapass" ;
my $to = "envio-a" ; a quien lo envio
my $body = "$ARGV[0]" ;

my $resource = "yo mismo" ;
## End of configuration
#
# Google Talk & Jabber parameters :
my $hostname = 'talk.google.com' ;
my $port = 5222 ;

# estos dominios pueden cambiar, yo tengo uno de empresa con google
#y funciona con clientes normales y con este si el otro esta en linea
my $componentname = 'gmail.com' ; # Dominio del usuario de envio
my $componentname2 = 'gmail.com' ; # Dominio de a quien envias
my $connectiontype = 'tcpip' ;
my $tls = 1 ;
#
my $Connection = new Net::XMPP::Client();

# Connect to talk.google.com
my $status = $Connection->Connect(hostname => $hostname, port => 
$port,componentname => $componentname,connectiontype =>
$connectiontype, tls => $tls);
if (!(defined($status))) {
print " ERROR: Fallo en la conexion XMPP.\n" ;
print "  ($!)\n" ;
exit(0);
}

# Change hostname
my $sid = $Connection->{SESSION}->{id};
$Connection->{STREAM}->{SIDS}->{$sid}->{hostname} = $componentname;

# Authenticate
my @result = $Connection->AuthSend(username => $username, password => 
$password,resource => $resource);

# Envía mensaje
 $Connection->MessageSend(to => "$to\@$componentname2" , body => $body , 
resource => $resource);

print "$to\@$componentname2 \n" ;
print "$body \n" ;


--
Para dar de baja la suscripción, mande un mensaje a:
   opensuse-es+unsubscribe@xxxxxxxxxxxx
Para obtener el resto de direcciones-comando, mande
un mensaje a:
   opensuse-es+help@xxxxxxxxxxxx