You are viewing a plain text version of this content. The canonical link for it is here.
Posted to cvs@httpd.apache.org by jo...@apache.org on 2013/07/10 18:25:30 UTC
svn commit: r1501829 - in /httpd/test/framework/trunk/t: htdocs/modules/cgi/
htdocs/modules/cgi/unique-id.pl.PL modules/unique_id.t
Author: jorton
Date: Wed Jul 10 16:25:30 2013
New Revision: 1501829
URL: http://svn.apache.org/r1501829
Log:
- add simple mod_unique_id test case
Added:
httpd/test/framework/trunk/t/htdocs/modules/cgi/unique-id.pl.PL
httpd/test/framework/trunk/t/modules/unique_id.t
Modified:
httpd/test/framework/trunk/t/htdocs/modules/cgi/ (props changed)
Propchange: httpd/test/framework/trunk/t/htdocs/modules/cgi/
------------------------------------------------------------------------------
--- svn:ignore (original)
+++ svn:ignore Wed Jul 10 16:25:30 2013
@@ -20,3 +20,5 @@ nph-dripfeed.pl
nph-interim1.pl
nph-interim2.pl
redirect.pl
+xother.pl
+unique-id.pl
Added: httpd/test/framework/trunk/t/htdocs/modules/cgi/unique-id.pl.PL
URL: http://svn.apache.org/viewvc/httpd/test/framework/trunk/t/htdocs/modules/cgi/unique-id.pl.PL?rev=1501829&view=auto
==============================================================================
--- httpd/test/framework/trunk/t/htdocs/modules/cgi/unique-id.pl.PL (added)
+++ httpd/test/framework/trunk/t/htdocs/modules/cgi/unique-id.pl.PL Wed Jul 10 16:25:30 2013
@@ -0,0 +1,3 @@
+print "Content-type: text/plain\n\n";
+
+print $ENV{UNIQUE_ID};
Added: httpd/test/framework/trunk/t/modules/unique_id.t
URL: http://svn.apache.org/viewvc/httpd/test/framework/trunk/t/modules/unique_id.t?rev=1501829&view=auto
==============================================================================
--- httpd/test/framework/trunk/t/modules/unique_id.t (added)
+++ httpd/test/framework/trunk/t/modules/unique_id.t Wed Jul 10 16:25:30 2013
@@ -0,0 +1,27 @@
+use strict;
+use warnings FATAL => 'all';
+
+use Apache::Test;
+use Apache::TestRequest;
+use Apache::TestUtil;
+
+##
+## mod_unique_id tests
+##
+
+my $iters = 100;
+my $url = "/modules/cgi/unique-id.pl";
+my %idx = ();
+
+plan tests => 3 * $iters, need need_cgi, need_module('unique_id');
+
+foreach (1..$iters) {
+ my $r = GET $url;
+ ok t_cmp($r->code, 200, "fetch unique ID");
+ my $v = $r->content;
+ print "# unique id: $v\n";
+ chomp $v;
+ ok length($v) >= 20;
+ ok !exists($idx{$v});
+ $idx{$v} = 1;
+}