~ubuntu-branches/ubuntu/edgy/libapache2-mod-perl2/edgy-updates

« back to all changes in this revision

Viewing changes to xs/Apache/Response/Apache__Response.h

  • Committer: Bazaar Package Importer
  • Author(s): Adam Conrad
  • Date: 2004-08-19 06:23:48 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040819062348-jxl4koqbtvgm8v2t
Tags: 1.99.14-4
Remove the LFS CFLAGS, and build-dep against apache2-*-dev (>= 2.0.50-10)
as we're backing out of the apache2/apr ABI transition.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* Copyright 2001-2004 The Apache Software Foundation
 
2
 *
 
3
 * Licensed under the Apache License, Version 2.0 (the "License");
 
4
 * you may not use this file except in compliance with the License.
 
5
 * You may obtain a copy of the License at
 
6
 *
 
7
 *     http://www.apache.org/licenses/LICENSE-2.0
 
8
 *
 
9
 * Unless required by applicable law or agreed to in writing, software
 
10
 * distributed under the License is distributed on an "AS IS" BASIS,
 
11
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 
12
 * See the License for the specific language governing permissions and
 
13
 * limitations under the License.
 
14
 */
 
15
 
1
16
/* XXX: this should probably named $r->cgi_header_parse
2
17
 * and send_cgi_header an alias in Apache::compat
3
18
 */
7
22
    STRLEN len; \
8
23
    const char *bodytext; \
9
24
    MP_CGI_HEADER_PARSER_OFF(rcfg); \
10
 
    modperl_cgi_header_parse(r, SvPV(sv,len), &bodytext); \
11
 
    if (bodytext) {\
 
25
    SvPV_force(sv, len);            \
 
26
    modperl_cgi_header_parse(r, SvPVX(sv), (apr_size_t*)&len, &bodytext); \
 
27
    if (len) {\
12
28
        MP_CHECK_WBUCKET_INIT("$r->send_cgi_header"); \
13
 
        len -= (bodytext - SvPVX(sv)); \
14
29
        modperl_wbucket_write(aTHX_ rcfg->wbucket, bodytext, &len); \
15
30
    } \
16
31
}