<?php

class GP_Test_Urls extends GP_UnitTestCase {

	function setUp() {
		parent::setUp();

		$this->home_url = 'http://example.org';
		$this->sub_dir = '/glotpress/';
		$this->url = user_trailingslashit( $this->home_url . $this->sub_dir );

		$this->base_path_emtpy_string = '';
		$this->base_path_single_slash = '/';

		add_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_sub_dir' ) );
		add_filter( 'option_home', array( $this, '_gp_url_home_url' ) );
	}

	function teardown() {
		parent::tearDown();

		remove_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_sub_dir' ) );
		remove_filter( 'option_home', array( $this, '_gp_url_home_url' ) );
	}

	function _gp_url_base_path_sub_dir() {
		return user_trailingslashit( $this->sub_dir );
	}

	function _gp_url_home_url() {
		return $this->home_url;
	}

	function test_gp_url_should_just_add_simple_path_string_if_query_is_missing() {
		$this->assertEquals( $this->sub_dir . 'baba', gp_url( 'baba' ) );
	}
	function test_gp_url_should_not_add_query_string_if_query_is_empty_string() {
		$this->assertEquals( $this->sub_dir . 'baba', gp_url( 'baba', '' ) );
	}

	function test_gp_url_should_not_add_query_string_if_query_is_empty_array() {
		$this->assertEquals( $this->sub_dir . 'baba', gp_url( 'baba', array() ) );
	}

	function test_gp_url_should_properly_add_query_string_if_path_is_empty() {
		$this->assertEquals( user_trailingslashit( $this->sub_dir ) . '?a=b', gp_url( '', '?a=b' ) );
	}

	function test_gp_url_should_add_question_mark_if_query_string_does_not_have_one() {
		$this->assertEquals( $this->sub_dir . 'baba?a=b', gp_url( 'baba', 'a=b' ) );
	}

	function test_gp_url_should_expand_query_array() {
		$this->assertEquals( user_trailingslashit( $this->sub_dir ) . '?a=b', gp_url( '', array('a' => 'b') ) );
	}

	function test_gp_url_should_add_ampersand_if_path_is_empty_and_query_array_has_more_than_one_value() {
		$this->assertEquals( user_trailingslashit( $this->sub_dir ) . '?a=b&b=c', gp_url( '', array('a' => 'b', 'b' => 'c') ) );
	}

	function test_gp_url_should_add_ampersand_if_query_array_has_more_than_one_value() {
		$this->assertEquals( $this->sub_dir . 'baba?a=b&b=c', gp_url( 'baba', array('a' => 'b', 'b' => 'c') ) );
	}

	function test_gp_url_should_not_add_double_slash_if_path_starts_with_slash() {
		$this->assertEquals( $this->sub_dir . 'baba/wink', gp_url( '/baba/wink' ) );
	}

	function test_gp_url_should_urlencode_query_var_values() {
		$this->assertEquals( $this->sub_dir . 'baba?a=a%26b&b=c', gp_url( 'baba', array('a' => 'a&b', 'b' => 'c') ) );
	}

	function test_gp_url_join_should_return_the_string_if_single_string_without_slashes_is_passed() {
		$this->assertEquals( 'baba', gp_url_join( 'baba' ) );
	}

	function test_gp_url_join_should_join_with_slash_two_strings_without_slashes() {
		$this->assertEquals( 'baba/dyado', gp_url_join( 'baba', 'dyado' ) );
	}

	function test_gp_url_join_should_include_only_one_slash_if_first_string_ends_with_slash_and_next_begins_with_slash() {
		$this->assertEquals( 'baba/dyado', gp_url_join( 'baba/', '/dyado' ) );
	}

	function test_gp_url_join_should_discard_multiple_slashes_in_the_end_of_component() {
		$this->assertEquals( '/baba/dyado', gp_url_join( '/baba//', 'dyado' ) );
	}

	function test_gp_url_join_should_discard_multiple_slashes_in_the_beginning_of_component() {
		$this->assertEquals( '/baba/dyado', gp_url_join( '/baba/', '//dyado' ) );
	}

	function test_gp_url_join_should_not_discard_slash_if_the_whole_first_component_is_slash() {
			$this->assertEquals( user_trailingslashit( '/baba/' ), gp_url_join( '/baba/', '/' ) );
			$this->assertEquals( user_trailingslashit( '/baba/' ), gp_url_join( '/baba/', '//' ) );
	}

	function test_gp_url_join_should_not_discard_slash_if_the_whole_last_component_is_slash() {
			$this->assertEquals( user_trailingslashit( '/baba/' ), gp_url_join( '/', '/baba/' ) );
			$this->assertEquals( user_trailingslashit( '/baba/' ), gp_url_join( '//', '/baba/' ) );
	}

	function test_gp_url_join_should_return_only_one_slash_if_the_only_component_is_a_slash() {
		$this->assertEquals( user_trailingslashit( '/' ), gp_url_join( '/' ) );
	}

	function test_gp_url_join_should_return_only_one_slash_if_all_components_are_slashes() {
		$this->assertEquals( user_trailingslashit( '/' ), gp_url_join( '/', '/' ) );
	}

	function test_gp_url_join_should_return_only_one_slash_if_all_components_are_multiple_slashes() {
		$this->assertEquals( user_trailingslashit( '/' )	, gp_url_join( '///', '///' ) );
	}

	function test_gp_url_join_should_skip_empty_components() {
		$this->assertEquals( 'a/b', gp_url_join( 'a', '', 'b' ) );
	}

