Implement client-specific tags
[privoxy.git] / loadcfg.c
1 const char loadcfg_rcs[] = "$Id: loadcfg.c,v 1.147 2016/02/26 12:30:59 fabiankeil Exp $";
2 /*********************************************************************
3  *
4  * File        :  $Source: /cvsroot/ijbswa/current/loadcfg.c,v $
5  *
6  * Purpose     :  Loads settings from the configuration file into
7  *                global variables.  This file contains both the
8  *                routine to load the configuration and the global
9  *                variables it writes to.
10  *
11  * Copyright   :  Written by and Copyright (C) 2001-2016 the
12  *                Privoxy team. http://www.privoxy.org/
13  *
14  *                Based on the Internet Junkbuster originally written
15  *                by and Copyright (C) 1997 Anonymous Coders and
16  *                Junkbusters Corporation.  http://www.junkbusters.com
17  *
18  *                This program is free software; you can redistribute it
19  *                and/or modify it under the terms of the GNU General
20  *                Public License as published by the Free Software
21  *                Foundation; either version 2 of the License, or (at
22  *                your option) any later version.
23  *
24  *                This program is distributed in the hope that it will
25  *                be useful, but WITHOUT ANY WARRANTY; without even the
26  *                implied warranty of MERCHANTABILITY or FITNESS FOR A
27  *                PARTICULAR PURPOSE.  See the GNU General Public
28  *                License for more details.
29  *
30  *                The GNU General Public License should be included with
31  *                this file.  If not, you can view it at
32  *                http://www.gnu.org/copyleft/gpl.html
33  *                or write to the Free Software Foundation, Inc., 59
34  *                Temple Place - Suite 330, Boston, MA  02111-1307, USA.
35  *
36  *********************************************************************/
37
38
39 #include "config.h"
40
41 #include <stdio.h>
42 #include <sys/types.h>
43 #include <stdlib.h>
44 #include <string.h>
45 #include <signal.h>
46 #include <fcntl.h>
47 #include <errno.h>
48 #include <ctype.h>
49 #include <assert.h>
50
51 #ifdef _WIN32
52
53 # ifndef STRICT
54 #  define STRICT
55 # endif
56 # include <windows.h>
57
58 # include "win32.h"
59 # ifndef _WIN_CONSOLE
60 #  include "w32log.h"
61 # endif /* ndef _WIN_CONSOLE */
62
63 #else /* ifndef _WIN32 */
64
65 #ifndef __OS2__
66 # include <unistd.h>
67 # include <sys/wait.h>
68 #endif
69 # include <sys/time.h>
70 # include <sys/stat.h>
71 # include <signal.h>
72
73 #endif
74
75 #include "project.h"
76 #include "loadcfg.h"
77 #include "list.h"
78 #include "jcc.h"
79 #include "filters.h"
80 #include "loaders.h"
81 #include "miscutil.h"
82 #include "errlog.h"
83 #include "ssplit.h"
84 #include "encode.h"
85 #include "urlmatch.h"
86 #include "cgi.h"
87 #include "gateway.h"
88
89 const char loadcfg_h_rcs[] = LOADCFG_H_VERSION;
90
91 #ifdef FEATURE_TOGGLE
92 /* Privoxy is enabled by default. */
93 int global_toggle_state = 1;
94 #endif /* def FEATURE_TOGGLE */
95
96 /* The filename of the configfile */
97 const char *configfile  = NULL;
98
99 /*
100  * CGI functions will later need access to the invocation args,
101  * so we will make argc and argv global.
102  */
103 int Argc = 0;
104 char * const * Argv = NULL;
105
106 static struct file_list *current_configfile = NULL;
107
108
109 /*
110  * This takes the "cryptic" hash of each keyword and aliases them to
111  * something a little more readable.  This also makes changing the
112  * hash values easier if they should change or the hash algorthm changes.
113  * Use the included "hash" program to find out what the hash will be
114  * for any string supplied on the command line.  (Or just put it in the
115  * config file and read the number from the error message in the log).
116  *
117  * Please keep this list sorted alphabetically (but with the Windows
118  * console and GUI specific options last).
119  */
120
121 #define hash_actions_file                1196306641U /* "actionsfile" */
122 #define hash_accept_intercepted_requests 1513024973U /* "accept-intercepted-requests" */
123 #define hash_admin_address               4112573064U /* "admin-address" */
124 #define hash_allow_cgi_request_crunching  258915987U /* "allow-cgi-request-crunching" */
125 #define hash_buffer_limit                1881726070U /* "buffer-limit */
126 #define hash_client_header_order         2701453514U /* "client-header-order" */
127 #define hash_client_specific_tag         3353703383U /* "client-specific-tag" */
128 #define hash_client_tag_lifetime          647957580U /* "client-tag-lifetime" */
129 #define hash_compression_level           2464423563U /* "compression-level" */
130 #define hash_confdir                        1978389U /* "confdir" */
131 #define hash_connection_sharing          1348841265U /* "connection-sharing" */
132 #define hash_debug                            78263U /* "debug" */
133 #define hash_default_server_timeout      2530089913U /* "default-server-timeout" */
134 #define hash_deny_access                 1227333715U /* "deny-access" */
135 #define hash_enable_edit_actions         2517097536U /* "enable-edit-actions" */
136 #define hash_enable_compression          3943696946U /* "enable-compression" */
137 #define hash_enable_proxy_authentication_forwarding 4040610791U /* enable-proxy-authentication-forwarding */
138 #define hash_enable_remote_toggle        2979744683U /* "enable-remote-toggle" */
139 #define hash_enable_remote_http_toggle    110543988U /* "enable-remote-http-toggle" */
140 #define hash_enforce_blocks              1862427469U /* "enforce-blocks" */
141 #define hash_filterfile                   250887266U /* "filterfile" */
142 #define hash_forward                        2029845U /* "forward" */
143 #define hash_forward_socks4              3963965521U /* "forward-socks4" */
144 #define hash_forward_socks4a             2639958518U /* "forward-socks4a" */
145 #define hash_forward_socks5              3963965522U /* "forward-socks5" */
146 #define hash_forward_socks5t             2639958542U /* "forward-socks5t" */
147 #define hash_forwarded_connect_retries    101465292U /* "forwarded-connect-retries" */
148 #define hash_handle_as_empty_returns_ok  1444873247U /* "handle-as-empty-doc-returns-ok" */
149 #define hash_hostname                      10308071U /* "hostname" */
150 #define hash_keep_alive_timeout          3878599515U /* "keep-alive-timeout" */
151 #define hash_listen_address              1255650842U /* "listen-address" */
152 #define hash_logdir                          422889U /* "logdir" */
153 #define hash_logfile                        2114766U /* "logfile" */
154 #define hash_max_client_connections      3595884446U /* "max-client-connections" */
155 #define hash_permit_access               3587953268U /* "permit-access" */
156 #define hash_proxy_info_url              3903079059U /* "proxy-info-url" */
157 #define hash_single_threaded             4250084780U /* "single-threaded" */
158 #define hash_socket_timeout              1809001761U /* "socket-timeout" */
159 #define hash_split_large_cgi_forms        671658948U /* "split-large-cgi-forms" */
160 #define hash_suppress_blocklists         1948693308U /* "suppress-blocklists" */
161 #define hash_templdir                      11067889U /* "templdir" */
162 #define hash_temporary_directory         1824125181U /* "temporary-directory" */
163 #define hash_tolerate_pipelining         1360286620U /* "tolerate-pipelining" */
164 #define hash_toggle                          447966U /* "toggle" */
165 #define hash_trust_info_url               430331967U /* "trust-info-url" */
166 #define hash_trustfile                     56494766U /* "trustfile" */
167 #define hash_usermanual                  1416668518U /* "user-manual" */
168 #define hash_activity_animation          1817904738U /* "activity-animation" */
169 #define hash_close_button_minimizes      3651284693U /* "close-button-minimizes" */
170 #define hash_hide_console                2048809870U /* "hide-console" */
171 #define hash_log_buffer_size             2918070425U /* "log-buffer-size" */
172 #define hash_log_font_name               2866730124U /* "log-font-name" */
173 #define hash_log_font_size               2866731014U /* "log-font-size" */
174 #define hash_log_highlight_messages      4032101240U /* "log-highlight-messages" */
175 #define hash_log_max_lines               2868344173U /* "log-max-lines" */
176 #define hash_log_messages                2291744899U /* "log-messages" */
177 #define hash_show_on_task_bar             215410365U /* "show-on-task-bar" */
178
179
180 static void savearg(char *command, char *argument, struct configuration_spec * config);
181 #ifdef FEATURE_CLIENT_TAGS
182 static void free_client_specific_tags(struct client_tag_spec *tag_list);
183 #endif
184
185 /*********************************************************************
186  *
187  * Function    :  unload_configfile
188  *
189  * Description :  Free the config structure and all components.
190  *
191  * Parameters  :
192  *          1  :  data: struct configuration_spec to unload
193  *
194  * Returns     :  N/A
195  *
196  *********************************************************************/
197 static void unload_configfile (void * data)
198 {
199    struct configuration_spec * config = (struct configuration_spec *)data;
200    struct forward_spec *cur_fwd = config->forward;
201    int i;
202
203 #ifdef FEATURE_ACL
204    struct access_control_list *cur_acl = config->acl;
205
206    while (cur_acl != NULL)
207    {
208       struct access_control_list * next_acl = cur_acl->next;
209       free(cur_acl);
210       cur_acl = next_acl;
211    }
212    config->acl = NULL;
213 #endif /* def FEATURE_ACL */
214
215    while (cur_fwd != NULL)
216    {
217       struct forward_spec * next_fwd = cur_fwd->next;
218       free_pattern_spec(cur_fwd->url);
219
220       freez(cur_fwd->gateway_host);
221       freez(cur_fwd->forward_host);
222       free(cur_fwd);
223       cur_fwd = next_fwd;
224    }
225    config->forward = NULL;
226
227    freez(config->confdir);
228    freez(config->logdir);
229    freez(config->templdir);
230    freez(config->hostname);
231 #ifdef FEATURE_EXTERNAL_FILTERS
232    freez(config->temporary_directory);
233 #endif
234
235    for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
236    {
237       freez(config->haddr[i]);
238    }
239    freez(config->logfile);
240
241    for (i = 0; i < MAX_AF_FILES; i++)
242    {
243       freez(config->actions_file_short[i]);
244       freez(config->actions_file[i]);
245       freez(config->re_filterfile_short[i]);
246       freez(config->re_filterfile[i]);
247    }
248
249    list_remove_all(config->ordered_client_headers);
250
251    freez(config->admin_address);
252    freez(config->proxy_info_url);
253    freez(config->proxy_args);
254    freez(config->usermanual);
255
256 #ifdef FEATURE_TRUST
257    freez(config->trustfile);
258    list_remove_all(config->trust_info);
259 #endif /* def FEATURE_TRUST */
260
261 #ifdef FEATURE_CLIENT_TAGS
262    free_client_specific_tags(config->client_tags);
263 #endif
264
265    freez(config);
266 }
267
268
269 #ifdef FEATURE_GRACEFUL_TERMINATION
270 /*********************************************************************
271  *
272  * Function    :  unload_current_config_file
273  *
274  * Description :  Unloads current config file - reset to state at
275  *                beginning of program.
276  *
277  * Parameters  :  None
278  *
279  * Returns     :  N/A
280  *
281  *********************************************************************/
282 void unload_current_config_file(void)
283 {
284    if (current_configfile)
285    {
286       current_configfile->unloader = unload_configfile;
287       current_configfile = NULL;
288    }
289 }
290 #endif
291
292
293 #ifdef FEATURE_CLIENT_TAGS
294 /*********************************************************************
295  *
296  * Function    :  register_tag
297  *
298  * Description :  Registers a client-specific-tag and its description
299  *
300  * Parameters  :
301  *          1  :  config: The tag list
302  *          2  :  name:  The name of the client-specific-tag
303  *          3  :  description: The human-readable description for the tag
304  *
305  * Returns     :  N/A
306  *
307  *********************************************************************/
308 static void register_tag(struct client_tag_spec *tag_list,
309    const char *name, const char *description)
310 {
311    struct client_tag_spec *new_tag;
312    struct client_tag_spec *last_tag;
313
314    last_tag = tag_list;
315    while (last_tag->next != NULL)
316    {
317       last_tag = last_tag->next;
318    }
319    if (last_tag->name == NULL)
320    {
321       /* First entry */
322       new_tag = last_tag;
323    }
324    else
325    {
326       new_tag = zalloc_or_die(sizeof(struct client_tag_spec));
327    }
328    new_tag->name = strdup_or_die(name);
329    new_tag->description = strdup_or_die(description);
330    if (new_tag != last_tag)
331    {
332       last_tag->next = new_tag;
333    }
334 }
335
336
337 /*********************************************************************
338  *
339  * Function    :  free_client_specific_tags
340  *
341  * Description :  Frees client-specific tags and their descriptions
342  *
343  * Parameters  :
344  *          1  :  tag_list: The tag list to free
345  *
346  * Returns     :  N/A
347  *
348  *********************************************************************/
349 static void free_client_specific_tags(struct client_tag_spec *tag_list)
350 {
351    struct client_tag_spec *this_tag;
352    struct client_tag_spec *next_tag;
353
354    next_tag = tag_list;
355    do
356    {
357       this_tag = next_tag;
358       next_tag = next_tag->next;
359
360       freez(this_tag->name);
361       freez(this_tag->description);
362
363       if (this_tag != tag_list)
364       {
365          freez(this_tag);
366       }
367    } while (next_tag != NULL);
368 }
369 #endif /* def FEATURE_CLIENT_TAGS */
370
371
372 /*********************************************************************
373  *
374  * Function    :  parse_numeric_value
375  *
376  * Description :  Parse the value of a directive that can only have
377  *                a single numeric value. Terminates with a fatal error
378  *                if the value is NULL or not numeric.
379  *
380  * Parameters  :
381  *          1  :  name:  The name of the directive. Used for log messages.
382  *          2  :  value: The value to parse
383  *
384  *
385  * Returns     :  The numerical value as integer
386  *
387  *********************************************************************/
388 static int parse_numeric_value(const char *name, const char *value)
389 {
390    int number;
391    char *endptr;
392
393    assert(name != NULL);
394    assert(value != NULL);
395
396    if ((value == NULL) || (*value == '\0'))
397    {
398       log_error(LOG_LEVEL_FATAL, "Directive %s used without argument", name);
399    }
400
401    number = (int)strtol(value, &endptr, 0);
402    if (*endptr != '\0')
403    {
404       log_error(LOG_LEVEL_FATAL,
405          "Directive '%s' used with non-numerical value: '%s'", name, value);
406    }
407
408    return number;
409
410 }
411
412
413 /*********************************************************************
414  *
415  * Function    :  parse_toggle_value
416  *
417  * Description :  Parse the value of a directive that can only be
418  *                enabled or disabled. Terminates with a fatal error
419  *                if the value is NULL or something other than 0 or 1.
420  *
421  * Parameters  :
422  *          1  :  name:  The name of the directive. Used for log messages.
423  *          2  :  value: The value to parse
424  *
425  *
426  * Returns     :  The numerical toggle state
427  *
428  *********************************************************************/
429 static int parse_toggle_state(const char *name, const char *value)
430 {
431    int toggle_state;
432    assert(name != NULL);
433    assert(value != NULL);
434
435    if ((value == NULL) || (*value == '\0'))
436    {
437       log_error(LOG_LEVEL_FATAL, "Directive %s used without argument", name);
438    }
439
440    toggle_state = atoi(value);
441
442    /*
443     * Also check the length as atoi() doesn't mind
444     * garbage after a valid integer, but we do.
445     */
446    if (((toggle_state != 0) && (toggle_state != 1)) || (strlen(value) != 1))
447    {
448       log_error(LOG_LEVEL_FATAL,
449          "Directive %s used with invalid argument '%s'. Use either '0' or '1'.",
450          name, value);
451    }
452
453    return toggle_state;
454
455 }
456
457
458 /*********************************************************************
459  *
460  * Function    :  parse_client_header_order
461  *
462  * Description :  Parse the value of the header-order directive
463  *
464  * Parameters  :
465  *          1  :  ordered_header_list:  List to insert the ordered
466  *                                      headers into.
467  *          2  :  ordered_headers:  The ordered header names separated
468  *                                  by spaces or tabs.
469  *
470  *
471  * Returns     :  N/A
472  *
473  *********************************************************************/
474 static void parse_client_header_order(struct list *ordered_header_list, const char *ordered_headers)
475 {
476    char *original_headers_copy;
477    char **vector;
478    size_t max_segments;
479    int number_of_headers;
480    int i;
481
482    assert(ordered_header_list != NULL);
483    assert(ordered_headers != NULL);
484
485    if (ordered_headers == NULL)
486    {
487       log_error(LOG_LEVEL_FATAL, "header-order used without argument");
488    }
489
490    /*
491     * XXX: This estimate is guaranteed to be high enough as we
492     *      let ssplit() ignore empty fields, but also a bit wasteful.
493     *      The same hack is used in get_last_url() so it looks like
494     *      a real solution is needed.
495     */
496    max_segments = strlen(ordered_headers) / 2;
497    if (max_segments == 0)
498    {
499       max_segments = 1;
500    }
501    vector = malloc_or_die(max_segments * sizeof(char *));
502
503    original_headers_copy = strdup_or_die(ordered_headers);
504
505    number_of_headers = ssplit(original_headers_copy, "\t ", vector, max_segments);
506    if (number_of_headers == -1)
507    {
508       log_error(LOG_LEVEL_FATAL, "Failed to split ordered headers");
509    }
510
511    for (i = 0; i < number_of_headers; i++)
512    {
513       if (JB_ERR_OK != enlist(ordered_header_list, vector[i]))
514       {
515          log_error(LOG_LEVEL_FATAL,
516             "Failed to enlist ordered header: %s", vector[i]);
517       }
518    }
519
520    freez(vector);
521    freez(original_headers_copy);
522
523    return;
524
525 }
526
527
528 /*********************************************************************
529  *
530  * Function    :  load_config
531  *
532  * Description :  Load the config file and all parameters.
533  *
534  *                XXX: more than thousand lines long
535  *                and thus in serious need of refactoring.
536  *
537  * Parameters  :  None
538  *
539  * Returns     :  The configuration_spec, or NULL on error.
540  *
541  *********************************************************************/
542 struct configuration_spec * load_config(void)
543 {
544    char *buf = NULL;
545    char *p, *q;
546    FILE *configfp = NULL;
547    struct configuration_spec * config = NULL;
548    struct client_state * fake_csp;
549    struct file_list *fs;
550    unsigned long linenum = 0;
551    int i;
552    char *logfile = NULL;
553
554    if (!check_file_changed(current_configfile, configfile, &fs))
555    {
556       /* No need to load */
557       return ((struct configuration_spec *)current_configfile->f);
558    }
559    if (NULL == fs)
560    {
561       log_error(LOG_LEVEL_FATAL,
562          "can't check configuration file '%s':  %E", configfile);
563       return NULL;
564    }
565
566    if (NULL != current_configfile)
567    {
568       log_error(LOG_LEVEL_INFO, "Reloading configuration file '%s'", configfile);
569    }
570
571 #ifdef FEATURE_TOGGLE
572    global_toggle_state = 1;
573 #endif /* def FEATURE_TOGGLE */
574
575    fs->f = config = zalloc_or_die(sizeof(*config));
576
577    /*
578     * This is backwards from how it's usually done.
579     * Following the usual pattern, "fs" would be stored in a member
580     * variable in "csp", and then we'd access "config" from "fs->f",
581     * using a cast.  However, "config" is used so often that a
582     * cast each time would be very ugly, and the extra indirection
583     * would waste CPU cycles.  Therefore we store "config" in
584     * "csp->config", and "fs" in "csp->config->config_file_list".
585     */
586    config->config_file_list = fs;
587
588    /*
589     * Set to defaults
590     */
591    config->multi_threaded            = 1;
592    config->buffer_limit              = 4096 * 1024;
593    config->usermanual                = strdup(USER_MANUAL_URL);
594    config->proxy_args                = strdup("");
595    config->forwarded_connect_retries = 0;
596    /*
597     * 128 client sockets ought to be enough for everybody who can't
598     * be bothered to read the documentation to figure out how to
599     * increase the limit.
600     */
601    config->max_client_connections    = 128;
602    config->socket_timeout            = 300; /* XXX: Should be a macro. */
603 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
604    config->default_server_timeout    = 0;
605    config->keep_alive_timeout        = DEFAULT_KEEP_ALIVE_TIMEOUT;
606    config->feature_flags            &= ~RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
607    config->feature_flags            &= ~RUNTIME_FEATURE_CONNECTION_SHARING;
608 #endif
609    config->feature_flags            &= ~RUNTIME_FEATURE_CGI_TOGGLE;
610    config->feature_flags            &= ~RUNTIME_FEATURE_SPLIT_LARGE_FORMS;
611    config->feature_flags            &= ~RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS;
612    config->feature_flags            &= ~RUNTIME_FEATURE_EMPTY_DOC_RETURNS_OK;
613    config->feature_flags            &= ~RUNTIME_FEATURE_FORWARD_PROXY_AUTHENTICATION_HEADERS;
614 #ifdef FEATURE_COMPRESSION
615    config->feature_flags            &= ~RUNTIME_FEATURE_COMPRESSION;
616    /*
617     * XXX: Run some benchmarks to see if there are better default values.
618     */
619    config->compression_level         = 1;
620 #endif
621    config->feature_flags            &= ~RUNTIME_FEATURE_TOLERATE_PIPELINING;
622
623    configfp = fopen(configfile, "r");
624    if (NULL == configfp)
625    {
626       log_error(LOG_LEVEL_FATAL,
627          "can't open configuration file '%s':  %E", configfile);
628       /* Never get here - LOG_LEVEL_FATAL causes program exit */
629    }
630
631    while (read_config_line(configfp, &linenum, &buf) != NULL)
632    {
633       char cmd[BUFFER_SIZE];
634       char arg[BUFFER_SIZE];
635       char tmp[BUFFER_SIZE];
636 #ifdef FEATURE_ACL
637       struct access_control_list *cur_acl;
638 #endif /* def FEATURE_ACL */
639       struct forward_spec *cur_fwd;
640       int vec_count;
641       char *vec[3];
642       unsigned int directive_hash;
643
644       strlcpy(tmp, buf, sizeof(tmp));
645
646       /* Copy command (i.e. up to space or tab) into cmd */
647       p = buf;
648       q = cmd;
649       while (*p && (*p != ' ') && (*p != '\t'))
650       {
651          *q++ = *p++;
652       }
653       *q = '\0';
654
655       /* Skip over the whitespace in buf */
656       while (*p && ((*p == ' ') || (*p == '\t')))
657       {
658          p++;
659       }
660
661       /* Copy the argument into arg */
662       if (strlcpy(arg, p, sizeof(arg)) >= sizeof(arg))
663       {
664          log_error(LOG_LEVEL_FATAL, "Config line too long: %s", buf);
665       }
666
667       /* Should never happen, but check this anyway */
668       if (*cmd == '\0')
669       {
670          freez(buf);
671          continue;
672       }
673
674       /* Make sure the command field is lower case */
675       for (p = cmd; *p; p++)
676       {
677          if (privoxy_isupper(*p))
678          {
679             *p = (char)privoxy_tolower(*p);
680          }
681       }
682
683       directive_hash = hash_string(cmd);
684       switch (directive_hash)
685       {
686 /* *************************************************************************
687  * actionsfile actions-file-name
688  * In confdir by default
689  * *************************************************************************/
690          case hash_actions_file :
691             i = 0;
692             while ((i < MAX_AF_FILES) && (NULL != config->actions_file[i]))
693             {
694                i++;
695             }
696
697             if (i >= MAX_AF_FILES)
698             {
699                log_error(LOG_LEVEL_FATAL, "Too many 'actionsfile' directives in config file - limit is %d.\n"
700                   "(You can increase this limit by changing MAX_AF_FILES in project.h and recompiling).",
701                   MAX_AF_FILES);
702             }
703             config->actions_file_short[i] = strdup(arg);
704             config->actions_file[i] = make_path(config->confdir, arg);
705
706             break;
707 /* *************************************************************************
708  * accept-intercepted-requests
709  * *************************************************************************/
710          case hash_accept_intercepted_requests:
711             if (parse_toggle_state(cmd, arg) == 1)
712             {
713                config->feature_flags |= RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS;
714             }
715             else
716             {
717                config->feature_flags &= ~RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS;
718             }
719             break;
720
721 /* *************************************************************************
722  * admin-address email-address
723  * *************************************************************************/
724          case hash_admin_address :
725             freez(config->admin_address);
726             config->admin_address = strdup(arg);
727             break;
728
729 /* *************************************************************************
730  * allow-cgi-request-crunching
731  * *************************************************************************/
732          case hash_allow_cgi_request_crunching:
733             if (parse_toggle_state(cmd, arg) == 1)
734             {
735                config->feature_flags |= RUNTIME_FEATURE_CGI_CRUNCHING;
736             }
737             else
738             {
739                config->feature_flags &= ~RUNTIME_FEATURE_CGI_CRUNCHING;
740             }
741             break;
742
743 /* *************************************************************************
744  * buffer-limit n
745  * *************************************************************************/
746          case hash_buffer_limit :
747             config->buffer_limit = (size_t)(1024 * parse_numeric_value(cmd, arg));
748             break;
749
750 /* *************************************************************************
751  * client-header-order header-1 header-2 ... header-n
752  * *************************************************************************/
753          case hash_client_header_order:
754             list_remove_all(config->ordered_client_headers);
755             parse_client_header_order(config->ordered_client_headers, arg);
756             break;
757
758 /* *************************************************************************
759  * client-specific-tag tag-name description
760  * *************************************************************************/
761 #ifdef FEATURE_CLIENT_TAGS
762          case hash_client_specific_tag:
763             {
764                char *name;
765                char *description;
766
767                name = arg;
768                description = strstr(arg, " ");
769                if (description == NULL)
770                {
771                   log_error(LOG_LEVEL_FATAL,
772                      "client-specific-tag '%s' lacks a description.", name);
773                }
774                *description = '\0';
775                description++;
776                register_tag(config->client_tags, name, description);
777             }
778             break;
779 #endif /* def FEATURE_CLIENT_TAGS */
780
781 /* *************************************************************************
782  * client-tag-lifetime ttl
783  * *************************************************************************/
784 #ifdef FEATURE_CLIENT_TAGS
785          case hash_client_tag_lifetime:
786          {
787             int ttl = parse_numeric_value(cmd, arg);
788             if (0 <= ttl)
789             {
790                config->client_tag_lifetime = (unsigned)ttl;
791             }
792             else
793             {
794                log_error(LOG_LEVEL_FATAL,
795                   "client-tag-lifetime can't be negative.");
796             }
797             break;
798          }
799 #endif /* def FEATURE_CLIENT_TAGS */
800
801 /* *************************************************************************
802  * confdir directory-name
803  * *************************************************************************/
804          case hash_confdir :
805             freez(config->confdir);
806             config->confdir = make_path(NULL, arg);
807             break;
808
809 /* *************************************************************************
810  * compression-level 0-9
811  * *************************************************************************/
812 #ifdef FEATURE_COMPRESSION
813          case hash_compression_level :
814          {
815             int compression_level = parse_numeric_value(cmd, arg);
816             if (-1 <= compression_level && compression_level <= 9)
817             {
818                config->compression_level = compression_level;
819             }
820             else
821             {
822                log_error(LOG_LEVEL_FATAL,
823                   "Invalid compression-level value: %s", arg);
824             }
825             break;
826          }
827 #endif
828
829 /* *************************************************************************
830  * connection-sharing (0|1)
831  * *************************************************************************/
832 #ifdef FEATURE_CONNECTION_SHARING
833          case hash_connection_sharing :
834             if (parse_toggle_state(cmd, arg) == 1)
835             {
836                config->feature_flags |= RUNTIME_FEATURE_CONNECTION_SHARING;
837             }
838             else
839             {
840                config->feature_flags &= ~RUNTIME_FEATURE_CONNECTION_SHARING;
841             }
842             break;
843 #endif
844
845 /* *************************************************************************
846  * debug n
847  * Specifies debug level, multiple values are ORed together.
848  * *************************************************************************/
849          case hash_debug :
850             config->debug |= parse_numeric_value(cmd, arg);
851             break;
852
853 /* *************************************************************************
854  * default-server-timeout timeout
855  * *************************************************************************/
856 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
857          case hash_default_server_timeout :
858          {
859             int timeout = parse_numeric_value(cmd, arg);
860             if (0 <= timeout)
861             {
862                config->default_server_timeout = (unsigned int)timeout;
863             }
864             else
865             {
866                log_error(LOG_LEVEL_FATAL,
867                   "Invalid default-server-timeout value: %s", arg);
868             }
869             break;
870          }
871 #endif
872
873 /* *************************************************************************
874  * deny-access source-ip[/significant-bits] [dest-ip[/significant-bits]]
875  * *************************************************************************/
876 #ifdef FEATURE_ACL
877          case hash_deny_access:
878             strlcpy(tmp, arg, sizeof(tmp));
879             vec_count = ssplit(tmp, " \t", vec, SZ(vec));
880
881             if ((vec_count != 1) && (vec_count != 2))
882             {
883                log_error(LOG_LEVEL_ERROR, "Wrong number of parameters for "
884                      "deny-access directive in configuration file.");
885                string_append(&config->proxy_args,
886                   "<br>\nWARNING: Wrong number of parameters for "
887                   "deny-access directive in configuration file.<br><br>\n");
888                break;
889             }
890
891             /* allocate a new node */
892             cur_acl = zalloc_or_die(sizeof(*cur_acl));
893             cur_acl->action = ACL_DENY;
894
895             if (acl_addr(vec[0], cur_acl->src) < 0)
896             {
897                log_error(LOG_LEVEL_ERROR, "Invalid source address, port or netmask "
898                   "for deny-access directive in configuration file: \"%s\"", vec[0]);
899                string_append(&config->proxy_args,
900                   "<br>\nWARNING: Invalid source address, port or netmask "
901                   "for deny-access directive in configuration file: \"");
902                string_append(&config->proxy_args,
903                   vec[0]);
904                string_append(&config->proxy_args,
905                   "\"<br><br>\n");
906                freez(cur_acl);
907                break;
908             }
909             if (vec_count == 2)
910             {
911                if (acl_addr(vec[1], cur_acl->dst) < 0)
912                {
913                   log_error(LOG_LEVEL_ERROR, "Invalid destination address, port or netmask "
914                      "for deny-access directive in configuration file: \"%s\"", vec[1]);
915                   string_append(&config->proxy_args,
916                      "<br>\nWARNING: Invalid destination address, port or netmask "
917                      "for deny-access directive in configuration file: \"");
918                   string_append(&config->proxy_args,
919                      vec[1]);
920                   string_append(&config->proxy_args,
921                      "\"<br><br>\n");
922                   freez(cur_acl);
923                   break;
924                }
925             }
926 #ifdef HAVE_RFC2553
927             else
928             {
929                cur_acl->wildcard_dst = 1;
930             }
931 #endif /* def HAVE_RFC2553 */
932
933             /*
934              * Add it to the list.  Note we reverse the list to get the
935              * behaviour the user expects.  With both the ACL and
936              * actions file, the last match wins.  However, the internal
937              * implementations are different:  The actions file is stored
938              * in the same order as the file, and scanned completely.
939              * With the ACL, we reverse the order as we load it, then
940              * when we scan it we stop as soon as we get a match.
941              */
942             cur_acl->next  = config->acl;
943             config->acl = cur_acl;
944
945             break;
946 #endif /* def FEATURE_ACL */
947
948 /* *************************************************************************
949  * enable-edit-actions 0|1
950  * *************************************************************************/
951 #ifdef FEATURE_CGI_EDIT_ACTIONS
952          case hash_enable_edit_actions:
953             if (parse_toggle_state(cmd, arg) == 1)
954             {
955                config->feature_flags |= RUNTIME_FEATURE_CGI_EDIT_ACTIONS;
956             }
957             else
958             {
959                config->feature_flags &= ~RUNTIME_FEATURE_CGI_EDIT_ACTIONS;
960             }
961             break;
962 #endif /* def FEATURE_CGI_EDIT_ACTIONS */
963
964 /* *************************************************************************
965  * enable-compression 0|1
966  * *************************************************************************/
967 #ifdef FEATURE_COMPRESSION
968          case hash_enable_compression:
969             if (parse_toggle_state(cmd, arg) == 1)
970             {
971                config->feature_flags |= RUNTIME_FEATURE_COMPRESSION;
972             }
973             else
974             {
975                config->feature_flags &= ~RUNTIME_FEATURE_COMPRESSION;
976             }
977             break;
978 #endif /* def FEATURE_COMPRESSION */
979
980 /* *************************************************************************
981  * enable-proxy-authentication-forwarding 0|1
982  * *************************************************************************/
983          case hash_enable_proxy_authentication_forwarding:
984             if (parse_toggle_state(cmd, arg) == 1)
985             {
986                config->feature_flags |= RUNTIME_FEATURE_FORWARD_PROXY_AUTHENTICATION_HEADERS;
987             }
988             else
989             {
990                config->feature_flags &= ~RUNTIME_FEATURE_FORWARD_PROXY_AUTHENTICATION_HEADERS;
991             }
992             break;
993
994 /* *************************************************************************
995  * enable-remote-toggle 0|1
996  * *************************************************************************/
997 #ifdef FEATURE_TOGGLE
998          case hash_enable_remote_toggle:
999             if (parse_toggle_state(cmd, arg) == 1)
1000             {
1001                config->feature_flags |= RUNTIME_FEATURE_CGI_TOGGLE;
1002             }
1003             else
1004             {
1005                config->feature_flags &= ~RUNTIME_FEATURE_CGI_TOGGLE;
1006             }
1007             break;
1008 #endif /* def FEATURE_TOGGLE */
1009
1010 /* *************************************************************************
1011  * enable-remote-http-toggle 0|1
1012  * *************************************************************************/
1013          case hash_enable_remote_http_toggle:
1014             if (parse_toggle_state(cmd, arg) == 1)
1015             {
1016                config->feature_flags |= RUNTIME_FEATURE_HTTP_TOGGLE;
1017             }
1018             else
1019             {
1020                config->feature_flags &= ~RUNTIME_FEATURE_HTTP_TOGGLE;
1021             }
1022             break;
1023
1024 /* *************************************************************************
1025  * enforce-blocks 0|1
1026  * *************************************************************************/
1027          case hash_enforce_blocks:
1028 #ifdef FEATURE_FORCE_LOAD
1029             if (parse_toggle_state(cmd, arg) == 1)
1030             {
1031                config->feature_flags |= RUNTIME_FEATURE_ENFORCE_BLOCKS;
1032             }
1033             else
1034             {
1035                config->feature_flags &= ~RUNTIME_FEATURE_ENFORCE_BLOCKS;
1036             }
1037 #else
1038             log_error(LOG_LEVEL_ERROR, "Ignoring directive 'enforce-blocks'. "
1039                "FEATURE_FORCE_LOAD is disabled, blocks will always be enforced.");
1040 #endif /* def FEATURE_FORCE_LOAD */
1041             break;
1042
1043 /* *************************************************************************
1044  * filterfile file-name
1045  * In confdir by default.
1046  * *************************************************************************/
1047          case hash_filterfile :
1048             i = 0;
1049             while ((i < MAX_AF_FILES) && (NULL != config->re_filterfile[i]))
1050             {
1051                i++;
1052             }
1053
1054             if (i >= MAX_AF_FILES)
1055             {
1056                log_error(LOG_LEVEL_FATAL, "Too many 'filterfile' directives in config file - limit is %d.\n"
1057                   "(You can increase this limit by changing MAX_AF_FILES in project.h and recompiling).",
1058                   MAX_AF_FILES);
1059             }
1060             config->re_filterfile_short[i] = strdup(arg);
1061             config->re_filterfile[i] = make_path(config->confdir, arg);
1062
1063             break;
1064
1065 /* *************************************************************************
1066  * forward url-pattern (.|http-proxy-host[:port])
1067  * *************************************************************************/
1068          case hash_forward:
1069             strlcpy(tmp, arg, sizeof(tmp));
1070             vec_count = ssplit(tmp, " \t", vec, SZ(vec));
1071
1072             if (vec_count != 2)
1073             {
1074                log_error(LOG_LEVEL_ERROR, "Wrong number of parameters for forward "
1075                      "directive in configuration file.");
1076                string_append(&config->proxy_args,
1077                   "<br>\nWARNING: Wrong number of parameters for "
1078                   "forward directive in configuration file.");
1079                break;
1080             }
1081
1082             /* allocate a new node */
1083             cur_fwd = zalloc_or_die(sizeof(*cur_fwd));
1084             cur_fwd->type = SOCKS_NONE;
1085
1086             /* Save the URL pattern */
1087             if (create_pattern_spec(cur_fwd->url, vec[0]))
1088             {
1089                log_error(LOG_LEVEL_ERROR, "Bad URL specifier for forward "
1090                      "directive in configuration file.");
1091                string_append(&config->proxy_args,
1092                   "<br>\nWARNING: Bad URL specifier for "
1093                   "forward directive in configuration file.");
1094                freez(cur_fwd);
1095                break;
1096             }
1097
1098             /* Parse the parent HTTP proxy host:port */
1099             p = vec[1];
1100
1101             if (strcmp(p, ".") != 0)
1102             {
1103                cur_fwd->forward_port = 8000;
1104                parse_forwarder_address(p, &cur_fwd->forward_host,
1105                   &cur_fwd->forward_port);
1106             }
1107
1108             /* Add to list. */
1109             cur_fwd->next = config->forward;
1110             config->forward = cur_fwd;
1111
1112             break;
1113
1114 /* *************************************************************************
1115  * forward-socks4 url-pattern socks-proxy[:port] (.|http-proxy[:port])
1116  * *************************************************************************/
1117          case hash_forward_socks4:
1118             strlcpy(tmp, arg, sizeof(tmp));
1119             vec_count = ssplit(tmp, " \t", vec, SZ(vec));
1120
1121             if (vec_count != 3)
1122             {
1123                log_error(LOG_LEVEL_ERROR, "Wrong number of parameters for "
1124                      "forward-socks4 directive in configuration file.");
1125                string_append(&config->proxy_args,
1126                   "<br>\nWARNING: Wrong number of parameters for "
1127                   "forward-socks4 directive in configuration file.");
1128                break;
1129             }
1130
1131             /* allocate a new node */
1132             cur_fwd = zalloc_or_die(sizeof(*cur_fwd));
1133             cur_fwd->type = SOCKS_4;
1134
1135             /* Save the URL pattern */
1136             if (create_pattern_spec(cur_fwd->url, vec[0]))
1137             {
1138                log_error(LOG_LEVEL_ERROR, "Bad URL specifier for forward-socks4 "
1139                      "directive in configuration file.");
1140                string_append(&config->proxy_args,
1141                   "<br>\nWARNING: Bad URL specifier for "
1142                   "forward-socks4 directive in configuration file.");
1143                freez(cur_fwd);
1144                break;
1145             }
1146
1147             /* Parse the SOCKS proxy host[:port] */
1148             p = vec[1];
1149
1150             /* XXX: This check looks like a bug. */
1151             if (strcmp(p, ".") != 0)
1152             {
1153                cur_fwd->gateway_port = 1080;
1154                parse_forwarder_address(p, &cur_fwd->gateway_host,
1155                   &cur_fwd->gateway_port);
1156             }
1157
1158             /* Parse the parent HTTP proxy host[:port] */
1159             p = vec[2];
1160
1161             if (strcmp(p, ".") != 0)
1162             {
1163                cur_fwd->forward_port = 8000;
1164                parse_forwarder_address(p, &cur_fwd->forward_host,
1165                   &cur_fwd->forward_port);
1166             }
1167
1168             /* Add to list. */
1169             cur_fwd->next = config->forward;
1170             config->forward = cur_fwd;
1171
1172             break;
1173
1174 /* *************************************************************************
1175  * forward-socks4a url-pattern socks-proxy[:port] (.|http-proxy[:port])
1176  * *************************************************************************/
1177          case hash_forward_socks4a:
1178          case hash_forward_socks5:
1179          case hash_forward_socks5t:
1180             strlcpy(tmp, arg, sizeof(tmp));
1181             vec_count = ssplit(tmp, " \t", vec, SZ(vec));
1182
1183             if (vec_count != 3)
1184             {
1185                log_error(LOG_LEVEL_ERROR,
1186                   "Wrong number of parameters for %s in configuration file.",
1187                   cmd);
1188                string_append(&config->proxy_args,
1189                   "<br>\nWARNING: Wrong number of parameters for ");
1190                string_append(&config->proxy_args, cmd);
1191                string_append(&config->proxy_args,
1192                   "directive in configuration file.");
1193                break;
1194             }
1195
1196             /* allocate a new node */
1197             cur_fwd = zalloc_or_die(sizeof(*cur_fwd));
1198
1199             if (directive_hash == hash_forward_socks4a)
1200             {
1201                cur_fwd->type = SOCKS_4A;
1202             }
1203             else if (directive_hash == hash_forward_socks5)
1204             {
1205                cur_fwd->type = SOCKS_5;
1206             }
1207             else
1208             {
1209                assert(directive_hash == hash_forward_socks5t);
1210                cur_fwd->type = SOCKS_5T;
1211             }
1212
1213             /* Save the URL pattern */
1214             if (create_pattern_spec(cur_fwd->url, vec[0]))
1215             {
1216                log_error(LOG_LEVEL_ERROR,
1217                   "Bad URL specifier for %s in configuration file.",
1218                   cmd);
1219                string_append(&config->proxy_args,
1220                   "<br>\nWARNING: Bad URL specifier for ");
1221                string_append(&config->proxy_args, cmd);
1222                string_append(&config->proxy_args,
1223                   "directive in configuration file.");
1224                freez(cur_fwd);
1225                break;
1226             }
1227
1228             /* Parse the SOCKS proxy host[:port] */
1229             p = vec[1];
1230
1231             cur_fwd->gateway_port = 1080;
1232             parse_forwarder_address(p, &cur_fwd->gateway_host,
1233                &cur_fwd->gateway_port);
1234
1235             /* Parse the parent HTTP proxy host[:port] */
1236             p = vec[2];
1237
1238             if (strcmp(p, ".") != 0)
1239             {
1240                cur_fwd->forward_port = 8000;
1241                parse_forwarder_address(p, &cur_fwd->forward_host,
1242                   &cur_fwd->forward_port);
1243             }
1244
1245             /* Add to list. */
1246             cur_fwd->next = config->forward;
1247             config->forward = cur_fwd;
1248
1249             break;
1250
1251 /* *************************************************************************
1252  * forwarded-connect-retries n
1253  * *************************************************************************/
1254          case hash_forwarded_connect_retries :
1255             config->forwarded_connect_retries = parse_numeric_value(cmd, arg);
1256             break;
1257
1258 /* *************************************************************************
1259  * handle-as-empty-doc-returns-ok 0|1
1260  *
1261  * Workaround for firefox hanging on blocked javascript pages.
1262  *   Block with the "+handle-as-empty-document" flag and set the
1263  *   "handle-as-empty-doc-returns-ok" run-time config flag so that
1264  *   Privoxy returns a 200/OK status instead of a 403/Forbidden status
1265  *   to the browser for blocked pages.
1266  ***************************************************************************/
1267          case hash_handle_as_empty_returns_ok:
1268             if (parse_toggle_state(cmd, arg) == 1)
1269             {
1270                config->feature_flags |= RUNTIME_FEATURE_EMPTY_DOC_RETURNS_OK;
1271             }
1272             else
1273             {
1274                config->feature_flags &= ~RUNTIME_FEATURE_EMPTY_DOC_RETURNS_OK;
1275             }
1276             break;
1277
1278 /* *************************************************************************
1279  * hostname hostname-to-show-on-cgi-pages
1280  * *************************************************************************/
1281          case hash_hostname :
1282             freez(config->hostname);
1283             config->hostname = strdup(arg);
1284             if (NULL == config->hostname)
1285             {
1286                log_error(LOG_LEVEL_FATAL, "Out of memory saving hostname.");
1287             }
1288             break;
1289
1290 /* *************************************************************************
1291  * keep-alive-timeout timeout
1292  * *************************************************************************/
1293 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
1294          case hash_keep_alive_timeout :
1295          {
1296             int timeout = parse_numeric_value(cmd, arg);
1297             if (0 < timeout)
1298             {
1299                config->feature_flags |= RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
1300                config->keep_alive_timeout = (unsigned int)timeout;
1301             }
1302             else
1303             {
1304                config->feature_flags &= ~RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
1305             }
1306             break;
1307          }
1308 #endif
1309
1310 /* *************************************************************************
1311  * listen-address [ip][:port]
1312  * *************************************************************************/
1313          case hash_listen_address :
1314             i = 0;
1315             while ((i < MAX_LISTENING_SOCKETS) && (NULL != config->haddr[i]))
1316             {
1317                i++;
1318             }
1319
1320             if (i >= MAX_LISTENING_SOCKETS)
1321             {
1322                log_error(LOG_LEVEL_FATAL, "Too many 'listen-address' directives in config file - limit is %d.\n"
1323                   "(You can increase this limit by changing MAX_LISTENING_SOCKETS in project.h and recompiling).",
1324                   MAX_LISTENING_SOCKETS);
1325             }
1326             config->haddr[i] = strdup(arg);
1327             if (NULL == config->haddr[i])
1328             {
1329                log_error(LOG_LEVEL_FATAL, "Out of memory while copying listening address");
1330             }
1331             break;
1332
1333 /* *************************************************************************
1334  * logdir directory-name
1335  * *************************************************************************/
1336          case hash_logdir :
1337             freez(config->logdir);
1338             config->logdir = make_path(NULL, arg);
1339             break;
1340
1341 /* *************************************************************************
1342  * logfile log-file-name
1343  * In logdir by default
1344  * *************************************************************************/
1345          case hash_logfile :
1346             if (daemon_mode)
1347             {
1348                logfile = make_path(config->logdir, arg);
1349                if (NULL == logfile)
1350                {
1351                   log_error(LOG_LEVEL_FATAL, "Out of memory while creating logfile path");
1352                }
1353             }
1354             break;
1355
1356 /* *************************************************************************
1357  * max-client-connections number
1358  * *************************************************************************/
1359          case hash_max_client_connections :
1360          {
1361             int max_client_connections = parse_numeric_value(cmd, arg);
1362             if (0 <= max_client_connections)
1363             {
1364                /* XXX: log error */
1365                config->max_client_connections = max_client_connections;
1366             }
1367             break;
1368          }
1369
1370 /* *************************************************************************
1371  * permit-access source-ip[/significant-bits] [dest-ip[/significant-bits]]
1372  * *************************************************************************/
1373 #ifdef FEATURE_ACL
1374          case hash_permit_access:
1375             strlcpy(tmp, arg, sizeof(tmp));
1376             vec_count = ssplit(tmp, " \t", vec, SZ(vec));
1377
1378             if ((vec_count != 1) && (vec_count != 2))
1379             {
1380                log_error(LOG_LEVEL_ERROR, "Wrong number of parameters for "
1381                      "permit-access directive in configuration file.");
1382                string_append(&config->proxy_args,
1383                   "<br>\nWARNING: Wrong number of parameters for "
1384                   "permit-access directive in configuration file.<br><br>\n");
1385
1386                break;
1387             }
1388
1389             /* allocate a new node */
1390             cur_acl = zalloc_or_die(sizeof(*cur_acl));
1391             cur_acl->action = ACL_PERMIT;
1392
1393             if (acl_addr(vec[0], cur_acl->src) < 0)
1394             {
1395                log_error(LOG_LEVEL_ERROR, "Invalid source address, port or netmask "
1396                   "for permit-access directive in configuration file: \"%s\"", vec[0]);
1397                string_append(&config->proxy_args,
1398                   "<br>\nWARNING: Invalid source address, port or netmask for "
1399                   "permit-access directive in configuration file: \"");
1400                string_append(&config->proxy_args,
1401                   vec[0]);
1402                string_append(&config->proxy_args,
1403                   "\"<br><br>\n");
1404                freez(cur_acl);
1405                break;
1406             }
1407             if (vec_count == 2)
1408             {
1409                if (acl_addr(vec[1], cur_acl->dst) < 0)
1410                {
1411                   log_error(LOG_LEVEL_ERROR, "Invalid destination address, port or netmask "
1412                      "for permit-access directive in configuration file: \"%s\"", vec[1]);
1413                   string_append(&config->proxy_args,
1414                      "<br>\nWARNING: Invalid destination address, port or netmask for "
1415                      "permit-access directive in configuration file: \"");
1416                   string_append(&config->proxy_args,
1417                      vec[1]);
1418                   string_append(&config->proxy_args,
1419                      "\"<br><br>\n");
1420                   freez(cur_acl);
1421                   break;
1422                }
1423             }
1424 #ifdef HAVE_RFC2553
1425             else
1426             {
1427                cur_acl->wildcard_dst = 1;
1428             }
1429 #endif /* def HAVE_RFC2553 */
1430
1431             /*
1432              * Add it to the list.  Note we reverse the list to get the
1433              * behaviour the user expects.  With both the ACL and
1434              * actions file, the last match wins.  However, the internal
1435              * implementations are different:  The actions file is stored
1436              * in the same order as the file, and scanned completely.
1437              * With the ACL, we reverse the order as we load it, then
1438              * when we scan it we stop as soon as we get a match.
1439              */
1440             cur_acl->next  = config->acl;
1441             config->acl = cur_acl;
1442
1443             break;
1444 #endif /* def FEATURE_ACL */
1445
1446 /* *************************************************************************
1447  * proxy-info-url url
1448  * *************************************************************************/
1449          case hash_proxy_info_url :
1450             freez(config->proxy_info_url);
1451             config->proxy_info_url = strdup(arg);
1452             break;
1453
1454 /* *************************************************************************
1455  * single-threaded 0|1
1456  * *************************************************************************/
1457          case hash_single_threaded :
1458             config->multi_threaded =  0 == parse_toggle_state(cmd, arg);
1459             break;
1460
1461 /* *************************************************************************
1462  * socket-timeout numer_of_seconds
1463  * *************************************************************************/
1464          case hash_socket_timeout :
1465          {
1466             int socket_timeout = parse_numeric_value(cmd, arg);
1467             if (0 <= socket_timeout)
1468             {
1469                config->socket_timeout = socket_timeout;
1470             }
1471             else
1472             {
1473                log_error(LOG_LEVEL_FATAL, "Invalid socket-timeout: '%s'", arg);
1474             }
1475             break;
1476          }
1477
1478 /* *************************************************************************
1479  * split-large-cgi-forms
1480  * *************************************************************************/
1481          case hash_split_large_cgi_forms :
1482             if (parse_toggle_state(cmd, arg) == 1)
1483             {
1484                config->feature_flags |= RUNTIME_FEATURE_SPLIT_LARGE_FORMS;
1485             }
1486             else
1487             {
1488                config->feature_flags &= ~RUNTIME_FEATURE_SPLIT_LARGE_FORMS;
1489             }
1490             break;
1491
1492 /* *************************************************************************
1493  * templdir directory-name
1494  * *************************************************************************/
1495          case hash_templdir :
1496             freez(config->templdir);
1497             config->templdir = make_path(NULL, arg);
1498             break;
1499
1500 #ifdef FEATURE_EXTERNAL_FILTERS
1501 /* *************************************************************************
1502  * temporary-directory directory-name
1503  * *************************************************************************/
1504          case hash_temporary_directory :
1505             freez(config->temporary_directory);
1506             config->temporary_directory = make_path(NULL, arg);
1507             break;
1508 #endif
1509
1510 /* *************************************************************************
1511  * tolerate-pipelining (0|1)
1512  * *************************************************************************/
1513          case hash_tolerate_pipelining :
1514             if (parse_toggle_state(cmd, arg) == 1)
1515             {
1516                config->feature_flags |= RUNTIME_FEATURE_TOLERATE_PIPELINING;
1517             }
1518             else
1519             {
1520                config->feature_flags &= ~RUNTIME_FEATURE_TOLERATE_PIPELINING;
1521             }
1522             break;
1523
1524 /* *************************************************************************
1525  * toggle (0|1)
1526  * *************************************************************************/
1527 #ifdef FEATURE_TOGGLE
1528          case hash_toggle :
1529             global_toggle_state = parse_toggle_state(cmd, arg);
1530             break;
1531 #endif /* def FEATURE_TOGGLE */
1532
1533 /* *************************************************************************
1534  * trust-info-url url
1535  * *************************************************************************/
1536 #ifdef FEATURE_TRUST
1537          case hash_trust_info_url :
1538             enlist(config->trust_info, arg);
1539             break;
1540 #endif /* def FEATURE_TRUST */
1541
1542 /* *************************************************************************
1543  * trustfile filename
1544  * (In confdir by default.)
1545  * *************************************************************************/
1546 #ifdef FEATURE_TRUST
1547          case hash_trustfile :
1548             freez(config->trustfile);
1549             config->trustfile = make_path(config->confdir, arg);
1550             break;
1551 #endif /* def FEATURE_TRUST */
1552
1553 /* *************************************************************************
1554  * usermanual url
1555  * *************************************************************************/
1556          case hash_usermanual :
1557             /*
1558              * XXX: If this isn't the first config directive, the
1559              * show-status page links to the website documentation
1560              * for the directives that were already parsed. Lame.
1561              */
1562             freez(config->usermanual);
1563             config->usermanual = strdup(arg);
1564             break;
1565
1566 /* *************************************************************************
1567  * Win32 Console options:
1568  * *************************************************************************/
1569
1570 /* *************************************************************************
1571  * hide-console
1572  * *************************************************************************/
1573 #ifdef _WIN_CONSOLE
1574          case hash_hide_console :
1575             hideConsole = 1;
1576             break;
1577 #endif /*def _WIN_CONSOLE*/
1578
1579
1580 /* *************************************************************************
1581  * Win32 GUI options:
1582  * *************************************************************************/
1583
1584 #if defined(_WIN32) && ! defined(_WIN_CONSOLE)
1585 /* *************************************************************************
1586  * activity-animation (0|1)
1587  * *************************************************************************/
1588          case hash_activity_animation :
1589             g_bShowActivityAnimation = parse_toggle_state(cmd, arg);
1590             break;
1591
1592 /* *************************************************************************
1593  *  close-button-minimizes (0|1)
1594  * *************************************************************************/
1595          case hash_close_button_minimizes :
1596             g_bCloseHidesWindow = parse_toggle_state(cmd, arg);
1597             break;
1598
1599 /* *************************************************************************
1600  * log-buffer-size (0|1)
1601  * *************************************************************************/
1602          case hash_log_buffer_size :
1603             g_bLimitBufferSize = parse_toggle_state(cmd, arg);
1604             break;
1605
1606 /* *************************************************************************
1607  * log-font-name fontname
1608  * *************************************************************************/
1609          case hash_log_font_name :
1610             if (strlcpy(g_szFontFaceName, arg,
1611                    sizeof(g_szFontFaceName)) >= sizeof(g_szFontFaceName))
1612             {
1613                log_error(LOG_LEVEL_FATAL,
1614                   "log-font-name argument '%s' is longer than %u characters.",
1615                   arg, sizeof(g_szFontFaceName)-1);
1616             }
1617             break;
1618
1619 /* *************************************************************************
1620  * log-font-size n
1621  * *************************************************************************/
1622          case hash_log_font_size :
1623             g_nFontSize = parse_numeric_value(cmd, arg);
1624             break;
1625
1626 /* *************************************************************************
1627  * log-highlight-messages (0|1)
1628  * *************************************************************************/
1629          case hash_log_highlight_messages :
1630             g_bHighlightMessages = parse_toggle_state(cmd, arg);
1631             break;
1632
1633 /* *************************************************************************
1634  * log-max-lines n
1635  * *************************************************************************/
1636          case hash_log_max_lines :
1637             g_nMaxBufferLines = parse_numeric_value(cmd, arg);
1638             break;
1639
1640 /* *************************************************************************
1641  * log-messages (0|1)
1642  * *************************************************************************/
1643          case hash_log_messages :
1644             g_bLogMessages = parse_toggle_state(cmd, arg);
1645             break;
1646
1647 /* *************************************************************************
1648  * show-on-task-bar (0|1)
1649  * *************************************************************************/
1650          case hash_show_on_task_bar :
1651             g_bShowOnTaskBar = parse_toggle_state(cmd, arg);
1652             break;
1653
1654 #endif /* defined(_WIN32) && ! defined(_WIN_CONSOLE) */
1655
1656
1657 /* *************************************************************************
1658  * Warnings about unsupported features
1659  * *************************************************************************/
1660 #ifndef FEATURE_ACL
1661          case hash_deny_access:
1662 #endif /* ndef FEATURE_ACL */
1663 #ifndef FEATURE_CGI_EDIT_ACTIONS
1664          case hash_enable_edit_actions:
1665 #endif /* ndef FEATURE_CGI_EDIT_ACTIONS */
1666 #ifndef FEATURE_TOGGLE
1667          case hash_enable_remote_toggle:
1668 #endif /* ndef FEATURE_TOGGLE */
1669 #ifndef FEATURE_ACL
1670          case hash_permit_access:
1671 #endif /* ndef FEATURE_ACL */
1672 #ifndef FEATURE_TOGGLE
1673          case hash_toggle :
1674 #endif /* ndef FEATURE_TOGGLE */
1675 #ifndef FEATURE_TRUST
1676          case hash_trustfile :
1677          case hash_trust_info_url :
1678 #endif /* ndef FEATURE_TRUST */
1679
1680 #ifndef _WIN_CONSOLE
1681          case hash_hide_console :
1682 #endif /* ndef _WIN_CONSOLE */
1683
1684 #if defined(_WIN_CONSOLE) || ! defined(_WIN32)
1685          case hash_activity_animation :
1686          case hash_close_button_minimizes :
1687          case hash_log_buffer_size :
1688          case hash_log_font_name :
1689          case hash_log_font_size :
1690          case hash_log_highlight_messages :
1691          case hash_log_max_lines :
1692          case hash_log_messages :
1693          case hash_show_on_task_bar :
1694 #endif /* defined(_WIN_CONSOLE) || ! defined(_WIN32) */
1695             /* These warnings are annoying - so hide them. -- Jon */
1696             /* log_error(LOG_LEVEL_INFO, "Unsupported directive \"%s\" ignored.", cmd); */
1697             break;
1698
1699 /* *************************************************************************/
1700          default :
1701 /* *************************************************************************/
1702             /*
1703              * I decided that I liked this better as a warning than an
1704              * error.  To change back to an error, just change log level
1705              * to LOG_LEVEL_FATAL.
1706              */
1707             log_error(LOG_LEVEL_ERROR, "Ignoring unrecognized directive "
1708                "'%s' (%uU) in line %lu in configuration file (%s).",
1709                buf, directive_hash, linenum, configfile);
1710             string_append(&config->proxy_args,
1711                " <strong class='warning'>Warning: Ignoring unrecognized directive:</strong>");
1712             break;
1713
1714 /* *************************************************************************/
1715       } /* end switch(hash_string(cmd)) */
1716
1717       /* Save the argument for the show-status page. */
1718       savearg(cmd, arg, config);
1719       freez(buf);
1720    } /* end while (read_config_line(...)) */
1721
1722    fclose(configfp);
1723
1724    set_debug_level(config->debug);
1725
1726    freez(config->logfile);
1727
1728    if (daemon_mode)
1729    {
1730       if (NULL != logfile)
1731       {
1732          config->logfile = logfile;
1733          init_error_log(Argv[0], config->logfile);
1734       }
1735       else
1736       {
1737          disable_logging();
1738       }
1739    }
1740
1741 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
1742    if (config->default_server_timeout > config->keep_alive_timeout)
1743    {
1744       log_error(LOG_LEVEL_ERROR,
1745          "Reducing the default-server-timeout from %d to the keep-alive-timeout %d.",
1746          config->default_server_timeout, config->keep_alive_timeout);
1747       config->default_server_timeout = config->keep_alive_timeout;
1748    }
1749 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
1750
1751 #ifdef FEATURE_CONNECTION_SHARING
1752    if (config->feature_flags & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
1753    {
1754       if (config->multi_threaded)
1755       {
1756          set_keep_alive_timeout(config->keep_alive_timeout);
1757       }
1758       else
1759       {
1760          /*
1761           * While we could use keep-alive without multiple threads
1762           * if we didn't bother with enforcing the connection timeout,
1763           * that might make Tor users sad, even though they shouldn't
1764           * enable the single-threaded option anyway.
1765           *
1766           * XXX: We could still use Proxy-Connection: keep-alive.
1767           */
1768          config->feature_flags &= ~RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
1769          log_error(LOG_LEVEL_ERROR,
1770             "Config option single-threaded disables connection keep-alive.");
1771       }
1772    }
1773    else if ((config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING))
1774    {
1775       log_error(LOG_LEVEL_ERROR, "Config option connection-sharing "
1776          "has no effect if keep-alive-timeout isn't set.");
1777       config->feature_flags &= ~RUNTIME_FEATURE_CONNECTION_SHARING;
1778    }
1779 #endif /* def FEATURE_CONNECTION_SHARING */
1780
1781    if (NULL == config->proxy_args)
1782    {
1783       log_error(LOG_LEVEL_FATAL, "Out of memory loading config - insufficient memory for config->proxy_args");
1784    }
1785
1786    if (config->re_filterfile[0])
1787    {
1788       add_loader(load_re_filterfiles, config);
1789    }
1790
1791    if (config->actions_file[0])
1792    {
1793       add_loader(load_action_files, config);
1794    }
1795
1796 #ifdef FEATURE_TRUST
1797    if (config->trustfile)
1798    {
1799       add_loader(load_trustfile, config);
1800    }
1801 #endif /* def FEATURE_TRUST */
1802
1803    if (NULL == config->haddr[0])
1804    {
1805       config->haddr[0] = strdup(HADDR_DEFAULT);
1806       if (NULL == config->haddr[0])
1807       {
1808          log_error(LOG_LEVEL_FATAL, "Out of memory while copying default listening address");
1809       }
1810    }
1811
1812    for (i = 0; i < MAX_LISTENING_SOCKETS && NULL != config->haddr[i]; i++)
1813    {
1814       if ((*config->haddr[i] == '[')
1815          && (NULL != (p = strchr(config->haddr[i], ']')))
1816          && (p[1] == ':')
1817          && (0 < (config->hport[i] = atoi(p + 2))))
1818       {
1819          *p = '\0';
1820          memmove((void *)config->haddr[i], config->haddr[i] + 1,
1821             (size_t)(p - config->haddr[i]));
1822       }
1823       else if (NULL != (p = strchr(config->haddr[i], ':'))
1824          && (0 < (config->hport[i] = atoi(p + 1))))
1825       {
1826          *p = '\0';
1827       }
1828       else
1829       {
1830          log_error(LOG_LEVEL_FATAL, "invalid bind port spec %s", config->haddr[i]);
1831          /* Never get here - LOG_LEVEL_FATAL causes program exit */
1832       }
1833       if (*config->haddr[i] == '\0')
1834       {
1835          /*
1836           * Only the port specified. We stored it in config->hport[i]
1837           * and don't need its text representation anymore.
1838           * Use config->hport[i] == 0 to iterate listening addresses since
1839           * now.
1840           */
1841          freez(config->haddr[i]);
1842       }
1843    }
1844
1845    /*
1846     * Want to run all the loaders once now.
1847     *
1848     * Need to set up a fake csp, so they can get to the config.
1849     */
1850    fake_csp = zalloc_or_die(sizeof(*fake_csp));
1851    fake_csp->config = config;
1852
1853    if (run_loader(fake_csp))
1854    {
1855       freez(fake_csp);
1856       log_error(LOG_LEVEL_FATAL, "A loader failed while loading config file. Exiting.");
1857       /* Never get here - LOG_LEVEL_FATAL causes program exit */
1858    }
1859    freez(fake_csp);
1860
1861 /* FIXME: this is a kludge for win32 */
1862 #if defined(_WIN32) && !defined (_WIN_CONSOLE)
1863
1864    g_default_actions_file = config->actions_file[1]; /* FIXME Hope this is default.action */
1865    g_user_actions_file  = config->actions_file[2];  /* FIXME Hope this is user.action */
1866    g_default_filterfile = config->re_filterfile[0]; /* FIXME Hope this is default.filter */
1867    g_user_filterfile    = config->re_filterfile[1]; /* FIXME Hope this is user.filter */
1868
1869 #ifdef FEATURE_TRUST
1870    g_trustfile        = config->trustfile;
1871 #endif /* def FEATURE_TRUST */
1872
1873
1874 #endif /* defined(_WIN32) && !defined (_WIN_CONSOLE) */
1875 /* FIXME: end kludge */
1876
1877
1878    config->need_bind = 1;
1879
1880    if (current_configfile)
1881    {
1882       struct configuration_spec * oldcfg = (struct configuration_spec *)
1883                                            current_configfile->f;
1884       /*
1885        * Check if config->haddr[i],hport[i] == oldcfg->haddr[i],hport[i]
1886        *
1887        * The following could be written more compactly as a single,
1888        * (unreadably long) if statement.
1889        */
1890       config->need_bind = 0;
1891
1892       for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
1893       {
1894          if (config->hport[i] != oldcfg->hport[i])
1895          {
1896             config->need_bind = 1;
1897          }
1898          else if (config->haddr[i] == NULL)
1899          {
1900             if (oldcfg->haddr[i] != NULL)
1901             {
1902                config->need_bind = 1;
1903             }
1904          }
1905          else if (oldcfg->haddr[i] == NULL)
1906          {
1907             config->need_bind = 1;
1908          }
1909          else if (0 != strcmp(config->haddr[i], oldcfg->haddr[i]))
1910          {
1911             config->need_bind = 1;
1912          }
1913       }
1914
1915       current_configfile->unloader = unload_configfile;
1916    }
1917
1918    fs->next = files->next;
1919    files->next = fs;
1920
1921    current_configfile = fs;
1922
1923    return (config);
1924 }
1925
1926
1927 /*********************************************************************
1928  *
1929  * Function    :  savearg
1930  *
1931  * Description :  Called from `load_config'.  It saves each non-empty
1932  *                and non-comment line from config into
1933  *                config->proxy_args.  This is used to create the
1934  *                show-proxy-args page.  On error, frees
1935  *                config->proxy_args and sets it to NULL
1936  *
1937  * Parameters  :
1938  *          1  :  command = config setting that was found
1939  *          2  :  argument = the setting's argument (if any)
1940  *          3  :  config = Configuration to save into.
1941  *
1942  * Returns     :  N/A
1943  *
1944  *********************************************************************/
1945 static void savearg(char *command, char *argument, struct configuration_spec * config)
1946 {
1947    char * buf;
1948    char * s;
1949
1950    assert(command);
1951    assert(argument);
1952
1953    /*
1954     * Add config option name embedded in
1955     * link to its section in the user-manual
1956     */
1957    buf = strdup("\n<a href=\"");
1958    if (!strncmpic(config->usermanual, "file://", 7) ||
1959        !strncmpic(config->usermanual, "http", 4))
1960    {
1961       string_append(&buf, config->usermanual);
1962    }
1963    else
1964    {
1965       string_append(&buf, "http://" CGI_SITE_2_HOST "/user-manual/");
1966    }
1967    string_append(&buf, CONFIG_HELP_PREFIX);
1968    string_join  (&buf, string_toupper(command));
1969    string_append(&buf, "\">");
1970    string_append(&buf, command);
1971    string_append(&buf, "</a> ");
1972
1973    if (NULL == buf)
1974    {
1975       freez(config->proxy_args);
1976       return;
1977    }
1978
1979    if ((NULL != argument) && ('\0' != *argument))
1980    {
1981       s = html_encode(argument);
1982       if (NULL == s)
1983       {
1984          freez(buf);
1985          freez(config->proxy_args);
1986          return;
1987       }
1988
1989       if (strncmpic(argument, "http://", 7) == 0)
1990       {
1991          string_append(&buf, "<a href=\"");
1992          string_append(&buf, s);
1993          string_append(&buf, "\">");
1994          string_join  (&buf, s);
1995          string_append(&buf, "</a>");
1996       }
1997       else
1998       {
1999          string_join  (&buf, s);
2000       }
2001    }
2002
2003    string_append(&buf, "<br>");
2004    string_join(&config->proxy_args, buf);
2005 }
2006
2007
2008 /*
2009   Local Variables:
2010   tab-width: 3
2011   end:
2012 */