pry 0.10.2-i386-mingw32 → 1.0.0.pre1-i386-mingw32

data/spec/commands/exit_all_spec.rb

@@ -0,0 +1,27 @@
+require 'helper'
+
+describe "exit-all" do
+  before { @pry = Pry.new }
+
+  it "should break out of the repl and return nil" do
+    @pry.eval("exit-all").should.be.false
+    @pry.exit_value.should.be.nil
+  end
+
+  it "should break out of the repl wth a user specified value" do
+    @pry.eval("exit-all 'message'").should.be.false
+    @pry.exit_value.should == "message"
+  end
+
+  it "should break out of the repl even if multiple bindings still on stack" do
+    ["cd 1", "cd 2"].each { |line| @pry.eval(line).should.be.true }
+    @pry.eval("exit-all 'message'").should.be.false
+    @pry.exit_value.should == "message"
+  end
+
+  it "should have empty binding_stack after breaking out of the repl" do
+    ["cd 1", "cd 2"].each { |line| @pry.eval(line).should.be.true }
+    @pry.eval("exit-all").should.be.false
+    @pry.binding_stack.should.be.empty
+  end
+end

data/spec/commands/exit_program_spec.rb

@@ -0,0 +1,19 @@
+require 'helper'
+
+describe "exit-program" do
+  it 'should raise SystemExit' do
+    proc {
+      pry_eval('exit-program')
+    }.should.raise SystemExit
+  end
+
+  it 'should exit the program with the provided value' do
+    begin
+      pry_eval 'exit-program 66'
+    rescue SystemExit => e
+      e.status.should == 66
+    else
+      raise "Failed to raise SystemExit"
+    end
+  end
+end

data/spec/commands/exit_spec.rb

@@ -0,0 +1,28 @@
+require 'helper'
+
+describe "exit" do
+  before { @pry = Pry.new(:target => :outer, :output => StringIO.new) }
+
+  it "should pop a binding" do
+    @pry.eval "cd :inner"
+    @pry.evaluate_ruby("self").should == :inner
+    @pry.eval "exit"
+    @pry.evaluate_ruby("self").should == :outer
+  end
+
+  it "should break out of the repl when binding_stack has only one binding" do
+    @pry.eval("exit").should.be.false
+    @pry.exit_value.should.be.nil
+  end
+
+  it "should break out of the repl and return user-given value" do
+    @pry.eval("exit :john").should.be.false
+    @pry.exit_value.should == :john
+  end
+
+  it "should break out of the repl even after an exception" do
+    @pry.eval "exit = 42"
+    @pry.output.string.should =~ /^SyntaxError/
+    @pry.eval("exit").should.be.false
+  end
+end

data/spec/commands/find_method_spec.rb

@@ -0,0 +1,70 @@
+require 'helper'
+
+# we turn off the test for MRI 1.8 because our source_location hack
+# for C methods actually runs the methods - and since it runs ALL
+# methods (in an attempt to find a match) it runs 'exit' and aborts
+# the test, causing a failure. We should fix this in the future by
+# blacklisting certain methods for 1.8 MRI (such as exit, fork, and so on)
+unless Pry::Helpers::BaseHelpers.mri_18?
+  MyKlass = Class.new do
+    def hello
+      "timothy"
+    end
+    def goodbye
+      "jenny"
+    end
+    def tea_tim?
+      "timothy"
+    end
+    def tea_time?
+      "polly"
+    end
+  end
+
+  describe "find-method" do
+    describe "find matching methods by name regex (-n option)" do
+      it "should find a method by regex" do
+        pry_eval("find-method hell MyKlass").should =~
+          /MyKlass.*?hello/m
+      end
+
+      it "should NOT match a method that does not match the regex" do
+        pry_eval("find-method hell MyKlass").should.not =~
+          /MyKlass.*?goodbye/m
+      end
+    end
+
+    describe "find matching methods by content regex (-c option)" do
+      it "should find a method by regex" do
+        pry_eval("find-method -c timothy MyKlass").should =~
+          /MyKlass.*?hello/m
+      end
+
+      it "should NOT match a method that does not match the regex" do
+        pry_eval("find-method timothy MyKlass").should.not =~
+          /MyKlass.*?goodbye/m
+      end
+    end
+
+    it "should work with badly behaved constants" do
+      MyKlass::X = Object.new
+      def (MyKlass::X).hash
+        raise "mooo"
+      end
+
+      pry_eval("find-method -c timothy MyKlass").should =~
+        /MyKlass.*?hello/m
+    end
+
+    it "should escape regexes correctly" do
+      good = /tea_time\?/
+      bad  = /tea_tim\?/
+      pry_eval('find-method tea_time? MyKlass').should =~ good
+      pry_eval('find-method tea_time? MyKlass').should =~ good
+      pry_eval('find-method tea_time\? MyKlass').should.not =~ bad
+      pry_eval('find-method tea_time\? MyKlass').should =~ good
+    end
+  end
+
+  Object.remove_const(:MyKlass)
+end

