describe :string_slice, shared: true do
  it "returns the character code of the character at the given index" do
    "hello".send(@method, 0).should == ?h
    "hello".send(@method, -1).should == ?o
  end

  it "returns nil if index is outside of self" do
    "hello".send(@method, 20).should == nil
    "hello".send(@method, -20).should == nil

    "".send(@method, 0).should == nil
    "".send(@method, -1).should == nil
  end

  it "calls to_int on the given index" do
    "hello".send(@method, 0.5).should == ?h

    obj = mock('1')
    obj.should_receive(:to_int).and_return(1)
    "hello".send(@method, obj).should == ?e
  end

  it "raises a TypeError if the given index is nil" do
    -> { "hello".send(@method, nil) }.should raise_error(TypeError)
  end

  it "raises a TypeError if the given index can't be converted to an Integer" do
    -> { "hello".send(@method, mock('x')) }.should raise_error(TypeError)
    -> { "hello".send(@method, {})        }.should raise_error(TypeError)
    -> { "hello".send(@method, [])        }.should raise_error(TypeError)
  end

  it "raises a RangeError if the index is too big" do
    -> { "hello".send(@method, bignum_value) }.should raise_error(RangeError)
  end
end

describe :string_slice_index_length, shared: true do
  it "returns the substring starting at the given index with the given length" do
    "hello there".send(@method, 0,0).should == ""
    "hello there".send(@method, 0,1).should == "h"
    "hello there".send(@method, 0,3).should == "hel"
    "hello there".send(@method, 0,6).should == "hello "
    "hello there".send(@method, 0,9).should == "hello the"
    "hello there".send(@method, 0,12).should == "hello there"

    "hello there".send(@method, 1,0).should == ""
    "hello there".send(@method, 1,1).should == "e"
    "hello there".send(@method, 1,3).should == "ell"
    "hello there".send(@method, 1,6).should == "ello t"
    "hello there".send(@method, 1,9).should == "ello ther"
    "hello there".send(@method, 1,12).should == "ello there"

    "hello there".send(@method, 3,0).should == ""
    "hello there".send(@method, 3,1).should == "l"
    "hello there".send(@method, 3,3).should == "lo "
    "hello there".send(@method, 3,6).should == "lo the"
    "hello there".send(@method, 3,9).should == "lo there"

    "hello there".send(@method, 4,0).should == ""
    "hello there".send(@method, 4,3).should == "o t"
    "hello there".send(@method, 4,6).should == "o ther"
    "hello there".send(@method, 4,9).should == "o there"

    "foo".send(@method, 2,1).should == "o"
    "foo".send(@method, 3,0).should == ""
    "foo".send(@method, 3,1).should == ""

    "".send(@method, 0,0).should == ""
    "".send(@method, 0,1).should == ""

    "x".send(@method, 0,0).should == ""
    "x".send(@method, 0,1).should == "x"
    "x".send(@method, 1,0).should == ""
    "x".send(@method, 1,1).should == ""

    "x".send(@method, -1,0).should == ""
    "x".send(@method, -1,1).should == "x"

    "hello there".send(@method, -3,2).should == "er"
  end

  it "returns a string with the same encoding as self" do
    s = "hello there"
    s.send(@method, 1, 9).encoding.should == s.encoding

    a = "hello".dup.force_encoding("binary")
    b = " there".dup.force_encoding("ISO-8859-1")
    c = (a + b).force_encoding(Encoding::US_ASCII)

    c.send(@method, 0, 5).encoding.should == Encoding::US_ASCII
    c.send(@method, 5, 6).encoding.should == Encoding::US_ASCII
    c.send(@method, 1, 3).encoding.should == Encoding::US_ASCII
    c.send(@method, 8, 2).encoding.should == Encoding::US_ASCII
    c.send(@method, 1, 10).encoding.should == Encoding::US_ASCII
  end

  it "returns nil if the offset falls outside of self" do
    "hello there".send(@method, 20,3).should == nil
    "hello there".send(@method, -20,3).should == nil

    "".send(@method, 1,0).should == nil
    "".send(@method, 1,1).should == nil

    "".send(@method, -1,0).should == nil
    "".send(@method, -1,1).should == nil

    "x".send(@method, 2,0).should == nil
    "x".send(@method, 2,1).should == nil

    "x".send(@method, -2,0).should == nil
    "x".send(@method, -2,1).should == nil

    "x".send(@method, fixnum_max, 1).should == nil
  end

  it "returns nil if the length is negative" do
    "hello there".send(@method, 4,-3).should == nil
    "hello there".send(@method, -4,-3).should == nil
  end

  it "calls to_int on the given index and the given length" do
    "hello".send(@method, 0.5, 1).should == "h"
    "hello".send(@method, 0.5, 2.5).should == "he"
    "hello".send(@method, 1, 2.5).should == "el"

    obj = mock('2')
    obj.should_receive(:to_int).exactly(4).times.and_return(2)

    "hello".send(@method, obj, 1).should == "l"
    "hello".send(@method, obj, obj).should == "ll"
    "hello".send(@method, 0, obj).should == "he"
  end

  it "raises a TypeError when idx or length can't be converted to an integer" do
    -> { "hello".send(@method, mock('x'), 0) }.should raise_error(TypeError)
    -> { "hello".send(@method, 0, mock('x')) }.should raise_error(TypeError)

    # I'm deliberately including this here.
    # It means that str.send(@method, other, idx) isn't supported.
    -> { "hello".send(@method, "", 0) }.should raise_error(TypeError)
  end

  it "raises a TypeError when the given index or the given length is nil" do
    -> { "hello".send(@method, 1, nil)   }.should raise_error(TypeError)
    -> { "hello".send(@method, nil, 1)   }.should raise_error(TypeError)
    -> { "hello".send(@method, nil, nil) }.should raise_error(TypeError)
  end

  it "raises a RangeError if the index or length is too big" do
    -> { "hello".send(@method, bignum_value, 1) }.should raise_error(RangeError)
    -> { "hello".send(@method, 0, bignum_value) }.should raise_error(RangeError)
  end

  it "returns String instances" do
    s = StringSpecs::MyString.new("hello")
    s.send(@method, 0,0).should be_an_instance_of(String)
    s.send(@method, 0,4).should be_an_instance_of(String)
    s.send(@method, 1,4).should be_an_instance_of(String)
  end

  it "handles repeated application" do
    "hello world".send(@method, 6, 5).send(@method, 0, 1).should == 'w'
    "hello world".send(@method, 6, 5).send(@method, 0, 5).should == 'world'

    "hello world".send(@method, 6, 5).send(@method, 1, 1).should == 'o'
    "hello world".send(@method, 6, 5).send(@method, 1, 4).should == 'orld'

    "hello world".send(@method, 6, 5).send(@method, 4, 1).should == 'd'
    "hello world".send(@method, 6, 5).send(@method, 5, 0).should == ''

    "hello world".send(@method, 6, 0).send(@method, -1, 0).should == nil
    "hello world".send(@method, 6, 0).send(@method, 1, 1).should == nil
  end
