t/php/lookup.t

use strict;
use warnings FATAL => 'all';

use Apache::Test;
use Apache::TestRequest;
use Apache::TestUtil;

plan tests => 4, need_php;

my $expect = "status=200:method=GET:uri=/php/target.php";

my $r = GET_BODY "/php/lookup.php";

chomp $r;

ok t_cmp($r, $expect, "apache_lookup_uri results OK");

# regression test for http://bugs.php.net/bug.php?id=31645
$r = GET("/php/lookup2.php");

ok t_cmp($r->header("X-Before"), "foobar", "header set before apache_lookup_uri");
ok t_cmp($r->header("X-After"), "foobar", "header set after apache_lookup_uri");

my $c = $r->content;

chomp $c;

ok t_cmp($c, $expect, "second apache_lookup_uri results");