pry--pry/test/test_default_commands/test_ls.rb

require 'helper'
describe "ls" do
  describe "class_name" do
    extend Pry::DefaultCommands::Ls.helper_module
    it "should use the name of the class if it exists" do
      class_name(Object).should == "Object"
    end

    it "should use the name of the module if it exists" do
      class_name(Kernel).should == "Kernel"
    end

    it "should use Foo.self for singleton classes of classes" do
      class_name(class << Object; self; end).should == "Object.self"
    end

    it "should use Foo.self for singleton methods of modules" do
      class_name(class << Kernel; self; end).should == "Kernel.self"
    end

    it "should default to the .to_s if that's not possible" do
      cls = Class.new
      class_name(cls).should == cls.to_s
    end

    it "should default to .to_s.self" do
      cls = Class.new
      class_name(class << cls; self; end).should == "#{cls.to_s}.self"
    end

    it "should just be self for singleton classes of normal objects" do
      class_name(class << "hi"; self; end).should == "self"
    end
  end

  describe "below ceiling" do
    it "should stop before Object by default" do
      mock_pry("cd Class.new{ def goo; end }.new", "ls").should.not =~ /Object/
      mock_pry("cd Class.new{ def goo; end }", "ls -M").should.not =~ /Object/
    end

    it "should include object if -v is given" do
      mock_pry("cd Class.new{ def goo; end }.new", "ls -m -v").should =~ /Object/
      mock_pry("cd Class.new{ def goo; end }", "ls -vM").should =~ /Object/
    end

    it "should include super-classes by default" do
      mock_pry("cd Class.new(Class.new{ def goo; end }).new", "ls").should =~ /goo/
      mock_pry("cd Class.new(Class.new{ def goo; end })", "ls -M").should =~ /goo/
    end

    it "should not include super-classes when -q is given" do
      mock_pry("cd Class.new(Class.new{ def goo; end }).new", "ls -q").should.not =~ /goo/
      mock_pry("cd Class.new(Class.new{ def goo; end })", "ls -M -q").should.not =~ /goo/
    end
  end

  describe "methods" do 
    it "should show public methods by default" do
      mock_pry("ls Class.new{ def goo; end }.new").should =~ /goo/
    end

    it "should not show protected/private by default" do
      mock_pry("ls -M Class.new{ def goo; end; private :goo }").should.not =~ /goo/
      mock_pry("ls Class.new{ def goo; end; protected :goo }.new").should.not =~ /goo/
    end

    it "should show public methods with -p" do
      mock_pry("ls -p Class.new{ def goo; end }.new").should =~ /goo/
    end

    it "should show protected/private methods with -p" do
      mock_pry("ls -pM Class.new{ def goo; end; protected :goo }").should =~ /goo/
      mock_pry("ls -p Class.new{ def goo; end; private :goo }.new").should =~ /goo/
    end
  end

  describe "constants" do
    it "should show constants defined on the current module" do
      mock_pry("class TempFoo1; BARGHL = 1; end", "ls TempFoo1").should =~ /BARGHL/
    end

    it "should not show constants defined on parent modules by default" do
      mock_pry("class TempFoo2; LHGRAB = 1; end; class TempFoo3 < TempFoo2; BARGHL = 1; end", "ls TempFoo3").should.not =~ /LHGRAB/
    end

    it "should show constants defined on ancestors with -v" do
      mock_pry("class TempFoo4; LHGRAB = 1; end; class TempFoo5 < TempFoo4; BARGHL = 1; end", "ls -v TempFoo5").should =~ /LHGRAB/
    end
  end

  describe "when no arguments given" do
    describe "when at the top-level" do
      it "should show constants" do
        mock_pry("ls").should =~ /Pry/
        mock_pry("ls").should =~ /VERSION/
      end

      # rubinius has a bug that means local_variables of "main" aren't reported inside eval()
      unless defined?(RUBY_ENGINE) && RUBY_ENGINE =~ /rbx/
        it "should show local variables" do
          mock_pry("ls").should =~ /_pry_/
          mock_pry("arbitrar = 1", "ls").should =~ /arbitrar/
        end
      end
    end

    describe "when in a class" do
      it "should show constants" do
        mock_pry("class GeFromulate1; FOOTIFICATE=1.3; end", "cd GeFromulate1", "ls").should =~ /FOOTIFICATE/
      end

      it "should show class variables" do
        mock_pry("class GeFromulate2; @@flurb=1.3; end", "cd GeFromulate2", "ls").should =~ /@@flurb/
      end

      it "should show methods" do
        mock_pry("class GeFromulate3; def self.mooflight; end ; end", "cd GeFromulate3", "ls").should =~ /mooflight/
      end
    end

    describe "when in an object" do
      it "should show methods" do
        mock_pry("cd Class.new", "ls").should =~ /allocate/
      end

      it "should show instance variables" do
        mock_pry("cd Class.new", "@alphooent = 1", "ls").should =~ /@alphooent/
      end
    end
  end
end