Hi, da SMTP/POP/IMAP und Co. Protokolle sind, die auf Entwicklerseite als Tot betrachtet werden können, fände ich eine Implementation von Jabber als Ticket-Notification sehr sinnvoll. Ich habe bereits einen Jabber-Client mit TLS Support in Perl geschrieben. Der Client selber ist sehr simple und nutzt Net::XMPP. Was ich jedoch nicht hinbekomme ist die Einbindung in OTRS selber. Ich dachte es wäre schnell getan, in dem ich einfach im Sendmail oder SMTP Module von OTRS, Jabber mit hinzufüge, das hat aber bisher nicht geklappt.
Vielleicht hat einer von euch eine Idee.
Hier mein cmd Client, sollte schnell auf OTRS angepasst sein:
######################################################### #! /usr/bin/perl use strict; use Net::XMPP;
my $len = scalar @ARGV; if ($len ne 5) { die "Usage...\n jabber-notify.pl [user] [password] [recipient-jid] [subject] [message]\n"; }
my $user = $ARGV[0]; my $password = $ARGV[1]; my $recipient = $ARGV[2]; my $subject = $ARGV[3]; my $body = $ARGV[4]; my $server = 'jabberserver.org'; my $resource = 'Notify'; my $tls = 1;
# Jabber-Objekt erzeugen my $jabber = Net::XMPP::Client->new();
# Verbindung aufbauen $jabber->Connect( 'hostname' => $server, 'tls' => $tls );
# Authentisieren $jabber->AuthSend( hostname => $server, username => $user, password => $password, resource => $resource, );
$jabber->PresenceSend(type=>'unavailable');
$jabber->MessageSend( to => $recipient, subject => $subject, body => $body );
$jabber->Disconnect(); #########################################################
Falls es Probleme mit XML::Stream gibt, wenn die TLS-Verbindung instanziert wird, liegt das an einem Bug in der Perl lib XML::Stream. Hier zu gibt es ein kleines Workarround von slibstream aus dem BugReport http://jabberstudio.org/projects/xmlstream/bugs/view.php?id=4794 :
1) open Stream.pm 2) locate the line: delete($self->{SIDS}->{$currsid}); (should be only one occurrence , inside sub OpenStream) 3) replace with: delete($self->{SIDS}->{$currsid}) unless ($currsid eq $sid);
------------------------------------------------------------------------ H&G Hansen & Gieraths EDV Vertriebsgesellschaft mbH Postfach 1605 - 53006 Bonn - Telefon: 0228/9080-0 Telefax: 0228/9080-405 Amtsgericht Bonn HR B 4027 - USt.IdNr. DE122121252 Geschaeftsfuehrung: Dr. H. Hellmuth Hansen ------------------------------------------------------------------------
Ich kann zwar nicht weiterhelfen aber das ist in jedem Fall eine gute Idee.
Simon Pirschel schrieb:
Hi, da SMTP/POP/IMAP und Co. Protokolle sind, die auf Entwicklerseite als Tot betrachtet werden können, fände ich eine Implementation von Jabber als Ticket-Notification sehr sinnvoll. Ich habe bereits einen Jabber-Client mit TLS Support in Perl geschrieben. Der Client selber ist sehr simple und nutzt Net::XMPP. Was ich jedoch nicht hinbekomme ist die Einbindung in OTRS selber. Ich dachte es wäre schnell getan, in dem ich einfach im Sendmail oder SMTP Module von OTRS, Jabber mit hinzufüge, das hat aber bisher nicht geklappt.
Vielleicht hat einer von euch eine Idee.
Hier mein cmd Client, sollte schnell auf OTRS angepasst sein:
######################################################### #! /usr/bin/perl use strict; use Net::XMPP;
my $len = scalar @ARGV; if ($len ne 5) { die "Usage...\n jabber-notify.pl [user] [password] [recipient-jid] [subject] [message]\n"; }
my $user = $ARGV[0]; my $password = $ARGV[1]; my $recipient = $ARGV[2]; my $subject = $ARGV[3]; my $body = $ARGV[4]; my $server = 'jabberserver.org'; my $resource = 'Notify'; my $tls = 1;
# Jabber-Objekt erzeugen my $jabber = Net::XMPP::Client->new();
# Verbindung aufbauen $jabber->Connect( 'hostname' => $server, 'tls' => $tls );
# Authentisieren $jabber->AuthSend( hostname => $server, username => $user, password => $password, resource => $resource, );
$jabber->PresenceSend(type=>'unavailable');
$jabber->MessageSend( to => $recipient, subject => $subject, body => $body );
$jabber->Disconnect(); #########################################################
Falls es Probleme mit XML::Stream gibt, wenn die TLS-Verbindung instanziert wird, liegt das an einem Bug in der Perl lib XML::Stream. Hier zu gibt es ein kleines Workarround von slibstream aus dem BugReport http://jabberstudio.org/projects/xmlstream/bugs/view.php?id=4794 :
- open Stream.pm
- locate the line: delete($self->{SIDS}->{$currsid});
(should be only one occurrence , inside sub OpenStream) 3) replace with: delete($self->{SIDS}->{$currsid}) unless ($currsid eq $sid);
H&G Hansen & Gieraths EDV Vertriebsgesellschaft mbH Postfach 1605 - 53006 Bonn - Telefon: 0228/9080-0 Telefax: 0228/9080-405 Amtsgericht Bonn HR B 4027 - USt.IdNr. DE122121252 Geschaeftsfuehrung: Dr. H. Hellmuth Hansen
OTRS Mailingliste: otrs-de - Webpage: http://otrs.org/ Archiv: http://lists.otrs.org/pipermail/otrs-de/ Listenabo verwalten: http://lists.otrs.org/cgi-bin/listinfo/otrs-de/ Support oder Consulting fuer Ihr OTRS System? =http://www.otrs.com/
participants (2)
-
Dennis Schwan
-
Simon Pirschel