cc2html 0.0.1

data/lib/ims/cc/manifest.rb

@@ -0,0 +1,59 @@
+module IMS::CC
+  class Manifest
+    include HappyMapper
+
+    attr_accessor :cartridge_zip_file, :manifest_file
+
+    tag 'manifest'
+    has_one :metadata, Metadata
+    has_one :organizations, IMS::CC::Organizations::Organizations
+    has_one :resources, IMS::CC::Resources::Resources
+
+    def self.read(backup_file)
+      if File.extname(backup_file) == ".xml"
+        manifest = parse File.read(backup_file)
+        manifest.manifest_file = backup_file
+        manifest.post_process
+        manifest
+      else
+        Zip::File.open(backup_file) do |zipfile|
+          entry = zipfile.get_entry("imsmanifest.xml")
+          xml = entry.get_input_stream.read
+          manifest = parse xml
+          manifest.cartridge_zip_file = backup_file
+          manifest.post_process
+          manifest
+        end
+      end
+    end
+
+    def post_process
+      parse_references
+      connect_resources_to_org_item
+    end
+
+    def connect_resources_to_org_item
+      self.organizations.organization.item.items.each do |item|
+        next unless item.identifierref
+        if res = self.resources.find_by_identifier(item.identifierref)
+          item.resource = res
+        end
+      end
+    end
+
+    def parse_references
+      if self.cartridge_zip_file
+        Zip::File.open(self.cartridge_zip_file) do |zipfile|
+          self.resources.resources.each do |res|
+            if res.parseable_type? && !res.inline?
+              entry = zipfile.get_entry(res.reference_href)
+              xml = entry.get_input_stream.read
+              res.parse_reference(xml)
+            end
+          end
+        end
+      end
+    end
+
+  end
+end

data/lib/ims/cc/metadata.rb

@@ -0,0 +1,10 @@
+module IMS::CC
+  class Metadata
+    include HappyMapper
+
+    tag 'metadata'
+    element :schema, String
+    element :schemaversion, String
+    has_one :lom, IMS::CC::Lom::Lom
+  end
+end

data/lib/ims/cc/organizations.rb

@@ -0,0 +1,37 @@
+module IMS::CC
+module Organizations
+
+  class Item
+    include HappyMapper
+    tag 'item'
+    attr_accessor :resource
+
+    attribute :identifier, String
+    attribute :identifierref, String
+    element :title, String
+
+    has_many :items, Item
+  end
+
+  class Organization
+    include HappyMapper
+    tag 'organization'
+
+    attribute :identifier, String
+    attribute :structure, String
+    has_one :item, Item
+  end
+
+  class Organizations
+    include HappyMapper
+    tag 'organizations'
+
+    has_one :organization, Organization
+
+    def find_item_by_identifier(id)
+      self.organization.item.items.find{|i| i.identifier == id}
+    end
+  end
+
+end
+end

data/lib/ims/cc/resources.rb

@@ -0,0 +1,71 @@
+module IMS::CC
+module Resources
+
+  class File
+    include HappyMapper
+    tag 'file'
+
+    attribute :href, String
+  end
+
+  class Dependency
+    include HappyMapper
+    tag 'dependency'
+
+    attribute :identifierref, String
+  end
+
+  class Resource
+    PARSABLE_TYPES = /imsdt|imswl|assignment/
+    include HappyMapper
+    tag 'resource'
+
+    attribute :identifier, String
+    attribute :type, String
+    attribute :href, String
+    attribute :intendeduse, String
+
+    has_many :files, File
+    has_many :dependencies, Dependency
+    has_one :topic, IMS::CC::Topic
+    has_one :web_link, IMS::CC::WebLink
+    has_one :assignment, IMS::CC::Assignment::Assignment
+
+    def inline?
+      !!(self.files.count == 0 && (self.topic || self.web_link))
+    end
+
+    def parseable_type?
+      !!(self.type =~ PARSABLE_TYPES)
+    end
+
+    def reference_href
+      return if inline?
+      self.files.first.href
+    end
+
+    def parse_reference(xml)
+      case self.type
+        when /imsdt/
+          self.topic = IMS::CC::Topic.parse(xml)
+        when /imswl/
+          self.web_link = IMS::CC::WebLink.parse(xml)
+        when /assignment/
+          self.assignment = IMS::CC::Assignment::Assignment.parse(xml)
+      end
+    end
+  end
+
+  class Resources
+    include HappyMapper
+    tag 'resources'
+
+    has_many :resources, Resource
+
+    def find_by_identifier(id)
+      resources.find {|r|r.identifier == id}
+    end
+  end
+
+end
+end

