require 'spec_helper'

RSpec.describe ActiveFedora::Orders::ListNode do
  let(:list_node) { described_class.new(node_cache, rdf_subject, graph) }
  let(:node_cache) { {} }
  let(:rdf_subject) { RDF::URI("#bla") }
  let(:graph) { ActiveTriples::Resource.new }

  describe "#target" do
    context "when a target is set" do
      it "returns it" do
        member = instance_double("member")
        list_node.target = member
        expect(list_node.target).to eq member
      end
    end
    context "when no target is set" do
      context "and it's not in the graph" do
        it "returns nil" do
          expect(list_node.target).to eq nil
        end
      end
      context "and it's set in the graph" do
        before do
          class Member < ActiveFedora::Base
          end
        end
        after do
          Object.send(:remove_const, :Member)
        end
        it "returns it" do
          member = Member.create
          graph << [rdf_subject, RDF::Vocab::ORE.proxyFor, member.resource.rdf_subject]
          expect(list_node.target).to eq member
        end
        context "and it doesn't exist" do
          it "returns an AT::Resource" do
            member = Member.new(id: "testing")
            graph << [rdf_subject, RDF::Vocab::ORE.proxyFor, member.resource.rdf_subject]
            expect(list_node.target.rdf_subject).to eq member.uri
          end
        end
      end
    end
  end

  describe "#target_uri" do
    context "with a null target_id" do
      it "returns nil" do
        expect(list_node.target_uri).to eq nil
      end
    end
    context "with a target" do
      before do
        class Member < ActiveFedora::Base
        end
      end
      after do
        Object.send(:remove_const, :Member)
      end
      it "returns a built URI" do
        m = Member.new
        allow(m).to receive(:id).and_return("test")
        list_node.target = m

        expect(list_node.target_uri).to eq ActiveFedora::Base.translate_id_to_uri.call("test")
      end
    end
  end

  describe "#target_id" do
    context "when a target is set" do
      it "returns its id" do
        member = instance_double("member", id: "member1")
        list_node.target = member
        expect(list_node.target_id).to eq "member1"
      end
    end
    context "when a target is from the graph" do
      before do
        class Member < ActiveFedora::Base
        end
      end
      after do
        Object.send(:remove_const, :Member)
      end
      context "and it's cached but missing" do
        it "works" do
          member = Member.create
          graph << [rdf_subject, RDF::Vocab::ORE.proxyFor, member.resource.rdf_subject]
          allow(ActiveFedora::Base).to receive(:from_uri).and_return(ActiveTriples::Resource.new(member.resource.rdf_subject))
          list_node.target

          expect(list_node.target_id).to eq member.id
        end
      end
      it "doesn't re-ify the target" do
        member = Member.create
        graph << [rdf_subject, RDF::Vocab::ORE.proxyFor, member.resource.rdf_subject]
        allow(ActiveFedora::Base).to receive(:from_uri).and_call_original

        expect(list_node.target_id).to eq member.id
        expect(ActiveFedora::Base).not_to have_received(:from_uri)
      end
    end
  end
  describe "#proxy_in_id" do
    context "when a target is set" do
      it "returns its id" do
        member = instance_double("member", id: "member1")
        list_node.proxy_in = member
        expect(list_node.proxy_in_id).to eq "member1"
      end
    end
    context "when a proxy_in is from the graph" do
      before do
        class Member < ActiveFedora::Base
        end
      end
      after do
        Object.send(:remove_const, :Member)
      end
      context "and it's cached but missing" do
        it "works" do
          member = Member.create
          graph << [rdf_subject, RDF::Vocab::ORE.proxyIn, member.resource.rdf_subject]
          allow(ActiveFedora::Base).to receive(:from_uri).and_return(ActiveTriples::Resource.new(member.resource.rdf_subject))
          list_node.target

          expect(list_node.proxy_in_id).to eq member.id
        end
      end
      it "doesn't re-ify the target" do
        member = Member.create
        graph << [rdf_subject, RDF::Vocab::ORE.proxyIn, member.resource.rdf_subject]
        allow(ActiveFedora::Base).to receive(:from_uri).and_call_original

        expect(list_node.proxy_in_id).to eq member.id
        expect(ActiveFedora::Base).not_to have_received(:from_uri)
      end
    end
  end

  describe "#to_graph" do
    context "with no data" do
      it "returns an empty graph" do
        expect(list_node.to_graph.statements.to_a.length).to eq 0
      end
    end
  end
end