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"

cccd31fa4a72fe23cc3249c06db181b274a55a69gstein

b1476ba063e6d9577cd86db3db5dd98ff6bc78b9rbb#define CORE_PRIVATE

b1476ba063e6d9577cd86db3db5dd98ff6bc78b9rbb

9625528fcf4fa27288f3be080a1979c8ef60d7dfrbb#include "ap_config.h"

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb#include "util_filter.h"

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "httpd.h"

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#include "http_config.h"

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"

445997e06464e7625c7f0e22917f8f2d9876cfffrbb#include "apr_optional.h"

18343797fadabacf01280b38ea7688690d12aec0rbb#include "mod_include.h"

48d7c43629323c8d5ee9f7bd0d194de0a376b391rbb#ifdef HAVE_STRING_H

8f3ec4772d2aeb347cf40e87c77627bb784dd018rbb#include <string.h>

48d7c43629323c8d5ee9f7bd0d194de0a376b391rbb#endif

d41217398f0e1031adbb6f5bd37f45737c805deftrawick#ifdef HAVE_STRINGS_H

d41217398f0e1031adbb6f5bd37f45737c805deftrawick#include <strings.h>

d41217398f0e1031adbb6f5bd37f45737c805deftrawick#endif

178381ebc820fb4c429aa000240cc8ec42c99c58trawick#include "util_ebcdic.h"

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

2cfa4a3d464d1ce4d6eee58ea899501ba78957a0trawickmodule AP_MODULE_DECLARE_DATA includes_module;

f6e9f5600e77b78fb013bb543d364135961639d1rbbstatic apr_hash_t *include_hash;

445997e06464e7625c7f0e22917f8f2d9876cfffrbbstatic APR_OPTIONAL_FN_TYPE(ap_register_include_handler) *ssi_pfn_register;

445997e06464e7625c7f0e22917f8f2d9876cfffrbb

f6e9f5600e77b78fb013bb543d364135961639d1rbb

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic void add_include_vars(request_rec *r, char *timefmt)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe char *pwname;

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_t *e = r->subprocess_env;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *t;

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_time_t date = r->request_time;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DATE_LOCAL", ap_ht_time(r->pool, date, timefmt, 0));

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DATE_GMT", ap_ht_time(r->pool, date, timefmt, 1));

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "LAST_MODIFIED",

d96aa158770d3f83cb59cf0f2f7402e175f7dfccrbb ap_ht_time(r->pool, r->finfo.mtime, timefmt, 0));

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DOCUMENT_URI", r->uri);

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_setn(e, "DOCUMENT_PATH_INFO", r->path_info);

