dougm 01/11/20 17:27:52
Modified: perl-framework/c-modules/test_pass_brigade
mod_test_pass_brigade.c
Log:
switch to using httpd_test_split_qs_numbers()
Revision Changes Path
1.2 +5 -10
httpd-test/perl-framework/c-modules/test_pass_brigade/mod_test_pass_brigade.c
Index: mod_test_pass_brigade.c
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/c-modules/test_pass_brigade/mod_test_pass_brigade.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- mod_test_pass_brigade.c 2001/11/20 22:52:22 1.1
+++ mod_test_pass_brigade.c 2001/11/21 01:27:52 1.2
@@ -14,15 +14,17 @@
#include "apr_buckets.h"
+#define WANT_HTTPD_TEST_SPLIT_QS_NUMBERS
+#include "httpd_test_util.c"
+
/*
* mainly for testing / researching core_output_filter buffering
*/
static int test_pass_brigade_handler(request_rec *r)
{
- const char *args = r->args;
long total=0, remaining=1;
- char *buff, *endptr;
+ char *buff;
int buff_size = 8192;
if (strcmp(r->handler, "test_pass_brigade")) {
@@ -31,15 +33,8 @@
if (r->method_number != M_GET) {
return DECLINED;
}
-
- if (args) {
- buff_size = strtol(args, &endptr, 0);
- if (endptr && *endptr == ',') {
- ++endptr;
- remaining = strtol(endptr, &endptr, 0);
- }
- }
+ httpd_test_split_qs_numbers(r, &buff_size, &remaining, NULL);
fprintf(stderr, "[mod_test_pass_brigade] "
"going to echo %ld bytes with buffer size=%d\n",