data/spec/commands/gem_list_spec.rb

@@ -0,0 +1,26 @@
+require 'helper'
+
+describe "gem-list" do
+  # fixing bug for 1.8 compat
+  it 'should not raise when invoked' do
+    proc {
+      pry_eval(self, 'gem-list')
+    }.should.not.raise
+  end
+
+  it 'should work arglessly' do
+    list = pry_eval('gem-list')
+    list.should =~ /slop \(/
+    list.should =~ /bacon \(/
+  end
+
+  it 'should find arg' do
+    prylist = pry_eval('gem-list slop')
+    prylist.should =~ /slop \(/
+    prylist.should.not =~ /bacon/
+  end
+
+  it 'should return non-results as silence' do
+    pry_eval('gem-list aoeuoueouaou').should.empty?
+  end
+end

data/spec/commands/gist_spec.rb

@@ -0,0 +1,79 @@
+# These tests are out of date.
+# THey need to be updated for the new 'gist' API, but im too sleepy to
+# do that now.
+
+require 'helper'
+
+describe 'gist' do
+  it 'has a dependency on the jist gem' do
+    Pry::Command::Gist.command_options[:requires_gem].should == "jist"
+  end
+end
+
+#   before do
+#     Pad.jist_calls = {}
+#   end
+
+#   # In absence of normal mocking, just monkeysmash these with no undoing after.
+#   module Jist
+#     class << self
+#       def login!; Pad.jist_calls[:login!] = true end
+#       def gist(*args)
+#         Pad.jist_calls[:gist_args] = args
+#         {'html_url' => 'http://gist.blahblah'}
+#       end
+#       def copy(content); Pad.jist_calls[:copy_args] = content end
+#     end
+#   end
+
+#   module Pry::Gist
+#     # a) The actual require fails for jruby for some odd reason.
+#     # b) 100% of jist should be stubbed by the above, so this ensures that.
+#     def self.require_jist; 'nope' end
+#   end
+
+#   it 'nominally logs in' do
+#     pry_eval 'gist --login'
+#     Pad.jist_calls[:login!].should.not.be.nil
+#   end
+
+#   EXAMPLE_REPL_METHOD = <<-EOT
+#   # docdoc
+#   def my_method
+#     # line 1
+#     'line 2'
+#     line 3
+#     Line.four
+#   end
+#   EOT
+
+#   RANDOM_COUPLE_OF_LINES = %w(a=1 b=2)
+#   run_case = proc do |sym|
+#     actual_command = Pry::Gist.example_code(sym)
+#     pry_eval EXAMPLE_REPL_METHOD, RANDOM_COUPLE_OF_LINES, actual_command
+#   end
+
+#   it 'deduces filenames' do
+#     Pry::Gist::INVOCATIONS.keys.each do |e|
+#       run_case.call(e)
+#       if Pad.jist_calls[:gist_args]
+#         text, args = Pad.jist_calls[:gist_args]
+#         args[:filename].should.not == '(pry)'
+#       end
+#       Pad.jist_calls[:copy_args].should.not.be.nil
+#     end
+#   end
+
+#   it 'equates aliae' do
+#     run_case.call(:clipit).should == run_case.call(:cliponly)
+#     run_case.call(:jist).should   == run_case.call(:class)
+#   end
+
+#   it 'has a reasonable --help' do
+#     help = pry_eval('gist --help')
+#     Pry::Gist::INVOCATIONS.keys.each do |e|
+#       help.should.include? Pry::Gist.example_code(e)
+#       help.should.include? Pry::Gist.example_description(e)
+#     end
+#   end
+# end

data/spec/commands/help_spec.rb

@@ -0,0 +1,56 @@
+require 'helper'
+
+describe "help" do
+  before do
+    @oldset = Pry.config.commands
+    @set = Pry.config.commands = Pry::CommandSet.new do
+      import Pry::Commands
+    end
+  end
+
+  after do
+    Pry.config.commands = @oldset
+  end
+
+  it 'should display help for a specific command' do
+    pry_eval('help ls').should =~ /Usage: ls/
+  end
+
+  it 'should display help for a regex command with a "listing"' do
+    @set.command /bar(.*)/, "Test listing", :listing => "foo" do; end
+    pry_eval('help foo').should =~ /Test listing/
+  end
+
+  it 'should display help for a command with a spaces in its name' do
+    @set.command "cmd with spaces", "desc of a cmd with spaces" do; end
+    pry_eval('help "cmd with spaces"').should =~ /desc of a cmd with spaces/
+  end
+
+  it 'should display help for all commands with a description' do
+    @set.command /bar(.*)/, "Test listing", :listing => "foo" do; end
+    @set.command "b", "description for b", :listing => "foo" do; end
+    @set.command "c" do;end
+    @set.command "d", "" do;end
+
+    output = pry_eval('help')
+    output.should =~ /Test listing/
+    output.should =~ /description for b/
+    output.should =~ /No description/
+  end
+
+  it "should sort the output of the 'help' command" do
+    @set.command 'faa', "Fooerizes" do; end
+    @set.command 'gaa', "Gooerizes" do; end
+    @set.command 'maa', "Mooerizes" do; end
+    @set.command 'baa', "Booerizes" do; end
+
+    doc = pry_eval('help')
+
+    order = [doc.index("baa"),
+             doc.index("faa"),
+             doc.index("gaa"),
+             doc.index("maa")]
+
+    order.should == order.sort
+  end
+end

data/spec/commands/hist_spec.rb

@@ -0,0 +1,172 @@
+require 'helper'
+
+describe "hist" do
+  before do
+    Pry.history.clear
+    @hist = Pry.history
+
+    @str_output = StringIO.new
+    @t = pry_tester :history => @hist do
+      # For looking at what hist pushes into the input stack. The
+      # implementation of this helper will definitely have to change at some
+      # point.
+      def next_input
+        @pry.input.string
+      end
+    end
+  end
+
+  it 'should display the correct history' do
+    @hist.push "hello"
+    @hist.push "world"
+
+    @t.eval('hist').should =~ /hello\n.*world/
+  end
+
+  it 'should replay history correctly (single item)' do
+    o = Object.new
+    @hist.push "@x = 10"
+    @hist.push "@y = 20"
+    @hist.push "@z = 30"
+
+    @t.push_binding o
+    @t.eval 'hist --replay -1'
+
+    o.instance_variable_get(:@z).should == 30
+  end
+
+  it 'should replay a range of history correctly (range of items)' do
+    o = Object.new
+    @hist.push "@x = 10"
+    @hist.push "@y = 20"
+
+    @t.push_binding o
+    @t.eval 'hist --replay 0..2'
+    @t.eval('[@x, @y]').should == [10, 20]
+  end
+
+  # this is to prevent a regression where input redirection is
+  # replaced by just appending to `eval_string`
+  it 'should replay a range of history correctly (range of commands)' do
+    o = Object.new
+    @hist.push "cd 1"
+    @hist.push "cd 2"
+
+    @t.eval("hist --replay 0..2")
+    stack = @t.eval("Pad.stack = _pry_.binding_stack.dup")
+    stack.map{ |b| b.eval("self") }.should == [TOPLEVEL_BINDING.eval("self"), 1, 2]
+  end
+
+  it 'should grep for correct lines in history' do
+    @hist.push "abby"
+    @hist.push "box"
+    @hist.push "button"
+    @hist.push "pepper"
+    @hist.push "orange"
+    @hist.push "grape"
+    @hist.push "def blah 1"
+    @hist.push "def boink 2"
+    @hist.push "place holder"
+
+    @t.eval('hist --grep o').should =~ /\d:.*?box\n\d:.*?button\n\d:.*?orange/
+
+    # test more than one word in a regex match (def blah)
+    @t.eval('hist --grep def blah').should =~ /def blah 1/
+
+    # test more than one word with leading white space in a regex match (def boink)
+    @t.eval('hist --grep      def boink').should =~ /def boink 2/
+  end
+
+  it 'should return last N lines in history with --tail switch' do
+    ("a".."z").each do |v|
+      @hist.push v
+    end
+
+    out = @t.eval 'hist --tail 3'
+    out.each_line.count.should == 3
+    out.should =~ /x\n\d+:.*y\n\d+:.*z/
+  end
+
+  it 'should apply --tail after --grep' do
+    @hist.push "print 1"
+    @hist.push "print 2"
+    @hist.push "puts  3"
+    @hist.push "print 4"
+    @hist.push "puts  5"
+
+    out = @t.eval 'hist --tail 2 --grep print'
+    out.each_line.count.should == 2
+    out.should =~ /\d:.*?print 2\n\d:.*?print 4/
+  end
+
+  it 'should apply --head after --grep' do
+    @hist.push "puts  1"
+    @hist.push "print 2"
+    @hist.push "puts  3"
+    @hist.push "print 4"
+    @hist.push "print 5"
+
+    out = @t.eval 'hist --head 2 --grep print'
+    out.each_line.count.should == 2
+    out.should =~ /\d:.*?print 2\n\d:.*?print 4/
+  end
+
+  # strangeness in this test is due to bug in Readline::HISTORY not
+  # always registering first line of input
+  it 'should return first N lines in history with --head switch' do
+    ("a".."z").each do |v|
+      @hist.push v
+    end
+
+    out = @t.eval 'hist --head 4'
+    out.each_line.count.should == 4
+    out.should =~ /a\n\d+:.*b\n\d+:.*c/
+  end
+
+  # strangeness in this test is due to bug in Readline::HISTORY not
+  # always registering first line of input
+  it 'should show lines between lines A and B with the --show switch' do
+    ("a".."z").each do |v|
+      @hist.push v
+    end
+
+    out = @t.eval 'hist --show 1..4'
+    out.each_line.count.should == 4
+    out.should =~ /b\n\d+:.*c\n\d+:.*d/
+  end
+
+  it "should store a call with `--replay` flag" do
+    @t.eval ":banzai"
+    @t.eval "hist --replay 1"
+    @t.eval("hist").should =~ /hist --replay 1/
+  end
+
+  it "should not contain lines produced by `--replay` flag" do
+    @t.eval ":banzai"
+    @t.eval ":geronimo"
+    @t.eval ":huzzah"
+    @t.eval("hist --replay 1..3")
+
+    output = @t.eval("hist")
+    output.should == "1: :banzai\n2: :geronimo\n3: :huzzah\n4: hist --replay 1..3\n"
+  end
+
+  it "should raise CommandError when index of `--replay` points out to another `hist --replay`" do
+    @t.eval ":banzai"
+    @t.eval "hist --replay 1"
+    lambda do
+      @t.eval "hist --replay 2"
+    end.should.raise(Pry::CommandError, /Replay index 4 points out to another replay call: `hist --replay 1`/)
+  end
+
+  it "should disallow execution of `--replay <i>` when CommandError raised" do
+    @t.eval "a = 0"
+    @t.eval "a += 1"
+    @t.eval "hist --replay 2"
+    lambda{
+      @t.eval "hist --replay 3"
+    }.should.raise(Pry::CommandError)
+    @t.eval("a").should == 2
+    @t.eval("hist").lines.to_a.size.should == 5
+  end
+end