require 'spec_helper'
gem 'wirble'  # die if wirble unavailable

describe Looksee::WirbleCompatibility do
  describe "when looksee is loaded" do
    #
    # Run the given ruby string, and return the standard output.
    #
    def init_irb_with(code)
      code = <<-EOS.demargin.gsub(/\n/, ';')
        |#{code}
        |#{stubbing_code}
        |lp Object.new
      EOS
      irb = File.join Config::CONFIG['bindir'], Config::CONFIG['ruby_install_name'].sub(/ruby/, 'irb')
      lib_dir = File.expand_path('lib')
      # irb hangs when using readline without a tty
      output = IO.popen("#{irb} -f --noreadline --noprompt --noverbose -I#{lib_dir} 2>&1", 'r+') do |io|
        io.puts code
        io.flush
        io.close_write
        io.read
      end
    end

    def stubbing_code
      <<-EOS.demargin
        |C = Class.new
        |
        |Looksee.styles = Hash.new{'%s'}
        |Looksee.styles[:public] = "\\e[1;32m%s\\e[0m"
        |
        |def Looksee.lookup_modules(object)
        |  [C]
        |end
        |def Looksee.internal_public_instance_methods(mod)
        |  [:a]
        |end
        |def Looksee.internal_protected_instance_methods(mod)
        |  []
        |end
        |def Looksee.internal_private_instance_methods(mod)
        |  []
        |end
      EOS
    end

    it "should work if wirble is not loaded" do
      output = init_irb_with(<<-EOS.demargin)
        |require 'irb'
        |require 'looksee/shortcuts'
        |require 'wirble'
        |Wirble.init
        |Wirble.colorize
      EOS
      output.should == <<-EOS.demargin
        |C
        |  \e[1;32ma\e[0m
      EOS
    end

    it "should work if wirble is loaded, but not initialized" do
      output = init_irb_with(<<-EOS.demargin)
        |require 'irb'
        |require 'wirble'
        |require 'looksee/shortcuts'
        |Wirble.init
        |Wirble.colorize
      EOS
      output.should == <<-EOS.demargin
        |C
        |  \e[1;32ma\e[0m
      EOS
    end

    it "should work if wirble is loaded and initialized, but colorizing is off" do
      output = init_irb_with(<<-EOS.demargin)
        |require 'irb'
        |require 'wirble'
        |Wirble.init
        |require 'looksee/shortcuts'
        |Wirble.colorize
      EOS
      output.should == <<-EOS.demargin
        |C
        |  \e[1;32ma\e[0m
      EOS
    end

    it "should work if wirble is loaded, initialized, and colorizing is on" do
      output = init_irb_with(<<-EOS.demargin)
        |require 'irb'
        |require 'wirble'
        |Wirble.init
        |Wirble.colorize
        |require 'looksee/shortcuts'
      EOS
      output.should == <<-EOS.demargin
        |C
        |  \e[1;32ma\e[0m
      EOS
    end

    it "should work if wirble colorizing is enabled twice" do
      output = init_irb_with(<<-EOS.demargin)
        |require 'irb'
        |require 'looksee/shortcuts'
        |require 'wirble'
        |Wirble.init
        |Wirble.colorize
        |Wirble.colorize
      EOS
      output.should == <<-EOS.demargin
        |C
        |  \e[1;32ma\e[0m
      EOS
    end
  end
end