openurl 0.0.1 → 0.1.0

data/lib/openurl/metadata_formats/scholarly_service_type.rb

@@ -0,0 +1,41 @@
+# 
+# scholarly_service_type.rb
+# 
+# Created on Nov 1, 2007, 10:35:28 AM
+# 
+# To change this template, choose Tools | Templates
+# and open the template in the editor.
+ 
+module OpenURL
+  class ScholarlyServiceType < ContextObjectEntity    
+    def initialize      
+      super
+      @format = 'sch_svc'      
+      @metadata_keys = ['abstract','citation','fulltext','holdings','ill','any']      
+      @xml_ns = "info:ofi/fmt:xml:xsd:sch_svc"
+      @kev_ns = "info:ofi/fmt:kev:mtx:sch_svc"
+    end    
+    
+    def method_missing(metadata, value=nil)
+      meta = metadata.to_s.sub(/=$/,'')
+      raise ArgumentError, "#{meta.to_s} is not a valid #{self.class} metadata field." unless @metadata_keys.index(meta)
+      if metadata.to_s.match(/=$/)
+        self.set_metadata(meta, value)
+      else
+        return self.metadata[meta]
+      end
+      
+    end
+     
+  end
+  
+  class ScholarlyServiceTypeFactory < ContextObjectEntityFactory
+    @@identifiers = ["info:ofi/fmt:kev:mtx:sch_svc","info:ofi/fmt:xml:xsd:sch_svc"]
+    def self.identifiers
+      return @@identifiers
+    end
+    def self.create()
+      return OpenURL::ScholarlyServiceType.new
+    end    
+  end
+end

data/lib/openurl/transport.rb

@@ -65,13 +65,18 @@ module OpenURL
     # via GET, so pass the index of the desired context object (defaults to the 
     # first)
     
-    def get(idx=0)      
+    def get(idx=0)           
+      self.parse_response(@client.get( self.get_path(idx)  ))      
+    end
+
+    # useful for debugging to have this factored out
+    def get_path(idx=0)
       extra = ""
       @extra_args.each do | key, val |        
         extra << "&#{key}=#{val}"
-      end      
-      self.parse_response(@client.get("#{@uri.path}?#{@context_objects[idx].kev}#{extra}"))      
-    end        
+      end
+      return "#{@uri.path}?#{@context_objects[idx].kev}#{extra}"
+    end
     
     # Sends an inline transport request.  YOu can specify which HTTP method
     # to use.  Since you can only send one context object per inline request, 

data/test/context_object_entity_test.rb

@@ -0,0 +1,41 @@
+
+class ContextObjectEntityTest < Test::Unit::TestCase
+
+  def test_normalize_identifiers    
+
+    # some ones that shouldn't be changed by normalization
+    ["https://catalog.library.jhu.edu/bib/1",
+     "http://dx.doi.org/foo",
+     "info:isbn/foo",
+     "urn:isbn:0395363411"].each do |id|
+        assert_equal id, init_and_return_id(id)
+     end
+
+     # some ones that SHOULD be altered by normalization
+     # some info ones
+     
+     
+     assert_equal "info:doi/10.1126/science.275.5304.1320", init_and_return_id("doi:10.1126/science.275.5304.1320")
+     
+     assert_equal "info:pmid/9036860", init_and_return_id("pmid:9036860")
+     
+     assert_equal "info:sici/1046-8188(199501)13:1%3C69:FTTHBI%3E2.0.TX;2-4", init_and_return_id("sici:1046-8188(199501)13:1%3C69:FTTHBI%3E2.0.TX;2-4")
+     
+     assert_equal "info:oclcnum/53393962", init_and_return_id("oclcnum:53393962")
+
+     assert_equal "info:lccn/12345", init_and_return_id("lccn:12345")      
+     
+     # some urn ones
+     
+     assert_equal "urn:isbn:0395363411", init_and_return_id("isbn:0395363411")
+     
+     assert_equal "urn:issn:1534-0481", init_and_return_id("issn:1534-0481")
+  end
+
+  def init_and_return_id(id)
+    entity = OpenURL::ContextObjectEntity.new
+    entity.add_identifier(id)
+    return entity.identifiers.first
+  end
+
+end

data/test/context_object_test.rb

