rubbos/app/httpd-2.0.64/modules/http/http_request.c

   1 /* Licensed to the Apache Software Foundation (ASF) under one or more
   2  * contributor license agreements.  See the NOTICE file distributed with
   3  * this work for additional information regarding copyright ownership.
   4  * The ASF licenses this file to You under the Apache License, Version 2.0
   5  * (the "License"); you may not use this file except in compliance with
   6  * the License.  You may obtain a copy of the License at
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 /*
  18  * http_request.c: functions to get and process requests
  19  *
  20  * Rob McCool 3/21/93
  21  *
  22  * Thoroughly revamped by rst for Apache.  NB this file reads
  23  * best from the bottom up.
  24  *
  25  */
  26
  27 #include "apr_strings.h"
  28 #include "apr_file_io.h"
  29 #include "apr_fnmatch.h"
  30
  31 #define APR_WANT_STRFUNC
  32 #include "apr_want.h"
  33
  34 #define CORE_PRIVATE
  35 #include "ap_config.h"
  36 #include "httpd.h"
  37 #include "http_config.h"
  38 #include "http_request.h"
  39 #include "http_core.h"
  40 #include "http_protocol.h"
  41 #include "http_log.h"
  42 #include "http_main.h"
  43 #include "util_filter.h"
  44 #include "util_charset.h"
  45
  46 #include "mod_core.h"
  47 #include "scoreboard.h"
  48
  49 #if APR_HAVE_STDARG_H
  50 #include <stdarg.h>
  51 #endif
  52
  53 /*****************************************************************
  54  *
  55  * Mainline request processing...
  56  */
  57
  58 /* XXX A cleaner and faster way to do this might be to pass the request_rec
  59  * down the filter chain as a parameter.  It would need to change for
  60  * subrequest vs. main request filters; perhaps the subrequest filter could
  61  * make the switch.
  62  */
  63 static void update_r_in_filters(ap_filter_t *f,
  64                                 request_rec *from,
  65                                 request_rec *to)
  66 {
  67     while (f) {
  68         if (f->r == from) {
  69             f->r = to;
  70         }
  71         f = f->next;
  72     }
  73 }
  74
  75 AP_DECLARE(void) ap_die(int type, request_rec *r)
  76 {
  77     int error_index = ap_index_of_response(type);
  78     char *custom_response = ap_response_code_string(r, error_index);
  79     int recursive_error = 0;
  80     request_rec *r_1st_err = r;
  81
  82     if (type == AP_FILTER_ERROR) {
  83         return;
  84     }
  85
  86     if (type == DONE) {
  87         ap_finalize_request_protocol(r);
  88         return;
  89     }
  90
  91     /*
  92      * The following takes care of Apache redirects to custom response URLs
  93      * Note that if we are already dealing with the response to some other
  94      * error condition, we just report on the original error, and give up on
  95      * any attempt to handle the other thing "intelligently"...
  96      */
  97     if (r->status != HTTP_OK) {
  98         recursive_error = type;
  99
 100         while (r_1st_err->prev && (r_1st_err->prev->status != HTTP_OK))
 101             r_1st_err = r_1st_err->prev;  /* Get back to original error */
 102
 103         if (r_1st_err != r) {
 104             /* The recursive error was caused by an ErrorDocument specifying
 105              * an internal redirect to a bad URI.  ap_internal_redirect has
 106              * changed the filter chains to point to the ErrorDocument's
 107              * request_rec.  Back out those changes so we can safely use the
 108              * original failing request_rec to send the canned error message.
 109              *
 110              * ap_send_error_response gets rid of existing resource filters
 111              * on the output side, so we can skip those.
 112              */
 113             update_r_in_filters(r_1st_err->proto_output_filters, r, r_1st_err);
 114             update_r_in_filters(r_1st_err->input_filters, r, r_1st_err);
 115         }
 116
 117         custom_response = NULL; /* Do NOT retry the custom thing! */
 118     }
 119
 120     r->status = type;
 121
 122     /*
 123      * This test is done here so that none of the auth modules needs to know
 124      * about proxy authentication.  They treat it like normal auth, and then
 125      * we tweak the status.
 126      */
 127     if (HTTP_UNAUTHORIZED == r->status && PROXYREQ_PROXY == r->proxyreq) {
 128         r->status = HTTP_PROXY_AUTHENTICATION_REQUIRED;
 129     }
 130
 131     /* If we don't want to keep the connection, make sure we mark that the
 132      * connection is not eligible for keepalive.  If we want to keep the
 133      * connection, be sure that the request body (if any) has been read.
 134      */
 135     if (ap_status_drops_connection(r->status)) {
 136         r->connection->keepalive = AP_CONN_CLOSE;
 137     }
 138
 139     /*
 140      * Two types of custom redirects --- plain text, and URLs. Plain text has
 141      * a leading '"', so the URL code, here, is triggered on its absence
 142      */
 143
 144     if (custom_response && custom_response[0] != '"') {
 145
 146         if (ap_is_url(custom_response)) {
 147             /*
 148              * The URL isn't local, so lets drop through the rest of this
 149              * apache code, and continue with the usual REDIRECT handler.
 150              * But note that the client will ultimately see the wrong
 151              * status...
 152              */
 153             r->status = HTTP_MOVED_TEMPORARILY;
 154             apr_table_setn(r->headers_out, "Location", custom_response);
 155         }
 156         else if (custom_response[0] == '/') {
 157             const char *error_notes;
 158             r->no_local_copy = 1;       /* Do NOT send HTTP_NOT_MODIFIED for
 159                                          * error documents! */
 160             /*
 161              * This redirect needs to be a GET no matter what the original
 162              * method was.
 163              */
 164             apr_table_setn(r->subprocess_env, "REQUEST_METHOD", r->method);
 165
 166             /*
 167              * Provide a special method for modules to communicate
 168              * more informative (than the plain canned) messages to us.
 169              * Propagate them to ErrorDocuments via the ERROR_NOTES variable:
 170              */
 171             if ((error_notes = apr_table_get(r->notes,
 172                                              "error-notes")) != NULL) {
 173                 apr_table_setn(r->subprocess_env, "ERROR_NOTES", error_notes);
 174             }
 175             r->method = apr_pstrdup(r->pool, "GET");
 176             r->method_number = M_GET;
 177             ap_internal_redirect(custom_response, r);
 178             return;
 179         }
 180         else {
 181             /*
 182              * Dumb user has given us a bad url to redirect to --- fake up
 183              * dying with a recursive server error...
 184              */
 185             recursive_error = HTTP_INTERNAL_SERVER_ERROR;
 186             ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,
 187                         "Invalid error redirection directive: %s",
 188                         custom_response);
 189         }
 190     }
 191     ap_send_error_response(r_1st_err, recursive_error);
 192 }
 193
 194 static void check_pipeline_flush(request_rec *r)
 195 {
 196     conn_rec *c = r->connection;
 197     /* ### if would be nice if we could PEEK without a brigade. that would
 198        ### allow us to defer creation of the brigade to when we actually
 199        ### need to send a FLUSH. */
 200     apr_bucket_brigade *bb = apr_brigade_create(r->pool, c->bucket_alloc);
 201
 202     /* Flush the filter contents if:
 203      *
 204      *   1) the connection will be closed
 205      *   2) there isn't a request ready to be read
 206      */
 207     /* ### shouldn't this read from the connection input filters? */
 208     /* ### is zero correct? that means "read one line" */
 209     if (r->connection->keepalive == AP_CONN_CLOSE ||
 210         ap_get_brigade(r->input_filters, bb, AP_MODE_EATCRLF,
 211                        APR_NONBLOCK_READ, 0) != APR_SUCCESS) {
 212         apr_bucket *e = apr_bucket_flush_create(c->bucket_alloc);
 213
 214         /* We just send directly to the connection based filters.  At
 215          * this point, we know that we have seen all of the data
 216          * (request finalization sent an EOS bucket, which empties all
 217          * of the request filters). We just want to flush the buckets
 218          * if something hasn't been sent to the network yet.
 219          */
 220         APR_BRIGADE_INSERT_HEAD(bb, e);
 221         ap_pass_brigade(r->connection->output_filters, bb);
 222     }
 223 }
 224
 225 void ap_process_request(request_rec *r)
 226 {
 227     int access_status;
 228
 229     /* Give quick handlers a shot at serving the request on the fast
 230      * path, bypassing all of the other Apache hooks.
 231      *
 232      * This hook was added to enable serving files out of a URI keyed
 233      * content cache ( e.g., Mike Abbott's Quick Shortcut Cache,
 234      * described here: http://oss.sgi.com/projects/apache/mod_qsc.html )
 235      *
 236      * It may have other uses as well, such as routing requests directly to
 237      * content handlers that have the ability to grok HTTP and do their
 238      * own access checking, etc (e.g. servlet engines).
 239      *
 240      * Use this hook with extreme care and only if you know what you are
 241      * doing.
 242      */
 243     if (ap_extended_status)
 244         ap_time_process_request(r->connection->sbh, START_PREQUEST);
 245     access_status = ap_run_quick_handler(r, 0);  /* Not a look-up request */
 246     if (access_status == DECLINED) {
 247         access_status = ap_process_request_internal(r);
 248         if (access_status == OK) {
 249             access_status = ap_invoke_handler(r);
 250         }
 251     }
 252
 253     if (access_status == DONE) {
 254         /* e.g., something not in storage like TRACE */
 255         access_status = OK;
 256     }
 257
 258     if (access_status == OK) {
 259         ap_finalize_request_protocol(r);
 260     }
 261     else {
 262         r->status = HTTP_OK;
 263         ap_die(access_status, r);
 264     }
 265
 266     /*
 267      * We want to flush the last packet if this isn't a pipelining connection
 268      * *before* we start into logging.  Suppose that the logging causes a DNS
 269      * lookup to occur, which may have a high latency.  If we hold off on
 270      * this packet, then it'll appear like the link is stalled when really
 271      * it's the application that's stalled.
 272      */
 273     check_pipeline_flush(r);
 274     ap_update_child_status(r->connection->sbh, SERVER_BUSY_LOG, r);
 275     ap_run_log_transaction(r);
 276     if (ap_extended_status)
 277         ap_time_process_request(r->connection->sbh, STOP_PREQUEST);
 278 }
 279
 280 static apr_table_t *rename_original_env(apr_pool_t *p, apr_table_t *t)
 281 {
 282     const apr_array_header_t *env_arr = apr_table_elts(t);
 283     const apr_table_entry_t *elts = (const apr_table_entry_t *) env_arr->elts;
 284     apr_table_t *new = apr_table_make(p, env_arr->nalloc);
 285     int i;
 286
 287     for (i = 0; i < env_arr->nelts; ++i) {
 288         if (!elts[i].key)
 289             continue;
 290         apr_table_setn(new, apr_pstrcat(p, "REDIRECT_", elts[i].key, NULL),
 291                   elts[i].val);
 292     }
 293
 294     return new;
 295 }
 296
 297 static request_rec *internal_internal_redirect(const char *new_uri,
 298                                                request_rec *r) {
 299     int access_status;
 300     request_rec *new;
 301
 302     if (ap_is_recursion_limit_exceeded(r)) {
 303         ap_die(HTTP_INTERNAL_SERVER_ERROR, r);
 304         return NULL;
 305     }
 306
 307     new = (request_rec *) apr_pcalloc(r->pool, sizeof(request_rec));
 308
 309     new->connection = r->connection;
 310     new->server     = r->server;
 311     new->pool       = r->pool;
 312
 313     /*
 314      * A whole lot of this really ought to be shared with http_protocol.c...
 315      * another missing cleanup.  It's particularly inappropriate to be
 316      * setting header_only, etc., here.
 317      */
 318
 319     new->method          = r->method;
 320     new->method_number   = r->method_number;
 321     new->allowed_methods = ap_make_method_list(new->pool, 2);
 322     ap_parse_uri(new, new_uri);
 323
 324     new->request_config = ap_create_request_config(r->pool);
 325
 326     new->per_dir_config = r->server->lookup_defaults;
 327
 328     new->prev = r;
 329     r->next   = new;
 330
 331     /* Must have prev and next pointers set before calling create_request
 332      * hook.
 333      */
 334     ap_run_create_request(new);
 335
 336     /* Inherit the rest of the protocol info... */
 337
 338     new->the_request = r->the_request;
 339
 340     new->allowed         = r->allowed;
 341
 342     new->status          = r->status;
 343     new->assbackwards    = r->assbackwards;
 344     new->header_only     = r->header_only;
 345     new->protocol        = r->protocol;
 346     new->proto_num       = r->proto_num;
 347     new->hostname        = r->hostname;
 348     new->request_time    = r->request_time;
 349     new->main            = r->main;
 350
 351     new->headers_in      = r->headers_in;
 352     new->headers_out     = apr_table_make(r->pool, 12);
 353     new->err_headers_out = r->err_headers_out;
 354     new->subprocess_env  = rename_original_env(r->pool, r->subprocess_env);
 355     new->notes           = apr_table_make(r->pool, 5);
 356     new->allowed_methods = ap_make_method_list(new->pool, 2);
 357
 358     new->htaccess        = r->htaccess;
 359     new->no_cache        = r->no_cache;
 360     new->expecting_100   = r->expecting_100;
 361     new->no_local_copy   = r->no_local_copy;
 362     new->read_length     = r->read_length;     /* We can only read it once */
 363     new->vlist_validator = r->vlist_validator;
 364
 365     new->proto_output_filters  = r->proto_output_filters;
 366     new->proto_input_filters   = r->proto_input_filters;
 367
 368     new->output_filters  = new->proto_output_filters;
 369     new->input_filters   = new->proto_input_filters;
 370
 371     if (new->main) {
 372         /* Add back the subrequest filter, which we lost when
 373          * we set output_filters to include only the protocol
 374          * output filters from the original request.
 375          */
 376         ap_add_output_filter_handle(ap_subreq_core_filter_handle,
 377                                     NULL, new, new->connection);
 378     }
 379
 380     update_r_in_filters(new->input_filters, r, new);
 381     update_r_in_filters(new->output_filters, r, new);
 382
 383     apr_table_setn(new->subprocess_env, "REDIRECT_STATUS",
 384                    apr_itoa(r->pool, r->status));
 385
 386     /*
 387      * XXX: hmm.  This is because mod_setenvif and mod_unique_id really need
 388      * to do their thing on internal redirects as well.  Perhaps this is a
 389      * misnamed function.
 390      */
 391     if ((access_status = ap_run_post_read_request(new))) {
 392         ap_die(access_status, new);
 393         return NULL;
 394     }
 395
 396     return new;
 397 }
 398
 399 /* XXX: Is this function is so bogus and fragile that we deep-6 it? */
 400 AP_DECLARE(void) ap_internal_fast_redirect(request_rec *rr, request_rec *r)
 401 {
 402     /* We need to tell POOL_DEBUG that we're guaranteeing that rr->pool
 403      * will exist as long as r->pool.  Otherwise we run into troubles because
 404      * some values in this request will be allocated in r->pool, and others in
 405      * rr->pool.
 406      */
 407     apr_pool_join(r->pool, rr->pool);
 408     r->proxyreq = rr->proxyreq;
 409     r->no_cache = (r->no_cache && rr->no_cache);
 410     r->no_local_copy = (r->no_local_copy && rr->no_local_copy);
 411     r->mtime = rr->mtime;
 412     r->uri = rr->uri;
 413     r->filename = rr->filename;
 414     r->canonical_filename = rr->canonical_filename;
 415     r->path_info = rr->path_info;
 416     r->args = rr->args;
 417     r->finfo = rr->finfo;
 418     r->handler = rr->handler;
 419     ap_set_content_type(r, rr->content_type);
 420     r->content_encoding = rr->content_encoding;
 421     r->content_languages = rr->content_languages;
 422     r->per_dir_config = rr->per_dir_config;
 423     /* copy output headers from subrequest, but leave negotiation headers */
 424     r->notes = apr_table_overlay(r->pool, rr->notes, r->notes);
 425     r->headers_out = apr_table_overlay(r->pool, rr->headers_out,
 426                                        r->headers_out);
 427     r->err_headers_out = apr_table_overlay(r->pool, rr->err_headers_out,
 428                                            r->err_headers_out);
 429     r->subprocess_env = apr_table_overlay(r->pool, rr->subprocess_env,
 430                                           r->subprocess_env);
 431
 432     r->output_filters = rr->output_filters;
 433     r->input_filters = rr->input_filters;
 434
 435     if (r->main) {
 436         ap_add_output_filter_handle(ap_subreq_core_filter_handle,
 437                                     NULL, r, r->connection);
 438     }
 439     else if (r->output_filters->frec == ap_subreq_core_filter_handle) {
 440         ap_remove_output_filter(r->output_filters);
 441         r->output_filters = r->output_filters->next;
 442     }
 443
 444     /* If any filters pointed at the now-defunct rr, we must point them
 445      * at our "new" instance of r.  In particular, some of rr's structures
 446      * will now be bogus (say rr->headers_out).  If a filter tried to modify
 447      * their f->r structure when it is pointing to rr, the real request_rec
 448      * will not get updated.  Fix that here.
 449      */
 450     update_r_in_filters(r->input_filters, rr, r);
 451     update_r_in_filters(r->output_filters, rr, r);
 452 }
 453
 454 AP_DECLARE(void) ap_internal_redirect(const char *new_uri, request_rec *r)
 455 {
 456     request_rec *new = internal_internal_redirect(new_uri, r);
 457     int access_status;
 458
 459     /* ap_die was already called, if an error occured */
 460     if (!new) {
 461         return;
 462     }
 463
 464     access_status = ap_process_request_internal(new);
 465     if (access_status == OK) {
 466         if ((access_status = ap_invoke_handler(new)) != 0) {
 467             ap_die(access_status, new);
 468             return;
 469         }
 470         ap_finalize_request_protocol(new);
 471     }
 472     else {
 473         ap_die(access_status, new);
 474     }
 475 }
 476
 477 /* This function is designed for things like actions or CGI scripts, when
 478  * using AddHandler, and you want to preserve the content type across
 479  * an internal redirect.
 480  */
 481 AP_DECLARE(void) ap_internal_redirect_handler(const char *new_uri, request_rec *r)
 482 {
 483     int access_status;
 484     request_rec *new = internal_internal_redirect(new_uri, r);
 485
 486     /* ap_die was already called, if an error occured */
 487     if (!new) {
 488         return;
 489     }
 490
 491     if (r->handler)
 492         ap_set_content_type(new, r->content_type);
 493     access_status = ap_process_request_internal(new);
 494     if (access_status == OK) {
 495         if ((access_status = ap_invoke_handler(new)) != 0) {
 496             ap_die(access_status, new);
 497             return;
 498         }
 499         ap_finalize_request_protocol(new);
 500     }
 501     else {
 502         ap_die(access_status, new);
 503     }
 504 }
 505
 506 AP_DECLARE(void) ap_allow_methods(request_rec *r, int reset, ...)
 507 {
 508     const char *method;
 509     va_list methods;
 510
 511     /*
 512      * Get rid of any current settings if requested; not just the
 513      * well-known methods but any extensions as well.
 514      */
 515     if (reset) {
 516         ap_clear_method_list(r->allowed_methods);
 517     }
 518
 519     va_start(methods, reset);
 520     while ((method = va_arg(methods, const char *)) != NULL) {
 521         ap_method_list_add(r->allowed_methods, method);
 522     }
 523     va_end(methods);
 524 }
 525
 526 AP_DECLARE(void) ap_allow_standard_methods(request_rec *r, int reset, ...)
 527 {
 528     int method;
 529     va_list methods;
 530     apr_int64_t mask;
 531
 532     /*
 533      * Get rid of any current settings if requested; not just the
 534      * well-known methods but any extensions as well.
 535      */
 536     if (reset) {
 537         ap_clear_method_list(r->allowed_methods);
 538     }
 539
 540     mask = 0;
 541     va_start(methods, reset);
 542     while ((method = va_arg(methods, int)) != -1) {
 543         mask |= (AP_METHOD_BIT << method);
 544     }
 545     va_end(methods);
 546
 547     r->allowed_methods->method_mask |= mask;
 548 }