require_relative '../../spec_helper'
require_relative 'fixtures/classes'
require_relative '../../fixtures/reflection'

# TODO: rewrite

# The reason why having include() is to show the specification explicitly.
# You should use have_protected_method() with the exception of this spec.
describe "Kernel#protected_methods" do
  it "returns a list of the names of protected methods accessible in the object" do
    KernelSpecs::Methods.protected_methods(false).sort.should include(:juu_ichi)
    KernelSpecs::Methods.new.protected_methods(false).should include(:ku)
  end

  it "returns a list of the names of protected methods accessible in the object and from its ancestors and mixed-in modules" do
    l1 = KernelSpecs::Methods.protected_methods(false)
    l2 = KernelSpecs::Methods.protected_methods
    (l1 & l2).should include(:juu_ichi)
    KernelSpecs::Methods.new.protected_methods.should include(:ku)
  end

  it "returns methods mixed in to the metaclass" do
    m = KernelSpecs::Methods.new
    m.extend(KernelSpecs::Methods::MetaclassMethods)
    m.protected_methods.should include(:nopeeking)
  end
end

describe :kernel_protected_methods_supers, shared: true do
  it "returns a unique list for an object extended by a module" do
    m = ReflectSpecs.oed.protected_methods(*@object)
    m.select { |x| x == :pro }.sort.should == [:pro]
  end

  it "returns a unique list for a class including a module" do
    m = ReflectSpecs::D.new.protected_methods(*@object)
    m.select { |x| x == :pro }.sort.should == [:pro]
  end

  it "returns a unique list for a subclass of a class that includes a module" do
    m = ReflectSpecs::E.new.protected_methods(*@object)
    m.select { |x| x == :pro }.sort.should == [:pro]
  end
end

describe :kernel_protected_methods_with_falsy, shared: true do
  it "returns a list of protected methods in without its ancestors" do
    ReflectSpecs::F.protected_methods(@object).select{|m|/_pro\z/ =~ m}.sort.should == [:ds_pro, :fs_pro]
    ReflectSpecs::F.new.protected_methods(@object).should == [:f_pro]
  end
end

describe "Kernel#protected_methods" do
  describe "when not passed an argument" do
    it_behaves_like :kernel_protected_methods_supers, nil, []
  end

  describe "when passed true" do
    it_behaves_like :kernel_protected_methods_supers, nil, true
  end

  describe "when passed false" do
    it_behaves_like :kernel_protected_methods_with_falsy, nil, false
  end

  describe "when passed nil" do
    it_behaves_like :kernel_protected_methods_with_falsy, nil, nil
  end
end