active-fedora 1.0.5 → 1.1.0

data/spec/integration/bug_spec.rb

@@ -0,0 +1,57 @@
+require File.join( File.dirname(__FILE__), "..", "spec_helper" )
+
+require 'active_fedora'
+require 'active_fedora/model'
+require "rexml/document"
+require 'ftools'
+require 'mocha'
+
+include ActiveFedora::Model
+include Mocha::Standalone
+
+describe 'bugs' do
+class FooHistory < ActiveFedora::Base
+  has_metadata :type=>ActiveFedora::MetadataDatastream, :name=>"someData" do |m|
+    m.field "fubar", :string
+    m.field "swank", :text
+  end
+  has_metadata :type=>ActiveFedora::MetadataDatastream, :name=>"withText" do |m|
+    m.field "fubar", :text
+  end
+end
+
+  before(:each) do
+    #Fedora::Repository.instance.stubs(:nextid).returns("foo:pid")
+    @test_object = FooHistory.new
+    @test_object.save
+  end
+  after(:each) do
+    @test_object.delete
+  end
+  it "should not clobber everything when setting a value" do
+    @test_object.datastreams["someData"].fubar_values.should == []
+    @test_object.datastreams["someData"].should_not be_nil
+    @test_object.datastreams["someData"].fubar_values=['bar']
+    @test_object.datastreams["someData"].fubar_values.should == ['bar']
+    @test_object.save
+
+    @test_object.pid.should_not be_nil
+
+    x = *FooHistory.find(@test_object.pid)
+    x.datastreams["someData"].fubar_values.should == ['bar']
+    x.datastreams['someData'].dirty?.should == false
+    x.datastreams['someData'].fubar_values = ["meh"]
+    x.datastreams['someData'].fubar_values.should == ["meh"]
+    x.datastreams['someData'].dirty?.should == true
+    x.save
+    x = *FooHistory.find(@test_object.pid)
+    x.datastreams['someData'].fubar_values.should == ["meh"]
+    x.save
+  end
+  it "should update the index, even if there is no metadata" do
+    pending
+    oh = FooHistory.new
+    oh.save
+  end
+
+end

data/spec/integration/datastream_spec.rb

@@ -0,0 +1,60 @@
+require File.join( File.dirname(__FILE__), "../spec_helper" )
+
+require 'active_fedora'
+require "rexml/document"
+require 'ftools'
+
+describe ActiveFedora::Datastream do
+  
+  before(:each) do
+    @test_object = ActiveFedora::Base.new
+    puts @test_object.inspect
+    @test_object.save
+  end
+  
+  after(:each) do
+    @test_object.delete
+  end
+  
+  it "should be able to access Datastreams using datastreams method" do    
+    dc = @test_object.datastreams["DC"]
+    dc.should be_an_instance_of(ActiveFedora::Datastream)
+    dc.attributes.should be_an_instance_of(Hash)
+    dc.attributes["dsid"].to_s.should eql("DC")
+    dc.attributes[:pid].should_not be_nil
+    # dc.control_group.should == "X"
+  end
+  
+  it "should be able to access Datastream content using content method" do    
+    dc = @test_object.datastreams["DC"].content
+    dc.should_not be_nil
+  end
+  
+  it "should be able to update XML Datastream content and save to Fedora" do    
+    xml_content =REXML::Document.new(@test_object.datastreams["DC"].content)
+    title = REXML::Element.new "dc:title"
+    title.text = "Test Title"
+    xml_content.root.elements << title
+    
+    @test_object.datastreams["DC"].content = xml_content.to_s
+    @test_object.datastreams["DC"].save
+    
+    @test_object.datastreams["DC"].content.should eql(Fedora::Repository.instance.fetch_custom(@test_object.pid, "datastreams/DC/content"))
+  end
+  
+  it "should be able to update Blob Datastream content and save to Fedora" do    
+    dsid = "ds#{Time.now.to_i}"
+    ds = ActiveFedora::Datastream.new(:dsID => dsid, :dsLabel => 'hello', :altIDs => '3333', 
+      :controlGroup => 'M', :blob => fixture('dino.jpg'))
+    File.identical?(ds.blob, fixture('dino.jpg')).should be_true
+    @test_object.add_datastream(ds).should be_true
+    @test_object.save
+    to = ActiveFedora::Base.load_instance(@test_object.pid) 
+    to.should_not be_nil 
+    to.datastreams[dsid].should_not be_nil
+    # to.datastreams[dsid].control_group.should == "M"
+    to.datastreams[dsid].content.length.should eql(fixture('dino.jpg').read.length)
+    
+  end
+  
+end

