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