Обсуждение статьи про SendXMPP

[Cancer]

Обсуждение статьи про SendXMPP

Вот собственно линк к статье http://www.lissyara.su/?id=1899

Покритикуйте

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[Alex Keda]

> аналогично тому, как почта делает для работы с почтой.

а зачем оно вообще?

[Cancer]

Да типа предупреждалки, рассылка, только не на почту а в Жабу

[Soldier]

Настроил. Работает норм. Сделал сигналку на этой ерунде. Казалось бы прога простая, а для консоли и жабы самое то.
Хотя перед запуском конфиг полировать пришлось, да и в статье не так все гладко описано. Может быть из за сервера такое (у меня WildFire). Хотя уже это не важно.

[Cancer]

Настроил. Работает норм. Сделал сигналку на этой ерунде. Казалось бы прога простая, а для консоли и жабы самое то.
Хотя перед запуском конфиг полировать пришлось, да и в статье не так все гладко описано. Может быть из за сервера такое (у меня WildFire). Хотя уже это не важно.

хз но у меня для того что бы работал с Openfire этого достаточно! Все работает на ура.....

[kmihas]

да и в статье не так все гладко

в так всегда получается, кстати Миранда к серверу OpenFire со старой аунтентификацией SASL тоже не цепляется пока её не отключишь.
так что все там нормально, единственное что можно было подумать как её отключить в скрипте а не в модуле перла

[mazay]

http://search.cpan.org/~hacker/Net-XMPP ... et/XMPP.pm
net-xmpp

тоже нормальная библиотека на перл, на основе которой можно сделать jabber-клиент

[CaBa]

А никто не сталкивался с проблемой отсылки сообщений на сервер с SSL.
при отсылке с ключом -t даёт:

Use of uninitialized value in string eq at /usr/local/bin/sendxmpp line 369.
Error 'Connect': [HASH(0x86a06e8)]

[hizel]

сталкивался
но я сделал по другому, поднял бота и через него все послвла куда надо кому надо
gozerbot который, получается удобнее

[CaBa]

сталкивался
но я сделал по другому, поднял бота и через него все послвла куда надо кому надо
gozerbot который, получается удобнее

он так же из консоли работает? что-то в его доках непонятно как ему что-то скармливать из консоли..
по-человечески натравить sendxmpp на ssl так и не получилось?

[hizel]

я не напрягался, дело в том , что он отправляет как сообщение, что не очень удобно
а гозер работает в чате, это корошо :]

[CaBa]

я не напрягался, дело в том , что он отправляет как сообщение, что не очень удобно
а гозер работает в чате, это корошо :]

да вот и фишка в том, что чат не нужен (скрипач не нужен), хочется скриптик информирующий о новых сообщениях в почте. так взял nmh(mh), получил новые, обработал как тебе удобно, сунул их в sendxmpp - вот тебе уведомления в Jabber'e. ИМХО удобно.
но вот грабли с SSL, не хочется отказываться от него ибо в openfire он включен принудительно для всех. и исключений для 1-го пользователя (от которого будут отправляться оповещения) походу не сделать.

[CaBa]

Не знаю, мож кому пригодится. По поводу SSL у sendXMPP.
Для себя вылечил так:
в /usr/local/lib/perl5/site_perl/5.8.9/Net/XMPP/Connection.pm вместо

$self->{SERVER}->{ssl} = $self->_arg("ssl",0);

поменял на:

$self->{SERVER}->{ssl} = $self->_arg("ssl",1);

с флагом -t при обязательной SSL в Openfire 3.6.4 ходит.

Но конечно не совсем правильно так делать ибо модуль общий, но как иначе - ума не приложу!

[Alex Keda]

Код: Выделить всё

router# echo "ssssssss" | sendxmpp -s "ddddddddd" lissyara@router.local
Can't use an undefined value as a HASH reference at /usr/local/lib/perl5/site_perl/5.8.9/XML/Stream.pm line 1165.
router#  

кто бы этот задокументированный баг ещё пофиксил...
я хэши так и ниасилил...

[CaBa]

Так вроде бы был патчик для Stream.pm:
http://rt.cpan.org/Public/Bug/Display.html?id=17484

ну или где-то писали, что в нём ручками пофиксить:
В Stream.pm в строке 1163 :

Код: Выделить всё

по дефолту
delete($self->{SIDS}->{$currsid});  

Код: Выделить всё

поменять на
delete($self->{SIDS}->{$currsid}) unless $currsid eq $sid; 