end

describe :string_slice_range, shared: true do
  it "returns the substring given by the offsets of the range" do
    "hello there".send(@method, 1..1).should == "e"
    "hello there".send(@method, 1..3).should == "ell"
    "hello there".send(@method, 1...3).should == "el"
    "hello there".send(@method, -4..-2).should == "her"
    "hello there".send(@method, -4...-2).should == "he"
    "hello there".send(@method, 5..-1).should == " there"
    "hello there".send(@method, 5...-1).should == " ther"

    "".send(@method, 0..0).should == ""

    "x".send(@method, 0..0).should == "x"
    "x".send(@method, 0..1).should == "x"
    "x".send(@method, 0...1).should == "x"
    "x".send(@method, 0..-1).should == "x"

    "x".send(@method, 1..1).should == ""
    "x".send(@method, 1..-1).should == ""
  end

  it "returns a String in the same encoding as self" do
    "hello there".encode("US-ASCII").send(@method, 1..1).encoding.should == Encoding::US_ASCII
  end

  it "returns nil if the beginning of the range falls outside of self" do
    "hello there".send(@method, 12..-1).should == nil
    "hello there".send(@method, 20..25).should == nil
    "hello there".send(@method, 20..1).should == nil
    "hello there".send(@method, -20..1).should == nil
    "hello there".send(@method, -20..-1).should == nil

    "".send(@method, -1..-1).should == nil
    "".send(@method, -1...-1).should == nil
    "".send(@method, -1..0).should == nil
    "".send(@method, -1...0).should == nil
  end

  it "returns an empty string if range.begin is inside self and > real end" do
    "hello there".send(@method, 1...1).should == ""
    "hello there".send(@method, 4..2).should == ""
    "hello".send(@method, 4..-4).should == ""
    "hello there".send(@method, -5..-6).should == ""
    "hello there".send(@method, -2..-4).should == ""
    "hello there".send(@method, -5..-6).should == ""
    "hello there".send(@method, -5..2).should == ""

    "".send(@method, 0...0).should == ""
    "".send(@method, 0..-1).should == ""
    "".send(@method, 0...-1).should == ""

    "x".send(@method, 0...0).should == ""
    "x".send(@method, 0...-1).should == ""
    "x".send(@method, 1...1).should == ""
    "x".send(@method, 1...-1).should == ""
  end

  it "returns String instances" do
    s = StringSpecs::MyString.new("hello")
    s.send(@method, 0...0).should be_an_instance_of(String)
    s.send(@method, 0..4).should be_an_instance_of(String)
    s.send(@method, 1..4).should be_an_instance_of(String)
  end

  it "calls to_int on range arguments" do
    from = mock('from')
    to = mock('to')

    # So we can construct a range out of them...
    from.should_receive(:<=>).twice.and_return(0)

    from.should_receive(:to_int).twice.and_return(1)
    to.should_receive(:to_int).twice.and_return(-2)

    "hello there".send(@method, from..to).should == "ello ther"
    "hello there".send(@method, from...to).should == "ello the"
  end

  it "works with Range subclasses" do
    a = "GOOD"
    range_incl = StringSpecs::MyRange.new(1, 2)
    range_excl = StringSpecs::MyRange.new(-3, -1, true)

    a.send(@method, range_incl).should == "OO"
    a.send(@method, range_excl).should == "OO"
  end

  it "handles repeated application" do
    "hello world".send(@method, 6..11).send(@method, 0..0).should == 'w'
    "hello world".send(@method, 6..11).send(@method, 0..4).should == 'world'

    "hello world".send(@method, 6..11).send(@method, 1..1).should == 'o'
    "hello world".send(@method, 6..11).send(@method, 1..4).should == 'orld'

    "hello world".send(@method, 6..11).send(@method, 4..4).should == 'd'
    "hello world".send(@method, 6..11).send(@method, 5..4).should == ''

    "hello world".send(@method, 6..5).send(@method, -1..-1).should == nil
    "hello world".send(@method, 6..5).send(@method, 1..1).should == nil
  end

  it "raises a type error if a range is passed with a length" do
    ->{ "hello".send(@method, 1..2, 1) }.should raise_error(TypeError)
  end

  it "raises a RangeError if one of the bound is too big" do
    -> { "hello".send(@method, bignum_value..(bignum_value + 1)) }.should raise_error(RangeError)
    -> { "hello".send(@method, 0..bignum_value) }.should raise_error(RangeError)
  end

  it "works with endless ranges" do
    "hello there".send(@method, eval("(2..)")).should == "llo there"
    "hello there".send(@method, eval("(2...)")).should == "llo there"
    "hello there".send(@method, eval("(-4..)")).should == "here"
    "hello there".send(@method, eval("(-4...)")).should == "here"
  end

  it "works with beginless ranges" do
    "hello there".send(@method, (..5)).should == "hello "
    "hello there".send(@method, (...5)).should == "hello"
    "hello there".send(@method, (..-4)).should == "hello th"
    "hello there".send(@method, (...-4)).should == "hello t"
    "hello there".send(@method, (...nil)).should == "hello there"
  end
