loadparm.c

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