joes 2003/06/27 12:49:57
Modified: glue/perl/t/apreq request.t
src apreq_params.c
Log:
Make request.pm's upload test more memory-challenging
Revision Changes Path
1.5 +1 -1 httpd-apreq-2/glue/perl/t/apreq/request.t
Index: request.t
===================================================================
RCS file: /home/cvs/httpd-apreq-2/glue/perl/t/apreq/request.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- request.t 24 Jun 2003 22:27:43 -0000 1.4
+++ request.t 27 Jun 2003 19:49:57 -0000 1.5
@@ -22,7 +22,7 @@
{
# upload a string as a file
my $test = 'upload';
- my $value = 'data upload';
+ my $value = 'dataUpload' x 100_000;
ok t_cmp($value,
UPLOAD_BODY("$location?test=$test", content => $value),
"basic upload");
1.26 +1 -1 httpd-apreq-2/src/apreq_params.c
Index: apreq_params.c
===================================================================
RCS file: /home/cvs/httpd-apreq-2/src/apreq_params.c,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -r1.25 -r1.26
--- apreq_params.c 27 Jun 2003 18:23:18 -0000 1.25
+++ apreq_params.c 27 Jun 2003 19:49:57 -0000 1.26
@@ -65,7 +65,7 @@
#define UPGRADE(s) apreq_value_to_param(apreq_char_to_value(s))
static const apreq_cfg_t default_cfg = {
- 1024 * 1024,
+ 1024 * 1024, /* 1MB */
8192 * 2,
200,
8192 * 8