@@ -0,0 +1,509 @@
+class ContextObjectTest < Test::Unit::TestCase
+
+  def test_create_ctx    
+    require 'cgi'
+    ctx = OpenURL::ContextObject.new
+    ctx.referent.set_format('journal')
+    assert_equal(ctx.referent.format, 'journal')
+    # Set some referent metadata
+    ctx.referent.set_metadata('jtitle', 'Ariadne')
+    assert_equal(ctx.referent.metadata['jtitle'], 'Ariadne')
+    # Overwrite the title
+    ctx.referent.set_metadata('jtitle', 'Nature')
+    assert_equal(ctx.referent.metadata['jtitle'], 'Nature')
+    # Set some identifiers
+    ctx.referent.add_identifier('doi:10.1038/nature06100')
+    assert_equal(ctx.referent.identifier, "info:doi/10.1038/nature06100")
+    assert_equal(ctx.referent.identifiers, ["info:doi/10.1038/nature06100"])
+    ctx.referent.add_identifier('info:pmid/17728715')
+    assert_equal(ctx.referent.identifiers, ["info:doi/10.1038/nature06100", 'info:pmid/17728715'])
+    assert_equal(ctx.referent.identifier, "info:doi/10.1038/nature06100")    
+    ctx.referrer.add_identifier('info:sid/google')
+    assert_equal(ctx.referrer.identifier, "info:sid/google")
+  end
+  
+  def test_load_kev
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')    
+    ctx = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev"])
+    self.test_kev_values(ctx)
+    ctx = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev_hybrid"])
+    self.test_kev_hybrid_values(ctx)    
+    ctx = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev_0_1"])
+    self.test_kev_01_values(ctx)
+  end
+
+  def test_old_sid_translation
+    params = {"sid" => "elsevier", "isbn" => "dummy"}
+    ctx = OpenURL::ContextObject.new_from_form_vars(params)
+
+    assert_equal "info:sid/elsevier", ctx.referrer.identifiers.first, "translate 0.1 style sid into sort-of-legal 1.0 style rfr_id with info:sid URI"    
+  end
+  
+  def test_load_xml
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    xml = File.new(data["context_objects"]["xml_doc"]).read
+    ctx = OpenURL::ContextObject.new_from_xml(xml)  
+    self.test_xml_values(ctx)
+  end
+  
+  def test_load_form_vals
+    require 'yaml'
+    require 'cgi'
+    data = YAML.load_file('test/test.yml')
+    cgi = CGI.parse(data["context_objects"]["kev"])
+    ctx = OpenURL::ContextObject.new_from_form_vars(cgi)
+    self.test_kev_values(ctx)
+  end
+
+  def test_load_metalib_form_params
+    require 'yaml'
+    require 'cgi'
+    data = YAML.load_file('test/test.yml')
+    params = data["context_objects"]["metalib_sap2_form_vars"]
+
+    ctx = OpenURL::ContextObject.new_from_form_vars(params)
+    rft_metadata = ctx.referent.metadata
+    
+    assert_equal("Cooper Jr", rft_metadata["aulast"])
+    assert_equal("William E", rft_metadata["aufirst"])
+    assert_equal("Escape responses of cryptic frogs (Anura: Brachycephalidae: Craugastor) to simulated terrestrial and aerial predators.", rft_metadata["atitle"])
+    assert_equal("Behaviour", rft_metadata["stitle"])
+    assert_equal("2008", rft_metadata["date"])
+    assert_equal("145", rft_metadata["volume"])
+
+    # And test the even WORSELY damaged metalib form vars
+    params = data["context_objects"]["metalib_sap2_form_vars_worse"]
+    ctx = OpenURL::ContextObject.new_from_form_vars(params)
+    rft_metadata = ctx.referent.metadata
+
+    assert_equal("N Engl J Med", rft_metadata["title"])
+    assert_equal("2008", rft_metadata["date"])
+  end
+
+  def test_load_cgi_style_metalib_form_params
+    require 'yaml'
+    require 'cgi'
+
+    data = YAML.load_file('test/test.yml')
+    params = data["context_objects"]["cgi_style_metalib_form_params"]
+
+    ctx = OpenURL::ContextObject.new_from_form_vars(params)
+    rft_metadata = ctx.referent.metadata
+
+    assert_equal("Abushahba", rft_metadata["aulast"])
+    assert_equal("Effect of grafting materials on osseointegration of dental implants surrounded by circumferential bone defects. An experimental study in the dog.", rft_metadata["atitle"])
+  end
+  
+  def test_oai_dc
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    xml = File.new(data["context_objects"]["oai_dc_ctx"]).read
+    ctx = OpenURL::ContextObject.new_from_xml(xml)  
+    self.test_oai_dc_values(ctx)    
+    ctx2 = OpenURL::ContextObject.new_from_xml(ctx.xml)
+    self.test_oai_dc_values(ctx2)    
+  end
+  
+  def test_marc
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    xml = File.new(data["context_objects"]["marc_21_ctx"]).read
+    ctx = OpenURL::ContextObject.new_from_xml(xml)  
+    self.test_marc_values(ctx)    
+    ctx2 = OpenURL::ContextObject.new_from_xml(ctx.xml)
+    self.test_marc_values(ctx2)
+  end
+
+  # Had problems importing a record with an 'au' metadata author.
+  # Fixed it, so adding a test for it. 
+  def test_au
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    xml = File.new(data['context_objects']['scholarly_au_ctx']).read
+    ctx = OpenURL::ContextObject.new_from_xml(xml)
+
+    assert_equal( ctx.referent.metadata["title"], "The adventures of Tom Sawyer")
+    assert_equal( ctx.referent.metadata["au"], "Twain, Mark")
+  end
+  
+  def test_xml_output
+    require 'yaml'
+    require 'rexml/document'
+    data = YAML.load_file('test/test.yml')
+    ctx = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev"])
+    doc = REXML::Document.new(ctx.xml)
+    root = doc.root
+    assert_equal(root.name, "context-objects")
+    assert_equal(root.prefix, "ctx")
+    assert_equal(root.namespace('ctx'), "info:ofi/fmt:xml:xsd:ctx")
+    assert_equal(root.namespace('xsi'), "http://www.w3.org/2001/XMLSchema-instance")
+    xml_schema = root.attribute('schemaLocation')
+    assert_equal(xml_schema.value, "info:ofi/fmt:xml:xsd:ctx http://www.openurl.info/registry/docs/info:ofi/fmt:xml:xsd:ctx")
+    assert_equal(xml_schema.prefix, "xsi")
+    assert_equal(xml_schema.namespace, root.namespace(xml_schema.prefix))
+    ctx_obj = root.elements["ctx:context-object"]
+    assert(ctx_obj.is_a?(REXML::Element))
+    assert_equal(ctx_obj.attributes['timestamp'], '2003-04-11T10:08:30TZD')
+    assert_equal(ctx_obj.attributes['version'], 'Z39.88-2004')
+    assert_equal(ctx_obj.attributes['identifier'], '10_8')
+    rft = ctx_obj.elements["ctx:referent"]
+    assert(rft.is_a?(REXML::Element))
+    mbv = rft.elements['ctx:metadata-by-val']
+    assert(mbv.is_a?(REXML::Element))
+    fmt = mbv.elements['ctx:format']
+    assert(fmt.is_a?(REXML::Element))
+    assert_equal(fmt.get_text.value, "info:ofi/fmt:xml:xsd:book")
+    metadata = mbv.elements['ctx:metadata']
+    assert(metadata.is_a?(REXML::Element))
+    book = metadata.elements['rft:book']
+    assert(book.is_a?(REXML::Element))
+    assert_equal(book.namespace('rft'), "info:ofi/fmt:xml:xsd:book")
+    assert_equal(book.attribute('schemaLocation').value, "info:ofi/fmt:xml:xsd:book http://www.openurl.info/registry/docs/info:ofi/fmt:xml:xsd:book")
+    authors_cont = book.elements['rft:authors']
+    assert(authors_cont.is_a?(REXML::Element))
+    author_cont = authors_cont.elements['rft:author']
+    assert(author_cont.is_a?(REXML::Element))    
+    assert_equal(author_cont.elements['rft:aulast'].get_text.value, "Vergnaud")
+    assert_equal(author_cont.elements['rft:auinit'].get_text.value, "J.-R")
+    btitle = book.elements['rft:btitle']
+    assert(btitle.is_a?(REXML::Element))    
+    assert_equal(btitle.get_text.value, "Dépendances et niveaux de représentation en syntaxe")
+    genre = book.elements['rft:genre']
+    assert(genre.is_a?(REXML::Element))
+    assert_equal(genre.get_text.value, "book")
+    date = book.elements['rft:date']
+    assert(date.is_a?(REXML::Element))
+    assert_equal(date.get_text.value, "1985")    
+    pub = book.elements['rft:pub']
+    assert(pub.is_a?(REXML::Element))
+    assert_equal(pub.get_text.value, "Benjamins")    
+    place = book.elements['rft:place']
+    assert(place.is_a?(REXML::Element))
+    assert_equal(place.get_text.value, "Amsterdam, Philadelphia")  
+
+    rfe = ctx_obj.elements["ctx:referring-entity"]
+    assert(rfe.is_a?(REXML::Element))
+    mbv = rfe.elements['ctx:metadata-by-val']
+    assert(mbv.is_a?(REXML::Element))
+    fmt = mbv.elements['ctx:format']
+    assert(fmt.is_a?(REXML::Element))
+    assert_equal(fmt.get_text.value, "info:ofi/fmt:xml:xsd:book")
+    metadata = mbv.elements['ctx:metadata']
+    assert(metadata.is_a?(REXML::Element))
+    book = metadata.elements['rfe:book']
+    assert(book.is_a?(REXML::Element))
+    assert_equal(book.namespace('rfe'), "info:ofi/fmt:xml:xsd:book")
+    assert_equal(book.attribute('schemaLocation').value, "info:ofi/fmt:xml:xsd:book http://www.openurl.info/registry/docs/info:ofi/fmt:xml:xsd:book")
+    authors_cont = book.elements['rfe:authors']
+    assert(authors_cont.is_a?(REXML::Element))
+    author_cont = authors_cont.elements['rfe:author']
+    assert(author_cont.is_a?(REXML::Element))    
+    assert_equal(author_cont.elements['rfe:aulast'].get_text.value, "Chomsky")
+    assert_equal(author_cont.elements['rfe:auinit'].get_text.value, "N")
+    btitle = book.elements['rfe:btitle']
+    assert(btitle.is_a?(REXML::Element))    
+    assert_equal(btitle.get_text.value, "Minimalist Program")
+    genre = book.elements['rfe:genre']
+    assert(genre.is_a?(REXML::Element))
+    assert_equal(genre.get_text.value, "book")
+    date = book.elements['rfe:date']
+    assert(date.is_a?(REXML::Element))
+    assert_equal(date.get_text.value, "1995")    
+    pub = book.elements['rfe:pub']
+    assert(pub.is_a?(REXML::Element))
+    assert_equal(pub.get_text.value, "The MIT Press")    
+    place = book.elements['rfe:place']
+    assert(place.is_a?(REXML::Element))
+    assert_equal(place.get_text.value, "Cambridge, Mass")    
+    place = book.elements['rfe:place']
+    assert(place.is_a?(REXML::Element))
+    assert_equal(place.get_text.value, "Cambridge, Mass")        
+    isbn = book.elements['rfe:isbn']
+    assert(isbn.is_a?(REXML::Element))
+    assert_equal(isbn.get_text.value, "0262531283")       
+    id = rfe.elements['ctx:identifier']
+    assert(id.is_a?(REXML::Element))
+    assert_equal(id.get_text.value, "urn:isbn:0262531283")
+
+    rfr = ctx_obj.elements["ctx:referrer"]
+    assert(rfr.is_a?(REXML::Element))    
+    id = rfr.elements['ctx:identifier']
+    assert(id.is_a?(REXML::Element))
+    assert_equal(id.get_text.value, "info:sid/ebookco.com:bookreader") 
+    
+    svc = ctx_obj.elements["ctx:service-type"]
+    assert(svc.is_a?(REXML::Element))
+    mbv = svc.elements['ctx:metadata-by-val']
+    assert(mbv.is_a?(REXML::Element))
+    fmt = mbv.elements['ctx:format']
+    assert(fmt.is_a?(REXML::Element))
+    assert_equal(fmt.get_text.value, "info:ofi/fmt:xml:xsd:sch_svc")
+    metadata = mbv.elements['ctx:metadata']
+    assert(metadata.is_a?(REXML::Element))
+    abstract = metadata.elements['svc:abstract']
+    assert(abstract.is_a?(REXML::Element))
+    assert_equal(abstract.namespace('svc'), "info:ofi/fmt:xml:xsd:sch_svc")
+    
+    assert_equal(abstract.get_text.value, "yes")
+    #assert_match("svc_val_fmt=#{CGI.escape("info:ofi/fmt:kev:mtx:sch_svc")}", ctx.kev)
+    #assert_match("svc.abstract=yes", ctx.kev)    
+    
+    #xml = File.new(data["context_objects"]["xml_doc"]).read
+    #ctx = OpenURL::ContextObject.new_from_xml(xml)  
+    #self.test_xml_values(ctx)    
+  end
+
+
+  # deep_copy and import_context_object should NOT result in
+  # any shared objects between the two co's. 
+  def test_no_shared_objects_on_copy
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    ctx_orig = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev"])
+
+    ctx_deep_copied = ctx_orig.deep_copy
+
+    test_not_shared_objects( ctx_orig, ctx_deep_copied )
+
+    ctx_with_imported_data = 
+      OpenURL::ContextObject.new_from_context_object( ctx_orig )
+    
+    test_not_shared_objects( ctx_orig, ctx_with_imported_data )
+    
+  end
+
+  
+  # Make sure ctx1 and ctx2 don't share the same data objects.
+  # If they did, a change to one would change the other.
+  def test_not_shared_objects(ctx1, ctx2)
+    assert_not_equal( ctx1.referent.object_id, ctx2.referent.object_id );
+    assert_not_equal( ctx1.referent.metadata.object_id, ctx2.referent.metadata.object_id )
+    
+    original_ref_title = ctx1.referent.metadata['title']
+    new_title = "new test title"
+    # just ensure new uniqueness
+    new_title += original_ref_title if original_ref_title 
+    
+    ctx1.referent.set_metadata('title', new_title)
+
+    # That better not have changed ctx2
+
+    assert_not_equal( new_title, ctx2.referent.metadata['title'])
+    
+    # Now fix first title back to what it was originally, to have no
+    # side-effects
+    ctx1.referent.set_metadata('title', original_ref_title )
+  end
+    
+  
+  
+  def test_to_hash
+    require 'yaml'
+    kev = YAML.load_file('test/test.yml')["context_objects"]["kev"]
+
+    ctx = OpenURL::ContextObject.new_from_kev(kev)
+    rft_metadata = ctx.referent.metadata
+    rfe_metadata = ctx.referringEntity.metadata
+    hash = ctx.to_hash
+    
+    ["btitle", "genre", "aulast", "auinit", "date", "pub", "place"].each do | rft_key|
+      assert_equal( hash["rft." + rft_key], rft_metadata[rft_key])
+    end
+    
+    ["btitle", "genre", "aulast", "date", "pub", "place", "isbn"].each do |rfe_key|
+      assert_equal( hash ["rfe." + rfe_key], rfe_metadata[rfe_key])
+    end
+
+    assert_equal("yes", hash["svc.abstract"] )
+    
+    # ids end up as arrays
+    assert ( hash["rfr_id"].include?('info:sid/ebookco.com:bookreader'))
+    assert( hash["rfe_id"].include?("urn:isbn:0262531283") )
+
+    # Don't understand what this is supposed to be, not sure if this is right.
+    assert_equal( "info:ofi/fmt:kev:mtx:book", hash["rft_val_fmt"])
+    assert_equal("info:ofi/fmt:kev:mtx:book", hash["rfe_val_fmt"])
+
+
+    
+    assert_equal("info:ofi\/fmt:kev:mtx:ctx", hash["url_ctx_fmt"])
+    assert_equal("2003-04-11T10:08:30TZD", hash["ctx_tim"])
+    # Don't understand what this one means. 
+    assert_equal("10_8", hash["ctx_id"])
+    assert_match("Z39.88-2004", hash["ctx_ver"])
+    assert_match("info:ofi/enc:UTF-8", hash["ctx_enc"])
+  end
+
+
+  
+  def test_kev
+    require 'yaml'
+    data = YAML.load_file('test/test.yml')
+    ctx = OpenURL::ContextObject.new_from_kev(data["context_objects"]["kev"])
+    # Make sure the KEV output is displaying things properly
+    assert_match(/ctx_ver=Z39\.88\-2004/,ctx.kev)
+    assert_match("rft.btitle=#{CGI.escape("Dépendances et niveaux de représentation en syntaxe")}",ctx.kev)
+    assert_match("rfe.btitle=#{CGI.escape("Minimalist Program")}",ctx.kev)
+    assert_match("rft.genre=book",ctx.kev)
+    assert_match("rfe.genre=book",ctx.kev)
+    assert_match("rft.aulast=Vergnaud",ctx.kev)
+    assert_match("rfe.aulast=Chomsky",ctx.kev)
+    assert_match("rft.auinit=J.-R",ctx.kev)
+    assert_match("rfe.auinit=N",ctx.kev)
+    assert_match("rft.date=1985",ctx.kev)
+    assert_match("rfe.date=1995",ctx.kev)
+    assert_match("rft.pub=Benjamins",ctx.kev)
+    assert_match("rfe.pub=The+MIT+Press",ctx.kev)    
+    assert_match("rft.place=Amsterdam%2C+Philadelphia",ctx.kev)
+    assert_match("rfe.place=Cambridge%2C+Mass",ctx.kev)
+    assert_match("rfe_id=#{CGI.escape('urn:isbn:0262531283')}", ctx.kev)
+    assert_match("rfe.isbn=0262531283", ctx.kev)
+    assert_match("rfr_id=#{CGI.escape('info:sid/ebookco.com:bookreader')}", ctx.kev)    
+    assert_match("rft_val_fmt=#{CGI.escape("info:ofi/fmt:kev:mtx:book")}", ctx.kev)
+    assert_match("rfe_val_fmt=#{CGI.escape("info:ofi/fmt:kev:mtx:book")}", ctx.kev)
+    assert_match("svc_val_fmt=#{CGI.escape("info:ofi/fmt:kev:mtx:sch_svc")}", ctx.kev)
+    assert_match("svc.abstract=yes", ctx.kev)
+    assert_match("url_ctx_fmt=#{CGI.escape("info:ofi\/fmt:kev:mtx:ctx")}", ctx.kev)
+    assert_match("ctx_tim=#{CGI.escape("2003-04-11T10:08:30TZD")}",ctx.kev)
+    assert_match("ctx_id=10_8",ctx.kev)
+    assert_match("ctx_ver=Z39.88-2004",ctx.kev)
+    assert_match("ctx_enc=#{CGI.escape("info:ofi/enc:UTF-8")}", ctx.kev)
+  end
+  
+  def test_kev_values(ctx)    
+    assert_equal(ctx.referent.format, 'book')
+    assert_equal(ctx.referent.class, OpenURL::Book)
+    assert_equal(ctx.referent.metadata['btitle'], "Dépendances et niveaux de représentation en syntaxe")    
+    assert_equal(ctx.referent.metadata['genre'], 'book')
+    assert_equal(ctx.referent.metadata['aulast'], 'Vergnaud')
+    assert_equal(ctx.referent.metadata['auinit'], 'J.-R')
+    assert_equal(ctx.referent.metadata['date'], '1985')
+    assert_equal(ctx.referent.metadata['pub'], 'Benjamins')
+    assert_equal(ctx.referent.metadata['place'], "Amsterdam, Philadelphia")
+    assert_equal(ctx.referringEntity.identifier, 'urn:isbn:0262531283')
+    assert_equal(ctx.referringEntity.identifiers[0], 'urn:isbn:0262531283')
+    assert_equal(ctx.referringEntity.format, 'book')
+    assert_equal(ctx.referringEntity.class, OpenURL::Book)
+    assert_equal(ctx.referringEntity.metadata['genre'], 'book')  
+    assert_equal(ctx.referringEntity.metadata['aulast'], 'Chomsky')
+    assert_equal(ctx.referringEntity.metadata['auinit'], 'N')
+    assert_equal(ctx.referringEntity.metadata['btitle'], 'Minimalist Program')
+    assert_equal(ctx.referringEntity.metadata['isbn'], '0262531283')
+    assert_equal(ctx.referringEntity.metadata['date'], '1995')    
+    assert_equal(ctx.referringEntity.metadata['pub'], 'The MIT Press')
+    assert_equal(ctx.referringEntity.metadata['place'], 'Cambridge, Mass')
+    assert_equal(ctx.serviceType[0].format, 'sch_svc')
+    assert_equal(ctx.serviceType[0].metadata['abstract'], 'yes')
+    assert_equal(ctx.referrer.identifier, 'info:sid/ebookco.com:bookreader')
+    assert_equal(ctx.referrer.identifiers[0], 'info:sid/ebookco.com:bookreader')
+    
+    # Check administrative values
+    assert_equal(ctx.admin["ctx_tim"]["value"], "2003-04-11T10:08:30TZD")
+    assert_equal(ctx.admin["ctx_id"]["value"], "10_8")
+    assert_equal(ctx.admin["ctx_enc"]["value"], "info:ofi/enc:UTF-8")
+    assert_equal(ctx.admin["ctx_ver"]["value"], "Z39.88-2004")
+  end
+  
+  def test_kev_hybrid_values(ctx)    
+    assert(ctx.referrer.identifiers.index('info:sid/myid.com:mydb').is_a?(Fixnum))
+    assert(ctx.referent.identifiers.index('info:doi/10.1126/science.275.5304.1320').is_a?(Fixnum))
+    assert(ctx.referent.identifiers.index('info:pmid/9036860').is_a?(Fixnum))
+    assert_match(/info:doi\/10\.1126\/science\.275\.5304\.1320|info:pmid\/9036860/, ctx.referent.identifier)
+    assert_equal(ctx.referent.format, 'journal')
+    assert_equal(ctx.referent.metadata['atitle'], "Isolation of a common receptor for coxsackie B")    
+    assert_equal(ctx.referent.metadata['jtitle'], "Science")  
+    assert_equal(ctx.referent.metadata['genre'], 'article')
+    assert_equal(ctx.referent.metadata['aulast'], 'Bergelson')
+    assert_equal(ctx.referent.metadata['auinit'], 'J')
+    assert_equal(ctx.referent.metadata['date'], '1997')
+    assert_equal(ctx.referent.metadata['volume'], '275')
+    assert_equal(ctx.referent.metadata['spage'], '1320')
+    assert_equal(ctx.referent.metadata['epage'], '1323')
+    
+    # Check administrative values
+    assert_equal(ctx.admin["ctx_enc"]["value"], "info:ofi/enc:UTF-8")
+    assert_equal(ctx.admin["ctx_ver"]["value"], "Z39.88-2004")
+  end  
+  
+  def test_kev_01_values(ctx)    
+    assert(ctx.referrer.identifiers.index('info:sid/myid:mydb').is_a?(Fixnum))
+    assert(ctx.referent.identifiers.index('info:doi/10.1126/science.275.5304.1320').is_a?(Fixnum))    
+    assert(ctx.referent.identifiers.index('info:pmid/9036860').is_a?(Fixnum))    
+    assert_match(/info:doi\/10\.1126\/science\.275\.5304\.1320|info:pmid\/9036860/, ctx.referent.identifier)
+    assert_equal(ctx.referent.format, 'journal')
+    assert_equal(ctx.referent.metadata['atitle'], "Isolation of a common receptor for coxsackie B")    
+    assert_equal(ctx.referent.metadata['title'], "Science")  
+    assert_equal(ctx.referent.metadata['genre'], 'article')
+    assert_equal(ctx.referent.metadata['aulast'], 'Bergelson')
+    assert_equal(ctx.referent.metadata['auinit'], 'J')
+    assert_equal(ctx.referent.metadata['date'], '1997')
+    assert_equal(ctx.referent.metadata['volume'], '275')
+    assert_equal(ctx.referent.metadata['spage'], '1320')
+    assert_equal(ctx.referent.metadata['epage'], '1323')
+    
+    # Check administrative values
+    assert_equal(ctx.admin["ctx_enc"]["value"], "info:ofi/enc:UTF-8")
+    assert_equal(ctx.admin["ctx_ver"]["value"], "Z39.88-2004")
+  end    
+  
+  def test_xml_values(ctx)    
+    assert(ctx.referent.is_a?(OpenURL::Journal))
+    assert(ctx.referrer.identifiers.index('info:sid/metalib.com:PUBMED').is_a?(Fixnum))
+    assert(ctx.referent.identifiers.index('info:doi/10.1364/OL.29.000017').is_a?(Fixnum))
+    assert(ctx.referent.identifiers.index('info:pmid/14719646').is_a?(Fixnum))
+    assert_match(/info:doi\/10\.1364\/OL\.29\.000017|info:pmid\/14719646/, ctx.referent.identifier)
+    assert(ctx.referringEntity.identifiers.index('info:doi/10.1063/1.1968421').is_a?(Fixnum))
+    assert_equal(ctx.referent.format, 'journal')
+    assert_equal(ctx.referent.metadata['atitle'], "Temperature dependence of Brillouin frequency, power, and bandwidth in panda, bow-tie, and tiger polarization-maintaining fibers.")    
+    assert_equal(ctx.referent.metadata['stitle'], "Opt Lett")      
+    assert_equal(ctx.referent.metadata['jtitle'], "Optics letters")
+    assert_equal(ctx.referent.metadata['issn'], "0146-9592")
+    assert_equal(ctx.referent.metadata['aulast'], 'Yu')
+    assert_equal(ctx.referent.metadata['aufirst'], 'Qinrong')
+    assert_equal(ctx.referent.metadata['date'], '2004-12-31')
+    assert_equal(ctx.referent.metadata['volume'], '29')
+    assert_equal(ctx.referent.metadata['issue'], '1')
+    assert_equal(ctx.referent.metadata['pages'], '17/18')
+    assert_equal(ctx.referent.metadata['spage'], '17')
+    assert_equal(ctx.referent.metadata['epage'], '9')
+    assert_equal(ctx.referent.authors.length, 3)
+    assert_equal(ctx.referent.authors[1].aulast, "Bao")
+    assert_equal(ctx.referent.authors[2].aulast, "Chen")
+    assert_equal(ctx.referent.reference["format"], "http://www.metalib.com/by_ref_info.xsd")
+    assert_equal(ctx.referent.reference["location"], "http://www.metalib.com/V?func=get_doc&doc_number=00261648")
+    # Check administrative values
+    assert_equal(ctx.admin["ctx_tim"]["value"], "2004-01-16T12:13:00Z")
+    assert_equal(ctx.admin["ctx_id"]["value"], "123")
+    assert_equal(ctx.admin["ctx_enc"]["value"], "info:ofi/enc:UTF-8")
+    assert_equal(ctx.admin["ctx_ver"]["value"], "Z39.88-2004")
+  end   
+
+  def test_oai_dc_values(ctx)
+    assert(ctx.referent.is_a?(OpenURL::DublinCore))
+    assert_equal(ctx.referent.identifier, "info:doi/10.1086/508789")
+    assert_equal(ctx.referent.metadata["title"], ["Resurrection and Appropriation: Reputational Trajectories, Memory Work, and the Political Use of Historical Figures"])
+    assert_equal(ctx.referent.metadata["creator"], ["Robert S. Jansen"])
+    assert_equal(ctx.referent.publisher, ["The University of Chicago Press"])
+    assert_equal(ctx.referent.date, ["2007-02-27T13:27:58Z"])
+    assert_equal(ctx.referent.rights, ["&copy; 2007 by The University of Chicago. All rights reserved."])
+    assert_equal(ctx.referent.description, ["<P>The Zapatistas and Sandinistas both invoked historical figures in their rhetoric, but they did so in very different ways. This variation is explained by a model of path-dependent memory work that is sensitive to how previous memory struggles enable and constrain subsequent uses of historical figures. Specifically, previous struggles produce distinct reputational trajectories that condition the potential utility of different modes of memory work. The cases illustrate two reputational trajectories, which are situated within a broader field of mnemonic possibilities. This article offers a provisional baseline for comparing contested memory projects and supplies a framework for analyzing the opportunities and constraints by which reputational trajectories condition memory work. It builds on a recent processual emphasis in the collective memory literature and suggests that the contentious politics literature needs to historicize its conception of culture and take seriously the operation of constraints on symbolic work.</P>", "10.1086/508789"])
+    assert_equal(ctx.referent.source, ["American Journal of Sociology, Volume 112 (2007), P. 953-1007"])
+    assert_equal(ctx.referent.metadata["identifier"], ["http://www.journals.uchicago.edu/cgi-bin/resolve?id=doi:10.1086/508789"])
+    assert_equal(ctx.referent.metadata["format"], ["application/html/pdf"])
+    assert_equal(ctx.referent.metadata["lang"], ["English"])
+    assert_equal(ctx.referent.metadata["type"], ["journal article"])
+  end
+  
+  def test_marc_values(ctx)
+    assert(ctx.referent.is_a?(OpenURL::Marc))
+    assert(ctx.referent.marc.is_a?(MARC::Record))
+    assert_equal(ctx.referent.marc.leader, "01142cam  2200301 a 4500")
+    assert_equal(ctx.referent.marc['001'].value.strip, "92005291")
+  end
+
+
+    
+end
+