blather 0.1

data/CHANGELOG

@@ -0,0 +1 @@
+v0.1 Initial release (birth!)

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2008 Jeff Smick
+ 
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+ 
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+ 
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Manifest

@@ -0,0 +1,43 @@
+CHANGELOG
+examples/echo.rb
+examples/shell_client.rb
+lib/autotest/discover.rb
+lib/autotest/spec.rb
+lib/blather/callback.rb
+lib/blather/client.rb
+lib/blather/core/errors.rb
+lib/blather/core/jid.rb
+lib/blather/core/roster.rb
+lib/blather/core/roster_item.rb
+lib/blather/core/stanza/iq/query.rb
+lib/blather/core/stanza/iq/roster.rb
+lib/blather/core/stanza/iq.rb
+lib/blather/core/stanza/message.rb
+lib/blather/core/stanza/presence/status.rb
+lib/blather/core/stanza/presence/subscription.rb
+lib/blather/core/stanza/presence.rb
+lib/blather/core/stanza.rb
+lib/blather/core/stream/parser.rb
+lib/blather/core/stream/resource.rb
+lib/blather/core/stream/sasl.rb
+lib/blather/core/stream/session.rb
+lib/blather/core/stream/tls.rb
+lib/blather/core/stream.rb
+lib/blather/core/sugar.rb
+lib/blather/core/xmpp_node.rb
+lib/blather/extensions/last_activity.rb
+lib/blather/extensions/version.rb
+lib/blather/extensions.rb
+lib/blather.rb
+LICENSE
+Rakefile
+README.rdoc
+spec/blather/core/jid_spec.rb
+spec/blather/core/roster_item_spec.rb
+spec/blather/core/roster_spec.rb
+spec/blather/core/stanza_spec.rb
+spec/blather/core/stream_spec.rb
+spec/blather/core/xmpp_node_spec.rb
+spec/build_safe.rb
+spec/spec_helper.rb
+Manifest

data/README.rdoc

@@ -0,0 +1,78 @@
+= Blather
+
+An evented XMPP library
+
+== Features
+
+* evented architecture
+* uses libxml
+* simplified starting point
+
+== Project Pages
+
+GitHub:: https://github.com/sprsquish/blather
+
+RubyForge:: http://rubyforge.org/projects/squishtech/
+
+Lighthouse:: http://squishtech.lighthouseapp.com/projects/20652-blather
+
+== Author
+
+Jeff Smick <sprsquish@gmail.com>
+
+= Usage
+
+== Installation
+
+  sudo gem install blather
+
+== Example
+
+See the /examples directory for more advanced examples.
+
+This will auto-accept any subscription requests and echo back any messages or presence notifications.
+
+  require 'lib/blather/client'
+
+  class Echo < Blather::Client
+    # Auto-approve subscription requests
+    def receive_subscription(s)
+      send_data(s.approve!) and true if s.request?
+    end
+
+    # Echo presence
+    def receive_status(status)
+      set_status(status.state, status.message, status.from) if roster[status.from]
+    end
+
+    # Echo message
+    def receive_message(message)
+      send_data(message.reply) if message.type == :chat
+    end
+  end
+
+  Blather.run 'echo@jabber.local', 'echo', Echo.new
+  
+
+= License
+
+Copyright (c) 2008 Jeff Smick
+ 
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+ 
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+ 
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,16 @@
+require 'echoe'
+require 'lib/blather'
+require 'hanna/rdoctask'
+
+Echoe.new('blather') do |p|
+  p.author = 'Jeff Smick'
+  p.email = 'sprsquish@gmail.com'
+
+  p.project = 'squishtech'
+  p.version = Blather::VERSION
+  p.summary = 'An evented XMPP library written on EventMachine and libxml-ruby'
+
+  p.runtime_dependencies = ['eventmachine', 'libxml >=1.0.11']
+  p.rdoc_options += %w[-S -T hanna --main README.rdoc --exclude autotest]
+  p.test_pattern = 'spec/**/*_spec.rb'
+end

data/blather.gemspec

