xisbn 0.0.1 → 0.0.3

data/lib/xisbn.rb

@@ -1,18 +1,61 @@
-require 'net/http'
-require 'rexml/document'
-
-# pass in an ISBN and get back a list of related isbns
-# as defined by the OCLC xisbn webservice at 
-# http://www.oclc.org/research/projects/xisbn/
-
-def xisbn(isbn)
-  clean_isbn = isbn.gsub(/[^0-9X]/,'')
-
-  xml = Net::HTTP.get('labs.oclc.org', "/xisbn/#{clean_isbn}")
-  doc = REXML::Document.new(xml)
-
-  isbns = []
-  doc.elements.each('idlist/isbn') {|e| isbns << e.text}
-
-  return isbns
-end
+require 'net/http'
+require 'rexml/document'
+
+# Pass in an ISBN and get back a list of related isbns
+# as defined by the OCLC xisbn webservice at 
+# http://www.oclc.org/research/projects/xisbn/
+#
+#   require 'xisbn'
+#   include XISBN
+#   isbns = xisbn('0-9745140-8-X')
+#
+# If you want to guard against timeouts pass in the number
+# of seconds you don't want to wait longer than:
+#
+#   isbns = xisbn('0-94745140-8-X', :timeout => 1)
+#
+# If you want to use LibraryThing's xisbn service:
+#
+#   isbns = thing_isbn('0-9745140-8-X')
+
+module XISBN
+  require 'uri'
+  @@oclc_uri = URI.parse('http://labs.oclc.org/xisbn')
+  @@thing_uri = URI.parse('http://www.librarything.com/api/thingISBN')
+
+  def xisbn(isbn, opts={})
+    return get_isbns(@@oclc_uri, isbn, opts)
+  end
+
+  def thing_isbn(isbn, opts={})
+    return get_isbns(@@thing_uri, isbn, opts)
+  end
+
+  private
+
+  def get_isbns(uri, isbn, opts={})
+    timeout = opts[:timeout] || 60
+    redirects = opts[:redirects] || 10
+    clean_isbn = isbn.gsub(/[^0-9X]/,'')
+
+    # base case for http redirect recursion
+    raise ArgumentError, 'Too many redirects' if redirects == 0
+
+    http = Net::HTTP.new(uri.host)
+    http.read_timeout = timeout
+    http.open_timeout = timeout
+    response = http.get("#{uri.path}/#{clean_isbn}")
+
+    # follow HTTP redirects
+    if response.kind_of?(Net::HTTPRedirection)
+      return get_isbns(URI.parse(response['location']), isbn, 
+        {:timeout => timeout, :redirects => (redirects-1)})
+    end
+
+    isbns = []
+    doc = REXML::Document.new(response.body)
+    doc.elements.each('idlist/isbn') {|e| isbns << e.text}
+    return isbns
+  end
+
+end

data/{test.rb → test/xisbn_test.rb}

@@ -1,23 +1,35 @@
-$LOAD_PATH.unshift 'lib'
-
-require 'test/unit'
-require 'xisbn'
-
-class XISBNTest < Test::Unit::TestCase
-
-  def test_lookup
-    isbns = xisbn('0192816640')
-    assert isbns.length > 0
-  end
-
-  def test_lookup_with_dashes
-    isbns = xisbn('01928-16-640')
-    assert isbns.length > 0
-  end
-
-  def test_bad_lookup
-    isbns = xisbn('foobar')
-    assert isbns.length == 0
-  end
-
-end
+#!/usr/bin/env ruby
+
+$LOAD_PATH.unshift 'lib'
+
+require 'test/unit'
+require 'xisbn'
+include XISBN
+
+class XISBNTest < Test::Unit::TestCase
+
+  def test_lookup
+    isbns = xisbn('0192816640')
+    assert isbns.length > 0
+  end
+
+  def test_lookup_with_dashes
+    isbns = xisbn('01928-16-640')
+    assert isbns.length > 0
+  end
+
+  def test_bad_lookup
+    isbns = xisbn('foobar')
+    assert isbns.length == 0
+  end
+
+  def test_timeout
+    isbns = xisbn('foobar', :timeout=>2)
+  end
+
+  def test_thing_isbn
+    isbns = thing_isbn('01928-16-640')
+    assert isbns.length > 0
+  end
+
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.11
+rubygems_version: 0.9.0
 specification_version: 1
 name: xisbn
 version: !ruby/object:Gem::Version 
