mod_include.c revision 360fb449fbdd6f7c75b321c7e1612233e828ce77
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* ====================================================================
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * The Apache Software License, Version 1.1
33bdcae1f7a1a65e351dda2a766a0cf28b1e695dnd * Copyright (c) 2000-2003 The Apache Software Foundation. All rights
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * reserved.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * Redistribution and use in source and binary forms, with or without
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * modification, are permitted provided that the following conditions
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * 1. Redistributions of source code must retain the above copyright
ab2c1c1c83ec91415565da5a71fbc15d9685caa6fielding * notice, this list of conditions and the following disclaimer.
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.
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.
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.
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.
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 * 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 * 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 * http_include.c: Handles the server-parsed HTML documents
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * Original by Rob McCool; substantial fixups by David Robinson;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding * incorporated into the Apache module framework by rst.
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd/* helper for Latin1 <-> entity encoding */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define RAW_ASCII_CHAR(ch) apr_xlate_conv_byte(ap_hdrs_from_ascii, \
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd (unsigned char)ch)
82b62539f34e8fa7434a95335c4566441c7b5589nd#else /* APR_CHARSET_EBCDIC */
82b62539f34e8fa7434a95335c4566441c7b5589nd#endif /* !APR_CHARSET_EBCDIC */
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Debugging Macros
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *cond_txt = apr_pstrcat((ctx)->dpool, "**** ", (text), \
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd " conditional_status=\"", ((ctx)->flags & FLAG_COND_TRUE)?"1":"0", \
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL((bb), apr_bucket_heap_create(cond_txt, \
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL((bb), apr_bucket_heap_create((buf), \
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Types and Structures
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
360fb449fbdd6f7c75b321c7e1612233e828ce77ndtypedef enum {
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndtypedef struct {
51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int T[256];
51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int x;
7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantztypedef struct {
51be7fc538641ed7cb22e959eb31629f7183f70fianhtypedef struct {
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *undefined_echo;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd/* main parser states */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9ndtypedef enum {
d2479dc17d5f6041e472fff5ed39a3a7222e9f51ndtypedef struct arg_item {
360fb449fbdd6f7c75b321c7e1612233e828ce77nd apr_size_t parse_pos; /* parse position of partial matches */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd const char *start_seq;
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd const char *end_seq;
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t directive_len; /* length of the current directive name */
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Static Module Data
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd/* global module structure */
82b62539f34e8fa7434a95335c4566441c7b5589nd/* function handlers for include directives */
82b62539f34e8fa7434a95335c4566441c7b5589nd/* forward declaration of handler registry */
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic APR_OPTIONAL_FN_TYPE(ap_register_include_handler) *ssi_pfn_register;
82b62539f34e8fa7434a95335c4566441c7b5589nd/* Sentinel value to store in subprocess_env for items that
82b62539f34e8fa7434a95335c4566441c7b5589nd * shouldn't be evaluated until/unless they're actually used
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic const char lazy_eval_sentinel;
82b62539f34e8fa7434a95335c4566441c7b5589nd/* default values */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DEFAULT_ERROR_MSG "[an error occurred while processing this directive]"
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Environment/Expansion Functions
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
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, � will not be decoded, but will be deleted.
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* maximum length of any ISO-LATIN-1 HTML entity name. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding/* The following is a shrinking transformation, therefore safe. */
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic void decodehtml(char *s)
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding const char *ents;
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "quot\042Auml\304Euml\313Iuml\317Ouml\326Uuml\334auml\344euml\353\
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Acirc\302Aring\305AElig\306Ecirc\312Icirc\316Ocirc\324Ucirc\333\
0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingTHORN\336szlig\337acirc\342aring\345aelig\346ecirc\352icirc\356ocirc\364\
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 */
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp /* Do a fast scan through the string until we find anything
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp * that needs more complicated handling
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp for (; *s != '&'; s++) {
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp if (*s == '\0') {
450fd97bdb54ac69e2cb552f034697a10868be3cbrianp for (p = s; *s != '\0'; s++, p++) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*s != '&') {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* find end of entity */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* is it numeric ? */
10a4cdd68ef1ca0e54af296fe1d08ac00150c90bwrowe for (j = 2, val = 0; j < i && apr_isdigit(s[j]); j++) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (j < i || val <= 8 || (val >= 11 && val <= 31) ||
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding p--; /* no data to output */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* wrong length */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue; /* skip it */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (ents = entlist[j]; *ents != '\0'; ents += i) {
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = RAW_ASCII_CHAR(((const unsigned char *) ents)[j]);
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic void add_include_vars(request_rec *r, const char *timefmt)
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic const char *add_include_vars_lazy(request_rec *r, const char *var)
82b62539f34e8fa7434a95335c4566441c7b5589nd (include_dir_config *)ap_get_module_config(r->per_dir_config,
82b62539f34e8fa7434a95335c4566441c7b5589nd val = ap_ht_time(r->pool, r->request_time, conf->default_time_fmt, 0);
82b62539f34e8fa7434a95335c4566441c7b5589nd (include_dir_config *)ap_get_module_config(r->per_dir_config,
82b62539f34e8fa7434a95335c4566441c7b5589nd val = ap_ht_time(r->pool, r->request_time, conf->default_time_fmt, 1);
82b62539f34e8fa7434a95335c4566441c7b5589nd (include_dir_config *)ap_get_module_config(r->per_dir_config,
82b62539f34e8fa7434a95335c4566441c7b5589nd val = ap_ht_time(r->pool, r->finfo.mtime, conf->default_time_fmt, 0);
82b62539f34e8fa7434a95335c4566441c7b5589nd if (apr_get_username(&val, r->finfo.user, r->pool) != APR_SUCCESS) {
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic const char *get_include_var(request_rec *r, include_ctx_t *ctx,
82b62539f34e8fa7434a95335c4566441c7b5589nd const char *var)
82b62539f34e8fa7434a95335c4566441c7b5589nd const char *val;
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Handle $0 .. $9 from the last regex evaluated.
82b62539f34e8fa7434a95335c4566441c7b5589nd * The choice of returning NULL strings on not-found,
82b62539f34e8fa7434a95335c4566441c7b5589nd * v.s. empty strings on an empty match is deliberate.
82b62539f34e8fa7434a95335c4566441c7b5589nd if (!ctx->intern->re_result || !ctx->intern->re_string) {
82b62539f34e8fa7434a95335c4566441c7b5589nd/* initial buffer size for power-of-two allocator in ap_ssi_parse_string */
82b62539f34e8fa7434a95335c4566441c7b5589nd * Do variable substitution on strings
82b62539f34e8fa7434a95335c4566441c7b5589nd * (Note: If out==NULL, this function allocs a buffer for the resulting
82b62539f34e8fa7434a95335c4566441c7b5589nd * string from r->pool. The return value is the parsed string)
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic char *ap_ssi_parse_string(request_rec *r, include_ctx_t *ctx,
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* allocate an output buffer if needed */
0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* leave room for nul terminator */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* double the buffer size */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* truncated */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz char *end_of_var_name; /* end of var name + 1 */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* guess that the expansion won't happen */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz 0, r, "Missing '}' on variable \"%s\"",
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* what a pain, too bad there's no table_getn where you can
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * pass a non-nul terminated string */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (l != 0) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* no expansion to be done */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz /* zero-length variable name causes just the $ to be
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* increase the buffer size to accommodate l more chars */
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz l = ((int)l > end_out - next) ? (end_out - next) : l;
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* double the buffer size */
7f7ba3f0537003a359c42170aee14a101d7fe917brianp /* truncated */
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Conditional Expression Parser
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd const apr_size_t nres = sizeof(*ctx->intern->re_result) / sizeof(regmatch_t);
82b62539f34e8fa7434a95335c4566441c7b5589nd compiled = ap_pregcomp(r->pool, rexp, REG_EXTENDED | REG_NOSUB);
82b62539f34e8fa7434a95335c4566441c7b5589nd return -1;
82b62539f34e8fa7434a95335c4566441c7b5589nd ctx->intern->re_result = apr_pcalloc(r->pool, sizeof(*ctx->intern->re_result));
82b62539f34e8fa7434a95335c4566441c7b5589nd regex_error = ap_regexec(compiled, string, nres, *ctx->intern->re_result, 0);
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic const char *get_ptoken(request_rec *r, const char *string,
82b62539f34e8fa7434a95335c4566441c7b5589nd char qs = 0;
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Skip leading white space */
82b62539f34e8fa7434a95335c4566441c7b5589nd return (char *) NULL;
82b62539f34e8fa7434a95335c4566441c7b5589nd return (char *) NULL;
82b62539f34e8fa7434a95335c4566441c7b5589nd switch (ch) {
82b62539f34e8fa7434a95335c4566441c7b5589nd case '\'':
82b62539f34e8fa7434a95335c4566441c7b5589nd /* already token->type == token_string */
82b62539f34e8fa7434a95335c4566441c7b5589nd /* already token->type == token_string */
82b62539f34e8fa7434a95335c4566441c7b5589nd /* We should only be here if we are in a string */
82b62539f34e8fa7434a95335c4566441c7b5589nd token->value = apr_palloc(r->pool, strlen(string) + 2); /* 2 for ch plus
82b62539f34e8fa7434a95335c4566441c7b5589nd trailing null */
82b62539f34e8fa7434a95335c4566441c7b5589nd * I used the ++string throughout this section so that string
82b62539f34e8fa7434a95335c4566441c7b5589nd * ends up pointing to the next token and I can just return it
82b62539f34e8fa7434a95335c4566441c7b5589nd for (ch = *string; ((ch != '\0') && (!tkn_fnd)); ch = *++string) {
82b62539f34e8fa7434a95335c4566441c7b5589nd switch (ch) {
82b62539f34e8fa7434a95335c4566441c7b5589nd /* If qs is still set, we have an unmatched quote */
82b62539f34e8fa7434a95335c4566441c7b5589nd/* there is an implicit assumption here that expr is at most MAX_STRING_LEN-1
82b62539f34e8fa7434a95335c4566441c7b5589nd * characters long...
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic int parse_expr(request_rec *r, include_ctx_t *ctx, const char *expr,
82b62539f34e8fa7434a95335c4566441c7b5589nd const char *parse;
82b62539f34e8fa7434a95335c4566441c7b5589nd return (0);
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Create Parse Tree */
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof(struct parse_node));
82b62539f34e8fa7434a95335c4566441c7b5589nd new->parent = new->left = new->right = (struct parse_node *) NULL;
82b62539f34e8fa7434a95335c4566441c7b5589nd if ((parse = get_ptoken(r, parse, &new->token, was_unmatched)) ==
82b62539f34e8fa7434a95335c4566441c7b5589nd (char *) NULL) {
82b62539f34e8fa7434a95335c4566441c7b5589nd " Token: string (%s)\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd " Token: regex (%s)\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof (" Token: and/or\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Percolate upwards */
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof(" Token: not\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Percolate upwards */
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Percolate upwards */
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof (" Token: rbrace\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd "Unmatched ')' in \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof (" Token: lbrace\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Percolate upwards */
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Evaluate Parse Tree */
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof (" Evaluate string\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->token.value, NULL,
82b62539f34e8fa7434a95335c4566441c7b5589nd "No operator before regex of expr \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof(" Evaluate and/or\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd current->value = current->left->value && current->right->value;
82b62539f34e8fa7434a95335c4566441c7b5589nd current->value = current->left->value || current->right->value;
82b62539f34e8fa7434a95335c4566441c7b5589nd debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd sizeof (" Evaluate eq/ne\n"));
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd " Re Compare (%s) with /%s/\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd " Compare (%s) with (%s)\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Invalid expression \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->left->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd buffer = ap_ssi_parse_string(r, ctx, current->right->token.value,
82b62539f34e8fa7434a95335c4566441c7b5589nd " Compare (%s) with (%s)\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd current->value = 0; /* Don't return -1 if unknown token */
82b62539f34e8fa7434a95335c4566441c7b5589nd debug_pos += sprintf (&debug[debug_pos], " Returning %c\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd debug_pos += sprintf (&debug[debug_pos], " Evaluate !: %c\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd debug_pos += sprintf (&debug[debug_pos], " Evaluate (): %c\n",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Unmatched '(' in \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd "Unmatched ')' in \"%s\" in file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd "bad token type");
82b62539f34e8fa7434a95335c4566441c7b5589nd retval = (root == (struct parse_node *) NULL) ? 0 : root->value;
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Action Handlers
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * Extract the next tag name and value.
82b62539f34e8fa7434a95335c4566441c7b5589nd * If there are no more tags, set the tag name to NULL.
82b62539f34e8fa7434a95335c4566441c7b5589nd * The tag value is html decoded if dodecode is non-zero.
82b62539f34e8fa7434a95335c4566441c7b5589nd * The tag value may be NULL if there is no tag value..
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic void ap_ssi_get_tag_and_value(include_ctx_t *ctx, char **tag,
82b62539f34e8fa7434a95335c4566441c7b5589nd/* ensure that path is relative, and does not contain ".." elements
82b62539f34e8fa7434a95335c4566441c7b5589nd * ensentially ensure that it does not match the regex:
82b62539f34e8fa7434a95335c4566441c7b5589nd * (^/|(^|/)\.\.(/|$))
82b62539f34e8fa7434a95335c4566441c7b5589nd * XXX: Simply replace with apr_filepath_merge
82b62539f34e8fa7434a95335c4566441c7b5589nd while (*path) {
82b62539f34e8fa7434a95335c4566441c7b5589nd#if defined(WIN32)
82b62539f34e8fa7434a95335c4566441c7b5589nd /* If the name is canonical this is redundant
82b62539f34e8fa7434a95335c4566441c7b5589nd * but in security, redundancy is worthwhile.
82b62539f34e8fa7434a95335c4566441c7b5589nd * Does OS2 belong here (accepts ... for ..)?
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Advance to either the null byte at the end of the
82b62539f34e8fa7434a95335c4566441c7b5589nd * string or the character right after the next slash,
82b62539f34e8fa7434a95335c4566441c7b5589nd * whichever comes first
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic int find_file(request_rec *r, const char *directive, const char *tag,
82b62539f34e8fa7434a95335c4566441c7b5589nd /* XXX: Port to apr_filepath_merge
82b62539f34e8fa7434a95335c4566441c7b5589nd * be safe; only files in this directory or below allowed
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd /* note: it is okay to pass NULL for the "next filter" since
82b62539f34e8fa7434a95335c4566441c7b5589nd we never attempt to "run" this sub request. */
82b62539f34e8fa7434a95335c4566441c7b5589nd APR_FINFO_GPROT | APR_FINFO_MIN, rr->pool)) != APR_SUCCESS
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd /* note: it is okay to pass NULL for the "next filter" since
82b62539f34e8fa7434a95335c4566441c7b5589nd we never attempt to "run" this sub request. */
82b62539f34e8fa7434a95335c4566441c7b5589nd "unable to get information about \"%s\" "
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd return -1;
82b62539f34e8fa7434a95335c4566441c7b5589nd "unknown parameter \"%s\" to tag %s in %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd return -1;
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic apr_status_t handle_include(include_ctx_t *ctx, ap_filter_t *f,
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
82b62539f34e8fa7434a95335c4566441c7b5589nd parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
82b62539f34e8fa7434a95335c4566441c7b5589nd /* XXX: Port to apr_filepath_merge
82b62539f34e8fa7434a95335c4566441c7b5589nd * be safe; only files in this directory or below allowed
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd error_fmt = "unable to include \"%s\" in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd /* try to avoid recursive includes. We do this by walking
82b62539f34e8fa7434a95335c4566441c7b5589nd * up the r->main list of subrequests, and at each level
82b62539f34e8fa7434a95335c4566441c7b5589nd * walking back through any internal redirects. At each
82b62539f34e8fa7434a95335c4566441c7b5589nd * step, we compare the filenames and the URIs.
82b62539f34e8fa7434a95335c4566441c7b5589nd * The filename comparison catches a recursive include
82b62539f34e8fa7434a95335c4566441c7b5589nd * with an ever-changing URL, eg.
82b62539f34e8fa7434a95335c4566441c7b5589nd * <!--#include virtual=
82b62539f34e8fa7434a95335c4566441c7b5589nd * "$REQUEST_URI/$QUERY_STRING?$QUERY_STRING/x" -->
82b62539f34e8fa7434a95335c4566441c7b5589nd * which, although they would eventually be caught because
82b62539f34e8fa7434a95335c4566441c7b5589nd * we have a limit on the length of files, etc., can
82b62539f34e8fa7434a95335c4566441c7b5589nd * recurse for a while.
82b62539f34e8fa7434a95335c4566441c7b5589nd * The URI comparison catches the case where the filename
82b62539f34e8fa7434a95335c4566441c7b5589nd * is changed while processing the request, so the
82b62539f34e8fa7434a95335c4566441c7b5589nd * current name is never the same as any previous one.
82b62539f34e8fa7434a95335c4566441c7b5589nd * This can happen with "DocumentRoot /foo" when you
82b62539f34e8fa7434a95335c4566441c7b5589nd * request "/" on the server and it includes "/".
82b62539f34e8fa7434a95335c4566441c7b5589nd * This only applies to modules such as mod_dir that
82b62539f34e8fa7434a95335c4566441c7b5589nd * (somewhat improperly) mess with r->filename outside
82b62539f34e8fa7434a95335c4566441c7b5589nd * of a filename translation phase.
82b62539f34e8fa7434a95335c4566441c7b5589nd if (p != NULL) {
82b62539f34e8fa7434a95335c4566441c7b5589nd "in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd /* See the Kludge in send_parsed_file for why */
82b62539f34e8fa7434a95335c4566441c7b5589nd /* Basically, it puts a bread crumb in here, then looks */
82b62539f34e8fa7434a95335c4566441c7b5589nd /* for the crumb later to see if its been here. */
82b62539f34e8fa7434a95335c4566441c7b5589nd error_fmt = "unable to include \"%s\" in parsed file %s";
82b62539f34e8fa7434a95335c4566441c7b5589nd /* destroy the sub request */
82b62539f34e8fa7434a95335c4566441c7b5589nd "unknown parameter \"%s\" to tag include in %s",
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic apr_status_t handle_echo(include_ctx_t *ctx, ap_filter_t *f,
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
82b62539f34e8fa7434a95335c4566441c7b5589nd const char *val =
360fb449fbdd6f7c75b321c7e1612233e828ce77nd tmp_buck = apr_bucket_pool_create(apr_pstrmemdup(ctx->pool,
82b62539f34e8fa7434a95335c4566441c7b5589nd else if (!strcasecmp(tag_val, "entity")) encode = E_ENTITY;
82b62539f34e8fa7434a95335c4566441c7b5589nd "unknown value \"%s\" to parameter \"encoding\" of "
82b62539f34e8fa7434a95335c4566441c7b5589nd "unknown parameter \"%s\" in tag echo of %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd/* error and tf must point to a string with room for at
82b62539f34e8fa7434a95335c4566441c7b5589nd * least MAX_STRING_LEN characters
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic apr_status_t handle_config(include_ctx_t *ctx, ap_filter_t *f,
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);
82b62539f34e8fa7434a95335c4566441c7b5589nd apr_table_setn(env, "DATE_LOCAL", ap_ht_time(r->pool, date,
82b62539f34e8fa7434a95335c4566441c7b5589nd apr_table_setn(env, "DATE_GMT", ap_ht_time(r->pool, date,
82b62539f34e8fa7434a95335c4566441c7b5589nd parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
82b62539f34e8fa7434a95335c4566441c7b5589nd "unknown parameter \"%s\" to tag config in %s",
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic apr_status_t handle_fsize(include_ctx_t *ctx, ap_filter_t *f,
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
82b62539f34e8fa7434a95335c4566441c7b5589nd parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
82b62539f34e8fa7434a95335c4566441c7b5589nd if (!find_file(r, "fsize", tag, parsed_string, &finfo)) {
82b62539f34e8fa7434a95335c4566441c7b5589nd /* XXX: if we *know* we're going to have to copy the
82b62539f34e8fa7434a95335c4566441c7b5589nd * thing off of the stack anyway, why not palloc buff
82b62539f34e8fa7434a95335c4566441c7b5589nd * instead of sticking it on the stack; then we can just
82b62539f34e8fa7434a95335c4566441c7b5589nd * use a pool bucket and skip the copy
82b62539f34e8fa7434a95335c4566441c7b5589nd int l, x, pos = 0;
82b62539f34e8fa7434a95335c4566441c7b5589nd for (x = 0; x < l; x++) {
82b62539f34e8fa7434a95335c4566441c7b5589nd if (x && (!((l - x) % 3))) {
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic apr_status_t handle_flastmod(include_ctx_t *ctx, ap_filter_t *f,
82b62539f34e8fa7434a95335c4566441c7b5589nd while (1) {
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
82b62539f34e8fa7434a95335c4566441c7b5589nd parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
82b62539f34e8fa7434a95335c4566441c7b5589nd if (!find_file(r, "flastmod", tag, parsed_string, &finfo)) {
82b62539f34e8fa7434a95335c4566441c7b5589nd t_val = ap_ht_time(r->pool, finfo.mtime, ctx->time_str, 0);
18343797fadabacf01280b38ea7688690d12aec0rbb/* pjr - These seem to allow expr="fred" expr="joe" where joe overwrites fred. */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_if(include_ctx_t *ctx, ap_filter_t *f,
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "missing expr in if statement: %s",
18343797fadabacf01280b38ea7688690d12aec0rbb d_len = sprintf(debug_buf, "**** if expr=\"%s\"\n", expr);
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_heap_create(debug_buf, d_len, NULL,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag if in %s", tag,
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_elif(include_ctx_t *ctx, ap_filter_t *f,
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "missing expr in elif statement: %s",
18343797fadabacf01280b38ea7688690d12aec0rbb d_len = sprintf(debug_buf, "**** elif expr=\"%s\"\n", expr);
2fc50921b88defeb7127985dfe4b4130175e069ejwoolley tmp_buck = apr_bucket_heap_create(debug_buf, d_len, NULL,
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag if in %s", tag,
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_else(include_ctx_t *ctx, ap_filter_t *f,
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);
18343797fadabacf01280b38ea7688690d12aec0rbb "else directive does not take tags in %s", r->filename);
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_endif(include_ctx_t *ctx, ap_filter_t *f,
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "endif directive does not take tags in %s", r->filename);
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_set(include_ctx_t *ctx, ap_filter_t *f,
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh /* we need to use the 'main' request pool to set notes as that is
3e5f9fcdde8f12d869eda0699603edf0f0d51752ianh * a notes lifetime
18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd else if (!tag_val) {
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "variable must precede value in set directive in %s",
7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_printenv(include_ctx_t *ctx, ap_filter_t *f,
d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);
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;
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz val_text = add_include_vars_lazy(r, elts[i].key);
30b9959208c26420c95d176e457ccc6b5f725194jerenkrantz val_text = ap_escape_html(r->pool, elts[i].val);
93bb0ef3e7e11ddaa69377ac77157b029fa3645dbrianp tmp_buck = apr_bucket_pool_create(key_val, kv_length - 1,
82b62539f34e8fa7434a95335c4566441c7b5589nd "printenv directive does not take tags in %s",
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Main Includes-Filter Engine
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd/* This is an implementation of the BNDM search algorithm.
82b62539f34e8fa7434a95335c4566441c7b5589nd * Fast and Flexible String Matching by Combining Bit-parallelism and
82b62539f34e8fa7434a95335c4566441c7b5589nd * Suffix Automata (2001)
82b62539f34e8fa7434a95335c4566441c7b5589nd * Gonzalo Navarro, Mathieu Raffinot
82b62539f34e8fa7434a95335c4566441c7b5589nd * Initial code submitted by Sascha Schumann.
82b62539f34e8fa7434a95335c4566441c7b5589nd/* Precompile the bndm_t data structure. */
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic bndm_t *bndm_compile(apr_pool_t *pool, const char *n, apr_size_t nl)
82b62539f34e8fa7434a95335c4566441c7b5589nd unsigned int x;
82b62539f34e8fa7434a95335c4566441c7b5589nd t->T[(unsigned char) *n++] |= x;
82b62539f34e8fa7434a95335c4566441c7b5589nd t->x = x - 1;
82b62539f34e8fa7434a95335c4566441c7b5589nd/* Implements the BNDM search algorithm (as described above).
82b62539f34e8fa7434a95335c4566441c7b5589nd * h - the string to look in
82b62539f34e8fa7434a95335c4566441c7b5589nd * hl - length of the string to look for
82b62539f34e8fa7434a95335c4566441c7b5589nd * t - precompiled bndm structure against the pattern
82b62539f34e8fa7434a95335c4566441c7b5589nd * Returns the count of character that is the first match or hl if no
82b62539f34e8fa7434a95335c4566441c7b5589nd * match is found.
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic apr_size_t bndm(bndm_t *t, const char *h, apr_size_t hl)
82b62539f34e8fa7434a95335c4566441c7b5589nd const char *skip;
82b62539f34e8fa7434a95335c4566441c7b5589nd unsigned int *T, x, d;
82b62539f34e8fa7434a95335c4566441c7b5589nd p = pi + nl; /* compare window right to left. point to the first char */
82b62539f34e8fa7434a95335c4566441c7b5589nd while (p < he) {
82b62539f34e8fa7434a95335c4566441c7b5589nd d &= T[(unsigned char) *p--];
82b62539f34e8fa7434a95335c4566441c7b5589nd if ((d & 1)) {
360fb449fbdd6f7c75b321c7e1612233e828ce77nd if (p != pi) {
82b62539f34e8fa7434a95335c4566441c7b5589nd return p - h + 1;
82b62539f34e8fa7434a95335c4566441c7b5589nd } while (d);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * returns the index position of the first byte of start_seq (or the len of
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * the buffer as non-match)
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_start_sequence(include_ctx_t *ctx, const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p, *ep;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd p = data; /* try partial match at the end of the buffer (below) */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* try fast bndm search over the buffer
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * (hopefully the whole start sequence can be found in this buffer)
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* wow, found it. ready. */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* ok, the pattern can't be found as whole in the buffer,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * check the end for a partial match
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* found a possible start_seq start */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p < ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* partial match found. Store the info for the next round */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p == ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* we must try all combinations; consider (e.g.) SSIStartTag "--->"
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * and a string data of "--.-" and the end of the buffer
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd } while (p < ep);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* no match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * returns the first byte *after* the partial (or final) match.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * If we had to trick with the start_seq start, 'release' returns the
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * number of chars of the start_seq which appeared not to be part of a
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * full tag and may have to be passed down the filter chain.
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_partial_start_sequence(include_ctx_t *ctx,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p, *ep;
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd while (p < ep && pos < slen && *p == intern->start_seq[pos]) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* full match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* the whole buffer is a partial match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p == ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* No match so far, but again:
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * We must try all combinations, since the start_seq is a random
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * user supplied string
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * So: look if the first char of start_seq appears somewhere within
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * the current partial match. If it does, try to start a match that
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * begins with this offset. (This can happen, if a strange
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * start_seq like "---->" spans buffers)
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* if a matching beginning char was found, try to match the
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * remainder of the old buffer.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (t == pos) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* yeah, another partial match found in the *old*
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * buffer, now test the *current* buffer for
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * continuing match
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* no match at all, release all (wrongly) matched chars so far */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * returns the position after the directive
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_directive(include_ctx_t *ctx, const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p = data;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* we have to consider the case of missing space between directive
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * and end_seq (be somewhat lenient), e.g. <!--#printenv-->
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* full match, we're done */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* partial match, the buffer is too small to match fully */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p == ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* no match. continue normal parsing */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* continue immediately with the next state */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, intern->r, "missing "
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd "directive name in parsed document %s",
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* normalize directive name */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* get a rid of a gcc warning about unhandled enumerations */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * find out whether the next token is (a possible) end_seq or an argument
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_arg_or_tail(include_ctx_t *ctx, const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p = data;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* skip leading WS */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* buffer doesn't consist of whitespaces only */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p < ep) {
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd intern->state = (*p == *intern->end_seq) ? PARSE_TAIL : PARSE_ARG;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * test the stream for end_seq. If it doesn't match at all, it must be an
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * argument
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_tail(include_ctx_t *ctx, const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p = data;
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd while (p < ep && pos < intern->end_seq_len && *p == intern->end_seq[pos]) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* bingo, full match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* partial match, the buffer is too small to match fully */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p == ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* no match. It must be an argument string then
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * The caller should cleanup and rewind to the reparse point
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * extract name=value from the buffer
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * A pcre-pattern could look (similar to):
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * name\s*(?:=\s*(["'`]?)value\1(?>\s*))?
31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_size_t find_argument(include_ctx_t *ctx, const char *data,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd const char *p = data;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * create argument structure and append it to the current list
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* check whether it's a valid one. If it begins with a quote, we
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * can safely assume, someone forgot the name of the argument
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd switch (*p) {
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, intern->r, "missing "
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd "argument name for value to tag %s in %s",
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* continue immediately with next state */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p < ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, intern->r, "missing "
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd "argument name for value to tag %s in %s",
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* normalize the name */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd while (*sp) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* continue with next state immediately */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p < ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (*p == '=') {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd else { /* no value */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* buffer doesn't consist of whitespaces only */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p < ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd switch (*p) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* continue with next state immediately */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd for (; p < ep; ++p) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd if (p == ep) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return (p - data);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * The value is still the raw input string. Finally clean it up.
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd intern->current_arg->value[intern->current_arg->value_len] = '\0';
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* strip quote escaping \ from the string */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ep = intern->current_arg->value + intern->current_arg->value_len;
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd intern->current_arg->value[intern->current_arg->value_len] = '\0';
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* get a rid of a gcc warning about unhandled enumerations */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * This is the main loop over the current bucket brigade.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9ndstatic apr_status_t send_parsed_content(ap_filter_t *f, apr_bucket_brigade *bb)
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* fast exit */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* we may crash, since already cleaned up; hand over the responsibility
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * to the next filter;-)
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* All stuff passed along has to be put into that brigade */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd pass_bb = apr_brigade_create(ctx->pool, f->c->bucket_alloc);
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd /* initialization for this loop */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* loop over the current bucket brigade */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* handle meta buckets before reading any data */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* Hit end of stream, time for cleanup ... But wait!
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * Perhaps we're not ready yet. We may have to loop one or
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * two times again to finish our work. In that case, we
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * just re-insert the EOS bucket to allow for an extra loop.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * PARSE_EXECUTE means, we've hit a directive just before the
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * EOS, which is now waiting for execution.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * PARSE_DIRECTIVE_POSTTAIL means, we've hit a directive with
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * no argument and no space between directive and end_seq
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * just before the EOS. (consider <!--#printenv--> as last
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * or only string within the stream). This state, however,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * just cleans up and turns itself to PARSE_EXECUTE, which
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * will be passed through within the next (and actually
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * last) round.
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd break; /* END OF STREAM */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* enough is enough ... */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* read the current bucket data */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* zero length bucket, fetch next one */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * it's actually a data containing bucket, start/continue parsing
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* no current tag; search for start sequence */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* now delete the start_seq stuff from the remaining bucket */
360fb449fbdd6f7c75b321c7e1612233e828ce77nd apr_bucket_split(newb, intern->start_seq_pat->pattern_len);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* we're currently looking for the end of the start sequence */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd index = find_partial_start_sequence(ctx, data, len, &release);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* check if we mismatched earlier and have to release some chars */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd newb = apr_bucket_pool_create(to_release, release, ctx->pool,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* now delete the start_seq stuff from the remaining bucket */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (PARSE_DIRECTIVE == intern->state) { /* final match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* we're currently grabbing the directive name */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd index = find_directive(ctx, data, len, &store, &store_len);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* time for cleanup? */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd else if (index) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* skip WS and find out what comes next (arg or end_seq) */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* currently parsing name[=val] */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd index = find_argument(ctx, data, len, &store, &store_len);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* time for cleanup? */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd else if (index) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* try to match end_seq at current pos. */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* PARSE_ARG must reparse at the beginning */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd default: /* partial match */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* now execute the parsed directive, cleanup the space and
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd * start again with PARSE_PRE_HEAD
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* if there was an error, it was already logged; just stop here */
82b62539f34e8fa7434a95335c4566441c7b5589nd handle_func = apr_hash_get(include_handlers, intern->directive,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd "unknown directive \"%s\" in parsed doc %s",
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* cleanup */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* Oooof. Done here, start next round */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd } /* switch(ctx->state) */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd } /* while(brigade) */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* End of stream. Final cleanup */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *to_release = apr_palloc(ctx->pool, intern->parse_pos);
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd memcpy(to_release, intern->start_seq, intern->parse_pos);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd "SSI directive was not properly finished at the end "
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd "missing closing endif directive in parsed document"
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* cleanup our temporary memory */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* don't forget to finally insert the EOS bucket */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* if something's left over, pass it along */
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Runtime Hooks
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
360fb449fbdd6f7c75b321c7e1612233e828ce77nd include_dir_config *conf = ap_get_module_config(f->r->per_dir_config,
0fdf8c342123fde84405b885fb1720ebc652e10djerenkrantz /* When our xbithack value isn't set to full or our platform isn't
0fdf8c342123fde84405b885fb1720ebc652e10djerenkrantz * providing group-level protection bits or our group-level bits do not
0fdf8c342123fde84405b885fb1720ebc652e10djerenkrantz * have group-execite on, we will set the no_local_copy value to 1 so
0fdf8c342123fde84405b885fb1720ebc652e10djerenkrantz * that we will not send 304s.
4955f2b4ca045ac2c025fff3a46c2d901933d1e4trawickstatic apr_status_t includes_filter(ap_filter_t *f, apr_bucket_brigade *b)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd include_dir_config *conf = ap_get_module_config(r->per_dir_config,
51be7fc538641ed7cb22e959eb31629f7183f70fianh include_server_config *sconf= ap_get_module_config(r->server->module_config,
18343797fadabacf01280b38ea7688690d12aec0rbb if (!f->ctx) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* create context for this filter */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern = intern = apr_palloc(r->pool, sizeof(*ctx->intern));
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* runtime data */
31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd intern->tmp_bb = apr_brigade_create(ctx->pool, f->c->bucket_alloc);
360fb449fbdd6f7c75b321c7e1612233e828ce77nd intern->start_seq_pat = bndm_compile(ctx->pool, intern->start_seq,
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 /* we're not a nested include, so we create an initial
db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz * environment */
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.
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
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley * Exception: XBitHack full means we *should* set the Last-Modified field.
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley /* Assure the platform supports Group protections */
6f4c27ba6e152792f3729069e8d8313ebc87cc60jwoolley apr_table_unset(f->r->headers_out, "Last-Modified");
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* add QUERY stuff to env cause it ain't yet */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd apr_table_setn(r->subprocess_env, "QUERY_STRING", r->args);
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd apr_table_setn(r->subprocess_env, "QUERY_STRING_UNESCAPED",
360fb449fbdd6f7c75b321c7e1612233e828ce77nd conf = ap_get_module_config(r->per_dir_config, &include_module);
82b62539f34e8fa7434a95335c4566441c7b5589nd if (r->handler && (strcmp(r->handler, "server-parsed") == 0))
82b62539f34e8fa7434a95335c4566441c7b5589nd /* These OS's don't support xbithack. This is being worked on. */
82b62539f34e8fa7434a95335c4566441c7b5589nd if (!r->content_type || strcmp(r->content_type, "text/html")) {
82b62539f34e8fa7434a95335c4566441c7b5589nd /* We always return declined, because the default handler actually
82b62539f34e8fa7434a95335c4566441c7b5589nd * serves the file. All we have to do is add the filter.
82b62539f34e8fa7434a95335c4566441c7b5589nd ap_add_output_filter("INCLUDES", NULL, r, r->connection);
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Configuration Handling
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic void *create_includes_dir_config(apr_pool_t *p, char *dummy)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd include_dir_config *result = apr_palloc(p, sizeof(include_dir_config));
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic void *create_includes_server_config(apr_pool_t *p, server_rec *server)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd result->undefined_echo_len = sizeof(DEFAULT_UNDEFINED_ECHO) - 1;
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_xbithack(cmd_parms *cmd, void *mconfig, const char *arg)
82b62539f34e8fa7434a95335c4566441c7b5589nd return "XBitHack must be set to Off, On, or Full";
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_default_start_tag(cmd_parms *cmd, void *mconfig,
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *tag)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *p = tag;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* be consistent. (See below in set_default_end_tag) */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd while (*p) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return "SSIStartTag may not contain any whitespaces";
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf= ap_get_module_config(cmd->server->module_config , &include_module);
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_default_end_tag(cmd_parms *cmd, void *mconfig,
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *tag)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *p = tag;
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd /* sanity check. The parser may fail otherwise */
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd while (*p) {
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return "SSIEndTag may not contain any whitespaces";
51be7fc538641ed7cb22e959eb31629f7183f70fianh conf= ap_get_module_config(cmd->server->module_config , &include_module);
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_undefined_echo(cmd_parms *cmd, void *mconfig,
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *msg)
360fb449fbdd6f7c75b321c7e1612233e828ce77nd conf = ap_get_module_config(cmd->server->module_config, &include_module);
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_default_error_msg(cmd_parms *cmd, void *mconfig,
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *msg)
360fb449fbdd6f7c75b321c7e1612233e828ce77ndstatic const char *set_default_time_fmt(cmd_parms *cmd, void *mconfig,
360fb449fbdd6f7c75b321c7e1612233e828ce77nd const char *fmt)
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589nd * | Module Initialization and Configuration
82b62539f34e8fa7434a95335c4566441c7b5589nd * +-------------------------------------------------------+
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic int include_post_config(apr_pool_t *p, apr_pool_t *plog,
82b62539f34e8fa7434a95335c4566441c7b5589nd ssi_pfn_register = APR_RETRIEVE_OPTIONAL_FN(ap_register_include_handler);
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,
6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd "String to be displayed if an echoed variable is undefined"),
82b62539f34e8fa7434a95335c4566441c7b5589ndstatic void ap_register_include_handler(char *tag, include_handler_fn_t *func)
82b62539f34e8fa7434a95335c4566441c7b5589nd apr_hash_set(include_handlers, tag, strlen(tag), (const void *)func);
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);