mod_include.c revision 2fc50921b88defeb7127985dfe4b4130175e069e
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* ====================================================================
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * The Apache Software License, Version 1.1
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding *
bc8fd1b0b1afdf89b8d28eefa8cd74e26ba97986fielding * Copyright (c) 2000-2002 The Apache Software Foundation. All rights
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * reserved.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * Redistribution and use in source and binary forms, with or without
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * modification, are permitted provided that the following conditions
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * are met:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * 1. Redistributions of source code must retain the above copyright
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * notice, this list of conditions and the following disclaimer.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * 2. Redistributions in binary form must reproduce the above copyright
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * notice, this list of conditions and the following disclaimer in
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * the documentation and/or other materials provided with the
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * distribution.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * 3. The end-user documentation included with the redistribution,
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * if any, must include the following acknowledgment:
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * "This product includes software developed by the
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * Apache Software Foundation (http://www.apache.org/)."
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * Alternately, this acknowledgment may appear in the software itself,
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * if and wherever such third-party acknowledgments normally appear.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * 4. The names "Apache" and "Apache Software Foundation" must
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * not be used to endorse or promote products derived from this
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * software without prior written permission. For written
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * permission, please contact apache@apache.org.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * 5. Products derived from this software may not be called "Apache",
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * nor may "Apache" appear in their name, without prior written
64185f9824e42f21ca7b9ae6c004484215c031a7rbb * permission of the Apache Software Foundation.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * DISCLAIMED. IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * SUCH DAMAGE.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * ====================================================================
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * This software consists of voluntary contributions made by many
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * individuals on behalf of the Apache Software Foundation. For more
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * information on the Apache Software Foundation, please see
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * <http://www.apache.org/>.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * Portions of this software are based upon public domain software
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * originally written at the National Center for Supercomputing Applications,
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * University of Illinois, Urbana-Champaign.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/*
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * http_include.c: Handles the server-parsed HTML documents
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * Original by Rob McCool; substantial fixups by David Robinson;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * incorporated into the Apache module framework by rst.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
cccd31fa4a72fe23cc3249c06db181b274a55a69gstein#include "apr.h"
cccd31fa4a72fe23cc3249c06db181b274a55a69gstein#include "apr_strings.h"
cccd31fa4a72fe23cc3249c06db181b274a55a69gstein#include "apr_thread_proc.h"
f6e9f5600e77b78fb013bb543d364135961639d1rbb#include "apr_hash.h"
c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe#include "apr_user.h"
1b21d7b3d97def358b2e923655edeb16613a1c31gstein#include "apr_lib.h"
024cd9589e52cf11ce765dfddb5b5f0c6e421a48gstein#include "apr_optional.h"
024cd9589e52cf11ce765dfddb5b5f0c6e421a48gstein
024cd9589e52cf11ce765dfddb5b5f0c6e421a48gstein#define APR_WANT_STRFUNC
024cd9589e52cf11ce765dfddb5b5f0c6e421a48gstein#include "apr_want.h"
cccd31fa4a72fe23cc3249c06db181b274a55a69gstein
b1476ba063e6d9577cd86db3db5dd98ff6bc78b9rbb#define CORE_PRIVATE
b1476ba063e6d9577cd86db3db5dd98ff6bc78b9rbb
9625528fcf4fa27288f3be080a1979c8ef60d7dfrbb#include "ap_config.h"
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb#include "util_filter.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "httpd.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_config.h"
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb#include "http_core.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_request.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_core.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_protocol.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_log.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_main.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "util_script.h"
b1476ba063e6d9577cd86db3db5dd98ff6bc78b9rbb#include "http_core.h"
18343797fadabacf01280b38ea7688690d12aec0rbb#include "mod_include.h"
178381ebc820fb4c429aa000240cc8ec42c99c58trawick#include "util_ebcdic.h"
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
138c8f7cb8254e035c6f45288e3909cd9c21be5cmartinmodule AP_MODULE_DECLARE_DATA include_module;
f6e9f5600e77b78fb013bb543d364135961639d1rbbstatic apr_hash_t *include_hash;
445997e06464e7625c7f0e22917f8f2d9876cfffrbbstatic APR_OPTIONAL_FN_TYPE(ap_register_include_handler) *ssi_pfn_register;
445997e06464e7625c7f0e22917f8f2d9876cfffrbb
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz/*****************************************************************
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz *
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz * XBITHACK. Sigh... NB it's configurable per-directory; the compile-time
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz * option only changes the default.
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz */
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantzenum xbithack {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz xbithack_off, xbithack_on, xbithack_full
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz};
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
51be7fc538641ed7cb22e959eb31629f7183f70fianhstruct bndm_t {
51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int T[256];
51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int x;
51be7fc538641ed7cb22e959eb31629f7183f70fianh} ;
51be7fc538641ed7cb22e959eb31629f7183f70fianh
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantztypedef struct {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz char *default_error_msg;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz char *default_time_fmt;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz enum xbithack *xbithack;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz} include_dir_config;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
51be7fc538641ed7cb22e959eb31629f7183f70fianhtypedef struct {
51be7fc538641ed7cb22e959eb31629f7183f70fianh char *default_start_tag;
51be7fc538641ed7cb22e959eb31629f7183f70fianh char *default_end_tag;
51be7fc538641ed7cb22e959eb31629f7183f70fianh int start_tag_len;
51be7fc538641ed7cb22e959eb31629f7183f70fianh bndm_t start_seq_pat;
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh char *undefinedEcho;
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh int undefinedEchoLen;
51be7fc538641ed7cb22e959eb31629f7183f70fianh} include_server_config;
51be7fc538641ed7cb22e959eb31629f7183f70fianh
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#ifdef XBITHACK
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#define DEFAULT_XBITHACK xbithack_full
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#else
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#define DEFAULT_XBITHACK xbithack_off
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#endif
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb#define BYTE_COUNT_THRESHOLD AP_MIN_BYTES_TO_WRITE
f6e9f5600e77b78fb013bb543d364135961639d1rbb
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* ------------------------ Environment function -------------------------- */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz/* Sentinel value to store in subprocess_env for items that
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz * shouldn't be evaluated until/unless they're actually used
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz */
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantzstatic const char lazy_eval_sentinel;
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz#define LAZY_VALUE (&lazy_eval_sentinel)
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic void add_include_vars(request_rec *r, char *timefmt)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_t *e = r->subprocess_env;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *t;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz apr_table_setn(e, "DATE_LOCAL", LAZY_VALUE);
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz apr_table_setn(e, "DATE_GMT", LAZY_VALUE);
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz apr_table_setn(e, "LAST_MODIFIED", LAZY_VALUE);
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DOCUMENT_URI", r->uri);
441bd066858500e75e4f63ef149120bcf523de58jerenkrantz if (r->path_info && *r->path_info) {
441bd066858500e75e4f63ef149120bcf523de58jerenkrantz apr_table_setn(e, "DOCUMENT_PATH_INFO", r->path_info);
441bd066858500e75e4f63ef149120bcf523de58jerenkrantz }
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz apr_table_setn(e, "USER_NAME", LAZY_VALUE);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((t = strrchr(r->filename, '/'))) {
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DOCUMENT_NAME", ++t);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DOCUMENT_NAME", r->uri);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (r->args) {
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm char *arg_copy = apr_pstrdup(r->pool, r->args);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_unescape_url(arg_copy);
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "QUERY_STRING_UNESCAPED",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_escape_shell_cmd(r->pool, arg_copy));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantzstatic const char *add_include_vars_lazy(request_rec *r, const char *var)
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz{
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz char *val;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz if (!strcasecmp(var, "DATE_LOCAL")) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz include_dir_config *conf =
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz (include_dir_config *)ap_get_module_config(r->per_dir_config,
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz &include_module);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz val = ap_ht_time(r->pool, r->request_time, conf->default_time_fmt, 0);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz else if (!strcasecmp(var, "DATE_GMT")) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz include_dir_config *conf =
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz (include_dir_config *)ap_get_module_config(r->per_dir_config,
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz &include_module);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz val = ap_ht_time(r->pool, r->request_time, conf->default_time_fmt, 1);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz else if (!strcasecmp(var, "LAST_MODIFIED")) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz include_dir_config *conf =
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz (include_dir_config *)ap_get_module_config(r->per_dir_config,
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz &include_module);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz val = ap_ht_time(r->pool, r->finfo.mtime, conf->default_time_fmt, 0);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz else if (!strcasecmp(var, "USER_NAME")) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz if (apr_get_username(&val, r->finfo.user, r->pool) != APR_SUCCESS) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz val = "<unknown>";
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz else {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz val = NULL;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz if (val) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz apr_table_setn(r->subprocess_env, var, val);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz return val;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz}
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowestatic const char *get_include_var(request_rec *r, include_ctx_t *ctx,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe const char *var)
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz{
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz const char *val;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (apr_isdigit(*var) && !var[1]) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe /* Handle $0 .. $9 from the last regex evaluated.
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe * The choice of returning NULL strings on not-found,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe * v.s. empty strings on an empty match is deliberate.
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe */
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (!ctx->re_result || !ctx->re_string) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe return NULL;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe else {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe int idx = atoi(var);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe apr_size_t len = (*ctx->re_result)[idx].rm_eo
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe - (*ctx->re_result)[idx].rm_so;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if ( (*ctx->re_result)[idx].rm_so < 0
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe || (*ctx->re_result)[idx].rm_eo < 0) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe return NULL;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
ffa44425004f3f2425e08ab907c67429664da02awrowe val = apr_pstrmemdup(r->pool, ctx->re_string
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe + (*ctx->re_result)[idx].rm_so, len);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe else {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe val = apr_table_get(r->subprocess_env, var);
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (val == LAZY_VALUE)
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe val = add_include_vars_lazy(r, var);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz return val;
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz}
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* --------------------------- Parser functions --------------------------- */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz/* This is an implementation of the BNDM search algorithm.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * Fast and Flexible String Matching by Combining Bit-parallelism and
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * Suffix Automata (2001)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * Gonzalo Navarro, Mathieu Raffinot
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * http://www-igm.univ-mlv.fr/~raffinot/ftp/jea2001.ps.gz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * Initial code submitted by Sascha Schumann.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz/* Precompile the bndm_t data structure. */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantzstatic void bndm_compile(bndm_t *t, const char *n, apr_size_t nl)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz{
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz unsigned int x;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz const char *ne = n + nl;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz memset(t->T, 0, sizeof(unsigned int) * 256);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz for (x = 1; n < ne; x <<= 1)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz t->T[(unsigned char) *n++] |= x;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz t->x = x - 1;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz}
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz/* Implements the BNDM search algorithm (as described above).
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * n - the pattern to search for
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * nl - length of the pattern to search for
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * h - the string to look in
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * hl - length of the string to look for
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * t - precompiled bndm structure against the pattern
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * Returns the count of character that is the first match or hl if no
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * match is found.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz */
1627792f516dc22cf12ac193cc48441d0a3701dajerenkrantzstatic apr_size_t bndm(const char *n, apr_size_t nl, const char *h,
1627792f516dc22cf12ac193cc48441d0a3701dajerenkrantz apr_size_t hl, bndm_t *t)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz{
95ca1a6ff23adde7ae9cbbec7b6754d9aecacc2dbrianp const char *skip;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz const char *he, *p, *pi;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz unsigned int *T, x, d;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz he = h + hl;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz T = t->T;
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp x = t->x;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz pi = h - 1; /* pi: p initial */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz p = pi + nl; /* compare window right to left. point to the first char */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz while (p < he) {
95ca1a6ff23adde7ae9cbbec7b6754d9aecacc2dbrianp skip = p;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz d = x;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz do {
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp d &= T[(unsigned char) *p--];
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp if (!d) {
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp break;
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if ((d & 1)) {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (p != pi)
95ca1a6ff23adde7ae9cbbec7b6754d9aecacc2dbrianp skip = p;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz else
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz return p - h + 1;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp d >>= 1;
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp } while (d);
0d628dd174dd6de13463b10d2599f6cac24e9fe8brianp
95ca1a6ff23adde7ae9cbbec7b6754d9aecacc2dbrianp pi = skip;
95ca1a6ff23adde7ae9cbbec7b6754d9aecacc2dbrianp p = pi + nl;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz return hl;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz}
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz/* We've now found a start sequence tag... */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantzstatic apr_bucket* found_start_sequence(apr_bucket *dptr,
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe include_ctx_t *ctx,
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe int tagStart)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz{
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* We want to split the bucket at the '<'. */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->state = PARSE_DIRECTIVE;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->tag_length = 0;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->parse_pos = 0;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->tag_start_bucket = dptr;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->tag_start_index = tagStart;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (ctx->head_start_index > 0) {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz apr_bucket *tmp_bkt;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* Split the bucket with the start of the tag in it */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz apr_bucket_split(ctx->head_start_bucket, ctx->head_start_index);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz tmp_bkt = APR_BUCKET_NEXT(ctx->head_start_bucket);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* If it was a one bucket match */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (dptr == ctx->head_start_bucket) {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->tag_start_bucket = tmp_bkt;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->tag_start_index = tagStart - ctx->head_start_index;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_bucket = tmp_bkt;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_index = 0;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz return ctx->head_start_bucket;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz}
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
18343797fadabacf01280b38ea7688690d12aec0rbb/* This function returns either a pointer to the split bucket containing the
18343797fadabacf01280b38ea7688690d12aec0rbb * first byte of the BEGINNING_SEQUENCE (after finding a complete match) or it
18343797fadabacf01280b38ea7688690d12aec0rbb * returns NULL if no match found.
18343797fadabacf01280b38ea7688690d12aec0rbb */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic apr_bucket *find_start_sequence(apr_bucket *dptr, include_ctx_t *ctx,
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz apr_bucket_brigade *bb, int *do_cleanup)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t len;
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb const char *c;
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb const char *buf;
51be7fc538641ed7cb22e959eb31629f7183f70fianh const char *str = ctx->start_seq ;
51be7fc538641ed7cb22e959eb31629f7183f70fianh apr_size_t slen = ctx->start_seq_len;
8204f955c6ec6281031320ec15ccf8f1531ee3cawrowe apr_size_t pos;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *do_cleanup = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb do {
fc9e11c98ca76d8b1a4fedfced2a04e543162535jwoolley apr_status_t rv = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz int read_done = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (APR_BUCKET_IS_EOS(dptr)) {
fcc991411813d0ceaca4a76675f771e1f06617cdtrawick break;
fcc991411813d0ceaca4a76675f771e1f06617cdtrawick }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
975f1dd40035607cc5f408439c4ea1457528590dbrianp#if 0
975f1dd40035607cc5f408439c4ea1457528590dbrianp /* XXX the bucket flush support is commented out for now
975f1dd40035607cc5f408439c4ea1457528590dbrianp * because it was causing a segfault */
83ca150ef902e9692972aa923e893bc6406d20f1ianh if (APR_BUCKET_IS_FLUSH(dptr)) {
83ca150ef902e9692972aa923e893bc6406d20f1ianh apr_bucket *old = dptr;
83ca150ef902e9692972aa923e893bc6406d20f1ianh dptr = APR_BUCKET_NEXT(old);
83ca150ef902e9692972aa923e893bc6406d20f1ianh APR_BUCKET_REMOVE(old);
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_now = 1;
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_flush = 1;
83ca150ef902e9692972aa923e893bc6406d20f1ianh }
975f1dd40035607cc5f408439c4ea1457528590dbrianp else
975f1dd40035607cc5f408439c4ea1457528590dbrianp#endif /* 0 */
975f1dd40035607cc5f408439c4ea1457528590dbrianp if (ctx->bytes_parsed >= BYTE_COUNT_THRESHOLD) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else if (ctx->bytes_parsed > 0) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz rv = apr_bucket_read(dptr, &buf, &len, APR_NONBLOCK_READ);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz read_done = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (APR_STATUS_IS_EAGAIN(rv)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (ctx->output_now) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz apr_bucket *start_bucket;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (ctx->head_start_index > 0) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz start_bucket = ctx->head_start_bucket;
8173eb0f84c2dd1f08802aadc90731cc89ba5c0ejerenkrantz apr_bucket_split(start_bucket, ctx->head_start_index);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz start_bucket = APR_BUCKET_NEXT(start_bucket);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->head_start_index = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->head_start_bucket = start_bucket;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->parse_pos = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->state = PRE_HEAD;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz start_bucket = dptr;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return start_bucket;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!read_done) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz rv = apr_bucket_read(dptr, &buf, &len, APR_BLOCK_READ);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!APR_STATUS_IS_SUCCESS(rv)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->status = rv;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return NULL;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (len == 0) { /* end of pipe? */
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz break;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* Set our buffer to use. */
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz c = buf;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* The last bucket had a left over partial match that we need to
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * complete.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (ctx->state == PARSE_HEAD)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz apr_size_t tmpLen;
71d0a4ed0b2d20444f64a938ed2f11b372408f30ianh tmpLen = (len < (slen - 1)) ? len : (slen - 1);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz while (c < buf + tmpLen && *c == str[ctx->parse_pos])
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz c++;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->parse_pos++;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (str[ctx->parse_pos] == '\0')
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->bytes_parsed += c - buf;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz return found_start_sequence(dptr, ctx, c - buf);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
71d0a4ed0b2d20444f64a938ed2f11b372408f30ianh else if (c == buf + tmpLen) {
71d0a4ed0b2d20444f64a938ed2f11b372408f30ianh dptr = APR_BUCKET_NEXT(dptr);
71d0a4ed0b2d20444f64a938ed2f11b372408f30ianh continue;
71d0a4ed0b2d20444f64a938ed2f11b372408f30ianh }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
095071bbd0b3ccccd6883edc7cd10f13cac71160ianh /* False alarm...
095071bbd0b3ccccd6883edc7cd10f13cac71160ianh */
88aa2aa192b60ddbe8b0f7062df066edcdbfda93jwoolley APR_BRIGADE_PREPEND(bb, ctx->ssi_tag_brigade);
83ca150ef902e9692972aa923e893bc6406d20f1ianh
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->state = PRE_HEAD;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (len)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
51be7fc538641ed7cb22e959eb31629f7183f70fianh pos = bndm(str, slen, c, len, ctx->start_seq_pat);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (pos != len)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_bucket = dptr;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_index = pos;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->bytes_parsed += pos + slen;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz return found_start_sequence(dptr, ctx, pos + slen);
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* Consider the case where we have <!-- at the end of the bucket. */
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp if (len > slen) {
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp ctx->bytes_parsed += (len - slen);
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp c = buf + len - slen;
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp }
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp else {
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp c = buf;
e98a7a7acc2861a0987318b2580872d2c8ca1fe2brianp }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->parse_pos = 0;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz while (c < buf + len)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[ctx->parse_pos]) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->state == PRE_HEAD) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->state = PARSE_HEAD;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = dptr;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->head_start_index = c - buf;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos++;
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz else if (ctx->parse_pos != 0)
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* The reason for this, is that we need to make sure
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * that we catch cases like <<!--#. This makes the
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * second check after the original check fails.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz * If parse_pos was already 0 then we already checked this.
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz /* FIXME: Why? */
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz *do_cleanup = 1;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz if (*c == str[0]) {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->parse_pos = 1;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_index = c - buf;
18343797fadabacf01280b38ea7688690d12aec0rbb }
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz else {
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->parse_pos = 0;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->state = PRE_HEAD;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_bucket = NULL;
f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz ctx->head_start_index = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb c++;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb ctx->bytes_parsed++;
18343797fadabacf01280b38ea7688690d12aec0rbb }
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT(dptr);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe } while (dptr != APR_BRIGADE_SENTINEL(bb));
83ca150ef902e9692972aa923e893bc6406d20f1ianh
83ca150ef902e9692972aa923e893bc6406d20f1ianh
18343797fadabacf01280b38ea7688690d12aec0rbb return NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb}
18343797fadabacf01280b38ea7688690d12aec0rbb
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic apr_bucket *find_end_sequence(apr_bucket *dptr, include_ctx_t *ctx,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket_brigade *bb)
18343797fadabacf01280b38ea7688690d12aec0rbb{
cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t len;
18343797fadabacf01280b38ea7688690d12aec0rbb const char *c;
18343797fadabacf01280b38ea7688690d12aec0rbb const char *buf;
51be7fc538641ed7cb22e959eb31629f7183f70fianh const char *str = ctx->end_seq;
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp const char *start;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb do {
fc9e11c98ca76d8b1a4fedfced2a04e543162535jwoolley apr_status_t rv = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz int read_done = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (APR_BUCKET_IS_EOS(dptr)) {
18343797fadabacf01280b38ea7688690d12aec0rbb break;
18343797fadabacf01280b38ea7688690d12aec0rbb }
975f1dd40035607cc5f408439c4ea1457528590dbrianp#if 0
975f1dd40035607cc5f408439c4ea1457528590dbrianp /* XXX the bucket flush support is commented out for now
975f1dd40035607cc5f408439c4ea1457528590dbrianp * because it was causing a segfault */
83ca150ef902e9692972aa923e893bc6406d20f1ianh if (APR_BUCKET_IS_FLUSH(dptr)) {
83ca150ef902e9692972aa923e893bc6406d20f1ianh apr_bucket *old = dptr;
83ca150ef902e9692972aa923e893bc6406d20f1ianh dptr = APR_BUCKET_NEXT(old);
83ca150ef902e9692972aa923e893bc6406d20f1ianh APR_BUCKET_REMOVE(old);
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_now = 1;
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_flush = 1;
83ca150ef902e9692972aa923e893bc6406d20f1ianh }
975f1dd40035607cc5f408439c4ea1457528590dbrianp else
975f1dd40035607cc5f408439c4ea1457528590dbrianp#endif /* 0 */
975f1dd40035607cc5f408439c4ea1457528590dbrianp if (ctx->bytes_parsed >= BYTE_COUNT_THRESHOLD) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else if (ctx->bytes_parsed > 0) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz rv = apr_bucket_read(dptr, &buf, &len, APR_NONBLOCK_READ);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz read_done = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (APR_STATUS_IS_EAGAIN(rv)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 1;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (ctx->output_now) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (ctx->state == PARSE_DIRECTIVE) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz /* gonna start over parsing the directive next time through */
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->directive_length = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->tag_length = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return dptr;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!read_done) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz rv = apr_bucket_read(dptr, &buf, &len, APR_BLOCK_READ);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!APR_STATUS_IS_SUCCESS(rv)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->status = rv;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return NULL;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz
18343797fadabacf01280b38ea7688690d12aec0rbb if (len == 0) { /* end of pipe? */
18343797fadabacf01280b38ea7688690d12aec0rbb break;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tag_start_bucket) {
18343797fadabacf01280b38ea7688690d12aec0rbb c = buf + ctx->tag_start_index;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb c = buf;
18343797fadabacf01280b38ea7688690d12aec0rbb }
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp start = c;
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe while (c < buf + len) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[ctx->parse_pos]) {
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->state != PARSE_TAIL) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSE_TAIL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = dptr;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_index = c - buf;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos++;
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp if (str[ctx->parse_pos] == '\0') {
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp apr_bucket *tmp_buck = dptr;
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp /* We want to split the bucket at the '>'. The
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp * end of the END_SEQUENCE is in the current bucket.
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp * The beginning might be in a previous bucket.
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp */
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp c++;
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp ctx->bytes_parsed += (c - start);
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp ctx->state = PARSED;
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp apr_bucket_split(dptr, c - buf);
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp tmp_buck = APR_BUCKET_NEXT(dptr);
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp return (tmp_buck);
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->state == PARSE_DIRECTIVE) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->tag_length == 0) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (!apr_isspace(*c)) {
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp const char *tmp = c;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_bucket = dptr;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_index = c - buf;
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp do {
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp c++;
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp } while ((c < buf + len) && !apr_isspace(*c) &&
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp *c != *str);
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp ctx->tag_length = ctx->directive_length = c - tmp;
1529f046f1de1b55d17f45a1cbf4fb3d99211ed0brianp continue;
18343797fadabacf01280b38ea7688690d12aec0rbb }
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb else {
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (!apr_isspace(*c)) {
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length++;
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
f6e9f5600e77b78fb013bb543d364135961639d1rbb else {
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_TAG;
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length++;
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
f6e9f5600e77b78fb013bb543d364135961639d1rbb else if (ctx->state == PARSE_TAG) {
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp const char *tmp = c;
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp do {
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp c++;
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp } while ((c < buf + len) && (*c != *str));
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp ctx->tag_length += (c - tmp);
ac43284ac9675e3f99ec3aadf42e20551dbdae17brianp continue;
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb else {
51ced3b28ef430a96586284d4320f7dbdaf7225ebrianp if (ctx->parse_pos != 0) {
18343797fadabacf01280b38ea7688690d12aec0rbb /* The reason for this, is that we need to make sure
18343797fadabacf01280b38ea7688690d12aec0rbb * that we catch cases like --->. This makes the
18343797fadabacf01280b38ea7688690d12aec0rbb * second check after the original check fails.
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * If parse_pos was already 0 then we already checked
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * this.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length += ctx->parse_pos;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[0]) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->state = PARSE_TAIL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = dptr;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->tail_start_index = c - buf;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->parse_pos = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
82630c4a04be47f39298d3284b2c596244fb509bbrianp ctx->tag_length++;
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->tag_length > ctx->directive_length) {
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_TAG;
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
f6e9f5600e77b78fb013bb543d364135961639d1rbb else {
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_DIRECTIVE;
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length += ctx->parse_pos;
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = NULL;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->tail_start_index = 0;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->parse_pos = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
6d888d6b9c0e0c08903e4bbd31d407915d5ad7b0brianp ctx->bytes_parsed += (c - start);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT(dptr);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe } while (dptr != APR_BRIGADE_SENTINEL(bb));
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb return NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb/* This function culls through the buckets that have been set aside in the
18343797fadabacf01280b38ea7688690d12aec0rbb * ssi_tag_brigade and copies just the directive part of the SSI tag (none
18343797fadabacf01280b38ea7688690d12aec0rbb * of the start and end delimiter bytes are copied).
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbbstatic apr_status_t get_combined_directive (include_ctx_t *ctx,
18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *r,
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_brigade *bb,
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe char *tmp_buf,
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe apr_size_t tmp_buf_size)
18343797fadabacf01280b38ea7688690d12aec0rbb{
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe int done = 0;
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe apr_bucket *dptr;
18343797fadabacf01280b38ea7688690d12aec0rbb const char *tmp_from;
cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t tmp_from_len;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* If the tag length is longer than the tmp buffer, allocate space. */
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->tag_length > tmp_buf_size-1) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if ((ctx->combined_tag = apr_pcalloc(r->pool,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->tag_length + 1)) == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return (APR_ENOMEM);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb } /* Else, just use the temp buffer. */
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->combined_tag = tmp_buf;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Prime the pump. Start at the beginning of the tag... */
18343797fadabacf01280b38ea7688690d12aec0rbb dptr = ctx->tag_start_bucket;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* Read the bucket... */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket_read (dptr, &tmp_from, &tmp_from_len, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Adjust the pointer to start at the tag within the bucket... */
18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= (tmp_from_len - ctx->tail_start_index);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from = &tmp_from[ctx->tag_start_index];
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= ctx->tag_start_index;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = ctx->combined_tag;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Loop through the buckets from the tag_start_bucket until before
18343797fadabacf01280b38ea7688690d12aec0rbb * the tail_start_bucket copying the contents into the buffer.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb do {
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (ctx->curr_tag_pos, tmp_from, tmp_from_len);
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos += tmp_from_len;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {
18343797fadabacf01280b38ea7688690d12aec0rbb done = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT (dptr);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_read (dptr, &tmp_from, &tmp_from_len, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb /* Adjust the count to stop at the beginning of the tail. */
18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= (tmp_from_len - ctx->tail_start_index);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb } while ((!done) &&
3084ccb696461ceb2fc4fbe76e302640eaac6a18wrowe (ctx->curr_tag_pos < ctx->combined_tag + ctx->tag_length));
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->combined_tag[ctx->tag_length] = '\0';
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = ctx->combined_tag;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb return (APR_SUCCESS);
18343797fadabacf01280b38ea7688690d12aec0rbb}
18343797fadabacf01280b38ea7688690d12aec0rbb
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/*
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * decodes a string containing html entities or numeric character references.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * 's' is overwritten with the decoded string.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * If 's' is syntatically incorrect, then the followed fixups will be made:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * unknown entities will be left undecoded;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * references to unused numeric characters will be deleted.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * In particular, &#00; will not be decoded, but will be deleted.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * drtr
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* maximum length of any ISO-LATIN-1 HTML entity name. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#define MAXENTLEN (6)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* The following is a shrinking transformation, therefore safe. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic void decodehtml(char *s)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int val, i, j;
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp char *p;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding const char *ents;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding static const char * const entlist[MAXENTLEN + 1] =
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding NULL, /* 0 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding NULL, /* 1 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "lt\074gt\076", /* 2 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "amp\046ETH\320eth\360", /* 3 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "quot\042Auml\304Euml\313Iuml\317Ouml\326Uuml\334auml\344euml\353\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingiuml\357ouml\366uuml\374yuml\377", /* 4 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Acirc\302Aring\305AElig\306Ecirc\312Icirc\316Ocirc\324Ucirc\333\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingTHORN\336szlig\337acirc\342aring\345aelig\346ecirc\352icirc\356ocirc\364\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingucirc\373thorn\376", /* 5 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Agrave\300Aacute\301Atilde\303Ccedil\307Egrave\310Eacute\311\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingIgrave\314Iacute\315Ntilde\321Ograve\322Oacute\323Otilde\325Oslash\330\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingUgrave\331Uacute\332Yacute\335agrave\340aacute\341atilde\343ccedil\347\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingegrave\350eacute\351igrave\354iacute\355ntilde\361ograve\362oacute\363\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingotilde\365oslash\370ugrave\371uacute\372yacute\375" /* 6 */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding };
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp /* Do a fast scan through the string until we find anything
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp * that needs more complicated handling
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp */
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp for (; *s != '&'; s++) {
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp if (*s == '\0') {
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp return;
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp }
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp }
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp for (p = s; *s != '\0'; s++, p++) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*s != '&') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = *s;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* find end of entity */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (i = 1; s[i] != ';' && s[i] != '\0'; i++) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (s[i] == '\0') { /* treat as normal data */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = *s;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* is it numeric ? */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (s[1] == '#') {
10a4cdd68ef1ca0e54af296fe1d08ac00150c90bwrowe for (j = 2, val = 0; j < i && apr_isdigit(s[j]); j++) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding val = val * 10 + s[j] - '0';
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding s += i;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (j < i || val <= 8 || (val >= 11 && val <= 31) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (val >= 127 && val <= 160) || val >= 256) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding p--; /* no data to output */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = RAW_ASCII_CHAR(val);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding j = i - 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (j > MAXENTLEN || entlist[j] == NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* wrong length */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '&';
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue; /* skip it */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (ents = entlist[j]; *ents != '\0'; ents += i) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (strncmp(s + 1, ents, j) == 0) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*ents == '\0') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '&'; /* unknown */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = RAW_ASCII_CHAR(((const unsigned char *) ents)[j]);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding s += i;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '\0';
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/*
18343797fadabacf01280b38ea7688690d12aec0rbb * Extract the next tag name and value.
18343797fadabacf01280b38ea7688690d12aec0rbb * If there are no more tags, set the tag name to NULL.
18343797fadabacf01280b38ea7688690d12aec0rbb * The tag value is html decoded if dodecode is non-zero.
18343797fadabacf01280b38ea7688690d12aec0rbb * The tag value may be NULL if there is no tag value..
18343797fadabacf01280b38ea7688690d12aec0rbb * format:
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe * [WS]<Tag>[WS]=[WS]['|"|`]<Value>[['|"|`|]|WS]
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb#define SKIP_TAG_WHITESPACE(ptr) while ((*ptr != '\0') && (apr_isspace (*ptr))) ptr++
18343797fadabacf01280b38ea7688690d12aec0rbb
445997e06464e7625c7f0e22917f8f2d9876cfffrbbstatic void ap_ssi_get_tag_and_value(include_ctx_t *ctx, char **tag,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz char **tag_val, int dodecode)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *c = ctx->curr_tag_pos;
18343797fadabacf01280b38ea7688690d12aec0rbb int shift_val = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb char term = '\0';
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *tag_val = NULL;
82630c4a04be47f39298d3284b2c596244fb509bbrianp if (ctx->curr_tag_pos - ctx->combined_tag > ctx->tag_length) {
82630c4a04be47f39298d3284b2c596244fb509bbrianp *tag = NULL;
82630c4a04be47f39298d3284b2c596244fb509bbrianp return;
82630c4a04be47f39298d3284b2c596244fb509bbrianp }
18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);
18343797fadabacf01280b38ea7688690d12aec0rbb *tag = c; /* First non-whitespace character (could be NULL). */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f6deff8fa9ad63fc576e8d91efc1d9afd068eccbrianp while (apr_islower(*c)) {
0f6deff8fa9ad63fc576e8d91efc1d9afd068eccbrianp c++; /* Optimization for the common case where the tag */
0f6deff8fa9ad63fc576e8d91efc1d9afd068eccbrianp } /* is already lowercase */
0f6deff8fa9ad63fc576e8d91efc1d9afd068eccbrianp
0f6deff8fa9ad63fc576e8d91efc1d9afd068eccbrianp while ((*c != '=') && (!apr_isspace(*c)) && (*c != '\0')) {
18343797fadabacf01280b38ea7688690d12aec0rbb *c = apr_tolower(*c); /* find end of tag, lowercasing as we go... */
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb if ((*c == '\0') || (**tag == '=')) {
18343797fadabacf01280b38ea7688690d12aec0rbb if ((**tag == '\0') || (**tag == '=')) {
18343797fadabacf01280b38ea7688690d12aec0rbb *tag = NULL;
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = c;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz return; /* We have found the end of the buffer. */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz } /* We might have a tag, but definitely no value. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == '=') {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *c++ = '\0'; /* Overwrite the '=' with a terminating byte after tag. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else { /* Try skipping WS to find the '='. */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *c++ = '\0'; /* Terminate the tag... */
18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);
18343797fadabacf01280b38ea7688690d12aec0rbb
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* There needs to be an equal sign if there's a value. */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (*c != '=') {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = c;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz return; /* There apparently was no value. */
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb c++; /* Skip the equals sign. */
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe if (*c == '"' || *c == '\'' || *c == '`') {
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe /* Allow quoted values for space inclusion.
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe * NOTE: This does not pass the quotes on return.
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe */
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe term = *c++;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *tag_val = c;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (!term) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp while (!apr_isspace(*c) && (*c != '\0')) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp c++;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp else {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp while ((*c != term) && (*c != '\0') && (*c != '\\')) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp /* Quickly scan past the string until we reach
a5a04992e4caa31b2131336d8751448616ba30cfbrianp * either the end of the tag or a backslash. If
a5a04992e4caa31b2131336d8751448616ba30cfbrianp * we find a backslash, we have to switch to the
a5a04992e4caa31b2131336d8751448616ba30cfbrianp * more complicated parser loop that follows.
da56a2fee56858b4005bd37448e2cb083b54fdf8wrowe */
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (*c == '\\') {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp do {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp /* Accept \" (or ' or `) as valid quotation of string.
a5a04992e4caa31b2131336d8751448616ba30cfbrianp */
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (*c == '\\') {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp /* Overwrite the "\" during the embedded
a5a04992e4caa31b2131336d8751448616ba30cfbrianp * escape sequence of '"'. "\'" or '`'.
a5a04992e4caa31b2131336d8751448616ba30cfbrianp * Shift bytes from here to next delimiter.
a5a04992e4caa31b2131336d8751448616ba30cfbrianp */
a5a04992e4caa31b2131336d8751448616ba30cfbrianp c++;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (*c == term) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp shift_val++;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (shift_val > 0) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp *(c-shift_val) = *c;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (*c == '\0') {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp break;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
18343797fadabacf01280b38ea7688690d12aec0rbb
a5a04992e4caa31b2131336d8751448616ba30cfbrianp c++;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp if (shift_val > 0) {
a5a04992e4caa31b2131336d8751448616ba30cfbrianp *(c-shift_val) = *c;
a5a04992e4caa31b2131336d8751448616ba30cfbrianp }
a5a04992e4caa31b2131336d8751448616ba30cfbrianp } while ((*c != term) && (*c != '\0'));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
ff2fef0d709ee06646b3462cd3ef39648a54c7f7jwoolley *(c-shift_val) = '\0'; /* Overwrites delimiter (term or WS) with NULL. */
aed7748511a45ed550ebb122d068b76e1e81e21ebrianp ctx->curr_tag_pos = ++c;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (dodecode) {
18343797fadabacf01280b38ea7688690d12aec0rbb decodehtml(*tag_val);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb return;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
7f7ba3f0537003a359c42170aee14a101d7fe917brianp/* initial buffer size for power-of-two allocator in ap_ssi_parse_string */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp#define PARSE_STRING_INITIAL_SIZE 64
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/*
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * Do variable substitution on strings
7f7ba3f0537003a359c42170aee14a101d7fe917brianp * (Note: If out==NULL, this function allocs a buffer for the resulting
7f7ba3f0537003a359c42170aee14a101d7fe917brianp * string from r->pool. The return value is the parsed string)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
7f7ba3f0537003a359c42170aee14a101d7fe917brianpstatic char *ap_ssi_parse_string(request_rec *r, include_ctx_t *ctx,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp const char *in, char *out,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t length, int leave_name)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char ch;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *next;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *end_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t out_size;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* allocate an output buffer if needed */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (!out) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = PARSE_STRING_INITIAL_SIZE;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (out_size > length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out = apr_palloc(r->pool, out_size);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp else {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* leave room for nul terminator */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp end_out = out + out_size - 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
7f7ba3f0537003a359c42170aee14a101d7fe917brianp next = out;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while ((ch = *in++) != '\0') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (ch) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '\\':
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (next == end_out) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (out_size < length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* double the buffer size */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t new_out_size = out_size * 2;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t current_length = next - out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (new_out_size > length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out_size = length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out = apr_palloc(r->pool, new_out_size);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp memcpy(new_out, out, current_length);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out = new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = new_out_size;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp end_out = out + out_size - 1;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp next = out + current_length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp else {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* truncated */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp *next = '\0';
7f7ba3f0537003a359c42170aee14a101d7fe917brianp return out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*in == '$') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = *in++;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = ch;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '$':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz const char *start_of_var_name;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz char *end_of_var_name; /* end of var name + 1 */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz const char *expansion, *temp_end, *val;
18343797fadabacf01280b38ea7688690d12aec0rbb char tmp_store;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz size_t l;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* guess that the expansion won't happen */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expansion = in - 1;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (*in == '{') {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ++in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz start_of_var_name = in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz in = ap_strchr_c(in, '}');
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (in == NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz 0, r, "Missing '}' on variable \"%s\"",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expansion);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';
7f7ba3f0537003a359c42170aee14a101d7fe917brianp return out;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz temp_end = in;
87e9aee98265a06128c8ae448967fe98e271cce0trawick end_of_var_name = (char *)temp_end;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ++in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz start_of_var_name = in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz while (apr_isalnum(*in) || *in == '_') {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ++in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
87e9aee98265a06128c8ae448967fe98e271cce0trawick temp_end = in;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz end_of_var_name = (char *)temp_end;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* what a pain, too bad there's no table_getn where you can
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * pass a non-nul terminated string */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = end_of_var_name - start_of_var_name;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (l != 0) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb tmp_store = *end_of_var_name;
445997e06464e7625c7f0e22917f8f2d9876cfffrbb *end_of_var_name = '\0';
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe val = get_include_var(r, ctx, start_of_var_name);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb *end_of_var_name = tmp_store;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (val) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expansion = val;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = strlen(expansion);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else if (leave_name) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = in - expansion;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* no expansion to be done */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz break;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* zero-length variable name causes just the $ to be
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * copied */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = 1;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if ((next + l > end_out) && (out_size < length)) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* increase the buffer size to accommodate l more chars */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t new_out_size = out_size;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t current_length = next - out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp do {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out_size *= 2;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp } while (new_out_size < current_length + l);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (new_out_size > length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out_size = length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out = apr_palloc(r->pool, new_out_size);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp memcpy(new_out, out, current_length);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out = new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = new_out_size;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp end_out = out + out_size - 1;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp next = out + current_length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = ((int)l > end_out - next) ? (end_out - next) : l;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz memcpy(next, expansion, l);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz next += l;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (next == end_out) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (out_size < length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* double the buffer size */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t new_out_size = out_size * 2;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp apr_size_t current_length = next - out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp if (new_out_size > length) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out_size = length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp new_out = apr_palloc(r->pool, new_out_size);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp memcpy(new_out, out, current_length);
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out = new_out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp out_size = new_out_size;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp end_out = out + out_size - 1;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp next = out + current_length;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp else {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* truncated */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp *next = '\0';
7f7ba3f0537003a359c42170aee14a101d7fe917brianp return out;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = ch;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';
7f7ba3f0537003a359c42170aee14a101d7fe917brianp return out;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* --------------------------- Action handlers ---------------------------- */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* ensure that path is relative, and does not contain ".." elements
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * ensentially ensure that it does not match the regex:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * (^/|(^|/)\.\.(/|$))
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe * XXX: Simply replace with apr_filepath_merge
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic int is_only_below(const char *path)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef HAVE_DRIVE_LETTERS
50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (path[1] == ':')
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
50e59a535cafd083838a173aedf9cfa6917d016dwrowe#ifdef NETWARE
f7e94f9555c0632e8a290a7e76d778e8c7daf425jerenkrantz if (strchr(path, ':'))
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz return 0;
50e59a535cafd083838a173aedf9cfa6917d016dwrowe#endif
50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (path[0] == '/') {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (*path) {
50e59a535cafd083838a173aedf9cfa6917d016dwrowe int dots = 0;
50e59a535cafd083838a173aedf9cfa6917d016dwrowe while (path[dots] == '.')
50e59a535cafd083838a173aedf9cfa6917d016dwrowe ++dots;
50e59a535cafd083838a173aedf9cfa6917d016dwrowe#if defined(WIN32)
50e59a535cafd083838a173aedf9cfa6917d016dwrowe /* If the name is canonical this is redundant
50e59a535cafd083838a173aedf9cfa6917d016dwrowe * but in security, redundancy is worthwhile.
50e59a535cafd083838a173aedf9cfa6917d016dwrowe * Does OS2 belong here (accepts ... for ..)?
50e59a535cafd083838a173aedf9cfa6917d016dwrowe */
50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (dots > 1 && (!path[dots] || path[dots] == '/'))
50e59a535cafd083838a173aedf9cfa6917d016dwrowe return 0;
50e59a535cafd083838a173aedf9cfa6917d016dwrowe#else
50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (dots == 2 && (!path[dots] || path[dots] == '/'))
50e59a535cafd083838a173aedf9cfa6917d016dwrowe return 0;
50e59a535cafd083838a173aedf9cfa6917d016dwrowe#endif
50e59a535cafd083838a173aedf9cfa6917d016dwrowe path += dots;
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp /* Advance to either the null byte at the end of the
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp * string or the character right after the next slash,
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp * whichever comes first
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp */
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp while (*path && (*path++ != '/')) {
59004ab0feba0b23cf50c35c901e051c4965dbc4brianp continue;
82630c4a04be47f39298d3284b2c596244fb509bbrianp }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_include(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;
374e2f2d7ee8274b53fddb0d4e3270105377b868gregames int loglevel = APLOG_ERR;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return (0);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
18343797fadabacf01280b38ea7688690d12aec0rbb return (1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
c815e1cfb2ec4db2e1a94fafd77de045d7fd93dbbrianp if (!strcmp(tag, "virtual") || !strcmp(tag, "file")) {
18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *rr = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *error_fmt = NULL;
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh apr_status_t rc = APR_SUCCESS;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh SPLIT_AND_PASS_PRETAG_BUCKETS(*bb, ctx, f->next, rc);
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh if (rc != APR_SUCCESS) {
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh return rc;
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh }
cbd8d35ca8d9780f1081f30ebfe4abda44cab7ebianh
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag[0] == 'f') {
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe /* XXX: Port to apr_filepath_merge
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe * be safe; only files in this directory or below allowed
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (!is_only_below(parsed_string)) {
18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "unable to include file \"%s\" "
18343797fadabacf01280b38ea7688690d12aec0rbb "in parsed file %s";
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_file(parsed_string, r, f->next);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_uri(parsed_string, r, f->next);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (!error_fmt && rr->status != HTTP_OK) {
18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "unable to include \"%s\" in parsed file %s";
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (!error_fmt && (ctx->flags & FLAG_NO_EXEC) &&
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz rr->content_type &&
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (strncmp(rr->content_type, "text/", 5))) {
18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "unable to include potential exec \"%s\" "
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s";
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb if (error_fmt == NULL) {
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley /* try to avoid recursive includes. We do this by walking
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * up the r->main list of subrequests, and at each level
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * walking back through any internal redirects. At each
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * step, we compare the filenames and the URIs.
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley *
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * The filename comparison catches a recursive include
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * with an ever-changing URL, eg.
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * <!--#include virtual=
97b2451ce8e896e30c696d01ad11ef8d7c815881wrowe * "$REQUEST_URI/$QUERY_STRING?$QUERY_STRING/x" -->
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * which, although they would eventually be caught because
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * we have a limit on the length of files, etc., can
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * recurse for a while.
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley *
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * The URI comparison catches the case where the filename
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * is changed while processing the request, so the
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * current name is never the same as any previous one.
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * This can happen with "DocumentRoot /foo" when you
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * request "/" on the server and it includes "/".
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * This only applies to modules such as mod_dir that
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * (somewhat improperly) mess with r->filename outside
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley * of a filename translation phase.
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley */
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley int founddupe = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *p;
18343797fadabacf01280b38ea7688690d12aec0rbb for (p = r; p != NULL && !founddupe; p = p->main) {
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley request_rec *q;
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley for (q = p; q != NULL; q = q->prev) {
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley if ((q->filename && rr->filename &&
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (strcmp(q->filename, rr->filename) == 0)) ||
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ((*q->uri == '/') &&
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (strcmp(q->uri, rr->uri) == 0)))
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley {
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley founddupe = 1;
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley break;
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley }
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley }
93780c0e38edba46c1be32fd4c31c344c0a57286jwoolley }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (p != NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "Recursive include of \"%s\" "
18343797fadabacf01280b38ea7688690d12aec0rbb "in parsed file %s";
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* See the Kludge in send_parsed_file for why */
18343797fadabacf01280b38ea7688690d12aec0rbb /* Basically, it puts a bread crumb in here, then looks */
18343797fadabacf01280b38ea7688690d12aec0rbb /* for the crumb later to see if its been here. */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (rr)
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ap_set_module_config(rr->request_config,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz &include_module, r);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
8b81084c74de035f48c89bfe5fc63d3e4be3a3c5stoddard if (!error_fmt && ap_run_sub_req(rr)) {
8b81084c74de035f48c89bfe5fc63d3e4be3a3c5stoddard error_fmt = "unable to include \"%s\" in parsed file %s";
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (error_fmt) {
374e2f2d7ee8274b53fddb0d4e3270105377b868gregames ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|loglevel,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz 0, r, error_fmt, tag_val, r->filename);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
1f89ef1594d8a552f81e775be55cb9baeab32b77trawick }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
ba00c3b7c20f00ce631b89ae3b1cd3bae8d1b165rbb /* destroy the sub request */
ba00c3b7c20f00ce631b89ae3b1cd3bae8d1b165rbb if (rr != NULL) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ap_destroy_sub_req(rr);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "unknown parameter \"%s\" to tag include in %s",
18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_echo(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb const char *echo_text = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
17bdb8862482dff763afd4d86a58de533afff4cajwoolley apr_size_t e_len;
3a9bc6532fbe8439fc748d8ffedb87415904d16ajim enum {E_NONE, E_URL, E_ENTITY} encode;
3a9bc6532fbe8439fc748d8ffedb87415904d16ajim
3a9bc6532fbe8439fc748d8ffedb87415904d16ajim encode = E_ENTITY;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag != NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcmp(tag, "var")) {
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley conn_rec *c = r->connection;
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp const char *val =
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp get_include_var(r, ctx,
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp ap_ssi_parse_string(r, ctx, tag_val, NULL,
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp MAX_STRING_LEN, 0));
18343797fadabacf01280b38ea7688690d12aec0rbb if (val) {
18343797fadabacf01280b38ea7688690d12aec0rbb switch(encode) {
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz case E_NONE:
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz echo_text = val;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz break;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz case E_URL:
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz echo_text = ap_escape_uri(r->pool, val);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz break;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz case E_ENTITY:
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz echo_text = ap_escape_html(r->pool, val);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz break;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb e_len = strlen(echo_text);
69a92d756d879367994763ac2d87392dfc3766f3brianp tmp_buck = apr_bucket_pool_create(echo_text, e_len,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->pool, c->bucket_alloc);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh include_server_config *sconf=
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh ap_get_module_config(r->server->module_config,
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh &include_module);
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh tmp_buck = apr_bucket_pool_create(sconf->undefinedEcho,
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh sconf->undefinedEchoLen,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->pool, c->bucket_alloc);
18343797fadabacf01280b38ea7688690d12aec0rbb }
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "encoding")) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcasecmp(tag_val, "none")) encode = E_NONE;
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcasecmp(tag_val, "url")) encode = E_URL;
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcasecmp(tag_val, "entity")) encode = E_ENTITY;
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown value \"%s\" to parameter \"encoding\" of "
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "tag echo in %s", tag_val, r->filename);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "unknown parameter \"%s\" in tag echo of %s",
18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
3a9bc6532fbe8439fc748d8ffedb87415904d16ajim
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* error and tf must point to a string with room for at
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * least MAX_STRING_LEN characters
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_config(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_t *env = r->subprocess_env;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 0; /* Reached the end of the string. */
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb return 1; /* tags must have values. */
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcmp(tag, "errmsg")) {
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh if (ctx->error_str_override == NULL) {
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh ctx->error_str_override = (char *)apr_palloc(ctx->pool,
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh MAX_STRING_LEN);
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh ctx->error_str = ctx->error_str_override;
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ap_ssi_parse_string(r, ctx, tag_val, ctx->error_str_override,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "timefmt")) {
18343797fadabacf01280b38ea7688690d12aec0rbb apr_time_t date = r->request_time;
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh if (ctx->time_str_override == NULL) {
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh ctx->time_str_override = (char *)apr_palloc(ctx->pool,
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh MAX_STRING_LEN);
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh ctx->time_str = ctx->time_str_override;
7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ap_ssi_parse_string(r, ctx, tag_val, ctx->time_str_override,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz MAX_STRING_LEN, 0);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_table_setn(env, "DATE_LOCAL", ap_ht_time(r->pool, date,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->time_str, 0));
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_table_setn(env, "DATE_GMT", ap_ht_time(r->pool, date,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->time_str, 1));
18343797fadabacf01280b38ea7688690d12aec0rbb apr_table_setn(env, "LAST_MODIFIED",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ap_ht_time(r->pool, r->finfo.mtime,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->time_str, 0));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "sizefmt")) {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb decodehtml(parsed_string);
18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcmp(parsed_string, "bytes")) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= FLAG_SIZE_IN_BYTES;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(parsed_string, "abbrev")) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_SIZE_ABBREV;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag config in %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz tag, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic int find_file(request_rec *r, const char *directive, const char *tag,
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val, apr_finfo_t *finfo)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *to_send = tag_val;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding request_rec *rr = NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int ret=0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *error_fmt = NULL;
6f984345bbfa9342dde1f2b7b8c35b7987d078afwrowe apr_status_t rv = APR_SUCCESS;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!strcmp(tag, "file")) {
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe /* XXX: Port to apr_filepath_merge
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe * be safe; only files in this directory or below allowed
5915dc3ebb03935b18b0d14088278d22eefe3553wrowe */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!is_only_below(tag_val)) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding error_fmt = "unable to access file \"%s\" "
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s";
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_getparents(tag_val); /* get rid of any nasties */
85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein
85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein /* note: it is okay to pass NULL for the "next filter" since
85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein we never attempt to "run" this sub request. */
18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_file(tag_val, r, NULL);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
f54da7877f9e092465df38bfda142f3e71dbb7aawrowe if (rr->status == HTTP_OK && rr->finfo.filetype != 0) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding to_send = rr->filename;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if ((rv = apr_stat(finfo, to_send,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz APR_FINFO_GPROT | APR_FINFO_MIN, rr->pool)) != APR_SUCCESS
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz && rv != APR_INCOMPLETE) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding error_fmt = "unable to get information about \"%s\" "
9274c5e05fbb6b9890099c0c20aa35d747d42be1stoddard "in parsed file %s";
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding error_fmt = "unable to lookup information about \"%s\" "
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s";
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (error_fmt) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ret = -1;
6f984345bbfa9342dde1f2b7b8c35b7987d078afwrowe ap_log_rerror(APLOG_MARK, APLOG_ERR | (rv ? 0 : APLOG_NOERRNO),
6f984345bbfa9342dde1f2b7b8c35b7987d078afwrowe rv, r, error_fmt, to_send, r->filename);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (rr) ap_destroy_sub_req(rr);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return ret;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (!strcmp(tag, "virtual")) {
85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein /* note: it is okay to pass NULL for the "next filter" since
85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein we never attempt to "run" this sub request. */
18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_uri(tag_val, r, NULL);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
f54da7877f9e092465df38bfda142f3e71dbb7aawrowe if (rr->status == HTTP_OK && rr->finfo.filetype != 0) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding memcpy((char *) finfo, (const char *) &rr->finfo,
85482525adee8e37838e0a5fca66e740a7fb5c2estoddard sizeof(rr->finfo));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_destroy_sub_req(rr);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "unable to get information about \"%s\" "
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding tag_val, r->filename);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_destroy_sub_req(rr);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "unknown parameter \"%s\" to tag %s in %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding tag, directive, r->filename);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_fsize(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb apr_finfo_t finfo;
17bdb8862482dff763afd4d86a58de533afff4cajwoolley apr_size_t s_len;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (!find_file(r, "fsize", tag, parsed_string, &finfo)) {
17bdb8862482dff763afd4d86a58de533afff4cajwoolley /* XXX: if we *know* we're going to have to copy the
17bdb8862482dff763afd4d86a58de533afff4cajwoolley * thing off of the stack anyway, why not palloc buff
17bdb8862482dff763afd4d86a58de533afff4cajwoolley * instead of sticking it on the stack; then we can just
17bdb8862482dff763afd4d86a58de533afff4cajwoolley * use a pool bucket and skip the copy
17bdb8862482dff763afd4d86a58de533afff4cajwoolley */
18343797fadabacf01280b38ea7688690d12aec0rbb char buff[50];
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (!(ctx->flags & FLAG_SIZE_IN_BYTES)) {
653902eb0cf2fa09cbfc4582bfbb68b0f4ed1a81wrowe apr_strfsize(finfo.size, buff);
18343797fadabacf01280b38ea7688690d12aec0rbb s_len = strlen (buff);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb int l, x, pos = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb char tmp_buff[50];
18343797fadabacf01280b38ea7688690d12aec0rbb
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_snprintf(tmp_buff, sizeof(tmp_buff),
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "%" APR_OFF_T_FMT, finfo.size);
18343797fadabacf01280b38ea7688690d12aec0rbb l = strlen(tmp_buff); /* grrr */
18343797fadabacf01280b38ea7688690d12aec0rbb for (x = 0; x < l; x++) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (x && (!((l - x) % 3))) {
18343797fadabacf01280b38ea7688690d12aec0rbb buff[pos++] = ',';
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb buff[pos++] = tmp_buff[x];
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb buff[pos] = '\0';
18343797fadabacf01280b38ea7688690d12aec0rbb s_len = pos;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_heap_create(buff, s_len, NULL,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_flastmod(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket *head_ptr, apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb apr_finfo_t finfo;
17bdb8862482dff763afd4d86a58de533afff4cajwoolley apr_size_t t_len;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (!find_file(r, "flastmod", tag, parsed_string, &finfo)) {
18343797fadabacf01280b38ea7688690d12aec0rbb char *t_val;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb t_val = ap_ht_time(r->pool, finfo.mtime, ctx->time_str, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb t_len = strlen(t_val);
18343797fadabacf01280b38ea7688690d12aec0rbb
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_pool_create(t_val, t_len, r->pool,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowestatic int re_check(request_rec *r, include_ctx_t *ctx,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe char *string, char *rexp)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding regex_t *compiled;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe const apr_size_t nres = sizeof(*ctx->re_result) / sizeof(regmatch_t);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int regex_error;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding compiled = ap_pregcomp(r->pool, rexp, REG_EXTENDED | REG_NOSUB);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (compiled == NULL) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe "unable to compile pattern \"%s\"", rexp);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (!ctx->re_result) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ctx->re_result = apr_pcalloc(r->pool, sizeof(*ctx->re_result));
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ctx->re_string = string;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe regex_error = ap_regexec(compiled, string, nres, *ctx->re_result, 0);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_pregfree(r->pool, compiled);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (!regex_error);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingenum token_type {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe token_string, token_re,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token_and, token_or, token_not, token_eq, token_ne,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token_rbrace, token_lbrace, token_group,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token_ge, token_le, token_gt, token_lt
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding};
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstruct token {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding enum token_type type;
34d7c69235d0bc7ac9e2f121c4890c309bb39d20brianp char* value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding};
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic const char *get_ptoken(request_rec *r, const char *string,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz struct token *token, int *unmatched)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char ch;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int next = 0;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe char qs = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb int tkn_fnd = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
34d7c69235d0bc7ac9e2f121c4890c309bb39d20brianp token->value = NULL;
34d7c69235d0bc7ac9e2f121c4890c309bb39d20brianp
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Skip leading white space */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (string == (char *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (char *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while ((ch = *string++)) {
10a4cdd68ef1ca0e54af296fe1d08ac00150c90bwrowe if (!apr_isspace(ch)) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (ch == '\0') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (char *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_string; /* the default type */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (ch) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '(':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_lbrace;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case ')':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_rbrace;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '=':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_eq;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '!':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*string == '=') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_ne;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string + 1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_not;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '\'':
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe /* already token->type == token_string */
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe qs = '\'';
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe break;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case '/':
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe token->type = token_re;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe qs = '/';
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '|':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*string == '|') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_or;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string + 1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '&':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*string == '&') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_and;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string + 1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '>':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*string == '=') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_ge;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string + 1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_gt;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '<':
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*string == '=') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_le;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string + 1);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_lt;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe /* already token->type == token_string */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* We should only be here if we are in a string */
34d7c69235d0bc7ac9e2f121c4890c309bb39d20brianp token->value = apr_palloc(r->pool, strlen(string) + 2); /* 2 for ch plus
34d7c69235d0bc7ac9e2f121c4890c309bb39d20brianp trailing null */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!qs) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->value[next++] = ch;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /*
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * I used the ++string throughout this section so that string
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * ends up pointing to the next token and I can just return it
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
18343797fadabacf01280b38ea7688690d12aec0rbb for (ch = *string; ((ch != '\0') && (!tkn_fnd)); ch = *++string) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (ch == '\\') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((ch = *++string) == '\0') {
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb token->value[next++] = ch;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb if (!qs) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (apr_isspace(ch)) {
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb switch (ch) {
18343797fadabacf01280b38ea7688690d12aec0rbb case '(':
18343797fadabacf01280b38ea7688690d12aec0rbb case ')':
18343797fadabacf01280b38ea7688690d12aec0rbb case '=':
18343797fadabacf01280b38ea7688690d12aec0rbb case '!':
18343797fadabacf01280b38ea7688690d12aec0rbb case '<':
18343797fadabacf01280b38ea7688690d12aec0rbb case '>':
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb break;
18343797fadabacf01280b38ea7688690d12aec0rbb case '|':
18343797fadabacf01280b38ea7688690d12aec0rbb if (*(string + 1) == '|') {
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb break;
18343797fadabacf01280b38ea7688690d12aec0rbb case '&':
18343797fadabacf01280b38ea7688690d12aec0rbb if (*(string + 1) == '&') {
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb break;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (!tkn_fnd) {
18343797fadabacf01280b38ea7688690d12aec0rbb token->value[next++] = ch;
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (ch == qs) {
18343797fadabacf01280b38ea7688690d12aec0rbb qs = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb token->value[next++] = ch;
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe /* If qs is still set, we have an unmatched quote */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (qs) {
18343797fadabacf01280b38ea7688690d12aec0rbb *unmatched = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding next = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->value[next] = '\0';
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (string);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* there is an implicit assumption here that expr is at most MAX_STRING_LEN-1
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * characters long...
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowestatic int parse_expr(request_rec *r, include_ctx_t *ctx, const char *expr,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe int *was_error, int *was_unmatched, char *debug)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding struct parse_node {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding struct parse_node *left, *right, *parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding struct token token;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int value, done;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz } *root, *current, *new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding const char *parse;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char* buffer;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int retval = 0;
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick apr_size_t debug_pos = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb debug[debug_pos] = '\0';
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb *was_unmatched = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((parse = expr) == (char *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (0);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = current = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Create Parse Tree */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (1) {
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp new = (struct parse_node *) apr_palloc(r->pool,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding sizeof(struct parse_node));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = new->left = new->right = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->done = 0;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if ((parse = get_ptoken(r, parse, &new->token, was_unmatched)) ==
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (char *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (new->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz debug_pos += sprintf (&debug[debug_pos],
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz " Token: string (%s)\n",
18343797fadabacf01280b38ea7688690d12aec0rbb new->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick current->token.value = apr_pstrcat(r->pool,
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick current->token.value,
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick current->token.value[0] ? " " : "",
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick new->token.value,
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick NULL);
5e0b43762dc1baf6a668d09b57577749b313d39dtrawick
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = current;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->right = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_re:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe#ifdef DEBUG_INCLUDE
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe debug_pos += sprintf (&debug[debug_pos],
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe " Token: regex (%s)\n",
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe new->token.value);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe#endif
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (current == (struct parse_node *) NULL) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe root = current = new;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe break;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe switch (current->token.type) {
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_eq:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_ne:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_and:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_or:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_lbrace:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_not:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe new->parent = current;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe current = current->right = new;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe break;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe default:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe "Invalid expression \"%s\" in file %s",
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe expr, r->filename);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe break;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Token: and/or\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Token: and/or\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Token: and/or\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Percolate upwards */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_re:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_group:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = root;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left->parent = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = current;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz memcpy(&debug[debug_pos], " Token: not\n",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz sizeof(" Token: not\n"));
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz debug_pos += sizeof(" Token: not\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Percolate upwards */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "Invalid expression \"%s\" in file %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = root;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left->parent = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = current;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz memcpy(&debug[debug_pos], " Token: eq/ne/ge/gt/le/lt\n",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz sizeof(" Token: eq/ne/ge/gt/le/lt\n"));
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz debug_pos += sizeof(" Token: eq/ne/ge/gt/le/lt\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "Invalid expression \"%s\" in file %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Percolate upwards */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_re:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_group:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = root;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left->parent = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = current;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_rbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Token: rbrace\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Token: rbrace\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Token: rbrace\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->token.type == token_lbrace) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->token.type = token_group;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Unmatched ')' in \"%s\" in file %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Token: lbrace\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Token: lbrace\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Token: lbrace\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Percolate upwards */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_re:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_group:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current == (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = root;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left->parent = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = (struct parse_node *) NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding root = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->left = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding new->parent = current;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = new;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* Evaluate Parse Tree */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = root;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while (current != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Evaluate string\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Evaluate string\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Evaluate string\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
7f7ba3f0537003a359c42170aee14a101d7fe917brianp buffer = ap_ssi_parse_string(r, ctx, current->token.value, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->token.value = buffer;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = (current->token.value[0] != '\0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe case token_re:
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe "No operator before regex of expr \"%s\" in file %s",
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe expr, r->filename);
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_and:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_or:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz memcpy(&debug[debug_pos], " Evaluate and/or\n",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz sizeof(" Evaluate and/or\n"));
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz debug_pos += sizeof(" Evaluate and/or\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (current->left == (struct parse_node *) NULL ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right == (struct parse_node *) NULL) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "Invalid expression \"%s\" in file %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!current->left->done) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->left->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->left->token.value = buffer;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz current->left->value =
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (current->left->token.value[0] != '\0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->left->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->left;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!current->right->done) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (current->right->token.type) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_string:
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->right->token.value = buffer;
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz current->right->value =
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz (current->right->token.value[0] != '\0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Left: %c\n",
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick current->left->value ? '1' : '0');
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Right: %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->right->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->token.type == token_and) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->left->value && current->right->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->left->value || current->right->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_eq:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ne:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Evaluate eq/ne\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Evaluate eq/ne\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Evaluate eq/ne\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((current->left == (struct parse_node *) NULL) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (current->right == (struct parse_node *) NULL) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (current->left->token.type != token_string) ||
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe ((current->right->token.type != token_string) &&
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe (current->right->token.type != token_re))) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->left->token.value = buffer;
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->right->token.value = buffer;
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe if (current->right->token.type == token_re) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos],
18343797fadabacf01280b38ea7688690d12aec0rbb " Re Compare (%s) with /%s/\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->left->token.value,
e0d709462e654322f0fa9dad28682cf63bcf8759wrowe current->right->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value =
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe re_check(r, ctx, current->left->token.value,
e0d709462e654322f0fa9dad28682cf63bcf8759wrowe current->right->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos],
18343797fadabacf01280b38ea7688690d12aec0rbb " Compare (%s) with (%s)\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->left->token.value,
18343797fadabacf01280b38ea7688690d12aec0rbb current->right->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value =
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (strcmp(current->left->token.value,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right->token.value) == 0);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->token.type == token_ne) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = !current->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_ge:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_gt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_le:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lt:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (&debug[debug_pos], " Evaluate ge/gt/le/lt\n",
18343797fadabacf01280b38ea7688690d12aec0rbb sizeof (" Evaluate ge/gt/le/lt\n"));
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sizeof (" Evaluate ge/gt/le/lt\n");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((current->left == (struct parse_node *) NULL) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (current->right == (struct parse_node *) NULL) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (current->left->token.type != token_string) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (current->right->token.type != token_string)) {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Invalid expression \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->left->token.value = buffer;
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
ac76e9cf90bb5f3d1d9a245a0781a797f00b165cbrianp NULL, MAX_STRING_LEN, 0);
548e06e26f5377b2efbb7e0dab20f536e5e24160trawick current->right->token.value = buffer;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos],
18343797fadabacf01280b38ea7688690d12aec0rbb " Compare (%s) with (%s)\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->left->token.value,
18343797fadabacf01280b38ea7688690d12aec0rbb current->right->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value =
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding strcmp(current->left->token.value,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->right->token.value);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->token.type == token_ge) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->value >= 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (current->token.type == token_gt) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->value > 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (current->token.type == token_le) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->value <= 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (current->token.type == token_lt) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->value < 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = 0; /* Don't return -1 if unknown token */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_not:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->right != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!current->right->done) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = !current->right->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Evaluate !: %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_group:
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (current->right != (struct parse_node *) NULL) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!current->right->done) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->right;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = current->right->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->value = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb debug_pos += sprintf (&debug[debug_pos], " Evaluate (): %c\n",
18343797fadabacf01280b38ea7688690d12aec0rbb current->value ? '1' : '0');
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current->done = 1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding current = current->parent;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_lbrace:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Unmatched '(' in \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case token_rbrace:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Unmatched ')' in \"%s\" in file %s",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expr, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "bad token type");
18343797fadabacf01280b38ea7688690d12aec0rbb *was_error = 1;
f570709760ee22227aa8dc7366a85e11ec99cfc9brianp return retval;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding retval = (root == (struct parse_node *) NULL) ? 0 : root->value;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (retval);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb/*-------------------------------------------------------------------------*/
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick/* XXX overlaying the static string pointed to by cond_txt isn't cool */
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick
18343797fadabacf01280b38ea7688690d12aec0rbb#define MAX_DEBUG_SIZE MAX_STRING_LEN
18343797fadabacf01280b38ea7688690d12aec0rbb#define LOG_COND_STATUS(cntx, t_buck, h_ptr, ins_head, tag_text) \
18343797fadabacf01280b38ea7688690d12aec0rbb{ \
18343797fadabacf01280b38ea7688690d12aec0rbb char *cond_txt = "**** X conditional_status=\"0\"\n"; \
18343797fadabacf01280b38ea7688690d12aec0rbb \
18343797fadabacf01280b38ea7688690d12aec0rbb if (cntx->flags & FLAG_COND_TRUE) { \
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick cond_txt[31] = '1'; \
18343797fadabacf01280b38ea7688690d12aec0rbb } \
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley memcpy(&cond_txt[5], tag_text, sizeof(tag_text)-1); \
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley t_buck = apr_bucket_heap_create(cond_txt, sizeof(cond_txt)-1, \
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley NULL, h_ptr->list); \
17bdb8862482dff763afd4d86a58de533afff4cajwoolley APR_BUCKET_INSERT_BEFORE(h_ptr, t_buck); \
18343797fadabacf01280b38ea7688690d12aec0rbb \
18343797fadabacf01280b38ea7688690d12aec0rbb if (ins_head == NULL) { \
18343797fadabacf01280b38ea7688690d12aec0rbb ins_head = t_buck; \
18343797fadabacf01280b38ea7688690d12aec0rbb } \
18343797fadabacf01280b38ea7688690d12aec0rbb}
18343797fadabacf01280b38ea7688690d12aec0rbb#define DUMP_PARSE_EXPR_DEBUG(t_buck, h_ptr, d_buf, ins_head) \
18343797fadabacf01280b38ea7688690d12aec0rbb{ \
18343797fadabacf01280b38ea7688690d12aec0rbb if (d_buf[0] != '\0') { \
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley t_buck = apr_bucket_heap_create(d_buf, strlen(d_buf), \
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley NULL, h_ptr->list); \
17bdb8862482dff763afd4d86a58de533afff4cajwoolley APR_BUCKET_INSERT_BEFORE(h_ptr, t_buck); \
18343797fadabacf01280b38ea7688690d12aec0rbb \
18343797fadabacf01280b38ea7688690d12aec0rbb if (ins_head == NULL) { \
18343797fadabacf01280b38ea7688690d12aec0rbb ins_head = t_buck; \
18343797fadabacf01280b38ea7688690d12aec0rbb } \
18343797fadabacf01280b38ea7688690d12aec0rbb } \
18343797fadabacf01280b38ea7688690d12aec0rbb}
18343797fadabacf01280b38ea7688690d12aec0rbb#else
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb#define MAX_DEBUG_SIZE 10
18343797fadabacf01280b38ea7688690d12aec0rbb#define LOG_COND_STATUS(cntx, t_buck, h_ptr, ins_head, tag_text)
18343797fadabacf01280b38ea7688690d12aec0rbb#define DUMP_PARSE_EXPR_DEBUG(t_buck, h_ptr, d_buf, ins_head)
18343797fadabacf01280b38ea7688690d12aec0rbb
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
18343797fadabacf01280b38ea7688690d12aec0rbb/*-------------------------------------------------------------------------*/
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb/* pjr - These seem to allow expr="fred" expr="joe" where joe overwrites fred. */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_if(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
18343797fadabacf01280b38ea7688690d12aec0rbb{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *expr = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb int expr_ret, was_error, was_unmatched;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb char debug_buf[MAX_DEBUG_SIZE];
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (!ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->if_nesting_level++;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (expr == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "missing expr in if statement: %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe expr_ret = parse_expr(r, ctx, expr, &was_error,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe &was_unmatched, debug_buf);
18343797fadabacf01280b38ea7688690d12aec0rbb if (was_error) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (was_unmatched) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz DUMP_PARSE_EXPR_DEBUG(tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "\nUnmatched '\n", *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz DUMP_PARSE_EXPR_DEBUG(tmp_buck, head_ptr, debug_buf,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (expr_ret) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= (FLAG_PRINTING | FLAG_COND_TRUE);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_CLEAR_PRINT_COND;
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz LOG_COND_STATUS(ctx, tmp_buck, head_ptr, *inserted_head,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz " if");
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->if_nesting_level = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "expr")) {
18343797fadabacf01280b38ea7688690d12aec0rbb expr = tag_val;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb if (1) {
17bdb8862482dff763afd4d86a58de533afff4cajwoolley apr_size_t d_len = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb d_len = sprintf(debug_buf, "**** if expr=\"%s\"\n", expr);
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_heap_create(debug_buf, d_len, NULL,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag if in %s", tag,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_elif(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *expr = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb int expr_ret, was_error, was_unmatched;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb char debug_buf[MAX_DEBUG_SIZE];
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (!ctx->if_nesting_level) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == '\0') {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz LOG_COND_STATUS(ctx, tmp_buck, head_ptr, *inserted_head,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz " elif");
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_COND_TRUE) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_CLEAR_PRINTING;
18343797fadabacf01280b38ea7688690d12aec0rbb return (0);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (expr == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "missing expr in elif statement: %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return (1);
18343797fadabacf01280b38ea7688690d12aec0rbb }
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe expr_ret = parse_expr(r, ctx, expr, &was_error,
c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe &was_unmatched, debug_buf);
18343797fadabacf01280b38ea7688690d12aec0rbb if (was_error) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (was_unmatched) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz DUMP_PARSE_EXPR_DEBUG(tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "\nUnmatched '\n", *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz DUMP_PARSE_EXPR_DEBUG(tmp_buck, head_ptr, debug_buf,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (expr_ret) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= (FLAG_PRINTING | FLAG_COND_TRUE);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_CLEAR_PRINT_COND;
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz LOG_COND_STATUS(ctx, tmp_buck, head_ptr, *inserted_head,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz " elif");
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (0);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "expr")) {
18343797fadabacf01280b38ea7688690d12aec0rbb expr = tag_val;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef DEBUG_INCLUDE
18343797fadabacf01280b38ea7688690d12aec0rbb if (1) {
17bdb8862482dff763afd4d86a58de533afff4cajwoolley apr_size_t d_len = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb d_len = sprintf(debug_buf, "**** elif expr=\"%s\"\n", expr);
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_heap_create(debug_buf, d_len, NULL,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag if in %s", tag,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_else(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (!ctx->if_nesting_level) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if ((tag != NULL) || (tag_val != NULL)) {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "else directive does not take tags in %s", r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb return -1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb LOG_COND_STATUS(ctx, tmp_buck, head_ptr, *inserted_head, " else");
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_COND_TRUE) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_CLEAR_PRINTING;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= (FLAG_PRINTING | FLAG_COND_TRUE);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_endif(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (!ctx->if_nesting_level) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if ((tag != NULL) || (tag_val != NULL)) {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "endif directive does not take tags in %s", r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return -1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb LOG_COND_STATUS(ctx, tmp_buck, head_ptr, *inserted_head, "endif");
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= (FLAG_PRINTING | FLAG_COND_TRUE);
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->if_nesting_level--;
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_set(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f, apr_bucket *head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *var = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh request_rec *sub = r->main;
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh apr_pool_t *p = r->pool;
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh /* we need to use the 'main' request pool to set notes as that is
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh * a notes lifetime
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh */
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh while (sub) {
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh p = sub->pool;
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh sub = sub->main;
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if ((tag == NULL) && (tag_val == NULL)) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (tag_val == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb return 1;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "var")) {
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp var = ap_ssi_parse_string(r, ctx, tag_val, NULL,
4ef58e49c51f8683c0e3a540a34afb0a22e45366brianp MAX_STRING_LEN, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "value")) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (var == (char *) NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "variable must precede value in set directive in %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return (-1);
18343797fadabacf01280b38ea7688690d12aec0rbb }
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp MAX_STRING_LEN, 0);
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh apr_table_setn(r->subprocess_env, apr_pstrdup(p, var),
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh apr_pstrdup(p, parsed_string));
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "Invalid tag for set directive in %s", r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantzstatic int handle_printenv(include_ctx_t *ctx, apr_bucket_brigade **bb,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *r, ap_filter_t *f,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket *head_ptr, apr_bucket **inserted_head)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);
18343797fadabacf01280b38ea7688690d12aec0rbb if ((tag == NULL) && (tag_val == NULL)) {
d4f351074a8f7af5e41aa0a70410816436608e3dianh const apr_array_header_t *arr = apr_table_elts(r->subprocess_env);
d4f351074a8f7af5e41aa0a70410816436608e3dianh const apr_table_entry_t *elts = (const apr_table_entry_t *)arr->elts;
18343797fadabacf01280b38ea7688690d12aec0rbb int i;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz const char *key_text, *val_text;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp char *key_val, *next;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp apr_size_t k_len, v_len, kv_length;
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb for (i = 0; i < arr->nelts; ++i) {
18343797fadabacf01280b38ea7688690d12aec0rbb key_text = ap_escape_html(r->pool, elts[i].key);
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz val_text = elts[i].val;
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz if (val_text == LAZY_VALUE) {
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz val_text = add_include_vars_lazy(r, elts[i].key);
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz }
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz val_text = ap_escape_html(r->pool, elts[i].val);
18343797fadabacf01280b38ea7688690d12aec0rbb k_len = strlen(key_text);
18343797fadabacf01280b38ea7688690d12aec0rbb v_len = strlen(val_text);
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp kv_length = k_len + v_len + sizeof("=\n");
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp key_val = apr_palloc(r->pool, kv_length);
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp next = key_val;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp memcpy(next, key_text, k_len);
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp next += k_len;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp *next++ = '=';
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp memcpy(next, val_text, v_len);
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp next += v_len;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp *next++ = '\n';
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp *next = 0;
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp tmp_buck = apr_bucket_pool_create(key_val, kv_length - 1,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->pool,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);
18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "printenv directive does not take tags in %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);
18343797fadabacf01280b38ea7688690d12aec0rbb return -1;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb return 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* -------------------------- The main function --------------------------- */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
81e5d74ef38fbf76853e1fbdd95c117e130e473frbbstatic apr_status_t send_parsed_content(apr_bucket_brigade **bb,
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb request_rec *r, ap_filter_t *f)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
18343797fadabacf01280b38ea7688690d12aec0rbb include_ctx_t *ctx = f->ctx;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *dptr = APR_BRIGADE_FIRST(*bb);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_dptr;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_brigade *tag_and_after;
4d003677925ceb0abefb9c95355b4c9e9e502899rederpj apr_status_t rv = APR_SUCCESS;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (r->args) { /* add QUERY stuff to env cause it ain't yet */
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm char *arg_copy = apr_pstrdup(r->pool, r->args);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(r->subprocess_env, "QUERY_STRING", r->args);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_unescape_url(arg_copy);
1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(r->subprocess_env, "QUERY_STRING_UNESCAPED",
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_escape_shell_cmd(r->pool, arg_copy));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
92180260750b3b908c30a03d77bb47b9d47536a2brianp while (dptr != APR_BRIGADE_SENTINEL(*bb) && !APR_BUCKET_IS_EOS(dptr)) {
18343797fadabacf01280b38ea7688690d12aec0rbb /* State to check for the STARTING_SEQUENCE. */
18343797fadabacf01280b38ea7688690d12aec0rbb if ((ctx->state == PRE_HEAD) || (ctx->state == PARSE_HEAD)) {
18343797fadabacf01280b38ea7688690d12aec0rbb int do_cleanup = 0;
23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick apr_size_t cleanup_bytes = ctx->parse_pos;
e276c9cfe954b78e045baa94abb7a9def722fe1erbb
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_dptr = find_start_sequence(dptr, ctx, *bb, &do_cleanup);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!APR_STATUS_IS_SUCCESS(ctx->status)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return ctx->status;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* The few bytes stored in the ssi_tag_brigade turned out not to
18343797fadabacf01280b38ea7688690d12aec0rbb * be a tag after all. This can only happen if the starting
18343797fadabacf01280b38ea7688690d12aec0rbb * tag actually spans brigades. This should be very rare.
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if ((do_cleanup) && (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade))) {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_bkt;
18343797fadabacf01280b38ea7688690d12aec0rbb
51be7fc538641ed7cb22e959eb31629f7183f70fianh tmp_bkt = apr_bucket_immortal_create(ctx->start_seq,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley cleanup_bytes,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley r->connection->bucket_alloc);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BRIGADE_INSERT_HEAD(*bb, tmp_bkt);
38a4fbdc77aba93aba286e5ba2316d575430b45bjwoolley apr_brigade_cleanup(ctx->ssi_tag_brigade);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* If I am inside a conditional (if, elif, else) that is false
18343797fadabacf01280b38ea7688690d12aec0rbb * then I need to throw away anything contained in it.
18343797fadabacf01280b38ea7688690d12aec0rbb */
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley if ((!(ctx->flags & FLAG_PRINTING)) && (tmp_dptr != NULL) &&
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley (dptr != APR_BRIGADE_SENTINEL(*bb))) {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley while ((dptr != APR_BRIGADE_SENTINEL(*bb)) &&
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley (dptr != tmp_dptr)) {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket *free_bucket = dptr;
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley dptr = APR_BUCKET_NEXT (dptr);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket_delete(free_bucket);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Adjust the current bucket position based on what was found... */
f6e9f5600e77b78fb013bb543d364135961639d1rbb if ((tmp_dptr != NULL) && (ctx->state == PARSE_DIRECTIVE)) {
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->tag_start_bucket != NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb dptr = ctx->tag_start_bucket;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BRIGADE_SENTINEL(*bb);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else if ((tmp_dptr != NULL) &&
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz (ctx->output_now ||
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz (ctx->bytes_parsed >= BYTE_COUNT_THRESHOLD))) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* Send the large chunk of pre-tag bytes... */
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb tag_and_after = apr_brigade_split(*bb, tmp_dptr);
83ca150ef902e9692972aa923e893bc6406d20f1ianh if (ctx->output_flush) {
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley APR_BRIGADE_INSERT_TAIL(*bb, apr_bucket_flush_create((*bb)->bucket_alloc));
83ca150ef902e9692972aa923e893bc6406d20f1ianh }
83ca150ef902e9692972aa923e893bc6406d20f1ianh
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb rv = ap_pass_brigade(f->next, *bb);
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb if (rv != APR_SUCCESS) {
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb return rv;
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb *bb = tag_and_after;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb dptr = tmp_dptr;
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_flush = 0;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb ctx->bytes_parsed = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 0;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else if (tmp_dptr == NULL) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz /* There was no possible SSI tag in the
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz * remainder of this brigade... */
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz dptr = APR_BRIGADE_SENTINEL(*bb);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* State to check for the ENDING_SEQUENCE. */
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (((ctx->state == PARSE_DIRECTIVE) ||
f6e9f5600e77b78fb013bb543d364135961639d1rbb (ctx->state == PARSE_TAG) ||
f6e9f5600e77b78fb013bb543d364135961639d1rbb (ctx->state == PARSE_TAIL)) &&
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe (dptr != APR_BRIGADE_SENTINEL(*bb))) {
18343797fadabacf01280b38ea7688690d12aec0rbb tmp_dptr = find_end_sequence(dptr, ctx, *bb);
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz if (!APR_STATUS_IS_SUCCESS(ctx->status)) {
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz return ctx->status;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb if (tmp_dptr != NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb dptr = tmp_dptr; /* Adjust bucket pos... */
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* If some of the tag has already been set aside then set
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * aside remainder of tag. Now the full tag is in
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * ssi_tag_brigade.
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * If none has yet been set aside, then leave it all where it
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * is.
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * In any event after this the entire set of tag buckets will
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * be in one place or another.
18343797fadabacf01280b38ea7688690d12aec0rbb */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tag_and_after = apr_brigade_split(*bb, dptr);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BRIGADE_CONCAT(ctx->ssi_tag_brigade, *bb);
18343797fadabacf01280b38ea7688690d12aec0rbb *bb = tag_and_after;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz else if (ctx->output_now ||
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz (ctx->bytes_parsed >= BYTE_COUNT_THRESHOLD)) {
4d003677925ceb0abefb9c95355b4c9e9e502899rederpj SPLIT_AND_PASS_PRETAG_BUCKETS(*bb, ctx, f->next, rv);
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj if (rv != APR_SUCCESS) {
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj return rv;
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj }
83ca150ef902e9692972aa923e893bc6406d20f1ianh ctx->output_flush = 0;
e099672a13ea4ff4a11f130406f1baecba5949bajerenkrantz ctx->output_now = 0;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* remainder of this brigade... */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz dptr = APR_BRIGADE_SENTINEL(*bb);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* State to processed the directive... */
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->state == PARSED) {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *content_head = NULL, *tmp_bkt;
f6e9f5600e77b78fb013bb543d364135961639d1rbb apr_size_t tmp_i;
18343797fadabacf01280b38ea7688690d12aec0rbb char tmp_buf[TMP_BUF_SIZE];
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz int (*handle_func)(include_ctx_t *, apr_bucket_brigade **,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz request_rec *, ap_filter_t *, apr_bucket *,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_bucket **);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* By now the full tag (all buckets) should either be set aside into
18343797fadabacf01280b38ea7688690d12aec0rbb * ssi_tag_brigade or contained within the current bb. All tag
18343797fadabacf01280b38ea7688690d12aec0rbb * processing from here on can assume that.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* At this point, everything between ctx->head_start_bucket and
18343797fadabacf01280b38ea7688690d12aec0rbb * ctx->tail_start_bucket is an SSI
18343797fadabacf01280b38ea7688690d12aec0rbb * directive, we just have to deal with it now.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb if (get_combined_directive(ctx, r, *bb, tmp_buf,
18343797fadabacf01280b38ea7688690d12aec0rbb TMP_BUF_SIZE) != APR_SUCCESS) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "mod_include: error copying directive in %s",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_bkt, dptr, content_head);
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* DO CLEANUP HERE!!!!! */
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_dptr = ctx->head_start_bucket;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
38a4fbdc77aba93aba286e5ba2316d575430b45bjwoolley apr_brigade_cleanup(ctx->ssi_tag_brigade);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley do {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_bkt = tmp_dptr;
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_dptr = APR_BUCKET_NEXT (tmp_dptr);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket_delete(tmp_bkt);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley } while ((tmp_dptr != dptr) &&
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley (tmp_dptr != APR_BRIGADE_SENTINEL(*bb)));
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
ff4f536ee2bab7f642400dd50caedbfbae3e03dfrbb return APR_SUCCESS;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Can't destroy the tag buckets until I'm done processing
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * because the combined_tag might just be pointing to
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * the contents of a single bucket!
18343797fadabacf01280b38ea7688690d12aec0rbb */
8bf593a18ff01af22d268a48294d1a1d0aa5d9d2rbb
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* Retrieve the handler function to be called for this directive
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * from the functions registered in the hash table.
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * Need to lower case the directive for proper matching. Also need
bcba84dfeb51128c184b63553a7ec599acd6116fbrianp * to have it NULL terminated for proper hash matching.
8bf593a18ff01af22d268a48294d1a1d0aa5d9d2rbb */
f6e9f5600e77b78fb013bb543d364135961639d1rbb for (tmp_i = 0; tmp_i < ctx->directive_length; tmp_i++) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->combined_tag[tmp_i] =
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz apr_tolower(ctx->combined_tag[tmp_i]);
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->combined_tag[ctx->directive_length] = '\0';
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->curr_tag_pos = &ctx->combined_tag[ctx->directive_length+1];
18343797fadabacf01280b38ea7688690d12aec0rbb
b34e9b99cf7293b8b50c5b08313f9bc894af9c16trawick handle_func =
e08a1745d191d666759873a50edcc520ca273e12wrowe (include_handler_fn_t *)apr_hash_get(include_hash,
e08a1745d191d666759873a50edcc520ca273e12wrowe ctx->combined_tag,
812e019c7736939f79a929d1f1e8f4e70efc5e31brianp ctx->directive_length);
f6e9f5600e77b78fb013bb543d364135961639d1rbb if (handle_func != NULL) {
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj rv = (*handle_func)(ctx, bb, r, f, dptr, &content_head);
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj if ((rv != 0) && (rv != 1)) {
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj return (rv);
53b8cdb3621b11b897438d8990d20e0b78f0d4b7rederpj }
f6e9f5600e77b78fb013bb543d364135961639d1rbb }
f6e9f5600e77b78fb013bb543d364135961639d1rbb else {
b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "unknown directive \"%s\" in parsed doc %s",
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->combined_tag, r->filename);
18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_bkt, dptr, content_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* This chunk of code starts at the first bucket in the chain
18343797fadabacf01280b38ea7688690d12aec0rbb * of tag buckets (assuming that by this point the bucket for
18343797fadabacf01280b38ea7688690d12aec0rbb * the STARTING_SEQUENCE has been split) and loops through to
18343797fadabacf01280b38ea7688690d12aec0rbb * the end of the tag buckets freeing them all.
18343797fadabacf01280b38ea7688690d12aec0rbb *
18343797fadabacf01280b38ea7688690d12aec0rbb * Remember that some part of this may have been set aside
18343797fadabacf01280b38ea7688690d12aec0rbb * into the ssi_tag_brigade and the remainder (possibly as
18343797fadabacf01280b38ea7688690d12aec0rbb * little as one byte) will be in the current brigade.
18343797fadabacf01280b38ea7688690d12aec0rbb *
18343797fadabacf01280b38ea7688690d12aec0rbb * The value of dptr should have been set during the
18343797fadabacf01280b38ea7688690d12aec0rbb * PARSE_TAIL state to the first bucket after the
18343797fadabacf01280b38ea7688690d12aec0rbb * ENDING_SEQUENCE.
18343797fadabacf01280b38ea7688690d12aec0rbb *
18343797fadabacf01280b38ea7688690d12aec0rbb * The value of content_head may have been set during processing
18343797fadabacf01280b38ea7688690d12aec0rbb * of the directive. If so, the content was inserted in front
18343797fadabacf01280b38ea7688690d12aec0rbb * of the dptr bucket. The inserted buckets should not be thrown
18343797fadabacf01280b38ea7688690d12aec0rbb * away here, but they should also not be parsed later.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb if (content_head == NULL) {
18343797fadabacf01280b38ea7688690d12aec0rbb content_head = dptr;
18343797fadabacf01280b38ea7688690d12aec0rbb }
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_dptr = ctx->head_start_bucket;
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
38a4fbdc77aba93aba286e5ba2316d575430b45bjwoolley apr_brigade_cleanup(ctx->ssi_tag_brigade);
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb else {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley do {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_bkt = tmp_dptr;
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley tmp_dptr = APR_BUCKET_NEXT (tmp_dptr);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket_delete(tmp_bkt);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley } while ((tmp_dptr != content_head) &&
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley (tmp_dptr != APR_BRIGADE_SENTINEL(*bb)));
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->combined_tag == tmp_buf) {
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->combined_tag = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb /* Don't reset the flags or the nesting level!!! */
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_index = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_bucket = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_index = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_index = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = NULL;
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length = 0;
f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
38a4fbdc77aba93aba286e5ba2316d575430b45bjwoolley apr_brigade_cleanup(ctx->ssi_tag_brigade);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb
18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PRE_HEAD;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
575c282719040a1614cb5185e61fe4e66d337f1dbrianp /* We have nothing more to send, stop now. */
75eee56d2eaac9c27d32fc46b90bb6b1eac85359trawick if (dptr != APR_BRIGADE_SENTINEL(*bb) &&
75eee56d2eaac9c27d32fc46b90bb6b1eac85359trawick APR_BUCKET_IS_EOS(dptr)) {
575c282719040a1614cb5185e61fe4e66d337f1dbrianp /* We might have something saved that we never completed, but send
575c282719040a1614cb5185e61fe4e66d337f1dbrianp * down unparsed. This allows for <!-- at the end of files to be
575c282719040a1614cb5185e61fe4e66d337f1dbrianp * sent correctly. */
575c282719040a1614cb5185e61fe4e66d337f1dbrianp if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
575c282719040a1614cb5185e61fe4e66d337f1dbrianp APR_BRIGADE_CONCAT(ctx->ssi_tag_brigade, *bb);
575c282719040a1614cb5185e61fe4e66d337f1dbrianp return ap_pass_brigade(f->next, ctx->ssi_tag_brigade);
575c282719040a1614cb5185e61fe4e66d337f1dbrianp }
575c282719040a1614cb5185e61fe4e66d337f1dbrianp return ap_pass_brigade(f->next, *bb);
575c282719040a1614cb5185e61fe4e66d337f1dbrianp }
575c282719040a1614cb5185e61fe4e66d337f1dbrianp
18343797fadabacf01280b38ea7688690d12aec0rbb /* If I am in the middle of parsing an SSI tag then I need to set aside
18343797fadabacf01280b38ea7688690d12aec0rbb * the pertinent trailing buckets and pass on the initial part of the
18343797fadabacf01280b38ea7688690d12aec0rbb * brigade. The pertinent parts of the next brigades will be added to
18343797fadabacf01280b38ea7688690d12aec0rbb * these set aside buckets to form the whole tag and will be processed
18343797fadabacf01280b38ea7688690d12aec0rbb * once the whole tag has been found.
18343797fadabacf01280b38ea7688690d12aec0rbb */
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->state == PRE_HEAD) {
18343797fadabacf01280b38ea7688690d12aec0rbb /* Inside a false conditional (if, elif, else), so toss it all... */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if ((dptr != APR_BRIGADE_SENTINEL(*bb)) &&
18343797fadabacf01280b38ea7688690d12aec0rbb (!(ctx->flags & FLAG_PRINTING))) {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket *free_bucket;
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley do {
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley free_bucket = dptr;
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley dptr = APR_BUCKET_NEXT (dptr);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley apr_bucket_delete(free_bucket);
c0ae62021062bd9e2434c64db6763d22c703d48djwoolley } while (dptr != APR_BRIGADE_SENTINEL(*bb));
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* Otherwise pass it along...
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * No SSI tags in this brigade... */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz rv = ap_pass_brigade(f->next, *bb);
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb if (rv != APR_SUCCESS) {
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb return rv;
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb ctx->bytes_parsed = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else if (ctx->state == PARSED) { /* Invalid internal condition... */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *content_head = NULL, *tmp_bkt;
18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,
18343797fadabacf01280b38ea7688690d12aec0rbb "Invalid mod_include state during file %s", r->filename);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe CREATE_ERROR_BUCKET(ctx, tmp_bkt, APR_BRIGADE_FIRST(*bb), content_head);
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else { /* Entire brigade is middle chunk of SSI tag... */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (!APR_BRIGADE_EMPTY(ctx->ssi_tag_brigade)) {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BRIGADE_CONCAT(ctx->ssi_tag_brigade, *bb);
18343797fadabacf01280b38ea7688690d12aec0rbb }
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz else { /* End of brigade contains part of SSI tag... */
18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->head_start_index > 0) {
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_split(ctx->head_start_bucket, ctx->head_start_index);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->head_start_bucket =
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz APR_BUCKET_NEXT(ctx->head_start_bucket);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ctx->head_start_index = 0;
18343797fadabacf01280b38ea7688690d12aec0rbb }
18343797fadabacf01280b38ea7688690d12aec0rbb /* Set aside tag, pass pre-tag... */
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tag_and_after = apr_brigade_split(*bb, ctx->head_start_bucket);
9ce0a03f13db4815dd3e554409d672caa1a4671drbb ap_save_brigade(f, &ctx->ssi_tag_brigade, &tag_and_after, r->pool);
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb rv = ap_pass_brigade(f->next, *bb);
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb if (rv != APR_SUCCESS) {
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb return rv;
81e5d74ef38fbf76853e1fbdd95c117e130e473frbb }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb ctx->bytes_parsed = 0;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
ff4f536ee2bab7f642400dd50caedbfbae3e03dfrbb return APR_SUCCESS;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
1ccd992d37d62c8cb2056126f2234f64ec189bfddougmstatic void *create_includes_dir_config(apr_pool_t *p, char *dummy)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
dfd4950edac888e671b96f62ff5382b7cb350d48rbb include_dir_config *result =
dfd4950edac888e671b96f62ff5382b7cb350d48rbb (include_dir_config *)apr_palloc(p, sizeof(include_dir_config));
dfd4950edac888e671b96f62ff5382b7cb350d48rbb enum xbithack *xbh = (enum xbithack *) apr_palloc(p, sizeof(enum xbithack));
dfd4950edac888e671b96f62ff5382b7cb350d48rbb *xbh = DEFAULT_XBITHACK;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb result->default_error_msg = DEFAULT_ERROR_MSG;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb result->default_time_fmt = DEFAULT_TIME_FORMAT;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb result->xbithack = xbh;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb return result;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
51be7fc538641ed7cb22e959eb31629f7183f70fianhstatic void *create_includes_server_config(apr_pool_t*p, server_rec *server)
51be7fc538641ed7cb22e959eb31629f7183f70fianh{
51be7fc538641ed7cb22e959eb31629f7183f70fianh include_server_config *result =
51be7fc538641ed7cb22e959eb31629f7183f70fianh (include_server_config *)apr_palloc(p, sizeof(include_server_config));
51be7fc538641ed7cb22e959eb31629f7183f70fianh result->default_end_tag = ENDING_SEQUENCE;
51be7fc538641ed7cb22e959eb31629f7183f70fianh result->default_start_tag =STARTING_SEQUENCE;
51be7fc538641ed7cb22e959eb31629f7183f70fianh result->start_tag_len = sizeof(STARTING_SEQUENCE)-1;
51be7fc538641ed7cb22e959eb31629f7183f70fianh /* compile the pattern used by find_start_sequence */
51be7fc538641ed7cb22e959eb31629f7183f70fianh bndm_compile(&result->start_seq_pat, result->default_start_tag,
51be7fc538641ed7cb22e959eb31629f7183f70fianh result->start_tag_len);
51be7fc538641ed7cb22e959eb31629f7183f70fianh
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh result->undefinedEcho = apr_pstrdup(p,"(none)");
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh result->undefinedEchoLen = strlen( result->undefinedEcho);
51be7fc538641ed7cb22e959eb31629f7183f70fianh return result;
51be7fc538641ed7cb22e959eb31629f7183f70fianh}
ebe70c2684539a5fb2d899241d1601710dfa38a4trawickstatic const char *set_xbithack(cmd_parms *cmd, void *xbp, const char *arg)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
dfd4950edac888e671b96f62ff5382b7cb350d48rbb include_dir_config *conf = (include_dir_config *)xbp;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!strcasecmp(arg, "off")) {
dfd4950edac888e671b96f62ff5382b7cb350d48rbb *conf->xbithack = xbithack_off;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (!strcasecmp(arg, "on")) {
dfd4950edac888e671b96f62ff5382b7cb350d48rbb *conf->xbithack = xbithack_on;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (!strcasecmp(arg, "full")) {
dfd4950edac888e671b96f62ff5382b7cb350d48rbb *conf->xbithack = xbithack_full;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return "XBitHack must be set to Off, On, or Full";
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return NULL;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
4955f2b4ca045ac2c025fff3a46c2d901933d1e4trawickstatic apr_status_t includes_filter(ap_filter_t *f, apr_bucket_brigade *b)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb request_rec *r = f->r;
18343797fadabacf01280b38ea7688690d12aec0rbb include_ctx_t *ctx = f->ctx;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding request_rec *parent;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb include_dir_config *conf =
dfd4950edac888e671b96f62ff5382b7cb350d48rbb (include_dir_config *)ap_get_module_config(r->per_dir_config,
dfd4950edac888e671b96f62ff5382b7cb350d48rbb &include_module);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
51be7fc538641ed7cb22e959eb31629f7183f70fianh include_server_config *sconf= ap_get_module_config(r->server->module_config,
51be7fc538641ed7cb22e959eb31629f7183f70fianh &include_module);
51be7fc538641ed7cb22e959eb31629f7183f70fianh
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!(ap_allow_options(r) & OPT_INCLUDES)) {
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb return ap_pass_brigade(f->next, b);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
18343797fadabacf01280b38ea7688690d12aec0rbb if (!f->ctx) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz f->ctx = ctx = apr_pcalloc(f->c->pool, sizeof(*ctx));
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->state = PRE_HEAD;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->flags = (FLAG_PRINTING | FLAG_COND_TRUE);
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe if (ap_allow_options(r) & OPT_INCNOEXEC) {
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->flags |= FLAG_NO_EXEC;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe }
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley ctx->ssi_tag_brigade = apr_brigade_create(f->c->pool,
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley f->c->bucket_alloc);
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->status = APR_SUCCESS;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->error_str = conf->default_error_msg;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->time_str = conf->default_time_fmt;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->pool = f->c->pool;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->start_seq_pat = &sconf->start_seq_pat;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->start_seq = sconf->default_start_tag;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->start_seq_len = sconf->start_tag_len;
e85d1bc5205a1b1299e9dcffd4df22f8f8bbe8cdwrowe ctx->end_seq = sconf->default_end_tag;
18343797fadabacf01280b38ea7688690d12aec0rbb }
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb else {
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb ctx->bytes_parsed = 0;
b42a7e46e4f80282bd27e96d43c9510b14ccb9aarbb }
18343797fadabacf01280b38ea7688690d12aec0rbb
138c8f7cb8254e035c6f45288e3909cd9c21be5cmartin if ((parent = ap_get_module_config(r->request_config, &include_module))) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* Kludge --- for nested includes, we want to keep the subprocess
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * environment of the base document (for compatibility); that means
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * torquing our own last_modified date as well so that the
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * LAST_MODIFIED variable gets reset to the proper value if the
97b2451ce8e896e30c696d01ad11ef8d7c815881wrowe * nested document resets <!--#config timefmt -->.
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz */
e276c9cfe954b78e045baa94abb7a9def722fe1erbb r->subprocess_env = r->main->subprocess_env;
e276c9cfe954b78e045baa94abb7a9def722fe1erbb apr_pool_join(r->main->pool, r->pool);
e276c9cfe954b78e045baa94abb7a9def722fe1erbb r->finfo.mtime = r->main->finfo.mtime;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* we're not a nested include, so we create an initial
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * environment */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_add_common_vars(r);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_add_cgi_vars(r);
dfd4950edac888e671b96f62ff5382b7cb350d48rbb add_include_vars(r, conf->default_time_fmt);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* XXX: this is bogus, at some point we're going to do a subrequest,
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * and when we do it we're going to be subjecting code that doesn't
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * expect to be signal-ready to SIGALRM. There is no clean way to
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * fix this, except to put alarm support into BUFF. -djg
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb /* Always unset the content-length. There is no way to know if
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb * the content will be modified at some point by send_parsed_content.
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb * It is very possible for us to not find any content in the first
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb * 9k of the file, but still have to modify the content of the file.
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb * If we are going to pass the file through send_parsed_content, then
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb * the content-length should just be unset.
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb */
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb apr_table_unset(f->r->headers_out, "Content-Length");
27338fc39af80f2f0e4a8dbdc90c8a8179a5b2e4rbb
8e5842bc05146bb5c171e53b00b24063d17c666cjerenkrantz /* Always unset the ETag/Last-Modified fields - see RFC2616 - 13.3.4.
fe66541c73f5ec94a5a83cf67195cb7f05ccd0a6jerenkrantz * We don't know if we are going to be including a file or executing
fe66541c73f5ec94a5a83cf67195cb7f05ccd0a6jerenkrantz * a program which may change the Last-Modified header or make the
fe66541c73f5ec94a5a83cf67195cb7f05ccd0a6jerenkrantz * content completely dynamic. Therefore, we can't support these
fe66541c73f5ec94a5a83cf67195cb7f05ccd0a6jerenkrantz * headers.
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley * Exception: XBitHack full means we *should* set the Last-Modified field.
8e5842bc05146bb5c171e53b00b24063d17c666cjerenkrantz */
8e5842bc05146bb5c171e53b00b24063d17c666cjerenkrantz apr_table_unset(f->r->headers_out, "ETag");
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley /* Assure the platform supports Group protections */
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley if ((*conf->xbithack == xbithack_full)
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley && (r->finfo.valid & APR_FINFO_GPROT)
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley && (r->finfo.protection & APR_GEXECUTE)) {
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley ap_update_mtime(r, r->finfo.mtime);
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley ap_set_last_modified(r);
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley }
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley else {
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley apr_table_unset(f->r->headers_out, "Last-Modified");
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley }
8e5842bc05146bb5c171e53b00b24063d17c666cjerenkrantz
ba00c3b7c20f00ce631b89ae3b1cd3bae8d1b165rbb return send_parsed_content(&b, r, f);
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
e08a1745d191d666759873a50edcc520ca273e12wrowestatic void ap_register_include_handler(char *tag, include_handler_fn_t *func)
f6e9f5600e77b78fb013bb543d364135961639d1rbb{
812e019c7736939f79a929d1f1e8f4e70efc5e31brianp apr_hash_set(include_hash, tag, strlen(tag), (const void *)func);
f6e9f5600e77b78fb013bb543d364135961639d1rbb}
f6e9f5600e77b78fb013bb543d364135961639d1rbb
9d0665da83d1e22c0ea0e5f6f940f70f75bf5237ianhstatic int include_post_config(apr_pool_t *p, apr_pool_t *plog,
f6e9f5600e77b78fb013bb543d364135961639d1rbb apr_pool_t *ptemp, server_rec *s)
f6e9f5600e77b78fb013bb543d364135961639d1rbb{
066877f1a045103acfdd376d48cdd473c33f409bdougm include_hash = apr_hash_make(p);
51be7fc538641ed7cb22e959eb31629f7183f70fianh
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register = APR_RETRIEVE_OPTIONAL_FN(ap_register_include_handler);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb
445997e06464e7625c7f0e22917f8f2d9876cfffrbb if(ssi_pfn_register) {
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("if", handle_if);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("set", handle_set);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("else", handle_else);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("elif", handle_elif);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("echo", handle_echo);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("endif", handle_endif);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("fsize", handle_fsize);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("config", handle_config);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("include", handle_include);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("flastmod", handle_flastmod);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb ssi_pfn_register("printenv", handle_printenv);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb }
9d0665da83d1e22c0ea0e5f6f940f70f75bf5237ianh return OK;
f6e9f5600e77b78fb013bb543d364135961639d1rbb}
f6e9f5600e77b78fb013bb543d364135961639d1rbb
dfd4950edac888e671b96f62ff5382b7cb350d48rbbstatic const char *set_default_error_msg(cmd_parms *cmd, void *mconfig, const char *msg)
dfd4950edac888e671b96f62ff5382b7cb350d48rbb{
dfd4950edac888e671b96f62ff5382b7cb350d48rbb include_dir_config *conf = (include_dir_config *)mconfig;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb conf->default_error_msg = apr_pstrdup(cmd->pool, msg);
dfd4950edac888e671b96f62ff5382b7cb350d48rbb return NULL;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb}
dfd4950edac888e671b96f62ff5382b7cb350d48rbb
51be7fc538641ed7cb22e959eb31629f7183f70fianhstatic const char *set_default_start_tag(cmd_parms *cmd, void *mconfig, const char *msg)
51be7fc538641ed7cb22e959eb31629f7183f70fianh{
51be7fc538641ed7cb22e959eb31629f7183f70fianh include_server_config *conf;
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf= ap_get_module_config(cmd->server->module_config , &include_module);
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf->default_start_tag = apr_pstrdup(cmd->pool, msg);
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf->start_tag_len = strlen(conf->default_start_tag );
51be7fc538641ed7cb22e959eb31629f7183f70fianh bndm_compile(&conf->start_seq_pat, conf->default_start_tag,
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf->start_tag_len);
51be7fc538641ed7cb22e959eb31629f7183f70fianh
51be7fc538641ed7cb22e959eb31629f7183f70fianh return NULL;
51be7fc538641ed7cb22e959eb31629f7183f70fianh}
103005439776bb7aeccb95ebf4761ebfef3f9c39ianhstatic const char *set_undefined_echo(cmd_parms *cmd, void *mconfig, const char *msg)
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh{
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh include_server_config *conf;
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh conf = ap_get_module_config(cmd->server->module_config, &include_module);
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh conf->undefinedEcho = apr_pstrdup(cmd->pool, msg);
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh conf->undefinedEchoLen = strlen(msg);
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh return NULL;
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh}
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh
51be7fc538641ed7cb22e959eb31629f7183f70fianh
51be7fc538641ed7cb22e959eb31629f7183f70fianhstatic const char *set_default_end_tag(cmd_parms *cmd, void *mconfig, const char *msg)
51be7fc538641ed7cb22e959eb31629f7183f70fianh{
51be7fc538641ed7cb22e959eb31629f7183f70fianh include_server_config *conf;
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf= ap_get_module_config(cmd->server->module_config , &include_module);
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf->default_end_tag = apr_pstrdup(cmd->pool, msg);
51be7fc538641ed7cb22e959eb31629f7183f70fianh
51be7fc538641ed7cb22e959eb31629f7183f70fianh return NULL;
51be7fc538641ed7cb22e959eb31629f7183f70fianh}
51be7fc538641ed7cb22e959eb31629f7183f70fianh
dfd4950edac888e671b96f62ff5382b7cb350d48rbbstatic const char *set_default_time_fmt(cmd_parms *cmd, void *mconfig, const char *fmt)
dfd4950edac888e671b96f62ff5382b7cb350d48rbb{
dfd4950edac888e671b96f62ff5382b7cb350d48rbb include_dir_config *conf = (include_dir_config *)mconfig;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb conf->default_time_fmt = apr_pstrdup(cmd->pool, fmt);
dfd4950edac888e671b96f62ff5382b7cb350d48rbb return NULL;
dfd4950edac888e671b96f62ff5382b7cb350d48rbb}
dfd4950edac888e671b96f62ff5382b7cb350d48rbb
f6e9f5600e77b78fb013bb543d364135961639d1rbb/*
f6e9f5600e77b78fb013bb543d364135961639d1rbb * Module definition and configuration data structs...
f6e9f5600e77b78fb013bb543d364135961639d1rbb */
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic const command_rec includes_cmds[] =
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
ebe70c2684539a5fb2d899241d1601710dfa38a4trawick AP_INIT_TAKE1("XBitHack", set_xbithack, NULL, OR_OPTIONS,
ebe70c2684539a5fb2d899241d1601710dfa38a4trawick "Off, On, or Full"),
dfd4950edac888e671b96f62ff5382b7cb350d48rbb AP_INIT_TAKE1("SSIErrorMsg", set_default_error_msg, NULL, OR_ALL,
dfd4950edac888e671b96f62ff5382b7cb350d48rbb "a string"),
dfd4950edac888e671b96f62ff5382b7cb350d48rbb AP_INIT_TAKE1("SSITimeFormat", set_default_time_fmt, NULL, OR_ALL,
dfd4950edac888e671b96f62ff5382b7cb350d48rbb "a strftime(3) formatted string"),
51be7fc538641ed7cb22e959eb31629f7183f70fianh AP_INIT_TAKE1("SSIStartTag", set_default_start_tag, NULL, RSRC_CONF,
51be7fc538641ed7cb22e959eb31629f7183f70fianh "SSI Start String Tag"),
51be7fc538641ed7cb22e959eb31629f7183f70fianh AP_INIT_TAKE1("SSIEndTag", set_default_end_tag, NULL, RSRC_CONF,
51be7fc538641ed7cb22e959eb31629f7183f70fianh "SSI End String Tag"),
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh AP_INIT_TAKE1("SSIUndefinedEcho", set_undefined_echo, NULL, RSRC_CONF,
103005439776bb7aeccb95ebf4761ebfef3f9c39ianh "SSI Start String Tag"),
51be7fc538641ed7cb22e959eb31629f7183f70fianh
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding {NULL}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding};
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowestatic int include_fixup(request_rec *r)
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb{
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley include_dir_config *conf;
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley conf = (include_dir_config *) ap_get_module_config(r->per_dir_config,
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb &include_module);
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe if (r->handler && (strcmp(r->handler, "server-parsed") == 0))
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe {
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe if (!r->content_type || !*r->content_type) {
e0d102c882a7ed34d3eec24b36da49f097066a36stoddard ap_set_content_type(r, "text/html");
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe }
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe r->handler = "default-handler";
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb }
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe else
e119449ea4794451d17c113dadd14e59823c634dwrowe#if defined(OS2) || defined(WIN32) || defined(NETWARE)
e119449ea4794451d17c113dadd14e59823c634dwrowe /* These OS's don't support xbithack. This is being worked on. */
e119449ea4794451d17c113dadd14e59823c634dwrowe {
e119449ea4794451d17c113dadd14e59823c634dwrowe return DECLINED;
e119449ea4794451d17c113dadd14e59823c634dwrowe }
e119449ea4794451d17c113dadd14e59823c634dwrowe#else
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe {
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe if (*conf->xbithack == xbithack_off) {
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe return DECLINED;
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe }
9f794fbe9d98f54c558879173cce489124617c90brianp
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe if (!(r->finfo.protection & APR_UEXECUTE)) {
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe return DECLINED;
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe }
e119449ea4794451d17c113dadd14e59823c634dwrowe
2fa38d4c4740115a965238309cad614b8ce7bd27brianp if (!r->content_type || strcmp(r->content_type, "text/html")) {
e119449ea4794451d17c113dadd14e59823c634dwrowe return DECLINED;
e119449ea4794451d17c113dadd14e59823c634dwrowe }
9f794fbe9d98f54c558879173cce489124617c90brianp }
e119449ea4794451d17c113dadd14e59823c634dwrowe#endif
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe
e119449ea4794451d17c113dadd14e59823c634dwrowe /* We always return declined, because the default handler actually
e119449ea4794451d17c113dadd14e59823c634dwrowe * serves the file. All we have to do is add the filter.
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb */
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb ap_add_output_filter("INCLUDES", NULL, r, r->connection);
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb return DECLINED;
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb}
e49758465fbf67f29f9aeda996d09f7cc6fa9fe5rbb
73e8b26287de5c06fa470d36162e103dbac9c7e5wrowestatic void register_hooks(apr_pool_t *p)
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb{
445997e06464e7625c7f0e22917f8f2d9876cfffrbb APR_REGISTER_OPTIONAL_FN(ap_ssi_get_tag_and_value);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb APR_REGISTER_OPTIONAL_FN(ap_ssi_parse_string);
445997e06464e7625c7f0e22917f8f2d9876cfffrbb APR_REGISTER_OPTIONAL_FN(ap_register_include_handler);
b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_hook_post_config(include_post_config, NULL, NULL, APR_HOOK_REALLY_FIRST);
b3f07c5b499a1eb94f0b73e9220541a75ec87cc0wrowe ap_hook_fixups(include_fixup, NULL, NULL, APR_HOOK_LAST);
1f863242c3901a633082bab8a34e8cb7422ab421jerenkrantz ap_register_output_filter("INCLUDES", includes_filter, AP_FTYPE_RESOURCE);
47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb}
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding
138c8f7cb8254e035c6f45288e3909cd9c21be5cmartinmodule AP_MODULE_DECLARE_DATA include_module =
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{
b859b5654eeba0b8995b7a46975121029cceda78fielding STANDARD20_MODULE_STUFF,
51be7fc538641ed7cb22e959eb31629f7183f70fianh create_includes_dir_config, /* dir config creater */
51be7fc538641ed7cb22e959eb31629f7183f70fianh NULL, /* dir merger --- default is to override */
51be7fc538641ed7cb22e959eb31629f7183f70fianh create_includes_server_config,/* server config */
51be7fc538641ed7cb22e959eb31629f7183f70fianh NULL, /* merge server config */
51be7fc538641ed7cb22e959eb31629f7183f70fianh includes_cmds, /* command apr_table_t */
51be7fc538641ed7cb22e959eb31629f7183f70fianh register_hooks /* register hooks */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding};