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