josephholsten-rets4r 1.1.17 → 1.1.18

data/lib/rets4r/client/data.rb

@@ -1,14 +0,0 @@
-module RETS4R
-    class Client
-        # Represents a row of data. Nothing more than a glorfied Hash with a custom constructor and a
-        # type attribute.
-        class Data < ::Hash
-            attr_accessor :type
-
-            def initialize(type = false)
-                super
-                self.type = type
-            end
-        end
-    end
-end

data/lib/rets4r/client/dataobject.rb

@@ -1,20 +0,0 @@
-module RETS4R
-    class Client
-        # Represents a RETS object (as returned by the get_object) transaction.
-        class DataObject
-            attr_accessor :type, :data
-
-            alias :info :type
-
-            def initialize(type, data)
-                self.type = type
-                self.data = data
-            end
-
-            def success?
-                return true if self.data
-                return false
-            end
-        end
-    end
-end

data/lib/rets4r/client/metadata.rb

@@ -1,15 +0,0 @@
-require 'rets4r/client/data'
-
-module RETS4R
-    class Client
-        # Represents a set of metadata. It is simply an extended Array with type and attributes accessors.
-        class Metadata < Array
-            attr_accessor :type, :attributes
-
-            def initialize(type = false)
-                self.type = type if type
-                self.attributes = {}
-            end
-        end
-    end
-end

data/lib/rets4r/client/parsers/compact.rb

@@ -1,42 +0,0 @@
-# Parses XML response containing 'COMPACT' data format.
-
-require 'cgi'
-
-module RETS4R
-  class Client
-    class CompactDataParser
-      def parse_results(doc)
-
-        delimiter = doc.get_elements('/RETS/DELIMITER')[0] &&
-                    doc.get_elements('/RETS/DELIMITER')[0].attributes['value'].to_i.chr
-        columns   = doc.get_elements('/RETS/COLUMNS')[0]
-        rows      = doc.get_elements('/RETS/DATA')
-
-        parse_data(columns, rows, delimiter)
-      end
-
-      def parse_data(column_element, row_elements, delimiter = "\t")
-
-        column_names = column_element.to_s.split(delimiter)
-
-        result = []
-
-        data = row_elements.each do |data_row|
-          data_row = data_row.text.split(delimiter)
-
-          row_result = {}
-
-          column_names.each_with_index do |col, x|
-            row_result[col] = data_row[x]
-          end
-
-          row_result.reject! { |k,v| k.nil? || k.empty? }
-
-          result << row_result
-        end
-
-        return result
-      end
-    end
-  end
-end

data/lib/rets4r/client/parsers/compact_nokogiri.rb

@@ -1,81 +0,0 @@
-require 'rubygems'
-require 'nokogiri'
-module RETS4R
-  class Client
-    class CompactNokogiriParser
-
-      def initialize(io)
-        @doc    = CompactDocument.new 
-        @parser = Nokogiri::XML::SAX::Parser.new(@doc)
-        @io     = io
-      end
-
-      def to_a
-        @parser.parse(@io) if @doc.results.empty?
-        @doc.results
-      end
-
-      def each(&block)
-        @doc.proc = block.to_proc
-        @parser.parse(@io)
-        nil
-      end
-
-      class CompactDocument < Nokogiri::XML::SAX::Document
-        attr_reader :results
-        attr_writer :proc
-        
-        def initialize
-          @results = []
-        end
-        def start_element name, attrs = []
-          case name
-          when 'DELIMITER'
-            @delimiter = attrs.last.to_i.chr
-          when 'COLUMNS'
-            @columns_element = true
-            @string = ''
-          when 'DATA'
-            @data_element = true
-            @string = ''
-          end
-        end
-
-        def end_element name
-          case name
-          when 'COLUMNS'
-            @columns_element = false
-            @columns = @string.split(@delimiter)
-          when 'DATA'
-            @data_element = false
-            handle_row
-          end
-        end
-
-        def characters string
-          if @columns_element
-            @string << string
-          elsif @data_element
-            @string << string
-          end
-        end
-
-        private 
-        def handle_row
-          data = make_hash
-          if @proc
-            @proc.call(data)
-          else
-            @results << data
-          end
-        end
-        def make_hash
-          @columns.zip(@string.split(@delimiter)).inject({}) do | h,(k,v) |
-            h[k] = v unless k.empty?
-            next h
-          end
-        end
-      end
-    end
-  end
-end

data/lib/rets4r/client/parsers/metadata.rb