data/lib/ims/cc/topic.rb

@@ -0,0 +1,14 @@
+module IMS::CC
+  class Topic
+    include HappyMapper
+    #register_namespace('http://www.imsglobal.org/xsd/imsccv1p3/imsdt_v1p3', 'dt3')
+    #register_namespace('http://www.imsglobal.org/xsd/imsccv1p1/imsdt_v1p1', 'dt1')
+    namespace 'http://www.imsglobal.org/xsd/imsccv1p3/imsdt_v1p3'
+    #namespace 'http://www.imsglobal.org/xsd/imsccv1p1/imsdt_v1p1'
+
+    tag 'topic'
+    element :title, String
+    element :text, String, :attributes => {:texttype => String}
+    has_one :attachments, IMS::CC::Attachments
+  end
+end

data/lib/ims/cc/web_link.rb

@@ -0,0 +1,11 @@
+module IMS::CC
+  class WebLink
+    include HappyMapper
+    namespace 'http://www.imsglobal.org/xsd/imsccv1p3/imswl_v1p3'
+    #namespace 'http://www.imsglobal.org/xsd/imsccv1p1/imsdt_v1p1'
+
+    tag 'webLink'
+    element :title, String
+    element :url, String, :attributes => {href: String, target: String, windoFeatures: String}
+  end
+end

data/lib/ims/cc.rb

@@ -0,0 +1,19 @@
+#require 'builder'
+require 'happymapper'
+require 'zip'
+
+require 'ims'
+
+module IMS::CC
+end
+
+require 'ims/cc/cc'
+require 'ims/cc/lom'
+require 'ims/cc/topic'
+require 'ims/cc/web_link'
+require 'ims/cc/assignment'
+require 'ims/cc/metadata'
+require 'ims/cc/resources'
+require 'ims/cc/organizations'
+require 'ims/cc/manifest'
+

data/lib/ims.rb

@@ -0,0 +1,2 @@
+module IMS
+end

data/test/fixtures/flat_imsmanifest.xml

