ws-aboutme 0.5.1

data/lib/webservice/aboutme/version.rb

@@ -0,0 +1,22 @@
+module WebService #:nodoc:
+  module Aboutme #:nodoc:
+    module Version #:nodoc:
+      MAJOR = 0
+      MINOR = 5
+      TINY  = 1
+
+      STRING = [MAJOR, MINOR, TINY].join('.')
+      NAME   = [MAJOR, MINOR, TINY].join('_')
+
+      class << self
+        def to_version
+          STRING
+        end
+
+        def to_name
+          NAME
+        end
+      end
+    end
+  end
+end

data/lib/webservice/aboutme/xmlobjectmapping.rb

@@ -0,0 +1,110 @@
+require 'date'
+require 'rexml/document'
+
+module WebService #:nodoc:
+module Aboutme #:nodoc:
+module XmlObjectMapping #:nodoc:
+  def XmlObjectMapping.included(base)
+    base.extend ClassMethods
+  end
+
+  module ClassMethods #:nodoc:
+    def attr_mapping(name, args = {})
+      unless args[:private]
+        attr_accessor name
+      end
+
+      mapping = {
+        :name => name,
+        :type => args[:type] || :string,
+        :array => args[:array] || false,
+        :subnode => args[:subnode],
+      }
+      path = args[:path] || name.to_s
+
+      @attributes ||= {}
+      @attributes[path] = mapping
+    end
+
+    def attr_array(name, args = {})
+      attr_mapping(name, args.merge(:array => true))
+    end
+  end
+
+  class Base #:nodoc:
+    include XmlObjectMapping
+
+    def self.unmarshal(xml)
+      self.new.__send__ :populate, xml
+    end
+
+
+    private
+
+    def populate(xml)
+      attributes = collect_mappings(self.class)
+
+      xml.elements.each do |node|
+        name = node.name
+        mapping = attributes[name]
+        next unless mapping
+        array = mapping[:array]
+
+        value = array ? get_attribute_array(node, mapping) : get_attribute_value(node, mapping)
+        instance_variable_set("@#{mapping[:name]}", value)
+      end
+
+      post_population
+      self
+    end
+
+    def collect_mappings(clazz)
+      if clazz == Base
+        {}
+      else
+        base_mappings = collect_mappings(clazz.superclass)
+        self_mappings = clazz.class_eval { @attributes } || {}
+        base_mappings.merge(self_mappings)
+      end
+    end
+
+    def post_population
+    end
+
+    def get_attribute_array(node, mapping)
+      list = []
+      m = mapping.dup
+      subnode = m.delete :subnode
+      node.elements.each(subnode) do |e|
+        list << get_attribute_value(e, m)
+      end
+      list
+    end
+
+    def get_attribute_value(node, mapping)
+      type = mapping[:type]
+      str = node.text
+      case type
+      when :string
+        str
+      when :integer
+        str.to_i
+      when :date
+        Date.parse(str)
+      when :datetime
+        DateTime.parse(str)
+      else
+        subnode = mapping[:subnode]
+        if subnode
+          nodes = node.get_elements(subnode)
+          nodes.empty? ? nil : type.unmarshal(nodes[0])
+        else
+          type.unmarshal(node)
+        end
+      end
+    end
+
+  end
+end
+end
+end

data/test/tc_config.rb

@@ -0,0 +1,54 @@
+# -*- coding: utf-8 -*-
+#
+#
+require File.join(File.dirname(__FILE__), 'test_helper')
+require File.join(File.dirname(__FILE__), '..', 'lib', 'webservice', 'aboutme', 'api')
+
+require 'test/unit'
+
+class ConfigTest < Test::Unit::TestCase
+
+  include TestHelper
+  include WebService::Aboutme
+
+  def test_new
+    config = API.new.config
+    assert_equal 'api.aboutme.jp', config.request_domain
+    assert_equal 80, config.request_port
+    assert_equal '/api/v1/', config.request_path_base
+    assert config.open_timeout > 0
+    assert config.read_timeout > 0
+    assert_not_nil config.user_agent
+  end
+
+  def test_new_with_parameters
+    config = API.new(:request_domain => 'testdomain',
+                     :request_port => 8080,
+                     :open_timeout => 22,
+                     :read_timeout => 33
+                     ).config
+    assert_equal 'testdomain', config.request_domain
+    assert_equal 8080, config.request_port
+    assert_equal '/api/v1/', config.request_path_base
+    assert_equal 22, config.open_timeout
+    assert_equal 33, config.read_timeout
+    assert_not_nil config.user_agent
+  end
+
+  def test_new_with_block
+    config = API.new do |c|
+      c.request_domain = 'test.domain'
+      c.request_port = 8888
+      c.open_timeout = 77
+      c.read_timeout = 88
+      c.user_agent = 'testUA'
+    end.config
+
+    assert_equal 'test.domain', config.request_domain
+    assert_equal 8888, config.request_port
+    assert_equal '/api/v1/', config.request_path_base
+    assert_equal 77, config.open_timeout
+    assert_equal 88, config.read_timeout
+    assert_equal 'testUA', config.user_agent
+  end
+end

