Re: Jabber Interface

Dear Bruce and others ,

Thanks For the responce and your kind help
I have a little problem i hope you would be intrested in troubleshooting it

I am using plperl and
NET::Jabber for the postgresql connection to jabber and walah!! it realy
connects and sends messages to all the targets users.

I have created a function
pgjabber(text,text) as following
<code>
CREATE FUNCTION "public"."pgjabber" (text, text) RETURNS text AS'
#This module helps to deliver message to the jabber user
#usage pgjabber(touser(at)server,message);
use Net::Jabber qw(Client);
$toid = $_[0]; # the target uset
$body = $_[1]; # the message for that ass
my $jabconn = Net::Jabber::Client->new();
$jabconn->Connect( "hostname" => "someserver.who","port" => 5222 ) or die
"Cannot connect ($!)\\n";
my @result = $jabconn->AuthSend( "username" =>
''sender(at)some(dot)who'',"password" => "why_to_tell '',"resource" => ''work'' );
my $msg = Net::Jabber::Message->new();
$msg->SetMessage( "to"=> $toid,"subject" => "Money Deduction","body"=>
$body );
$jabconn->Send($msg);
$jabconn->Disconnect();
return sucess;
'LANGUAGE 'plperl' VOLATILE CALLED ON NULL INPUT SECURITY INVOKER;
</code>
Yes the the langauge was duly created and instaled perl is 5.6.1 on RH 7.2
i386 ,gcc 3.x, Postgresql 7.3.4

Now My problem is that if i use this function pgjabber(text,text) for
sending 1 message at a time then it works
if I use this function in a loop of plpgsql function it does not
executes more than 4 times also
if i do "Select pgjabber(someplace(at)server,message); " 10 number of times as
a consecutive query it only executes and delivers message for 4 time and at
5 instance it returns the error
<error>

plperl: error from function: (in cleanup) Cannot connect ()

</error>

Would be greatful to any soul who comes to help :-)))

Regards to All readers,
Aspire .

----- Original Message -----
From: "Bruce Momjian" <pgman(at)candle(dot)pha(dot)pa(dot)us>
To: "Aspire" <aspire(at)mail15(dot)com>
Cc: <pgsql-general(at)postgresql(dot)org>
Sent: Saturday, July 26, 2003 02:44
Subject: Re: [GENERAL] Jabber Interface

>
> You can use one of the server-side languages, like plperl, or use plsh,
> which I think is on gborg. Either can call a shell script.
>
> --------------------------------------------------------------------------
-
>
> Aspire wrote:
> > Dear all ,
> >
> > This could have been a wish list but ..
> >
> >
> > Do any one have any idea how could one send messages to jabber server
via
> > postgresql i.e a trigr function that if invoked sends a message to
specific
> > user.
> >
> >
> > Please all information provided would be apreciated
> >
> >
> > Regards,
> > V Kashyap
> >
> >
> > ---------------------------(end of broadcast)---------------------------
> > TIP 3: if posting/reading through Usenet, please send an appropriate
> > subscribe-nomail command to majordomo(at)postgresql(dot)org so that your
> > message can get through to the mailing list cleanly
> >
>
> --
> Bruce Momjian | http://candle.pha.pa.us
> pgman(at)candle(dot)pha(dot)pa(dot)us | (610) 359-1001
> + If your life is a hard drive, | 13 Roberts Road
> + Christ can be your backup. | Newtown Square, Pennsylvania
19073
>