data/spec/integration/datastreams_crud_spec.rb

@@ -0,0 +1,208 @@
+require File.join( File.dirname(__FILE__),  "../spec_helper" )
+# Datastream API:
+#  - To list datastream
+#    curl -i http://localhost:8080/fedora/objects/test:02/datastreams
+#    curl -i http://localhost:8080/fedora/objects/test:02/datastreams?format=xml
+#    
+#    invalid: curl -i http://localhost:8080/fedora/objects/test:02/datastreams.xml
+#    
+#  - To obtain a datastream
+#    curl -i http://localhost:8080/fedora/objects/test:02/datastreams/DC
+#    curl -i http://localhost:8080/fedora/objects/test:02/datastreams/DS1
+# 
+#  - To create create a new datastream
+#  
+#  regular post (always creates inline (I) datastream.  Will fail if not valid XML):
+#    curl -i -H "Content-type: text/xml" -XPOST --data-binary @build.xml -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:02/datastreams/DS1?dsLabel=A%20Test%20Datastream&altIDs=3333" 
+# 
+#  "E" and "R" datastreams
+#    curl -i -H "Content-type: text/html" -XPOST "http://localhost:8080/fedora/objects/test:02/datastreams/REDIRECT?dsLabel=A%20Redirect%20Datastream&altIDs=3333&controlGroup=R&dsLocation=http://www.yourmediashelf.com" -u fedoraAdmin:fedoraAdmin
+#    curl -i -H "Content-type: text/html" -XPOST "http://localhost:8080/fedora/objects/test:02/datastreams/EXT?dsLabel=A%20Ext%20Datastream&altIDs=3333&controlGroup=E&dsLocation=http://www.yahoo.com" -u fedoraAdmin:fedoraAdmin   
+#    
+#  multipart/form-data (always creates managed content (M) datastream):
+#    curl -i -H -XPOST -F file=@build.xml -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:02/datastreams/DS3?dsLabel=hello&altIDs=3333" 
+#    curl -i -H -XPOST -F file=@dino.jpg -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:02/datastreams/JPEG?dsLabel=hello&altIDs=3333" 
+#  MIME Type is set according to Content Type Header:
+#    curl -i -H -XPOST -F "file=@01 Float On.m4a;type=audio/mp4a-latm"  -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:02/datastreams/Float_On.m4a?dsLabel=hello&altIDs=3333" 
+#    curl -i -H -XPOST -F "file=@educause2004Fedora.ppt;type=application/vnd.ms-powerpoint"  -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:02/datastreams/PPT.ppt?dsLabel=hello&altIDs=3333" 
+#  
+#  mutipart/related is also supported but can only be tested with xform clients.
+#  
+#  - To update a datastream
+#    curl -i -H "Content-type: text/xml" -XPUT "http://localhost:8080/fedora/objects/test:02/datastreams/DS1?dsLabel=hello&altIDs=3333" --data-binary @build.xml -u fedoraAdmin:fedoraAdmin
+#    curl -i -H "Content-type: text/xml" -XPOST "http://localhost:8080/fedora/objects/test:02/datastreams/DS1?dsLabel=hello&altIDs=3333" --data-binary @build.xml -u fedoraAdmin:fedoraAdmin
+#   
+#  - To delete a datastream 
+#    curl -i -XDELETE "http://localhost:8080/fedora/objects/test:02/datastreams/DS1" -u fedoraAdmin:fedoraAdmin
+# 
+#    curl -i -H -XPOST -F file=@test/fixtures/minivan-in-minneapolis.jpg  -u fedoraAdmin:fedoraAdmin "http://localhost:8080/fedora/objects/test:test_xml_post/datastreams/FOO" 
+# 
+#    curl -i -XDELETE -u admin:muradora "http://localhost:9090/fedora/objects/test:test:test_object_1" 
+#  
+#    curl -i -H "Content-type: text/xml" -XPOST --data-binary @test/fixtures/mods-mskcc-filledsample.xml -u fedoraAdmin:fedoraAdmin "http://localhost:9090/fedora/objects/test:02/datastreams/DS1?dsLabel=A%20Test%20Datastream" 
+# 
+#    curl -i -H "Content-type: image/jpeg" -XPOST -F file=@test/fixtures/dino.jpg -u admin:muradora "http://localhost:9090/fedora/objects/test:02/datastreams/DINO?dsLabel=A%20Test%20Datastream"
+describe Fedora::Repository do
+  def sample_mods
+    xml = <<-EOS
+    <mods:mods xmlns:xlink="http://www.w3.org/1999/xlink" version="3.2"
+        xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:mods="http://www.loc.gov/mods/v3"
+        xsi:schemaLocation="http://www.loc.gov/mods/v3 http://www.loc.gov/standards/mods/v3/mods-3-2.xsd"
+        xmlns="http://www.w3.org/1999/xhtml">
+        <mods:identifier>mskcc:2045</mods:identifier>
+        <mods:titleInfo authority="" displayLabel="">
+            <mods:title>Sample Title</mods:title>
+            <mods:subTitle>Sample SubTitle</mods:subTitle>
+        </mods:titleInfo>
+        <mods:name type="personal" authority="" ID="owner">
+        	<mods:namePart type="family">Smith</mods:namePart>
+    	<mods:namePart type="given">John</mods:namePart>
+    	<mods:namePart type="termsOfAddress">Mr.</mods:namePart>
+             <mods:affiliation>Surgery</mods:affiliation>
+            <mods:role>
+                <mods:roleTerm type="text" authority="">Owner</mods:roleTerm>
+            </mods:role>
+        </mods:name>
+        <mods:name type="personal" authority="non-owner">
+        	<mods:namePart type="family">Rushdie</mods:namePart>
+    	<mods:namePart type="given">Salman</mods:namePart>
+    	<mods:namePart type="termsOfAddress">Mr.</mods:namePart>
+             <mods:affiliation>Surgery</mods:affiliation>
+            <mods:role>
+                <mods:roleTerm type="text" authority="">Contributor</mods:roleTerm>
+            </mods:role>
+        </mods:name>
+        <mods:originInfo>
+            <mods:place>
+                <mods:placeTerm type="text">Sample Place of Creation</mods:placeTerm>
+            </mods:place>
+            <mods:publisher>MSKCC</mods:publisher>
+            <mods:dateIssued encoding="" keydate="" qualifier="" point=""/>
+            <mods:dateCreated encoding="" keydate="" qualifier="" point=""/>
+            <mods:dateModified encoding="" keydate="" qualifier="" point=""/>
+            <mods:copyrightDate encoding="" keydate="" qualifier="" point=""/>
+            <mods:dateOther encoding="" keydate="" qualifier="" point=""/>
+        </mods:originInfo>
+        <mods:abstract displayLabel="" type=""></mods:abstract>
+        <mods:note type=""/>
+        <mods:subject authority="lcsh">
+            <mods:topic>carcinoma</mods:topic>
+            <mods:topic>adinoma</mods:topic>
+         </mods:subject>
+        <!-- part, extension -->
+    </mods:mods>    
+    EOS
+  end
+  
+  before(:all) do
+    Fedora::Repository.register(ActiveFedora.fedora_config[:url])
+    @fedora = Fedora::Repository.instance
+  end
+
+  before(:each) do
+    @test_object = Fedora::FedoraObject.new(:label => 'test', 
+      :contentModel => 'Image',
+      :state => 'A',
+      :ownerID => 'fedoraAdmin')
+
+    @fedora.save(@test_object).should be_true
+  end
+  
+  after(:each) do
+    @fedora.delete(@test_object).should be_true
+  end
+  
+  def fetch_content(pid, dsID)
+    content = @fedora.fetch_content("#{pid}/datastreams/#{dsID}/content")
+  end
+  
+  it "should create/update xml datastream" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo', :altIDs => '3333', 
+      :blob => sample_mods)
+    @fedora.save(ds).should be_true
+    
+    ds.attributes[:dsLabel] = 'bar'
+    @fedora.save(ds).should be_true
+  end
+
+  it "should be able to save file objects" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'hello', :altIDs => '3333', 
+      :controlGroup => 'M', :blob => fixture('dino.jpg'))
+      
+    ds.control_group.should == 'M'
+    @fedora.save(ds).should be_true
+  end
+
+  it "should be able to save StringIO objects" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'hello', :altIDs => '3333', :controlGroup => 'M', :blob => StringIO.new("hi there"))
+      
+    @fedora.save(ds).should be_true
+end
+  
+  it "should create/update image/file datastream" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'hello', :altIDs => '3333', 
+      :controlGroup => 'M', :blob => fixture('dino.jpg'))
+      
+    @fedora.save(ds).should be_true
+    
+    content = fetch_content(@test_object.pid, 'DS1')
+    content.content_type.should == 'image/jpeg'
+        
+    ds.blob = fixture('minivan.jpg')
+    @fedora.save(ds).should be_true
+  end
+
+  it "should set controlGroup to 'M' if mimeType is specified" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo',
+      :mimeType => 'text/plain', :blob => "This is plain text")
+  end
+  
+  it "should create datastream with custom mimeType for text blob" do
+    blob = "This is plain text"
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo',
+      :mimeType => 'text/plain', :blob => blob)
+    @fedora.save(ds).should be_true
+    
+    content = @fedora.fetch_content("#{@test_object.pid}/datastreams/DS1/content")
+    content.should == blob
+    content.content_type.should == 'text/plain'
+  end
+  
+  it "should create datastream with custom mimeType for file blob" do
+    blob = "This is plain text"
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo',
+      :mimeType => 'image/jpeg', :blob => fixture('dino.jpg'))
+    @fedora.save(ds).should be_true
+    
+    content = fetch_content(@test_object.pid, "DS1")
+    content.content_type.should == 'image/jpeg'
+  end
+  
+  it "should delete datastream by ref" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo', :altIDs => '3333', :blob => sample_mods)
+    @fedora.save(ds).should be_true
+    @fedora.delete(ds).should be_true
+  end
+  
+  it "should delete datastream by uri" do
+    ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DS1', :dsLabel => 'foo', :altIDs => '3333', :blob => sample_mods)
+    @fedora.save(ds).should be_true    
+    @fedora.delete(ds.uri).should be_true
+  end
+  
+  it "should fetch thumbnail jpg for Image of Coliseum in Rome" do
+    # Have to check for two possible sizes because the image size changed between Fedora 3.0 and Fedora 3.1
+    fetch_content("demo:26", "TEI_SOURCE").length.should satisfy{ |l| l == 1098 || 1086}
+  end
+  
+  describe ".label" do
+    it "should apply to the dsLabel when you save the datastream" do 
+      ds = Fedora::Datastream.new(:pid => @test_object.pid, :dsID => 'DSLabelTest', :blob => sample_mods)
+      ds.label = "My Test dsLabel"
+      @fedora.save(ds)
+      object_rexml = REXML::Document.new(@test_object.object_xml)
+      #puts object_rexml.root.elements["foxml:datastream[@ID='DSLabelTest']/foxml:datastreamVersion"].inspect
+      object_rexml.root.elements["foxml:datastream[@ID='DSLabelTest']/foxml:datastreamVersion[last()]"].attributes["LABEL"].should == ds.label
+    end
+  end
+end

