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

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd#define APR_WANT_MEMFUNC

024cd9589e52cf11ce765dfddb5b5f0c6e421a48gstein#include "apr_want.h"

cccd31fa4a72fe23cc3249c06db181b274a55a69gstein

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"

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#if APR_CHARSET_EBCDIC

178381ebc820fb4c429aa000240cc8ec42c99c58trawick#include "util_ebcdic.h"

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define RAW_ASCII_CHAR(ch) apr_xlate_conv_byte(ap_hdrs_from_ascii, \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd (unsigned char)ch)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#else /*APR_CHARSET_EBCDIC*/

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define RAW_ASCII_CHAR(ch) (ch)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#endif /*APR_CHARSET_EBCDIC*/

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#ifdef DEBUG_INCLUDE

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define MAX_DEBUG_SIZE MAX_STRING_LEN

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define LOG_COND_STATUS(ctx, f, bb, text) \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnddo { \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *cond_txt = apr_pstrcat((ctx)->dpool, "**** ", (text), \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd " conditional_status=\"", ((ctx)->flags & FLAG_COND_TRUE)?"1":"0", \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd "\"\n", NULL); \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL((bb), apr_bucket_heap_create(cond_txt, \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd strlen(cond_txt), NULL, (f)->c->bucket_alloc)); \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd} while(0)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DUMP_PARSE_EXPR_DEBUG(buf, f, bb) \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnddo { \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL((bb), apr_bucket_heap_create((buf), \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd strlen((buf)), NULL, (f)->c->bucket_alloc)); \

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd} while(0)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#else

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define MAX_DEBUG_SIZE 10

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define LOG_COND_STATUS(ctx, f, bb, text)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DUMP_PARSE_EXPR_DEBUG(buf, f, bb)

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#endif

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

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantzenum xbithack {

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz xbithack_off, xbithack_on, xbithack_full

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz};

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndtypedef struct {

51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int T[256];

51be7fc538641ed7cb22e959eb31629f7183f70fianh unsigned int x;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd} bndm_t;

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

6c4c113ce85934b11c9e78399e1bb8ec7a568af9ndtypedef enum {

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_PRE_HEAD,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_HEAD,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_DIRECTIVE,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_DIRECTIVE_POSTNAME,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_DIRECTIVE_TAIL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_DIRECTIVE_POSTTAIL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_PRE_ARG,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_NAME,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_POSTNAME,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_EQ,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_PREVAL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_VAL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_VAL_ESC,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_ARG_POSTVAL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_TAIL,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_TAIL_SEQ,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd PARSE_EXECUTE

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd} parse_state_t;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

d2479dc17d5f6041e472fff5ed39a3a7222e9f51ndtypedef struct arg_item {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd struct arg_item *next;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd char *name;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd apr_size_t name_len;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd char *value;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd apr_size_t value_len;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd} arg_item_t;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstruct ssi_internal_ctx {

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd parse_state_t state;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd int seen_eos;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd int error;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd char quote; /* quote character value (or \0) */

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t parse_pos; /* parse position of partial matches */

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t bytes_read;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd apr_bucket_brigade *tmp_bb;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd const char *start_seq;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd bndm_t *start_seq_pat;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t start_seq_len;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd const char *end_seq;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd apr_size_t end_seq_len;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd char *directive; /* name of the current directive */

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t directive_len; /* length of the current directive name */

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd arg_item_t *current_arg; /* currently parsed argument */

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd arg_item_t *argv; /* all arguments */

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *error_str_override;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *time_str_override;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd char *re_string;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd regmatch_t (*re_result)[10];

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd};

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd#define DEFAULT_START_SEQUENCE "<!--#"

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd#define DEFAULT_END_SEQUENCE "-->"

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DEFAULT_ERROR_MSG "[an error occurred while processing this directive]"

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DEFAULT_TIME_FORMAT "%A, %d-%b-%Y %H:%M:%S %Z"

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd#define DEFAULT_UNDEFINED_ECHO "(none)"

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#ifdef XBITHACK

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#define DEFAULT_XBITHACK xbithack_full

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#else

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#define DEFAULT_XBITHACK xbithack_off

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz#endif