@@ -0,0 +1,134 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<manifest identifier="cctd0001"
+          xmlns="http://www.imsglobal.org/xsd/imsccv1p3/imscp_v1p1"
+          xmlns:lom="http://ltsc.ieee.org/xsd/imsccv1p3/LOM/resource"
+          xmlns:lomimscc="http://ltsc.ieee.org/xsd/imsccv1p3/LOM/manifest"
+          xmlns:cpx="http://www.imsglobal.org/xsd/imsccv1p3/imscp_extensionv1p2"
+          xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+          xsi:schemaLocation="http://ltsc.ieee.org/xsd/imsccv1p3/LOM/resource http://www.imsglobal.org/profile/cc/ccv1p3/LOM/ccv1p3_lomresource_v1p0.xsd
+                      http://www.imsglobal.org/xsd/imsccv1p3/imscp_v1p1 http://www.imsglobal.org/profile/cc/ccv1p3/ccv1p3_imscp_v1p2_v1p0.xsd 
+                      http://ltsc.ieee.org/xsd/imsccv1p3/LOM/manifest http://www.imsglobal.org/profile/cc/ccv1p3/LOM/ccv1p3_lommanifest_v1p0.xsd
+                      http://www.imsglobal.org/xsd/imsccv1p3/imscp_extensionv1p2 http://www.imsglobal.org/profile/cc/ccv1p3/ccv1p3_cpextensionv1p2_v1p0.xsd">
+  <metadata>
+    <schema>IMS Common Cartridge</schema>
+    <schemaversion>1.3.0</schemaversion>
+    <lomimscc:lom>
+      <lomimscc:general>
+        <lomimscc:title>
+          <lomimscc:string language="en-US">Common Cartridge Test</lomimscc:string>
+        </lomimscc:title>
+        <lomimscc:description>
+          <lomimscc:string language="en-US">CC 1.3 test with extension</lomimscc:string>
+        </lomimscc:description>
+        <lomimscc:keyword>
+          <lomimscc:string language="en-US">Sample</lomimscc:string>
+        </lomimscc:keyword>
+        <lomimscc:keyword>
+          <lomimscc:string language="en-US">Sample2</lomimscc:string>
+        </lomimscc:keyword>
+      </lomimscc:general>
+      <lomimscc:lifeCycle>
+        <lomimscc:contribute>
+          <lomimscc:date>
+            <lomimscc:dateTime>2012-06-07</lomimscc:dateTime>
+          </lomimscc:date>
+        </lomimscc:contribute>
+      </lomimscc:lifeCycle>
+      <lomimscc:rights>
+        <lomimscc:copyrightAndOtherRestrictions>
+          <lomimscc:value>yes</lomimscc:value>
+        </lomimscc:copyrightAndOtherRestrictions>
+        <lomimscc:description>
+          <lomimscc:string>Private (Copyrighted) - http://en.wikipedia.org/wiki/Copyright</lomimscc:string>
+        </lomimscc:description>
+      </lomimscc:rights>
+    </lomimscc:lom>
+  </metadata>
+
+  <organizations>
+    <organization identifier="O_1" structure="rooted-hierarchy">
+      <item identifier="I_1">
+        <item identifier="I_00000">
+          <title>CCv1.3 With Assignment</title>
+          <item identifier="I_00001" identifierref="Resource1">
+            <title>Cool Assignment</title>
+          </item>
+          <item identifier="I_00002" identifierref="Resource2">
+            <title>Assignment Discussions</title>
+          </item>
+          <item identifier="I_00003" identifierref="Resource3">
+            <title>Open2.net</title>
+          </item>
+          <item identifier="I_00004" identifierref="Resource4">
+            <title>LTI Launch</title>
+          </item>
+        </item>
+      </item>
+    </organization>
+  </organizations>
+
+  <resources>
+
+    <resource identifier="Resource1" type="assignment_xmlv1p0" intendeduse="assignment">
+      <lomimscc:lom>
+        <lomimscc:rights>
+          <lomimscc:copyrightAndOtherRestrictions>
+            <lomimscc:value>yes</lomimscc:value>
+          </lomimscc:copyrightAndOtherRestrictions>
+          <lomimscc:description>
+            <lomimscc:string>Private (Copyrighted) - http://en.wikipedia.org/wiki/Copyright</lomimscc:string>
+          </lomimscc:description>
+        </lomimscc:rights>
+      </lomimscc:lom>
+      <assignment xmlns="http://www.imsglobal.org/xsd/imscc_extensions/assignment"
+                  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+                  xsi:schemaLocation="http://www.imsglobal.org/xsd/imscc_extensions/assignment http://www.imsglobal.org/profile/cc/cc_extensions/cc_extresource_assignmentv1p0_v1p0.xsd http://www.imsglobal.org/xsd/imscc_extensions/assignment ">
+        <title>Cool Assignment</title>
+        <text texttype="text/html">You should turn this in for points. &lt;b&gt;html!&lt;/b&gt;</text>
+        <instructor_text texttype="text/plain">Super Secret</instructor_text>
+        <gradable>true</gradable>
+        <submission_formats>
+          <format type="file"/>
+          <format type="text"/>
+        </submission_formats>
+      </assignment>
+    </resource>
+
+    <resource identifier="Resource2" type="imsdt_xmlv1p3">
+      <topic xmlns="http://www.imsglobal.org/xsd/imsccv1p3/imsdt_v1p3" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.imsglobal.org/xsd/imsccv1p3/imsdt_v1p3 http://www.imsglobal.org/profile/cc/ccv1p3/ccv1p3_imsdt_v1p3.xsd">
+        <title>Assignment Discussions</title>
+        <text texttype="text/html">Discuss your results from the first assignment.</text>
+        <attachments>
+          <attachment href="test1.jpg" />
+          <attachment href="test2.gif" />
+        </attachments>
+      </topic>
+    </resource>
+
+    <resource identifier="Resource3" type="imswl_xmlv1p3">
+      <webLink xmlns="http://www.imsglobal.org/xsd/imsccv1p3/imswl_v1p3" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.imsglobal.org/xsd/imsccv1p3/imswl_v1p3 http://www.imsglobal.org/profile/cc/ccv1p3/ccv1p3_imswl_v1p3.xsd">
+        <title>Open2.net: Science and Nature</title>
+        <url href="http://www.open2.net/sciencetechnologynature/"/>
+      </webLink>
+    </resource>
+
+    <resource identifier="Resource4" type="imsbasiclti_xmlv1p3">
+      <cartridge_basiclti_link
+              xmlns="http://www.imsglobal.org/xsd/imslticc_v1p0"
+              xmlns:blti="http://www.imsglobal.org/xsd/imsbasiclti_v1p0"
+              xmlns:lticm="http://www.imsglobal.org/xsd/imslticm_v1p0"
+              xmlns:lticp="http://www.imsglobal.org/xsd/imslticp_v1p0"
+              xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.imsglobal.org/xsd/imslticc_v1p3 http://www.imsglobal.org/xsd/lti/ltiv1p1/imslticc_v1p1.xsd http://www.imsglobal.org/xsd/imslticp_v1p0 http://www.imsglobal.org/xsd/lti/ltiv1p0/imslticp_v1p0.xsd http://www.imsglobal.org/xsd/imslticm_v1p0 http://www.imsglobal.org/xsd/lti/ltiv1p0/imslticm_v1p0.xsd http://www.imsglobal.org/xsd/imsbasiclti_v1p0 http://www.imsglobal.org/xsd/lti/ltiv1p0/imsbasiclti_v1p0p1.xsd">
+        <blti:title>BLTI Test</blti:title>
+        <blti:description>Test a BLTI Link</blti:description>
+        <blti:launch_url>http://www.imsglobal.org/developers/BLTI/tool.php</blti:launch_url>
+        <blti:secure_launch_url>http://www.imsglobal.org/developers/BLTI/tool.php</blti:secure_launch_url>
+      </cartridge_basiclti_link>
+    </resource>
+
+    <resource identifier="Resource5" type="imsdt_xmlv1p3">
+      <dependency identifierref="Resource2"/>
+    </resource>
+
+  </resources>
+</manifest>