@@ -0,0 +1,41 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{blather}
+  s.version = "0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Jeff Smick"]
+  s.date = %q{2008-11-27}
+  s.description = %q{An evented XMPP library written on EventMachine and libxml-ruby}
+  s.email = %q{sprsquish@gmail.com}
+  s.extra_rdoc_files = ["CHANGELOG", "lib/autotest/discover.rb", "lib/autotest/spec.rb", "lib/blather/callback.rb", "lib/blather/client.rb", "lib/blather/core/errors.rb", "lib/blather/core/jid.rb", "lib/blather/core/roster.rb", "lib/blather/core/roster_item.rb", "lib/blather/core/stanza/iq/query.rb", "lib/blather/core/stanza/iq/roster.rb", "lib/blather/core/stanza/iq.rb", "lib/blather/core/stanza/message.rb", "lib/blather/core/stanza/presence/status.rb", "lib/blather/core/stanza/presence/subscription.rb", "lib/blather/core/stanza/presence.rb", "lib/blather/core/stanza.rb", "lib/blather/core/stream/parser.rb", "lib/blather/core/stream/resource.rb", "lib/blather/core/stream/sasl.rb", "lib/blather/core/stream/session.rb", "lib/blather/core/stream/tls.rb", "lib/blather/core/stream.rb", "lib/blather/core/sugar.rb", "lib/blather/core/xmpp_node.rb", "lib/blather/extensions/last_activity.rb", "lib/blather/extensions/version.rb", "lib/blather/extensions.rb", "lib/blather.rb", "LICENSE", "README.rdoc"]
+  s.files = ["CHANGELOG", "examples/echo.rb", "examples/shell_client.rb", "lib/autotest/discover.rb", "lib/autotest/spec.rb", "lib/blather/callback.rb", "lib/blather/client.rb", "lib/blather/core/errors.rb", "lib/blather/core/jid.rb", "lib/blather/core/roster.rb", "lib/blather/core/roster_item.rb", "lib/blather/core/stanza/iq/query.rb", "lib/blather/core/stanza/iq/roster.rb", "lib/blather/core/stanza/iq.rb", "lib/blather/core/stanza/message.rb", "lib/blather/core/stanza/presence/status.rb", "lib/blather/core/stanza/presence/subscription.rb", "lib/blather/core/stanza/presence.rb", "lib/blather/core/stanza.rb", "lib/blather/core/stream/parser.rb", "lib/blather/core/stream/resource.rb", "lib/blather/core/stream/sasl.rb", "lib/blather/core/stream/session.rb", "lib/blather/core/stream/tls.rb", "lib/blather/core/stream.rb", "lib/blather/core/sugar.rb", "lib/blather/core/xmpp_node.rb", "lib/blather/extensions/last_activity.rb", "lib/blather/extensions/version.rb", "lib/blather/extensions.rb", "lib/blather.rb", "LICENSE", "Rakefile", "README.rdoc", "spec/blather/core/jid_spec.rb", "spec/blather/core/roster_item_spec.rb", "spec/blather/core/roster_spec.rb", "spec/blather/core/stanza_spec.rb", "spec/blather/core/stream_spec.rb", "spec/blather/core/xmpp_node_spec.rb", "spec/build_safe.rb", "spec/spec_helper.rb", "Manifest", "blather.gemspec"]
+  s.has_rdoc = true
+  s.homepage = %q{}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Blather", "--main", "README.rdoc", "-S", "-T", "hanna", "--main", "README.rdoc", "--exclude", "autotest"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{squishtech}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{An evented XMPP library written on EventMachine and libxml-ruby}
+  s.test_files = ["spec/blather/core/jid_spec.rb", "spec/blather/core/roster_item_spec.rb", "spec/blather/core/roster_spec.rb", "spec/blather/core/stanza_spec.rb", "spec/blather/core/stream_spec.rb", "spec/blather/core/xmpp_node_spec.rb"]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<eventmachine>, [">= 0"])
+      s.add_runtime_dependency(%q<libxml>, [">= 1.0.11"])
+      s.add_development_dependency(%q<echoe>, [">= 0"])
+    else
+      s.add_dependency(%q<eventmachine>, [">= 0"])
+      s.add_dependency(%q<libxml>, [">= 1.0.11"])
+      s.add_dependency(%q<echoe>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<eventmachine>, [">= 0"])
+    s.add_dependency(%q<libxml>, [">= 1.0.11"])
+    s.add_dependency(%q<echoe>, [">= 0"])
+  end
+end