data/test/tc_search_answer_response.rb

@@ -0,0 +1,59 @@
+# -*- coding: utf-8 -*-
+#
+#
+require File.join(File.dirname(__FILE__), 'test_helper')
+require File.join(File.dirname(__FILE__), '..', 'lib', 'webservice', 'aboutme', 'api')
+
+require 'date'
+require 'test/unit'
+
+class SearchAnswerResponseTest < Test::Unit::TestCase
+
+  include TestHelper
+  include WebService::Aboutme
+
+  def test_unmarshal
+    xml = parse_xml('tc_search_answer_response.xml')
+    response = SearchAnswerResponse.unmarshal(xml.root)
+    assert_not_nil response
+
+    # response.status.*
+    s = response.status
+    assert_not_nil s
+    assert_equal 200, s.code
+    assert_equal 'OK', s.message
+    assert_equal 'ja', s.language
+
+    # response.summary.*
+    summary = response.summary
+    assert_not_nil summary
+    assert_equal 999, summary.total
+    assert_equal 111, summary.page
+    assert_equal 222, summary.page_count
+
+    # response.answers
+    as = response.answers
+    assert_not_nil as
+    assert_equal 2, as.size
+
+    # response.answers[0].*
+    a = as[0]
+    assert_equal 99999, a.id
+    assert_equal 'answer99999', a.title
+    assert_equal 101010, a.question_id
+    assert_equal DateTime.parse('2007-07-31T11:22:33+09:00'), a.updated_at
+    assert_equal 1234, a.answerer.id
+    assert_equal 'test-user1234', a.answerer.nickname
+
+    # response.answers[1].*
+    a = as[1]
+    assert_equal 88888, a.id
+    assert_equal 'answer88888', a.title
+    assert_equal 101010, a.question_id
+    assert_equal DateTime.parse('2007-07-31T22:33:44+09:00'), a.updated_at
+    assert_equal 9876, a.answerer.id
+    assert_equal 'test-user9876', a.answerer.nickname
+
+  end
+
+end

data/test/tc_search_answer_response.xml

@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<response>
+  <status>
+    <code>200</code>
+    <message>OK</message>
+    <language>ja</language>
+  </status>
+
+  <result>
+    <summary>
+      <total>999</total>
+      <page>111</page>
+      <page_count>222</page_count>
+    </summary>
+
+    <answers>
+      <answer>
+        <id>99999</id>
+        <title>answer99999</title>
+        <question_id>101010</question_id>
+        <updated_at>2007-07-31T11:22:33+09:00</updated_at>
+        <answerer>
+          <id>1234</id>
+          <nickname>test-user1234</nickname>
+        </answerer>
+      </answer>
+
+      <answer>
+        <id>88888</id>
+        <title>answer88888</title>
+        <question_id>101010</question_id>
+        <updated_at>2007-07-31T22:33:44+09:00</updated_at>
+        <answerer>
+          <id>9876</id>
+          <nickname>test-user9876</nickname>
+        </answerer>
+      </answer>
+    </answers>
+  </result>
+</response>

data/test/tc_search_question_response.rb

