agent_xmpp 0.1.0

data/lib/agent_xmpp/xmpp/iq_version.rb

@@ -0,0 +1,89 @@
+# Original from XMPP4R - XMPP Library for Ruby Website::http://home.gna.org/xmpp4r/
+##############################################################################################################
+module AgentXmpp
+
+  #####-------------------------------------------------------------------------------------------------------
+  module Xmpp
+
+    #.......................................................................................................
+    class IqVersion < IqQuery
+
+      #.......................................................................................................
+      name_xmlns 'query', 'jabber:iq:version'
+
+      #####-----------------------------------------------------------------------------------------------------
+      class << self
+
+        #.........................................................................................................
+        def get(pipe, contact_jid)
+          iq = Xmpp::Iq.new(:get, contact_jid)
+          iq.query = new
+          Send(iq) do |r|
+            if (r.type == :result) && r.query.kind_of?(Xmpp::IqVersion)
+              pipe.broadcast_to_delegates(:on_version_result, pipe, r)
+            elsif r.type.eql?(:error)
+              pipe.broadcast_to_delegates(:on_version_error, pipe, r)
+            end
+          end
+        end
+
+        #.........................................................................................................
+        def result(pipe, request)
+          iq = Xmpp::Iq.new(:result, request.from.to_s)
+          iq.id = request.id unless request.id.nil?
+          iq.query = new
+          iq.query.iname = AgentXmpp::AGENT_XMPP_NAME
+          iq.query.version = AgentXmpp::VERSION
+          iq.query.os = AgentXmpp::OS_VERSION
+          Send(iq)
+        end
+
+      #### self
+      end
+      
+      #.......................................................................................................
+      def initialize(iname=nil, version=nil, os=nil)
+        super()
+        self.iname = iname if iname
+        self.version = version if version
+        self.os = os if os
+      end
+
+      #.......................................................................................................
+      def iname
+        first_element_text('name')
+      end
+
+      #.......................................................................................................
+      def iname=(text)
+        replace_element_text('name', text.nil? ? '' : text)
+      end
+
+      #.......................................................................................................
+      def version
+        first_element_text('version')
+      end
+
+      #.......................................................................................................
+      def version=(text)
+        replace_element_text('version', text.nil? ? '' : text)
+      end
+
+      #.......................................................................................................
+      def os
+        first_element_text('os')
+      end
+
+      #.......................................................................................................
+      def os=(text)
+        replace_element_text('os', text.nil? ? '' : text)
+      end
+
+    #### IqQueryVersion
+    end
+    
+  #### XMPP
+  end
+
+#### AgentXmpp
+end

data/lib/agent_xmpp/xmpp/jid.rb

