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