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
8 * http://www.apache.org/licenses/LICENSE-2.0
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.
18 * http_config.c: once was auxillary functions for reading httpd's config
19 * file and converting filenames into a namespace
23 * Wall-to-wall rewrite for Apache... commands which are part of the
24 * server core can now be found next door in "http_core.c". Now contains
25 * general command loop, and functions which do bookkeeping for the new
26 * Apache config stuff (modules and configuration vectors).
33 #include "apr_strings.h"
34 #include "apr_portable.h"
35 #include "apr_file_io.h"
36 #include "apr_fnmatch.h"
38 #define APR_WANT_STDIO
39 #define APR_WANT_STRFUNC
42 #include "ap_config.h"
44 #include "http_config.h"
45 #include "http_protocol.h"
46 #include "http_core.h"
47 #include "http_log.h" /* for errors in parse_htaccess */
48 #include "http_request.h" /* for default_handler (see invoke_handler) */
49 #include "http_main.h"
50 #include "http_vhost.h"
51 #include "util_cfgtree.h"
53 #define APLOG_UNSET (APLOG_NO_MODULE - 1)
54 APLOG_USE_MODULE(core);
56 AP_DECLARE_DATA const char *ap_server_argv0 = NULL;
57 AP_DECLARE_DATA const char *ap_server_root = NULL;
58 AP_DECLARE_DATA server_rec *ap_server_conf = NULL;
59 AP_DECLARE_DATA apr_pool_t *ap_pglobal = NULL;
61 AP_DECLARE_DATA apr_array_header_t *ap_server_pre_read_config = NULL;
62 AP_DECLARE_DATA apr_array_header_t *ap_server_post_read_config = NULL;
63 AP_DECLARE_DATA apr_array_header_t *ap_server_config_defines = NULL;
65 AP_DECLARE_DATA ap_directive_t *ap_conftree = NULL;
68 APR_HOOK_LINK(header_parser)
69 APR_HOOK_LINK(pre_config)
70 APR_HOOK_LINK(check_config)
71 APR_HOOK_LINK(post_config)
72 APR_HOOK_LINK(open_logs)
73 APR_HOOK_LINK(child_init)
74 APR_HOOK_LINK(handler)
75 APR_HOOK_LINK(quick_handler)
76 APR_HOOK_LINK(optional_fn_retrieve)
77 APR_HOOK_LINK(test_config)
80 AP_IMPLEMENT_HOOK_RUN_ALL(int, header_parser,
81 (request_rec *r), (r), OK, DECLINED)
83 AP_IMPLEMENT_HOOK_RUN_ALL(int, pre_config,
84 (apr_pool_t *pconf, apr_pool_t *plog,
86 (pconf, plog, ptemp), OK, DECLINED)
88 AP_IMPLEMENT_HOOK_RUN_ALL(int, check_config,
89 (apr_pool_t *pconf, apr_pool_t *plog,
90 apr_pool_t *ptemp, server_rec *s),
91 (pconf, plog, ptemp, s), OK, DECLINED)
93 AP_IMPLEMENT_HOOK_VOID(test_config,
94 (apr_pool_t *pconf, server_rec *s),
97 AP_IMPLEMENT_HOOK_RUN_ALL(int, post_config,
98 (apr_pool_t *pconf, apr_pool_t *plog,
99 apr_pool_t *ptemp, server_rec *s),
100 (pconf, plog, ptemp, s), OK, DECLINED)
102 /* During the course of debugging I expanded this macro out, so
103 * rather than remove all the useful information there is in the
104 * following lines, I'm going to leave it here in case anyone
105 * else finds it useful.
107 * Ben has looked at it and thinks it correct :)
109 AP_DECLARE(int) ap_hook_post_config(ap_HOOK_post_config_t *pf,
110 const char * const *aszPre,
111 const char * const *aszSucc,
114 ap_LINK_post_config_t *pHook;
116 if (!_hooks.link_post_config) {
117 _hooks.link_post_config = apr_array_make(apr_hook_global_pool, 1,
118 sizeof(ap_LINK_post_config_t));
119 apr_hook_sort_register("post_config", &_hooks.link_post_config);
122 pHook = apr_array_push(_hooks.link_post_config);
124 pHook->aszPredecessors = aszPre;
125 pHook->aszSuccessors = aszSucc;
126 pHook->nOrder = nOrder;
127 pHook->szName = apr_hook_debug_current;
129 if (apr_hook_debug_enabled)
130 apr_hook_debug_show("post_config", aszPre, aszSucc);
133 AP_DECLARE(apr_array_header_t *) ap_hook_get_post_config(void) {
134 return _hooks.link_post_config;
137 AP_DECLARE(int) ap_run_post_config(apr_pool_t *pconf,
142 ap_LINK_post_config_t *pHook;
145 if(!_hooks.link_post_config)
148 pHook = (ap_LINK_post_config_t *)_hooks.link_post_config->elts;
149 for (n = 0; n < _hooks.link_post_config->nelts; ++n)
150 pHook[n].pFunc (pconf, plog, ptemp, s);
154 AP_IMPLEMENT_HOOK_RUN_ALL(int, open_logs,
155 (apr_pool_t *pconf, apr_pool_t *plog,
156 apr_pool_t *ptemp, server_rec *s),
157 (pconf, plog, ptemp, s), OK, DECLINED)
159 AP_IMPLEMENT_HOOK_VOID(child_init,
160 (apr_pool_t *pchild, server_rec *s),
163 AP_IMPLEMENT_HOOK_RUN_FIRST(int, handler, (request_rec *r),
166 AP_IMPLEMENT_HOOK_RUN_FIRST(int, quick_handler, (request_rec *r, int lookup),
167 (r, lookup), DECLINED)
169 AP_IMPLEMENT_HOOK_VOID(optional_fn_retrieve, (void), ())
171 /****************************************************************
173 * We begin with the functions which deal with the linked list
174 * of modules which control just about all of the server operation.
177 /* total_modules is the number of modules that have been linked
180 static int total_modules = 0;
182 /* dynamic_modules is the number of modules that have been added
183 * after the pre-loaded ones have been set up. It shouldn't be larger
184 * than DYNAMIC_MODULE_LIMIT.
186 static int dynamic_modules = 0;
188 /* The maximum possible value for total_modules, i.e. number of static
189 * modules plus DYNAMIC_MODULE_LIMIT.
191 static int max_modules = 0;
193 /* The number of elements we need to alloc for config vectors. Before loading
194 * of dynamic modules, we must be liberal and set this to max_modules. After
195 * loading of dynamic modules, we can trim it down to total_modules. On
196 * restart, reset to max_modules.
198 static int conf_vector_length = 0;
200 AP_DECLARE_DATA module *ap_top_module = NULL;
201 AP_DECLARE_DATA module **ap_loaded_modules=NULL;
203 static apr_hash_t *ap_config_hash = NULL;
205 typedef int (*handler_func)(request_rec *);
206 typedef void *(*dir_maker_func)(apr_pool_t *, char *);
207 typedef void *(*merger_func)(apr_pool_t *, void *, void *);
209 /* maximum nesting level for config directories */
210 #ifndef AP_MAX_INCLUDE_DIR_DEPTH
211 #define AP_MAX_INCLUDE_DIR_DEPTH (128)
214 /* Dealing with config vectors. These are associated with per-directory,
215 * per-server, and per-request configuration, and have a void* pointer for
216 * each modules. The nature of the structure pointed to is private to the
217 * module in question... the core doesn't (and can't) know. However, there
218 * are defined interfaces which allow it to create instances of its private
219 * per-directory and per-server structures, and to merge the per-directory
220 * structures of a directory and its subdirectory (producing a new one in
221 * which the defaults applying to the base directory have been properly
225 static ap_conf_vector_t *create_empty_config(apr_pool_t *p)
227 void *conf_vector = apr_pcalloc(p, sizeof(void *) * conf_vector_length);
231 static ap_conf_vector_t *create_default_per_dir_config(apr_pool_t *p)
233 void **conf_vector = apr_pcalloc(p, sizeof(void *) * conf_vector_length);
236 for (modp = ap_top_module; modp; modp = modp->next) {
237 dir_maker_func df = modp->create_dir_config;
240 conf_vector[modp->module_index] = (*df)(p, NULL);
243 return (ap_conf_vector_t *)conf_vector;
246 AP_CORE_DECLARE(ap_conf_vector_t *) ap_merge_per_dir_configs(apr_pool_t *p,
247 ap_conf_vector_t *base,
248 ap_conf_vector_t *new_conf)
250 void **conf_vector = apr_palloc(p, sizeof(void *) * conf_vector_length);
251 void **base_vector = (void **)base;
252 void **new_vector = (void **)new_conf;
255 for (modp = ap_top_module; modp; modp = modp->next) {
256 int i = modp->module_index;
258 if (!new_vector[i]) {
259 conf_vector[i] = base_vector[i];
262 merger_func df = modp->merge_dir_config;
263 if (df && base_vector[i]) {
264 conf_vector[i] = (*df)(p, base_vector[i], new_vector[i]);
267 conf_vector[i] = new_vector[i];
271 return (ap_conf_vector_t *)conf_vector;
274 static ap_conf_vector_t *create_server_config(apr_pool_t *p, server_rec *s)
276 void **conf_vector = apr_pcalloc(p, sizeof(void *) * conf_vector_length);
279 for (modp = ap_top_module; modp; modp = modp->next) {
280 if (modp->create_server_config)
281 conf_vector[modp->module_index] = (*modp->create_server_config)(p, s);
284 return (ap_conf_vector_t *)conf_vector;
287 static void merge_server_configs(apr_pool_t *p, ap_conf_vector_t *base,
288 ap_conf_vector_t *virt)
290 /* Can reuse the 'virt' vector for the spine of it, since we don't
291 * have to deal with the moral equivalent of .htaccess files here...
294 void **base_vector = (void **)base;
295 void **virt_vector = (void **)virt;
298 for (modp = ap_top_module; modp; modp = modp->next) {
299 merger_func df = modp->merge_server_config;
300 int i = modp->module_index;
303 virt_vector[i] = base_vector[i];
305 virt_vector[i] = (*df)(p, base_vector[i], virt_vector[i]);
309 AP_CORE_DECLARE(ap_conf_vector_t *) ap_create_request_config(apr_pool_t *p)
311 return create_empty_config(p);
314 AP_CORE_DECLARE(ap_conf_vector_t *) ap_create_conn_config(apr_pool_t *p)
316 return create_empty_config(p);
319 AP_CORE_DECLARE(ap_conf_vector_t *) ap_create_per_dir_config(apr_pool_t *p)
321 return create_empty_config(p);
324 /* Invoke the filter_init_func for all filters with FILTERS where f->r
325 * matches R. Restricting to a matching R avoids re-running init
326 * functions for filters configured for r->main where r is a
328 static int invoke_filter_init(request_rec *r, ap_filter_t *filters)
331 if (filters->frec->filter_init_func && filters->r == r) {
332 int result = filters->frec->filter_init_func(filters);
337 filters = filters->next;
343 * TODO: Move this to an appropriate include file and possibly prefix it
346 #define DEFAULT_HANDLER_NAME ""
348 AP_CORE_DECLARE(int) ap_invoke_handler(request_rec *r)
353 const char *old_handler = r->handler;
357 * The new insert_filter stage makes the most sense here. We only use
358 * it when we are going to run the request, so we must insert filters
359 * if any are available. Since the goal of this phase is to allow all
360 * modules to insert a filter if they want to, this filter returns
361 * void. I just can't see any way that this filter can reasonably
362 * fail, either your modules inserts something or it doesn't. rbb
364 ap_run_insert_filter(r);
366 /* Before continuing, allow each filter that is in the two chains to
367 * run their init function to let them do any magic before we could
368 * start generating data.
370 result = invoke_filter_init(r, r->input_filters);
374 result = invoke_filter_init(r, r->output_filters);
380 if (r->content_type) {
381 handler = r->content_type;
382 if ((p=ap_strchr_c(handler, ';')) != NULL) {
383 char *new_handler = (char *)apr_pmemdup(r->pool, handler,
385 char *p2 = new_handler + (p - handler);
386 handler = new_handler;
388 /* exclude media type arguments */
389 while (p2 > handler && p2[-1] == ' ')
390 --p2; /* strip trailing spaces */
396 handler = DEFAULT_HANDLER_NAME;
399 r->handler = handler;
402 result = ap_run_handler(r);
404 r->handler = old_handler;
406 if (result == DECLINED && r->handler && r->filename) {
407 ap_log_rerror(APLOG_MARK, APLOG_WARNING, 0, r,
408 "handler \"%s\" not found for: %s", r->handler, r->filename);
410 if ((result != OK) && (result != DONE) && (result != DECLINED) && (result != SUSPENDED)
411 && (result != AP_FILTER_ERROR) /* ap_die() knows about this specifically */
412 && !ap_is_HTTP_VALID_RESPONSE(result)) {
413 /* If a module is deliberately returning something else
414 * (request_rec in non-HTTP or proprietary extension?)
415 * let it set a note to allow it explicitly.
416 * Otherwise, a return code that is neither reserved nor HTTP
417 * is a bug, as in PR#31759.
419 ignore = apr_table_get(r->notes, "HTTP_IGNORE_RANGE");
421 ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r,
422 "Handler for %s returned invalid result code %d",
424 result = HTTP_INTERNAL_SERVER_ERROR;
428 return result == DECLINED ? HTTP_INTERNAL_SERVER_ERROR : result;
431 AP_DECLARE(int) ap_method_is_limited(cmd_parms *cmd, const char *method)
435 methnum = ap_method_number_of(method);
438 * A method number either hardcoded into apache or
439 * added by a module and registered.
441 if (methnum != M_INVALID) {
442 return (cmd->limited & (AP_METHOD_BIT << methnum)) ? 1 : 0;
445 return 0; /* not found */
448 AP_DECLARE(void) ap_register_hooks(module *m, apr_pool_t *p)
450 if (m->register_hooks) {
451 if (getenv("SHOW_HOOKS")) {
452 printf("Registering hooks for %s\n", m->name);
453 apr_hook_debug_enabled = 1;
456 apr_hook_debug_current = m->name;
457 m->register_hooks(p);
461 static void ap_add_module_commands(module *m, apr_pool_t *p);
463 typedef struct ap_mod_list_struct ap_mod_list;
464 struct ap_mod_list_struct {
465 struct ap_mod_list_struct *next;
467 const command_rec *cmd;
470 static apr_status_t reload_conf_hash(void *baton)
472 ap_config_hash = NULL;
476 static void rebuild_conf_hash(apr_pool_t *p, int add_prelinked)
480 ap_config_hash = apr_hash_make(p);
482 apr_pool_cleanup_register(p, NULL, reload_conf_hash,
483 apr_pool_cleanup_null);
485 for (m = ap_prelinked_modules; *m != NULL; m++) {
486 ap_add_module_commands(*m, p);
491 static void ap_add_module_commands(module *m, apr_pool_t *p)
495 const command_rec *cmd;
500 if (ap_config_hash == NULL) {
501 rebuild_conf_hash(p, 0);
504 tpool = apr_hash_pool_get(ap_config_hash);
506 while (cmd && cmd->name) {
507 mln = apr_palloc(tpool, sizeof(ap_mod_list));
510 dir = apr_pstrdup(tpool, cmd->name);
514 mln->next = apr_hash_get(ap_config_hash, dir, APR_HASH_KEY_STRING);
515 apr_hash_set(ap_config_hash, dir, APR_HASH_KEY_STRING, mln);
521 /* One-time setup for precompiled modules --- NOT to be done on restart */
523 AP_DECLARE(const char *) ap_add_module(module *m, apr_pool_t *p)
525 /* This could be called from a LoadModule httpd.conf command,
526 * after the file has been linked and the module structure within it
530 if (m->version != MODULE_MAGIC_NUMBER_MAJOR) {
531 return apr_psprintf(p, "Module \"%s\" is not compatible with this "
532 "version of Apache (found %d, need %d). Please "
533 "contact the vendor for the correct version.",
534 m->name, m->version, MODULE_MAGIC_NUMBER_MAJOR);
537 if (m->next == NULL) {
538 m->next = ap_top_module;
542 if (m->module_index == -1) {
543 m->module_index = total_modules++;
546 if (dynamic_modules > DYNAMIC_MODULE_LIMIT) {
547 return apr_psprintf(p, "Module \"%s\" could not be loaded, "
548 "because the dynamic module limit was "
549 "reached. Please increase "
550 "DYNAMIC_MODULE_LIMIT and recompile.", m->name);
554 /* Some C compilers put a complete path into __FILE__, but we want
555 * only the filename (e.g. mod_includes.c). So check for path
556 * components (Unix and DOS), and remove them.
559 if (ap_strrchr_c(m->name, '/'))
560 m->name = 1 + ap_strrchr_c(m->name, '/');
562 if (ap_strrchr_c(m->name, '\\'))
563 m->name = 1 + ap_strrchr_c(m->name, '\\');
567 * "*POSIX(/home/martin/apache/src/modules/standard/mod_info.c)"
570 /* We cannot fix the string in-place, because it's const */
571 if (m->name[strlen(m->name)-1] == ')') {
572 char *tmp = strdup(m->name); /* FIXME: memory leak, albeit a small one */
573 tmp[strlen(tmp)-1] = '\0';
576 #endif /*_OSD_POSIX*/
578 ap_add_module_commands(m, p);
579 /* FIXME: is this the right place to call this?
580 * It doesn't appear to be
582 ap_register_hooks(m, p);
588 * remove_module undoes what add_module did. There are some caveats:
589 * when the module is removed, its slot is lost so all the current
590 * per-dir and per-server configurations are invalid. So we should
591 * only ever call this function when you are invalidating almost
592 * all our current data. I.e. when doing a restart.
595 AP_DECLARE(void) ap_remove_module(module *m)
599 modp = ap_top_module;
601 /* We are the top module, special case */
602 ap_top_module = modp->next;
606 /* Not the top module, find use. When found modp will
607 * point to the module _before_ us in the list
610 while (modp && modp->next != m) {
615 /* Uh-oh, this module doesn't exist */
616 ap_log_error(APLOG_MARK, APLOG_ERR, 0, NULL,
617 "Cannot remove module %s: not found in module list",
622 /* Eliminate us from the module list */
623 modp->next = modp->next->next;
626 m->module_index = -1; /* simulate being unloaded, should
632 AP_DECLARE(const char *) ap_add_loaded_module(module *mod, apr_pool_t *p)
638 * Add module pointer to top of chained module list
640 error = ap_add_module(mod, p);
646 * And module pointer to list of loaded modules
648 * Notes: 1. ap_add_module() would already complain if no more space
649 * exists for adding a dynamically loaded module
650 * 2. ap_add_module() accepts double inclusion, so we have
651 * to accept this, too.
653 for (m = ap_loaded_modules; *m != NULL; m++)
661 AP_DECLARE(void) ap_remove_loaded_module(module *mod)
668 * Remove module pointer from chained module list
670 ap_remove_module(mod);
673 * Remove module pointer from list of loaded modules
675 * Note: 1. We cannot determine if the module was successfully
676 * removed by ap_remove_module().
677 * 2. We have not to complain explicity when the module
678 * is not found because ap_remove_module() did it
681 for (m = m2 = ap_loaded_modules, done = 0; *m2 != NULL; m2++) {
682 if (*m2 == mod && done == 0)
691 AP_DECLARE(const char *) ap_setup_prelinked_modules(process_rec *process)
697 apr_hook_global_pool=process->pconf;
699 rebuild_conf_hash(process->pconf, 0);
702 * Initialise total_modules variable and module indices
705 for (m = ap_preloaded_modules; *m != NULL; m++)
706 (*m)->module_index = total_modules++;
708 max_modules = total_modules + DYNAMIC_MODULE_LIMIT + 1;
709 conf_vector_length = max_modules;
712 * Initialise list of loaded modules
714 ap_loaded_modules = (module **)apr_palloc(process->pool,
715 sizeof(module *) * conf_vector_length);
717 if (ap_loaded_modules == NULL) {
718 return "Ouch! Out of memory in ap_setup_prelinked_modules()!";
721 for (m = ap_preloaded_modules, m2 = ap_loaded_modules; *m != NULL; )
727 * Initialize chain of linked (=activate) modules
729 for (m = ap_prelinked_modules; *m != NULL; m++) {
730 error = ap_add_module(*m, process->pconf);
741 AP_DECLARE(const char *) ap_find_module_name(module *m)
746 AP_DECLARE(module *) ap_find_linked_module(const char *name)
750 for (modp = ap_top_module; modp; modp = modp->next) {
751 if (strcmp(modp->name, name) == 0)
758 /*****************************************************************
760 * Resource, access, and .htaccess config files now parsed by a common
763 * Let's begin with the basics; parsing the line and
764 * invoking the function...
767 #define AP_MAX_ARGC 64
769 static const char *invoke_cmd(const command_rec *cmd, cmd_parms *parms,
770 void *mconfig, const char *args)
773 const char *errmsg = NULL;
775 if ((parms->override & cmd->req_override) == 0)
776 return apr_pstrcat(parms->pool, cmd->name, " not allowed here", NULL);
778 parms->info = cmd->cmd_data;
781 switch (cmd->args_how) {
783 #ifdef RESOLVE_ENV_PER_TOKEN
784 args = ap_resolve_env(parms->pool,args);
786 return cmd->AP_RAW_ARGS(parms, mconfig, args);
790 char *argv[AP_MAX_ARGC];
794 w = ap_getword_conf(parms->pool, &args);
795 if (*w == '\0' && *args == '\0') {
800 } while (argc < AP_MAX_ARGC && *args != '\0');
802 return cmd->AP_TAKE_ARGV(parms, mconfig, argc, argv);
807 return apr_pstrcat(parms->pool, cmd->name, " takes no arguments",
810 return cmd->AP_NO_ARGS(parms, mconfig);
813 w = ap_getword_conf(parms->pool, &args);
815 if (*w == '\0' || *args != 0)
816 return apr_pstrcat(parms->pool, cmd->name, " takes one argument",
817 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
819 return cmd->AP_TAKE1(parms, mconfig, w);
822 w = ap_getword_conf(parms->pool, &args);
823 w2 = ap_getword_conf(parms->pool, &args);
825 if (*w == '\0' || *w2 == '\0' || *args != 0)
826 return apr_pstrcat(parms->pool, cmd->name, " takes two arguments",
827 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
829 return cmd->AP_TAKE2(parms, mconfig, w, w2);
832 w = ap_getword_conf(parms->pool, &args);
833 w2 = ap_getword_conf(parms->pool, &args);
835 if (*w == '\0' || *args != 0)
836 return apr_pstrcat(parms->pool, cmd->name, " takes 1-2 arguments",
837 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
839 return cmd->AP_TAKE2(parms, mconfig, w, *w2 ? w2 : NULL);
842 w = ap_getword_conf(parms->pool, &args);
843 w2 = ap_getword_conf(parms->pool, &args);
844 w3 = ap_getword_conf(parms->pool, &args);
846 if (*w == '\0' || *w2 == '\0' || *w3 == '\0' || *args != 0)
847 return apr_pstrcat(parms->pool, cmd->name, " takes three arguments",
848 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
850 return cmd->AP_TAKE3(parms, mconfig, w, w2, w3);
853 w = ap_getword_conf(parms->pool, &args);
854 w2 = ap_getword_conf(parms->pool, &args);
855 w3 = *args ? ap_getword_conf(parms->pool, &args) : NULL;
857 if (*w == '\0' || *w2 == '\0' || *args != 0)
858 return apr_pstrcat(parms->pool, cmd->name,
859 " takes two or three arguments",
860 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
862 return cmd->AP_TAKE3(parms, mconfig, w, w2, w3);
865 w = ap_getword_conf(parms->pool, &args);
866 w2 = *args ? ap_getword_conf(parms->pool, &args) : NULL;
867 w3 = *args ? ap_getword_conf(parms->pool, &args) : NULL;
869 if (*w == '\0' || *args != 0)
870 return apr_pstrcat(parms->pool, cmd->name,
871 " takes one, two or three arguments",
872 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
874 return cmd->AP_TAKE3(parms, mconfig, w, w2, w3);
877 w = ap_getword_conf(parms->pool, &args);
878 w2 = *args ? ap_getword_conf(parms->pool, &args) : NULL;
879 w3 = *args ? ap_getword_conf(parms->pool, &args) : NULL;
881 if (*w == '\0' || (w2 && *w2 && !w3) || *args != 0)
882 return apr_pstrcat(parms->pool, cmd->name,
883 " takes one or three arguments",
884 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
886 return cmd->AP_TAKE3(parms, mconfig, w, w2, w3);
889 while (*(w = ap_getword_conf(parms->pool, &args)) != '\0') {
891 errmsg = cmd->AP_TAKE1(parms, mconfig, w);
893 if (errmsg && strcmp(errmsg, DECLINE_CMD) != 0)
900 w = ap_getword_conf(parms->pool, &args);
902 if (*w == '\0' || *args == 0)
903 return apr_pstrcat(parms->pool, cmd->name,
904 " requires at least two arguments",
905 cmd->errmsg ? ", " : NULL, cmd->errmsg, NULL);
907 while (*(w2 = ap_getword_conf(parms->pool, &args)) != '\0') {
909 errmsg = cmd->AP_TAKE2(parms, mconfig, w, w2);
911 if (errmsg && strcmp(errmsg, DECLINE_CMD) != 0)
918 w = ap_getword_conf(parms->pool, &args);
920 if (*w == '\0' || (strcasecmp(w, "on") && strcasecmp(w, "off")))
921 return apr_pstrcat(parms->pool, cmd->name, " must be On or Off",
924 return cmd->AP_FLAG(parms, mconfig, strcasecmp(w, "off") != 0);
927 return apr_pstrcat(parms->pool, cmd->name,
928 " is improperly configured internally (server bug)",
933 AP_CORE_DECLARE(const command_rec *) ap_find_command(const char *name,
934 const command_rec *cmds)
937 if (!strcasecmp(name, cmds->name))
946 AP_CORE_DECLARE(const command_rec *) ap_find_command_in_modules(
947 const char *cmd_name, module **mod)
949 const command_rec *cmdp;
952 for (modp = *mod; modp; modp = modp->next) {
953 if (modp->cmds && (cmdp = ap_find_command(cmd_name, modp->cmds))) {
962 AP_CORE_DECLARE(void *) ap_set_config_vectors(server_rec *server,
963 ap_conf_vector_t *section_vector,
965 module *mod, apr_pool_t *pconf)
967 void *section_config = ap_get_module_config(section_vector, mod);
968 void *server_config = ap_get_module_config(server->module_config, mod);
970 if (!section_config && mod->create_dir_config) {
971 /* ### need to fix the create_dir_config functions' prototype... */
972 section_config = (*mod->create_dir_config)(pconf, (char *)section);
973 ap_set_module_config(section_vector, mod, section_config);
976 if (!server_config && mod->create_server_config) {
977 server_config = (*mod->create_server_config)(pconf, server);
978 ap_set_module_config(server->module_config, mod, server_config);
981 return section_config;
984 static const char *execute_now(char *cmd_line, const char *args,
986 apr_pool_t *p, apr_pool_t *ptemp,
987 ap_directive_t **sub_tree,
988 ap_directive_t *parent);
990 static const char *ap_build_config_sub(apr_pool_t *p, apr_pool_t *temp_pool,
991 const char *l, cmd_parms *parms,
992 ap_directive_t **current,
993 ap_directive_t **curr_parent,
994 ap_directive_t **conftree)
996 const char *retval = NULL;
999 ap_directive_t *newdir;
1000 module *mod = ap_top_module;
1001 const command_rec *cmd;
1003 if (*l == '#' || *l == '\0')
1006 #if RESOLVE_ENV_PER_TOKEN
1009 args = ap_resolve_env(temp_pool, l);
1012 cmd_name = ap_getword_conf(p, &args);
1013 if (*cmd_name == '\0') {
1014 /* Note: this branch should not occur. An empty line should have
1015 * triggered the exit further above.
1020 if (cmd_name[1] != '/') {
1021 char *lastc = cmd_name + strlen(cmd_name) - 1;
1022 if (*lastc == '>') {
1025 if (cmd_name[0] == '<' && *args == '\0') {
1030 newdir = apr_pcalloc(p, sizeof(ap_directive_t));
1031 newdir->filename = parms->config_file->name;
1032 newdir->line_num = parms->config_file->line_number;
1033 newdir->directive = cmd_name;
1034 newdir->args = apr_pstrdup(p, args);
1036 if ((cmd = ap_find_command_in_modules(cmd_name, &mod)) != NULL) {
1037 if (cmd->req_override & EXEC_ON_READ) {
1038 ap_directive_t *sub_tree = NULL;
1040 parms->err_directive = newdir;
1041 retval = execute_now(cmd_name, args, parms, p, temp_pool,
1042 &sub_tree, *curr_parent);
1044 (*current)->next = sub_tree;
1047 *current = sub_tree;
1049 (*curr_parent)->first_child = (*current);
1052 (*current)->parent = (*curr_parent);
1057 /* Before walking *current to the end of the list,
1058 * set the head to *current.
1060 *conftree = *current;
1062 while ((*current)->next != NULL) {
1063 (*current) = (*current)->next;
1064 (*current)->parent = (*curr_parent);
1071 if (cmd_name[0] == '<') {
1072 if (cmd_name[1] != '/') {
1073 (*current) = ap_add_node(curr_parent, *current, newdir, 1);
1075 else if (*curr_parent == NULL) {
1076 parms->err_directive = newdir;
1077 return apr_pstrcat(p, cmd_name,
1078 " without matching <", cmd_name + 2,
1082 char *bracket = cmd_name + strlen(cmd_name) - 1;
1084 if (*bracket != '>') {
1085 parms->err_directive = newdir;
1086 return apr_pstrcat(p, cmd_name,
1087 "> directive missing closing '>'", NULL);
1092 if (strcasecmp(cmd_name + 2,
1093 (*curr_parent)->directive + 1) != 0) {
1094 parms->err_directive = newdir;
1095 return apr_pstrcat(p, "Expected </",
1096 (*curr_parent)->directive + 1, "> but saw ",
1097 cmd_name, ">", NULL);
1102 /* done with this section; move up a level */
1103 *current = *curr_parent;
1104 *curr_parent = (*current)->parent;
1108 *current = ap_add_node(curr_parent, *current, newdir, 0);
1114 AP_DECLARE(const char *) ap_build_cont_config(apr_pool_t *p,
1115 apr_pool_t *temp_pool,
1117 ap_directive_t **current,
1118 ap_directive_t **curr_parent,
1119 char *orig_directive)
1124 ap_directive_t *sub_tree = NULL;
1126 /* Since this function can be called recursively, allocate
1127 * the temporary 8k string buffer from the temp_pool rather
1128 * than the stack to avoid over-running a fixed length stack.
1130 l = apr_palloc(temp_pool, MAX_STRING_LEN);
1132 bracket = apr_pstrcat(p, orig_directive + 1, ">", NULL);
1133 while (!(ap_cfg_getline(l, MAX_STRING_LEN, parms->config_file))) {
1134 if (!memcmp(l, "</", 2)
1135 && (strcasecmp(l + 2, bracket) == 0)
1136 && (*curr_parent == NULL)) {
1139 retval = ap_build_config_sub(p, temp_pool, l, parms, current,
1140 curr_parent, &sub_tree);
1144 if (sub_tree == NULL && curr_parent != NULL) {
1145 sub_tree = *curr_parent;
1148 if (sub_tree == NULL && current != NULL) {
1149 sub_tree = *current;
1153 *current = sub_tree;
1157 static const char *ap_walk_config_sub(const ap_directive_t *current,
1159 ap_conf_vector_t *section_vector)
1161 const command_rec *cmd;
1163 char *dir = apr_pstrdup(parms->pool, current->directive);
1165 ap_str_tolower(dir);
1167 ml = apr_hash_get(ap_config_hash, dir, APR_HASH_KEY_STRING);
1170 parms->err_directive = current;
1171 return apr_pstrcat(parms->pool, "Invalid command '",
1173 "', perhaps misspelled or defined by a module "
1174 "not included in the server configuration",
1178 for ( ; ml != NULL; ml = ml->next) {
1179 void *dir_config = ap_set_config_vectors(parms->server,
1187 /* Once was enough? */
1188 if (cmd->req_override & EXEC_ON_READ) {
1192 retval = invoke_cmd(cmd, parms, dir_config, current->args);
1194 if (retval != NULL && strcmp(retval, DECLINE_CMD) != 0) {
1195 /* If the directive in error has already been set, don't
1196 * replace it. Otherwise, an error inside a container
1197 * will be reported as occuring on the first line of the
1200 if (!parms->err_directive) {
1201 parms->err_directive = current;
1210 AP_DECLARE(const char *) ap_walk_config(ap_directive_t *current,
1212 ap_conf_vector_t *section_vector)
1214 ap_conf_vector_t *oldconfig = parms->context;
1216 parms->context = section_vector;
1218 /* scan through all directives, executing each one */
1219 for (; current != NULL; current = current->next) {
1222 parms->directive = current;
1224 /* actually parse the command and execute the correct function */
1225 errmsg = ap_walk_config_sub(current, parms, section_vector);
1226 if (errmsg != NULL) {
1227 /* restore the context (just in case) */
1228 parms->context = oldconfig;
1233 parms->context = oldconfig;
1237 AP_DECLARE(const char *) ap_build_config(cmd_parms *parms,
1238 apr_pool_t *p, apr_pool_t *temp_pool,
1239 ap_directive_t **conftree)
1241 ap_directive_t *current = *conftree;
1242 ap_directive_t *curr_parent = NULL;
1243 char *l = apr_palloc (temp_pool, MAX_STRING_LEN);
1246 if (current != NULL) {
1247 while (current->next) {
1248 current = current->next;
1252 while (!(ap_cfg_getline(l, MAX_STRING_LEN, parms->config_file))) {
1253 errmsg = ap_build_config_sub(p, temp_pool, l, parms,
1254 ¤t, &curr_parent, conftree);
1258 if (*conftree == NULL && curr_parent != NULL) {
1259 *conftree = curr_parent;
1262 if (*conftree == NULL && current != NULL) {
1263 *conftree = current;
1267 if (curr_parent != NULL) {
1270 while (curr_parent != NULL) {
1271 errmsg = apr_psprintf(p, "%s%s%s:%u: %s> was not closed.",
1273 *errmsg == '\0' ? "" : APR_EOL_STR,
1274 curr_parent->filename,
1275 curr_parent->line_num,
1276 curr_parent->directive);
1278 parms->err_directive = curr_parent;
1279 curr_parent = curr_parent->parent;
1289 * Generic command functions...
1292 AP_DECLARE_NONSTD(const char *) ap_set_string_slot(cmd_parms *cmd,
1296 int offset = (int)(long)cmd->info;
1298 *(const char **)((char *)struct_ptr + offset) = arg;
1303 AP_DECLARE_NONSTD(const char *) ap_set_int_slot(cmd_parms *cmd,
1308 char *error_str = NULL;
1309 int offset = (int)(long)cmd->info;
1311 *(int *)((char*)struct_ptr + offset) = strtol(arg, &endptr, 10);
1313 if ((*arg == '\0') || (*endptr != '\0')) {
1314 error_str = apr_psprintf(cmd->pool,
1315 "Invalid value for directive %s, expected integer",
1316 cmd->directive->directive);
1322 AP_DECLARE_NONSTD(const char *) ap_set_string_slot_lower(cmd_parms *cmd,
1326 char *arg = apr_pstrdup(cmd->pool,arg_);
1327 int offset = (int)(long)cmd->info;
1329 ap_str_tolower(arg);
1330 *(char **)((char *)struct_ptr + offset) = arg;
1335 AP_DECLARE_NONSTD(const char *) ap_set_flag_slot(cmd_parms *cmd,
1336 void *struct_ptr_v, int arg)
1338 int offset = (int)(long)cmd->info;
1339 char *struct_ptr = (char *)struct_ptr_v;
1341 *(int *)(struct_ptr + offset) = arg ? 1 : 0;
1346 AP_DECLARE_NONSTD(const char *) ap_set_file_slot(cmd_parms *cmd, void *struct_ptr,
1349 /* Prepend server_root to relative arg.
1350 * This allows most args to be independent of server_root,
1351 * so the server can be moved or mirrored with less pain.
1354 int offset = (int)(long)cmd->info;
1356 path = ap_server_root_relative(cmd->pool, arg);
1359 return apr_pstrcat(cmd->pool, "Invalid file path ",
1363 *(const char **) ((char*)struct_ptr + offset) = path;
1368 AP_DECLARE_NONSTD(const char *) ap_set_deprecated(cmd_parms *cmd,
1372 return cmd->cmd->errmsg;
1375 AP_DECLARE(void) ap_reset_module_loglevels(struct ap_logconf *l, int val)
1377 if (l->module_levels)
1378 memset(l->module_levels, val, conf_vector_length);
1381 AP_DECLARE(void) ap_set_module_loglevel(apr_pool_t *pool, struct ap_logconf *l,
1382 int index, int level)
1384 if (!l->module_levels) {
1385 l->module_levels = apr_palloc(pool, conf_vector_length);
1386 if (l->level == APLOG_UNSET) {
1387 ap_reset_module_loglevels(l, APLOG_UNSET);
1390 ap_reset_module_loglevels(l, APLOG_NO_MODULE);
1394 l->module_levels[index] = level;
1397 /*****************************************************************
1399 * Reading whole config files...
1402 static cmd_parms default_parms =
1403 {NULL, 0, -1, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL};
1405 AP_DECLARE(char *) ap_server_root_relative(apr_pool_t *p, const char *file)
1407 char *newpath = NULL;
1409 rv = apr_filepath_merge(&newpath, ap_server_root, file,
1410 APR_FILEPATH_TRUENAME, p);
1411 if (newpath && (rv == APR_SUCCESS || APR_STATUS_IS_EPATHWILD(rv)
1412 || APR_STATUS_IS_ENOENT(rv)
1413 || APR_STATUS_IS_ENOTDIR(rv))) {
1421 AP_DECLARE(const char *) ap_soak_end_container(cmd_parms *cmd, char *directive)
1423 char l[MAX_STRING_LEN];
1427 while(!(ap_cfg_getline(l, MAX_STRING_LEN, cmd->config_file))) {
1428 #if RESOLVE_ENV_PER_TOKEN
1431 args = ap_resolve_env(cmd->temp_pool, l);
1434 cmd_name = ap_getword_conf(cmd->pool, &args);
1435 if (cmd_name[0] == '<') {
1436 if (cmd_name[1] == '/') {
1437 cmd_name[strlen(cmd_name) - 1] = '\0';
1439 if (strcasecmp(cmd_name + 2, directive + 1) != 0) {
1440 return apr_pstrcat(cmd->pool, "Expected </",
1441 directive + 1, "> but saw ",
1442 cmd_name, ">", NULL);
1445 return NULL; /* found end of container */
1450 if (*args == '\0' && cmd_name[strlen(cmd_name) - 1] == '>') {
1451 cmd_name[strlen(cmd_name) - 1] = '\0';
1454 if ((msg = ap_soak_end_container(cmd, cmd_name)) != NULL) {
1461 return apr_pstrcat(cmd->pool, "Expected </",
1462 directive + 1, "> before end of configuration",
1466 static const char *execute_now(char *cmd_line, const char *args,
1468 apr_pool_t *p, apr_pool_t *ptemp,
1469 ap_directive_t **sub_tree,
1470 ap_directive_t *parent)
1472 const command_rec *cmd;
1474 char *dir = apr_pstrdup(parms->pool, cmd_line);
1476 ap_str_tolower(dir);
1478 ml = apr_hash_get(ap_config_hash, dir, APR_HASH_KEY_STRING);
1481 return apr_pstrcat(parms->pool, "Invalid command '",
1483 "', perhaps misspelled or defined by a module "
1484 "not included in the server configuration",
1488 for ( ; ml != NULL; ml = ml->next) {
1492 retval = invoke_cmd(cmd, parms, sub_tree, args);
1494 if (retval != NULL) {
1502 /* This structure and the following functions are needed for the
1503 * table-based config file reading. They are passed to the
1504 * cfg_open_custom() routine.
1507 /* Structure to be passed to cfg_open_custom(): it contains an
1508 * index which is incremented from 0 to nelts on each call to
1509 * cfg_getline() (which in turn calls arr_elts_getstr())
1510 * and an apr_array_header_t pointer for the string array.
1513 apr_array_header_t *array;
1518 /* arr_elts_getstr() returns the next line from the string array. */
1519 static void *arr_elts_getstr(void *buf, size_t bufsiz, void *param)
1521 arr_elts_param_t *arr_param = (arr_elts_param_t *)param;
1523 /* End of array reached? */
1524 if (++arr_param->curr_idx > arr_param->array->nelts)
1527 /* return the line */
1529 ((char **)arr_param->array->elts)[arr_param->curr_idx - 1],
1536 /* arr_elts_close(): dummy close routine (makes sure no more lines can be read) */
1537 static int arr_elts_close(void *param)
1539 arr_elts_param_t *arr_param = (arr_elts_param_t *)param;
1541 arr_param->curr_idx = arr_param->array->nelts;
1546 static const char *process_command_config(server_rec *s,
1547 apr_array_header_t *arr,
1548 ap_directive_t **conftree,
1554 arr_elts_param_t arr_parms;
1556 arr_parms.curr_idx = 0;
1557 arr_parms.array = arr;
1559 if (ap_config_hash == NULL) {
1560 rebuild_conf_hash(s->process->pconf, 1);
1563 parms = default_parms;
1565 parms.temp_pool = ptemp;
1567 parms.override = (RSRC_CONF | OR_ALL) & ~(OR_AUTHCFG | OR_LIMIT);
1568 parms.override_opts = OPT_ALL | OPT_SYM_OWNER | OPT_MULTI;
1570 parms.config_file = ap_pcfg_open_custom(p, "-c/-C directives",
1572 arr_elts_getstr, arr_elts_close);
1574 errmsg = ap_build_config(&parms, p, ptemp, conftree);
1575 ap_cfg_closefile(parms.config_file);
1578 return apr_pstrcat(p, "Syntax error in -C/-c directive: ", errmsg,
1589 static int fname_alphasort(const void *fn1, const void *fn2)
1591 const fnames *f1 = fn1;
1592 const fnames *f2 = fn2;
1594 return strcmp(f1->fname,f2->fname);
1597 AP_DECLARE(const char *) ap_process_resource_config(server_rec *s,
1599 ap_directive_t **conftree,
1603 ap_configfile_t *cfp;
1608 parms = default_parms;
1610 parms.temp_pool = ptemp;
1612 parms.override = (RSRC_CONF | OR_ALL) & ~(OR_AUTHCFG | OR_LIMIT);
1613 parms.override_opts = OPT_ALL | OPT_SYM_OWNER | OPT_MULTI;
1615 rv = ap_pcfg_openfile(&cfp, p, fname);
1616 if (rv != APR_SUCCESS) {
1618 return apr_psprintf(p, "Could not open configuration file %s: %s",
1619 fname, apr_strerror(rv, errmsg, sizeof errmsg));
1622 parms.config_file = cfp;
1623 error = ap_build_config(&parms, p, ptemp, conftree);
1624 ap_cfg_closefile(cfp);
1627 return apr_psprintf(p, "Syntax error on line %d of %s: %s",
1628 parms.err_directive->line_num,
1629 parms.err_directive->filename, error);
1635 static const char *process_resource_config_nofnmatch(server_rec *s,
1637 ap_directive_t **conftree,
1646 if (ap_is_directory(p, fname)) {
1650 apr_array_header_t *candidates = NULL;
1652 char *path = apr_pstrdup(p, fname);
1654 if (++depth > AP_MAX_INCLUDE_DIR_DEPTH) {
1655 return apr_psprintf(p, "Directory %s exceeds the maximum include "
1656 "directory nesting level of %u. You have "
1657 "probably a recursion somewhere.", path,
1658 AP_MAX_INCLUDE_DIR_DEPTH);
1662 * first course of business is to grok all the directory
1663 * entries here and store 'em away. Recall we need full pathnames
1666 rv = apr_dir_open(&dirp, path, p);
1667 if (rv != APR_SUCCESS) {
1669 return apr_psprintf(p, "Could not open config directory %s: %s",
1670 path, apr_strerror(rv, errmsg, sizeof errmsg));
1673 candidates = apr_array_make(p, 1, sizeof(fnames));
1674 while (apr_dir_read(&dirent, APR_FINFO_DIRENT, dirp) == APR_SUCCESS) {
1675 /* strip out '.' and '..' */
1676 if (strcmp(dirent.name, ".")
1677 && strcmp(dirent.name, "..")) {
1678 fnew = (fnames *) apr_array_push(candidates);
1679 fnew->fname = ap_make_full_path(p, path, dirent.name);
1683 apr_dir_close(dirp);
1684 if (candidates->nelts != 0) {
1685 qsort((void *) candidates->elts, candidates->nelts,
1686 sizeof(fnames), fname_alphasort);
1689 * Now recurse these... we handle errors and subdirectories
1690 * via the recursion, which is nice
1692 for (current = 0; current < candidates->nelts; ++current) {
1693 fnew = &((fnames *) candidates->elts)[current];
1694 error = process_resource_config_nofnmatch(s, fnew->fname,
1706 return ap_process_resource_config(s, fname, conftree, p, ptemp);
1709 static const char *process_resource_config_fnmatch(server_rec *s,
1712 ap_directive_t **conftree,
1722 apr_array_header_t *candidates = NULL;
1726 /* find the first part of the filename */
1727 rest = ap_strchr_c(fname, '/');
1729 fname = apr_pstrndup(ptemp, fname, rest - fname);
1733 /* optimisation - if the filename isn't a wildcard, process it directly */
1734 if (!apr_fnmatch_test(fname)) {
1735 path = ap_make_full_path(ptemp, path, fname);
1737 return process_resource_config_nofnmatch(s, path,
1739 ptemp, 0, optional);
1742 return process_resource_config_fnmatch(s, path, rest,
1744 ptemp, 0, optional);
1749 * first course of business is to grok all the directory
1750 * entries here and store 'em away. Recall we need full pathnames
1753 rv = apr_dir_open(&dirp, path, ptemp);
1754 if (rv != APR_SUCCESS) {
1756 return apr_psprintf(p, "Could not open config directory %s: %s",
1757 path, apr_strerror(rv, errmsg, sizeof errmsg));
1760 candidates = apr_array_make(ptemp, 1, sizeof(fnames));
1761 while (apr_dir_read(&dirent, APR_FINFO_DIRENT | APR_FINFO_TYPE, dirp) == APR_SUCCESS) {
1762 /* strip out '.' and '..' */
1763 if (strcmp(dirent.name, ".")
1764 && strcmp(dirent.name, "..")
1765 && (apr_fnmatch(fname, dirent.name,
1766 APR_FNM_PERIOD) == APR_SUCCESS)) {
1767 const char *full_path = ap_make_full_path(ptemp, path, dirent.name);
1768 /* If matching internal to path, and we happen to match something
1769 * other than a directory, skip it
1771 if (rest && (rv == APR_SUCCESS) && (dirent.filetype != APR_DIR)) {
1774 fnew = (fnames *) apr_array_push(candidates);
1775 fnew->fname = full_path;
1779 apr_dir_close(dirp);
1780 if (candidates->nelts != 0) {
1783 qsort((void *) candidates->elts, candidates->nelts,
1784 sizeof(fnames), fname_alphasort);
1787 * Now recurse these... we handle errors and subdirectories
1788 * via the recursion, which is nice
1790 for (current = 0; current < candidates->nelts; ++current) {
1791 fnew = &((fnames *) candidates->elts)[current];
1793 error = process_resource_config_nofnmatch(s, fnew->fname,
1795 ptemp, 0, optional);
1798 error = process_resource_config_fnmatch(s, fnew->fname, rest,
1800 ptemp, 0, optional);
1810 return apr_psprintf(p, "No matches for the wildcard '%s' in '%s', failing "
1811 "(use IncludeOptional if required)", fname, path);
1818 AP_DECLARE(const char *) ap_process_fnmatch_configs(server_rec *s,
1820 ap_directive_t **conftree,
1825 /* XXX: lstat() won't work on the wildcard pattern...
1828 /* don't require conf/httpd.conf if we have a -C or -c switch */
1829 if ((ap_server_pre_read_config->nelts
1830 || ap_server_post_read_config->nelts)
1831 && !(strcmp(fname, ap_server_root_relative(p, SERVER_CONFIG_FILE)))) {
1834 if (apr_stat(&finfo, fname, APR_FINFO_LINK | APR_FINFO_TYPE, p) != APR_SUCCESS)
1838 if (!apr_fnmatch_test(fname)) {
1839 return ap_process_resource_config(s, fname, conftree, p, ptemp);
1842 apr_status_t status;
1843 const char *rootpath, *filepath = fname;
1845 /* locate the start of the directories proper */
1846 status = apr_filepath_root(&rootpath, &filepath, APR_FILEPATH_TRUENAME, ptemp);
1848 /* we allow APR_SUCCESS and APR_EINCOMPLETE */
1849 if (APR_ERELATIVE == status) {
1850 return apr_pstrcat(p, "Include must have an absolute path, ", fname, NULL);
1852 else if (APR_EBADPATH == status) {
1853 return apr_pstrcat(p, "Include has a bad path, ", fname, NULL);
1856 /* walk the filepath */
1857 return process_resource_config_fnmatch(s, rootpath, filepath, conftree, p, ptemp,
1865 AP_DECLARE(int) ap_process_config_tree(server_rec *s,
1866 ap_directive_t *conftree,
1873 parms = default_parms;
1875 parms.temp_pool = ptemp;
1877 parms.override = (RSRC_CONF | OR_ALL) & ~(OR_AUTHCFG | OR_LIMIT);
1878 parms.override_opts = OPT_ALL | OPT_SYM_OWNER | OPT_MULTI;
1881 errmsg = ap_walk_config(conftree, &parms, s->lookup_defaults);
1883 ap_log_perror(APLOG_MARK, APLOG_STARTUP, 0, p,
1884 "Syntax error on line %d of %s:",
1885 parms.err_directive->line_num,
1886 parms.err_directive->filename);
1887 ap_log_perror(APLOG_MARK, APLOG_STARTUP, 0, p,
1889 return HTTP_INTERNAL_SERVER_ERROR;
1895 AP_CORE_DECLARE(int) ap_parse_htaccess(ap_conf_vector_t **result,
1896 request_rec *r, int override,
1898 const char *d, const char *access_name)
1900 ap_configfile_t *f = NULL;
1902 char *filename = NULL;
1903 const struct htaccess_result *cache;
1904 struct htaccess_result *new;
1905 ap_conf_vector_t *dc = NULL;
1906 apr_status_t status;
1908 /* firstly, search cache */
1909 for (cache = r->htaccess; cache != NULL; cache = cache->next) {
1910 if (cache->override == override && strcmp(cache->dir, d) == 0) {
1911 *result = cache->htaccess;
1916 parms = default_parms;
1917 parms.override = override;
1918 parms.override_opts = override_opts;
1919 parms.pool = r->pool;
1920 parms.temp_pool = r->pool;
1921 parms.server = r->server;
1922 parms.path = apr_pstrdup(r->pool, d);
1924 /* loop through the access names and find the first one */
1925 while (access_name[0]) {
1926 /* AFAICT; there is no use of the actual 'filename' against
1927 * any canonicalization, so we will simply take the given
1928 * name, ignoring case sensitivity and aliases
1930 filename = ap_make_full_path(r->pool, d,
1931 ap_getword_conf(r->pool, &access_name));
1932 status = ap_pcfg_openfile(&f, r->pool, filename);
1934 if (status == APR_SUCCESS) {
1936 ap_directive_t *temptree = NULL;
1938 dc = ap_create_per_dir_config(r->pool);
1940 parms.config_file = f;
1941 errmsg = ap_build_config(&parms, r->pool, r->pool, &temptree);
1943 errmsg = ap_walk_config(temptree, &parms, dc);
1945 ap_cfg_closefile(f);
1948 ap_log_rerror(APLOG_MARK, APLOG_ALERT, 0, r,
1949 "%s: %s", filename, errmsg);
1950 return HTTP_INTERNAL_SERVER_ERROR;
1957 if (!APR_STATUS_IS_ENOENT(status)
1958 && !APR_STATUS_IS_ENOTDIR(status)) {
1959 ap_log_rerror(APLOG_MARK, APLOG_CRIT, status, r,
1960 "%s pcfg_openfile: unable to check htaccess file, "
1961 "ensure it is readable",
1963 apr_table_setn(r->notes, "error-notes",
1964 "Server unable to read htaccess file, denying "
1965 "access to be safe");
1966 return HTTP_FORBIDDEN;
1972 new = apr_palloc(r->pool, sizeof(struct htaccess_result));
1973 new->dir = parms.path;
1974 new->override = override;
1975 new->override_opts = override_opts;
1978 /* add to head of list */
1979 new->next = r->htaccess;
1985 AP_CORE_DECLARE(const char *) ap_init_virtual_host(apr_pool_t *p,
1986 const char *hostname,
1987 server_rec *main_server,
1990 server_rec *s = (server_rec *) apr_pcalloc(p, sizeof(server_rec));
1992 /* TODO: this crap belongs in http_core */
1993 s->process = main_server->process;
1994 s->server_admin = NULL;
1995 s->server_hostname = NULL;
1996 s->server_scheme = NULL;
1997 s->error_fname = NULL;
1999 s->keep_alive_timeout = 0;
2001 s->keep_alive_max = -1;
2002 s->error_log = main_server->error_log;
2003 s->log.level = main_server->log.level;
2004 s->log.module_levels = NULL;
2005 /* useful default, otherwise we get a port of 0 on redirects */
2006 s->port = main_server->port;
2010 s->names = apr_array_make(p, 4, sizeof(char **));
2011 s->wild_names = apr_array_make(p, 4, sizeof(char **));
2013 s->module_config = create_empty_config(p);
2014 s->lookup_defaults = ap_create_per_dir_config(p);
2016 s->limit_req_line = main_server->limit_req_line;
2017 s->limit_req_fieldsize = main_server->limit_req_fieldsize;
2018 s->limit_req_fields = main_server->limit_req_fields;
2022 return ap_parse_vhost_addrs(p, hostname, s);
2025 AP_DECLARE(struct ap_logconf *) ap_new_log_config(apr_pool_t *p,
2026 const struct ap_logconf *old)
2028 struct ap_logconf *l = apr_pcalloc(p, sizeof(struct ap_logconf));
2030 l->level = old->level;
2031 if (old->module_levels) {
2033 apr_pmemdup(p, old->module_levels, conf_vector_length);
2037 l->level = APLOG_UNSET;
2042 AP_DECLARE(void) ap_merge_log_config(const struct ap_logconf *old,
2043 struct ap_logconf *new)
2045 if (new->level != APLOG_UNSET) {
2046 /* Setting the main loglevel resets all per-module log levels.
2047 * I.e. if new->level has been set, we must ignore old->module_levels.
2052 new->level = old->level;
2053 if (new->module_levels == NULL) {
2054 new->module_levels = old->module_levels;
2056 else if (old->module_levels != NULL) {
2058 for (i = 0; i < conf_vector_length; i++) {
2059 if (new->module_levels[i] == APLOG_UNSET)
2060 new->module_levels[i] = old->module_levels[i];
2065 AP_DECLARE(void) ap_fixup_virtual_hosts(apr_pool_t *p, server_rec *main_server)
2068 core_dir_config *dconf = ap_get_module_config(main_server->lookup_defaults,
2070 dconf->log = &main_server->log;
2072 for (virt = main_server->next; virt; virt = virt->next) {
2073 merge_server_configs(p, main_server->module_config,
2074 virt->module_config);
2076 virt->lookup_defaults =
2077 ap_merge_per_dir_configs(p, main_server->lookup_defaults,
2078 virt->lookup_defaults);
2080 if (virt->server_admin == NULL)
2081 virt->server_admin = main_server->server_admin;
2083 if (virt->timeout == 0)
2084 virt->timeout = main_server->timeout;
2086 if (virt->keep_alive_timeout == 0)
2087 virt->keep_alive_timeout = main_server->keep_alive_timeout;
2089 if (virt->keep_alive == -1)
2090 virt->keep_alive = main_server->keep_alive;
2092 if (virt->keep_alive_max == -1)
2093 virt->keep_alive_max = main_server->keep_alive_max;
2095 ap_merge_log_config(&main_server->log, &virt->log);
2097 dconf = ap_get_module_config(virt->lookup_defaults, &core_module);
2098 dconf->log = &virt->log;
2100 /* XXX: this is really something that should be dealt with by a
2101 * post-config api phase
2103 ap_core_reorder_directories(p, virt);
2106 ap_core_reorder_directories(p, main_server);
2109 /*****************************************************************
2111 * Getting *everything* configured...
2114 static void init_config_globals(apr_pool_t *p)
2116 /* Global virtual host hash bucket pointers. Init to null. */
2117 ap_init_vhost_config(p);
2120 static server_rec *init_server_config(process_rec *process, apr_pool_t *p)
2123 server_rec *s = (server_rec *) apr_pcalloc(p, sizeof(server_rec));
2125 apr_file_open_stderr(&s->error_log, p);
2126 s->process = process;
2128 s->server_admin = DEFAULT_ADMIN;
2129 s->server_hostname = NULL;
2130 s->server_scheme = NULL;
2131 s->error_fname = DEFAULT_ERRORLOG;
2132 s->log.level = DEFAULT_LOGLEVEL;
2133 s->log.module_levels = NULL;
2134 s->limit_req_line = DEFAULT_LIMIT_REQUEST_LINE;
2135 s->limit_req_fieldsize = DEFAULT_LIMIT_REQUEST_FIELDSIZE;
2136 s->limit_req_fields = DEFAULT_LIMIT_REQUEST_FIELDS;
2137 s->timeout = apr_time_from_sec(DEFAULT_TIMEOUT);
2138 s->keep_alive_timeout = apr_time_from_sec(DEFAULT_KEEPALIVE_TIMEOUT);
2139 s->keep_alive_max = DEFAULT_KEEPALIVE;
2142 s->addrs = apr_pcalloc(p, sizeof(server_addr_rec));
2144 /* NOT virtual host; don't match any real network interface */
2145 rv = apr_sockaddr_info_get(&s->addrs->host_addr,
2146 NULL, APR_INET, 0, 0, p);
2147 ap_assert(rv == APR_SUCCESS); /* otherwise: bug or no storage */
2149 s->addrs->host_port = 0; /* matches any port */
2150 s->addrs->virthost = ""; /* must be non-NULL */
2151 s->names = s->wild_names = NULL;
2153 s->module_config = create_server_config(p, s);
2154 s->lookup_defaults = create_default_per_dir_config(p);
2160 static apr_status_t reset_conf_vector_length(void *dummy)
2162 conf_vector_length = max_modules;
2166 AP_DECLARE(server_rec*) ap_read_config(process_rec *process, apr_pool_t *ptemp,
2167 const char *filename,
2168 ap_directive_t **conftree)
2170 const char *confname, *error;
2171 apr_pool_t *p = process->pconf;
2172 server_rec *s = init_server_config(process, p);
2174 init_config_globals(p);
2176 /* All server-wide config files now have the SAME syntax... */
2177 error = process_command_config(s, ap_server_pre_read_config, conftree,
2180 ap_log_error(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT, 0, NULL, "%s: %s",
2181 ap_server_argv0, error);
2185 /* process_command_config may change the ServerRoot so
2186 * compute this config file name afterwards.
2188 confname = ap_server_root_relative(p, filename);
2191 ap_log_error(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT,
2192 APR_EBADPATH, NULL, "Invalid config file path %s",
2197 error = ap_process_resource_config(s, confname, conftree, p, ptemp);
2199 ap_log_error(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT, 0, NULL,
2200 "%s: %s", ap_server_argv0, error);
2205 * We have loaded the dynamic modules. From now on we know exactly how
2206 * long the config vectors need to be.
2208 conf_vector_length = total_modules;
2209 apr_pool_cleanup_register(p, NULL, reset_conf_vector_length,
2210 apr_pool_cleanup_null);
2212 error = process_command_config(s, ap_server_post_read_config, conftree,
2216 ap_log_error(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT, 0, NULL, "%s: %s",
2217 ap_server_argv0, error);
2224 AP_DECLARE(void) ap_single_module_configure(apr_pool_t *p, server_rec *s,
2227 if (m->create_server_config)
2228 ap_set_module_config(s->module_config, m,
2229 (*m->create_server_config)(p, s));
2231 if (m->create_dir_config)
2232 ap_set_module_config(s->lookup_defaults, m,
2233 (*m->create_dir_config)(p, NULL));
2236 AP_DECLARE(void) ap_run_rewrite_args(process_rec *process)
2240 for (m = ap_top_module; m; m = m->next) {
2241 if (m->rewrite_args) {
2242 (*m->rewrite_args)(process);
2247 /********************************************************************
2248 * Configuration directives are restricted in terms of where they may
2249 * appear in the main configuration files and/or .htaccess files according
2250 * to the bitmask req_override in the command_rec structure.
2251 * If any of the overrides set in req_override are also allowed in the
2252 * context in which the command is read, then the command is allowed.
2253 * The context is determined as follows:
2255 * inside *.conf --> override = (RSRC_CONF|OR_ALL)&~(OR_AUTHCFG|OR_LIMIT);
2256 * within <Directory> or <Location> --> override = OR_ALL|ACCESS_CONF;
2257 * within .htaccess --> override = AllowOverride for current directory;
2259 * the result is, well, a rather confusing set of possibilities for when
2260 * a particular directive is allowed to be used. This procedure prints
2261 * in English where the given (pc) directive can be used.
2263 static void show_overrides(const command_rec *pc, module *pm)
2267 printf("\tAllowed in *.conf ");
2268 if ((pc->req_override & (OR_OPTIONS | OR_FILEINFO | OR_INDEXES))
2269 || ((pc->req_override & RSRC_CONF)
2270 && ((pc->req_override & (ACCESS_CONF | OR_AUTHCFG | OR_LIMIT))))) {
2273 else if (pc->req_override & RSRC_CONF) {
2274 printf("only outside <Directory>, <Files> or <Location>");
2277 printf("only inside <Directory>, <Files> or <Location>");
2280 /* Warn if the directive is allowed inside <Directory> or .htaccess
2281 * but module doesn't support per-dir configuration
2283 if ((pc->req_override & (OR_ALL | ACCESS_CONF)) && !pm->create_dir_config)
2284 printf(" [no per-dir config]");
2286 if (pc->req_override & OR_ALL) {
2287 printf(" and in .htaccess\n\twhen AllowOverride");
2289 if ((pc->req_override & OR_ALL) == OR_ALL) {
2290 printf(" isn't None");
2293 printf(" includes ");
2295 if (pc->req_override & OR_AUTHCFG) {
2299 printf("AuthConfig");
2302 if (pc->req_override & OR_LIMIT) {
2309 if (pc->req_override & OR_OPTIONS) {
2316 if (pc->req_override & OR_FILEINFO) {
2323 if (pc->req_override & OR_INDEXES) {
2335 /* Show the preloaded configuration directives, the help string explaining
2336 * the directive arguments, in what module they are handled, and in
2337 * what parts of the configuration they are allowed. Used for httpd -L.
2339 AP_DECLARE(void) ap_show_directives(void)
2341 const command_rec *pc;
2344 for (n = 0; ap_loaded_modules[n]; ++n) {
2345 for (pc = ap_loaded_modules[n]->cmds; pc && pc->name; ++pc) {
2346 printf("%s (%s)\n", pc->name, ap_loaded_modules[n]->name);
2349 printf("\t%s\n", pc->errmsg);
2351 show_overrides(pc, ap_loaded_modules[n]);
2356 /* Show the preloaded module names. Used for httpd -l. */
2357 AP_DECLARE(void) ap_show_modules(void)
2361 printf("Compiled in modules:\n");
2362 for (n = 0; ap_loaded_modules[n]; ++n)
2363 printf(" %s\n", ap_loaded_modules[n]->name);
2366 AP_DECLARE(void *) ap_retained_data_get(const char *key)
2370 apr_pool_userdata_get((void *)&retained, key, ap_pglobal);
2374 AP_DECLARE(void *) ap_retained_data_create(const char *key, apr_size_t size)
2378 retained = apr_pcalloc(ap_pglobal, size);
2379 apr_pool_userdata_set((const void *)retained, key, apr_pool_cleanup_null, ap_pglobal);