require File.expand_path(File.join(File.dirname(__FILE__), "..", "spec_helper"))
require "usher"
require 'rack'

describe "Usher URL generation" do

  before(:each) do
    @route_set = Usher.new(:generator => Usher::Util::Generators::URL.new)
    @route_set.reset!
  end

  it "should generate a simple URL" do
    @route_set.add_named_route(:sample, '/sample', :controller => 'sample', :action => 'action')
    @route_set.generator.generate(:sample, {}).should == '/sample'
  end

  it "should generate a simple URL with a single variable" do
    @route_set.add_named_route(:sample, '/sample/:action', :controller => 'sample')
    @route_set.generator.generate(:sample, {:action => 'action'}).should == '/sample/action'
  end

  it "should generate a simple URL with a single variable (and escape)" do
    @route_set.add_named_route(:sample, '/sample/:action', :controller => 'sample')
    @route_set.generator.generate(:sample, {:action => 'action time'}).should == '/sample/action%20time'
  end

  it "should generate a simple URL with a single variable (thats not a string)" do
    @route_set.add_named_route(:sample, '/sample/:action/:id', :controller => 'sample')
    @route_set.generator.generate(:sample, {:action => 'action', :id => 123}).should == '/sample/action/123'
  end

  it "should generate a simple URL with a glob variable" do
    @route_set.add_named_route(:sample, '/sample/*action', :controller => 'sample')
    @route_set.generator.generate(:sample, {:action => ['foo', 'baz']}).should == '/sample/foo/baz'
  end

  it "should generate a mutliple vairable URL from a hash" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    @route_set.generator.generate(:sample, {:first => 'zoo', :second => 'maz'}).should == '/sample/zoo/maz'
  end

  it "should generate a mutliple vairable URL from an array" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    @route_set.generator.generate(:sample, ['maz', 'zoo']).should == '/sample/maz/zoo'
  end

  it "should generate append extra hash variables to the end" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    @route_set.generator.generate(:sample, {:first => 'maz', :second => 'zoo', :third => 'zanz'}).should == '/sample/maz/zoo?third=zanz'
  end

  it "should generate append extra hash variables to the end (when the first parts are an array)" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    ['/sample/maz/zoo?four=jane&third=zanz', '/sample/maz/zoo?third=zanz&four=jane'].include?(@route_set.generator.generate(:sample, ['maz', 'zoo', {:third => 'zanz', :four => 'jane'}])).should == true
  end

  it "should generate append extra hash variables to the end using [] syntax if its an array" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    @route_set.generator.generate(:sample, {:first => 'maz', :second => 'zoo', :third => ['zanz', 'susie']}).should == '/sample/maz/zoo?third%5B%5D=zanz&third%5B%5D=susie'
  end

  it "should generate a mutliple vairable URL from an array" do
    @route_set.add_named_route(:sample, '/sample/:first/:second', :controller => 'sample')
    @route_set.generator.generate(:sample, ['maz', 'zoo']).should == '/sample/maz/zoo'
  end

  it "should generate a simple URL with a format" do
    @route_set.add_named_route(:sample, '/sample/:action.:format', :controller => 'sample')
    @route_set.generator.generate(:sample, {:action => 'action', :format => 'html'}).should == '/sample/action.html'
  end

  it "should generate from parameters" do
    caf = @route_set.add_route('/:controller/:action.:format')
    ca = @route_set.add_route('/:controller/:action')
    @route_set.generator.generate(nil, {:controller => 'controller', :action => 'action'}).should == '/controller/action'
    @route_set.generator.generate(nil, {:controller => 'controller', :action => 'action', :format => 'html'}).should == '/controller/action.html'
  end

  it "should use the first route when generating a URL from two ambiguous routes" do
    @route_set.add_route('/:controller/:action')
    @route_set.add_route('/:action/:controller')
    @route_set.generator.generate(nil, {:controller => 'controller', :action => 'action'}).should == '/controller/action'
  end

  it "should accept an array of parameters" do
    caf = @route_set.add_named_route(:name, '/:controller/:action.:format')
    @route_set.generator.generate(:name, ['controller', 'action', 'html']).should == '/controller/action.html'
  end

  it "should generate a route with a specific host" do
    caf = @route_set.add_named_route(:name, '/:controller/:action.:format', :generate_with => {:host => 'www.slashdot.org', :port => 80})
    @route_set.generator.generate_full(:name, Rack::Request.new(Rack::MockRequest.env_for("http://localhost:8080")), ['controller', 'action', 'html']).should == 'http://www.slashdot.org/controller/action.html'
  end

  it "should require all the parameters (hash) to generate a route" do
    proc{@route_set.generator.generate(@route_set.add_route('/:controller/:action'), {:controller => 'controller'})}.should raise_error(Usher::MissingParameterException)
  end

  it "should generate from a route" do
    @route_set.generator.generate(@route_set.add_route('/:controller/:action'), {:controller => 'controller', :action => 'action'}).should == '/controller/action'
  end

  it "should require all the parameters (array) to generate a route" do
    @route_set.add_named_route(:name, '/:controller/:action.:format')
    proc {@route_set.generator.generate(:name, ['controller', 'action'])}.should raise_error(Usher::MissingParameterException)
  end

  it "should generate a route when only one parameter is given" do
    @route_set.add_named_route(:name, '/:controller')
    @route_set.generator.generate(:name, 'controller').should == '/controller'
  end

  it "should generate the correct route from a route containing optional parts" do
    @route_set.add_named_route(:name, '/:controller(/:action(/:id))')
    @route_set.generator.generate(:name, {:controller => 'controller'}).should == '/controller'
    @route_set.generator.generate(:name, {:controller => 'controller', :action => 'action'}).should == '/controller/action'
    @route_set.generator.generate(:name, {:controller => 'controller', :action => 'action', :id => 'id'}).should == '/controller/action/id'
  end

  it "should generate a route using defaults for everything but the first parameter" do
    @route_set.add_named_route(:name, '/:one/:two/:three', {:default_values => {:one => 'one', :two => 'two', :three => 'three'}})
    @route_set.generator.generate(:name, {:one => "1"}).should == '/1/two/three'
  end

  it "should generate a route using defaults for everything" do
    @route_set.add_named_route(:name, '/:one/:two/:three', {:default_values => {:one => 'one', :two => 'two', :three => 'three'}})
    @route_set.generator.generate(:name).should == '/one/two/three'
  end

  it "should generate a route using defaults and optionals using the last parameter" do
    @route_set.add_named_route(:opts_with_defaults, '/:one(/:two(/:three))', {:default_values => {:one => '1', :two => '2', :three => '3'}})
    @route_set.generator.generate(:opts_with_defaults, {:three => 'three'}).should == '/1/2/three'
  end

  it "should generate a route with optional segments given two nested optional parameters" do
    @route_set.add_named_route(:optionals, '/:controller(/:action(/:id))(.:format)')
    @route_set.generator.generate(:optionals, {:controller => "foo", :action => "bar"}).should == '/foo/bar'
  end

  it "should generate a route with default values that aren't represented in the path" do
    @route_set.add_named_route(:default_values_not_in_path, '/:controller', :default_values => {:page => 1})
    @route_set.generator.generate(:default_values_not_in_path, {:controller => "foo"}).should == '/foo?page=1'
  end

  describe "with consider_destination_keys enabled" do
    
    before(:each) do
      @route_set = Usher.new(:generator => Usher::Util::Generators::URL.new, :consider_destination_keys => true)
      @route_set.reset!
    end

    it "should generate direct unnamed paths" do
      @route_set.add_route('/profiles', :controller => 'profiles', :action => 'edit')
      @route_set.add_route('/users', :controller => 'users', :action => 'index')
      @route_set.generator.generate(nil, :controller => 'profiles', :action => 'edit').should == '/profiles'
      @route_set.generator.generate(nil, :controller => 'users', :action => 'index').should == '/users'
    end
  end

  describe "when named route was added with string key" do
    before :each do
      @route_set.add_named_route 'items', '/items', :controller => 'items', :action => 'index'
    end

    it "should generate a named route by given symbolic key" do
      @route_set.generator.generate(:items).should == '/items'
    end
  end

  describe "#generate_start" do
    before :all do
      UrlParts = Usher::Util::Generators::URL::UrlParts
      @url_parts_stub = UrlParts.new :some_path, :some_request
      UrlParts.stub! :new => @url_parts_stub
    end

    describe "when url does not end with /" do
      before :each do
        @url_parts_stub.stub! :url => 'http://localhost'
      end

      it "should just return an url given by UrlParts" do
        @route_set.generator.generate_start(:some_path, :some_request).should == 'http://localhost'
      end
    end

    describe "when url ends with /" do
      before :each do
        @url_parts_stub.stub! :url => 'http://localhost/'
      end

      it "should strip trailing slash" do
        @route_set.generator.generate_start(:some_path, :some_request).should == 'http://localhost'
      end
    end
  end

  describe "#generate_full" do
    shared_examples_for "correct routes generator" do
      describe "when request is a Rack::Request (Rails >= 2.3)" do
        before :each do          
          @route_set.add_named_route :items, '/items'
          @request = Rack::Request.new(Rack::MockRequest.env_for(@url))
        end

        it "should generate an URL correctly" do
          @route_set.generator.generate_full(:items, @request).should == @url + '/items'
        end
      end

      describe "when request is a AbstractRequest (Rails <= 2.2)" do
        before :each do          
          @route_set.add_named_route :items, '/items'

          @request = Struct.new(:url, :protocol, :host, :port).new(@url.dup, "#{@scheme}://", @host, @port)
        end

        it "should generate an URL correctly" do
          @route_set.generator.generate_full(:items, @request).should == @url + '/items'
        end
      end

      describe "when data is provided in @generated_with" do
        before :each do
          @route_set.add_named_route :items, '/items', :generate_with => { :scheme => @scheme, :host => @host, :port => @port }
          @request = Rack::Request.new(Rack::MockRequest.env_for('ftp://something-another:9393'))
        end

        it "should generate an URL correctly" do
          @route_set.generator.generate_full(:items, @request).should == @url + '/items'
        end
      end
    end

    describe "when protocol is http" do
      describe "whem port is 80" do
        before :each do
          @scheme, @host, @port = 'http', 'localhost', 80
          @url = 'http://localhost'
        end

        it_should_behave_like "correct routes generator"
      end

      describe "when port is custom" do
        before :each do
          @scheme, @host, @port = 'http', 'localhost', 8080
          @url = 'http://localhost:8080'
        end

        it_should_behave_like "correct routes generator"
      end
    end

    describe "when protocol is https" do
      describe "whem port is 443 (standard)" do
        before :each do
          @scheme, @host, @port = 'https', 'localhost', 443
          @url = 'https://localhost'
        end

        it_should_behave_like "correct routes generator"
      end

      describe "when port is custom" do
        before :each do
          @scheme, @host, @port = 'https', 'localhost', 8443
          @url = 'https://localhost:8443'
        end

        it_should_behave_like "correct routes generator"
      end
    end
  end

  describe "#path_for_routing_lookup" do
    describe "when direct route exists" do
      before :each do
        @route_set = Usher.new(:generator => Usher::Util::Generators::URL.new, :consider_destination_keys => true)
        @route = @route_set.add_named_route(:direct_path, '/some-neat-name', :controller => 'foo', :action => 'bar')
      end

      it "should return exactly this route" do
        @route_set.generator.path_for_routing_lookup(nil, :controller => 'foo', :action => 'bar').should == @route.paths.first
      end
    end
  end

  describe "nested generation" do
    before do
      @route_set2 = Usher.new(:generator => Usher::Util::Generators::URL.new)
      @route_set3 = Usher.new(:generator => Usher::Util::Generators::URL.new)
      @route_set4 = Usher.new(:generator => Usher::Util::Generators::URL.new)

      @route_set.add_named_route(:simple,   "/mount_point").match_partially!.to(@route_set2)
      @route_set.add_route("/third/:foo", :default_values => {:foo => "foo"}).match_partially!.to(@route_set3)
      @route_set.add_route("/fourth/:bar").match_partially!.to(@route_set4)

      @route_set2.add_named_route(:nested_simple,   "/nested/simple",     :controller => "nested",  :action => "simple")
      @route_set2.add_named_route(:nested_complex,  "/another_nested(/:complex)", :controller => "nested",  :action => "complex")

      @route_set3.add_named_route(:nested_simple, "/nested/simple", :controller => "nested", :action => "simple")
      @route_set3.add_named_route(:nested_complex,  "/another_nested(/:complex)", :controller => "nested",  :action => "complex")

      @route_set4.add_named_route(:nested_simple, "/nested/simple", :controller => "nested", :action => "simple")
    end

    it "should generate a route for the simple nested route" do
      @route_set2.generator.generate(:nested_simple).should == "/mount_point/nested/simple"
    end

    it "should generate a simple route without optional segments" do
      @route_set2.generator.generate(:nested_complex).should == "/mount_point/another_nested"
    end

    it "should generate a route with optional segements" do
      @route_set2.generator.generate(:nested_complex, :complex => "foo").should == "/mount_point/another_nested/foo"
    end

    it "should genearte a route with the specified value for the parent route" do
      @route_set3.generator.generate(:nested_simple, :foo => "bar").should == "/third/bar/nested/simple"
    end

    it "should generate a route with the default value from the parent route" do
      @route_set3.generator.generate(:nested_simple).should == "/third/foo/nested/simple"
    end

    it "should generate a route with an optional segement in the parent and child" do
      @route_set3.generator.generate(:nested_complex, :complex => "complex").should == "/third/foo/another_nested/complex"
    end

    it "should generate a route without the optional value from the child" do
      @route_set3.generator.generate(:nested_complex).should == "/third/foo/another_nested"
    end

    it "should raise an exception when trying to generate a route where the parent variable is not defined and does not have a default value" do
      lambda do
        @route_set4.generator.generate(:nested_simple)
      end.should raise_error(Usher::MissingParameterException)
    end

    describe "generate_base_url" do
      it "should generate a base url for a non nested router" do
        @route_set.generator.generate_base_url.should == "/"
      end

      it "should generate a base url for a nested router" do
        @route_set2.generator.generate_base_url.should == "/mount_point"
      end

      it "should generate a base url with parameters" do
        @route_set4.generator.generate_base_url(:bar => "the_bar").should == "/fourth/the_bar"
      end

      it "should generate a base url with a default route" do
        @route_set.generator.generate_base_url(:default => "/foo").should == "/foo"
      end

      it "should generate a base url with a default that is not a /" do
        @route_set.generator.generate_base_url(:default => ":").should == ":"
      end

      it "should generate a base url with a default of a blank string" do
        @route_set.generator.generate_base_url(:default => "").should == ""
        @route_set.generator.generate_base_url(:default => nil).should == ""
      end
    end
  end

  describe "dupped generation" do
    before(:each) do
      @r1 = Usher.new(:generator => Usher::Util::Generators::URL.new)
      @r2 = Usher.new(:generator => Usher::Util::Generators::URL.new)
      @r3 = Usher.new(:generator => Usher::Util::Generators::URL.new)

      @r1.add_route("/r1", :router => "r1").name(:route)
      @r2.add_route("/r2", :router => "r2").name(:route)
      @r3.add_route("/r3", :router => "r3").name(:route)
    end

    it "should generate dupped routes" do
      @r1.generator.generate(:route).should == "/r1"
      r1 = @r1.dup
      r1.generator.generate(:route).should == "/r1"
    end

    it "should not generate new routes added to a dup on the original" do
      r1 = @r1.dup
      r1.add_route("/new_r1", :router => "r4").name(:new_route)
      lambda do
        @r1.generator.generate(:new_route).should be_nil
      end
    end

    it "should generate new routes added to a dup" do
      r1 = @r1.dup
      r1.add_route("/new_r1", :router => "r4").name(:new_route)
      r1.generator.generate(:new_route).should == "/new_r1"
    end

    it "should generate a route for a nested usher" do
      @r1.add_route("/mounted").match_partially!.to(@r2)
      @r2.generator.generate(:route).should == "/mounted/r2"
    end

    it "should generate a route for a dupped nested usher" do
      r3 = @r3.dup
      @r1.add_route("/mounted").match_partially!.to(r3)
      r3.generator.generate(:route).should == "/mounted/r3"
    end

    it "should generate a route for 2 differently mounted dupped ushers" do
      r21 = @r2.dup
      r22 = @r2.dup

      @r1.add_route("/mounted").match_partially!.to(r21)
      @r1.add_route("/other_mount").match_partially!.to(r22)

      r21.generator.generate(:route).should == "/mounted/r2"
      r22.generator.generate(:route).should == "/other_mount/r2"
      @r2.generator.generate(:route).should == "/r2"
    end
  end
end