data/test/unit/cc/assignment_test.rb

@@ -0,0 +1,42 @@
+require_relative 'cc_test_helper'
+
+class TestUnitAssignment < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @resources = manifest.resources
+    @assignment = @resources.find_by_identifier("Resource1").assignment
+  end
+
+  def test_it_gets_assignment_data
+    assert_instance_of IMS::CC::Assignment::Assignment, @assignment
+    assert_equal 'Cool Assignment', @assignment.title
+    assert_equal 'You should turn this in for points. <b>html!</b>', @assignment.text
+    assert_equal 'text/html', @assignment.text.texttype
+    assert_equal 'Super Secret', @assignment.instructor_text
+    assert_equal 'text/plain', @assignment.instructor_text.texttype
+    assert_equal true, @assignment.gradable
+    assert_equal ['file', 'text'], @assignment.submission_formats
+  end
+end
+
+class TestUnitZippedAssignment < Minitest::Test
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::CARTRIDGE_PATH
+    @resources = manifest.resources
+  end
+
+  def test_it_parses_reference
+    @assignment = @resources.find_by_identifier("I_00012_R").assignment
+    assert_instance_of IMS::CC::Assignment::Assignment, @assignment
+    assert_equal 2, @assignment.attachments.attachments.count
+    assert_equal '../I_00006_Media/angry_person.jpg', @assignment.attachments.attachments[0].href
+    assert_equal 'Learner', @assignment.attachments.attachments[0].role
+  end
+
+  def test_it_parses_reference2
+    @assignment_resource = @resources.find_by_identifier("I_00013_R")
+    assert_instance_of IMS::CC::Assignment::Assignment, @assignment_resource.assignment
+  end
+
+end