7c19ce86bbd72bba1d018522250f5f315ffbc0afjerenkrantz

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

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.

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (!ctx->intern->re_result || !ctx->intern->re_string) {

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe return NULL;

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe else {

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe int idx = atoi(var);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_size_t len = (*ctx->intern->re_result)[idx].rm_eo

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd - (*ctx->intern->re_result)[idx].rm_so;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if ( (*ctx->intern->re_result)[idx].rm_so < 0

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd || (*ctx->intern->re_result)[idx].rm_eo < 0) {

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe return NULL;

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd val = apr_pstrmemdup(r->pool, ctx->intern->re_string

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd + (*ctx->intern->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

f00d1e76bae896c2f6a520eec69b1d0d802d4108jerenkrantz

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

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#define MAXENTLEN (6)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

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\

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingucirc\373thorn\376", /* 5 */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "Agrave\300Aacute\301Atilde\303Ccedil\307Egrave\310Eacute\311\

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingotilde\365oslash\370ugrave\371uacute\372yacute\375" /* 6 */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding };

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

450fd97bdb54ac69e2cb552f034697a10868be3cbrianp /* Do a fast scan through the string until we find anything

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

6c4c113ce85934b11c9e78399e1bb8ec7a568af9ndstatic void ap_ssi_get_tag_and_value(include_ctx_t *ctx, char **tag,

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd char **tag_val, int dodecode)

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd{

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (!ctx->intern->argv) {

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd *tag = NULL;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd *tag_val = NULL;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd }

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd *tag_val = ctx->intern->argv->value;

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd *tag = ctx->intern->argv->name;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->argv = ctx->intern->argv->next;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (dodecode && *tag_val) {

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd decodehtml(*tag_val);

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd }

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd return;

6c4c113ce85934b11c9e78399e1bb8ec7a568af9nd}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

7f7ba3f0537003a359c42170aee14a101d7fe917brianp#define PARSE_STRING_INITIAL_SIZE 64

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;

58fd79b56eb624bf011772994e9761d3c2e228c1orlikowski apr_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) {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, 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 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 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

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

70d62b3f12d56a7bec05fd2e7ad8ccd0fe98b031trawick if (ap_strchr_c(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 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 while (*path && (*path++ != '/')) {

59004ab0feba0b23cf50c35c901e051c4965dbc4brianp continue;

82630c4a04be47f39298d3284b2c596244fb509bbrianp }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_include(include_ctx_t *ctx, ap_filter_t *f,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_bucket_brigade *bb)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;

374e2f2d7ee8274b53fddb0d4e3270105377b868gregames int loglevel = APLOG_ERR;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r = f->r;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (ctx->flags & SSI_FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!tag || !tag_val) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd return APR_SUCCESS;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

c815e1cfb2ec4db2e1a94fafd77de045d7fd93dbbrianp if (!strcmp(tag, "virtual") || !strcmp(tag, "file")) {

18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *rr = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *error_fmt = NULL;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd SSI_EXPAND_DROP_NAME);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag[0] == 'f') {

5915dc3ebb03935b18b0d14088278d22eefe3553wrowe /* XXX: Port to apr_filepath_merge

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz if (!is_only_below(parsed_string)) {

18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "unable to include file \"%s\" "

18343797fadabacf01280b38ea7688690d12aec0rbb "in parsed file %s";

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

e2653756d0d14a9a620b24bd04a6ab1182178462brianp rr = ap_sub_req_lookup_uri(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

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!error_fmt && (ctx->flags & SSI_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 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) {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, loglevel,

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz 0, r, error_fmt, tag_val, r->filename);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

1f89ef1594d8a552f81e775be55cb9baeab32b77trawick }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

ba00c3b7c20f00ce631b89ae3b1cd3bae8d1b165rbb /* destroy the sub request */

ba00c3b7c20f00ce631b89ae3b1cd3bae8d1b165rbb if (rr != NULL) {

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz ap_destroy_sub_req(rr);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

18343797fadabacf01280b38ea7688690d12aec0rbb "unknown parameter \"%s\" to tag include in %s",

18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd return APR_SUCCESS;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_echo(include_ctx_t *ctx, ap_filter_t *f,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_bucket_brigade *bb)

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;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r = f->r;

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim encode = E_ENTITY;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (ctx->flags & SSI_FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!tag || !tag_val) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd return APR_SUCCESS;

18343797fadabacf01280b38ea7688690d12aec0rbb }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

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,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd SSI_EXPAND_DROP_NAME));

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 }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL(bb, tmp_buck);

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 {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown value \"%s\" to parameter \"encoding\" of "

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "tag echo in %s", tag_val, r->filename);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

18343797fadabacf01280b38ea7688690d12aec0rbb "unknown parameter \"%s\" in tag echo of %s",

18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd return APR_SUCCESS;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_config(include_ctx_t *ctx, ap_filter_t *f,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_bucket_brigade *bb)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

7f7ba3f0537003a359c42170aee14a101d7fe917brianp char *parsed_string;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r = f->r;

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_t *env = r->subprocess_env;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (ctx->flags & SSI_FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_RAW);

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (! tag || !tag_val) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd return APR_SUCCESS;

18343797fadabacf01280b38ea7688690d12aec0rbb }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcmp(tag, "errmsg")) {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (ctx->intern->error_str_override == NULL) {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->error_str_override = apr_palloc(ctx->pool,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd MAX_STRING_LEN);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->error_str = ctx->intern->error_str_override;

7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ap_ssi_parse_string(r, ctx, tag_val,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->error_str_override,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN, SSI_EXPAND_DROP_NAME);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(tag, "timefmt")) {

18343797fadabacf01280b38ea7688690d12aec0rbb apr_time_t date = r->request_time;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (ctx->intern->time_str_override == NULL) {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->time_str_override = apr_palloc(ctx->pool,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd MAX_STRING_LEN);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->time_str = ctx->intern->time_str_override;

7f1533cc21a93c0744bd40e697ba610a5b1cb68fianh }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ap_ssi_parse_string(r, ctx, tag_val,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->time_str_override,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN, SSI_EXPAND_DROP_NAME);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd

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,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd SSI_EXPAND_DROP_NAME);

18343797fadabacf01280b38ea7688690d12aec0rbb decodehtml(parsed_string);

18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcmp(parsed_string, "bytes")) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ctx->flags |= SSI_FLAG_SIZE_IN_BYTES;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcmp(parsed_string, "abbrev")) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ctx->flags &= SSI_FLAG_SIZE_ABBREV;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz "unknown parameter \"%s\" to tag config in %s",