@@ -1,92 +0,0 @@
-require 'rexml/document'
-require 'yaml'
-require 'rets4r/client/parsers/compact'
-
-module RETS4R
-  class Client
-    class MetadataParser
-
-      TAGS = [ 'METADATA-RESOURCE',
-               'METADATA-CLASS',
-               'METADATA-TABLE',
-               'METADATA-OBJECT',
-               'METADATA-LOOKUP',
-               'METADATA-LOOKUP_TYPE' ]
-
-      def initialize()
-        @parser = RETS4R::Client::CompactDataParser.new
-      end
-
-      def parse_file(file = 'metadata.xml')
-        xml = File.read(file)
-        doc = REXML::Document.new(xml)
-        parse(doc)
-      end
-
-      def parse(doc)
-
-        rets_resources = {}
-
-        doc.get_elements('/RETS/*').each do |elem|
-
-          next unless TAGS.include?(elem.name)
-
-          columns   = elem.get_elements('COLUMNS')[0]
-          rows      = elem.get_elements('DATA')
-
-          data = @parser.parse_data(columns, rows)
-
-          resource_id = elem.attributes['Resource']
-
-          case elem.name
-            when 'METADATA-RESOURCE'
-              data.each do |resource_info|
-                id = resource_info.delete('ResourceID')
-                rets_resources[id] = resource_info
-              end
-
-            when 'METADATA-CLASS'
-              data.each do |class_info|
-                class_name = class_info.delete('ClassName')
-                rets_resources[resource_id][:classes] ||= {}
-                rets_resources[resource_id][:classes][class_name] = class_info
-              end
-
-            when 'METADATA-TABLE'
-              class_name = elem.attributes['Class']
-              data.each do |table_info|
-                system_name = table_info.delete('SystemName')
-                rets_resources[resource_id][:classes][class_name][:tables] ||= {}
-                rets_resources[resource_id][:classes][class_name][:tables][system_name] = table_info
-              end
-
-            when 'METADATA-OBJECT'
-              data.each do |object_info|
-                object_type = object_info.delete('ObjectType')
-                rets_resources[resource_id][:objects] ||= {}
-                rets_resources[resource_id][:objects][object_type] = object_info
-              end
-
-            when 'METADATA-LOOKUP'
-              data.each do |lookup_info|
-                lookup_name = lookup_info.delete('LookupName')
-                rets_resources[resource_id][:lookups] ||= {}
-                rets_resources[resource_id][:lookups][lookup_name] = lookup_info
-              end
-
-            when 'METADATA-LOOKUP_TYPE'
-              lookup = elem.attributes['Lookup']
-              rets_resources[resource_id][:lookup_types] ||= {}
-              rets_resources[resource_id][:lookup_types][lookup] = {}
-              data.each do |lookup_type_info|
-                value = lookup_type_info.delete('Value')
-                rets_resources[resource_id][:lookup_types][lookup][value] = lookup_type_info
-              end
-          end
-        end
-
-        rets_resources
-      end
-    end
-  end
-end

data/lib/rets4r/client/parsers/response_parser.rb

@@ -1,100 +0,0 @@
-require 'rets4r/client/transaction'
-require 'rets4r/client/parsers/compact'
-require 'rexml/document'
-
-module RETS4R
-  class Client
-    class ResponseParser
-      def parse_key_value(xml)
-        parse_common(xml) do |doc|
-          parsed = nil
-          first_child = doc.get_elements('/RETS/RETS-RESPONSE')[0] ? doc.get_elements('/RETS/RETS-RESPONSE')[0] : doc.get_elements('/RETS')[0]
-          unless first_child.nil?
-            parsed = {}
-            first_child.text.each do |line|
-              (key, value) = line.strip.split('=')
-              key.strip! if key
-              value.strip! if value
-              parsed[key] = value
-            end
-          else
-            raise 'Response was not a proper RETS XML doc!'
-          end
-
-          if parsed.nil?
-            raise "Response was not valid key/value format"
-          else
-            parsed
-          end
-        end
-      end
-
-      def parse_results(xml, format)
-        parse_common(xml) do |doc|
-          parser = get_parser_by_name(format)
-          parser.parse_results(doc)
-        end
-      end
-
-      def parse_count(xml)
-        parse_common(xml) do |doc|
-          doc.get_elements('/RETS/COUNT')[0].attributes['Records']
-        end
-      end
-
-      def parse_metadata(xml, format)
-        parse_common(xml) do |doc|
-          return REXML::Document.new(xml)
-        end
-      end
-
-      def parse_object_response(xml)
-        parse_common(xml) do |doc|
-          # XXX
-        end
-      end
-
-      private
-
-      def parse_common(xml, &block)
-        if xml == ''
-          raise RETSException, 'No transaction body was returned!'
-        end
-
-        doc = REXML::Document.new(xml)
-
-        root = doc.root
-        if root.nil? || root.name != 'RETS'
-          raise "Response had invalid root node. Document was: #{doc.inspect}"
-        end
-
-        transaction = Transaction.new
-        transaction.reply_code = root.attributes['ReplyCode']
-        transaction.reply_text = root.attributes['ReplyText']
-        transaction.maxrows    = (doc.get_elements('/RETS/MAXROWS').length > 0)
-
-
-        # XXX: If it turns out we need to parse the response of errors, then this will
-        # need to change.
-        if transaction.reply_code.to_i > 0 && transaction.reply_code.to_i != 20201
-          exception_type = Client::EXCEPTION_TYPES[transaction.reply_code.to_i] || RETSTransactionException
-          raise exception_type, "#{transaction.reply_code} - #{transaction.reply_text}"
-        end
-
-        transaction.response = yield doc
-        return transaction
-      end
-
-      def get_parser_by_name(name)
-        case name
-          when 'COMPACT', 'COMPACT-DECODED'
-            type = RETS4R::Client::CompactDataParser
-          else
-            raise "Invalid format #{name}"
-        end
-        type.new
-      end
-    end
-  end
-end
-