data/test/unit/cc/cc_test_helper.rb

@@ -0,0 +1,8 @@
+require 'minitest/autorun'
+require 'ims/cc'
+require 'pp'
+
+module CCTestHelper
+  CARTRIDGE_PATH = File.expand_path("../../../fixtures/cc_full_test.zip", __FILE__)
+  FLAT_MANIFEST_PATH = File.expand_path("../../../fixtures/flat_imsmanifest.xml", __FILE__)
+end

data/test/unit/cc/manifest_metadata_test.rb

@@ -0,0 +1,27 @@
+require_relative 'cc_test_helper'
+
+class TestUnitMetadata < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @meta = manifest.metadata
+  end
+
+  def test_it_has_default_namespace_data
+    assert_equal @meta.schema, 'IMS Common Cartridge'
+    assert_equal @meta.schemaversion, '1.3.0'
+  end
+
+  def test_it_gets_general_lom
+    assert_instance_of IMS::CC::Lom::Lom, @meta.lom
+    assert_instance_of IMS::CC::Lom::General, @meta.lom.general
+    assert_instance_of IMS::CC::Lom::Title, @meta.lom.general.title
+    assert_instance_of IMS::CC::Lom::Description, @meta.lom.general.description
+    assert_equal "Common Cartridge Test", @meta.lom.general.title.title
+    assert_equal "CC 1.3 test with extension", @meta.lom.general.description.description
+    assert_equal ['Sample', 'Sample2'], @meta.lom.general.keywords.map(&:keyword)
+    assert_equal 'yes', @meta.lom.rights.copyrightAndOtherRestrictions.value
+    assert_equal 'Private (Copyrighted) - http://en.wikipedia.org/wiki/Copyright', @meta.lom.rights.description.description
+  end
+
+end

data/test/unit/cc/manifest_test.rb

@@ -0,0 +1,8 @@
+require_relative 'cc_test_helper'
+
+class TestUnitManifest < Minitest::Test
+  def test_it_has_metadata
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    assert_instance_of IMS::CC::Metadata, manifest.metadata
+  end
+end

data/test/unit/cc/organizations_test.rb

@@ -0,0 +1,38 @@
+require_relative 'cc_test_helper'
+
+class TestUnitOrganizations < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @orgs = manifest.organizations
+  end
+
+  def test_it_gets_organizations
+    assert_instance_of IMS::CC::Organizations::Organizations, @orgs
+    assert_instance_of IMS::CC::Organizations::Organization, @orgs.organization
+    assert_equal 'O_1', @orgs.organization.identifier
+    assert_equal 'rooted-hierarchy', @orgs.organization.structure
+  end
+
+  # have to figure out why happy mapper gets all items instead of just 1st children
+  #def test_it_creates_item_tree
+  #  assert_equal 1, @orgs.organization.item.items.count
+  #  assert_equal 4, @orgs.organization.item.items[0].count
+  #end
+
+  def test_gets_item_info
+    assert_equal "I_00000", @orgs.organization.item.items[0].identifier
+    assert_equal "CCv1.3 With Assignment", @orgs.organization.item.items[0].title
+    assert_equal '', @orgs.organization.item.items[0].identifierref
+
+    assert_equal "I_00001", @orgs.organization.item.items[1].identifier
+    assert_equal "Cool Assignment", @orgs.organization.item.items[1].title
+    assert_equal "Resource1", @orgs.organization.item.items[1].identifierref
+  end
+
+  def test_item_references_resource
+    item = @orgs.find_item_by_identifier('I_00001')
+    assert_equal 'Resource1', item.resource.identifier
+  end
+
+end

data/test/unit/cc/resources_test.rb

