Initial commit of mucbot scripts

README

@@ -0,0 +1,7 @@
+# README
+
+#### mucbot.rb by ben lavender 2008
+
+mucbot.rb is a simple MUC bot that will relay messages sent to it to the configured MUC, including html messages.  This is useful for sending out notices to a workgroup.
+
+An example notification script, based on an example script packaged with xmpp4r, will, after configuration, report updates to an SVN repository while making changesets and ticket numbers in the commit log work as links to a [trac](http://trac.edgewall.org/) installation.

mucbot.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+
+# Based on code from the xmpp4r project, http://home.gna.org/xmpp4r/
+# Licensed under the GPL, see http://github.com/ln/xmpp4r/tree/master/LICENSE
+
+require 'rubygems'
+require 'xmpp4r'
+require 'xmpp4r/muc'
+require 'xmpp4r/client'
+require 'daemons/daemonize'
+
+user = 'user@example.com'
+password = 'super secret'
+
+
+Daemonize.daemonize
+
+cl = Jabber::Client.new(Jabber::JID.new(user))
+cl.connect
+cl.auth(password)
+cl.send(Jabber::Presence.new)
+
+muc = Jabber::MUC::SimpleMUCClient.new(cl)
+
+cl.add_message_callback do |m|
+  if (m.elements['html'])
+    puts "html: #{m.elements['html']}"
+  end
+  if m.type != :error
+    muc.send(m)
+  end
+end
+
+puts "running..."
+muc.join("chatroom@chat.example.com/nick")
+muc.say("Relaying messages!")
+
+Thread.stop
+
+cl.close
+
+

svn-xmpp-report.rb

@@ -0,0 +1,71 @@
+#!/usr/bin/ruby
+
+# Based on jabbersend.rb from the xmpp4r project, http://home.gna.org/xmpp4r/
+# Licensed under the GPL and Ruby's license, see http://github.com/ln/xmpp4r/tree/master/LICENSE
+
+require 'rubygems'
+require 'optparse'
+require 'xmpp4r'
+require 'xmpp4r/client'
+require 'xmpp4r/xhtml'
+
+include Jabber
+
+myJID = JID.new('user@example.com')
+myPassword = 'super secret'
+
+to = nil
+subject = path = revision = ''
+OptionParser.new do |opts|
+  opts.banner = 'Usage: svn-xmpp-report.rb [options]'
+  opts.separator ''
+  opts.on('-s', '--subject SUBJECT', 'sets the message\'s subject') { |s| subject = s }
+  opts.on('-t', '--to DESTJID', 'sets the receiver') { |t| to = JID.new(t) }
+  opts.on('-r', '--rev REVISION', 'sets the svn revision number') { |r| revision = r }
+  opts.on('-p', '--path PATH', 'sets the svn repository path') { |p| path = p }
+  opts.on_tail('-h', '--help', 'Show this message') {
+    puts opts
+    exit
+  }
+  opts.parse!(ARGV)
+end
+
+if to.nil?
+  puts "No receiver specified. See svn-xmpp-report.rb -h"
+  exit
+end
+
+['revision','path'].each do | opt |
+  if opt == ''
+    puts "No #{opt} specified.  See svn-xmpp-report.rb -h"
+  end
+end
+
+output = `svnlook -r #{revision} info #{path}`
+lines = output.split("\n")
+user = lines[0].chomp
+# If there are 5 lines of less of commit message, we show them.  If there are more, we show 4 and a More...
+if lines.length <= 8
+  commit_message = lines[-1,lines.size-3]
+else
+  commit_message = lines[3,4]
+  commit_message << "#{lines.size - 5} more lines..."
+end
+commit_message = commit_message.join("<br/>")
+commit_message.gsub!(/#(\d+)/,'<a href="https://trac.example.com/ticket/\1">#\1</a>')
+commit_message.gsub!(/r(\d+)/,'<a href="https://trac.example.com/changeset/\1">r\1</a>')
+xhtml = "<a href=\"https://trac.example.com/changeset/#{revision}\">r#{revision}</a> by #{user}<br/>"
+xhtml += commit_message
+
+
+m = Message::new(to,"HTML Trac Message").set_type(:normal).set_id('1').set_subject('trac update')
+
+html_element = Jabber::XHTML::HTML.new(xhtml)
+m.add_element(html_element)
+m.set_body(html_element.to_text)
+
+cl = Client.new(myJID)
+cl.connect
+cl.auth(myPassword)
+cl.send(m)
+cl.close