905a9104b3e290c8d3961ade08b3fce8883e4d42
[rsync.git] / loadparm.c
1 /*
2  * This program is free software; you can redistribute it and/or modify
3  * it under the terms of the GNU General Public License as published by
4  * the Free Software Foundation; either version 3 of the License, or
5  * (at your option) any later version.
6  *
7  * This program is distributed in the hope that it will be useful,
8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10  * GNU General Public License for more details.
11  *
12  * You should have received a copy of the GNU General Public License along
13  * with this program; if not, visit the http://fsf.org website.
14  */
15
16 /* This is based on loadparm.c from Samba, written by Andrew Tridgell
17  * and Karl Auer.  Some of the changes are:
18  *
19  * Copyright (C) 2001, 2002 Martin Pool <mbp@samba.org>
20  * Copyright (C) 2003-2009 Wayne Davison <wayned@samba.org>
21  */
22
23 /* Load parameters.
24  *
25  *  This module provides suitable callback functions for the params
26  *  module. It builds the internal table of section details which is
27  *  then used by the rest of the server.
28  *
29  * To add a parameter:
30  *
31  * 1) add it to the global_vars or local_vars structure definition
32  * 2) add it to the parm_table
33  * 3) add it to the list of available functions (eg: using FN_GLOBAL_STRING())
34  * 4) initialise it in the Defaults static stucture
35  *
36  * Notes:
37  *   The configuration file is processed sequentially for speed. For this
38  *   reason, there is a fair bit of sequence-dependent code here - ie., code
39  *   which assumes that certain things happen before others. In particular, the
40  *   code which happens at the boundary between sections is delicately poised,
41  *   so be careful!
42  */
43
44 #include "rsync.h"
45 #include "itypes.h"
46
47 extern item_list dparam_list;
48
49 #define strequal(a, b) (strcasecmp(a, b)==0)
50 #define BOOLSTR(b) ((b) ? "Yes" : "No")
51
52 #ifndef LOG_DAEMON
53 #define LOG_DAEMON 0
54 #endif
55
56 #define DEFAULT_DONT_COMPRESS "*.gz *.zip *.z *.rpm *.deb *.iso *.bz2" \
57         " *.t[gb]z *.7z *.mp[34] *.mov *.avi *.ogg *.jpg *.jpeg"
58
59 /* the following are used by loadparm for option lists */
60 typedef enum {
61         P_BOOL, P_BOOLREV, P_CHAR, P_INTEGER,
62         P_OCTAL, P_PATH, P_STRING, P_ENUM
63 } parm_type;
64
65 typedef enum {
66         P_LOCAL, P_GLOBAL, P_NONE
67 } parm_class;
68
69 struct enum_list {
70         int value;
71         char *name;
72 };
73
74 struct parm_struct {
75         char *label;
76         parm_type type;
77         parm_class class;
78         void *ptr;
79         struct enum_list *enum_list;
80         unsigned flags;
81 };
82
83 #ifndef GLOBAL_NAME
84 #define GLOBAL_NAME "global"
85 #endif
86
87 /* some helpful bits */
88 #define iSECTION(i) ((local_vars*)section_list.items)[i]
89 #define LP_SNUM_OK(i) ((i) >= 0 && (i) < (int)section_list.count)
90 #define SECTION_PTR(s, p) (((char*)(s)) + (ptrdiff_t)(((char*)(p))-(char*)&Vars.l))
91
92 /*
93  * This structure describes global (ie., server-wide) parameters.
94  */
95 typedef struct {
96         char *bind_address;
97         char *motd_file;
98         char *pid_file;
99         char *socket_options;
100
101         int rsync_port;
102 } global_vars;
103
104 /*
105  * This structure describes a single section.  Their order must match the
106  * initializers below, which you can accomplish by keeping each sub-section
107  * sorted.  (e.g. in vim, just visually select each subsection and use !sort.)
108  */
109 typedef struct {
110         char *auth_users;
111         char *charset;
112         char *comment;
113         char *dont_compress;
114         char *exclude;
115         char *exclude_from;
116         char *filter;
117         char *gid;
118         char *hosts_allow;
119         char *hosts_deny;
120         char *include;
121         char *include_from;
122         char *incoming_chmod;
123         char *lock_file;
124         char *log_file;
125         char *log_format;
126         char *name;
127         char *outgoing_chmod;
128         char *path;
129         char *postxfer_exec;
130         char *prexfer_exec;
131         char *refuse_options;
132         char *secrets_file;
133         char *temp_dir;
134         char *uid;
135
136         int max_connections;
137         int max_verbosity;
138         int syslog_facility;
139         int timeout;
140
141         BOOL fake_super;
142         BOOL ignore_errors;
143         BOOL ignore_nonreadable;
144         BOOL list;
145         BOOL munge_symlinks;
146         BOOL numeric_ids;
147         BOOL read_only;
148         BOOL reverse_lookup;
149         BOOL strict_modes;
150         BOOL transfer_logging;
151         BOOL use_chroot;
152         BOOL write_only;
153 } local_vars;
154
155 /* This structure describes the global variables (g) as well as the globally
156  * specified values of the local variables (l), which are used when modules
157  * don't specify their own values. */
158 typedef struct {
159         global_vars g;
160         local_vars l;
161 } all_vars;
162
163 /* The application defaults for all the variables.  "Defaults" is
164  * used to re-initialize "Vars" before each config-file read.
165  *
166  * In order to keep these sorted in the same way as the structure
167  * above, use the variable name in the leading comment, including a
168  * trailing ';' (to avoid a sorting problem with trailing digits). */
169 static const all_vars Defaults = {
170  /* ==== global_vars ==== */
171  {
172  /* bind_address; */            NULL,
173  /* motd_file; */               NULL,
174  /* pid_file; */                NULL,
175  /* socket_options; */          NULL,
176
177  /* rsync_port; */              0,
178  },
179
180  /* ==== local_vars ==== */
181  {
182  /* auth_users; */              NULL,
183  /* charset; */                 NULL,
184  /* comment; */                 NULL,
185  /* dont_compress; */           DEFAULT_DONT_COMPRESS,
186  /* exclude; */                 NULL,
187  /* exclude_from; */            NULL,
188  /* filter; */                  NULL,
189  /* gid; */                     NOBODY_GROUP,
190  /* hosts_allow; */             NULL,
191  /* hosts_deny; */              NULL,
192  /* include; */                 NULL,
193  /* include_from; */            NULL,
194  /* incoming_chmod; */          NULL,
195  /* lock_file; */               DEFAULT_LOCK_FILE,
196  /* log_file; */                NULL,
197  /* log_format; */              "%o %h [%a] %m (%u) %f %l",
198  /* name; */                    NULL,
199  /* outgoing_chmod; */          NULL,
200  /* path; */                    NULL,
201  /* postxfer_exec; */           NULL,
202  /* prexfer_exec; */            NULL,
203  /* refuse_options; */          NULL,
204  /* secrets_file; */            NULL,
205  /* temp_dir; */                NULL,
206  /* uid; */                     NOBODY_USER,
207
208  /* max_connections; */         0,
209  /* max_verbosity; */           1,
210  /* syslog_facility; */         LOG_DAEMON,
211  /* timeout; */                 0,
212
213  /* fake_super; */              False,
214  /* ignore_errors; */           False,
215  /* ignore_nonreadable; */      False,
216  /* list; */                    True,
217  /* munge_symlinks; */          (BOOL)-1,
218  /* numeric_ids; */             (BOOL)-1,
219  /* read_only; */               True,
220  /* reverse_lookup; */          True,
221  /* strict_modes; */            True,
222  /* transfer_logging; */        False,
223  /* use_chroot; */              True,
224  /* write_only; */              False,
225  }
226 };
227
228 /* The currently configured values for all the variables. */
229 static all_vars Vars;
230
231 /* Stack of "Vars" values used by the &include directive. */
232 static item_list Vars_stack = EMPTY_ITEM_LIST;
233
234 /* The array of section values that holds all the defined modules. */
235 static item_list section_list = EMPTY_ITEM_LIST;
236
237 static int iSectionIndex = -1;
238 static BOOL bInGlobalSection = True;
239
240 #define NUMPARAMETERS (sizeof (parm_table) / sizeof (struct parm_struct))
241
242 static struct enum_list enum_facilities[] = {
243 #ifdef LOG_AUTH
244         { LOG_AUTH, "auth" },
245 #endif
246 #ifdef LOG_AUTHPRIV
247         { LOG_AUTHPRIV, "authpriv" },
248 #endif
249 #ifdef LOG_CRON
250         { LOG_CRON, "cron" },
251 #endif
252 #ifdef LOG_DAEMON
253         { LOG_DAEMON, "daemon" },
254 #endif
255 #ifdef LOG_FTP
256         { LOG_FTP, "ftp" },
257 #endif
258 #ifdef LOG_KERN
259         { LOG_KERN, "kern" },
260 #endif
261 #ifdef LOG_LPR
262         { LOG_LPR, "lpr" },
263 #endif
264 #ifdef LOG_MAIL
265         { LOG_MAIL, "mail" },
266 #endif
267 #ifdef LOG_NEWS
268         { LOG_NEWS, "news" },
269 #endif
270 #ifdef LOG_AUTH
271         { LOG_AUTH, "security" },
272 #endif
273 #ifdef LOG_SYSLOG
274         { LOG_SYSLOG, "syslog" },
275 #endif
276 #ifdef LOG_USER
277         { LOG_USER, "user" },
278 #endif
279 #ifdef LOG_UUCP
280         { LOG_UUCP, "uucp" },
281 #endif
282 #ifdef LOG_LOCAL0
283         { LOG_LOCAL0, "local0" },
284 #endif
285 #ifdef LOG_LOCAL1
286         { LOG_LOCAL1, "local1" },
287 #endif
288 #ifdef LOG_LOCAL2
289         { LOG_LOCAL2, "local2" },
290 #endif
291 #ifdef LOG_LOCAL3
292         { LOG_LOCAL3, "local3" },
293 #endif
294 #ifdef LOG_LOCAL4
295         { LOG_LOCAL4, "local4" },
296 #endif
297 #ifdef LOG_LOCAL5
298         { LOG_LOCAL5, "local5" },
299 #endif
300 #ifdef LOG_LOCAL6
301         { LOG_LOCAL6, "local6" },
302 #endif
303 #ifdef LOG_LOCAL7
304         { LOG_LOCAL7, "local7" },
305 #endif
306         { -1, NULL }
307 };
308
309 static struct parm_struct parm_table[] =
310 {
311  {"address",           P_STRING, P_GLOBAL,&Vars.g.bind_address,        NULL,0},
312  {"motd file",         P_STRING, P_GLOBAL,&Vars.g.motd_file,           NULL,0},
313  {"pid file",          P_STRING, P_GLOBAL,&Vars.g.pid_file,            NULL,0},
314  {"port",              P_INTEGER,P_GLOBAL,&Vars.g.rsync_port,          NULL,0},
315  {"socket options",    P_STRING, P_GLOBAL,&Vars.g.socket_options,      NULL,0},
316
317  {"auth users",        P_STRING, P_LOCAL, &Vars.l.auth_users,          NULL,0},
318  {"charset",           P_STRING, P_LOCAL, &Vars.l.charset,             NULL,0},
319  {"comment",           P_STRING, P_LOCAL, &Vars.l.comment,             NULL,0},
320  {"dont compress",     P_STRING, P_LOCAL, &Vars.l.dont_compress,       NULL,0},
321  {"exclude from",      P_STRING, P_LOCAL, &Vars.l.exclude_from,        NULL,0},
322  {"exclude",           P_STRING, P_LOCAL, &Vars.l.exclude,             NULL,0},
323  {"fake super",        P_BOOL,   P_LOCAL, &Vars.l.fake_super,          NULL,0},
324  {"filter",            P_STRING, P_LOCAL, &Vars.l.filter,              NULL,0},
325  {"gid",               P_STRING, P_LOCAL, &Vars.l.gid,                 NULL,0},
326  {"hosts allow",       P_STRING, P_LOCAL, &Vars.l.hosts_allow,         NULL,0},
327  {"hosts deny",        P_STRING, P_LOCAL, &Vars.l.hosts_deny,          NULL,0},
328  {"ignore errors",     P_BOOL,   P_LOCAL, &Vars.l.ignore_errors,       NULL,0},
329  {"ignore nonreadable",P_BOOL,   P_LOCAL, &Vars.l.ignore_nonreadable,  NULL,0},
330  {"include from",      P_STRING, P_LOCAL, &Vars.l.include_from,        NULL,0},
331  {"include",           P_STRING, P_LOCAL, &Vars.l.include,             NULL,0},
332  {"incoming chmod",    P_STRING, P_LOCAL, &Vars.l.incoming_chmod,      NULL,0},
333  {"list",              P_BOOL,   P_LOCAL, &Vars.l.list,                NULL,0},
334  {"lock file",         P_STRING, P_LOCAL, &Vars.l.lock_file,           NULL,0},
335  {"log file",          P_STRING, P_LOCAL, &Vars.l.log_file,            NULL,0},
336  {"log format",        P_STRING, P_LOCAL, &Vars.l.log_format,          NULL,0},
337  {"max connections",   P_INTEGER,P_LOCAL, &Vars.l.max_connections,     NULL,0},
338  {"max verbosity",     P_INTEGER,P_LOCAL, &Vars.l.max_verbosity,       NULL,0},
339  {"munge symlinks",    P_BOOL,   P_LOCAL, &Vars.l.munge_symlinks,      NULL,0},
340  {"name",              P_STRING, P_LOCAL, &Vars.l.name,                NULL,0},
341  {"numeric ids",       P_BOOL,   P_LOCAL, &Vars.l.numeric_ids,         NULL,0},
342  {"outgoing chmod",    P_STRING, P_LOCAL, &Vars.l.outgoing_chmod,      NULL,0},
343  {"path",              P_PATH,   P_LOCAL, &Vars.l.path,                NULL,0},
344 #ifdef HAVE_PUTENV
345  {"post-xfer exec",    P_STRING, P_LOCAL, &Vars.l.postxfer_exec,       NULL,0},
346  {"pre-xfer exec",     P_STRING, P_LOCAL, &Vars.l.prexfer_exec,        NULL,0},
347 #endif
348  {"read only",         P_BOOL,   P_LOCAL, &Vars.l.read_only,           NULL,0},
349  {"refuse options",    P_STRING, P_LOCAL, &Vars.l.refuse_options,      NULL,0},
350  {"reverse lookup",    P_BOOL,   P_LOCAL, &Vars.l.reverse_lookup,      NULL,0},
351  {"secrets file",      P_STRING, P_LOCAL, &Vars.l.secrets_file,        NULL,0},
352  {"strict modes",      P_BOOL,   P_LOCAL, &Vars.l.strict_modes,        NULL,0},
353  {"syslog facility",   P_ENUM,   P_LOCAL, &Vars.l.syslog_facility,     enum_facilities,0},
354  {"temp dir",          P_PATH,   P_LOCAL, &Vars.l.temp_dir,            NULL,0},
355  {"timeout",           P_INTEGER,P_LOCAL, &Vars.l.timeout,             NULL,0},
356  {"transfer logging",  P_BOOL,   P_LOCAL, &Vars.l.transfer_logging,    NULL,0},
357  {"uid",               P_STRING, P_LOCAL, &Vars.l.uid,                 NULL,0},
358  {"use chroot",        P_BOOL,   P_LOCAL, &Vars.l.use_chroot,          NULL,0},
359  {"write only",        P_BOOL,   P_LOCAL, &Vars.l.write_only,          NULL,0},
360  {NULL,                P_BOOL,   P_NONE,  NULL,                        NULL,0}
361 };
362
363 /* Initialise the Default all_vars structure. */
364 static void reset_all_vars(void)
365 {
366         memcpy(&Vars, &Defaults, sizeof Vars);
367 }
368
369 /* In this section all the functions that are used to access the
370  * parameters from the rest of the program are defined. */
371
372 #define FN_GLOBAL_STRING(fn_name, ptr) \
373  char *fn_name(void) {return *(char **)(ptr) ? *(char **)(ptr) : "";}
374 #define FN_GLOBAL_BOOL(fn_name, ptr) \
375  BOOL fn_name(void) {return *(BOOL *)(ptr);}
376 #define FN_GLOBAL_CHAR(fn_name, ptr) \
377  char fn_name(void) {return *(char *)(ptr);}
378 #define FN_GLOBAL_INTEGER(fn_name, ptr) \
379  int fn_name(void) {return *(int *)(ptr);}
380
381 #define FN_LOCAL_STRING(fn_name, val) \
382  char *fn_name(int i) {return LP_SNUM_OK(i) && iSECTION(i).val? iSECTION(i).val : (Vars.l.val? Vars.l.val : "");}
383 #define FN_LOCAL_BOOL(fn_name, val) \
384  BOOL fn_name(int i) {return LP_SNUM_OK(i)? iSECTION(i).val : Vars.l.val;}
385 #define FN_LOCAL_CHAR(fn_name, val) \
386  char fn_name(int i) {return LP_SNUM_OK(i)? iSECTION(i).val : Vars.l.val;}
387 #define FN_LOCAL_INTEGER(fn_name, val) \
388  int fn_name(int i) {return LP_SNUM_OK(i)? iSECTION(i).val : Vars.l.val;}
389
390 FN_GLOBAL_STRING(lp_bind_address, &Vars.g.bind_address)
391 FN_GLOBAL_STRING(lp_motd_file, &Vars.g.motd_file)
392 FN_GLOBAL_STRING(lp_pid_file, &Vars.g.pid_file)
393 FN_GLOBAL_STRING(lp_socket_options, &Vars.g.socket_options)
394
395 FN_GLOBAL_INTEGER(lp_rsync_port, &Vars.g.rsync_port)
396
397 FN_LOCAL_STRING(lp_auth_users, auth_users)
398 FN_LOCAL_STRING(lp_charset, charset)
399 FN_LOCAL_STRING(lp_comment, comment)
400 FN_LOCAL_STRING(lp_dont_compress, dont_compress)
401 FN_LOCAL_STRING(lp_exclude, exclude)
402 FN_LOCAL_STRING(lp_exclude_from, exclude_from)
403 FN_LOCAL_STRING(lp_filter, filter)
404 FN_LOCAL_STRING(lp_gid, gid)
405 FN_LOCAL_STRING(lp_hosts_allow, hosts_allow)
406 FN_LOCAL_STRING(lp_hosts_deny, hosts_deny)
407 FN_LOCAL_STRING(lp_include, include)
408 FN_LOCAL_STRING(lp_include_from, include_from)
409 FN_LOCAL_STRING(lp_incoming_chmod, incoming_chmod)
410 FN_LOCAL_STRING(lp_lock_file, lock_file)
411 FN_LOCAL_STRING(lp_log_file, log_file)
412 FN_LOCAL_STRING(lp_log_format, log_format)
413 FN_LOCAL_STRING(lp_name, name)
414 FN_LOCAL_STRING(lp_outgoing_chmod, outgoing_chmod)
415 FN_LOCAL_STRING(lp_path, path)
416 FN_LOCAL_STRING(lp_postxfer_exec, postxfer_exec)
417 FN_LOCAL_STRING(lp_prexfer_exec, prexfer_exec)
418 FN_LOCAL_STRING(lp_refuse_options, refuse_options)
419 FN_LOCAL_STRING(lp_secrets_file, secrets_file)
420 FN_LOCAL_STRING(lp_temp_dir, temp_dir)
421 FN_LOCAL_STRING(lp_uid, uid)
422
423 FN_LOCAL_INTEGER(lp_max_connections, max_connections)
424 FN_LOCAL_INTEGER(lp_max_verbosity, max_verbosity)
425 FN_LOCAL_INTEGER(lp_syslog_facility, syslog_facility)
426 FN_LOCAL_INTEGER(lp_timeout, timeout)
427
428 FN_LOCAL_BOOL(lp_fake_super, fake_super)
429 FN_LOCAL_BOOL(lp_ignore_errors, ignore_errors)
430 FN_LOCAL_BOOL(lp_ignore_nonreadable, ignore_nonreadable)
431 FN_LOCAL_BOOL(lp_list, list)
432 FN_LOCAL_BOOL(lp_munge_symlinks, munge_symlinks)
433 FN_LOCAL_BOOL(lp_numeric_ids, numeric_ids)
434 FN_LOCAL_BOOL(lp_read_only, read_only)
435 FN_LOCAL_BOOL(lp_reverse_lookup, reverse_lookup)
436 FN_LOCAL_BOOL(lp_strict_modes, strict_modes)
437 FN_LOCAL_BOOL(lp_transfer_logging, transfer_logging)
438 FN_LOCAL_BOOL(lp_use_chroot, use_chroot)
439 FN_LOCAL_BOOL(lp_write_only, write_only)
440
441 /* Assign a copy of v to *s.  Handles NULL strings.  *v must
442  * be initialized when this is called, either to NULL or a malloc'd
443  * string.
444  *
445  * FIXME There is a small leak here in that sometimes the existing
446  * value will be dynamically allocated, and the old copy is lost.
447  * However, we can't always deallocate the old value, because the
448  * initial values in Defaults.l are static strings.  It would be nice
449  * to have either all-strdup'd values, or to never need to free
450  * memory. */
451 static void string_set(char **s, const char *v)
452 {
453         if (!v) {
454                 *s = NULL;
455                 return;
456         }
457         if (!(*s = strdup(v)))
458                 out_of_memory("string_set");
459 }
460
461 /* Copy the local_vars, duplicating any strings in the source. */
462 static void copy_section(local_vars *psectionDest, local_vars *psectionSource)
463 {
464         int i;
465
466         for (i = 0; parm_table[i].label; i++) {
467                 if (parm_table[i].ptr && parm_table[i].class == P_LOCAL) {
468                         void *def_ptr = parm_table[i].ptr;
469                         void *src_ptr = SECTION_PTR(psectionSource, def_ptr);
470                         void *dest_ptr = SECTION_PTR(psectionDest, def_ptr);
471
472                         switch (parm_table[i].type) {
473                         case P_BOOL:
474                         case P_BOOLREV:
475                                 *(BOOL *)dest_ptr = *(BOOL *)src_ptr;
476                                 break;
477
478                         case P_INTEGER:
479                         case P_ENUM:
480                         case P_OCTAL:
481                                 *(int *)dest_ptr = *(int *)src_ptr;
482                                 break;
483
484                         case P_CHAR:
485                                 *(char *)dest_ptr = *(char *)src_ptr;
486                                 break;
487
488                         case P_PATH:
489                         case P_STRING:
490                                 string_set(dest_ptr, *(char **)src_ptr);
491                                 break;
492
493                         default:
494                                 break;
495                         }
496                 }
497         }
498 }
499
500 /* Initialise a section to the defaults. */
501 static void init_section(local_vars *psection)
502 {
503         memset(psection, 0, sizeof (local_vars));
504         copy_section(psection, &Vars.l);
505 }
506
507 /* Do a case-insensitive, whitespace-ignoring string compare. */
508 static int strwicmp(char *psz1, char *psz2)
509 {
510         /* if BOTH strings are NULL, return TRUE, if ONE is NULL return */
511         /* appropriate value. */
512         if (psz1 == psz2)
513                 return 0;
514
515         if (psz1 == NULL)
516                 return -1;
517
518         if (psz2 == NULL)
519                 return 1;
520
521         /* sync the strings on first non-whitespace */
522         while (1) {
523                 while (isSpace(psz1))
524                         psz1++;
525                 while (isSpace(psz2))
526                         psz2++;
527                 if (toUpper(psz1) != toUpper(psz2) || *psz1 == '\0' || *psz2 == '\0')
528                         break;
529                 psz1++;
530                 psz2++;
531         }
532         return *psz1 - *psz2;
533 }
534
535 /* Find a section by name. Otherwise works like get_section. */
536 static int getsectionbyname(char *name)
537 {
538         int i;
539
540         for (i = section_list.count - 1; i >= 0; i--) {
541                 if (strwicmp(iSECTION(i).name, name) == 0)
542                         break;
543         }
544
545         return i;
546 }
547
548 /* Add a new section to the sections array w/the default values. */
549 static int add_a_section(char *name)
550 {
551         int i;
552         local_vars *s;
553
554         /* it might already exist */
555         if (name) {
556                 i = getsectionbyname(name);
557                 if (i >= 0)
558                         return i;
559         }
560
561         i = section_list.count;
562         s = EXPAND_ITEM_LIST(&section_list, local_vars, 2);
563
564         init_section(s);
565         if (name)
566                 string_set(&s->name, name);
567
568         return i;
569 }
570
571 /* Map a parameter's string representation to something we can use.
572  * Returns False if the parameter string is not recognised, else TRUE. */
573 static int map_parameter(char *parmname)
574 {
575         int iIndex;
576
577         if (*parmname == '-')
578                 return -1;
579
580         for (iIndex = 0; parm_table[iIndex].label; iIndex++) {
581                 if (strwicmp(parm_table[iIndex].label, parmname) == 0)
582                         return iIndex;
583         }
584
585         rprintf(FLOG, "Unknown Parameter encountered: \"%s\"\n", parmname);
586         return -1;
587 }
588
589 /* Set a boolean variable from the text value stored in the passed string.
590  * Returns True in success, False if the passed string does not correctly
591  * represent a boolean. */
592 static BOOL set_boolean(BOOL *pb, char *parmvalue)
593 {
594         if (strwicmp(parmvalue, "yes") == 0
595          || strwicmp(parmvalue, "true") == 0
596          || strwicmp(parmvalue, "1") == 0)
597                 *pb = True;
598         else if (strwicmp(parmvalue, "no") == 0
599               || strwicmp(parmvalue, "False") == 0
600               || strwicmp(parmvalue, "0") == 0)
601                 *pb = False;
602         else {
603                 rprintf(FLOG, "Badly formed boolean in configuration file: \"%s\".\n", parmvalue);
604                 return False;
605         }
606         return True;
607 }
608
609 /* Process a parameter. */
610 static BOOL do_parameter(char *parmname, char *parmvalue)
611 {
612         int parmnum, i;
613         void *parm_ptr; /* where we are going to store the result */
614         void *def_ptr;
615         char *cp;
616
617         parmnum = map_parameter(parmname);
618
619         if (parmnum < 0) {
620                 rprintf(FLOG, "IGNORING unknown parameter \"%s\"\n", parmname);
621                 return True;
622         }
623
624         def_ptr = parm_table[parmnum].ptr;
625
626         if (bInGlobalSection)
627                 parm_ptr = def_ptr;
628         else {
629                 if (parm_table[parmnum].class == P_GLOBAL) {
630                         rprintf(FLOG, "Global parameter %s found in module section!\n", parmname);
631                         return True;
632                 }
633                 parm_ptr = SECTION_PTR(&iSECTION(iSectionIndex), def_ptr);
634         }
635
636         /* now switch on the type of variable it is */
637         switch (parm_table[parmnum].type) {
638         case P_BOOL:
639                 set_boolean(parm_ptr, parmvalue);
640                 break;
641
642         case P_BOOLREV:
643                 set_boolean(parm_ptr, parmvalue);
644                 *(BOOL *)parm_ptr = ! *(BOOL *)parm_ptr;
645                 break;
646
647         case P_INTEGER:
648                 *(int *)parm_ptr = atoi(parmvalue);
649                 break;
650
651         case P_CHAR:
652                 *(char *)parm_ptr = *parmvalue;
653                 break;
654
655         case P_OCTAL:
656                 sscanf(parmvalue, "%o", (int *)parm_ptr);
657                 break;
658
659         case P_PATH:
660                 string_set(parm_ptr, parmvalue);
661                 if ((cp = *(char**)parm_ptr) != NULL) {
662                         int len = strlen(cp);
663                         while (len > 1 && cp[len-1] == '/') len--;
664                         cp[len] = '\0';
665                 }
666                 break;
667
668         case P_STRING:
669                 string_set(parm_ptr, parmvalue);
670                 break;
671
672         case P_ENUM:
673                 for (i=0; parm_table[parmnum].enum_list[i].name; i++) {
674                         if (strequal(parmvalue, parm_table[parmnum].enum_list[i].name)) {
675                                 *(int *)parm_ptr = parm_table[parmnum].enum_list[i].value;
676                                 break;
677                         }
678                 }
679                 if (!parm_table[parmnum].enum_list[i].name) {
680                         if (atoi(parmvalue) > 0)
681                                 *(int *)parm_ptr = atoi(parmvalue);
682                 }
683                 break;
684         }
685
686         return True;
687 }
688
689 /* Process a new section (rsync module).
690  * Returns True on success, False on failure. */
691 static BOOL do_section(char *sectionname)
692 {
693         BOOL isglobal;
694
695         if (*sectionname == ']') { /* A special push/pop/reset directive from params.c */
696                 bInGlobalSection = 1;
697                 if (strcmp(sectionname+1, "push") == 0) {
698                         all_vars *vp = EXPAND_ITEM_LIST(&Vars_stack, all_vars, 2);
699                         memcpy(vp, &Vars, sizeof Vars);
700                 } else if (strcmp(sectionname+1, "pop") == 0
701                  || strcmp(sectionname+1, "reset") == 0) {
702                         all_vars *vp = ((all_vars*)Vars_stack.items) + Vars_stack.count - 1;
703                         if (!Vars_stack.count)
704                                 return False;
705                         memcpy(&Vars, vp, sizeof Vars);
706                         if (sectionname[1] == 'p')
707                                 Vars_stack.count--;
708                 } else
709                         return False;
710                 return True;
711         }
712
713         isglobal = strwicmp(sectionname, GLOBAL_NAME) == 0;
714
715         /* At the end of the global section, add any --dparam items. */
716         if (bInGlobalSection && !isglobal) {
717                 if (!section_list.count)
718                         set_dparams(0);
719         }
720
721         /* if we've just struck a global section, note the fact. */
722         bInGlobalSection = isglobal;
723
724         /* check for multiple global sections */
725         if (bInGlobalSection)
726                 return True;
727
728 #if 0
729         /* If we have a current section, tidy it up before moving on. */
730         if (iSectionIndex >= 0) {
731                 /* Add any tidy work as needed ... */
732                 if (problem)
733                         return False;
734         }
735 #endif
736
737         if (strchr(sectionname, '/') != NULL) {
738                 rprintf(FLOG, "Warning: invalid section name in configuration file: %s\n", sectionname);
739                 return False;
740         }
741
742         if ((iSectionIndex = add_a_section(sectionname)) < 0) {
743                 rprintf(FLOG, "Failed to add a new module\n");
744                 bInGlobalSection = True;
745                 return False;
746         }
747
748         return True;
749 }
750
751 /* Load the modules from the config file. Return True on success,
752  * False on failure. */
753 int lp_load(char *pszFname, int globals_only)
754 {
755         bInGlobalSection = True;
756
757         reset_all_vars();
758
759         /* We get sections first, so have to start 'behind' to make up. */
760         iSectionIndex = -1;
761         return pm_process(pszFname, globals_only ? NULL : do_section, do_parameter);
762 }
763
764 BOOL set_dparams(int syntax_check_only)
765 {
766         char *equal, *val, **params = dparam_list.items;
767         unsigned j;
768
769         for (j = 0; j < dparam_list.count; j++) {
770                 equal = strchr(params[j], '='); /* options.c verified this */
771                 *equal = '\0';
772                 if (syntax_check_only) {
773                         if (map_parameter(params[j]) < 0) {
774                                 rprintf(FERROR, "Unknown parameter \"%s\"\n", params[j]);
775                                 *equal = '=';
776                                 return False;
777                         }
778                 } else {
779                         for (val = equal+1; isSpace(val); val++) {}
780                         do_parameter(params[j], val);
781                 }
782                 *equal = '=';
783         }
784
785         return True;
786 }
787
788 /* Return the max number of modules (sections). */
789 int lp_num_modules(void)
790 {
791         return section_list.count;
792 }
793
794 /* Return the number of the module with the given name, or -1 if it doesn't
795  * exist. Note that this is a DIFFERENT ANIMAL from the internal function
796  * getsectionbyname()! This works ONLY if all sections have been loaded,
797  * and does not copy the found section. */
798 int lp_number(char *name)
799 {
800         int i;
801
802         for (i = section_list.count - 1; i >= 0; i--) {
803                 if (strcmp(lp_name(i), name) == 0)
804                         break;
805         }
806
807         return i;
808 }