use Test::Nginx::Socket 'no_plan';

master_on();
repeat_each(1);

our $prefix = "prefix";
our $longer = "longer";
$ENV{TEST_ENV_SAME_PREFIX} = $prefix;
$ENV{TEST_ENV_SAME_PREFIX_LONGER} = $longer;

add_block_preprocessor(sub {
    my ($block) = @_;

    if (!$block->request) {
        $block->set_value("request", "GET /t");
    }

    my $config = $block->config // "";
    $config .= <<_EOC_;
    location = /t {
    	content_by_lua_block {
            local prefix = os.getenv("TEST_ENV_SAME_PREFIX")                 
            local longer = os.getenv("TEST_ENV_SAME_PREFIX_LONGER")
            assert(prefix == "$::prefix" and longer == "$::longer")
        }
	}
_EOC_

    $block->set_value("config", $config);
});

run_tests();

__DATA__

=== TEST 1: assignment style, the PREFIX 1st - incorrect
--- main_config eval
qq/
env TEST_ENV_SAME_PREFIX=$::prefix;
env TEST_ENV_SAME_PREFIX_LONGER=$::longer;
/
--- http_config eval
qq/
    init_by_lua_block {
        local prefix = os.getenv("TEST_ENV_SAME_PREFIX")                 
        local longer = os.getenv("TEST_ENV_SAME_PREFIX_LONGER")
        assert(prefix == "$::prefix" and longer == "$::prefix")
    }
/



=== TEST 2: assignment style, the LONGER 1st - correct
--- main_config eval
qq/
env TEST_ENV_SAME_PREFIX_LONGER=$::longer;
env TEST_ENV_SAME_PREFIX=$::prefix;
/
--- http_config eval
qq/
    init_by_lua_block {
        local prefix = os.getenv("TEST_ENV_SAME_PREFIX")                 
        local longer = os.getenv("TEST_ENV_SAME_PREFIX_LONGER")
        assert(prefix == "$::prefix" and longer == "$::longer")
    }
/

    

=== TEST 3: declaration style, the LONGER 1st - correct
--- main_config
env TEST_ENV_SAME_PREFIX_LONGER;
env TEST_ENV_SAME_PREFIX;
--- http_config eval
qq/
    init_by_lua_block {
        local prefix = os.getenv("TEST_ENV_SAME_PREFIX")                 
        local longer = os.getenv("TEST_ENV_SAME_PREFIX_LONGER")
        assert(prefix == "$::prefix" and longer == "$::longer")
    }
/
    


=== TEST 4: declaration style, the PREFIX 1st - also correct
--- main_config
env TEST_ENV_SAME_PREFIX;
env TEST_ENV_SAME_PREFIX_LONGER;
--- http_config eval    
qq/
    init_by_lua_block {
        local prefix = os.getenv("TEST_ENV_SAME_PREFIX")                 
        local longer = os.getenv("TEST_ENV_SAME_PREFIX_LONGER")
        assert(prefix == "$::prefix" and longer == "$::longer")
    }
/