c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe if (apr_get_username(&pwname, r->finfo.user, r->pool) == APR_SUCCESS) {

c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe apr_table_setn(e, "USER_NAME", pwname);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe apr_table_setn(e, "USER_NAME", "<unknown>");

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic apr_bucket *find_start_sequence(apr_bucket *dptr, include_ctx_t *ctx,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_brigade *bb, int *do_cleanup)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t len;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb const char *c;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb const char *buf;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *str = STARTING_SEQUENCE;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb *do_cleanup = 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb do {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (APR_BUCKET_IS_EOS(dptr)) {

fcc991411813d0ceaca4a76675f771e1f06617cdtrawick break;

fcc991411813d0ceaca4a76675f771e1f06617cdtrawick }

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_read(dptr, &buf, &len, 0);

fcc991411813d0ceaca4a76675f771e1f06617cdtrawick /* XXX handle retcodes */

fcc991411813d0ceaca4a76675f771e1f06617cdtrawick if (len == 0) { /* end of pipe? */

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c = buf;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb while (c - buf != len) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[ctx->parse_pos]) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->state == PRE_HEAD) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSE_HEAD;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_index = c - buf;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos++;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb if (str[ctx->parse_pos] == '\0') {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_bkt;

23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawick apr_size_t start_index;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* We want to split the bucket at the '<'. */

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_DIRECTIVE;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_index = c - buf;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->head_start_index > 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb start_index = (c - buf) - ctx->head_start_index;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_split(ctx->head_start_bucket, ctx->head_start_index);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_bkt = APR_BUCKET_NEXT(ctx->head_start_bucket);

18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->head_start_bucket) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_bucket = tmp_bkt;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_index = start_index;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = tmp_bkt;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_index = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb return ctx->head_start_bucket;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (ctx->parse_pos != 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb /* The reason for this, is that we need to make sure

18343797fadabacf01280b38ea7688690d12aec0rbb *do_cleanup = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[0]) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSE_HEAD;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_index = c - buf;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PRE_HEAD;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_bucket = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->head_start_index = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb c++;

18343797fadabacf01280b38ea7688690d12aec0rbb }

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT(dptr);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe } while (dptr != APR_BRIGADE_SENTINEL(bb));

18343797fadabacf01280b38ea7688690d12aec0rbb return NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb}

18343797fadabacf01280b38ea7688690d12aec0rbb

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic apr_bucket *find_end_sequence(apr_bucket *dptr, include_ctx_t *ctx, apr_bucket_brigade *bb)

18343797fadabacf01280b38ea7688690d12aec0rbb{

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t len;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *c;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *buf;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *str = ENDING_SEQUENCE;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb do {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe if (APR_BUCKET_IS_EOS(dptr)) {

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb }

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_read(dptr, &buf, &len, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb /* XXX handle retcodes */

18343797fadabacf01280b38ea7688690d12aec0rbb if (len == 0) { /* end of pipe? */

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tag_start_bucket) {

18343797fadabacf01280b38ea7688690d12aec0rbb c = buf + ctx->tag_start_index;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb c = buf;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb while (c - buf != len) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[ctx->parse_pos]) {

f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->state != PARSE_TAIL) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSE_TAIL;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_index = c - buf;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->parse_pos++;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->state == PARSE_DIRECTIVE) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->tag_length == 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (!apr_isspace(*c)) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_start_index = c - buf;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length = 1;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb else {

f6e9f5600e77b78fb013bb543d364135961639d1rbb if (!apr_isspace(*c)) {

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length++;

f6e9f5600e77b78fb013bb543d364135961639d1rbb }

f6e9f5600e77b78fb013bb543d364135961639d1rbb else {

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_TAG;

f6e9f5600e77b78fb013bb543d364135961639d1rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length++;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

f6e9f5600e77b78fb013bb543d364135961639d1rbb else if (ctx->state == PARSE_TAG) {

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->tag_length++;

f6e9f5600e77b78fb013bb543d364135961639d1rbb }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb if (str[ctx->parse_pos] == '\0') {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* We want to split the bucket at the '>'. The

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSED;

18343797fadabacf01280b38ea7688690d12aec0rbb if ((c - buf) > 0) {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_split(dptr, c - buf);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_buck = APR_BUCKET_NEXT(dptr);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb return (tmp_buck);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (ctx->parse_pos != 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb /* The reason for this, is that we need to make sure

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tag_length += ctx->parse_pos;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == str[0]) {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->state = PARSE_TAIL;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_index = c - buf;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->tag_length += ctx->parse_pos;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->parse_pos = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

f6e9f5600e77b78fb013bb543d364135961639d1rbb if (ctx->tag_length > ctx->directive_length) {

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_TAG;

f6e9f5600e77b78fb013bb543d364135961639d1rbb }

f6e9f5600e77b78fb013bb543d364135961639d1rbb else {

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->state = PARSE_DIRECTIVE;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->directive_length += ctx->parse_pos;

f6e9f5600e77b78fb013bb543d364135961639d1rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_bucket = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->tail_start_index = 0;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->tag_length += ctx->parse_pos;

f6e9f5600e77b78fb013bb543d364135961639d1rbb ctx->parse_pos = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT(dptr);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe } while (dptr != APR_BRIGADE_SENTINEL(bb));

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb return NULL;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbbstatic apr_status_t get_combined_directive (include_ctx_t *ctx,

18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_brigade *bb,

18343797fadabacf01280b38ea7688690d12aec0rbb char *tmp_buf, int tmp_buf_size)

18343797fadabacf01280b38ea7688690d12aec0rbb{

18343797fadabacf01280b38ea7688690d12aec0rbb int done = 0;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *dptr;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *tmp_from;

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t tmp_from_len;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* If the tag length is longer than the tmp buffer, allocate space. */

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->tag_length > tmp_buf_size-1) {

18343797fadabacf01280b38ea7688690d12aec0rbb if ((ctx->combined_tag = apr_pcalloc(r->pool, ctx->tag_length + 1)) == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return (APR_ENOMEM);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb } /* Else, just use the temp buffer. */

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->combined_tag = tmp_buf;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* Prime the pump. Start at the beginning of the tag... */

18343797fadabacf01280b38ea7688690d12aec0rbb dptr = ctx->tag_start_bucket;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_read (dptr, &tmp_from, &tmp_from_len, 0); /* Read the bucket... */

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* Adjust the pointer to start at the tag within the bucket... */

18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {

18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= (tmp_from_len - ctx->tail_start_index);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from = &tmp_from[ctx->tag_start_index];

18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= ctx->tag_start_index;

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = ctx->combined_tag;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb /* Loop through the buckets from the tag_start_bucket until before

18343797fadabacf01280b38ea7688690d12aec0rbb do {

18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (ctx->curr_tag_pos, tmp_from, tmp_from_len);

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos += tmp_from_len;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {

18343797fadabacf01280b38ea7688690d12aec0rbb done = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe dptr = APR_BUCKET_NEXT (dptr);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket_read (dptr, &tmp_from, &tmp_from_len, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb /* Adjust the count to stop at the beginning of the tail. */

18343797fadabacf01280b38ea7688690d12aec0rbb if (dptr == ctx->tail_start_bucket) {

18343797fadabacf01280b38ea7688690d12aec0rbb tmp_from_len -= (tmp_from_len - ctx->tail_start_index);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb } while ((!done) &&

18343797fadabacf01280b38ea7688690d12aec0rbb ((ctx->curr_tag_pos - ctx->combined_tag) < ctx->tag_length));

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->combined_tag[ctx->tag_length] = '\0';

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = ctx->combined_tag;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb return (APR_SUCCESS);

18343797fadabacf01280b38ea7688690d12aec0rbb}

18343797fadabacf01280b38ea7688690d12aec0rbb

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#define MAXENTLEN (6)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic void decodehtml(char *s)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int val, i, j;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *p = s;

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (; *s != '\0'; s++, p++) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*s != '&') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = *s;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* find end of entity */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (i = 1; s[i] != ';' && s[i] != '\0'; i++) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (s[i] == '\0') { /* treat as normal data */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = *s;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* is it numeric ? */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (s[1] == '#') {

10a4cdd68ef1ca0e54af296fe1d08ac00150c90bwrowe for (j = 2, val = 0; j < i && apr_isdigit(s[j]); j++) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding val = val * 10 + s[j] - '0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding s += i;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (j < i || val <= 8 || (val >= 11 && val <= 31) ||

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding (val >= 127 && val <= 160) || val >= 256) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding p--; /* no data to output */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = RAW_ASCII_CHAR(val);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding j = i - 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (j > MAXENTLEN || entlist[j] == NULL) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* wrong length */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '&';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding continue; /* skip it */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding for (ents = entlist[j]; *ents != '\0'; ents += i) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (strncmp(s + 1, ents, j) == 0) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*ents == '\0') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '&'; /* unknown */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = RAW_ASCII_CHAR(((const unsigned char *) ents)[j]);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding s += i;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *p = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb#define SKIP_TAG_WHITESPACE(ptr) while ((*ptr != '\0') && (apr_isspace (*ptr))) ptr++

18343797fadabacf01280b38ea7688690d12aec0rbb

445997e06464e7625c7f0e22917f8f2d9876cfffrbbstatic void ap_ssi_get_tag_and_value(include_ctx_t *ctx, char **tag,

18343797fadabacf01280b38ea7688690d12aec0rbb char **tag_val, int dodecode)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *c = ctx->curr_tag_pos;

18343797fadabacf01280b38ea7688690d12aec0rbb int shift_val = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb char term = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *tag_val = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);

18343797fadabacf01280b38ea7688690d12aec0rbb *tag = c; /* First non-whitespace character (could be NULL). */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb while ((*c != '\0') && (*c != '=') && (!apr_isspace(*c))) {

18343797fadabacf01280b38ea7688690d12aec0rbb *c = apr_tolower(*c); /* find end of tag, lowercasing as we go... */

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb if ((*c == '\0') || (**tag == '=')) {

18343797fadabacf01280b38ea7688690d12aec0rbb if ((**tag == '\0') || (**tag == '=')) {

18343797fadabacf01280b38ea7688690d12aec0rbb *tag = NULL;

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = c;

18343797fadabacf01280b38ea7688690d12aec0rbb return; /* We have found the end of the buffer. */

18343797fadabacf01280b38ea7688690d12aec0rbb } /* We might have a tag, but definitely no value. */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == '=') {

18343797fadabacf01280b38ea7688690d12aec0rbb *c++ = '\0'; /* Overwrite the '=' with a terminating byte after tag. */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else { /* Try skipping WS to find the '='. */

18343797fadabacf01280b38ea7688690d12aec0rbb *c++ = '\0'; /* Terminate the tag... */

18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c != '=') { /* There needs to be an equal sign if there's a value. */

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = c;

18343797fadabacf01280b38ea7688690d12aec0rbb return; /* There apparently was no value. */

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb c++; /* Skip the equals sign. */

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb SKIP_TAG_WHITESPACE(c);

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == '"' || *c == '\'') { /* Allow quoted values for space inclusion. */

18343797fadabacf01280b38ea7688690d12aec0rbb term = *c++; /* NOTE: This does not pass the quotes on return. */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb *tag_val = c;

18343797fadabacf01280b38ea7688690d12aec0rbb while ((*c != '\0') &&

18343797fadabacf01280b38ea7688690d12aec0rbb (((term != '\0') && (*c != term)) ||

18343797fadabacf01280b38ea7688690d12aec0rbb ((term == '\0') && (!apr_isspace(*c))))) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == '\\') { /* Accept \" and \' as valid char in string. */

47d7b9019e57fbf3eaa4d2b19bbbcce087dd8389rbb c++;

18343797fadabacf01280b38ea7688690d12aec0rbb if (*c == term) { /* Overwrite the "\" during the embedded */

18343797fadabacf01280b38ea7688690d12aec0rbb shift_val++; /* escape sequence of '\"' or "\'". Shift */

18343797fadabacf01280b38ea7688690d12aec0rbb } /* bytes from here to next delimiter. */

18343797fadabacf01280b38ea7688690d12aec0rbb if (shift_val > 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb *(c-shift_val) = *c;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb c++;

18343797fadabacf01280b38ea7688690d12aec0rbb if (shift_val > 0) {

18343797fadabacf01280b38ea7688690d12aec0rbb *(c-shift_val) = *c;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb *c++ = '\0'; /* Overwrites delimiter (term or WS) with NULL. */

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->curr_tag_pos = c;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (dodecode) {

18343797fadabacf01280b38ea7688690d12aec0rbb decodehtml(*tag_val);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb return;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

445997e06464e7625c7f0e22917f8f2d9876cfffrbbstatic void ap_ssi_parse_string(request_rec *r, const char *in, char *out,

445997e06464e7625c7f0e22917f8f2d9876cfffrbb size_t length, int leave_name)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *next = out;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char *end_out;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* leave room for nul terminator */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding end_out = out + length - 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding while ((ch = *in++) != '\0') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding switch (ch) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '\\':

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (next == end_out) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* truncated */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*in == '$') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = *in++;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding case '$':

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding const char *start_of_var_name;

18343797fadabacf01280b38ea7688690d12aec0rbb char *end_of_var_name; /* end of var name + 1 */

87e9aee98265a06128c8ae448967fe98e271cce0trawick const char *expansion, *temp_end, *val;

18343797fadabacf01280b38ea7688690d12aec0rbb char tmp_store;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding size_t l;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* guess that the expansion won't happen */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expansion = in - 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (*in == '{') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ++in;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding start_of_var_name = in;

66d349e02d1a5a599a01c977d2c5b0009181f7deben in = ap_strchr_c(in, '}');

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (in == NULL) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR,

b79b743d4cff02d6a830bb7118826a2fd608742amartin 0, r, "Missing '}' on variable \"%s\"",

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expansion);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

87e9aee98265a06128c8ae448967fe98e271cce0trawick temp_end = in;

87e9aee98265a06128c8ae448967fe98e271cce0trawick end_of_var_name = (char *)temp_end;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ++in;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding start_of_var_name = in;

10a4cdd68ef1ca0e54af296fe1d08ac00150c90bwrowe while (apr_isalnum(*in) || *in == '_') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ++in;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

87e9aee98265a06128c8ae448967fe98e271cce0trawick temp_end = in;

87e9aee98265a06128c8ae448967fe98e271cce0trawick end_of_var_name = (char *)temp_end;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* what a pain, too bad there's no table_getn where you can

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding l = end_of_var_name - start_of_var_name;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (l != 0) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb tmp_store = *end_of_var_name;

445997e06464e7625c7f0e22917f8f2d9876cfffrbb *end_of_var_name = '\0';

445997e06464e7625c7f0e22917f8f2d9876cfffrbb val = apr_table_get(r->subprocess_env, start_of_var_name);

445997e06464e7625c7f0e22917f8f2d9876cfffrbb *end_of_var_name = tmp_store;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (val) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding expansion = val;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding l = strlen(expansion);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (leave_name) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding l = in - expansion;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break; /* no expansion to be done */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* zero-length variable name causes just the $ to be copied */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding l = 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

44d275fe4ce94e3b2d73614b1930a2e43e6fba8fstoddard l = ((int)l > end_out - next) ? (end_out - next) : l;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding memcpy(next, expansion, l);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding next += l;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding default:

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (next == end_out) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* truncated */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next++ = ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding *next = '\0';

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic int is_only_below(const char *path)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#ifdef HAVE_DRIVE_LETTERS

50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (path[1] == ':')

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding#endif

50e59a535cafd083838a173aedf9cfa6917d016dwrowe#ifdef NETWARE

50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (strchr(path, ':')

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 0;

50e59a535cafd083838a173aedf9cfa6917d016dwrowe#endif

50e59a535cafd083838a173aedf9cfa6917d016dwrowe if (path[0] == '/') {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding 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;

50e59a535cafd083838a173aedf9cfa6917d016dwrowe while (*path && *(path++) != '/')

50e59a535cafd083838a173aedf9cfa6917d016dwrowe ++path;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic int handle_include(include_ctx_t *ctx, apr_bucket_brigade **bb, request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_filter_t *f, apr_bucket *head_ptr, apr_bucket **inserted_head)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char parsed_string[MAX_STRING_LEN];

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return (0);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

18343797fadabacf01280b38ea7688690d12aec0rbb return (1);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

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

18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *rr = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *error_fmt = NULL;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, parsed_string, sizeof(parsed_string), 0);

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

18343797fadabacf01280b38ea7688690d12aec0rbb /* be safe; only files in this directory or below allowed */

18343797fadabacf01280b38ea7688690d12aec0rbb if (!is_only_below(parsed_string)) {

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

18343797fadabacf01280b38ea7688690d12aec0rbb "in parsed file %s";

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_file(parsed_string, r, f->next);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_uri(parsed_string, r, f->next);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (!error_fmt && rr->status != HTTP_OK) {

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

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (!error_fmt && (ctx->flags & FLAG_NO_EXEC) && rr->content_type

18343797fadabacf01280b38ea7688690d12aec0rbb && (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) {

18343797fadabacf01280b38ea7688690d12aec0rbb /* try to avoid recursive includes. We do this by walking

18343797fadabacf01280b38ea7688690d12aec0rbb int founddupe = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *p;

18343797fadabacf01280b38ea7688690d12aec0rbb for (p = r; p != NULL && !founddupe; p = p->main) {

18343797fadabacf01280b38ea7688690d12aec0rbb request_rec *q;

18343797fadabacf01280b38ea7688690d12aec0rbb for (q = p; q != NULL; q = q->prev) {

18343797fadabacf01280b38ea7688690d12aec0rbb if ( (strcmp(q->filename, rr->filename) == 0) ||

18343797fadabacf01280b38ea7688690d12aec0rbb (strcmp(q->uri, rr->uri) == 0) ){

18343797fadabacf01280b38ea7688690d12aec0rbb founddupe = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (p != NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb error_fmt = "Recursive include of \"%s\" "

18343797fadabacf01280b38ea7688690d12aec0rbb "in parsed file %s";

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb /* 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. */

18343797fadabacf01280b38ea7688690d12aec0rbb if (rr)

18343797fadabacf01280b38ea7688690d12aec0rbb ap_set_module_config(rr->request_config, &includes_module, r);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb if (!error_fmt) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb SPLIT_AND_PASS_PRETAG_BUCKETS(*bb, ctx, f->next);

445997e06464e7625c7f0e22917f8f2d9876cfffrbb

445997e06464e7625c7f0e22917f8f2d9876cfffrbb if (ap_run_sub_req(rr)) {

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

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb if (error_fmt) {

18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR,

18343797fadabacf01280b38ea7688690d12aec0rbb 0, r, error_fmt, tag_val, r->filename);

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

1f89ef1594d8a552f81e775be55cb9baeab32b77trawick }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb /* destroy the sub request if it's not a nested include (crumb) */

18343797fadabacf01280b38ea7688690d12aec0rbb if (rr != NULL

18343797fadabacf01280b38ea7688690d12aec0rbb && ap_get_module_config(rr->request_config, &includes_module)

18343797fadabacf01280b38ea7688690d12aec0rbb != NESTED_INCLUDE_MAGIC) {

18343797fadabacf01280b38ea7688690d12aec0rbb ap_destroy_sub_req(rr);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

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

18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic int handle_echo(include_ctx_t *ctx, apr_bucket_brigade **bb, request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_filter_t *f, apr_bucket *head_ptr, apr_bucket **inserted_head)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb const char *echo_text = NULL;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t e_len, e_wrt;

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim enum {E_NONE, E_URL, E_ENTITY} encode;

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim encode = E_ENTITY;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag != NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

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

18343797fadabacf01280b38ea7688690d12aec0rbb const char *val = apr_table_get(r->subprocess_env, tag_val);

18343797fadabacf01280b38ea7688690d12aec0rbb int b_copy = 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb if (val) {

18343797fadabacf01280b38ea7688690d12aec0rbb switch(encode) {

18343797fadabacf01280b38ea7688690d12aec0rbb case E_NONE: echo_text = val; b_copy = 1; break;

18343797fadabacf01280b38ea7688690d12aec0rbb case E_URL: echo_text = ap_escape_uri(r->pool, val); break;

18343797fadabacf01280b38ea7688690d12aec0rbb case E_ENTITY: echo_text = ap_escape_html(r->pool, val); break;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb e_len = strlen(echo_text);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_buck = apr_bucket_create_heap(echo_text, e_len, 1, &e_wrt);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_buck = apr_bucket_create_immortal("(none)", sizeof("none"));

18343797fadabacf01280b38ea7688690d12aec0rbb }

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);

18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

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

18343797fadabacf01280b38ea7688690d12aec0rbb if (!strcasecmp(tag_val, "none")) encode = E_NONE;

18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcasecmp(tag_val, "url")) encode = E_URL;

18343797fadabacf01280b38ea7688690d12aec0rbb else if (!strcasecmp(tag_val, "entity")) encode = E_ENTITY;

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

18343797fadabacf01280b38ea7688690d12aec0rbb "unknown value \"%s\" to parameter \"encoding\" of "

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

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

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

18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

3a9bc6532fbe8439fc748d8ffedb87415904d16ajim

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic int handle_config(include_ctx_t *ctx, apr_bucket_brigade **bb, request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_filter_t *f, apr_bucket *head_ptr, apr_bucket **inserted_head)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char parsed_string[MAX_STRING_LEN];

1ccd992d37d62c8cb2056126f2234f64ec189bfddougm apr_table_t *env = r->subprocess_env;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return 0; /* Reached the end of the string. */

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb return 1; /* tags must have values. */

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

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

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, ctx->error_str, MAX_STRING_LEN, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->error_length = strlen(ctx->error_str);

18343797fadabacf01280b38ea7688690d12aec0rbb }

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

18343797fadabacf01280b38ea7688690d12aec0rbb apr_time_t date = r->request_time;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, ctx->time_str, MAX_STRING_LEN, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb apr_table_setn(env, "DATE_LOCAL", ap_ht_time(r->pool, date, ctx->time_str, 0));

18343797fadabacf01280b38ea7688690d12aec0rbb apr_table_setn(env, "DATE_GMT", ap_ht_time(r->pool, date, ctx->time_str, 1));

18343797fadabacf01280b38ea7688690d12aec0rbb apr_table_setn(env, "LAST_MODIFIED",

18343797fadabacf01280b38ea7688690d12aec0rbb ap_ht_time(r->pool, r->finfo.mtime, ctx->time_str, 0));

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

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

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, parsed_string, sizeof(parsed_string), 0);

18343797fadabacf01280b38ea7688690d12aec0rbb decodehtml(parsed_string);

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

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags |= FLAG_SIZE_IN_BYTES;

18343797fadabacf01280b38ea7688690d12aec0rbb }

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

18343797fadabacf01280b38ea7688690d12aec0rbb ctx->flags &= FLAG_SIZE_ABBREV;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

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

18343797fadabacf01280b38ea7688690d12aec0rbb tag, r->filename);

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

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")) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* be safe; only files in this directory or below allowed */

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;

5ae78608d6554d6cb7a93a34e10a6b90374beee0trawick if ((rv = apr_stat(finfo, to_send, APR_FINFO_GPROT

5ae78608d6554d6cb7a93a34e10a6b90374beee0trawick | APR_FINFO_MIN, rr->pool)) != APR_SUCCESS

c9dafaafc2650994e47f88f5239f643c97ec4cb3wrowe && rv != APR_INCOMPLETE) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding error_fmt = "unable to get information about \"%s\" "

9274c5e05fbb6b9890099c0c20aa35d747d42be1stoddard "in parsed file %s";

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding error_fmt = "unable to lookup information about \"%s\" "

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s";

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (error_fmt) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ret = -1;

6f984345bbfa9342dde1f2b7b8c35b7987d078afwrowe ap_log_rerror(APLOG_MARK, APLOG_ERR | (rv ? 0 : APLOG_NOERRNO),

6f984345bbfa9342dde1f2b7b8c35b7987d078afwrowe rv, r, error_fmt, to_send, r->filename);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (rr) ap_destroy_sub_req(rr);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return ret;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else if (!strcmp(tag, "virtual")) {

85bea52867bd1a8c81080ba415b5cd5b771ce5f7gstein /* note: it is okay to pass NULL for the "next filter" since

18343797fadabacf01280b38ea7688690d12aec0rbb rr = ap_sub_req_lookup_uri(tag_val, r, NULL);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

f54da7877f9e092465df38bfda142f3e71dbb7aawrowe if (rr->status == HTTP_OK && rr->finfo.filetype != 0) {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding memcpy((char *) finfo, (const char *) &rr->finfo,

85482525adee8e37838e0a5fca66e740a7fb5c2estoddard sizeof(rr->finfo));

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_destroy_sub_req(rr);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "unable to get information about \"%s\" "

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding "in parsed file %s",

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding tag_val, r->filename);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_destroy_sub_req(rr);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

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

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb#define NEG_SIGN " -"

18343797fadabacf01280b38ea7688690d12aec0rbb#define ZERO_K " 0k"

18343797fadabacf01280b38ea7688690d12aec0rbb#define ONE_K " 1k"

18343797fadabacf01280b38ea7688690d12aec0rbb

23801cf373ddaff5a5ba7692d2637d75bdffdc4btrawickstatic void generate_size(apr_ssize_t size, char *buff, apr_size_t buff_size)

18343797fadabacf01280b38ea7688690d12aec0rbb{

18343797fadabacf01280b38ea7688690d12aec0rbb /* XXX: this -1 thing is a gross hack */

18343797fadabacf01280b38ea7688690d12aec0rbb if (size == (apr_ssize_t)-1) {

18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (buff, NEG_SIGN, sizeof(NEG_SIGN)+1);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (!size) {

18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (buff, ZERO_K, sizeof(ZERO_K)+1);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (size < 1024) {

18343797fadabacf01280b38ea7688690d12aec0rbb memcpy (buff, ONE_K, sizeof(ONE_K)+1);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (size < 1048576) {

18343797fadabacf01280b38ea7688690d12aec0rbb apr_snprintf(buff, buff_size, "%4" APR_SSIZE_T_FMT "k", (size + 512) / 1024);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else if (size < 103809024) {

18343797fadabacf01280b38ea7688690d12aec0rbb apr_snprintf(buff, buff_size, "%4.1fM", size / 1048576.0);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb apr_snprintf(buff, buff_size, "%4" APR_SSIZE_T_FMT "M", (size + 524288) / 1048576);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic int handle_fsize(include_ctx_t *ctx, apr_bucket_brigade **bb, request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_filter_t *f, apr_bucket *head_ptr, apr_bucket **inserted_head)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb apr_finfo_t finfo;

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t s_len, s_wrt;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char parsed_string[MAX_STRING_LEN];

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding else {

18343797fadabacf01280b38ea7688690d12aec0rbb return 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, parsed_string, sizeof(parsed_string), 0);

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

18343797fadabacf01280b38ea7688690d12aec0rbb char buff[50];

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb if (!(ctx->flags & FLAG_SIZE_IN_BYTES)) {

18343797fadabacf01280b38ea7688690d12aec0rbb generate_size(finfo.size, buff, sizeof(buff));

18343797fadabacf01280b38ea7688690d12aec0rbb s_len = strlen (buff);

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb int l, x, pos = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb char tmp_buff[50];

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb apr_snprintf(tmp_buff, sizeof(tmp_buff), "%" 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

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_buck = apr_bucket_create_heap(buff, s_len, 1, &s_wrt);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);

18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

b980ad7fdc218b4855cde9f75a747527f50c554dwrowestatic int handle_flastmod(include_ctx_t *ctx, apr_bucket_brigade **bb, request_rec *r,

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe ap_filter_t *f, apr_bucket *head_ptr, apr_bucket **inserted_head)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb char *tag_val = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb apr_finfo_t finfo;

cd36eaa1f276d94ef45e8665cc701ac1d5fc5ba3trawick apr_size_t t_len, t_wrt;

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe apr_bucket *tmp_buck;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char parsed_string[MAX_STRING_LEN];

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = NULL;

18343797fadabacf01280b38ea7688690d12aec0rbb if (ctx->flags & FLAG_PRINTING) {

18343797fadabacf01280b38ea7688690d12aec0rbb while (1) {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_get_tag_and_value(ctx, &tag, &tag_val, 1);

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag_val == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (tag == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb return 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

445997e06464e7625c7f0e22917f8f2d9876cfffrbb ap_ssi_parse_string(r, tag_val, parsed_string, sizeof(parsed_string), 0);

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

18343797fadabacf01280b38ea7688690d12aec0rbb char *t_val;

18343797fadabacf01280b38ea7688690d12aec0rbb

18343797fadabacf01280b38ea7688690d12aec0rbb t_val = ap_ht_time(r->pool, finfo.mtime, ctx->time_str, 0);

18343797fadabacf01280b38ea7688690d12aec0rbb t_len = strlen(t_val);

18343797fadabacf01280b38ea7688690d12aec0rbb

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe tmp_buck = apr_bucket_create_heap(t_val, t_len, 1, &t_wrt);

b980ad7fdc218b4855cde9f75a747527f50c554dwrowe APR_BUCKET_INSERT_BEFORE(head_ptr, tmp_buck);

18343797fadabacf01280b38ea7688690d12aec0rbb if (*inserted_head == NULL) {

18343797fadabacf01280b38ea7688690d12aec0rbb *inserted_head = tmp_buck;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb CREATE_ERROR_BUCKET(ctx, tmp_buck, head_ptr, *inserted_head);

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb return 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingstatic int re_check(request_rec *r, char *string, char *rexp)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding regex_t *compiled;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int regex_error;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding compiled = ap_pregcomp(r->pool, rexp, REG_EXTENDED | REG_NOSUB);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (compiled == NULL) {

b79b743d4cff02d6a830bb7118826a2fd608742amartin ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return -1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding regex_error = ap_regexec(compiled, string, 0, (regmatch_t *) NULL, 0);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding ap_pregfree(r->pool, compiled);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding return (!regex_error);

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding}

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefieldingenum token_type {

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token_string,

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;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char value[MAX_STRING_LEN];

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding};

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

18343797fadabacf01280b38ea7688690d12aec0rbbstatic const char *get_ptoken(request_rec *r, const char *string, struct token *token,

18343797fadabacf01280b38ea7688690d12aec0rbb int *unmatched)

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding{

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding char ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int next = 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding int qs = 0;

18343797fadabacf01280b38ea7688690d12aec0rbb int tkn_fnd = 0;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

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 '\'':

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_string;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding qs = 1;

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:

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding token->type = token_string;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding break;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /* We should only be here if we are in a string */

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding if (!qs) {

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

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /*

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding /*

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

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

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

18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb token->value[next++] = ch;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb if (!qs) {

18343797fadabacf01280b38ea7688690d12aec0rbb if (apr_isspace(ch)) {

18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb switch (ch) {

18343797fadabacf01280b38ea7688690d12aec0rbb case '(':

18343797fadabacf01280b38ea7688690d12aec0rbb case ')':

18343797fadabacf01280b38ea7688690d12aec0rbb case '=':

18343797fadabacf01280b38ea7688690d12aec0rbb case '!':

18343797fadabacf01280b38ea7688690d12aec0rbb case '<':

18343797fadabacf01280b38ea7688690d12aec0rbb case '>':

18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb case '|':

18343797fadabacf01280b38ea7688690d12aec0rbb if (*(string + 1) == '|') {

18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb case '&':

18343797fadabacf01280b38ea7688690d12aec0rbb if (*(string + 1) == '&') {

18343797fadabacf01280b38ea7688690d12aec0rbb tkn_fnd = 1;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb break;

18343797fadabacf01280b38ea7688690d12aec0rbb }

18343797fadabacf01280b38ea7688690d12aec0rbb if (!tkn_fnd) {

18343797fadabacf01280b38ea7688690d12aec0rbb token->value[next++] = ch;

18343797fadabacf01280b38ea7688690d12aec0rbb }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

0f081398cf0eef8cc7c66a535d450110a92dc8aefielding }

18343797fadabacf01280b38ea7688690d12aec0rbb else {

18343797fadabacf01280b38ea7688690d12aec0rbb if (ch == '\'') {