data/examples/echo.rb

@@ -0,0 +1,22 @@
+require 'lib/blather/client'
+include Blather
+
+class Echo < Client
+  # Auto-approve subscription requests
+  def receive_subscription(s)
+    send_data(s.approve!) and true if s.request?
+  end
+
+  # Echo presence
+  def receive_status(status)
+    set_status(status.state, status.message, status.from) if roster[status.from]
+  end
+
+  # Echo message
+  def receive_message(message)
+    send_data(message.reply) if message.type == :chat
+  end
+end
+
+#handle :version do run Extensions::VersionHandler.new('Echo', '1.0'); end
+run 'sprsquish@jabber.local/Blather', 'iq150150', Echo.new

data/examples/shell_client.rb

@@ -0,0 +1,28 @@
+require 'lib/blather/client'
+include Blather
+
+class ShellClient < Client
+  def receive_roster(roster)
+    super
+    if roster.type == :result
+      start_highline
+    end
+  end
+
+  def receive_message(msg)
+    
+  end
+
+  def start_highline
+  end
+
+end
+
+EM.run {
+  shell = Shell.new
+
+  #shell
+  EM.spawn { shell.start }
+
+  Blather.run 'orthie@jabber.local/Blather', 'orthie', shell
+}

data/lib/autotest/discover.rb

@@ -0,0 +1 @@
+Autotest.add_discovery { 'spec' }

data/lib/autotest/spec.rb