@@ -0,0 +1,150 @@
+# Original from XMPP4R - XMPP Library for Ruby Website::http://home.gna.org/xmpp4r/
+##############################################################################################################
+module AgentXmpp
+
+  #####-------------------------------------------------------------------------------------------------------
+  module Xmpp
+
+    #####-------------------------------------------------------------------------------------------------------
+    class Jid
+
+      #.......................................................................................................
+      include Comparable
+
+      #.......................................................................................................
+      PATTERN = /^(?:([^@]*)@)??([^@\/]*)(?:\/(.*?))?$/
+
+      #.......................................................................................................
+      begin
+        require 'idn'
+        USE_STRINGPREP = true
+      rescue LoadError
+        USE_STRINGPREP = false
+      end
+
+      #.......................................................................................................
+      def initialize(node = "", domain = nil, resource = nil)
+        @resource = resource
+        @domain = domain
+        @node = node
+        if @domain.nil? and @resource.nil? and @node
+          @node, @domain, @resource = @node.to_s.scan(PATTERN).first
+        end
+        if USE_STRINGPREP
+          @node = IDN::Stringprep.nodeprep(@node) if @node
+          @domain = IDN::Stringprep.nameprep(@domain) if @domain
+          @resource = IDN::Stringprep.resourceprep(@resource) if @resource
+        else
+          @node.downcase! if @node
+          @domain.downcase! if @domain
+        end
+        raise ArgumentError, 'Node too long' if (@node || '').length > 1023
+        raise ArgumentError, 'Domain too long' if (@domain || '').length > 1023
+        raise ArgumentError, 'Resource too long' if (@resource || '').length > 1023
+      end
+
+      #.......................................................................................................
+      def to_s
+        s = @domain
+        s = "#{@node}@#{s}" if @node
+        s += "/#{@resource}" if @resource
+        return s
+      end
+
+      #.......................................................................................................
+      def strip
+        Jid.new(@node, @domain)
+      end
+      alias_method :bare, :strip
+
+      #.......................................................................................................
+      def strip!
+        @resource = nil
+        self
+      end
+      alias_method :bare!, :strip!
+
+      #.......................................................................................................
+      def hash
+        return to_s.hash
+      end
+
+      #.......................................................................................................
+      def eql?(o)
+        to_s.eql?(o.to_s)
+      end
+
+      #.......................................................................................................
+      def ==(o)
+        to_s == o.to_s
+      end
+
+      #.......................................................................................................
+      def <=>(o)
+        to_s <=> o.to_s
+      end
+
+      #.......................................................................................................
+      def node
+        @node
+      end
+
+      #.......................................................................................................
+      def node=(v)
+        @node = v.to_s
+        if USE_STRINGPREP
+          @node = IDN::Stringprep.nodeprep(@node) if @node
+        end
+      end
+
+      #.......................................................................................................
+      def domain
+        return nil if @domain.empty?
+        @domain
+      end
+
+      #.......................................................................................................
+      def domain=(v)
+        @domain = v.to_s
+        if USE_STRINGPREP
+          @domain = IDN::Stringprep.nodeprep(@domain)
+        end
+      end
+
+      #.......................................................................................................
+      def resource
+        @resource
+      end
+
+      #.......................................................................................................
+      def resource=(v)
+        @resource = v.to_s
+        if USE_STRINGPREP
+          @resource = IDN::Stringprep.nodeprep(@resource)
+        end
+      end
+
+      #.......................................................................................................
+      def Jid::escape(jid)
+        return jid.to_s.gsub('@', '%')
+      end
+
+      #.......................................................................................................
+      def empty?
+        to_s.empty?
+      end
+
+      #.......................................................................................................
+      def stripped?
+        @resource.nil?
+      end      
+      alias_method :bared?, :stripped?
+
+    #### Jid
+    end
+    
+  #### XMPP
+  end
+
+#### AgentXmpp
+end

data/lib/agent_xmpp/xmpp/message.rb

@@ -0,0 +1,82 @@
+# Original from XMPP4R - XMPP Library for Ruby Website::http://home.gna.org/xmpp4r/
+##############################################################################################################
+module AgentXmpp
+
+  #####-------------------------------------------------------------------------------------------------------
+  module Xmpp
+
+    #####-------------------------------------------------------------------------------------------------------
+    class Message < Stanza
+
+      #.......................................................................................................
+      name_xmlns 'message', 'jabber:client'
+      xmpp_child :actions, :event
+
+      #####-----------------------------------------------------------------------------------------------------
+      class << self
+        
+        #.........................................................................................................
+        def chat(to, body)
+          message = Xmpp::Message.new(to, body)
+          message.type = :chat
+          Send(message)  
+        end
+      
+      #### self
+      end
+
+      #.......................................................................................................
+      include XParent
+
+      #.......................................................................................................
+      def initialize(to = nil, body = nil)
+        super()
+        self.to = to if to
+        add_element(REXML::Element.new("body").add_text(body)) if body
+      end
+
+      #.......................................................................................................
+      def type
+        stanza_type = attributes['type']
+        stanza_type.nil? ? :normal : stanza_type.to_sym
+      end
+
+      #.......................................................................................................
+      def body
+        first_element_text('body')
+      end
+
+      #.......................................................................................................
+      def body=(b)
+        replace_element_text('body', b)
+      end
+
+      #.......................................................................................................
+      def subject=(s)
+        replace_element_text('subject', s)
+      end
+
+      #.......................................................................................................
+      def subject
+        first_element_text('subject')
+      end
+
+      #.......................................................................................................
+      def thread=(s)
+        delete_elements('thread')
+        replace_element_text('thread', s) if s
+      end
+
+      #.......................................................................................................
+      def thread
+        first_element_text('thread')
+      end
+      
+    #### Message
+    end
+    
+  #### XMPP
+  end
+
+#### AgentXmpp
+end