@@ -0,0 +1,56 @@
+# -*- coding: utf-8 -*-
+#
+#
+require File.join(File.dirname(__FILE__), 'test_helper')
+require File.join(File.dirname(__FILE__), '..', 'lib', 'webservice', 'aboutme', 'api')
+
+require 'date'
+require 'test/unit'
+
+class SearchQuestionResponseTest < Test::Unit::TestCase
+
+  include TestHelper
+  include WebService::Aboutme
+
+  def test_unmarshal
+    xml = parse_xml('tc_search_question_response.xml')
+    response = SearchQuestionResponse.unmarshal(xml.root)
+    assert_not_nil response
+
+    # response.status.*
+    s = response.status
+    assert_not_nil s
+    assert_equal 200, s.code
+    assert_equal 'OK', s.message
+    assert_equal 'ja', s.language
+
+    # response.summary.*
+    summary = response.summary
+    assert_not_nil summary
+    assert_equal 123, summary.total
+    assert_equal 99, summary.page
+    assert_equal 12, summary.page_count
+
+    # response.questions
+    qs = response.questions
+    assert_not_nil qs
+    assert_equal 2, qs.size
+
+    # response.questions[0].*
+    q = qs[0]
+    assert_equal 98765, q.id
+    assert_equal 'test98765', q.title
+    assert_equal 'http://aboutme.jp/question/show/98765', q.url
+    assert_equal 1234, q.creator.id
+    assert_equal 2, q.choices.size
+
+    # response.questions[1].*
+    q = qs[1]
+    assert_equal 12345, q.id
+    assert_equal 'test12345', q.title
+    assert_equal 'http://aboutme.jp/question/show/12345', q.url
+    assert_equal 1111, q.creator.id
+    assert_equal 3, q.choices.size
+  end
+
+end

data/test/tc_search_question_response.xml

@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<response>
+  <status>
+    <code>200</code>
+    <message>OK</message>
+    <language>ja</language>
+  </status>
+
+  <result>
+    <summary>
+      <total>123</total>
+      <page>99</page>
+      <page_count>12</page_count>
+    </summary>
+
+    <questions>
+      <question>
+        <id>98765</id>
+        <title>test98765</title>
+        <url>http://aboutme.jp/question/show/98765</url>
+        <creator>
+          <id>1234</id>
+          <nickname>test-user1234</nickname>
+        </creator>
+        <created_at>2007-07-31T12:34:56+09:00</created_at>
+        <options>
+          <option>
+            <priority>1</priority>
+            <title>test98765-1</title>
+          </option>
+          <option>
+            <priority>2</priority>
+            <title>test98765-2</title>
+          </option>
+        </options>
+      </question>
+
+      <question>
+        <id>12345</id>
+        <title>test12345</title>
+        <url>http://aboutme.jp/question/show/12345</url>
+        <creator>
+          <id>1111</id>
+          <nickname>test-user1111</nickname>
+        </creator>
+        <created_at>2007-07-31T11:22:33+09:00</created_at>
+        <options>
+          <option>
+            <priority>1</priority>
+            <title>test12345-1</title>
+          </option>
+          <option>
+            <priority>2</priority>
+            <title>test12345-2</title>
+          </option>
+          <option>
+            <priority>3</priority>
+            <title>test12345-3</title>
+          </option>
+        </options>
+      </question>
+    </questions>
+
+  </result>
+</response>

data/test/tc_search_user_response.rb

@@ -0,0 +1,52 @@
+# -*- coding: utf-8 -*-
+#
+#
+require File.join(File.dirname(__FILE__), 'test_helper')
+require File.join(File.dirname(__FILE__), '..', 'lib', 'webservice', 'aboutme', 'api')
+
+require 'date'
+require 'test/unit'
+
+class SearchUserResponseTest < Test::Unit::TestCase
+
+  include TestHelper
+  include WebService::Aboutme
+
+  def test_unmarshal
+    xml = parse_xml('tc_search_user_response.xml')
+    response = SearchUserResponse.unmarshal(xml.root)
+    assert_not_nil response
+
+    # response.status.*
+    s = response.status
+    assert_not_nil s
+    assert_equal 200, s.code
+    assert_equal 'OK', s.message
+    assert_equal 'ja', s.language
+
+    # response.summary.*
+    summary = response.summary
+    assert_not_nil summary
+    assert_equal 99, summary.total
+    assert_equal 2, summary.page
+    assert_equal 10, summary.page_count
+
+    # response.users[*]
+    users = response.users
+    assert_not_nil users
+    assert_equal 2, users.size
+
+    # response.users[0].*
+    u = users[0]
+    assert_equal 123, u.id
+    assert_equal 'test-user123', u.nickname
+    assert_equal 'http://test-user123.aboutme.jp/', u.url
+
+    # response.users[1].*
+    u = users[1]
+    assert_equal 9876, u.id
+    assert_equal 'test-user9876', u.nickname
+    assert_equal 'http://test-user9876.aboutme.jp/', u.url
+  end
+
+end