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