data/lib/rets4r/client/transaction.rb

@@ -1,31 +0,0 @@
-module RETS4R
-  class Client
-    class Transaction
-      attr_accessor :reply_code, :reply_text, :response, :metadata,
-        :header, :maxrows, :delimiter, :secondary_response
-
-      def initialize
-        self.maxrows = false
-        self.header = []
-        self.delimiter = ?\t
-      end
-
-      def success?
-        return true if self.reply_code == '0'
-        return false
-      end
-
-      def maxrows?
-        return true if self.maxrows
-        return false
-      end
-
-      def ascii_delimiter
-        self.delimiter.chr
-      end
-
-      # For compatibility with the original library.
-      alias :data :response
-    end
-  end
-end

data/lib/rets4r/core_ext/array/extract_options.rb

@@ -1,15 +0,0 @@
-# from ActiveSupport
-class Array
-  # Extracts options from a set of arguments. Removes and returns the last
-  # element in the array if it's a hash, otherwise returns a blank hash.
-  #
-  #   def options(*args)
-  #     args.extract_options!
-  #   end
-  #
-  #   options(1, 2)           # => {}
-  #   options(1, 2, :a => :b) # => {:a=>:b}
-  def extract_options!
-    last.is_a?(::Hash) ? pop : {}
-  end
-end

data/lib/rets4r/core_ext/class/attribute_accessors.rb

@@ -1,58 +0,0 @@
-require 'rets4r/core_ext/array/extract_options'
-# from ActiveSupport
-
-# Extends the class object with class and instance accessors for class attributes,
-# just like the native attr* accessors for instance attributes.
-#
-#  class Person
-#    cattr_accessor :hair_colors
-#  end
-#
-#  Person.hair_colors = [:brown, :black, :blonde, :red]
-class Class
-  def cattr_reader(*syms)
-    syms.flatten.each do |sym|
-      next if sym.is_a?(Hash)
-      class_eval(<<-EOS, __FILE__, __LINE__ + 1)
-        unless defined? @@#{sym}  # unless defined? @@hair_colors
-          @@#{sym} = nil          #   @@hair_colors = nil
-        end                       # end
-                                  #
-        def self.#{sym}           # def self.hair_colors
-          @@#{sym}                #   @@hair_colors
-        end                       # end
-                                  #
-        def #{sym}                # def hair_colors
-          @@#{sym}                #   @@hair_colors
-        end                       # end
-      EOS
-    end
-  end
-
-  def cattr_writer(*syms)
-    options = syms.extract_options!
-    syms.flatten.each do |sym|
-      class_eval(<<-EOS, __FILE__, __LINE__ + 1)
-        unless defined? @@#{sym}                       # unless defined? @@hair_colors
-          @@#{sym} = nil                               #   @@hair_colors = nil
-        end                                            # end
-                                                       #
-        def self.#{sym}=(obj)                          # def self.hair_colors=(obj)
-          @@#{sym} = obj                               #   @@hair_colors = obj
-        end                                            # end
-                                                       #
-        #{"                                            #
-        def #{sym}=(obj)                               # def hair_colors=(obj)
-          @@#{sym} = obj                               #   @@hair_colors = obj
-        end                                            # end
-        " unless options[:instance_writer] == false }  # # instance writer above is generated unless options[:instance_writer] == false
-      EOS
-      self.send("#{sym}=", yield) if block_given?
-    end
-  end
-
-  def cattr_accessor(*syms, &blk)
-    cattr_reader(*syms)
-    cattr_writer(*syms, &blk)
-  end
-end