	function test_gp_url_join_should_skip_empty_components_in_the_beginning() {
		$this->assertEquals( 'a/b', gp_url_join( '', 'a', 'b' ) );
	}

	function test_gp_url_join_should_skip_empty_components_in_the_end() {
		$this->assertEquals( 'a/b', gp_url_join( 'a', 'b', '' ) );
	}

	function test_gp_url_join_should_accept_array_component_with_one_element_and_return_this_element() {
		$this->assertEquals( 'baba', gp_url_join( array( 'baba' ) ) );
	}

	function test_gp_url_join_should_join_array_component_values_as_if_they_were_given_as_different_arguments() {
		$this->assertEquals( 'baba/dyado', gp_url_join( array( 'baba', 'dyado' ) ) );
	}

	function test_gp_url_join_should_flatten_nested_arrays() {
		$this->assertEquals( 'baba/dyado/chicho/lelya', gp_url_join( array( 'baba', array( 'dyado', array( 'chicho' ), 'lelya' ) ) ) );
	}

	function test_gp_url_join_should_return_empty_string_with_nested_empty_arrays() {
		$this->assertEquals( '', gp_url_join( array( array() ), array() ) );
	}

	function test_gp_url_join_should_not_break_http() {
		$this->assertEquals( 'http://dir.bg/baba', gp_url_join( 'http://dir.bg/', 'baba' ) );
	}

	function test_gp_url_join_should_not_break_https() {
		$this->assertEquals( 'https://dir.bg/baba', gp_url_join( 'https://dir.bg/', 'baba' ) );
	}

	function test_gp_url_project_should_join_its_arguments() {
		$url_from_gp_url_project = gp_url_project( '/x', 'import-originals' );
		$url_manually_joined = gp_url_join( gp_url_project( '/x' ), 'import-originals' );
 		$this->assertEquals( $url_manually_joined, $url_from_gp_url_project );
	}

	function test_gp_url_project_should_join_its_array_arguments() {
		$url_from_gp_url_project = gp_url_project( '/x', array( 'slug', 'slugslug', 'import-translations' ) );
		$url_manually_joined = gp_url_join( gp_url_project( '/x' ), 'slug', 'slugslug', 'import-translations' );
		$this->assertEquals( $url_manually_joined, $url_from_gp_url_project );
	}

	function test_gp_url_current_should_return_http_url() {
		$server_vars = $_SERVER;
		$_SERVER['HTTPS'] = 0;
		$_SERVER['HTTP_HOST'] = 'glotpress.org';
		$_SERVER['REQUEST_URI'] = '/';
		$_SERVER['SERVER_PORT'] = 80;
		$this->assertEquals( 'http://glotpress.org/', gp_url_current() );
		$_SERVER = $server_vars;
	}

	function test_gp_url_current_should_return_https_url() {
		$server_vars = $_SERVER;
		$_SERVER['HTTPS'] = 1;
		$_SERVER['HTTP_HOST'] = 'glotpress.org';
		$_SERVER['REQUEST_URI'] = '/';
		$_SERVER['SERVER_PORT'] = 443;
		$this->assertEquals( 'https://glotpress.org/', gp_url_current() );
		$_SERVER = $server_vars;
	}

	function test_gp_url_current_should_return_non_standard_port_url() {
		$server_vars = $_SERVER;
		$_SERVER['HTTPS'] = 0;
		$_SERVER['HTTP_HOST'] = 'glotpress.org:8888';
		$_SERVER['REQUEST_URI'] = '/';
		$_SERVER['SERVER_PORT'] = 8888;
		$this->assertEquals( 'http://glotpress.org:8888/', gp_url_current() );
		$_SERVER = $server_vars;
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_base_path_filter() {
		remove_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_sub_dir' ) );
		add_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_filter_single_slash' ) );

		$this->assertSame( $this->base_path_single_slash, gp_url_base_path() );
		$this->assertSame( 'http://example.org' . $this->base_path_single_slash, gp_url_public_root() );

		remove_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_filter_single_slash' ) );
	}

	function _gp_url_base_path_filter_single_slash() {
		return $this->base_path_single_slash;
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_returns_leading_slash_when_permalinks_have_no_trailing_slash() {
		remove_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_sub_dir' ) );
		add_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_filter_empty_string' ) );
		$this->set_permalink_structure( GP_TESTS_PERMALINK_STRUCTURE );

		$this->assertSame( '/foo/bar', gp_url( 'foo/bar' ) );

		remove_filter( 'gp_url_base_path', array( $this, '_gp_url_base_path_filter_empty_string' ) );
	}

	function _gp_url_base_path_filter_empty_string() {
		return $this->base_path_emtpy_string;
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_path_returns_single_slash() {
		$this->assertSame( '/', gp_url_path( 'http://glotpress.org/' ) );
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_path_returns_empty_string_if_url_has_no_path() {
		$this->assertSame( '', gp_url_path( 'http://glotpress.org' ) );
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_public_root_has_no_trailing_slash_when_permalinks_have_no_trailing_slash() {
		$this->set_permalink_structure( GP_TESTS_PERMALINK_STRUCTURE );

		$this->assertTrue( '/' !== substr( gp_url_public_root(), -1 ) );
	}

	/**
	 * @ticket gh-203
	 */
	function test_gp_url_public_root_has_a_trailing_slash_when_permalinks_have_a_trailing_slash() {
		$this->set_permalink_structure( GP_TESTS_PERMALINK_STRUCTURE_WITH_TRAILING_SLASH );

		$this->assertTrue( '/' === substr( gp_url_public_root(), -1 ) );
	}
}