data/lib/agent_xmpp/xmpp/presence.rb

@@ -0,0 +1,127 @@
+# Original from XMPP4R - XMPP Library for Ruby Website::http://home.gna.org/xmpp4r/
+##############################################################################################################
+module AgentXmpp
+
+  #####-------------------------------------------------------------------------------------------------------
+  module Xmpp
+
+    #####-------------------------------------------------------------------------------------------------------
+    class Presence < Stanza
+
+      #.......................................................................................................
+      include Comparable
+      include XParent
+
+      #.......................................................................................................
+      name_xmlns 'presence', 'jabber:client'
+
+      #####-------------------------------------------------------------------------------------------------------
+      class << self
+        
+        #.........................................................................................................
+        def accept(contact_jid)
+          pres = Xmpp::Presence.new
+          pres.type = :subscribed
+          pres.to = contact_jid  
+          Send(pres)
+        end
+
+        #.........................................................................................................
+        def decline(contact_jid)
+          pres = Xmpp::Presence.new
+          pres.type = :unsubscribed
+          pres.to = contact_jid      
+          Send(pres)
+        end
+
+        #.........................................................................................................
+        def subscribe(contact_jid)
+          pres = Xmpp::Presence.new
+          pres.type = :subscribe
+          pres.to = contact_jid
+          Send(pres)
+        end
+        
+      #### self
+      end
+      
+      #.......................................................................................................
+      def initialize(show=nil, status=nil, priority=nil)
+        super()
+        self.show = show if show
+        self.status = status if status
+        self.priority = priority if priority
+      end
+
+      #.......................................................................................................
+     def show
+        e = first_element('show')
+        text = e ? e.text : nil
+        text.to_sym
+      end
+
+      #.......................................................................................................
+      def show=(val)
+        xe = first_element('show')
+        if xe.nil?
+          xe = add_element('show')
+        end
+       if text.nil?
+          delete_element(xe)
+        else
+          xe.text = text
+        end
+      end
+
+      #.......................................................................................................
+      def status
+        first_element_text('status')
+      end
+
+      #.......................................................................................................
+      def status=(val)
+        val.nil? ? delete_element('status') : replace_element_text('status', val)
+      end
+
+      #.......................................................................................................
+      def priority
+        (e = first_element_text('priority')).nil? ? nil : e.to_i
+      end
+
+      #.......................................................................................................
+      def priority=(val)
+        val.nil? ? delete_element('priority') : replace_element_text('priority', val)
+      end
+
+      #.......................................................................................................
+      def <=>(o)
+        priority.to_i == o.priority.to_i ? cmp_interest(o) : priority.to_i <=> o.priority.to_i
+      end
+
+      #.......................................................................................................
+      PRESENCE_STATUS = { :chat => 4,
+                          nil => 3,
+                          :dnd => 2,
+                          :away => 1,
+                          :xa => 0,
+                          :unavailable => -1,
+                          :error => -2 }
+      #.......................................................................................................
+      def cmp_interest(o)
+        if type.nil?
+          o.type.nil? ? PRESENCE_STATUS[show] <=> PRESENCE_STATUS[o.show] : -1
+        elsif o.type.nil?
+          return 1
+        else
+          return 0
+        end
+      end
+
+    #### Presence
+    end
+    
+  #### XMPP
+  end
+
+#### AgentXmpp
+end