@@ -0,0 +1,60 @@
+require 'autotest'
+
+Autotest.add_hook :initialize do |at|
+  at.clear_mappings
+  # watch out: Ruby bug (1.8.6):
+  # %r(/) != /\//
+  at.add_mapping(%r%^spec/.*_spec.rb$%) { |filename, _|
+    filename
+  }
+  at.add_mapping(%r%^lib/(.*)\.rb$%) { |_, m|
+    ["spec/#{m[1]}_spec.rb"]
+  }
+  at.add_mapping(%r%^spec/(spec_helper|shared/.*)\.rb$%) { 
+    at.files_matching %r%^spec/.*_spec\.rb$%
+  }
+end
+
+BAR       = "=" * 78
+REDCODE   = 31
+GREENCODE = 32
+
+Autotest.add_hook :ran_command do |at|
+  at.results.last =~ /^.* (\d+) failures, (\d+) errors/
+
+  code = ($1 == "0" and $2 == "0") ? GREENCODE : REDCODE
+  puts "\e[#{ code }m#{ BAR }\e[0m\n\n"
+end
+
+class Autotest::Spec < Autotest
+  def path_to_classname(s)
+    sep = File::SEPARATOR
+    f = s.sub(/spec#{sep}/, '').sub(/(spec)?\.rb$/, '').split(sep)
+    f = f.map { |path| path.split(/_|(\d+)/).map { |seg| seg.capitalize }.join }
+    f = f.delete_if { |path| path == 'Core' }
+    f.join
+  end
+
+  ##
+  # Returns a hash mapping a file name to the known failures for that
+  # file.
+
+  def consolidate_failures(failed)
+    filters = new_hash_of_arrays
+
+    class_map = Hash[*self.find_order.grep(/^spec/).map { |f| # TODO: ugly
+                       [path_to_classname(f), f]
+                     }.flatten]
+    class_map.merge!(self.extra_class_map)
+
+    failed.each do |method, klass|
+      if class_map.has_key? klass then
+        filters[class_map[klass]] << method
+      else
+        output.puts "Unable to map class #{klass} to a file"
+      end
+    end
+
+    return filters
+  end
+end

data/lib/blather.rb

@@ -0,0 +1,46 @@
+$:.unshift File.dirname(__FILE__)
+
+%w[
+  rubygems
+  xml/libxml
+  eventmachine
+  digest/md5
+  logger
+
+  blather/callback
+
+  blather/core/errors
+  blather/core/jid
+  blather/core/roster
+  blather/core/roster_item
+  blather/core/sugar
+  blather/core/xmpp_node
+
+  blather/core/stanza
+  blather/core/stanza/iq
+  blather/core/stanza/iq/query
+  blather/core/stanza/iq/roster
+  blather/core/stanza/message
+  blather/core/stanza/presence
+  blather/core/stanza/presence/status
+  blather/core/stanza/presence/subscription
+
+  blather/core/stream
+  blather/core/stream/parser
+  blather/core/stream/resource
+  blather/core/stream/sasl
+  blather/core/stream/session
+  blather/core/stream/tls
+].each { |r| require r }
+
+XML::Parser.indent_tree_output = false
+
+module Blather
+  VERSION = '0.1'
+  LOG = Logger.new STDOUT
+
+  def run(jid, password, client, host = nil, port = 5222)
+    EM.run { Stream.start client, JID.new(jid), password, host, port }
+  end
+  module_function :run
+end

data/lib/blather/callback.rb

@@ -0,0 +1,24 @@
+module Blather
+
+  class Callback
+    include Comparable
+
+    attr_accessor :priority
+
+    def initialize(priority = 0, &callback)
+      @priority = priority
+      @callback = callback
+    end
+
+    def call(*args)
+      @callback.call(*args)
+    end
+
+    # Favor higher numbers
+    def <=>(o)
+      self.priority <=> o.priority
+    end
+
+  end #Callback
+
+end

data/lib/blather/client.rb

@@ -0,0 +1,81 @@
+require File.join(File.dirname(__FILE__), %w[.. blather])
+
+module Blather
+
+  class Client
+    @@callbacks = {}
+    @@status = nil
+
+    attr_accessor :jid,
+                  :roster
+
+    def send_data(data)
+      @stream.send data
+    end
+
+    def status
+      @@status
+    end
+
+    def set_status(state = nil, msg = nil, to = nil)
+      status = Presence::Status.new state, msg
+      status.to = to
+      @@status = status unless to
+
+      send_data status
+    end
+
+    def stream_started(stream)
+      @stream = stream
+      retreive_roster
+    end
+
+    def call(stanza)
+      stanza.callback_heirarchy.each { |type| break if callback(type, stanza) }
+    end
+
+    # Default response to an Iq 'get' or 'set' is 'service-unavailable'/'cancel'
+    def receive_iq(iq)
+      send_data(ErrorStanza.new_from(iq, 'service-unavailable', 'cancel').reply!) if [:set, :get].include?(iq.type)
+    end
+
+    def receive_roster(node)
+      if !@roster && node.type == :result
+        self.roster = Roster.new(@stream, node)
+        register_callback(:status, -128) { |_, status| roster[status.from].status = status if roster[status.from]; false }
+        set_status
+      elsif node.type == :set
+        roster.process node
+      end
+    end
+
+    def self.register_callback(type, priority = 0, &callback)
+      @@callbacks[type] ||= []
+      @@callbacks[type] << Callback.new(priority, &callback)
+      @@callbacks[type].sort!
+    end
+
+    def register_callback(type, priority = 0, &callback)
+      self.class.register_callback(type, priority = 0, &callback)
+    end
+
+    def self.status(state = nil, msg = nil)
+      @@status = Presence::Status.new state, msg
+    end
+
+    def callback(type, stanza)
+      complete = false
+      (@@callbacks[type] || []).each { |callback| break if complete = callback.call(self, stanza) }
+
+      method = "receive_#{type}"
+      complete = __send__(method, stanza) if !complete && respond_to?(method)
+      complete
+    end
+
+    def retreive_roster
+      send_data Iq::Roster.new
+    end
+
+  end #Client
+
+end