db4293b97cc224d79164c1c092b0267af5d883c5jerenkrantz tag, r->filename);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd return APR_SUCCESS;

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

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

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;

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR,

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

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 {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, 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 {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "unknown parameter \"%s\" to tag %s in %s",

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding tag, directive, r->filename);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_fsize(include_ctx_t *ctx, ap_filter_t *f,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_bucket_brigade *bb)

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;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r = f->r;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (ctx->flags & SSI_FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!tag || !tag_val) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd return APR_SUCCESS;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd SSI_EXPAND_DROP_NAME);

18343797fadabacf01280b38ea7688690d12aec0rbb if (!find_file(r, "fsize", tag, parsed_string, &finfo)) {

17bdb8862482dff763afd4d86a58de533afff4cajwoolley /* XXX: if we *know* we're going to have to copy the

18343797fadabacf01280b38ea7688690d12aec0rbb char buff[50];

18343797fadabacf01280b38ea7688690d12aec0rbb

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!(ctx->flags & SSI_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);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL(bb, tmp_buck);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd return APR_SUCCESS;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

31cd7345e3f8257a89ef1f5ab344fb037c0d941fndstatic apr_status_t handle_flastmod(include_ctx_t *ctx, ap_filter_t *f,

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd apr_bucket_brigade *bb)

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;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd request_rec *r = f->r;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (ctx->flags & SSI_FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, SSI_VALUE_DECODED);

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd if (!tag || !tag_val) {

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd return APR_SUCCESS;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

7f7ba3f0537003a359c42170aee14a101d7fe917brianp parsed_string = ap_ssi_parse_string(r, ctx, tag_val, NULL,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd MAX_STRING_LEN,

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd SSI_EXPAND_DROP_NAME);

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);

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd APR_BRIGADE_INSERT_TAIL(bb, tmp_buck);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd SSI_CREATE_ERROR_BUCKET(ctx, f, bb);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

d2479dc17d5f6041e472fff5ed39a3a7222e9f51nd

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd return APR_SUCCESS;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowestatic int re_check(request_rec *r, include_ctx_t *ctx,

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe char *string, char *rexp)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding regex_t *compiled;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd const apr_size_t nres = sizeof(*ctx->intern->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) {

12901074f5d6b36d08be84d8637b6f2c21e0da26trawick ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe "unable to compile pattern \"%s\"", rexp);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd if (!ctx->intern->re_result) {

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->re_result = apr_pcalloc(r->pool, sizeof(*ctx->intern->re_result));

c6a9d49433c9ba5b18b26c3d764f1bbcb9746090wrowe }

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd ctx->intern->re_string = string;

31cd7345e3f8257a89ef1f5ab344fb037c0d941fnd regex_error = ap_regexec(compiled, string, nres, *ctx->intern->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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!qs) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->value[next++] = ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /*

18343797fadabacf01280b38ea7688690d12aec0rbb for (ch = *string; ((ch != '\0') && (!tkn_fnd)); ch = *++string) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (ch == '\\') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if ((ch = *++string) == '\0') {