data/spec/integration/fedora_object_spec.rb

@@ -0,0 +1,77 @@
+require File.join( File.dirname(__FILE__), "../spec_helper" )
+
+require 'active_fedora'
+
+#
+# This is moving towards replacing the ActiveFedora::Base class with an ActiveFedora::FedoraObject module.
+# => Work put on hold 01 October 2008 to wait for re-implementation of Fedora::Repository as a singleton
+#
+
+
+describe ActiveFedora::FedoraObject do
+  
+  before :all do
+    class Fobject
+      include ActiveFedora::FedoraObject
+    end
+  end
+  
+  before(:each) do
+    @test_object = Fobject.new
+  end
+  
+  after(:each) do
+    @test_object.delete
+  end
+  
+  it "calling constructor should create a new Fedora Object" do    
+    @test_object.should have(0).errors
+    @test_object.pid.should_not be_nil
+  end
+  
+  it "should return an Hash of the objects datastreams" do
+    datastreams = @test_object.datastreams
+    datastreams.should be_an_instance_of(Hash) 
+    @test_object.datastreams["DC"].should be_an_instance_of(ActiveFedora::Datastream)
+    datastreams["DC"].should_not be_nil
+    datastreams["DC"].should be_an_instance_of(ActiveFedora::Datastream)       
+    #datastreams["DC"].should be_an_instance_of(Hash)   
+  end
+  
+  it "should expose the DC datastream using dc method" do
+    dc = @test_object.dc
+    dc.should be_an_instance_of(ActiveFedora::Datastream)
+    rexml = REXML::Document.new(dc.content)
+    rexml.root.elements["dc:identifier"].get_text.should_not be_nil
+    #rexml.elements["dc:identifier"].should_not be_nil
+  end
+  
+  it 'should respond to #rels_ext' do
+    @test_object.should respond_to(:rels_ext)
+  end
+  
+  describe '#rels_ext' do
+    it 'should create the RELS-EXT datastream if it doesnt exist' do
+      mocker = mock("rels-ext")
+      ActiveFedora::RelsExtDatastream.expects(:new).returns(mocker)
+      @test_object.expects(:add).with(mocker)
+      # Make sure the RELS-EXT datastream does not exist yet
+      @test_object.datastreams["RELS-EXT"].should == nil
+      @test_object.rels_ext
+      # Assume that @test_object.add actually does its job and adds the datastream to the datastreams array.  Not testing that here.
+    end
+    
+    it 'should return the RelsExtDatastream object from the datastreams array' do
+      @test_object.expects(:datastreams).returns({"RELS-EXT" => "foo"}).at_least_once
+      @test_object.rels_ext.should == "foo"
+    end
+  end
+  
+  it "should be able to add datastreams" do
+    ds = ActiveFedora::Datastream.new(:dsID => 'ds1.jpg', :dsLabel => 'hello', :altIDs => '3333', 
+      :controlGroup => 'M', :blob => fixture('dino.jpg'))
+    @test_object.add_datastream(ds).should be_true
+    @test_object.save.should be_true
+  end
+
+end

