summaryrefslogtreecommitdiff
path: root/usr.sbin
diff options
context:
space:
mode:
authorMarc Balmer <mbalmer@cvs.openbsd.org>2008-05-14 09:25:39 +0000
committerMarc Balmer <mbalmer@cvs.openbsd.org>2008-05-14 09:25:39 +0000
commit1b20ef6303c4e611e2f121a3a7bad68f19cd5a46 (patch)
treec5978849e2ac1c0ba249b9ddbe78584acc52419e /usr.sbin
parentfe81372a2d30924e3809af4e1a384a13ef38d7e5 (diff)
More KNF/readability changes.
no binary changes.
Diffstat (limited to 'usr.sbin')
-rw-r--r--usr.sbin/httpd/src/main/http_log.c6
-rw-r--r--usr.sbin/httpd/src/main/http_request.c2247
2 files changed, 1137 insertions, 1116 deletions
diff --git a/usr.sbin/httpd/src/main/http_log.c b/usr.sbin/httpd/src/main/http_log.c
index 8a4a45469a9..1230d2175d2 100644
--- a/usr.sbin/httpd/src/main/http_log.c
+++ b/usr.sbin/httpd/src/main/http_log.c
@@ -1,4 +1,4 @@
-/* $OpenBSD: http_log.c,v 1.18 2008/05/14 08:42:20 mbalmer Exp $ */
+/* $OpenBSD: http_log.c,v 1.19 2008/05/14 09:25:38 mbalmer Exp $ */
/* ====================================================================
* The Apache Software License, Version 1.1
@@ -20,8 +20,8 @@
*
* 3. The end-user documentation included with the redistribution,
* if any, must include the following acknowledgment:
- * "This product includes software developed by the
- * Apache Software Foundation (http://www.apache.org/)."
+ * "This product includes software developed by the
+ * Apache Software Foundation (http://www.apache.org/)."
* Alternately, this acknowledgment may appear in the software itself,
* if and wherever such third-party acknowledgments normally appear.
*
diff --git a/usr.sbin/httpd/src/main/http_request.c b/usr.sbin/httpd/src/main/http_request.c
index 6d159205213..07f7c98e28b 100644
--- a/usr.sbin/httpd/src/main/http_request.c
+++ b/usr.sbin/httpd/src/main/http_request.c
@@ -1,3 +1,5 @@
+/* $OpenBSD: http_request.c,v 1.16 2008/05/14 09:25:38 mbalmer Exp $ */
+
/* ====================================================================
* The Apache Software License, Version 1.1
*
@@ -72,7 +74,7 @@
#include "http_request.h"
#include "http_core.h"
#include "http_protocol.h"
-#include "http_conf_globals.h" /* for ap_extended_status */
+#include "http_conf_globals.h" /* for ap_extended_status */
#include "http_log.h"
#include "http_main.h"
#include "scoreboard.h"
@@ -97,542 +99,537 @@
* We don't want people able to serve up pipes, or unix sockets, or other
* scary things. Note that symlink tests are performed later.
*/
-static int check_safe_file(request_rec *r)
+static int
+check_safe_file(request_rec *r)
{
- if (r->finfo.st_mode == 0 /* doesn't exist */
- || S_ISDIR(r->finfo.st_mode)
- || S_ISREG(r->finfo.st_mode)
- || S_ISLNK(r->finfo.st_mode)) {
- return OK;
- }
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
- "object is not a file, directory or symlink: %s",
- r->filename);
- return HTTP_FORBIDDEN;
+ if (r->finfo.st_mode == 0 /* doesn't exist */
+ || S_ISDIR(r->finfo.st_mode)
+ || S_ISREG(r->finfo.st_mode)
+ || S_ISLNK(r->finfo.st_mode))
+ return OK;
+
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
+ "object is not a file, directory or symlink: %s", r->filename);
+ return HTTP_FORBIDDEN;
}
-static int check_symlinks(char *d, int opts)
+static int
+check_symlinks(char *d, int opts)
{
- struct stat lfi, fi;
- char *lastp;
- int res;
-
- if (opts & OPT_SYM_LINKS)
- return OK;
+ struct stat lfi, fi;
+ char *lastp;
+ int res;
- /*
- * Strip trailing '/', if any, off what we're checking; trailing slashes
- * make some systems follow symlinks to directories even in lstat().
- * After we've done the lstat, put it back. Also, don't bother checking
- * '/' at all...
- *
- * Note that we don't have to worry about multiple slashes here because of
- * no2slash() below...
- */
+ if (opts & OPT_SYM_LINKS)
+ return OK;
- lastp = d + strlen(d) - 1;
- if (lastp == d)
- return OK; /* Root directory, '/' */
+ /*
+ * Strip trailing '/', if any, off what we're checking; trailing
+ * slashes make some systems follow symlinks to directories even in
+ * lstat(). After we've done the lstat, put it back. Also, don't
+ * bother checking '/' at all...
+ *
+ * Note that we don't have to worry about multiple slashes here
+ * because of no2slash() below...
+ */
- if (*lastp == '/')
- *lastp = '\0';
- else
- lastp = NULL;
+ lastp = d + strlen(d) - 1;
+ if (lastp == d)
+ return OK; /* Root directory, '/' */
- res = lstat(d, &lfi);
+ if (*lastp == '/')
+ *lastp = '\0';
+ else
+ lastp = NULL;
- if (lastp)
- *lastp = '/';
+ res = lstat(d, &lfi);
- /*
- * Note that we don't reject accesses to nonexistent files (multiviews or
- * the like may cons up a way to run the transaction anyway)...
- */
+ if (lastp)
+ *lastp = '/';
- if (!(res >= 0) || !S_ISLNK(lfi.st_mode))
- return OK;
+ /*
+ * Note that we don't reject accesses to nonexistent files (multiviews
+ * or the like may cons up a way to run the transaction anyway)...
+ */
- /* OK, it's a symlink. May still be OK with OPT_SYM_OWNER */
+ if (!(res >= 0) || !S_ISLNK(lfi.st_mode))
+ return OK;
- if (!(opts & OPT_SYM_OWNER))
- return HTTP_FORBIDDEN;
+ /* OK, it's a symlink. May still be OK with OPT_SYM_OWNER */
+ if (!(opts & OPT_SYM_OWNER))
+ return HTTP_FORBIDDEN;
- if (stat(d, &fi) < 0)
- return HTTP_FORBIDDEN;
+ if (stat(d, &fi) < 0)
+ return HTTP_FORBIDDEN;
- return (fi.st_uid == lfi.st_uid) ? OK : HTTP_FORBIDDEN;
+ return (fi.st_uid == lfi.st_uid) ? OK : HTTP_FORBIDDEN;
}
-/* Dealing with the file system to get PATH_INFO
- */
-static int get_path_info(request_rec *r)
+/* Dealing with the file system to get PATH_INFO */
+static int
+get_path_info(request_rec *r)
{
- char *cp;
- char *path = r->filename;
- char *end = &path[strlen(path)];
- char *last_cp = NULL;
- int rv;
-
- if (r->finfo.st_mode) {
- /* assume path_info already set */
- return OK;
- }
-
-
- /* Advance over trailing slashes ... NOT part of filename
- * if file is not a UNC name (Win32 only).
- */
- for (cp = end; cp > path && cp[-1] == '/'; --cp)
- continue;
-
- while (cp > path) {
-
- /* See if the pathname ending here exists... */
-
- *cp = '\0';
-
- /* We must not stat() filenames that may cause os-specific system
- * problems, such as "/file/aux" on DOS-abused filesystems.
- * So pretend that they do not exist by returning an ENOENT error.
- * This will force us to drop that part of the path and keep
- * looking back for a "real" file that exists, while still allowing
- * the "invalid" path parts within the PATH_INFO.
- */
- if (!ap_os_is_filename_valid(path)) {
- errno = ENOENT;
- rv = -1;
- }
- else {
- errno = 0;
- rv = stat(path, &r->finfo);
- }
-
- if (cp != end)
- *cp = '/';
-
- if (!rv) {
-
- /*
- * Aha! Found something. If it was a directory, we will search
- * contents of that directory for a multi_match, so the PATH_INFO
- * argument starts with the component after that.
- */
-
- if (S_ISDIR(r->finfo.st_mode) && last_cp) {
- r->finfo.st_mode = 0; /* No such file... */
- cp = last_cp;
- }
-
- r->path_info = ap_pstrdup(r->pool, cp);
- *cp = '\0';
- return OK;
- }
- /* must set this to zero, some stat()s may have corrupted it
- * even if they returned an error.
+ char *cp;
+ char *path = r->filename;
+ char *end = &path[strlen(path)];
+ char *last_cp = NULL;
+ int rv;
+
+ if (r->finfo.st_mode)
+ /* assume path_info already set */
+ return OK;
+
+ /* Advance over trailing slashes ... NOT part of filename
+ * if file is not a UNC name (Win32 only).
*/
- r->finfo.st_mode = 0;
- if (errno == ENOENT || errno == ENOTDIR) {
- last_cp = cp;
-
- while (--cp > path && *cp != '/')
- continue;
-
- while (cp > path && cp[-1] == '/')
- --cp;
- }
- else {
- if (errno == EACCES)
- ap_log_rerror(APLOG_MARK, APLOG_ERR, r,
- "access to %s failed because search "
- "permissions are missing on a component "
- "of the path", r->uri);
- else
- ap_log_rerror(APLOG_MARK, APLOG_ERR, r,
- "access to %s failed", r->uri);
- return HTTP_FORBIDDEN;
- }
- }
- return OK;
+ for (cp = end; cp > path && cp[-1] == '/'; --cp)
+ continue;
+
+ while (cp > path) {
+
+ /* See if the pathname ending here exists... */
+
+ *cp = '\0';
+
+ /* We must not stat() filenames that may cause os-specific
+ * system problems, such as "/file/aux" on DOS-abused
+ * filesystems. So pretend that they do not exist by returning
+ * an ENOENT error. This will force us to drop that part of
+ * the path and keep looking back for a "real" file that
+ * exists, while still allowing the "invalid" path parts within
+ * the PATH_INFO.
+ */
+ if (!ap_os_is_filename_valid(path)) {
+ errno = ENOENT;
+ rv = -1;
+ } else {
+ errno = 0;
+ rv = stat(path, &r->finfo);
+ }
+
+ if (cp != end)
+ *cp = '/';
+
+ if (!rv) {
+
+ /*
+ * Aha! Found something. If it was a
+ * directory, we will search contents of
+ * that directory for a multi_match, so the
+ * PATH_INFO argument starts with the
+ * component after that.
+ */
+ if (S_ISDIR(r->finfo.st_mode) && last_cp) {
+ r->finfo.st_mode = 0; /* No such file... */
+ cp = last_cp;
+ }
+
+ r->path_info = ap_pstrdup(r->pool, cp);
+ *cp = '\0';
+ return OK;
+ }
+ /* must set this to zero, some stat()s may have corrupted it
+ * even if they returned an error.
+ */
+ r->finfo.st_mode = 0;
+ if (errno == ENOENT || errno == ENOTDIR) {
+ last_cp = cp;
+
+ while (--cp > path && *cp != '/')
+ continue;
+
+ while (cp > path && cp[-1] == '/')
+ --cp;
+ } else {
+ if (errno == EACCES)
+ ap_log_rerror(APLOG_MARK, APLOG_ERR, r,
+ "access to %s failed because search "
+ "permissions are missing on a component "
+ "of the path", r->uri);
+ else
+ ap_log_rerror(APLOG_MARK, APLOG_ERR, r,
+ "access to %s failed", r->uri);
+ return HTTP_FORBIDDEN;
+ }
+ }
+ return OK;
}
-static int directory_walk(request_rec *r)
+static int
+directory_walk(request_rec *r)
{
- core_server_config *sconf = ap_get_module_config(r->server->module_config,
- &core_module);
- void *per_dir_defaults = r->server->lookup_defaults;
- void **sec = (void **) sconf->sec->elts;
- int num_sec = sconf->sec->nelts;
- char *test_filename;
- char *test_dirname;
- int res;
- unsigned i, num_dirs;
- int j, test_filename_len;
-
- /*
- * Are we dealing with a file? If not, we can (hopefuly) safely assume we
- * have a handler that doesn't require one, but for safety's sake, and so
- * we have something find_types() can get something out of, fake one. But
- * don't run through the directory entries.
- */
-
- if (r->filename == NULL) {
- r->filename = ap_pstrdup(r->pool, r->uri);
- r->finfo.st_mode = 0; /* Not really a file... */
- r->per_dir_config = per_dir_defaults;
-
- return OK;
- }
-
- /*
- * Go down the directory hierarchy. Where we have to check for symlinks,
- * do so. Where a .htaccess file has permission to override anything,
- * try to find one. If either of these things fails, we could poke
- * around, see why, and adjust the lookup_rec accordingly --- this might
- * save us a call to get_path_info (with the attendant stat()s); however,
- * for the moment, that's not worth the trouble.
- *
- * Fake filenames (i.e. proxy:) only match Directory sections.
- */
-
- if (!ap_os_is_path_absolute(r->filename))
- {
- void *this_conf, *entry_config;
- core_dir_config *entry_core;
- char *entry_dir;
-
- for (j = 0; j < num_sec; ++j) {
-
- entry_config = sec[j];
-
- entry_core = (core_dir_config *)
- ap_get_module_config(entry_config, &core_module);
- entry_dir = entry_core->d;
-
- this_conf = NULL;
- if (entry_core->r) {
- if (!ap_regexec(entry_core->r, r->filename, 0, NULL, 0))
- this_conf = entry_config;
- }
- else if (entry_core->d_is_fnmatch) {
- if (!ap_fnmatch(entry_dir, r->filename, 0))
- this_conf = entry_config;
- }
- else if (!strncmp(r->filename, entry_dir, strlen(entry_dir)))
- this_conf = entry_config;
-
- if (this_conf)
- per_dir_defaults = ap_merge_per_dir_configs(r->pool,
- per_dir_defaults,
- this_conf);
- }
-
- r->per_dir_config = per_dir_defaults;
-
- return OK;
- }
-
- r->filename = ap_os_case_canonical_filename(r->pool, r->filename);
-
- res = get_path_info(r);
- if (res != OK) {
- return res;
- }
-
- r->case_preserved_filename = r->filename;
-
- r->filename = ap_os_canonical_filename(r->pool, r->filename);
-
- test_filename = ap_pstrdup(r->pool, r->filename);
-
- ap_no2slash(test_filename);
- num_dirs = ap_count_dirs(test_filename);
-
- if (!ap_os_is_filename_valid(r->filename) &&
- !(r->method_number == M_OPTIONS && !strcmp(r->uri, "*"))) {
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
- "Filename is not valid: %s", r->filename);
- return HTTP_FORBIDDEN;
- }
-
- if ((res = check_safe_file(r))) {
- return res;
- }
-
- test_filename_len = strlen(test_filename);
- if (test_filename[test_filename_len - 1] == '/')
- --num_dirs;
-
- if (S_ISDIR(r->finfo.st_mode))
- ++num_dirs;
-
- /*
- * We will use test_dirname as scratch space while we build directory
- * names during the walk. Profiling shows directory_walk to be a busy
- * function so we try to avoid allocating lots of extra memory here.
- * We need 2 extra bytes, one for trailing \0 and one because
- * make_dirstr_prefix will add potentially one extra /.
- */
- test_dirname = ap_palloc(r->pool, test_filename_len + 2);
-
-
- /* Normal File Systems are rooted at / */
- i = 1;
-
- /* j keeps track of which section we're on, see core_reorder_directories */
- j = 0;
- for (; i <= num_dirs; ++i) {
- int overrides_here;
- core_dir_config *core_dir = (core_dir_config *)
- ap_get_module_config(per_dir_defaults, &core_module);
-
- /*
- * XXX: this could be made faster by only copying the next component
- * rather than copying the entire thing all over.
- */
- ap_make_dirstr_prefix(test_dirname, test_filename, i);
-
- /*
- * Do symlink checks first, because they are done with the
- * permissions appropriate to the *parent* directory...
- */
-
- if ((res = check_symlinks(test_dirname, core_dir->opts))) {
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
- "Symbolic link not allowed: %s", test_dirname);
- return res;
- }
-
- /*
- * Begin *this* level by looking for matching <Directory> sections
- * from access.conf.
- */
-
- for (; j < num_sec; ++j) {
- void *entry_config = sec[j];
- core_dir_config *entry_core;
- char *entry_dir;
- void *this_conf;
-
- entry_core = (core_dir_config *)
- ap_get_module_config(entry_config, &core_module);
- entry_dir = entry_core->d;
-
- if (entry_core->r
- || !ap_os_is_path_absolute(entry_dir)
- || entry_core->d_components > i)
- break;
-
- this_conf = NULL;
- if (entry_core->d_is_fnmatch) {
- if (!ap_fnmatch(entry_dir, test_dirname, FNM_PATHNAME)) {
- this_conf = entry_config;
- }
- }
- else if (!strcmp(test_dirname, entry_dir))
- this_conf = entry_config;
-
- if (this_conf) {
- per_dir_defaults = ap_merge_per_dir_configs(r->pool,
- per_dir_defaults,
- this_conf);
- core_dir = (core_dir_config *)
- ap_get_module_config(per_dir_defaults, &core_module);
- }
- }
- overrides_here = core_dir->override;
-
- /* If .htaccess files are enabled, check for one. */
-
- if (overrides_here) {
- void *htaccess_conf = NULL;
-
- res = ap_parse_htaccess(&htaccess_conf, r, overrides_here,
- ap_pstrdup(r->pool, test_dirname),
- sconf->access_name);
- if (res)
- return res;
-
- if (htaccess_conf) {
- per_dir_defaults = ap_merge_per_dir_configs(r->pool,
- per_dir_defaults,
- htaccess_conf);
+ core_server_config *sconf =
+ ap_get_module_config(r->server->module_config, &core_module);
+ void *per_dir_defaults = r->server->lookup_defaults;
+ void **sec = (void **)sconf->sec->elts;
+ int num_sec = sconf->sec->nelts;
+ char *test_filename;
+ char *test_dirname;
+ int res;
+ unsigned i, num_dirs;
+ int j, test_filename_len;
+
+ /*
+ * Are we dealing with a file? If not, we can (hopefuly)
+ * safely assume we have a handler that doesn't require one,
+ * but for safety's sake, and so we have something find_types()
+ * can get something out of, fake one. But don't run through
+ * the directory entries.
+ */
+
+ if (r->filename == NULL) {
+ r->filename = ap_pstrdup(r->pool, r->uri);
+ r->finfo.st_mode = 0; /* Not really a file... */
r->per_dir_config = per_dir_defaults;
- }
- }
- }
-
- /*
- * There's two types of IS_SPECIAL sections (see http_core.c), and we've
- * already handled the proxy:-style stuff. Now we'll deal with the
- * regexes.
- */
- for (; j < num_sec; ++j) {
- void *entry_config = sec[j];
- core_dir_config *entry_core;
-
- entry_core = (core_dir_config *)
- ap_get_module_config(entry_config, &core_module);
-
- if (entry_core->r) {
- if (!ap_regexec(entry_core->r, test_dirname, 0, NULL, REG_NOTEOL)) {
- per_dir_defaults =
- ap_merge_per_dir_configs(r->pool, per_dir_defaults,
- entry_config);
- }
- }
- }
- r->per_dir_config = per_dir_defaults;
-
- /*
- * Symlink permissions are determined by the parent. If the request is
- * for a directory then applying the symlink test here would use the
- * permissions of the directory as opposed to its parent. Consider a
- * symlink pointing to a dir with a .htaccess disallowing symlinks. If
- * you access /symlink (or /symlink/) you would get a 403 without this
- * S_ISDIR test. But if you accessed /symlink/index.html, for example,
- * you would *not* get the 403.
- */
- if (!S_ISDIR(r->finfo.st_mode)
- && (res = check_symlinks(r->filename, ap_allow_options(r)))) {
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
- "Symbolic link not allowed: %s", r->filename);
- return res;
- }
- return OK; /* Can only "fail" if access denied by the
- * symlink goop. */
-}
-static int location_walk(request_rec *r)
-{
- core_server_config *sconf = ap_get_module_config(r->server->module_config,
- &core_module);
- void *per_dir_defaults = r->per_dir_config;
- void **url = (void **) sconf->sec_url->elts;
- int len, num_url = sconf->sec_url->nelts;
- char *test_location;
- void *this_conf, *entry_config;
- core_dir_config *entry_core;
- char *entry_url;
- int j;
-
- if (!num_url) {
- return OK;
- }
+ return OK;
+ }
+
+ /*
+ * Go down the directory hierarchy. Where we have to check
+ * for symlinks, do so. Where a .htaccess file has permission
+ * to override anything, try to find one. If either of these
+ * things fails, we could poke around, see why, and adjust
+ * the lookup_rec accordingly --- this might save us a call
+ * to get_path_info (with the attendant stat()s); however,
+ * for the moment, that's not worth the trouble.
+ *
+ * Fake filenames (i.e. proxy:) only match Directory sections.
+ */
+ if (!ap_os_is_path_absolute(r->filename)) {
+ void *this_conf, *entry_config;
+ core_dir_config *entry_core;
+ char *entry_dir;
+
+ for (j = 0; j < num_sec; ++j) {
+
+ entry_config = sec[j];
+
+ entry_core = (core_dir_config *)
+ ap_get_module_config(entry_config, &core_module);
+ entry_dir = entry_core->d;
+
+ this_conf = NULL;
+ if (entry_core->r) {
+ if (!ap_regexec(entry_core->r, r->filename, 0,
+ NULL, 0))
+ this_conf = entry_config;
+
+ } else if (entry_core->d_is_fnmatch) {
+ if (!ap_fnmatch(entry_dir, r->filename, 0))
+ this_conf = entry_config;
+ } else if (!strncmp(r->filename, entry_dir,
+ strlen(entry_dir)))
+ this_conf = entry_config;
+
+ if (this_conf)
+ per_dir_defaults =
+ ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults, this_conf);
+ }
- /* Location and LocationMatch differ on their behaviour w.r.t. multiple
- * slashes. Location matches multiple slashes with a single slash,
- * LocationMatch doesn't. An exception, for backwards brokenness is
- * absoluteURIs... in which case neither match multiple slashes.
- */
- if (r->uri[0] != '/') {
- test_location = r->uri;
- }
- else {
- test_location = ap_pstrdup(r->pool, r->uri);
- ap_no2slash(test_location);
- }
+ r->per_dir_config = per_dir_defaults;
+
+ return OK;
+ }
- /* Go through the location entries, and check for matches. */
+ r->filename = ap_os_case_canonical_filename(r->pool, r->filename);
- /* we apply the directive sections in some order;
- * should really try them with the most general first.
- */
- for (j = 0; j < num_url; ++j) {
+ res = get_path_info(r);
+ if (res != OK)
+ return res;
- entry_config = url[j];
+ r->case_preserved_filename = r->filename;
- entry_core = (core_dir_config *)
- ap_get_module_config(entry_config, &core_module);
- entry_url = entry_core->d;
+ r->filename = ap_os_canonical_filename(r->pool, r->filename);
- len = strlen(entry_url);
+ test_filename = ap_pstrdup(r->pool, r->filename);
- this_conf = NULL;
+ ap_no2slash(test_filename);
+ num_dirs = ap_count_dirs(test_filename);
- if (entry_core->r) {
- if (!ap_regexec(entry_core->r, r->uri, 0, NULL, 0))
- this_conf = entry_config;
+ if (!ap_os_is_filename_valid(r->filename) &&
+ !(r->method_number == M_OPTIONS && !strcmp(r->uri, "*"))) {
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
+ "Filename is not valid: %s", r->filename);
+ return HTTP_FORBIDDEN;
}
- else if (entry_core->d_is_fnmatch) {
- if (!ap_fnmatch(entry_url, test_location, FNM_PATHNAME)) {
- this_conf = entry_config;
- }
+
+ if ((res = check_safe_file(r)))
+ return res;
+
+ test_filename_len = strlen(test_filename);
+ if (test_filename[test_filename_len - 1] == '/')
+ --num_dirs;
+
+ if (S_ISDIR(r->finfo.st_mode))
+ ++num_dirs;
+
+ /*
+ * We will use test_dirname as scratch space while we build directory
+ * names during the walk. Profiling shows directory_walk to be a busy
+ * function so we try to avoid allocating lots of extra memory here.
+ * We need 2 extra bytes, one for trailing \0 and one because
+ * make_dirstr_prefix will add potentially one extra /.
+ */
+ test_dirname = ap_palloc(r->pool, test_filename_len + 2);
+
+
+ /* Normal File Systems are rooted at / */
+ i = 1;
+
+ /* j keeps track of which section we're on, see
+ * core_reorder_directories */
+ j = 0;
+ for (; i <= num_dirs; ++i) {
+ int overrides_here;
+ core_dir_config *core_dir = (core_dir_config *)
+ ap_get_module_config(per_dir_defaults, &core_module);
+
+ /*
+ * XXX: this could be made faster by only copying the next
+ * component rather than copying the entire thing all over.
+ */
+ ap_make_dirstr_prefix(test_dirname, test_filename, i);
+
+ /*
+ * Do symlink checks first, because they are done with the
+ * permissions appropriate to the *parent* directory...
+ */
+
+ if ((res = check_symlinks(test_dirname, core_dir->opts))) {
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
+ "Symbolic link not allowed: %s", test_dirname);
+ return res;
+ }
+
+ /*
+ * Begin *this* level by looking for matching <Directory> sections
+ * from access.conf.
+ */
+
+ for (; j < num_sec; ++j) {
+ void *entry_config = sec[j];
+ core_dir_config *entry_core;
+ char *entry_dir;
+ void *this_conf;
+
+ entry_core = (core_dir_config *)
+ ap_get_module_config(entry_config, &core_module);
+ entry_dir = entry_core->d;
+
+ if (entry_core->r
+ || !ap_os_is_path_absolute(entry_dir)
+ || entry_core->d_components > i)
+ break;
+
+ this_conf = NULL;
+ if (entry_core->d_is_fnmatch) {
+ if (!ap_fnmatch(entry_dir, test_dirname,
+ FNM_PATHNAME))
+ this_conf = entry_config;
+ } else if (!strcmp(test_dirname, entry_dir))
+ this_conf = entry_config;
+
+ if (this_conf) {
+ per_dir_defaults =
+ ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults,
+ this_conf);
+ core_dir = (core_dir_config *)
+ ap_get_module_config(per_dir_defaults,
+ &core_module);
+ }
+ }
+ overrides_here = core_dir->override;
+
+ /* If .htaccess files are enabled, check for one. */
+
+ if (overrides_here) {
+ void *htaccess_conf = NULL;
+
+ res = ap_parse_htaccess(&htaccess_conf, r,
+ overrides_here, ap_pstrdup(r->pool, test_dirname),
+ sconf->access_name);
+ if (res)
+ return res;
+
+ if (htaccess_conf) {
+ per_dir_defaults =
+ ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults,
+ htaccess_conf);
+ r->per_dir_config = per_dir_defaults;
+ }
+ }
+ }
+
+ /*
+ * There's two types of IS_SPECIAL sections (see http_core.c), and
+ * we've already handled the proxy:-style stuff. Now we'll deal with
+ * the regexes.
+ */
+ for (; j < num_sec; ++j) {
+ void *entry_config = sec[j];
+ core_dir_config *entry_core;
+
+ entry_core = (core_dir_config *)
+ ap_get_module_config(entry_config, &core_module);
+
+ if (entry_core->r) {
+ if (!ap_regexec(entry_core->r, test_dirname, 0, NULL,
+ REG_NOTEOL))
+ per_dir_defaults =
+ ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults, entry_config);
+ }
+ }
+ r->per_dir_config = per_dir_defaults;
+
+ /*
+ * Symlink permissions are determined by the parent. If the request is
+ * for a directory then applying the symlink test here would use the
+ * permissions of the directory as opposed to its parent. Consider a
+ * symlink pointing to a dir with a .htaccess disallowing symlinks. If
+ * you access /symlink (or /symlink/) you would get a 403 without this
+ * S_ISDIR test. But if you accessed /symlink/index.html, for example,
+ * you would *not* get the 403.
+ */
+ if (!S_ISDIR(r->finfo.st_mode)
+ && (res = check_symlinks(r->filename, ap_allow_options(r)))) {
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
+ "Symbolic link not allowed: %s", r->filename);
+ return res;
}
- else if (!strncmp(test_location, entry_url, len) &&
+ return OK; /* Can only "fail" if access denied by the
+ * symlink goop. */
+}
+
+static int
+location_walk(request_rec *r)
+{
+ core_server_config *sconf =
+ ap_get_module_config(r->server->module_config, &core_module);
+ void *per_dir_defaults = r->per_dir_config;
+ void **url = (void **) sconf->sec_url->elts;
+ int len, num_url = sconf->sec_url->nelts;
+ char *test_location;
+ void *this_conf, *entry_config;
+ core_dir_config *entry_core;
+ char *entry_url;
+ int j;
+
+ if (!num_url)
+ return OK;
+
+ /* Location and LocationMatch differ on their behaviour w.r.t. multiple
+ * slashes. Location matches multiple slashes with a single slash,
+ * LocationMatch doesn't. An exception, for backwards brokenness is
+ * absoluteURIs... in which case neither match multiple slashes.
+ */
+ if (r->uri[0] != '/')
+ test_location = r->uri;
+ else {
+ test_location = ap_pstrdup(r->pool, r->uri);
+ ap_no2slash(test_location);
+ }
+
+ /* Go through the location entries, and check for matches. */
+
+ /* we apply the directive sections in some order;
+ * should really try them with the most general first.
+ */
+ for (j = 0; j < num_url; ++j) {
+
+ entry_config = url[j];
+
+ entry_core = (core_dir_config *)
+ ap_get_module_config(entry_config, &core_module);
+ entry_url = entry_core->d;
+
+ len = strlen(entry_url);
+
+ this_conf = NULL;
+
+ if (entry_core->r) {
+ if (!ap_regexec(entry_core->r, r->uri, 0, NULL, 0))
+ this_conf = entry_config;
+ } else if (entry_core->d_is_fnmatch) {
+ if (!ap_fnmatch(entry_url, test_location, FNM_PATHNAME))
+ this_conf = entry_config;
+ } else if (!strncmp(test_location, entry_url, len) &&
(entry_url[len - 1] == '/' ||
- test_location[len] == '/' || test_location[len] == '\0'))
- this_conf = entry_config;
+ test_location[len] == '/' || test_location[len] == '\0'))
+ this_conf = entry_config;
- if (this_conf)
- per_dir_defaults = ap_merge_per_dir_configs(r->pool,
- per_dir_defaults, this_conf);
- }
- r->per_dir_config = per_dir_defaults;
+ if (this_conf)
+ per_dir_defaults = ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults, this_conf);
+ }
+ r->per_dir_config = per_dir_defaults;
- return OK;
+ return OK;
}
-static int file_walk(request_rec *r)
+static int
+file_walk(request_rec *r)
{
- core_dir_config *conf = ap_get_module_config(r->per_dir_config, &core_module);
- void *per_dir_defaults = r->per_dir_config;
- void **file = (void **) conf->sec->elts;
- int num_files = conf->sec->nelts;
- char *test_file;
-
- /* get the basename */
- test_file = strrchr(r->filename, '/');
- if (test_file == NULL) {
- test_file = r->filename;
- }
- else {
- ++test_file;
- }
-
- /* Go through the file entries, and check for matches. */
-
- if (num_files) {
- void *this_conf, *entry_config;
- core_dir_config *entry_core;
- char *entry_file;
- int j;
-
- /* we apply the directive sections in some order;
- * should really try them with the most general first.
- */
- for (j = 0; j < num_files; ++j) {
-
- entry_config = file[j];
-
- entry_core = (core_dir_config *)
- ap_get_module_config(entry_config, &core_module);
- entry_file = entry_core->d;
-
- this_conf = NULL;
-
- if (entry_core->r) {
- if (!ap_regexec(entry_core->r, test_file, 0, NULL, 0))
- this_conf = entry_config;
- }
- else if (entry_core->d_is_fnmatch) {
- if (!ap_fnmatch(entry_file, test_file, FNM_PATHNAME)) {
- this_conf = entry_config;
- }
- }
- else if (!strcmp(test_file, entry_file)) {
- this_conf = entry_config;
- }
-
- if (this_conf)
- per_dir_defaults = ap_merge_per_dir_configs(r->pool,
- per_dir_defaults,
- this_conf);
- }
- r->per_dir_config = per_dir_defaults;
- }
- return OK;
+ core_dir_config *conf =
+ ap_get_module_config(r->per_dir_config, &core_module);
+ void *per_dir_defaults = r->per_dir_config;
+ void **file = (void **) conf->sec->elts;
+ int num_files = conf->sec->nelts;
+ char *test_file;
+
+ /* get the basename */
+ test_file = strrchr(r->filename, '/');
+ if (test_file == NULL)
+ test_file = r->filename;
+ else
+ ++test_file;
+
+ /* Go through the file entries, and check for matches. */
+
+ if (num_files) {
+ void *this_conf, *entry_config;
+ core_dir_config *entry_core;
+ char *entry_file;
+ int j;
+
+ /* we apply the directive sections in some order;
+ * should really try them with the most general first.
+ */
+ for (j = 0; j < num_files; ++j) {
+
+ entry_config = file[j];
+
+ entry_core = (core_dir_config *)
+ ap_get_module_config(entry_config, &core_module);
+ entry_file = entry_core->d;
+
+ this_conf = NULL;
+
+ if (entry_core->r) {
+ if (!ap_regexec(entry_core->r, test_file, 0,
+ NULL, 0))
+ this_conf = entry_config;
+ } else if (entry_core->d_is_fnmatch) {
+ if (!ap_fnmatch(entry_file, test_file,
+ FNM_PATHNAME))
+ this_conf = entry_config;
+ } else if (!strcmp(test_file, entry_file))
+ this_conf = entry_config;
+
+ if (this_conf)
+ per_dir_defaults =
+ ap_merge_per_dir_configs(r->pool,
+ per_dir_defaults, this_conf);
+ }
+ r->per_dir_config = per_dir_defaults;
+ }
+ return OK;
}
/*****************************************************************
@@ -651,258 +648,264 @@ static int file_walk(request_rec *r)
* structure...
*/
-static request_rec *make_sub_request(const request_rec *r)
+static request_rec *
+make_sub_request(const request_rec *r)
{
- pool *rrp = ap_make_sub_pool(r->pool);
- request_rec *rr = ap_pcalloc(rrp, sizeof(request_rec));
+ pool *rrp = ap_make_sub_pool(r->pool);
+ request_rec *rr = ap_pcalloc(rrp, sizeof(request_rec));
- rr->pool = rrp;
- return rr;
+ rr->pool = rrp;
+ return rr;
}
-API_EXPORT(request_rec *) ap_sub_req_method_uri(const char *method,
- const char *new_file,
- const request_rec *r)
+API_EXPORT(request_rec *)
+ap_sub_req_method_uri(const char *method, const char *new_file,
+ const request_rec *r)
{
- request_rec *rnew;
- int res;
- char *udir;
-
- rnew = make_sub_request(r);
- rnew->hostname = r->hostname;
- rnew->request_time = r->request_time;
- rnew->connection = r->connection;
- rnew->server = r->server;
- rnew->request_config = ap_create_request_config(rnew->pool);
- rnew->htaccess = r->htaccess;
- rnew->per_dir_config = r->server->lookup_defaults;
-
- ap_set_sub_req_protocol(rnew, r);
-
- /* would be nicer to pass "method" to ap_set_sub_req_protocol */
- rnew->method = method;
- rnew->method_number = ap_method_number_of(method);
-
- if (new_file[0] == '/')
- ap_parse_uri(rnew, new_file);
- else {
- udir = ap_make_dirstr_parent(rnew->pool, r->uri);
- udir = ap_escape_uri(rnew->pool, udir); /* re-escape it */
- ap_parse_uri(rnew, ap_make_full_path(rnew->pool, udir, new_file));
- }
-
- /* We cannot return NULL without violating the API. So just turn this
- * subrequest into a 500 to indicate the failure. */
- if (ap_is_recursion_limit_exceeded(r)) {
- rnew->status = HTTP_INTERNAL_SERVER_ERROR;
- return rnew;
- }
-
- res = ap_unescape_url(rnew->uri);
- if (res) {
- rnew->status = res;
- return rnew;
- }
-
- ap_getparents(rnew->uri);
-
- if ((res = location_walk(rnew))) {
- rnew->status = res;
- return rnew;
- }
-
- res = ap_translate_name(rnew);
- if (res) {
- rnew->status = res;
- return rnew;
- }
-
- /*
- * We could be clever at this point, and avoid calling directory_walk,
- * etc. However, we'd need to test that the old and new filenames contain
- * the same directory components, so it would require duplicating the
- * start of translate_name. Instead we rely on the cache of .htaccess
- * results.
- *
- * NB: directory_walk() clears the per_dir_config, so we don't inherit
- * from location_walk() above
- */
-
- if ((res = directory_walk(rnew))
- || (res = file_walk(rnew))
- || (res = location_walk(rnew))
- || ((ap_satisfies(rnew) == SATISFY_ALL
- || ap_satisfies(rnew) == SATISFY_NOSPEC)
- ? ((res = ap_check_access(rnew))
- || (ap_some_auth_required(rnew)
- && ((res = ap_check_user_id(rnew))
- || (res = ap_check_auth(rnew)))))
- : ((res = ap_check_access(rnew))
- && (!ap_some_auth_required(rnew)
- || ((res = ap_check_user_id(rnew))
- || (res = ap_check_auth(rnew)))))
- )
- || (res = ap_find_types(rnew))
- || (res = ap_run_fixups(rnew))
- ) {
- rnew->status = res;
- }
- return rnew;
+ request_rec *rnew;
+ int res;
+ char *udir;
+
+ rnew = make_sub_request(r);
+ rnew->hostname = r->hostname;
+ rnew->request_time = r->request_time;
+ rnew->connection = r->connection;
+ rnew->server = r->server;
+ rnew->request_config = ap_create_request_config(rnew->pool);
+ rnew->htaccess = r->htaccess;
+ rnew->per_dir_config = r->server->lookup_defaults;
+
+ ap_set_sub_req_protocol(rnew, r);
+
+ /* would be nicer to pass "method" to ap_set_sub_req_protocol */
+ rnew->method = method;
+ rnew->method_number = ap_method_number_of(method);
+
+ if (new_file[0] == '/')
+ ap_parse_uri(rnew, new_file);
+ else {
+ udir = ap_make_dirstr_parent(rnew->pool, r->uri);
+ udir = ap_escape_uri(rnew->pool, udir); /* re-escape it */
+ ap_parse_uri(rnew,
+ ap_make_full_path(rnew->pool, udir, new_file));
+ }
+
+ /* We cannot return NULL without violating the API. So just turn this
+ * subrequest into a 500 to indicate the failure. */
+ if (ap_is_recursion_limit_exceeded(r)) {
+ rnew->status = HTTP_INTERNAL_SERVER_ERROR;
+ return rnew;
+ }
+
+ res = ap_unescape_url(rnew->uri);
+ if (res) {
+ rnew->status = res;
+ return rnew;
+ }
+
+ ap_getparents(rnew->uri);
+
+ if ((res = location_walk(rnew))) {
+ rnew->status = res;
+ return rnew;
+ }
+
+ res = ap_translate_name(rnew);
+ if (res) {
+ rnew->status = res;
+ return rnew;
+ }
+
+ /*
+ * We could be clever at this point, and avoid calling directory_walk,
+ * etc. However, we'd need to test that the old and new filenames
+ * contain the same directory components, so it would require
+ * duplicating the start of translate_name. Instead we rely on the
+ * cache of .htaccess results.
+ *
+ * NB: directory_walk() clears the per_dir_config, so we don't inherit
+ * from location_walk() above
+ */
+ /* XXX: This should be display a we bit better... */
+ if ((res = directory_walk(rnew))
+ || (res = file_walk(rnew))
+ || (res = location_walk(rnew))
+ || ((ap_satisfies(rnew) == SATISFY_ALL
+ || ap_satisfies(rnew) == SATISFY_NOSPEC)
+ ? ((res = ap_check_access(rnew))
+ || (ap_some_auth_required(rnew)
+ && ((res = ap_check_user_id(rnew))
+ || (res = ap_check_auth(rnew)))))
+ : ((res = ap_check_access(rnew))
+ && (!ap_some_auth_required(rnew)
+ || ((res = ap_check_user_id(rnew))
+ || (res = ap_check_auth(rnew)))))
+ )
+ || (res = ap_find_types(rnew))
+ || (res = ap_run_fixups(rnew))
+ ) {
+ rnew->status = res;
+ }
+ return rnew;
}
-API_EXPORT(request_rec *) ap_sub_req_lookup_uri(const char *new_file,
- const request_rec *r)
+API_EXPORT(request_rec *)
+ap_sub_req_lookup_uri(const char *new_file, const request_rec *r)
{
- return ap_sub_req_method_uri("GET", new_file, r);
+ return ap_sub_req_method_uri("GET", new_file, r);
}
-API_EXPORT(request_rec *) ap_sub_req_lookup_file(const char *new_file,
- const request_rec *r)
+API_EXPORT(request_rec *)
+ap_sub_req_lookup_file(const char *new_file, const request_rec *r)
{
- request_rec *rnew;
- int res;
- char *fdir;
-
- rnew = make_sub_request(r);
- rnew->hostname = r->hostname;
- rnew->request_time = r->request_time;
- rnew->connection = r->connection;
- rnew->server = r->server;
- rnew->request_config = ap_create_request_config(rnew->pool);
- rnew->htaccess = r->htaccess;
-
- ap_set_sub_req_protocol(rnew, r);
- fdir = ap_make_dirstr_parent(rnew->pool, r->filename);
-
- /* We cannot return NULL without violating the API. So just turn this
- * subrequest into a 500. */
- if (ap_is_recursion_limit_exceeded(r)) {
- rnew->status = HTTP_INTERNAL_SERVER_ERROR;
- return rnew;
- }
-
- /*
- * Check for a special case... if there are no '/' characters in new_file
- * at all, then we are looking at a relative lookup in the same
- * directory. That means we won't have to redo directory_walk, and we may
- * not even have to redo access checks.
- */
-
- if (strchr(new_file, '/') == NULL) {
- char *udir = ap_make_dirstr_parent(rnew->pool, r->uri);
-
- rnew->uri = ap_make_full_path(rnew->pool, udir, new_file);
- rnew->filename = ap_make_full_path(rnew->pool, fdir, new_file);
- ap_parse_uri(rnew, rnew->uri); /* fill in parsed_uri values */
- if (stat(rnew->filename, &rnew->finfo) < 0) {
- rnew->finfo.st_mode = 0;
- /* Special case for filenames which exceed the maximum limit
- * imposed by the operating system (~1024). These should
- * NOT be treated like "file not found", because there is
- * a difference between "the file is not there" and
- * "the file exists, but you tried to access it using a
- * path which exceeds the path length limit".
- * The idea here is to handle DoS attacks with long
- * runs of //////'s in a graceful and secure manner.
- */
- if (errno == ENAMETOOLONG) {
- ap_log_rerror(APLOG_MARK, APLOG_CRIT, r,
- "Possible DoS attempt? Path=%s", r->filename);
- rnew->status = HTTP_FORBIDDEN;
- return rnew;
- }
- }
-
- if ((res = check_safe_file(rnew))) {
- rnew->status = res;
- return rnew;
- }
-
- rnew->per_dir_config = r->per_dir_config;
-
- /*
- * no matter what, if it's a subdirectory, we need to re-run
- * directory_walk
- */
- if (S_ISDIR(rnew->finfo.st_mode)) {
- res = directory_walk(rnew);
- if (!res) {
- res = file_walk(rnew);
- }
- }
- else {
- if ((res = check_symlinks(rnew->filename, ap_allow_options(rnew)))) {
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, rnew,
- "Symbolic link not allowed: %s", rnew->filename);
- rnew->status = res;
- return rnew;
- }
- /*
- * do a file_walk, if it doesn't change the per_dir_config then
- * we know that we don't have to redo all the access checks
- */
- if ((res = file_walk(rnew))) {
- rnew->status = res;
- return rnew;
- }
- if (rnew->per_dir_config == r->per_dir_config) {
- if ((res = ap_find_types(rnew)) || (res = ap_run_fixups(rnew))) {
- rnew->status = res;
- }
- return rnew;
- }
- }
- }
- else {
- /* XXX: @@@: What should be done with the parsed_uri values? */
- ap_parse_uri(rnew, new_file); /* fill in parsed_uri values */
- /*
- * XXX: this should be set properly like it is in the same-dir case
- * but it's actually sometimes to impossible to do it... because the
- * file may not have a uri associated with it -djg
- */
- rnew->uri = "INTERNALLY GENERATED file-relative req";
- rnew->filename = ((ap_os_is_path_absolute(new_file)) ?
- ap_pstrdup(rnew->pool, new_file) :
- ap_make_full_path(rnew->pool, fdir, new_file));
- rnew->per_dir_config = r->server->lookup_defaults;
- res = directory_walk(rnew);
- if (!res) {
- res = file_walk(rnew);
- }
- }
-
- if (res
- || ((ap_satisfies(rnew) == SATISFY_ALL
- || ap_satisfies(rnew) == SATISFY_NOSPEC)
- ? ((res = ap_check_access(rnew))
- || (ap_some_auth_required(rnew)
- && ((res = ap_check_user_id(rnew))
- || (res = ap_check_auth(rnew)))))
- : ((res = ap_check_access(rnew))
- && (!ap_some_auth_required(rnew)
- || ((res = ap_check_user_id(rnew))
- || (res = ap_check_auth(rnew)))))
- )
- || (res = ap_find_types(rnew))
- || (res = ap_run_fixups(rnew))
- ) {
- rnew->status = res;
- }
- return rnew;
+ request_rec *rnew;
+ int res;
+ char *fdir;
+
+ rnew = make_sub_request(r);
+ rnew->hostname = r->hostname;
+ rnew->request_time = r->request_time;
+ rnew->connection = r->connection;
+ rnew->server = r->server;
+ rnew->request_config = ap_create_request_config(rnew->pool);
+ rnew->htaccess = r->htaccess;
+
+ ap_set_sub_req_protocol(rnew, r);
+ fdir = ap_make_dirstr_parent(rnew->pool, r->filename);
+
+ /* We cannot return NULL without violating the API. So just turn this
+ * subrequest into a 500. */
+ if (ap_is_recursion_limit_exceeded(r)) {
+ rnew->status = HTTP_INTERNAL_SERVER_ERROR;
+ return rnew;
+ }
+
+ /*
+ * Check for a special case... if there are no '/' characters in
+ * new_file at all, then we are looking at a relative lookup in the
+ * same directory. That means we won't have to redo directory_walk,
+ * and we may not even have to redo access checks.
+ */
+
+ if (strchr(new_file, '/') == NULL) {
+ char *udir = ap_make_dirstr_parent(rnew->pool, r->uri);
+
+ rnew->uri = ap_make_full_path(rnew->pool, udir, new_file);
+ rnew->filename = ap_make_full_path(rnew->pool, fdir, new_file);
+ ap_parse_uri(rnew, rnew->uri); /* fill in parsed_uri values */
+ if (stat(rnew->filename, &rnew->finfo) < 0) {
+ rnew->finfo.st_mode = 0;
+ /* Special case for filenames which exceed the maximum
+ * limit imposed by the operating system (~1024). These
+ * should NOT be treated like "file not found", because
+ * there is a difference between "the file is not there"
+ * and "the file exists, but you tried to access it
+ * using a path which exceeds the path length limit".
+ * The idea here is to handle DoS attacks with long
+ * runs of //////'s in a graceful and secure manner.
+ */
+ if (errno == ENAMETOOLONG) {
+ ap_log_rerror(APLOG_MARK, APLOG_CRIT, r,
+ "Possible DoS attempt? Path=%s",
+ r->filename);
+ rnew->status = HTTP_FORBIDDEN;
+ return rnew;
+ }
+ }
+
+ if ((res = check_safe_file(rnew))) {
+ rnew->status = res;
+ return rnew;
+ }
+
+ rnew->per_dir_config = r->per_dir_config;
+
+ /*
+ * no matter what, if it's a subdirectory, we need to re-run
+ * directory_walk
+ */
+ if (S_ISDIR(rnew->finfo.st_mode)) {
+ res = directory_walk(rnew);
+ if (!res)
+ res = file_walk(rnew);
+ } else {
+ if ((res = check_symlinks(rnew->filename,
+ ap_allow_options(rnew)))) {
+ ap_log_rerror(APLOG_MARK,
+ APLOG_NOERRNO|APLOG_ERR, rnew,
+ "Symbolic link not allowed: %s",
+ rnew->filename);
+ rnew->status = res;
+ return rnew;
+ }
+ /*
+ * do a file_walk, if it doesn't change the
+ * per_dir_config then we know that we don't have to
+ * redo all the access checks
+ */
+ if ((res = file_walk(rnew))) {
+ rnew->status = res;
+ return rnew;
+ }
+ if (rnew->per_dir_config == r->per_dir_config) {
+ if ((res = ap_find_types(rnew))
+ || (res = ap_run_fixups(rnew)))
+ rnew->status = res;
+ return rnew;
+ }
+ }
+ } else {
+ /* XXX: @@@: What should be done with the parsed_uri values? */
+ ap_parse_uri(rnew, new_file); /* fill in parsed_uri values */
+ /*
+ * XXX: this should be set properly like it is in the same-dir
+ * case but it's actually sometimes to impossible to do it...
+ * because the file may not have a uri associated with it -djg
+ */
+ rnew->uri = "INTERNALLY GENERATED file-relative req";
+ rnew->filename = ((ap_os_is_path_absolute(new_file)) ?
+ ap_pstrdup(rnew->pool, new_file) :
+ ap_make_full_path(rnew->pool, fdir, new_file));
+ rnew->per_dir_config = r->server->lookup_defaults;
+ res = directory_walk(rnew);
+ if (!res)
+ res = file_walk(rnew);
+ }
+
+ /* XXX: horrid...*/
+ if (res
+ || ((ap_satisfies(rnew) == SATISFY_ALL
+ || ap_satisfies(rnew) == SATISFY_NOSPEC)
+ ? ((res = ap_check_access(rnew))
+ || (ap_some_auth_required(rnew)
+ && ((res = ap_check_user_id(rnew))
+ || (res = ap_check_auth(rnew)))))
+ : ((res = ap_check_access(rnew))
+ && (!ap_some_auth_required(rnew)
+ || ((res = ap_check_user_id(rnew))
+ || (res = ap_check_auth(rnew)))))
+ )
+ || (res = ap_find_types(rnew))
+ || (res = ap_run_fixups(rnew))
+ ) {
+ rnew->status = res;
+ }
+ return rnew;
}
-API_EXPORT(int) ap_run_sub_req(request_rec *r)
+API_EXPORT(int)
+ap_run_sub_req(request_rec *r)
{
- int retval = ap_invoke_handler(r);
- ap_finalize_sub_req_protocol(r);
- return retval;
+ int retval = ap_invoke_handler(r);
+ ap_finalize_sub_req_protocol(r);
+ return retval;
}
-API_EXPORT(void) ap_destroy_sub_req(request_rec *r)
+API_EXPORT(void)
+ap_destroy_sub_req(request_rec *r)
{
- /* Reclaim the space */
- ap_destroy_pool(r->pool);
+ /* Reclaim the space */
+ ap_destroy_pool(r->pool);
}
/*****************************************************************
@@ -910,454 +913,472 @@ API_EXPORT(void) ap_destroy_sub_req(request_rec *r)
* Mainline request processing...
*/
-API_EXPORT(void) ap_die(int type, request_rec *r)
+API_EXPORT(void)
+ap_die(int type, request_rec *r)
{
- int error_index = ap_index_of_response(type);
- char *custom_response = ap_response_code_string(r, error_index);
- int recursive_error = 0;
-
- if (type == DONE) {
- ap_finalize_request_protocol(r);
- return;
- }
-
- /*
- * The following takes care of Apache redirects to custom response URLs
- * Note that if we are already dealing with the response to some other
- * error condition, we just report on the original error, and give up on
- * any attempt to handle the other thing "intelligently"...
- */
-
- if (r->status != HTTP_OK) {
- recursive_error = type;
-
- while (r->prev && (r->prev->status != HTTP_OK))
- r = r->prev; /* Get back to original error */
-
- type = r->status;
- custom_response = NULL; /* Do NOT retry the custom thing! */
- }
-
- r->status = type;
-
- /*
- * This test is done here so that none of the auth modules needs to know
- * about proxy authentication. They treat it like normal auth, and then
- * we tweak the status.
- */
- if (r->status == AUTH_REQUIRED && r->proxyreq == STD_PROXY) {
- r->status = HTTP_PROXY_AUTHENTICATION_REQUIRED;
- }
-
- /*
- * If we want to keep the connection, be sure that the request body
- * (if any) has been read.
- */
- if ((r->status != HTTP_NOT_MODIFIED) && (r->status != HTTP_NO_CONTENT)
- && !ap_status_drops_connection(r->status)
- && r->connection && (r->connection->keepalive != -1)) {
-
- (void) ap_discard_request_body(r);
- }
-
- /*
- * Two types of custom redirects --- plain text, and URLs. Plain text has
- * a leading '"', so the URL code, here, is triggered on its absence
- */
-
- if (custom_response && custom_response[0] != '"') {
-
- if (ap_is_url(custom_response)) {
- /*
- * The URL isn't local, so lets drop through the rest of this
- * apache code, and continue with the usual REDIRECT handler.
- * But note that the client will ultimately see the wrong
- * status...
- *
- * Also, before updating r->status, we may need to ensure that
- * the connection is dropped. For example, there may be
- * unread request body that would confuse us if we try
- * to read another request.
- */
- if (ap_status_drops_connection(r->status)) {
- r->connection->keepalive = -1;
- }
- r->status = REDIRECT;
- ap_table_setn(r->headers_out, "Location", custom_response);
- }
- else if (custom_response[0] == '/') {
- const char *error_notes;
- r->no_local_copy = 1; /* Do NOT send USE_LOCAL_COPY for
- * error documents! */
- /*
- * This redirect needs to be a GET no matter what the original
- * method was.
- */
- ap_table_setn(r->subprocess_env, "REQUEST_METHOD", r->method);
-
- /*
- * Provide a special method for modules to communicate
- * more informative (than the plain canned) messages to us.
- * Propagate them to ErrorDocuments via the ERROR_NOTES variable:
- */
- if ((error_notes = ap_table_get(r->notes, "error-notes")) != NULL) {
- ap_table_setn(r->subprocess_env, "ERROR_NOTES", error_notes);
- }
- /*
- * If it is already a GET or a HEAD, don't change it
- * (method_number for GET and HEAD is the same)
- */
- if(r->method_number!=M_GET) {
- r->method = ap_pstrdup(r->pool, "GET");
- r->method_number = M_GET;
- }
- ap_internal_redirect(custom_response, r);
- return;
- }
- else {
- /*
- * Dumb user has given us a bad url to redirect to --- fake up
- * dying with a recursive server error...
- */
- recursive_error = SERVER_ERROR;
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
- "Invalid error redirection directive: %s",
- custom_response);
- }
- }
- ap_send_error_response(r, recursive_error);
+ int error_index = ap_index_of_response(type);
+ char *custom_response = ap_response_code_string(r, error_index);
+ int recursive_error = 0;
+
+ if (type == DONE) {
+ ap_finalize_request_protocol(r);
+ return;
+ }
+
+ /*
+ * The following takes care of Apache redirects to custom response URLs
+ * Note that if we are already dealing with the response to some other
+ * error condition, we just report on the original error, and give up on
+ * any attempt to handle the other thing "intelligently"...
+ */
+
+ if (r->status != HTTP_OK) {
+ recursive_error = type;
+
+ while (r->prev && (r->prev->status != HTTP_OK))
+ r = r->prev; /* Get back to original error */
+
+ type = r->status;
+ custom_response = NULL; /* Do NOT retry the custom thing! */
+ }
+
+ r->status = type;
+
+ /*
+ * This test is done here so that none of the auth modules needs to know
+ * about proxy authentication. They treat it like normal auth, and then
+ * we tweak the status.
+ */
+ if (r->status == AUTH_REQUIRED && r->proxyreq == STD_PROXY)
+ r->status = HTTP_PROXY_AUTHENTICATION_REQUIRED;
+
+ /*
+ * If we want to keep the connection, be sure that the request body
+ * (if any) has been read.
+ */
+ if ((r->status != HTTP_NOT_MODIFIED) && (r->status != HTTP_NO_CONTENT)
+ && !ap_status_drops_connection(r->status)
+ && r->connection && (r->connection->keepalive != -1))
+ (void)ap_discard_request_body(r);
+
+ /*
+ * Two types of custom redirects --- plain text, and URLs. Plain text
+ * has a leading '"', so the URL code, here, is triggered on its absence
+ */
+
+ if (custom_response && custom_response[0] != '"') {
+
+ if (ap_is_url(custom_response)) {
+ /*
+ * The URL isn't local, so lets drop through the rest
+ * of this apache code, and continue with the usual
+ * REDIRECT handler. But note that the client will
+ * ultimately see the wrong status...
+ *
+ * Also, before updating r->status, we may need to
+ * ensure that the connection is dropped. For example,
+ * there may be unread request body that would confuse
+ * us if we try to read another request.
+ */
+ if (ap_status_drops_connection(r->status))
+ r->connection->keepalive = -1;
+ r->status = REDIRECT;
+ ap_table_setn(r->headers_out, "Location",
+ custom_response);
+ } else if (custom_response[0] == '/') {
+ const char *error_notes;
+ r->no_local_copy = 1; /* Do NOT send USE_LOCAL_COPY
+ * for error documents! */
+ /*
+ * This redirect needs to be a GET no matter what the
+ * original method was.
+ */
+ ap_table_setn(r->subprocess_env, "REQUEST_METHOD",
+ r->method);
+
+ /*
+ * Provide a special method for modules to communicate
+ * more informative (than the plain canned) messages to
+ * us. Propagate them to ErrorDocuments via the
+ * ERROR_NOTES variable:
+ */
+ if ((error_notes =
+ ap_table_get(r->notes, "error-notes")) != NULL)
+ ap_table_setn(r->subprocess_env, "ERROR_NOTES",
+ error_notes);
+
+ /*
+ * If it is already a GET or a HEAD, don't change it
+ * (method_number for GET and HEAD is the same)
+ */
+ if(r->method_number!=M_GET) {
+ r->method = ap_pstrdup(r->pool, "GET");
+ r->method_number = M_GET;
+ }
+ ap_internal_redirect(custom_response, r);
+ return;
+ } else {
+ /*
+ * Dumb user has given us a bad url to redirect to ---
+ * fake up dying with a recursive server error...
+ */
+ recursive_error = SERVER_ERROR;
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r,
+ "Invalid error redirection directive: %s",
+ custom_response);
+ }
+ }
+ ap_send_error_response(r, recursive_error);
}
-static void decl_die(int status, char *phase, request_rec *r)
+static void
+decl_die(int status, char *phase, request_rec *r)
{
- if (status == DECLINED) {
- ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_CRIT, r,
- "configuration error: couldn't %s: %s", phase, r->uri);
- ap_die(SERVER_ERROR, r);
- }
- else
- ap_die(status, r);
+ if (status == DECLINED) {
+ ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_CRIT, r,
+ "configuration error: couldn't %s: %s", phase, r->uri);
+ ap_die(SERVER_ERROR, r);
+ } else
+ ap_die(status, r);
}
-API_EXPORT(int) ap_some_auth_required(request_rec *r)
+API_EXPORT(int)
+ap_some_auth_required(request_rec *r)
{
- /* Is there a require line configured for the type of *this* req? */
+ /* Is there a require line configured for the type of *this* req? */
- const array_header *reqs_arr = ap_requires(r);
- require_line *reqs;
- int i;
+ const array_header *reqs_arr = ap_requires(r);
+ require_line *reqs;
+ int i;
- if (!reqs_arr)
- return 0;
+ if (!reqs_arr)
+ return 0;
- reqs = (require_line *) reqs_arr->elts;
+ reqs = (require_line *)reqs_arr->elts;
- for (i = 0; i < reqs_arr->nelts; ++i)
- if (reqs[i].method_mask & (1 << r->method_number))
- return 1;
+ for (i = 0; i < reqs_arr->nelts; ++i)
+ if (reqs[i].method_mask & (1 << r->method_number))
+ return 1;
- return 0;
+ return 0;
}
-static void process_request_internal(request_rec *r)
+static void
+process_request_internal(request_rec *r)
{
- int access_status;
-
- /* Ignore embedded %2F's in path for proxy requests */
- if (r->proxyreq == NOT_PROXY && r->parsed_uri.path) {
- access_status = ap_unescape_url(r->parsed_uri.path);
- if (access_status) {
- ap_die(access_status, r);
- return;
+ int access_status;
+
+ /* Ignore embedded %2F's in path for proxy requests */
+ if (r->proxyreq == NOT_PROXY && r->parsed_uri.path) {
+ access_status = ap_unescape_url(r->parsed_uri.path);
+ if (access_status) {
+ ap_die(access_status, r);
+ return;
+ }
}
- }
- ap_getparents(r->uri); /* OK --- shrinking transformations... */
+ ap_getparents(r->uri); /* OK --- shrinking transformations... */
- if ((access_status = location_walk(r))) {
- ap_die(access_status, r);
- return;
- }
+ if ((access_status = location_walk(r))) {
+ ap_die(access_status, r);
+ return;
+ }
- if ((access_status = ap_translate_name(r))) {
- decl_die(access_status, "translate", r);
- return;
- }
+ if ((access_status = ap_translate_name(r))) {
+ decl_die(access_status, "translate", r);
+ return;
+ }
+
+ if (r->proxyreq == NOT_PROXY) {
+ /*
+ * We don't want TRACE to run through the normal handler set, we
+ * handle it specially.
+ */
+ if (r->method_number == M_TRACE) {
+ if ((access_status = ap_send_http_trace(r)))
+ ap_die(access_status, r);
+ else
+ ap_finalize_request_protocol(r);
+ return;
+ }
+ }
+
+ if (r->proto_num > HTTP_VERSION(1,0) && ap_table_get(r->subprocess_env,
+ "downgrade-1.0"))
+ r->proto_num = HTTP_VERSION(1,0);
- if (r->proxyreq == NOT_PROXY) {
/*
- * We don't want TRACE to run through the normal handler set, we
- * handle it specially.
+ * NB: directory_walk() clears the per_dir_config, so we don't inherit
+ * from location_walk() above
*/
- if (r->method_number == M_TRACE) {
- if ((access_status = ap_send_http_trace(r)))
+
+ if ((access_status = directory_walk(r))) {
ap_die(access_status, r);
- else
- ap_finalize_request_protocol(r);
- return;
+ return;
}
- }
-
- if (r->proto_num > HTTP_VERSION(1,0) && ap_table_get(r->subprocess_env, "downgrade-1.0")) {
- r->proto_num = HTTP_VERSION(1,0);
- }
-
- /*
- * NB: directory_walk() clears the per_dir_config, so we don't inherit
- * from location_walk() above
- */
-
- if ((access_status = directory_walk(r))) {
- ap_die(access_status, r);
- return;
- }
-
- if ((access_status = file_walk(r))) {
- ap_die(access_status, r);
- return;
- }
-
- if ((access_status = location_walk(r))) {
- ap_die(access_status, r);
- return;
- }
-
- if ((access_status = ap_header_parse(r))) {
- ap_die(access_status, r);
- return;
- }
-
- switch (ap_satisfies(r)) {
- case SATISFY_ALL:
- case SATISFY_NOSPEC:
- if ((access_status = ap_check_access(r)) != 0) {
- decl_die(access_status, "check access", r);
- return;
- }
- if (ap_some_auth_required(r)) {
- if (((access_status = ap_check_user_id(r)) != 0) || !ap_auth_type(r)) {
- decl_die(access_status, ap_auth_type(r)
- ? "check user. No user file?"
- : "perform authentication. AuthType not set!", r);
- return;
- }
- if (((access_status = ap_check_auth(r)) != 0) || !ap_auth_type(r)) {
- decl_die(access_status, ap_auth_type(r)
- ? "check access. No groups file?"
- : "perform authentication. AuthType not set!", r);
- return;
- }
- }
- break;
- case SATISFY_ANY:
- if (((access_status = ap_check_access(r)) != 0)) {
- if (!ap_some_auth_required(r)) {
- decl_die(access_status, "check access", r);
- return;
- }
- if (((access_status = ap_check_user_id(r)) != 0) || !ap_auth_type(r)) {
- decl_die(access_status, ap_auth_type(r)
- ? "check user. No user file?"
- : "perform authentication. AuthType not set!", r);
- return;
- }
- if (((access_status = ap_check_auth(r)) != 0) || !ap_auth_type(r)) {
- decl_die(access_status, ap_auth_type(r)
- ? "check access. No groups file?"
- : "perform authentication. AuthType not set!", r);
- return;
- }
- }
- break;
- }
-
- if (! (r->proxyreq != NOT_PROXY
- && r->parsed_uri.scheme != NULL
- && strcmp(r->parsed_uri.scheme, "http") == 0) ) {
- if ((access_status = ap_find_types(r)) != 0) {
- decl_die(access_status, "find types", r);
- return;
+
+ if ((access_status = file_walk(r))) {
+ ap_die(access_status, r);
+ return;
}
- }
- if ((access_status = ap_run_fixups(r)) != 0) {
- ap_die(access_status, r);
- return;
- }
+ if ((access_status = location_walk(r))) {
+ ap_die(access_status, r);
+ return;
+ }
- if ((access_status = ap_invoke_handler(r)) != 0) {
- ap_die(access_status, r);
- return;
- }
+ if ((access_status = ap_header_parse(r))) {
+ ap_die(access_status, r);
+ return;
+ }
+
+ switch (ap_satisfies(r)) {
+ case SATISFY_ALL:
+ case SATISFY_NOSPEC:
+ if ((access_status = ap_check_access(r)) != 0) {
+ decl_die(access_status, "check access", r);
+ return;
+ }
+ if (ap_some_auth_required(r)) {
+ if (((access_status = ap_check_user_id(r)) != 0)
+ || !ap_auth_type(r)) {
+ decl_die(access_status, ap_auth_type(r)
+ ? "check user. No user file?"
+ : "perform authentication. AuthType not "
+ "set!", r);
+ return;
+ }
+ if (((access_status = ap_check_auth(r)) != 0)
+ || !ap_auth_type(r)) {
+ decl_die(access_status, ap_auth_type(r)
+ ? "check access. No groups file?"
+ : "perform authentication. AuthType not "
+ "set!", r);
+ return;
+ }
+ }
+ break;
+ case SATISFY_ANY:
+ if (((access_status = ap_check_access(r)) != 0)) {
+ if (!ap_some_auth_required(r)) {
+ decl_die(access_status, "check access", r);
+ return;
+ }
+ if (((access_status = ap_check_user_id(r)) != 0)
+ || !ap_auth_type(r)) {
+ decl_die(access_status, ap_auth_type(r)
+ ? "check user. No user file?"
+ : "perform authentication. AuthType not "
+ "set!", r);
+ return;
+ }
+ if (((access_status = ap_check_auth(r)) != 0)
+ || !ap_auth_type(r)) {
+ decl_die(access_status, ap_auth_type(r)
+ ? "check access. No groups file?"
+ : "perform authentication. AuthType not "
+ "set!", r);
+ return;
+ }
+ }
+ break;
+ }
+
+ if (! (r->proxyreq != NOT_PROXY
+ && r->parsed_uri.scheme != NULL
+ && strcmp(r->parsed_uri.scheme, "http") == 0) ) {
+ if ((access_status = ap_find_types(r)) != 0) {
+ decl_die(access_status, "find types", r);
+ return;
+ }
+ }
- /* Take care of little things that need to happen when we're done */
- ap_finalize_request_protocol(r);
+ if ((access_status = ap_run_fixups(r)) != 0) {
+ ap_die(access_status, r);
+ return;
+ }
+
+ if ((access_status = ap_invoke_handler(r)) != 0) {
+ ap_die(access_status, r);
+ return;
+ }
+
+ /* Take care of little things that need to happen when we're done */
+ ap_finalize_request_protocol(r);
}
-API_EXPORT(void) ap_process_request(request_rec *r)
+API_EXPORT(void)
+ap_process_request(request_rec *r)
{
- int old_stat;
+ int old_stat;
- if (ap_extended_status)
- ap_time_process_request(r->connection->child_num, START_PREQUEST);
+ if (ap_extended_status)
+ ap_time_process_request(r->connection->child_num,
+ START_PREQUEST);
- process_request_internal(r);
+ process_request_internal(r);
- old_stat = ap_update_child_status(r->connection->child_num,
- SERVER_BUSY_LOG, r);
+ old_stat = ap_update_child_status(r->connection->child_num,
+ SERVER_BUSY_LOG, r);
- /*
- * We want to flush the last packet if this isn't a pipelining connection
- * *before* we start into logging. Suppose that the logging causes a DNS
- * lookup to occur, which may have a high latency. If we hold off on
- * this packet, then it'll appear like the link is stalled when really
- * it's the application that's stalled.
- */
- ap_bhalfduplex(r->connection->client);
- ap_log_transaction(r);
+ /*
+ * We want to flush the last packet if this isn't a pipelining
+ * connection *before* we start into logging. Suppose that the
+ * logging causes a DNS lookup to occur, which may have a high
+ * latency. If we hold off on this packet, then it'll appear
+ * like the link is stalled when really it's the application
+ * that's stalled.
+ */
+ ap_bhalfduplex(r->connection->client);
+ ap_log_transaction(r);
- (void) ap_update_child_status(r->connection->child_num, old_stat, r);
- if (ap_extended_status)
- ap_time_process_request(r->connection->child_num, STOP_PREQUEST);
+ (void)ap_update_child_status(r->connection->child_num, old_stat, r);
+ if (ap_extended_status)
+ ap_time_process_request(r->connection->child_num,
+ STOP_PREQUEST);
}
-static table *rename_original_env(pool *p, table *t)
+static table *
+rename_original_env(pool *p, table *t)
{
- array_header *env_arr = ap_table_elts(t);
- table_entry *elts = (table_entry *) env_arr->elts;
- table *new = ap_make_table(p, env_arr->nalloc);
- int i;
-
- for (i = 0; i < env_arr->nelts; ++i) {
- if (!elts[i].key)
- continue;
- ap_table_setn(new, ap_pstrcat(p, "REDIRECT_", elts[i].key, NULL),
- elts[i].val);
- }
-
- return new;
+ array_header *env_arr = ap_table_elts(t);
+ table_entry *elts = (table_entry *)env_arr->elts;
+ table *new = ap_make_table(p, env_arr->nalloc);
+ int i;
+
+ for (i = 0; i < env_arr->nelts; ++i) {
+ if (!elts[i].key)
+ continue;
+ ap_table_setn(new, ap_pstrcat(p, "REDIRECT_", elts[i].key,
+ NULL), elts[i].val);
+ }
+
+ return new;
}
-static request_rec *internal_internal_redirect(const char *new_uri, request_rec *r)
+static request_rec *
+internal_internal_redirect(const char *new_uri, request_rec *r)
{
- int access_status;
- request_rec *new;
-
- if (ap_is_recursion_limit_exceeded(r)) {
- ap_die(HTTP_INTERNAL_SERVER_ERROR, r);
- return NULL;
- }
-
- new = (request_rec *) ap_pcalloc(r->pool, sizeof(request_rec));
-
- new->connection = r->connection;
- new->server = r->server;
- new->pool = r->pool;
-
- /*
- * A whole lot of this really ought to be shared with http_protocol.c...
- * another missing cleanup. It's particularly inappropriate to be
- * setting header_only, etc., here.
- */
-
- new->method = r->method;
- new->method_number = r->method_number;
- /* initialize context _BEFORE_ ap_parse_uri() call */
- new->ctx = r->ctx;
- ap_parse_uri(new, new_uri);
- new->request_config = ap_create_request_config(r->pool);
- new->per_dir_config = r->server->lookup_defaults;
-
- new->prev = r;
- r->next = new;
-
- /* Inherit the rest of the protocol info... */
-
- new->the_request = r->the_request;
-
- new->allowed = r->allowed;
-
- new->status = r->status;
- new->assbackwards = r->assbackwards;
- new->header_only = r->header_only;
- new->protocol = r->protocol;
- new->proto_num = r->proto_num;
- new->hostname = r->hostname;
- new->request_time = r->request_time;
- new->main = r->main;
-
- new->headers_in = r->headers_in;
- new->headers_out = ap_make_table(r->pool, 12);
- new->err_headers_out = r->err_headers_out;
- new->subprocess_env = rename_original_env(r->pool, r->subprocess_env);
- new->notes = ap_make_table(r->pool, 5);
-
- new->htaccess = r->htaccess;
- new->no_cache = r->no_cache;
- new->expecting_100 = r->expecting_100;
- new->no_local_copy = r->no_local_copy;
- new->read_length = r->read_length; /* We can only read it once */
- new->vlist_validator = r->vlist_validator;
-
- ap_table_setn(new->subprocess_env, "REDIRECT_STATUS",
- ap_psprintf(r->pool, "%d", r->status));
-
- /*
- * XXX: hmm. This is because mod_setenvif and mod_unique_id really need
- * to do their thing on internal redirects as well. Perhaps this is a
- * misnamed function.
- */
- if ((access_status = ap_run_post_read_request(new))) {
- ap_die(access_status, new);
- return NULL;
- }
-
- return new;
+ int access_status;
+ request_rec *new;
+
+ if (ap_is_recursion_limit_exceeded(r)) {
+ ap_die(HTTP_INTERNAL_SERVER_ERROR, r);
+ return NULL;
+ }
+
+ new = (request_rec *)ap_pcalloc(r->pool, sizeof(request_rec));
+
+ new->connection = r->connection;
+ new->server = r->server;
+ new->pool = r->pool;
+
+ /*
+ * A whole lot of this really ought to be shared with http_protocol.c...
+ * another missing cleanup. It's particularly inappropriate to be
+ * setting header_only, etc., here.
+ */
+
+ new->method = r->method;
+ new->method_number = r->method_number;
+ /* initialize context _BEFORE_ ap_parse_uri() call */
+ new->ctx = r->ctx;
+ ap_parse_uri(new, new_uri);
+ new->request_config = ap_create_request_config(r->pool);
+ new->per_dir_config = r->server->lookup_defaults;
+
+ new->prev = r;
+ r->next = new;
+
+ /* Inherit the rest of the protocol info... */
+
+ new->the_request = r->the_request;
+
+ new->allowed = r->allowed;
+
+ new->status = r->status;
+ new->assbackwards = r->assbackwards;
+ new->header_only = r->header_only;
+ new->protocol = r->protocol;
+ new->proto_num = r->proto_num;
+ new->hostname = r->hostname;
+ new->request_time = r->request_time;
+ new->main = r->main;
+
+ new->headers_in = r->headers_in;
+ new->headers_out = ap_make_table(r->pool, 12);
+ new->err_headers_out = r->err_headers_out;
+ new->subprocess_env = rename_original_env(r->pool, r->subprocess_env);
+ new->notes = ap_make_table(r->pool, 5);
+
+ new->htaccess = r->htaccess;
+ new->no_cache = r->no_cache;
+ new->expecting_100 = r->expecting_100;
+ new->no_local_copy = r->no_local_copy;
+ new->read_length = r->read_length; /* We can only read it once */
+ new->vlist_validator = r->vlist_validator;
+
+ ap_table_setn(new->subprocess_env, "REDIRECT_STATUS",
+ ap_psprintf(r->pool, "%d", r->status));
+
+ /*
+ * XXX: hmm. This is because mod_setenvif and mod_unique_id really need
+ * to do their thing on internal redirects as well. Perhaps this is a
+ * misnamed function.
+ */
+ if ((access_status = ap_run_post_read_request(new))) {
+ ap_die(access_status, new);
+ return NULL;
+ }
+
+ return new;
}
-API_EXPORT(void) ap_internal_redirect(const char *new_uri, request_rec *r)
+API_EXPORT(void)
+ap_internal_redirect(const char *new_uri, request_rec *r)
{
- request_rec *new = internal_internal_redirect(new_uri, r);
+ request_rec *new = internal_internal_redirect(new_uri, r);
- if (new) {
- process_request_internal(new);
- }
+ if (new)
+ process_request_internal(new);
}
/* This function is designed for things like actions or CGI scripts, when
* using AddHandler, and you want to preserve the content type across
* an internal redirect.
*/
-API_EXPORT(void) ap_internal_redirect_handler(const char *new_uri, request_rec *r)
+API_EXPORT(void)
+ap_internal_redirect_handler(const char *new_uri, request_rec *r)
{
- request_rec *new = internal_internal_redirect(new_uri, r);
+ request_rec *new = internal_internal_redirect(new_uri, r);
- if (new) {
- if (r->handler)
- new->content_type = r->content_type;
- process_request_internal(new);
- }
+ if (new) {
+ if (r->handler)
+ new->content_type = r->content_type;
+ process_request_internal(new);
+ }
}
/*
* Is it the initial main request, which we only get *once* per HTTP request?
*/
-API_EXPORT(int) ap_is_initial_req(request_rec *r)
+API_EXPORT(int)
+ap_is_initial_req(request_rec *r)
{
- return
- (r->main == NULL) /* otherwise, this is a sub-request */
- &&
- (r->prev == NULL); /* otherwise, this is an internal redirect */
+ return
+ (r->main == NULL) /* otherwise, this is a sub-request */
+ &&
+ (r->prev == NULL); /* otherwise, this is an internal redirect */
}
/*
* Function to set the r->mtime field to the specified value if it's later
* than what's already there.
*/
-API_EXPORT(time_t) ap_update_mtime(request_rec *r, time_t dependency_mtime)
+API_EXPORT(time_t)
+ap_update_mtime(request_rec *r, time_t dependency_mtime)
{
- if (r->mtime < dependency_mtime) {
- r->mtime = dependency_mtime;
- }
- return r->mtime;
+ if (r->mtime < dependency_mtime)
+ r->mtime = dependency_mtime;
+ return r->mtime;
}