summaryrefslogtreecommitdiffstats
path: root/debian/perl-framework/t/htdocs/modules/rewrite
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-07 15:01:31 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-07 15:01:31 +0000
commitc9cf025fadfe043f0f2f679e10d1207d8a158bb6 (patch)
tree3a94effe0bdc0a6814d8134f4ed840d7cc6b6f19 /debian/perl-framework/t/htdocs/modules/rewrite
parentAdding upstream version 2.4.57. (diff)
downloadapache2-debian.tar.xz
apache2-debian.zip
Adding debian version 2.4.57-2.debian/2.4.57-2debian
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'debian/perl-framework/t/htdocs/modules/rewrite')
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/barfoo.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/big.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/db.pl.PL10
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/five.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/foo bar.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/four.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/lucky13.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/numbers.dbm.dbbin0 -> 20480 bytes
-rwxr-xr-xdebian/perl-framework/t/htdocs/modules/rewrite/numbers.pl.PL26
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/numbers.rnd10
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/numbers.txt10
-rwxr-xr-xdebian/perl-framework/t/htdocs/modules/rewrite/numbers2.pl.PL9
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/one.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/six.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/test.blah1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/three.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/two.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/vary1.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/vary2.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/vary3.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/vary4.html1
-rw-r--r--debian/perl-framework/t/htdocs/modules/rewrite/zero.html1
22 files changed, 81 insertions, 0 deletions
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/barfoo.html b/debian/perl-framework/t/htdocs/modules/rewrite/barfoo.html
new file mode 100644
index 0000000..2ae2839
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/barfoo.html
@@ -0,0 +1 @@
+pass
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/big.html b/debian/perl-framework/t/htdocs/modules/rewrite/big.html
new file mode 100644
index 0000000..c7413fc
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/big.html
@@ -0,0 +1 @@
+BIG
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/db.pl.PL b/debian/perl-framework/t/htdocs/modules/rewrite/db.pl.PL
new file mode 100644
index 0000000..a897a8a
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/db.pl.PL
@@ -0,0 +1,10 @@
+
+($txtmap, $dbmmap) = @ARGV;
+open(TXT, "<$txtmap");
+dbmopen(%DB, $dbmmap, 0644);
+while (<TXT>) {
+ next if (m|^s*#.*| or m|^s*$|);
+ $DB{$1} = $2 if (m|^\s*(\S+)\s+(\S+)$|);
+}
+dbmclose(%DB);
+close(TXT)
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/five.html b/debian/perl-framework/t/htdocs/modules/rewrite/five.html
new file mode 100644
index 0000000..7ed6ff8
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/five.html
@@ -0,0 +1 @@
+5
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/foo bar.html b/debian/perl-framework/t/htdocs/modules/rewrite/foo bar.html
new file mode 100644
index 0000000..d675fa4
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/foo bar.html
@@ -0,0 +1 @@
+foo bar
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/four.html b/debian/perl-framework/t/htdocs/modules/rewrite/four.html
new file mode 100644
index 0000000..b8626c4
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/four.html
@@ -0,0 +1 @@
+4
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/lucky13.html b/debian/perl-framework/t/htdocs/modules/rewrite/lucky13.html
new file mode 100644
index 0000000..7743f93
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/lucky13.html
@@ -0,0 +1 @@
+JACKPOT
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/numbers.dbm.db b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.dbm.db
new file mode 100644
index 0000000..ed20201
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.dbm.db
Binary files differ
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/numbers.pl.PL b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.pl.PL
new file mode 100755
index 0000000..d3d3067
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.pl.PL
@@ -0,0 +1,26 @@
+
+# numbers.pl
+# program rewrite map for mod_rewrite testing
+#
+$|=1;
+my %map = ( 1 => 'one',
+ 2 => 'two',
+ 3 => 'three',
+ 4 => 'four',
+ 5 => 'five',
+ 6 => 'six' );
+
+while (<STDIN>) {
+ chomp;
+
+ print STDERR "GOT: ->$_<-\n";
+ my $m = $map{$_};
+ print STDERR "MAPPED: ->$_<-\n";
+
+ if ($m) {
+ print STDOUT "$m\n";
+ } else {
+ print STDOUT "NULL";
+ }
+}
+close (LOG);
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/numbers.rnd b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.rnd
new file mode 100644
index 0000000..4027500
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.rnd
@@ -0,0 +1,10 @@
+#
+# numbers.rnd
+# random number rewrite map for mod_rewrite testing
+#
+1 one|two|three|four|five|six
+2 two|three|four|five|six
+3 three|four|five|six
+4 four|five|six
+5 five|six
+6 six
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/numbers.txt b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.txt
new file mode 100644
index 0000000..6f36d28
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/numbers.txt
@@ -0,0 +1,10 @@
+#
+# numbers.txt
+# text rewrite map for mod_rewrite testing
+#
+1 one
+2 two
+3 three
+4 four
+5 five
+6 six
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/numbers2.pl.PL b/debian/perl-framework/t/htdocs/modules/rewrite/numbers2.pl.PL
new file mode 100755
index 0000000..d450b68
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/numbers2.pl.PL
@@ -0,0 +1,9 @@
+
+# numbers.pl
+# program rewrite map for mod_rewrite testing
+#
+funk cold medina.
+$|=1;
+while (<STDIN>) {
+ print $_;
+}
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/one.html b/debian/perl-framework/t/htdocs/modules/rewrite/one.html
new file mode 100644
index 0000000..d00491f
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/one.html
@@ -0,0 +1 @@
+1
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/six.html b/debian/perl-framework/t/htdocs/modules/rewrite/six.html
new file mode 100644
index 0000000..1e8b314
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/six.html
@@ -0,0 +1 @@
+6
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/test.blah b/debian/perl-framework/t/htdocs/modules/rewrite/test.blah
new file mode 100644
index 0000000..d02f395
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/test.blah
@@ -0,0 +1 @@
+<HTML>this is html</HTML>
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/three.html b/debian/perl-framework/t/htdocs/modules/rewrite/three.html
new file mode 100644
index 0000000..00750ed
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/three.html
@@ -0,0 +1 @@
+3
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/two.html b/debian/perl-framework/t/htdocs/modules/rewrite/two.html
new file mode 100644
index 0000000..0cfbf08
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/two.html
@@ -0,0 +1 @@
+2
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/vary1.html b/debian/perl-framework/t/htdocs/modules/rewrite/vary1.html
new file mode 100644
index 0000000..3b08050
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/vary1.html
@@ -0,0 +1 @@
+VARY1
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/vary2.html b/debian/perl-framework/t/htdocs/modules/rewrite/vary2.html
new file mode 100644
index 0000000..bab3cc4
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/vary2.html
@@ -0,0 +1 @@
+VARY2
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/vary3.html b/debian/perl-framework/t/htdocs/modules/rewrite/vary3.html
new file mode 100644
index 0000000..cb7f4f1
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/vary3.html
@@ -0,0 +1 @@
+VARY3 \ No newline at end of file
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/vary4.html b/debian/perl-framework/t/htdocs/modules/rewrite/vary4.html
new file mode 100644
index 0000000..04037af
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/vary4.html
@@ -0,0 +1 @@
+VARY4 \ No newline at end of file
diff --git a/debian/perl-framework/t/htdocs/modules/rewrite/zero.html b/debian/perl-framework/t/htdocs/modules/rewrite/zero.html
new file mode 100644
index 0000000..ba55089
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/modules/rewrite/zero.html
@@ -0,0 +1 @@
+ZERO