@@ -0,0 +1,50 @@
+require_relative 'cc_test_helper'
+
+class TestUnitResources < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @resources = manifest.resources
+  end
+
+  def test_it_gets_resources
+    assert_instance_of IMS::CC::Resources::Resources, @resources
+  end
+
+  def test_gets_resource_info
+    assert_instance_of IMS::CC::Resources::Resource, @resources.resources[0]
+    assert_equal 'Resource1', @resources.resources[0].identifier
+    assert_equal 'assignment_xmlv1p0', @resources.resources[0].type
+    assert_equal 'assignment', @resources.resources[0].intendeduse
+  end
+
+  def test_gets_dependency_info
+    assert_equal 'Resource2', @resources.resources.last.dependencies[0].identifierref
+  end
+
+  def test_it_recognizes_inline
+    assert_equal true, @resources.resources[1].inline?
+  end
+
+end
+
+class TestUnitZippedResources < Minitest::Test
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::CARTRIDGE_PATH
+    @resources = manifest.resources
+  end
+
+  def test_it_gets_resources
+    assert_instance_of IMS::CC::Resources::Resources, @resources
+  end
+
+  def test_gets_file_info
+    assert_equal 3, @resources.resources.find{|r|r.identifier == 'f5'}.files.count
+    assert_equal 'I_00001_R/Learning_Objectives.html', @resources.resources[0].files[0].href
+  end
+
+  def test_it_recognizes_not_inline
+    @topic_resource = @resources.resources.find{|r|r.identifier == 'I_00006_R'}
+    assert_equal false, @topic_resource.inline?
+  end
+end

data/test/unit/cc/topic_test.rb

@@ -0,0 +1,38 @@
+require_relative 'cc_test_helper'
+
+class TestUnitTopic < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @resources = manifest.resources
+    @topic = @resources.resources[1].topic
+  end
+
+  def test_it_gets_topic_data
+    assert_instance_of IMS::CC::Topic, @topic
+    assert_equal 'Assignment Discussions', @topic.title
+    assert_equal 'Discuss your results from the first assignment.', @topic.text
+    assert_equal 'text/html', @topic.text.texttype
+    assert_equal 2, @topic.attachments.attachments.count
+    assert_equal 'test1.jpg', @topic.attachments.attachments[0].href
+  end
+
+end
+
+class TestUnitZippedTopics < Minitest::Test
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::CARTRIDGE_PATH
+    @resources = manifest.resources
+    @topic_resource = @resources.resources.find{|r|r.identifier == 'I_00006_R'}
+  end
+
+  def test_it_parses_reference
+    assert_instance_of IMS::CC::Topic, @topic_resource.topic
+  end
+
+  def test_it_parses_reference2
+    @topic_resource = @resources.resources.find{|r|r.identifier == 'I_00009_R'}
+    assert_instance_of IMS::CC::Topic, @topic_resource.topic
+  end
+
+end

data/test/unit/cc/web_link_test.rb

@@ -0,0 +1,35 @@
+require_relative 'cc_test_helper'
+
+class TestUnitWebLink < Minitest::Test
+
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::FLAT_MANIFEST_PATH
+    @resources = manifest.resources
+    @weblink = @resources.find_by_identifier("Resource3").web_link
+  end
+
+  def test_it_gets_weblink_data
+    assert_instance_of IMS::CC::WebLink, @weblink
+    assert_equal 'Open2.net: Science and Nature', @weblink.title
+    assert_equal 'http://www.open2.net/sciencetechnologynature/', @weblink.url.href
+  end
+
+end
+
+class TestUnitZippedWebLinks < Minitest::Test
+  def setup
+    manifest = IMS::CC::Manifest.read CCTestHelper::CARTRIDGE_PATH
+    @resources = manifest.resources
+  end
+
+  def test_it_parses_reference
+    @weblink_resource = @resources.find_by_identifier("I_00005_R")
+    assert_instance_of IMS::CC::WebLink, @weblink_resource.web_link
+  end
+
+  def test_it_parses_reference2
+    @weblink_resource = @resources.find_by_identifier("I_00007_R")
+    assert_instance_of IMS::CC::WebLink, @weblink_resource.web_link
+  end
+
+end