data/spec/integration/full_featured_model_spec.rb

@@ -0,0 +1,207 @@
+require File.join( File.dirname(__FILE__), "../spec_helper" )
+
+require 'rexml/document'
+
+include ActiveFedora
+
+describe ActiveFedora::Base do
+
+  before(:all) do
+    class OralHistory < ActiveFedora::Base
+        #include Model
+
+        # Imitating DataMapper ...
+
+        has_relationship "parts", :is_part_of, :inbound => true
+        
+        # These are all the properties that don't quite fit into Qualified DC
+        # Put them on the object itself (in the properties datastream) for now.
+        has_metadata :name => "properties", :type => ActiveFedora::MetadataDatastream do |m|
+          m.field "narrator",  :string
+          m.field "interviewer", :string
+          m.field "transcript_editor", :text
+          m.field "bio", :string
+          m.field "notes", :text
+          m.field "hard_copy_availability", :text
+          m.field "hard_copy_location", :text
+          m.field "other_contributor", :string
+          m.field "restrictions", :text
+          m.field "series", :string
+          m.field "location", :string
+        end
+        
+        has_metadata :name => "dublin_core", :type => ActiveFedora::QualifiedDublinCoreDatastream do |m|
+          # Default :multiple => true
+          #
+          # on retrieval, these will be pluralized and returned as arrays
+          # ie. subject_entries = my_oral_history.dublin_core.subjects
+          #
+          # aimint to use method-missing to support calling methods like
+          # my_oral_history.subjects  OR   my_oral_history.titles  OR EVEN my_oral_history.title whenever possible
+          
+          # Setting new Types for dates and text content
+          m.field "creation_date", :date, :xml_node => "date"
+          m.field "abstract", :text, :xml_node => "abstract"
+          m.field "rights", :text, :xml_node => "rights"
+          
+          # Setting up special named fields
+          m.field "subject_heading", :string, :xml_node => "subject", :encoding => "LCSH" 
+          m.field "spatial_coverage", :string, :xml_node => "spatial", :encoding => "TGN"
+          m.field "temporal_coverage", :string, :xml_node => "temporal", :encoding => "Period"
+          m.field "type", :string, :xml_node => "type", :encoding => "DCMITYPE"
+          m.field "alt_title", :string, :xml_node => "alternative"
+        end
+        
+        has_metadata :name => "significant_passages", :type => ActiveFedora::MetadataDatastream do |m|
+          m.field "significant_passage", :text
+        end
+        
+        has_metadata :name => "sensitive_passages", :type => ActiveFedora::MetadataDatastream do |m|
+          m.field "sensitive_passage", :text
+        end
+
+    end
+    sample_location = "Boston, Massachusetts"
+    sample_notes = 'Addelson, Frances. (1973?) “The Induced Abortion,” American Journal of Ortho-Psychiatry,  Addelson, Frances. “Abortion: Source of Guilt or Growth,” National Journal of Gynecology and Obstetrics., Addelson, Frances. “First Zionist Novel,” Jewish Frontier.'
+    sample_other_contributor = 'any other contributors, people or corporate names (eg. Temple Israel)'
+    sample_transcript_editor = 'Siegel, Cheryl'
+    sample_hard_copy_availability = <<-END
+    Yes, please contact the Jewish Women\\\'s Archive for more information on using this source.
+    END
+    sample_narrator = 'Addelson, Frances'
+    sample_bio = <<-END
+    Rochelle Ruthchild interviewed Frances Addleson on October 18, November 14, and December 10, 1997.   The interview thoroughly examined the trajectory of Frances’ life from birth until the time of the interview. As a young child, Frances’ father died during the influenza epidemic, and her mother was not equipped to care for her and her siblings.  Consequently, they were placed in a Jewish foster home. Although her experience was mostly positive, this experience would leave life-long effects.  Frances attended Radcliffe upon the urging of a mentor and later obtained her Master’s degree in social work from Simmons College in 1954.  In the 1940’s, she returned to work while her children were still young; a rather unusual event for that time period.  While working as a social worker at Beth Israel Hospital in the early 1970’s, she helped counsel countless women who came to the hospital seeking abortions before the procedure was officially legalized during the landmark Roe vs. Wade decision in 1973.  Frances would later write two articles that were published in medical journals about her experience during this time.  Although not a very religious person, Frances felt connected to the Jewish notion of social justice and remained very active until an accident in the late 1990’s.
+    END
+    sample_interviewer = "Ruthchild, & Rochelle"
+    
+    @properties_sample_values2 = Hash[:narrator => "Narrator1 & Narrator2", :interviewer => "Interviewer", :transcript_editor => "Transcript Editor", :bio => "Biographic info", 
+                                    :notes => "My Note\\\'s a good one", :hard_copy_availability => "Yes", :hard_copy_location => "Archives", :other_contributor => "Sally Ride", 
+                                    :restrictions => "None", :series => "My Series", :location => "location"]
+    
+    @properties_sample_values = Hash[:narrator => sample_narrator, :interviewer => sample_interviewer, :transcript_editor => sample_transcript_editor, :bio => sample_bio, 
+                                    :notes => sample_notes, :hard_copy_availability => sample_hard_copy_availability, :hard_copy_location => "Archives", :other_contributor => sample_other_contributor, 
+                                    :restrictions => "None", :series => "My Series", :location => sample_location]
+
+    @dublin_core_sample_values = Hash[:creator => 'Matt && McClain', :publisher => 'Jewish Women\\\'s Archive', :description => "description", :identifier => "jwa:sample_pid", 
+                                    :title => "title", :alt_title => "alt_title", :subject => "subject", :subject_heading => "subject heading", 
+                                    :creation_date => "2008-07-02T05:09:42.015Z", :language => "language", :spatial_coverage => "spatial coverage", 
+                                    :temporal_coverage => "temporal coverage", :abstract => "abstract", :rights => "rights", :type => "type", :extent => "extent", 
+                                    :format => "format", :medium => "medium"]
+    @signigicant_passages_sample_values = {}
+    @sensitive_passages_sample_values = {}     
+    @sample_xml = "<xml><fields><system_create_date>REMOVED</system_create_date><system_modified_date>REMOVED</system_modified_date><active_fedora_model_s>OralHistory</active_fedora_model_s><id>changeme:14527</id><subject_heading>subject heading</subject_heading><type>type</type><rights>rights</rights><publisher>publisher</publisher><creation_date>creation date</creation_date><identifier>jwa:sample_pid</identifier><format>format</format><extent>extent</extent><language>language</language><description>description</description><title>title</title><medium>medium</medium><spatial_coverage>spatial coverage</spatial_coverage><alt_title>alt_title</alt_title><temporal_coverage>temporal coverage</temporal_coverage><subject>subject</subject><creator>creator</creator><abstract>abstract</abstract><other_contributor>Sally Ride</other_contributor><transcript_editor>Transcript Editor</transcript_editor><restrictions>None</restrictions><bio>Biographic info</bio><series>My Series</series><notes>My Note</notes><location>location</location><hard_copy_availability>Yes</hard_copy_availability><narrator>Narrator</narrator><hard_copy_location>Archives</hard_copy_location><interviewer>Interviewer</interviewer></fields><content/></xml>"
+               
+  end  
+  
+  before(:each) do
+    @test_history = OralHistory.new
+  end
+  
+  after(:each) do
+  end
+  
+  after(:all) do
+    Object.send(:remove_const, :OralHistory)
+  end
+  
+  it "should be an instance of ActiveFedora::Base" do
+    @test_history.should be_kind_of(ActiveFedora::Base)
+  end
+  
+  it "should reflect all of the metadata fields" do
+    pending
+    properties_ds = @test_history.datastreams["properties"]
+    dublin_core_ds = @test_history.datastreams["dublin_core"]
+    
+    @properties_sample_values.each do |field, value|
+      properties_ds.send("#{field.to_s}_values=",value)
+    end
+    
+    @dublin_core_sample_values.each do |field, value|
+      dublin_core_ds.send("#{field.to_s}_values=",[value])
+    end
+    
+    @test_history.save
+    
+    retrieved_obj = OralHistory.find(@test_history.pid)
+    retrieved_obj.inner_object.should_not be_new_object
+    
+  end
+
+  it "t1" do# should load all of the metadata fields from fedora xml" do
+    pending
+    properties_ds = @test_history.datastreams["properties"]
+    dublin_core_ds = @test_history.datastreams["dublin_core"]
+    
+    
+    @properties_sample_values.each do |field, value|
+      properties_ds.send("#{field.to_s}_values=", [value])
+    end
+    
+    @dublin_core_sample_values.each do |field, value|
+      dublin_core_ds.send("#{field.to_s}_values=", [value])
+    end
+    
+    @test_history.save
+    
+    @retrieved_history = OralHistory.find(@test_history.pid).first
+    retrieved_properties_ds = @retrieved_history.datastreams["properties"]
+    retrieved_dublin_core_ds = @retrieved_history.datastreams["dublin_core"]
+    retrieved_properties_ds.should_not be_nil
+    retrieved_dublin_core_ds.should_not be_nil
+    @properties_sample_values.each do |field, value|
+      retrieved_properties_ds.send("#{field.to_s}_values").should == [value]
+    end
+    
+    @dublin_core_sample_values.each do |field, value|
+      retrieved_dublin_core_ds.send("#{field.to_s}_values").should == [value]
+    end    
+  end
+    
+  it "should push all of the metadata fields into solr" do
+    # TODO: test must test values using solr symbol names (ie. _field, _text and _date)
+    properties_ds = @test_history.datastreams["properties"]
+    dublin_core_ds = @test_history.datastreams["dublin_core"]
+        
+    @properties_sample_values.each_pair do |field, value|
+      properties_ds.send("#{field.to_s}_values=", [value])
+    end
+    
+    @dublin_core_sample_values.each_pair do |field, value|
+      dublin_core_ds.send("#{field.to_s}_values=", [value])
+    end
+    
+    @test_history.save
+    
+    @solr_result = OralHistory.find_by_solr(@test_history.pid).hits[0]
+    puts @solr_result.inspect 
+    @properties_sample_values.each_pair do |field, value|
+      (@solr_result["#{field.to_s}_t"] || @solr_result["#{field.to_s}_dt"]).should == [value] 
+    end
+    
+    @dublin_core_sample_values.each_pair do |field, value|
+      dublin_core_ds.send("#{field.to_s}_values").should == [value]
+    end    
+  end
+  
+  it "should have Qualified Dublin core, with custom accessors" do
+    
+    #xml = REXML::Document.new(@test_history.to_xml.to_s)
+    dublin_core_ds = @test_history.datastreams["dublin_core"]
+    
+    dublin_core_ds.subject_heading_values = "My Subject Heading"
+    dc_xml = REXML::Document.new(dublin_core_ds.to_dc_xml)
+    
+    dc_xml.root.elements["dcterms:subject"].text.should == "My Subject Heading"
+    dc_xml.root.elements["dcterms:subject"].attributes["xsi:type"].should == "LCSH"
+    
+  end
+  
+  describe '#new' do
+    it "should support custom pids" do
+      oh = OralHistory.new(:pid=>"uuid:blah-blah-blah")
+      oh.pid.should == "uuid:blah-blah-blah"
+    end
+  end
+  
+end