end

describe :string_slice_regexp, shared: true do
  it "returns the matching portion of self" do
    "hello there".send(@method, /[aeiou](.)\1/).should == "ell"
    "".send(@method, //).should == ""
  end

  it "returns nil if there is no match" do
    "hello there".send(@method, /xyz/).should == nil
  end

  it "returns a String in the same encoding as self" do
    "hello there".encode("US-ASCII").send(@method, /[aeiou](.)\1/).encoding.should == Encoding::US_ASCII
  end

  it "returns String instances" do
    s = StringSpecs::MyString.new("hello")
    s.send(@method, //).should be_an_instance_of(String)
    s.send(@method, /../).should be_an_instance_of(String)
  end

  it "sets $~ to MatchData when there is a match and nil when there's none" do
    'hello'.send(@method, /./)
    $~[0].should == 'h'

    'hello'.send(@method, /not/)
    $~.should == nil
  end
end

describe :string_slice_regexp_index, shared: true do
  it "returns the capture for the given index" do
    "hello there".send(@method, /[aeiou](.)\1/, 0).should == "ell"
    "hello there".send(@method, /[aeiou](.)\1/, 1).should == "l"
    "hello there".send(@method, /[aeiou](.)\1/, -1).should == "l"

    "har".send(@method, /(.)(.)(.)/, 0).should == "har"
    "har".send(@method, /(.)(.)(.)/, 1).should == "h"
    "har".send(@method, /(.)(.)(.)/, 2).should == "a"
    "har".send(@method, /(.)(.)(.)/, 3).should == "r"
    "har".send(@method, /(.)(.)(.)/, -1).should == "r"
    "har".send(@method, /(.)(.)(.)/, -2).should == "a"
    "har".send(@method, /(.)(.)(.)/, -3).should == "h"
  end

  it "returns nil if there is no match" do
    "hello there".send(@method, /(what?)/, 1).should == nil
  end

  it "returns nil if the index is larger than the number of captures" do
    "hello there".send(@method, /hello (.)/, 2).should == nil
    # You can't refer to 0 using negative indices
    "hello there".send(@method, /hello (.)/, -2).should == nil
  end

  it "returns nil if there is no capture for the given index" do
    "hello there".send(@method, /[aeiou](.)\1/, 2).should == nil
  end

  it "returns nil if the given capture group was not matched but still sets $~" do
    "test".send(@method, /te(z)?/, 1).should == nil
    $~[0].should == "te"
    $~[1].should == nil
  end

  it "returns a String in the same encoding as self" do
    "hello there".encode("US-ASCII").send(@method, /[aeiou](.)\1/, 0).encoding.should == Encoding::US_ASCII
  end

  it "calls to_int on the given index" do
    obj = mock('2')
    obj.should_receive(:to_int).and_return(2)

    "har".send(@method, /(.)(.)(.)/, 1.5).should == "h"
    "har".send(@method, /(.)(.)(.)/, obj).should == "a"
  end

  it "raises a TypeError when the given index can't be converted to Integer" do
    -> { "hello".send(@method, /(.)(.)(.)/, mock('x')) }.should raise_error(TypeError)
    -> { "hello".send(@method, /(.)(.)(.)/, {})        }.should raise_error(TypeError)
    -> { "hello".send(@method, /(.)(.)(.)/, [])        }.should raise_error(TypeError)
  end

  it "raises a TypeError when the given index is nil" do
    -> { "hello".send(@method, /(.)(.)(.)/, nil) }.should raise_error(TypeError)
  end

  it "returns String instances" do
    s = StringSpecs::MyString.new("hello")
    s.send(@method, /(.)(.)/, 0).should be_an_instance_of(String)
    s.send(@method, /(.)(.)/, 1).should be_an_instance_of(String)
  end

  it "sets $~ to MatchData when there is a match and nil when there's none" do
    'hello'.send(@method, /.(.)/, 0)
    $~[0].should == 'he'

    'hello'.send(@method, /.(.)/, 1)
    $~[1].should == 'e'

    'hello'.send(@method, /not/, 0)
    $~.should == nil
  end
end

describe :string_slice_string, shared: true do
  it "returns other_str if it occurs in self" do
    s = "lo"
    "hello there".send(@method, s).should == s
  end

  it "doesn't set $~" do
    $~ = nil

    'hello'.send(@method, 'll')
    $~.should == nil
  end

  it "returns nil if there is no match" do
    "hello there".send(@method, "bye").should == nil
  end

  it "doesn't call to_str on its argument" do
    o = mock('x')
    o.should_not_receive(:to_str)

    -> { "hello".send(@method, o) }.should raise_error(TypeError)
  end

  it "returns a String instance when given a subclass instance" do
    s = StringSpecs::MyString.new("el")
    r = "hello".send(@method, s)
    r.should == "el"
    r.should be_an_instance_of(String)
  end
end

describe :string_slice_regexp_group, shared: true do
  not_supported_on :opal do
    it "returns the capture for the given name" do
      "hello there".send(@method, /(?<g>[aeiou](.))/, 'g').should == "el"
      "hello there".send(@method, /[aeiou](?<g>.)/, 'g').should == "l"

      "har".send(@method, /(?<g>(.)(.)(.))/, 'g').should == "har"
      "har".send(@method, /(?<h>.)(.)(.)/, 'h').should == "h"
      "har".send(@method, /(.)(?<a>.)(.)/, 'a').should == "a"
      "har".send(@method, /(.)(.)(?<r>.)/, 'r').should == "r"
      "har".send(@method, /(?<h>.)(?<a>.)(?<r>.)/, 'r').should == "r"
    end

    it "returns the last capture for duplicate names" do
      "hello there".send(@method, /(?<g>h)(?<g>.)/, 'g').should == "e"
      "hello there".send(@method, /(?<g>h)(?<g>.)(?<f>.)/, 'g').should == "e"
    end

    it "returns the innermost capture for nested duplicate names" do
      "hello there".send(@method, /(?<g>h(?<g>.))/, 'g').should == "e"
    end

    it "returns nil if there is no match" do
      "hello there".send(@method, /(?<whut>what?)/, 'whut').should be_nil
    end

    it "raises an IndexError if there is no capture for the given name" do
      -> do
        "hello there".send(@method, /[aeiou](.)\1/, 'non')
      end.should raise_error(IndexError)
    end

    it "raises a TypeError when the given name is not a String" do
      -> { "hello".send(@method, /(?<q>.)/, mock('x')) }.should raise_error(TypeError)
      -> { "hello".send(@method, /(?<q>.)/, {})        }.should raise_error(TypeError)
      -> { "hello".send(@method, /(?<q>.)/, [])        }.should raise_error(TypeError)
    end

    it "raises an IndexError when given the empty String as a group name" do
      -> { "hello".send(@method, /(?<q>)/, '') }.should raise_error(IndexError)
    end

    it "returns String instances" do
      s = StringSpecs::MyString.new("hello")
      s.send(@method, /(?<q>.)/, 'q').should be_an_instance_of(String)
    end

    it "sets $~ to MatchData when there is a match and nil when there's none" do
      'hello'.send(@method, /(?<hi>.(.))/, 'hi')
      $~[0].should == 'he'

      'hello'.send(@method, /(?<non>not)/, 'non')
      $~.should be_nil
    end
  end
end

describe :string_slice_symbol, shared: true do
  it "raises TypeError" do
    -> { 'hello'.send(@method, :hello) }.should raise_error(TypeError)
  end
end
