dougm 01/05/05 10:40:26
Modified: src/modules/perl modperl_filter.c modperl_filter.h
xs/Apache/Filter Apache__Filter.h
xs/maps apache_functions.map
Log:
adjust to ap_get_brigade() prototype change
Revision Changes Path
1.18 +3 -3 modperl-2.0/src/modules/perl/modperl_filter.c
Index: modperl_filter.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_filter.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -r1.17 -r1.18
--- modperl_filter.c 2001/04/24 02:26:17 1.17
+++ modperl_filter.c 2001/05/05 17:40:24 1.18
@@ -87,7 +87,7 @@
}
int modperl_run_filter(modperl_filter_t *filter, ap_input_mode_t mode,
- apr_size_t *readbytes)
+ apr_size_t readbytes)
{
AV *args = Nullav;
int status;
@@ -110,7 +110,7 @@
if (filter->mode == MP_INPUT_FILTER_MODE) {
av_push(args, newSViv(mode));
- av_push(args, newSViv(*readbytes));
+ av_push(args, newSViv(readbytes));
}
if ((status = modperl_callback(aTHX_ handler, p, s, args)) != OK) {
@@ -339,7 +339,7 @@
apr_status_t modperl_input_filter_handler(ap_filter_t *f,
apr_bucket_brigade *bb,
ap_input_mode_t mode,
- apr_size_t *readbytes)
+ apr_size_t readbytes)
{
modperl_filter_t *filter;
int status;
1.7 +2 -2 modperl-2.0/src/modules/perl/modperl_filter.h
Index: modperl_filter.h
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_filter.h,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- modperl_filter.h 2001/04/24 02:26:17 1.6
+++ modperl_filter.h 2001/05/05 17:40:24 1.7
@@ -26,7 +26,7 @@
modperl_filter_t *modperl_filter_mg_get(pTHX_ SV *obj);
int modperl_run_filter(modperl_filter_t *filter, ap_input_mode_t mode,
- apr_size_t *readbytes);
+ apr_size_t readbytes);
/* output filters */
apr_status_t modperl_output_filter_handler(ap_filter_t *f,
@@ -51,7 +51,7 @@
apr_status_t modperl_input_filter_handler(ap_filter_t *f,
apr_bucket_brigade *bb,
ap_input_mode_t mode,
- apr_size_t *readbytes);
+ apr_size_t readbytes);
int modperl_input_filter_register_connection(conn_rec *c);
1.10 +0 -15 modperl-2.0/xs/Apache/Filter/Apache__Filter.h
Index: Apache__Filter.h
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/Apache/Filter/Apache__Filter.h,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- Apache__Filter.h 2001/04/24 02:26:18 1.9
+++ Apache__Filter.h 2001/05/05 17:40:25 1.10
@@ -58,21 +58,6 @@
return len;
}
-static apr_status_t mpxs_ap_get_brigade(pTHX_ ap_filter_t *filter,
- apr_bucket_brigade *brigade,
- ap_input_mode_t mode,
- SV *svreadbytes)
-{
- apr_size_t readbytes = svreadbytes ? SvIV(svreadbytes) : 0;
- apr_status_t status = ap_get_brigade(filter, brigade, mode, &readbytes);
-
- if (svreadbytes) {
- sv_setiv(svreadbytes, readbytes);
- }
-
- return status;
-}
-
static MP_INLINE U32 *modperl_filter_attributes(SV *package, SV *cvrv)
{
return (U32 *)&MP_CODE_ATTRS(SvRV(cvrv));
1.23 +2 -2 modperl-2.0/xs/maps/apache_functions.map
Index: apache_functions.map
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/maps/apache_functions.map,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -r1.22 -r1.23
--- apache_functions.map 2001/05/05 02:15:01 1.22
+++ apache_functions.map 2001/05/05 17:40:26 1.23
@@ -186,8 +186,8 @@
PACKAGE=guess
~ap_add_output_filter
ap_add_input_filter
- ap_get_brigade | mpxs_ | \
- filter, bucket, mode=AP_MODE_NONBLOCKING, SV *:readbytes=Nullsv
+ ap_get_brigade | | \
+ filter, bucket, mode=AP_MODE_NONBLOCKING, readbytes=0
ap_pass_brigade
ap_register_input_filter
ap_register_output_filter