[thefree]

Perl - Net::Jabber (XML::Stream), and Authen::SASL

For some reason, XML::Stream and Authen::SASL refuse to play nicely together on the FreeBSD systems I've tried so far. Whenever I attempt to authenticate a Net::Jabber::Client object against an OpenFire/WildFire server supporting SASL/TLS/SSL, I get the following error:

Can't use an undefined value as a HASH reference at /usr/local/lib/perl5/site_perl/5.8.8/XML/Stream.pm line 1165.

Digging around the net, I found an article over at <pudge*/> which says commenting out line 1163 in XML::Stream did the trick. However, to be a little safer, I modified it to only delete $currsid if $sid isn't equal to $currsid.

--- Stream.pm Tue Feb 12 20:33:37 2008
+++ Stream.pm Tue Feb 12 20:32:51 2008
@@ -1160,7 +1160,7 @@
$self->{SOCKETS}->{*STDIN} = $sid;
}

- delete($self->{SIDS}->{$currsid});
+ delete($self->{SIDS}->{$currsid}) unless ($sid eq $currsid);

if (exists($self->GetRoot($sid)->{version}) &&
($self->GetRoot($sid)->{version} ne ""))


Unfortunately, that didn't quite solve my problem. While XML::Stream no longer crashed, for some reason my credentials failed to work. After more searching, I found another article at EscapeLogic that proposed the following changes in Net::XMPP::Protocol (For me, /usr/local/lib/perl5/site_perl/5.8.8/Net/XMPP/Protocol.pm)

--- Protocol.pm Tue Feb 12 20:40:42 2008
+++ Protocol.pm Tue Feb 12 20:41:11 2008
@@ -1804,10 +1804,10 @@
carp("AuthSend requires a password arguement")
unless exists($args{password});

- if($self->{STREAM}->GetStreamFeature($self->GetStreamID(),"xmpp-sasl"))
- {
- return $self->AuthSASL(%args);
- }
+# if($self->{STREAM}->GetStreamFeature($self->GetStreamID(),"xmpp-sasl"))
+# {
+# return $self->AuthSASL(%args);
+# }

return $self->AuthIQAuth(%args);
}


With both of these in place, I was finally able to connect to the OpenFire/WildFire servers without issue. I hardly call this a solution, since it makes moving a Net::Jabber application around difficult, but I've found no way around it. Yet. I'll keep looking...

Cheers,
-- WolfSage

http://hiddenrealms.org/articles/net-jabber1.php

[desruptor]

отправляю так сообщение

echo 'тест' | sendxmpp -d *****@jabber.ru


он мне выдает что

Cannot resolve <мой хост>: at /usr/share/perl5/vendor_perl/XML/Stream.pm line 406.

Какую мелочь я упустил?

[Cancer]

отправляю так сообщение

echo 'тест' | sendxmpp -d *****@jabber.ru


он мне выдает что

Cannot resolve <мой хост>: at /usr/share/perl5/vendor_perl/XML/Stream.pm line 406.

Какую мелочь я упустил?

в днс есть твой джаббер хост ?? вида jabber.domain.ru

[desruptor]

Забыл прописать себя в хостс

спасибо

[max1991]

а мне вот этот сабж помого: http://sunx.org.ru/2009/01/sendxmpp-per ... erd-2-0-3/

[Gamerman]

А уведомление с почты на Jabber как-то можно прикрутить через это дело?

[Cancer]

А уведомление с почты на Jabber как-то можно прикрутить через это дело?

Смотря что хочешь!
По идее можно все сделать!

[Gamerman]

Уже даже знаю как.
один скрипт читает почту и передает праметры для другого скрипта для отправки на джаббер. Вот тольк скрипты лень писать ибо не умею

[hizel]

тольк скрипты лень писать ибо не умею

/0

[gonzo111]

глюки
1 криво инсталицца (проблемы с perl)
2 не берет логин и пас из ключей а упорно просит файл
3 не посылает текст в чат (логинится и сразу выходит без текста)
4 не посылает на русском
5 не посылает текст из файла (при -m уходит в ступор писал cat file|sendxmpp)


Решение проблемы (1)
perl-after-upgrade -f

Решение проблемы (4)

Если у кого бедет проблема с русской кодировкой попробуйте открыть файл sendxmpp, найти строки
use Net::XMPP;
use Getopt::Long;
use strict;
и сразу после них добавить строку
use encoding 'koi8-r';
или
use encoding 'utf-8';