-  version: 0.0.1
-date: 2006-02-28 00:00:00.000000 -06:00
+  version: 0.0.3
+date: 2007-02-14 00:00:00 -05:00
 summary: look up related isbns with OCLCs xisbn service
 require_paths: 
-  - lib
+- lib
 email: ehs@pobox.com
 homepage: http://www.textualize.com/xisbn
 rubyforge_project: 
@@ -18,41 +18,30 @@ bindir: bin
 has_rdoc: true
 required_ruby_version: !ruby/object:Gem::Version::Requirement 
   requirements: 
-    - 
-      - ">"
-      - !ruby/object:Gem::Version 
-        version: 0.0.0
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
   version: 
 platform: ruby
 signing_key: 
 cert_chain: 
+post_install_message: 
 authors: 
-  - Ed Summers
+- Ed Summers
 files: 
-  - lib/xisbn.rb
-  - lib/.svn/dir-wcprops
-  - lib/.svn/empty-file
-  - lib/.svn/entries
-  - lib/.svn/format
-  - lib/.svn/prop-base
-  - lib/.svn/props
-  - lib/.svn/README.txt
-  - lib/.svn/text-base
-  - lib/.svn/tmp
-  - lib/.svn/wcprops
-  - lib/.svn/prop-base/xisbn.rb.svn-base
-  - lib/.svn/props/xisbn.rb.svn-work
-  - lib/.svn/text-base/xisbn.rb.svn-base
-  - lib/.svn/tmp/prop-base
-  - lib/.svn/tmp/props
-  - lib/.svn/tmp/text-base
-  - lib/.svn/tmp/wcprops
-  - lib/.svn/wcprops/xisbn.rb.svn-work
-test_files: 
-  - test.rb
+- lib/xisbn.rb
+- test/xisbn_test.rb
+test_files: []
+
 rdoc_options: []
+
 extra_rdoc_files: []
+
 executables: []
+
 extensions: []
+
 requirements: []
-dependencies: []
+
+dependencies: []
+

data/lib/.svn/README.txt

@@ -1,2 +0,0 @@
-This is a Subversion working copy administrative directory.
-Visit http://subversion.tigris.org/ for more information.

data/lib/.svn/dir-wcprops

@@ -1,5 +0,0 @@
-K 25
-svn:wc:ra_dav:version-url
-V 33
-/svn/!svn/ver/372/xisbn/trunk/lib
-END

data/lib/.svn/entries

@@ -1,22 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<wc-entries
-   xmlns="svn:">
-<entry
-   committed-rev="372"
-   name=""
-   committed-date="2006-02-28T06:34:26.176837Z"
-   url="http://www.textualize.com/svn/xisbn/trunk/lib"
-   last-author="ed"
-   kind="dir"
-   uuid="4dc5e89f-90f6-0310-ab54-a6a856e7c30e"
-   revision="372"/>
-<entry
-   committed-rev="372"
-   name="xisbn.rb"
-   text-time="2006-02-28T15:20:47.000000Z"
-   committed-date="2006-02-28T06:34:26.176837Z"
-   checksum="2b6d73e6e65a5c3ab351fe1b4040693e"
-   last-author="ed"
-   kind="file"
-   prop-time="2006-02-28T15:20:47.000000Z"/>
-</wc-entries>

data/lib/.svn/format

@@ -1 +0,0 @@
-4

data/lib/.svn/prop-base/xisbn.rb.svn-base

@@ -1 +0,0 @@
-END

data/lib/.svn/props/xisbn.rb.svn-work

@@ -1 +0,0 @@
-END

data/lib/.svn/text-base/xisbn.rb.svn-base

@@ -1,18 +0,0 @@
-require 'net/http'
-require 'rexml/document'
-
-# pass in an ISBN and get back a list of related isbns
-# as defined by the OCLC xisbn webservice at 
-# http://www.oclc.org/research/projects/xisbn/
-
-def xisbn(isbn)
-  clean_isbn = isbn.gsub(/[^0-9X]/,'')
-
-  xml = Net::HTTP.get('labs.oclc.org', "/xisbn/#{clean_isbn}")
-  doc = REXML::Document.new(xml)
-
-  isbns = []
-  doc.elements.each('idlist/isbn') {|e| isbns << e.text}
-
-  return isbns
-end

data/lib/.svn/wcprops/xisbn.rb.svn-work

@@ -1,5 +0,0 @@
-K 25
-svn:wc:ra_dav:version-url
-V 42
-/svn/!svn/ver/372/xisbn/trunk/lib/xisbn.rb
-END